Home | History | Annotate | Download | only in bnu
      1 /*
      2  * CDDL HEADER START
      3  *
      4  * The contents of this file are subject to the terms of the
      5  * Common Development and Distribution License, Version 1.0 only
      6  * (the "License").  You may not use this file except in compliance
      7  * with the License.
      8  *
      9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
     10  * or http://www.opensolaris.org/os/licensing.
     11  * See the License for the specific language governing permissions
     12  * and limitations under the License.
     13  *
     14  * When distributing Covered Code, include this CDDL HEADER in each
     15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
     16  * If applicable, add the following below this CDDL HEADER, with the
     17  * fields enclosed by brackets "[]" replaced with your own identifying
     18  * information: Portions Copyright [yyyy] [name of copyright owner]
     19  *
     20  * CDDL HEADER END
     21  */
     22 /*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
     23 /*	  All Rights Reserved  	*/
     24 
     25 /*
     26  * Copyright (c) 2000 by Sun Microsystems, Inc.
     27  * All rights reserved.
     28  */
     29 
     30 #ident	"%Z%%M%	%I%	%E% SMI"	/* from SVR4 bnu:mailst.c 2.7 */
     31 
     32 #include "uucp.h"
     33 
     34 extern int xfappend();
     35 
     36 /*
     37  * fork and execute a mail command sending
     38  * string (str) to user (user).
     39  * If file is non-null, the file is also sent.
     40  * (this is used for mail returned to sender.)
     41  *	user	 -> user to send mail to
     42  *	subj	 -> subject for the mail
     43  *	str	 -> string mailed to user
     44  *	infile	 -> optional stdin mailed to user
     45  *	errfile	 -> optional stderr mailed to user
     46  */
     47 void
     48 mailst(user, subj, str, infile, errfile)
     49 char *user, *subj, *str, *infile, *errfile;
     50 {
     51 	register FILE *fp, *fi;
     52 	char cmd[BUFSIZ];
     53 	char subject[BUFSIZ];
     54 	char *c;
     55 
     56 	/* get rid of some stuff that could be dangerous */
     57 	if ( (c = strpbrk(user, Shchar)) != NULL) {
     58 		*c = NULLCHAR;
     59 	}
     60 
     61 	/* limit subject to one line */
     62 	if ((c = strchr(subj, '\n')) != NULL) {
     63 		strncpy(subject, subj, c-subj);
     64 		subject[c-subj] = NULLCHAR;
     65 		subj = subject;
     66 	}
     67 
     68 	(void) snprintf(cmd, sizeof (cmd), "%s %s '%s'", PATH, MAIL, user);
     69 	if ((fp = popen(cmd, "w")) == NULL)
     70 		return;
     71 	(void) fprintf(fp, "To: %s\nSubject: %s\n\n%s\n", user, subj, str);
     72 
     73 	/* copy back stderr */
     74 	if (*errfile != '\0' && NOTEMPTY(errfile) && (fi = fopen(errfile, "r")) != NULL) {
     75 		fputs(gettext("\n\t===== stderr was =====\n"), fp);
     76 		if (xfappend(fi, fp) != SUCCESS)
     77 			fputs(gettext("\n\t===== well, i tried =====\n"), fp);
     78 		(void) fclose(fi);
     79 		fputc('\n', fp);
     80 	}
     81 
     82 	/* copy back stdin */
     83  	if (*infile) {
     84  		if (!NOTEMPTY(infile))
     85  			fputs(gettext("\n\t===== stdin was empty =====\n"), fp);
     86  		else if (chkpth(infile, CK_READ) == FAIL) {
     87  			fputs(gettext( "\n\t===== stdin was"
     88 			    " denied read permission =====\n"), fp);
     89 			snprintf(cmd, sizeof (cmd),
     90 				"user %s, stdin %s", user, infile);
     91 			logent(cmd, "DENIED");
     92 		}
     93  		else if ((fi = fopen(infile, "r")) == NULL) {
     94  			fputs(gettext(
     95 			    "\n\t===== stdin was unreadable =====\n"), fp);
     96 			snprintf(cmd, sizeof (cmd),
     97 				"user %s, stdin %s", user, infile);
     98 			logent(cmd, "UNREADABLE");
     99 		}
    100  		else {
    101  			fputs(gettext("\n\t===== stdin was =====\n"), fp);
    102  			if (xfappend(fi, fp) != SUCCESS)
    103  				fputs(gettext(
    104 				    "\n\t===== well, i tried =====\n"), fp);
    105  			(void) fclose(fi);
    106  		}
    107 		fputc('\n', fp);
    108 	}
    109 
    110 	(void) pclose(fp);
    111 	return;
    112 }
    113 #ifndef	V7
    114 static char un[2*NAMESIZE];
    115 void
    116 setuucp(p)
    117 char *p;
    118 {
    119    char **envp;
    120 
    121     envp = Env;
    122     for ( ; *envp; envp++) {
    123 	if(PREFIX("LOGNAME", *envp)) {
    124 	    (void) snprintf(un, sizeof (un), "LOGNAME=%s",p);
    125 	    envp[0] = &un[0];
    126 	}
    127     }
    128    return;
    129 }
    130 #else
    131 /*ARGSUSED*/
    132 void
    133 setuucp(p) char	*p; {}
    134 #endif
    135