xref: /netbsd-src/usr.bin/apropos/apropos.c (revision c41a4eebefede43f6950f838a387dc18c6a431bf)
1 /*	$NetBSD: apropos.c,v 1.11 1997/11/12 00:04:49 mrg Exp $	*/
2 
3 /*
4  * Copyright (c) 1987, 1993, 1994
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *	This product includes software developed by the University of
18  *	California, Berkeley and its contributors.
19  * 4. Neither the name of the University nor the names of its contributors
20  *    may be used to endorse or promote products derived from this software
21  *    without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  */
35 
36 #include <sys/cdefs.h>
37 
38 #ifndef lint
39 __COPYRIGHT("@(#) Copyright (c) 1987, 1993, 1994\n\
40 	The Regents of the University of California.  All rights reserved.\n");
41 #endif /* not lint */
42 
43 #ifndef lint
44 #if 0
45 static char sccsid[] = "@(#)apropos.c	8.8 (Berkeley) 5/4/95";
46 #else
47 __RCSID("$NetBSD: apropos.c,v 1.11 1997/11/12 00:04:49 mrg Exp $");
48 #endif
49 #endif /* not lint */
50 
51 #include <sys/param.h>
52 #include <sys/queue.h>
53 
54 #include <ctype.h>
55 #include <err.h>
56 #include <glob.h>
57 #include <limits.h>
58 #include <stdio.h>
59 #include <stdlib.h>
60 #include <string.h>
61 #include <unistd.h>
62 
63 #include "config.h"
64 #include "pathnames.h"
65 
66 static int *found, foundman;
67 
68 #define	MAXLINELEN	8192		/* max line handled */
69 
70 int main __P((int, char **));
71 void apropos __P((char **, char *, int));
72 void lowstr __P((char *, char *));
73 int match __P((char *, char *));
74 void usage __P((void));
75 
76 int
77 main(argc, argv)
78 	int argc;
79 	char *argv[];
80 {
81 	ENTRY *ep;
82 	TAG *tp;
83 	int ch, rv;
84 	char *conffile, **p, *p_augment, *p_path;
85 	glob_t pg;
86 
87 	conffile = NULL;
88 	p_augment = p_path = NULL;
89 	while ((ch = getopt(argc, argv, "C:M:m:P:")) != -1)
90 		switch (ch) {
91 		case 'C':
92 			conffile = optarg;
93 			break;
94 		case 'M':
95 		case 'P':		/* backward compatible */
96 			p_path = optarg;
97 			break;
98 		case 'm':
99 			p_augment = optarg;
100 			break;
101 		case '?':
102 		default:
103 			usage();
104 		}
105 	argv += optind;
106 	argc -= optind;
107 
108 	if (argc < 1)
109 		usage();
110 
111 	if ((found = malloc((u_int)argc * sizeof(int))) == NULL)
112 		err(1, "malloc");
113 	memset(found, 0, argc * sizeof(int));
114 
115 	for (p = argv; *p; ++p)			/* convert to lower-case */
116 		lowstr(*p, *p);
117 
118 	if (p_augment)
119 		apropos(argv, p_augment, 1);
120 	if (p_path || (p_path = getenv("MANPATH")))
121 		apropos(argv, p_path, 1);
122 	else {
123 		config(conffile);
124 		ep = (tp = getlist("_whatdb")) == NULL ?
125 		    NULL : tp->list.tqh_first;
126 		for (; ep != NULL; ep = ep->q.tqe_next) {
127 			if (glob(ep->s, GLOB_BRACE | GLOB_NOSORT | GLOB_QUOTE,
128 			    NULL, &pg) != 0)
129 				err(1, "glob");
130 			if (pg.gl_pathc)
131 				for (p = pg.gl_pathv; *p; p++)
132 					apropos(argv, *p, 0);
133 			globfree(&pg);
134 		}
135 	}
136 
137 	if (!foundman)
138 		errx(1, "no %s file found", _PATH_WHATIS);
139 
140 	rv = 1;
141 	for (p = argv; *p; ++p)
142 		if (found[p - argv])
143 			rv = 0;
144 		else
145 			(void)printf("%s: nothing appropriate\n", *p);
146 	exit(rv);
147 }
148 
149 void
150 apropos(argv, path, buildpath)
151 	char **argv, *path;
152 	int buildpath;
153 {
154 	char *end, *name, **p;
155 	char buf[MAXLINELEN + 1], wbuf[MAXLINELEN + 1];
156 	char hold[MAXPATHLEN + 1];
157 
158 	for (name = path; name; name = end) {	/* through name list */
159 		if ((end = strchr(name, ':')))
160 			*end++ = '\0';
161 
162 		if (buildpath) {
163 			(void)sprintf(hold, "%s/%s", name, _PATH_WHATIS);
164 			name = hold;
165 		}
166 
167 		if (!freopen(name, "r", stdin))
168 			continue;
169 
170 		foundman = 1;
171 
172 		/* for each file found */
173 		while (fgets(buf, sizeof(buf), stdin)) {
174 			if (!strchr(buf, '\n')) {
175 				warnx("%s: line too long", name);
176 				continue;
177 			}
178 			lowstr(buf, wbuf);
179 			for (p = argv; *p; ++p)
180 				if (match(wbuf, *p)) {
181 					(void)printf("%s", buf);
182 					found[p - argv] = 1;
183 
184 					/* only print line once */
185 					while (*++p)
186 						if (match(wbuf, *p))
187 							found[p - argv] = 1;
188 					break;
189 				}
190 		}
191 	}
192 }
193 
194 /*
195  * match --
196  *	match anywhere the string appears
197  */
198 int
199 match(bp, str)
200 	char *bp, *str;
201 {
202 	int len;
203 	char test;
204 
205 	if (!*bp)
206 		return (0);
207 	/* backward compatible: everything matches empty string */
208 	if (!*str)
209 		return (1);
210 	for (test = *str++, len = strlen(str); *bp;)
211 		if (test == *bp++ && !strncmp(bp, str, len))
212 			return (1);
213 	return (0);
214 }
215 
216 /*
217  * lowstr --
218  *	convert a string to lower case
219  */
220 void
221 lowstr(from, to)
222 	char *from, *to;
223 {
224 	char ch;
225 
226 	while ((ch = *from++) && ch != '\n')
227 		*to++ = isupper(ch) ? tolower(ch) : ch;
228 	*to = '\0';
229 }
230 
231 /*
232  * usage --
233  *	print usage message and die
234  */
235 void
236 usage()
237 {
238 
239 	(void)fprintf(stderr,
240 	    "usage: apropos [-C file] [-M path] [-m path] keyword ...\n");
241 	exit(1);
242 }
243