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
40static 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
51static void search(void);
52__dead static void usage(void);
53
54static int matches;
55static int sflag;
56
57/*
58 * what
59 */
60int
61main(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
96static void
97search(void)
98{
99	int c;
100
101	while ((c = getchar()) != EOF) {
102loop:		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
121static void
122usage(void)
123{
124
125	(void)fprintf(stderr, "Usage: %s [-s] file ...\n", getprogname());
126	exit(1);
127}
128