usr/src/usr.bin/what/what.c

static  char *sccsid = "@(#)what.c      4.2 (Berkeley) %G%";
#include <stdio.h>

/*
 * what
 */

char    *infile = "Standard input";

main(argc, argv)
        int argc;
        char *argv[];
{

        argc--, argv++;
        do {
                if (argc > 0) {
                        if (freopen(argv[0], "r", stdin) == NULL) {
                                perror(argv[0]);
                                exit(1);
                        }
                        infile = argv[0];
                        printf("%s\n", infile);
                        argc--, argv++;
                }
                fseek(stdin, (long) 0, 0);
                find();
        } while (argc > 0);
        exit(0);
}

find()
{
        static char buf[BUFSIZ];
        register char *cp;
        register int c, cc;
        register char *pat;

contin:
        while ((c = getchar()) != EOF)
                if (c == '@') {
                        for (pat = "(#)"; *pat; pat++)
                                if ((c = getchar()) != *pat)
                                        goto contin;
                        putchar('\t');
                        while ((c = getchar()) != EOF && c && c != '"' &&
                            c != '>' && c != '\n')
                                putchar(c);
                        putchar('\n');
                }
}