Return to rmail.c CVS log

Up to [CSRG BSD Unix] / 40BSD / cmd

Annotation of 40BSD/cmd/rmail.c, revision 1.1.1.1

1.1       root        1: static char *sccsid = "@(#)rmail.c     4.1 (Berkeley) 10/1/80";
                      2: /*
                      3:  * rmail: front end for mail to stack up those stupid >From ... remote from ...
                      4:  * lines and make a correct return address.  This works with the -f option
                      5:  * to /etc/delivermail so it won't work on systems without delivermail.
                      6:  * However, it ought to be easy to modify a standard /bin/mail to do the
                      7:  * same thing.
                      8:  *
                      9:  * NOTE: Rmail is SPECIFICALLY INTENDED for ERNIE COVAX because of its
                     10:  * physical position as a gateway between the uucp net and the arpanet.
                     11:  * By default, other sites will probably want /bin/rmail to be a link
                     12:  * to /bin/mail, as it was intended by BTL.  However, other than the
                     13:  * (somewhat annoying) loss of information about when the mail was
                     14:  * originally sent, rmail should work OK on other systems running uucp.
                     15:  * If you don't run uucp you don't even need any rmail.
                     16:  */
                     17: 
                     18: #include <stdio.h>
                     19: FILE *popen();
                     20: char *index();
                     21: 
                     22: #define MAILER "/etc/delivermail"
                     23: 
                     24: main(argc, argv)
                     25: char **argv;
                     26: {
                     27:        FILE *out;      /* output to delivermail */
                     28:        char lbuf[512]; /* one line of the message */
                     29:        char from[512]; /* accumulated path of sender */
                     30:        char ufrom[64]; /* user on remote system */
                     31:        char sys[64];   /* a system in path */
                     32:        char junk[512]; /* scratchpad */
                     33:        char cmd[512];
                     34:        char *to, *cp;
                     35: 
                     36:        to = argv[1];
                     37:        if (argc != 2) {
                     38:                fprintf(stderr, "Usage: rmail user\n");
                     39:                exit(1);
                     40:        }
                     41: 
                     42:        for (;;) {
                     43:                fgets(lbuf, sizeof lbuf, stdin);
                     44:                if (strncmp(lbuf, "From ", 5) && strncmp(lbuf, ">From ", 6))
                     45:                        break;
                     46:                /* sscanf(lbuf, "%s %s %s %s %s %s %s remote from %s", junk, ufrom, junk, junk, junk, junk, junk, sys); */
                     47:                sscanf(lbuf, "%s %s", junk, ufrom);
                     48:                cp = lbuf;
                     49:                for (;;) {
                     50:                        cp = index(cp+1, 'r');
                     51:                        if (cp == NULL)
                     52:                                cp = "remote from somewhere";
                     53: #ifdef DEBUG
                     54:                        printf("cp='%s'\n", cp);
                     55: #endif
                     56:                        if (strncmp(cp, "remote from ", 12)==0)
                     57:                                break;
                     58:                }
                     59:                sscanf(cp, "remote from %s", sys);
                     60:                strcat(from, sys);
                     61:                strcat(from, "!");
                     62: #ifdef DEBUG
                     63:                printf("ufrom='%s', sys='%s', from now '%s'\n", ufrom, sys, from);
                     64: #endif
                     65:        }
                     66:        strcat(from, ufrom);
                     67: 
                     68:        sprintf(cmd, "%s -r%s %s", MAILER, from, to);
                     69: #ifdef DEBUG
                     70:        printf("cmd='%s'\n", cmd);
                     71: #endif
                     72:        out = popen(cmd, "w");
                     73:        fputs(lbuf, out);
                     74:        while (fgets(lbuf, sizeof lbuf, stdin))
                     75:                fputs(lbuf, out);
                     76:        pclose(out);
                     77: }
                     78: 
                     79: /*
                     80:  * Return the ptr in sp at which the character c appears;
                     81:  * NULL if not found
                     82:  */
                     83: 
                     84: char *
                     85: index(sp, c)
                     86: register char *sp, c;
                     87: {
                     88:        do {
                     89:                if (*sp == c)
                     90:                        return(sp);
                     91:        } while (*sp++);
                     92:        return(NULL);
                     93: }

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