![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to quit.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / lbin / mailx|
Return to quit.c CVS log | Up to [Research Unix] / researchv10no / lbin / mailx |
1.1 ! root 1: #ident "@(#)quit.c 1.4 'attmail mail(1) command'" ! 2: #ident "@(#)mailx:quit.c 1.8.1.1" ! 3: /* Copyright (c) 1984 AT&T */ ! 4: /* All Rights Reserved */ ! 5: ! 6: /* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T */ ! 7: /* The copyright notice above does not evidence any */ ! 8: /* actual or intended publication of such source code. */ ! 9: ! 10: #ident "@(#)mailx:quit.c 1.8" ! 11: ! 12: #include "rcv.h" ! 13: ! 14: /* ! 15: * mailx -- a modified version of a University of California at Berkeley ! 16: * mail program ! 17: * ! 18: * Rcv -- receive mail rationally. ! 19: * ! 20: * Termination processing. ! 21: */ ! 22: ! 23: static void writeback(); ! 24: ! 25: #define PRIV(x) setgid(myegid), (x), setgid(myrgid); ! 26: ! 27: /* ! 28: * Stuff for creating a temp file adb ! 29: */ ! 30: extern char *mktemp(); ! 31: #define TMPSNAME "/tmp/slXXXXXX" ! 32: ! 33: /* ! 34: * Save all of the undetermined messages at the top of "mbox" ! 35: * Save all untouched messages back in the system mailbox. ! 36: * Remove the system mailbox, if none saved there. ! 37: */ ! 38: ! 39: void ! 40: quit() ! 41: { ! 42: int mcount, p, modify, autohold, anystat, holdbit, nohold; ! 43: FILE *ibuf, *obuf, *fbuf, *readstat; ! 44: register struct message *mp; ! 45: register int c; ! 46: char *id; ! 47: int appending; ! 48: char *mbox = Getf("MBOX"); ! 49: ! 50: /* ! 51: * If we are read only, we can't do anything, ! 52: * so just return quickly. ! 53: */ ! 54: ! 55: mcount = 0; ! 56: if (readonly) ! 57: return; ! 58: /* ! 59: * See if there any messages to save in mbox. If no, we ! 60: * can save copying mbox to /tmp and back. ! 61: * ! 62: * Check also to see if any files need to be preserved. ! 63: * Delete all untouched messages to keep them out of mbox. ! 64: * If all the messages are to be preserved, just exit with ! 65: * a message. ! 66: * ! 67: * If the luser has sent mail to himself, refuse to do ! 68: * anything with the mailbox, unless mail locking works. ! 69: */ ! 70: ! 71: #ifndef CANLOCK ! 72: if (selfsent) { ! 73: printf("You have new mail.\n"); ! 74: return; ! 75: } ! 76: #endif ! 77: ! 78: /* ! 79: * Adjust the message flags in each message. ! 80: */ ! 81: ! 82: anystat = 0; ! 83: autohold = value("hold") != NOSTR; ! 84: appending = value("append") != NOSTR; ! 85: holdbit = autohold ? MPRESERVE : MBOX; ! 86: nohold = MBOX|MSAVED|MDELETED|MPRESERVE; ! 87: if (value("keepsave") != NOSTR) ! 88: nohold &= ~MSAVED; ! 89: for (mp = &message[0]; mp < &message[msgCount]; mp++) { ! 90: if (mp->m_flag & MNEW) { ! 91: receipt(mp); ! 92: mp->m_flag &= ~MNEW; ! 93: mp->m_flag |= MSTATUS; ! 94: } ! 95: if (mp->m_flag & MSTATUS) ! 96: anystat++; ! 97: if ((mp->m_flag & MTOUCH) == 0) ! 98: mp->m_flag |= MPRESERVE; ! 99: if ((mp->m_flag & nohold) == 0) ! 100: mp->m_flag |= holdbit; ! 101: } ! 102: modify = 0; ! 103: if (Tflag != NOSTR) { ! 104: if ((readstat = fopen(Tflag, "w")) == NULL) ! 105: Tflag = NOSTR; ! 106: } ! 107: for (c = 0, p = 0, mp = &message[0]; mp < &message[msgCount]; mp++) { ! 108: if (mp->m_flag & MBOX) ! 109: c++; ! 110: if (mp->m_flag & MPRESERVE) ! 111: p++; ! 112: if (mp->m_flag & MODIFY) ! 113: modify++; ! 114: if (Tflag != NOSTR && (mp->m_flag & (MREAD|MDELETED)) != 0) { ! 115: id = hfield("message-id", mp, addone); ! 116: if (id != NOSTR) ! 117: fprintf(readstat, "%s\n", id); ! 118: else { ! 119: id = hfield("article-id", mp, addone); ! 120: if (id != NOSTR) ! 121: fprintf(readstat, "%s\n", id); ! 122: } ! 123: } ! 124: } ! 125: if (Tflag != NOSTR) ! 126: fclose(readstat); ! 127: if (p == msgCount && !modify && !anystat) { ! 128: printf("Held %d message%s in %s\n", p, plural(p), mailname); ! 129: return; ! 130: } ! 131: if (c == 0) { ! 132: writeback(); ! 133: return; ! 134: } ! 135: ! 136: /* ! 137: * Create another temporary file and copy user's mbox file ! 138: * therein. If there is no mbox, copy nothing. ! 139: * If s/he has specified "append" don't copy the mailbox, ! 140: * just copy saveable entries at the end. ! 141: */ ! 142: ! 143: mcount = c; ! 144: if (!appending) { ! 145: if ((obuf = fopen(tempQuit, "w")) == NULL) { ! 146: perror(tempQuit); ! 147: return; ! 148: } ! 149: if ((ibuf = fopen(tempQuit, "r")) == NULL) { ! 150: perror(tempQuit); ! 151: removefile(tempQuit); ! 152: fclose(obuf); ! 153: return; ! 154: } ! 155: removefile(tempQuit); ! 156: if ((fbuf = fopen(mbox, "r")) != NULL) { ! 157: while ((c = getc(fbuf)) != EOF) ! 158: putc(c, obuf); ! 159: fclose(fbuf); ! 160: } ! 161: if (ferror(obuf)) { ! 162: perror(tempQuit); ! 163: fclose(ibuf); ! 164: fclose(obuf); ! 165: return; ! 166: } ! 167: fclose(obuf); ! 168: close(creat(mbox, MBOXPERM)); ! 169: if ((obuf = fopen(mbox, "w")) == NULL) { ! 170: perror(mbox); ! 171: fclose(ibuf); ! 172: return; ! 173: } ! 174: } else /* we are appending */ ! 175: if ((obuf = fopen(mbox, "a")) == NULL) { ! 176: perror(mbox); ! 177: return; ! 178: } ! 179: for (mp = &message[0]; mp < &message[msgCount]; mp++) ! 180: if (mp->m_flag & MBOX) ! 181: if (send(mp, obuf, 0) < 0) { ! 182: perror(mbox); ! 183: if (!appending) ! 184: fclose(ibuf); ! 185: fclose(obuf); ! 186: return; ! 187: } ! 188: ! 189: /* ! 190: * Copy the user's old mbox contents back ! 191: * to the end of the stuff we just saved. ! 192: * If we are appending, this is unnecessary. ! 193: */ ! 194: ! 195: if (!appending) { ! 196: rewind(ibuf); ! 197: c = getc(ibuf); ! 198: while (c != EOF) { ! 199: putc(c, obuf); ! 200: if (ferror(obuf)) ! 201: break; ! 202: c = getc(ibuf); ! 203: } ! 204: fclose(ibuf); ! 205: fflush(obuf); ! 206: } ! 207: if (ferror(obuf)) { ! 208: perror(mbox); ! 209: fclose(obuf); ! 210: return; ! 211: } ! 212: fclose(obuf); ! 213: printf("Saved %d message%s in %s\n", mcount, plural(mcount), mbox); ! 214: ! 215: /* ! 216: * Now we are ready to copy back preserved files to ! 217: * the system mailbox, if any were requested. ! 218: */ ! 219: writeback(); ! 220: } ! 221: ! 222: /* ! 223: * Preserve all the appropriate messages back in the system ! 224: * mailbox, and print a nice message indicated how many were ! 225: * saved. Incorporate the any new mail that we found. ! 226: */ ! 227: static void ! 228: writeback() ! 229: { ! 230: register struct message *mp; ! 231: register int p, c, success = 0; ! 232: struct stat st; ! 233: FILE *obuf = 0, *fbuf = 0, *rbuf = 0; ! 234: void (*fhup)(), (*fint)(), (*fquit)(); ! 235: FILE *lockopen(); /* adb */ ! 236: ! 237: fhup = sigset(SIGHUP, SIG_IGN); ! 238: fint = sigset(SIGINT, SIG_IGN); ! 239: fquit = sigset(SIGQUIT, SIG_IGN); ! 240: ! 241: if ((fbuf = lockopen(mailname, "r+w", 0666, -1, -1)) == NULL) { /* adb */ ! 242: perror(mailname); ! 243: goto die; ! 244: } ! 245: /* lock(fbuf, "r+", 1); */ ! 246: fstat(fileno(fbuf), &st); ! 247: if (st.st_size > mailsize) { ! 248: printf("New mail has arrived.\n"); ! 249: /* create a temporary file */ ! 250: (void)strcpy(tempResid, TMPSNAME); ! 251: (void)mktemp(tempResid); ! 252: PRIV(rbuf = fopen(tempResid, "w+")); ! 253: if (rbuf == NULL) { ! 254: perror(tempResid); ! 255: goto die; ! 256: } ! 257: #ifdef APPEND ! 258: fseek(fbuf, mailsize, 0); ! 259: while ((c = getc(fbuf)) != EOF) ! 260: putc(c, rbuf); ! 261: #else ! 262: p = st.st_size - mailsize; ! 263: while (p-- > 0) { ! 264: c = getc(fbuf); ! 265: if (c == EOF) { ! 266: perror(mailname); ! 267: goto die; ! 268: } ! 269: putc(c, rbuf); ! 270: } ! 271: #endif ! 272: fseek(rbuf, 0L, 0); ! 273: } ! 274: ! 275: if ((obuf = fopen(mailname, "w")) == NULL) { ! 276: perror(mailname); ! 277: goto die; ! 278: } ! 279: #ifndef APPEND ! 280: if (rbuf != NULL) ! 281: while ((c = getc(rbuf)) != EOF) ! 282: putc(c, obuf); ! 283: #endif ! 284: p = 0; ! 285: for (mp = &message[0]; mp < &message[msgCount]; mp++) ! 286: if ((mp->m_flag&MPRESERVE)||(mp->m_flag&MTOUCH)==0) { ! 287: p++; ! 288: if (send(mp, obuf, 0) < 0) { ! 289: perror(mailname); ! 290: goto die; ! 291: } ! 292: } ! 293: #ifdef APPEND ! 294: if (rbuf != NULL) ! 295: while ((c = getc(rbuf)) != EOF) ! 296: putc(c, obuf); ! 297: #endif ! 298: fflush(obuf); ! 299: if (ferror(obuf)) { ! 300: perror(mailname); ! 301: goto die; ! 302: } ! 303: alter(mailname); ! 304: if (p) ! 305: printf("Held %d message%s in %s\n", p, plural(p), mailname); ! 306: success = 1; ! 307: ! 308: die: ! 309: /* adb: what does delempty do????? ! 310: if (success && obuf && (fsize(obuf) == 0) && ! 311: (value("keep") == NOSTR)) { ! 312: struct stat statb; ! 313: if (stat(mailname, &statb) >= 0) ! 314: PRIV(delempty(statb.st_mode, mailname)); ! 315: } ! 316: */ ! 317: if (rbuf) { ! 318: fclose(rbuf); ! 319: PRIV(removefile(tempResid)); ! 320: } ! 321: if (obuf) ! 322: fclose(obuf); ! 323: if (fbuf) ! 324: lockclose(fbuf); /* adb */ ! 325: sigset(SIGHUP, fhup); ! 326: sigset(SIGINT, fint); ! 327: sigset(SIGQUIT, fquit); ! 328: } ! 329: ! 330: /* adb: we lock differently ! 331: * adb void ! 332: * adb lockmail() ! 333: * adb { ! 334: * adb PRIV(maillock(myname,10)); ! 335: * adb } ! 336: * adb ! 337: * adb void ! 338: * adb unlockmail() ! 339: * adb { ! 340: * adb PRIV(mailunlock()); ! 341: * adb } ! 342: * adb */
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.