botched copyright

[unix-history] / usr / src / usr.bin / what / what.c

/*
* Copyright (c) 1980, 1988 Regents of the University of California.
* All rights reserved.  The Berkeley software License Agreement
* specifies the terms and conditions for redistribution.
*/

#ifndef lint
char copyright[] =
"@(#) Copyright (c) 1980, 1988 Regents of the University of California.\n\
All rights reserved.\n";
#endif not lint

#ifndef lint
static char sccsid[] = "@(#)what.c      5.1 (Berkeley) %G%";
#endif not lint

#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');
               }
}