what.c revision 1.3 1 /* $NetBSD: what.c,v 1.3 1994/11/17 06:59:40 jtc 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. 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 #ifndef lint
37 static char copyright[] =
38 "@(#) Copyright (c) 1980, 1988, 1993\n\
39 The Regents of the University of California. All rights reserved.\n";
40 #endif /* not lint */
41
42 #ifndef lint
43 #if 0
44 static char sccsid[] = "@(#)what.c 8.1 (Berkeley) 6/6/93";
45 #endif
46 static char rcsid[] = "$NetBSD: what.c,v 1.3 1994/11/17 06:59:40 jtc Exp $";
47 #endif /* not lint */
48
49 #include <stdio.h>
50
51 /*
52 * what
53 */
54 /* ARGSUSED */
55 main(argc, argv)
56 int argc;
57 char **argv;
58 {
59 if (!*++argv)
60 search();
61 else do {
62 if (!freopen(*argv, "r", stdin)) {
63 perror(*argv);
64 exit(1);
65 }
66 printf("%s\n", *argv);
67 search();
68 } while(*++argv);
69 exit(0);
70 }
71
72 search()
73 {
74 register int c;
75
76 while ((c = getchar()) != EOF) {
77 loop: if (c != '@')
78 continue;
79 if ((c = getchar()) != '(')
80 goto loop;
81 if ((c = getchar()) != '#')
82 goto loop;
83 if ((c = getchar()) != ')')
84 goto loop;
85 putchar('\t');
86 while ((c = getchar()) != EOF && c && c != '"' &&
87 c != '>' && c != '\n')
88 putchar(c);
89 putchar('\n');
90 }
91 }
92