Return to from.c CVS log

Up to [CSRG BSD Unix] / 43BSD / ucb

Annotation of 43BSD/ucb/from.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Copyright (c) 1980 Regents of the University of California.
                      3:  * All rights reserved.  The Berkeley software License Agreement
                      4:  * specifies the terms and conditions for redistribution.
                      5:  */
                      6: 
                      7: #ifndef lint
                      8: char copyright[] =
                      9: "@(#) Copyright (c) 1980 Regents of the University of California.\n\
                     10:  All rights reserved.\n";
                     11: #endif not lint
                     12: 
                     13: #ifndef lint
                     14: static char sccsid[] = "@(#)from.c     5.2 (Berkeley) 11/4/85";
                     15: #endif not lint
                     16: 
                     17: #include <stdio.h>
                     18: #include <ctype.h>
                     19: #include <pwd.h>
                     20: 
                     21: struct passwd *getpwuid();
                     22: 
                     23: main(argc, argv)
                     24:        int argc;
                     25:        register char **argv;
                     26: {
                     27:        char lbuf[BUFSIZ];
                     28:        char lbuf2[BUFSIZ];
                     29:        register struct passwd *pp;
                     30:        int stashed = 0;
                     31:        register char *name;
                     32:        char *sender;
                     33:        char *getlogin();
                     34: 
                     35:        if (argc > 1 && *(argv[1]) == '-' && (*++argv)[1] == 's') {
                     36:                if (--argc <= 1) {
                     37:                        fprintf (stderr, "Usage: from [-s sender] [user]\n");
                     38:                        exit (1);
                     39:                }
                     40:                --argc;
                     41:                sender = *++argv;
                     42:                for (name = sender; *name; name++)
                     43:                        if (isupper(*name))
                     44:                                *name = tolower(*name);
                     45: 
                     46:        } else
                     47:                sender = NULL;
                     48:        if (chdir("/usr/spool/mail") < 0)
                     49:                exit(1);
                     50:        if (argc > 1)
                     51:                name = argv[1];
                     52:        else {
                     53:                name = getlogin ();
                     54:                if (name == NULL || strlen(name) == 0) {
                     55:                        pp = getpwuid(getuid());
                     56:                        if (pp == NULL) {
                     57:                                fprintf(stderr, "Who are you?\n");
                     58:                                exit(1);
                     59:                        }
                     60:                        name = pp->pw_name;
                     61:                }
                     62:        }
                     63:        if (freopen(name, "r", stdin) == NULL) {
                     64:                fprintf(stderr, "Can't open /usr/spool/mail/%s\n", name);
                     65:                exit(0);
                     66:        }
                     67:        while (fgets(lbuf, sizeof lbuf, stdin) != NULL)
                     68:                if (lbuf[0] == '\n' && stashed) {
                     69:                        stashed = 0;
                     70:                        printf("%s", lbuf2);
                     71:                } else if (strncmp(lbuf, "From ", 5) == 0 &&
                     72:                    (sender == NULL || match(&lbuf[4], sender))) {
                     73:                        strcpy(lbuf2, lbuf);
                     74:                        stashed = 1;
                     75:                }
                     76:        if (stashed)
                     77:                printf("%s", lbuf2);
                     78:        exit(0);
                     79: }
                     80: 
                     81: match (line, str)
                     82:        register char *line, *str;
                     83: {
                     84:        register char ch;
                     85: 
                     86:        while (*line == ' ' || *line == '\t')
                     87:                ++line;
                     88:        if (*line == '\n')
                     89:                return (0);
                     90:        while (*str && *line != ' ' && *line != '\t' && *line != '\n') {
                     91:                ch = isupper(*line) ? tolower(*line) : *line;
                     92:                if (ch != *str++)
                     93:                        return (0);
                     94:                line++;
                     95:        }
                     96:        return (*str == '\0');
                     97: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.