1 /* $NetBSD: what.c,v 1.15 2021/12/07 18:38:50 rillig Exp $ */
2
3 /*
4 * Copyright (c) 1980, 1988, 1993
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. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 #ifndef lint
34 __COPYRIGHT("@(#) Copyright (c) 1980, 1988, 1993\
35 The Regents of the University of California. All rights reserved.");
36 #endif /* not lint */
37
38 #ifndef lint
39 #if 0
40 static char sccsid[] = "@(#)what.c 8.1 (Berkeley) 6/6/93";
41 #endif
42 __RCSID("$NetBSD: what.c,v 1.15 2021/12/07 18:38:50 rillig Exp $");
43 #endif /* not lint */
44
45 #include <locale.h>
46 #include <err.h>
47 #include <stdio.h>
48 #include <stdlib.h>
49 #include <unistd.h>
50
51 static void search(void);
52 __dead static void usage(void);
53
54 static int matches;
55 static int sflag;
56
57 /*
58 * what
59 */
60 int
main(int argc,char ** argv)61 main(int argc, char **argv)
62 {
63 int c;
64
65 (void)setlocale(LC_ALL, "");
66
67 matches = sflag = 0;
68 while ((c = getopt(argc, argv, "s")) != -1) {
69 switch (c) {
70 case 's':
71 sflag = 1;
72 break;
73 case '?':
74 default:
75 usage();
76 }
77 }
78 argc -= optind;
79 argv += optind;
80
81 if (argc < 1) {
82 usage();
83 } else do {
84 if (freopen(*argv, "r", stdin) == NULL) {
85 warn("Cannot open `%s'", *argv);
86 break;
87 }
88 printf("%s:\n", *argv);
89 search();
90 } while (*++argv != NULL);
91
92 /* Note: the standard explicitly specifies an exit status of 0/1. */
93 return matches ? 0 : 1;
94 }
95
96 static void
search(void)97 search(void)
98 {
99 int c;
100
101 while ((c = getchar()) != EOF) {
102 loop: if (c != '@')
103 continue;
104 if ((c = getchar()) != '(')
105 goto loop;
106 if ((c = getchar()) != '#')
107 goto loop;
108 if ((c = getchar()) != ')')
109 goto loop;
110 putchar('\t');
111 while ((c = getchar()) != EOF && c != '\0' && c != '"' &&
112 c != '>' && c != '\n' && c != '\\')
113 putchar(c);
114 putchar('\n');
115 matches++;
116 if (sflag)
117 break;
118 }
119 }
120
121 static void
usage(void)122 usage(void)
123 {
124
125 (void)fprintf(stderr, "Usage: %s [-s] file ...\n", getprogname());
126 exit(1);
127 }
128