Return to mailst.c CVS log

Up to [Research Unix] / researchv10no / cmd / uucp

Annotation of researchv10no/cmd/uucp/mailst.c, revision 1.1.1.1

1.1       root        1: /*     @(#)mailst.c    1.3     */
                      2: 
                      3: #include "uucp.h"
                      4: VERSION(@(#)mailst.c   1.3);
                      5: 
                      6: /*
                      7:  * fork and execute a mail command sending 
                      8:  * string (str) to user (user).
                      9:  * If file is non-null, the file is also sent.
                     10:  * (this is used for mail returned to sender.)
                     11:  *     user     -> user to send mail to
                     12:  *     str      -> string mailed to user
                     13:  *     infile   -> optional stdin mailed to user
                     14:  *     errfile  -> optional stderr mailed to user
                     15:  *
                     16:  * a upas-ism -- call rmail and make up our own From line,
                     17:  * so mail comes from uucp, not some arbitrary user
                     18:  */
                     19: char *ctime();
                     20: long time();
                     21: 
                     22: mailst(user, str, infile, errfile)
                     23: char *user, *str, *infile, *errfile;
                     24: {
                     25:        register FILE *fp, *fi;
                     26:        char cmd[BUFSIZ];
                     27:        char *c;
                     28:        long now;
                     29: 
                     30:        /* get rid of some stuff that could hurt */
                     31:        if ( (c = strpbrk(user, ";&|<>^`\\('\"")) != NULL)
                     32:                *c = NULLCHAR;
                     33:        (void) sprintf(cmd, "%s rmail %s", PATH, user);
                     34:        if ((fp = popen(cmd, "w")) == NULL)
                     35:                return;
                     36:        now = time((long *)0);
                     37:        fprintf(fp, "From uucp %.24s remote from %s\n", ctime(&now), Myname);
                     38:        fprintf(fp, "From: %s!uucp\n", Myname);
                     39:        (void) fprintf(fp, "%s\n", str);
                     40: 
                     41:        /* copy back stderr */
                     42:        if (*errfile != '\0' && NOTEMPTY(errfile) && (fi = fopen(errfile, "r")) != NULL) {
                     43:                fputs("\n\t===== stderr was =====\n", fp);
                     44:                if (xfappend(fi, fp) != SUCCESS)
                     45:                        fputs("\n\t===== well, i tried =====\n", fp);
                     46:                (void) fclose(fi);
                     47:                fputc('\n', fp);
                     48:        }
                     49: 
                     50:        /* copy back stdin */
                     51:        if (*infile != '\0' && NOTEMPTY(infile) && (fi = fopen(infile, "r")) != NULL) {
                     52:                fputs("\n\t===== stdin was =====\n", fp);
                     53:                if (xfappend(fi, fp) != SUCCESS)
                     54:                        fputs("\n\t===== well, i tried =====\n", fp);
                     55:                (void) fclose(fi);
                     56:                fputc('\n', fp);
                     57:        }
                     58: 
                     59:        (void) pclose(fp);
                     60: }
                     61: #ifndef        V7
                     62: static char un[2*NAMESIZE];
                     63: setuucp(p)
                     64: char *p;
                     65: {
                     66:    char **envp;
                     67: 
                     68:     envp = Env;
                     69:     for ( ; *envp; envp++) {
                     70:        if(PREFIX("LOGNAME", *envp)) {
                     71:            (void) sprintf(un, "LOGNAME=%s",p);
                     72:            envp[0] = &un[0];
                     73:        }
                     74:     }
                     75: }
                     76: #else
                     77: /*ARGSUSED*/
                     78: setuucp(p) char        *p; {}
                     79: #endif

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