Return to quit.c CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / ucb / Mail

Annotation of 43BSDTahoe/ucb/Mail/quit.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Copyright (c) 1980 Regents of the University of California.
        !             3:  * All rights reserved.
        !             4:  *
        !             5:  * Redistribution and use in source and binary forms are permitted
        !             6:  * provided that this notice is preserved and that due credit is given
        !             7:  * to the University of California at Berkeley. The name of the University
        !             8:  * may not be used to endorse or promote products derived from this
        !             9:  * software without specific prior written permission. This software
        !            10:  * is provided ``as is'' without express or implied warranty.
        !            11:  */
        !            12: 
        !            13: #ifdef notdef
        !            14: static char sccsid[] = "@(#)quit.c     5.4 (Berkeley) 2/18/88";
        !            15: #endif /* notdef */
        !            16: 
        !            17: #include "rcv.h"
        !            18: #include <sys/stat.h>
        !            19: #include <sys/file.h>
        !            20: 
        !            21: /*
        !            22:  * Rcv -- receive mail rationally.
        !            23:  *
        !            24:  * Termination processing.
        !            25:  */
        !            26: 
        !            27: /*
        !            28:  * Save all of the undetermined messages at the top of "mbox"
        !            29:  * Save all untouched messages back in the system mailbox.
        !            30:  * Remove the system mailbox, if none saved there.
        !            31:  */
        !            32: 
        !            33: quit()
        !            34: {
        !            35:        int mcount, p, modify, autohold, anystat, holdbit, nohold;
        !            36:        FILE *ibuf, *obuf, *fbuf, *rbuf, *readstat, *abuf;
        !            37:        register struct message *mp;
        !            38:        register int c;
        !            39:        extern char tempQuit[], tempResid[];
        !            40:        struct stat minfo;
        !            41:        char *id;
        !            42: 
        !            43:        /*
        !            44:         * If we are read only, we can't do anything,
        !            45:         * so just return quickly.
        !            46:         */
        !            47: 
        !            48:        if (readonly)
        !            49:                return;
        !            50:        /*
        !            51:         * See if there any messages to save in mbox.  If no, we
        !            52:         * can save copying mbox to /tmp and back.
        !            53:         *
        !            54:         * Check also to see if any files need to be preserved.
        !            55:         * Delete all untouched messages to keep them out of mbox.
        !            56:         * If all the messages are to be preserved, just exit with
        !            57:         * a message.
        !            58:         *
        !            59:         * If the luser has sent mail to himself, refuse to do
        !            60:         * anything with the mailbox, unless mail locking works.
        !            61:         */
        !            62: 
        !            63:        fbuf = fopen(mailname, "r");
        !            64:        if (fbuf == NULL)
        !            65:                goto newmail;
        !            66:        flock(fileno(fbuf), LOCK_EX);
        !            67: #ifndef CANLOCK
        !            68:        if (selfsent) {
        !            69:                printf("You have new mail.\n");
        !            70:                fclose(fbuf);
        !            71:                return;
        !            72:        }
        !            73: #endif
        !            74:        rbuf = NULL;
        !            75:        if (fstat(fileno(fbuf), &minfo) >= 0 && minfo.st_size > mailsize) {
        !            76:                printf("New mail has arrived.\n");
        !            77:                rbuf = fopen(tempResid, "w");
        !            78:                if (rbuf == NULL || fbuf == NULL)
        !            79:                        goto newmail;
        !            80: #ifdef APPEND
        !            81:                fseek(fbuf, mailsize, 0);
        !            82:                while ((c = getc(fbuf)) != EOF)
        !            83:                        putc(c, rbuf);
        !            84: #else
        !            85:                p = minfo.st_size - mailsize;
        !            86:                while (p-- > 0) {
        !            87:                        c = getc(fbuf);
        !            88:                        if (c == EOF)
        !            89:                                goto newmail;
        !            90:                        putc(c, rbuf);
        !            91:                }
        !            92: #endif
        !            93:                fclose(rbuf);
        !            94:                if ((rbuf = fopen(tempResid, "r")) == NULL)
        !            95:                        goto newmail;
        !            96:                remove(tempResid);
        !            97:        }
        !            98: 
        !            99:        /*
        !           100:         * Adjust the message flags in each message.
        !           101:         */
        !           102: 
        !           103:        anystat = 0;
        !           104:        autohold = value("hold") != NOSTR;
        !           105:        holdbit = autohold ? MPRESERVE : MBOX;
        !           106:        nohold = MBOX|MSAVED|MDELETED|MPRESERVE;
        !           107:        if (value("keepsave") != NOSTR)
        !           108:                nohold &= ~MSAVED;
        !           109:        for (mp = &message[0]; mp < &message[msgCount]; mp++) {
        !           110:                if (mp->m_flag & MNEW) {
        !           111:                        mp->m_flag &= ~MNEW;
        !           112:                        mp->m_flag |= MSTATUS;
        !           113:                }
        !           114:                if (mp->m_flag & MSTATUS)
        !           115:                        anystat++;
        !           116:                if ((mp->m_flag & MTOUCH) == 0)
        !           117:                        mp->m_flag |= MPRESERVE;
        !           118:                if ((mp->m_flag & nohold) == 0)
        !           119:                        mp->m_flag |= holdbit;
        !           120:        }
        !           121:        modify = 0;
        !           122:        if (Tflag != NOSTR) {
        !           123:                if ((readstat = fopen(Tflag, "w")) == NULL)
        !           124:                        Tflag = NOSTR;
        !           125:        }
        !           126:        for (c = 0, p = 0, mp = &message[0]; mp < &message[msgCount]; mp++) {
        !           127:                if (mp->m_flag & MBOX)
        !           128:                        c++;
        !           129:                if (mp->m_flag & MPRESERVE)
        !           130:                        p++;
        !           131:                if (mp->m_flag & MODIFY)
        !           132:                        modify++;
        !           133:                if (Tflag != NOSTR && (mp->m_flag & (MREAD|MDELETED)) != 0) {
        !           134:                        id = hfield("article-id", mp);
        !           135:                        if (id != NOSTR)
        !           136:                                fprintf(readstat, "%s\n", id);
        !           137:                }
        !           138:        }
        !           139:        if (Tflag != NOSTR)
        !           140:                fclose(readstat);
        !           141:        if (p == msgCount && !modify && !anystat) {
        !           142:                if (p == 1)
        !           143:                        printf("Held 1 message in %s\n", mailname);
        !           144:                else
        !           145:                        printf("Held %2d messages in %s\n", p, mailname);
        !           146:                fclose(fbuf);
        !           147:                return;
        !           148:        }
        !           149:        if (c == 0) {
        !           150:                if (p != 0) {
        !           151:                        writeback(rbuf);
        !           152:                        fclose(fbuf);
        !           153:                        return;
        !           154:                }
        !           155:                goto cream;
        !           156:        }
        !           157: 
        !           158:        /*
        !           159:         * Create another temporary file and copy user's mbox file
        !           160:         * darin.  If there is no mbox, copy nothing.
        !           161:         * If he has specified "append" don't copy his mailbox,
        !           162:         * just copy saveable entries at the end.
        !           163:         */
        !           164: 
        !           165:        mcount = c;
        !           166:        if (value("append") == NOSTR) {
        !           167:                if ((obuf = fopen(tempQuit, "w")) == NULL) {
        !           168:                        perror(tempQuit);
        !           169:                        fclose(fbuf);
        !           170:                        return;
        !           171:                }
        !           172:                if ((ibuf = fopen(tempQuit, "r")) == NULL) {
        !           173:                        perror(tempQuit);
        !           174:                        remove(tempQuit);
        !           175:                        fclose(obuf);
        !           176:                        fclose(fbuf);
        !           177:                        return;
        !           178:                }
        !           179:                remove(tempQuit);
        !           180:                if ((abuf = fopen(mbox, "r")) != NULL) {
        !           181:                        while ((c = getc(abuf)) != EOF)
        !           182:                                putc(c, obuf);
        !           183:                        fclose(abuf);
        !           184:                }
        !           185:                if (ferror(obuf)) {
        !           186:                        perror(tempQuit);
        !           187:                        fclose(ibuf);
        !           188:                        fclose(obuf);
        !           189:                        fclose(fbuf);
        !           190:                        return;
        !           191:                }
        !           192:                fclose(obuf);
        !           193:                close(creat(mbox, 0600));
        !           194:                if ((obuf = fopen(mbox, "r+")) == NULL) {
        !           195:                        perror(mbox);
        !           196:                        fclose(ibuf);
        !           197:                        fclose(fbuf);
        !           198:                        return;
        !           199:                }
        !           200:        }
        !           201:        if (value("append") != NOSTR) {
        !           202:                if ((obuf = fopen(mbox, "a")) == NULL) {
        !           203:                        perror(mbox);
        !           204:                        fclose(fbuf);
        !           205:                        return;
        !           206:                }
        !           207:                fchmod(fileno(obuf), 0600);
        !           208:        }
        !           209:        for (mp = &message[0]; mp < &message[msgCount]; mp++)
        !           210:                if (mp->m_flag & MBOX)
        !           211:                        if (send(mp, obuf, 0) < 0) {
        !           212:                                perror(mbox);
        !           213:                                fclose(ibuf);
        !           214:                                fclose(obuf);
        !           215:                                fclose(fbuf);
        !           216:                                return;
        !           217:                        }
        !           218: 
        !           219:        /*
        !           220:         * Copy the user's old mbox contents back
        !           221:         * to the end of the stuff we just saved.
        !           222:         * If we are appending, this is unnecessary.
        !           223:         */
        !           224: 
        !           225:        if (value("append") == NOSTR) {
        !           226:                rewind(ibuf);
        !           227:                c = getc(ibuf);
        !           228:                while (c != EOF) {
        !           229:                        putc(c, obuf);
        !           230:                        if (ferror(obuf))
        !           231:                                break;
        !           232:                        c = getc(ibuf);
        !           233:                }
        !           234:                fclose(ibuf);
        !           235:                fflush(obuf);
        !           236:        }
        !           237:        trunc(obuf);
        !           238:        if (ferror(obuf)) {
        !           239:                perror(mbox);
        !           240:                fclose(obuf);
        !           241:                fclose(fbuf);
        !           242:                return;
        !           243:        }
        !           244:        fclose(obuf);
        !           245:        if (mcount == 1)
        !           246:                printf("Saved 1 message in mbox\n");
        !           247:        else
        !           248:                printf("Saved %d messages in mbox\n", mcount);
        !           249: 
        !           250:        /*
        !           251:         * Now we are ready to copy back preserved files to
        !           252:         * the system mailbox, if any were requested.
        !           253:         */
        !           254: 
        !           255:        if (p != 0) {
        !           256:                writeback(rbuf);
        !           257:                fclose(fbuf);
        !           258:                return;
        !           259:        }
        !           260: 
        !           261:        /*
        !           262:         * Finally, remove his /usr/mail file.
        !           263:         * If new mail has arrived, copy it back.
        !           264:         */
        !           265: 
        !           266: cream:
        !           267:        if (rbuf != NULL) {
        !           268:                abuf = fopen(mailname, "r+");
        !           269:                if (abuf == NULL)
        !           270:                        goto newmail;
        !           271:                while ((c = getc(rbuf)) != EOF)
        !           272:                        putc(c, abuf);
        !           273:                fclose(rbuf);
        !           274:                trunc(abuf);
        !           275:                fclose(abuf);
        !           276:                alter(mailname);
        !           277:                fclose(fbuf);
        !           278:                return;
        !           279:        }
        !           280:        demail();
        !           281:        fclose(fbuf);
        !           282:        return;
        !           283: 
        !           284: newmail:
        !           285:        printf("Thou hast new mail.\n");
        !           286:        if (fbuf != NULL)
        !           287:                fclose(fbuf);
        !           288: }
        !           289: 
        !           290: /*
        !           291:  * Preserve all the appropriate messages back in the system
        !           292:  * mailbox, and print a nice message indicated how many were
        !           293:  * saved.  On any error, just return -1.  Else return 0.
        !           294:  * Incorporate the any new mail that we found.
        !           295:  */
        !           296: writeback(res)
        !           297:        register FILE *res;
        !           298: {
        !           299:        register struct message *mp;
        !           300:        register int p, c;
        !           301:        FILE *obuf;
        !           302: 
        !           303:        p = 0;
        !           304:        if ((obuf = fopen(mailname, "r+")) == NULL) {
        !           305:                perror(mailname);
        !           306:                return(-1);
        !           307:        }
        !           308: #ifndef APPEND
        !           309:        if (res != NULL)
        !           310:                while ((c = getc(res)) != EOF)
        !           311:                        putc(c, obuf);
        !           312: #endif
        !           313:        for (mp = &message[0]; mp < &message[msgCount]; mp++)
        !           314:                if ((mp->m_flag&MPRESERVE)||(mp->m_flag&MTOUCH)==0) {
        !           315:                        p++;
        !           316:                        if (send(mp, obuf, 0) < 0) {
        !           317:                                perror(mailname);
        !           318:                                fclose(obuf);
        !           319:                                return(-1);
        !           320:                        }
        !           321:                }
        !           322: #ifdef APPEND
        !           323:        if (res != NULL)
        !           324:                while ((c = getc(res)) != EOF)
        !           325:                        putc(c, obuf);
        !           326: #endif
        !           327:        fflush(obuf);
        !           328:        trunc(obuf);
        !           329:        if (ferror(obuf)) {
        !           330:                perror(mailname);
        !           331:                fclose(obuf);
        !           332:                return(-1);
        !           333:        }
        !           334:        if (res != NULL)
        !           335:                fclose(res);
        !           336:        fclose(obuf);
        !           337:        alter(mailname);
        !           338:        if (p == 1)
        !           339:                printf("Held 1 message in %s\n", mailname);
        !           340:        else
        !           341:                printf("Held %d messages in %s\n", p, mailname);
        !           342:        return(0);
        !           343: }

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