BSD 4_4_Lite2 release
[unix-history] / usr / src / usr.bin / apropos / apropos.c
index ede16c8..112aada 100644 (file)
@@ -1,55 +1,84 @@
 /*
 /*
- * Copyright (c) 1987 Regents of the University of California.
- * All rights reserved.
+ * Copyright (c) 1987, 1993, 1994
+ *     The Regents of the University of California.  All rights reserved.
  *
  *
- * Redistribution and use in source and binary forms are permitted
- * provided that the above copyright notice and this paragraph are
- * duplicated in all such forms and that any documentation,
- * advertising materials, and other materials related to such
- * distribution and use acknowledge that the software was developed
- * by the University of California, Berkeley.  The name of the
- * University may not be used to endorse or promote products derived
- * from this software without specific prior written permission.
- * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
- * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
- * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
  */
 
 #ifndef lint
  */
 
 #ifndef lint
-char copyright[] =
-"@(#) Copyright (c) 1987 Regents of the University of California.\n\
- All rights reserved.\n";
+static char copyright[] =
+"@(#) Copyright (c) 1987, 1993, 1994\n\
      The Regents of the University of California.  All rights reserved.\n";
 #endif /* not lint */
 
 #ifndef lint
 #endif /* not lint */
 
 #ifndef lint
-static char sccsid[] = "@(#)apropos.c  5.9 (Berkeley) %G%";
+static char sccsid[] = "@(#)apropos.c  8.8 (Berkeley) 5/4/95";
 #endif /* not lint */
 
 #include <sys/param.h>
 #endif /* not lint */
 
 #include <sys/param.h>
-#include <stdio.h>
+#include <sys/queue.h>
+
 #include <ctype.h>
 #include <ctype.h>
-#include <strings.h>
+#include <err.h>
+#include <limits.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+
+#include "../man/config.h"
 #include "../man/pathnames.h"
 
 #include "../man/pathnames.h"
 
-#define        MAXLINELEN      256                     /* max line handled */
+static int *found, foundman;
 
 
-int *found, foundman;
-char *progname;
+void apropos __P((char **, char *, int));
+void lowstr __P((char *, char *));
+int match __P((char *, char *));
+void usage __P((void));
 
 
+int
 main(argc, argv)
        int argc;
 main(argc, argv)
        int argc;
-       char **argv;
+       char *argv[];
 {
 {
-       extern char *optarg;
-       extern int optind;
-       register char **p;
-       int ch;
-       char *p_augment, *p_path, *config(), *getenv(), *malloc();
+       ENTRY *ep;
+       TAG *tp;
+       int ch, rv;
+       char *conffile, **p, *p_augment, *p_path;
 
 
-       progname = "apropos";
+       conffile = NULL;
        p_augment = p_path = NULL;
        p_augment = p_path = NULL;
-       while ((ch = getopt(argc, argv, "M:m:P:")) != EOF)
-               switch((char)ch) {
+       while ((ch = getopt(argc, argv, "C:M:m:P:")) != EOF)
+               switch (ch) {
+               case 'C':
+                       conffile = optarg;
+                       break;
                case 'M':
                case 'P':               /* backward compatible */
                        p_path = optarg;
                case 'M':
                case 'P':               /* backward compatible */
                        p_path = optarg;
@@ -67,56 +96,66 @@ main(argc, argv)
        if (argc < 1)
                usage();
 
        if (argc < 1)
                usage();
 
-       if (!p_path && !(p_path = getenv("MANPATH")))
-               p_path = config();
-
-       /*NOSTRICT*/
-       if (!(found = (int *)malloc((u_int)argc)))
-               enomem();
-       bzero((char *)found, argc * sizeof(int));
+       if ((found = malloc((u_int)argc * sizeof(int))) == NULL)
+               err(1, NULL);
+       memset(found, 0, argc * sizeof(int));
 
        for (p = argv; *p; ++p)                 /* convert to lower-case */
                lowstr(*p, *p);
 
        if (p_augment)
 
        for (p = argv; *p; ++p)                 /* convert to lower-case */
                lowstr(*p, *p);
 
        if (p_augment)
-               apropos(argv, p_augment);
-       if (p_path)
-               apropos(argv, p_path);
-       if (!foundman) {
-               (void)fprintf(stderr, "apropos: no %s file found.\n",
-                   _PATH_WHATIS);
-               exit(1);
+               apropos(argv, p_augment, 1);
+       if (p_path || (p_path = getenv("MANPATH")))
+               apropos(argv, p_path, 1);
+       else {
+               config(conffile);
+               ep = (tp = getlist("_whatdb")) == NULL ?
+                   NULL : tp->list.tqh_first;
+               for (; ep != NULL; ep = ep->q.tqe_next)
+                       apropos(argv, ep->s, 0);
        }
        }
+
+       if (!foundman)
+               errx(1, "no %s file found", _PATH_WHATIS);
+
+       rv = 1;
        for (p = argv; *p; ++p)
        for (p = argv; *p; ++p)
-               if (!found[p - argv])
+               if (found[p - argv])
+                       rv = 0;
+               else
                        (void)printf("%s: nothing appropriate\n", *p);
                        (void)printf("%s: nothing appropriate\n", *p);
+       exit(rv);
 }
 
 }
 
-apropos(argv, path)
+void
+apropos(argv, path, buildpath)
        char **argv, *path;
        char **argv, *path;
+       int buildpath;
 {
 {
-       register char *beg, *end, **p;
-       char fname[MAXPATHLEN + 1];
-       char buf[MAXLINELEN + 1], wbuf[MAXLINELEN + 1];
-
-       for (beg = path; beg; beg = end) {      /* through path list */
-               end = index(beg, ':');
-               if (!end)
-                       (void)sprintf(fname, "%s/%s", beg, _PATH_WHATIS);
-               else {
-                       (void)sprintf(fname, "%.*s/%s", end - beg, beg,
-                           _PATH_WHATIS);
-                       ++end;
+       char *end, *name, **p;
+       char buf[LINE_MAX + 1], wbuf[LINE_MAX + 1];
+
+       for (name = path; name; name = end) {   /* through name list */
+               if (end = strchr(name, ':'))
+                       *end++ = '\0';
+
+               if (buildpath) {
+                       char hold[MAXPATHLEN + 1];
+
+                       (void)sprintf(hold, "%s/%s", name, _PATH_WHATIS);
+                       name = hold;
                }
                }
-               if (!freopen(fname, "r", stdin))
+
+               if (!freopen(name, "r", stdin))
                        continue;
 
                        continue;
 
+               foundman = 1;
+
                /* for each file found */
                /* for each file found */
-               for (foundman = 1; fgets(buf, sizeof(buf), stdin);) {
-                       if (!index(buf, '\n')) {
-                               (void)fprintf(stderr,
-                                   "apropos: %s line too long.\n", fname);
-                               exit(1);
+               while (fgets(buf, sizeof(buf), stdin)) {
+                       if (!strchr(buf, '\n')) {
+                               warnx("%s: line too long", name);
+                               continue;
                        }
                        lowstr(buf, wbuf);
                        for (p = argv; *p; ++p)
                        }
                        lowstr(buf, wbuf);
                        for (p = argv; *p; ++p)
@@ -138,31 +177,33 @@ apropos(argv, path)
  * match --
  *     match anywhere the string appears
  */
  * match --
  *     match anywhere the string appears
  */
+int
 match(bp, str)
 match(bp, str)
-       register char *bp, *str;
+       char *bp, *str;
 {
 {
-       register int len;
-       register char test;
+       int len;
+       char test;
 
        if (!*bp)
 
        if (!*bp)
-               return(0);
+               return (0);
        /* backward compatible: everything matches empty string */
        if (!*str)
        /* backward compatible: everything matches empty string */
        if (!*str)
-               return(1);
+               return (1);
        for (test = *str++, len = strlen(str); *bp;)
                if (test == *bp++ && !strncmp(bp, str, len))
        for (test = *str++, len = strlen(str); *bp;)
                if (test == *bp++ && !strncmp(bp, str, len))
-                       return(1);
-       return(0);
+                       return (1);
+       return (0);
 }
 
 /*
  * lowstr --
  *     convert a string to lower case
  */
 }
 
 /*
  * lowstr --
  *     convert a string to lower case
  */
+void
 lowstr(from, to)
 lowstr(from, to)
-       register char *from, *to;
+       char *from, *to;
 {
 {
-       register char ch;
+       char ch;
 
        while ((ch = *from++) && ch != '\n')
                *to++ = isupper(ch) ? tolower(ch) : ch;
 
        while ((ch = *from++) && ch != '\n')
                *to++ = isupper(ch) ? tolower(ch) : ch;
@@ -173,9 +214,11 @@ lowstr(from, to)
  * usage --
  *     print usage message and die
  */
  * usage --
  *     print usage message and die
  */
+void
 usage()
 {
 usage()
 {
+
        (void)fprintf(stderr,
        (void)fprintf(stderr,
-           "usage: apropos [-M path] [-m path] keyword ...\n");
+           "usage: apropos [-C file] [-M path] [-m path] keyword ...\n");
        exit(1);
 }
        exit(1);
 }