![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to recmail.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDTahoe / new / news / src|
Return to recmail.c CVS log | Up to [CSRG BSD Unix] / 43BSDTahoe / new / news / src |
1.1 root 1: /*
2: * This software is Copyright (c) 1986 by Rick Adams.
3: *
4: * Permission is hereby granted to copy, reproduce, redistribute or
5: * otherwise use this software as long as: there is no monetary
6: * profit gained specifically from the use or reproduction or this
7: * software, it is not sold, rented, traded or otherwise marketed, and
8: * this copyright notice is included prominently in any copy
9: * made.
10: *
11: * The author make no claims as to the fitness or correctness of
12: * this software for any use whatsoever, and it is provided as is.
13: * Any use of this software is at the user's own risk.
14: *
15: * recmail: read a mail message on stdin, grab all addresses in To and Cc
16: * lines, and pass the full message to all addressees. This is useful to
17: * send the output of a recently edited mail message (with headers edited too).
18: * It is similar to sendmail -t, but only assumes /bin/mail.
19: * To use your own mailer, e. g. nmail, compile with -DMAILER=my_mailer.
20: */
21:
22: #ifdef SCCSID
23: static char *SccsId = "@(#)recmail.c 1.16 9/24/87";
24: #endif /* SCCSID */
25:
26: #include "params.h"
27:
28: #ifndef MAILER
29: #define MAILER "/bin/mail"
30: #endif
31: char mailer[] = MAILER;
32:
33: #define MAXRECIPS 100
34: char *recips[MAXRECIPS];
35: int nrecips = 0;
36:
37: main()
38: {
39: FILE *fd;
40: char *tmpf;
41: FILE *errfd;
42: char *errf;
43: char linebuf[1024];
44: int i, pid, wpid;
45: int exstat;
46: char *mypath;
47: int goodcnt, badcnt;
48: char *mktemp(), *getenv();
49:
50: tmpf = mktemp("/tmp/rmXXXXXX");
51: (void) close(creat(tmpf,0666));
52: fd = fopen(tmpf, "w");
53: errf = mktemp("/tmp/rmXXXXXX");
54: (void) close(creat(errf,0666));
55: errfd = fopen(errf, "w");
56: fprintf(errfd, "Subject: Returned mail\n");
57: fprintf(errfd, "\n ----- Transcript of session follows -----\n");
58: (void) fflush(errfd);
59: goodcnt = badcnt = 0;
60:
61: while (fgets(linebuf, sizeof linebuf, stdin) != NULL) {
62: if ((strncmp(linebuf, "Bcc: ", 5) == 0 ||
63: strncmp(linebuf, "bcc: ", 5) == 0 ||
64: strncmp(linebuf, "BCC: ", 5) == 0)) {
65: if (linebuf[5] != '\n')
66: addrecips(linebuf+5);
67: }
68: else if (fputs(linebuf, fd) == EOF)
69: goto werror;
70: if (linebuf[0] == '\n')
71: break;
72: if ((strncmp(linebuf, "To: ", 4) == 0 ||
73: strncmp(linebuf, "to: ", 4) == 0 ||
74: strncmp(linebuf, "TO: ", 4) == 0 ||
75: strncmp(linebuf, "Cc: ", 4) == 0 ||
76: strncmp(linebuf, "cc: ", 4) == 0 ||
77: strncmp(linebuf, "CC: ", 4) == 0) &&
78: linebuf[4] != '\n')
79: addrecips(linebuf+4);
80: }
81: if (!feof(stdin)) {
82: while (fgets(linebuf, sizeof linebuf, stdin) != NULL) {
83: if (fputs(linebuf, fd) == EOF) {
84: werror:
85: printf("write error on temp file\n");
86: exit(2);
87: }
88: }
89: }
90: /*
91: * Append the contents of the .signature file (if it exists) to
92: * the end of the mail message
93: */
94: {
95: char sigbuf[BUFSIZ];
96: register c;
97: register char *p = getenv("HOME");
98: FILE *infp;
99:
100: if (p) {
101: (void) sprintf(sigbuf, "%s/%s", p, ".signature");
102: if (infp = fopen(sigbuf, "r")) {
103: fprintf(fd,"---\n");
104: while ((c = getc(infp)) != EOF)
105: putc(c,fd);
106: (void) fclose(infp);
107: }
108: }
109: }
110: (void) fclose(fd);
111:
112: /*
113: * Force the path to only consider /bin and /usr/bin, since
114: * that's the version of mail we want (not /usr/ucb/mail)
115: */
116: if (mailer[0] != '/') {
117: register int e;
118: extern char **environ;
119: for (e = 0; environ[e] != NULL; ++e)
120: if (strncmp(environ[e], "PATH=", 5) == 0) {
121: environ[e] = "PATH=/bin:/usr/bin";
122: break;
123: }
124: }
125: mypath = getenv("PATH");
126: if (mypath)
127: strcpy(mypath, "/bin:/usr/bin");
128:
129: /*
130: * We send the copies out separately, because of a bug in
131: * USG's /bin/mail which will generate ANOTHER To: line,
132: * even though we already have one, if there are at least
133: * two recipients.
134: */
135: for (i=0; i<nrecips; i++) {
136: /*
137: * mail recips[i] < tmpf
138: */
139: pid = mailto(tmpf, errfd, recips[i]);
140: exstat = -1;
141: while ((wpid = wait(&exstat)) >= 0 && wpid != pid)
142: ;
143: if (exstat == 0)
144: goodcnt++;
145: else
146: badcnt++;
147: }
148: if (badcnt) {
149: mailback(errfd, tmpf, errf);
150: (void) unlink(tmpf);
151: (void) unlink(errf);
152: exit(1);
153: } else if (goodcnt == 0) {
154: fprintf(errfd, "recmail: no 'To:' line\n");
155: mailback(errfd, tmpf, errf);
156: (void) unlink(tmpf);
157: (void) unlink(errf);
158: exit (1);
159: }
160: (void) unlink(tmpf);
161: (void) unlink(errf);
162: exit (0);
163: }
164:
165: #define isok(c) (isprint(c) && (c) != ' ' && c != ',')
166: addrecips(line)
167: char *line;
168: {
169: char *front, *back, *tail;
170: char *malloc();
171:
172: tail = line + strlen(line);
173: for (front=line; front < tail; ) {
174: while (!isok(*front) && front < tail)
175: front++;
176: if (front >= tail)
177: break; /* skip end of line garbage */
178: for (back=front; isok(*back); back++)
179: ;
180: *back=0;
181: if (nrecips >= MAXRECIPS) {
182: printf("Too many destinations\n");
183: exit(2);
184: }
185: if ((recips[nrecips] = malloc(strlen(front) + 1)) == NULL) {
186: printf("Out of space\n");
187: exit(2);
188: }
189: (void) strcpy(recips[nrecips], front);
190: nrecips++;
191: front = back+1;
192: }
193: }
194:
195: int
196: mailto(tmpf, errfd, recip)
197: char *tmpf;
198: FILE *errfd;
199: char *recip;
200: {
201: register int pid;
202:
203: /*
204: * mail recips < tmpf
205: */
206: while ((pid = vfork()) == -1) {
207: fprintf(stderr, "fork failed, waiting...\r\n");
208: sleep(60);
209: }
210: if (pid == 0) {
211: (void) close(0);
212: (void) open(tmpf, 0);
213: if (errfd != NULL) {
214: (void) close(1);
215: (void) dup(fileno(errfd));
216: (void) fclose(errfd);
217: (void) close(2);
218: (void) dup(1);
219: }
220: execlp(mailer, mailer, recip, (char *)0);
221: perror(mailer);
222: exit(1);
223: }
224: return pid;
225: }
226:
227: mailback(errfd, tmpf, errf)
228: register FILE *errfd;
229: char *tmpf;
230: char *errf;
231: {
232: register FILE *fd;
233: register int c;
234: int exstat;
235: register int pid, wpid;
236: char *logn;
237: char *getlogin(), *getenv();
238: register struct passwd *pwd;
239:
240: if ((fd = fopen(tmpf, "r")) != NULL) {
241: fprintf(errfd, "\n ----- Unsent message follows -----\n");
242: while ((c = getc(fd)) != EOF)
243: putc(c, errfd);
244: (void) fclose(fd);
245: }
246: (void) fclose(errfd);
247: if ((logn = getlogin()) == NULL && (logn = getenv("USER")) == NULL) {
248: if ((pwd = getpwuid(getuid())) == NULL)
249: return;
250: logn = pwd->pw_name;
251: }
252: pid = mailto(errf, (FILE *)NULL, logn);
253: while ((wpid = wait(&exstat)) >= 0 && wpid != pid)
254: ;
255: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.