![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to mailit.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / contrib / notes / src|
Return to mailit.c CVS log | Up to [CSRG BSD Unix] / 43BSD / contrib / notes / src |
1.1 ! root 1: #include "parms.h" ! 2: #include "structs.h" ! 3: ! 4: #ifdef RCSIDENT ! 5: static char rcsid[] = "$Header: mailit.c,v 1.7.0.3 85/07/25 14:07:21 notes Rel $"; ! 6: #endif RCSIDENT ! 7: ! 8: /* ! 9: * mailit ! 10: * ! 11: * takes the text record specified, along with the notefile name, ! 12: * the author name, (other things added later), and builds a ! 13: * temp file. The user is prompted for a list of the people to ! 14: * send the file to. After an edit session, the mail is sent. ! 15: * ! 16: * Returns: -1 if no letter sent ! 17: * 0 if letter sent (or if it thinks so) ! 18: * ! 19: * Original author: Ray Essick June 1981. ! 20: * modified: Ray Essick December 1981. ! 21: * modified again: Thanks to Malcolm Slaney of Purdue EE dept. ! 22: * added the SUPERMAILER processing. May 25, 1982 ! 23: * ! 24: */ ! 25: ! 26: mailit (io, where, author, date, title, toauth, wtext) ! 27: struct io_f *io; ! 28: struct daddr_f *where; ! 29: struct auth_f *author; ! 30: struct when_f *date; ! 31: char *title; ! 32: /* toauth - true if mail to author of note */ ! 33: /* wtext - true is mail with text of note */ ! 34: { ! 35: char buf[128]; /* > 5 + 80 + 3 + 15 */ ! 36: char whoto[WDLEN + 1]; /* destination */ ! 37: char *command; /* mailer to use */ ! 38: char fn[20]; /* hold scratch file name */ ! 39: int f; ! 40: char *p; ! 41: #ifdef SUPERMAILER ! 42: char subject[TITLEN + 20]; /* subject line for super mailer */ ! 43: #endif ! 44: int i; ! 45: FILE * txtfile; ! 46: ! 47: if (toauth) ! 48: { ! 49: if (strcmp (author -> aname, "Anonymous") == 0) ! 50: { ! 51: printf ("Can't send to Anonymous\n"); ! 52: fflush (stdout); ! 53: sleep (2); ! 54: return (-1); ! 55: } ! 56: } ! 57: ! 58: if (toauth) ! 59: { ! 60: if (strcmp (System, author -> asystem) != 0) ! 61: { ! 62: #ifdef USERHOST ! 63: sprintf (whoto, "%s@%s", author -> aname, author -> asystem); ! 64: #else ! 65: sprintf (whoto, "%s!%s", author -> asystem, author -> aname); ! 66: #endif USERHOST ! 67: } ! 68: else ! 69: sprintf (whoto, "%s", author -> aname); ! 70: } ! 71: else ! 72: { ! 73: at (0, 1); ! 74: printf ("\nSend to whom? "); ! 75: if (gline (whoto, WDLEN) == 1) /* will flush stdout */ ! 76: return (-1); /* no letter sent */ ! 77: ! 78: } ! 79: ! 80: #ifdef SUPERMAILER ! 81: strcpy (subject, title); ! 82: for (p = subject; *p; p++) ! 83: if (*p == '"' || *p == '`') ! 84: *p = '\''; /* eliminate escape troubles */ ! 85: #endif SUPERMAILER ! 86: ! 87: sprintf (fn, "/tmp/nfm%d", getpid ()); ! 88: x ((txtfile = fopen (fn, "w")) == NULL, "mailit: creat tmp"); ! 89: x (chmod (fn, 0666) < 0, "mailit: chmod tmp"); ! 90: ! 91: if (wtext) /* add text if specified */ ! 92: { ! 93: preptxt (io, txtfile, author, date, where, title); ! 94: } ! 95: ! 96: fclose (txtfile); ! 97: ! 98: if ((command = getenv ("MAILER")) == NULL) /* override it? */ ! 99: command = MAILER; /* use default */ ! 100: at (0, 1); ! 101: #ifdef SUPERMAILER /* dumb mail interface */ ! 102: if (wtext) /* do it hard way if with text */ ! 103: { ! 104: #endif ! 105: printf ("Edit letter:\n"); ! 106: fflush (stdout); /* clean out buffer */ ! 107: #ifndef FASTFORK ! 108: sprintf (buf, "%s %s", hised, fn); /* build edit command */ ! 109: dounix (buf, 1, 1); /* call editor */ ! 110: #else ! 111: dounix (1, 1, hised, fn, 0, 0, 0); ! 112: #endif ! 113: ! 114: ! 115: f = 0; /* assume normal termination */ ! 116: while (1) ! 117: { ! 118: sprintf (buf, "Send this to %s? (y/n):", whoto); ! 119: fflush (stdout); ! 120: if (askyn (buf) == 'y') ! 121: { ! 122: printf ("\nSending...\n"); ! 123: fflush (stdout); ! 124: #ifdef SUPERMAILER ! 125: sprintf (buf, "%s -s \"%s\" %s < %s", command, subject, whoto, fn); ! 126: #else ! 127: sprintf (buf, "%s %s < %s", command, whoto, fn); ! 128: #endif ! 129: /* make the command */ ! 130: #ifndef FASTFORK ! 131: f = dounix (buf, 1, 0); /* mail the thing */ ! 132: #else ! 133: f = dounix (1, 0, DFLTSH, "-c", buf, 0, 0); ! 134: /* ! 135: * Can't let him use the C shell, since we don't escape the '!' in ! 136: * remote addresses. RBE 6/21/82 ! 137: */ ! 138: #endif ! 139: break; /* out of loop */ ! 140: } ! 141: else /* not to him... */ ! 142: { ! 143: /* ! 144: * let him pick a new addressee ! 145: */ ! 146: printf ("\nSend to whom? "); ! 147: if (gline (whoto, WDLEN) == 1) /* will flush stdout */ ! 148: break; /* don't send */ ! 149: ! 150: } ! 151: } ! 152: #ifdef SUPERMAILER /* simple case for SUPERMAILER */ ! 153: } ! 154: else ! 155: { ! 156: printf ("%s %s\n", command, whoto); ! 157: fflush (stdout); /* empty buffers */ ! 158: sprintf (buf, "%s %s", command, whoto); ! 159: #ifndef FASTFORK ! 160: f = dounix (buf, 1, 1); /* set the uid & tty */ ! 161: #else ! 162: f = dounix (1, 1, DFLTSH, "-c", buf, 0, 0); /* do it */ ! 163: #endif FASTFORK ! 164: } ! 165: #endif SUPERMAILER ! 166: ! 167: #ifdef SUPERMAILER ! 168: if (f != 0) /* pause for error message */ ! 169: { ! 170: fflush (stdout); ! 171: sleep (2); ! 172: } ! 173: unlink (fn); ! 174: #else ! 175: if (f != 0) /* check error message */ ! 176: { ! 177: fprintf ("Couldn't deliver mail; draft left in %s\n", fn); ! 178: fflush (stdout); ! 179: sleep (2); ! 180: } ! 181: else ! 182: unlink (fn); ! 183: #endif SUPERMAILER ! 184: ! 185: return 0; ! 186: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.