bcmp collided with C library routine

[unix-history] / usr / src / usr.bin / mail / quit.c

diff --git a/usr/src/usr.bin/mail/quit.c b/usr/src/usr.bin/mail/quit.c
index 330fa4f..a4b1ee2 100644 (file)
--- a/usr/src/usr.bin/mail/quit.c
+++ b/usr/src/usr.bin/mail/quit.c
@@ -1,7 +1,27 @@
-#
+/*
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms are permitted
+ * provided that the above copyright notice and this paragraph are
+ * duplicated in all such forms and that any documentation,
+ * advertising materials, and other materials related to such
+ * distribution and use acknowledge that the software was developed
+ * by the University of California, Berkeley.  The name of the
+ * University may not be used to endorse or promote products derived
+ * from this software without specific prior written permission.
+ * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
+ * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)quit.c     5.11 (Berkeley) %G%";
+#endif /* not lint */

 
 #include "rcv.h"
 #include <sys/stat.h>
 
 #include "rcv.h"
 #include <sys/stat.h>

+#include <sys/file.h>

 
 /*
  * Rcv -- receive mail rationally.
 
 /*
  * Rcv -- receive mail rationally.


@@ -9,7 +29,19 @@
  * Termination processing.
  */
 
  * Termination processing.
  */
 

-static char *SccsId = "@(#)quit.c      2.3 %G%";
+/*
+ * The "quit" command.
+ */
+quitcmd()
+{
+       /*
+        * If we are sourcing, then return 1 so execute() can handle it.
+        * Otherwise, return -1 to abort command loop.
+        */
+       if (sourcing)
+               return 1;
+       return -1;
+}

 
 /*
  * Save all of the undetermined messages at the top of "mbox"
 
 /*
  * Save all of the undetermined messages at the top of "mbox"


@@ -20,20 +52,28 @@ static char *SccsId = "@(#)quit.c   2.3 %G%";
 quit()
 {
        int mcount, p, modify, autohold, anystat, holdbit, nohold;
 quit()
 {
        int mcount, p, modify, autohold, anystat, holdbit, nohold;

-       FILE *ibuf, *obuf, *fbuf, *rbuf, *readstat;
+       FILE *ibuf, *obuf, *fbuf, *rbuf, *readstat, *abuf;

        register struct message *mp;
        register int c;
        extern char tempQuit[], tempResid[];
        struct stat minfo;
        register struct message *mp;
        register int c;
        extern char tempQuit[], tempResid[];
        struct stat minfo;

-       char *id;
+       char *mbox;

 
        /*
         * If we are read only, we can't do anything,
         * so just return quickly.
         */
 
        /*
         * If we are read only, we can't do anything,
         * so just return quickly.
         */

-

        if (readonly)
                return;
        if (readonly)
                return;

+       /*
+        * If editing (not reading system mail box), then do the work
+        * in edstop()
+        */
+       if (edit) {
+               edstop();
+               return;
+       }
+

        /*
         * See if there any messages to save in mbox.  If no, we
         * can save copying mbox to /tmp and back.
        /*
         * See if there any messages to save in mbox.  If no, we
         * can save copying mbox to /tmp and back.


@@ -42,40 +82,31 @@ quit()
         * Delete all untouched messages to keep them out of mbox.
         * If all the messages are to be preserved, just exit with
         * a message.
         * Delete all untouched messages to keep them out of mbox.
         * If all the messages are to be preserved, just exit with
         * a message.

-        *
-        * If the luser has sent mail to himself, refuse to do
-        * anything with the mailbox, unless mail locking works.

         */
 
         */
 

-       lock(mailname);
-#ifndef CANLOCK
-       if (selfsent) {
-               printf("You have new mail.\n");
-               unlock();
-               return;
-       }
-#endif
+       fbuf = fopen(mailname, "r");
+       if (fbuf == NULL)
+               goto newmail;
+       flock(fileno(fbuf), LOCK_EX);

        rbuf = NULL;
        rbuf = NULL;

-       if (stat(mailname, &minfo) >= 0 && minfo.st_size > mailsize) {
+       if (fstat(fileno(fbuf), &minfo) >= 0 && minfo.st_size > mailsize) {

                printf("New mail has arrived.\n");
                rbuf = fopen(tempResid, "w");
                printf("New mail has arrived.\n");
                rbuf = fopen(tempResid, "w");

-               fbuf = fopen(mailname, "r");

                if (rbuf == NULL || fbuf == NULL)
                        goto newmail;
 #ifdef APPEND
                fseek(fbuf, mailsize, 0);
                while ((c = getc(fbuf)) != EOF)
                if (rbuf == NULL || fbuf == NULL)
                        goto newmail;
 #ifdef APPEND
                fseek(fbuf, mailsize, 0);
                while ((c = getc(fbuf)) != EOF)

-                       putc(c, rbuf);
+                       (void) putc(c, rbuf);

 #else
                p = minfo.st_size - mailsize;
                while (p-- > 0) {
                        c = getc(fbuf);
                        if (c == EOF)
                                goto newmail;
 #else
                p = minfo.st_size - mailsize;
                while (p-- > 0) {
                        c = getc(fbuf);
                        if (c == EOF)
                                goto newmail;

-                       putc(c, rbuf);
+                       (void) putc(c, rbuf);

                }
 #endif
                }
 #endif

-               fclose(fbuf);

                fclose(rbuf);
                if ((rbuf = fopen(tempResid, "r")) == NULL)
                        goto newmail;
                fclose(rbuf);
                if ((rbuf = fopen(tempResid, "r")) == NULL)
                        goto newmail;


@@ -117,25 +148,24 @@ quit()
                if (mp->m_flag & MODIFY)
                        modify++;
                if (Tflag != NOSTR && (mp->m_flag & (MREAD|MDELETED)) != 0) {
                if (mp->m_flag & MODIFY)
                        modify++;
                if (Tflag != NOSTR && (mp->m_flag & (MREAD|MDELETED)) != 0) {

-                       id = hfield("article-id", mp);
-                       if (id != NOSTR)
+                       char *id;
+
+                       if ((id = hfield("article-id", mp)) != NOSTR)

                                fprintf(readstat, "%s\n", id);
                }
        }
        if (Tflag != NOSTR)
                fclose(readstat);
        if (p == msgCount && !modify && !anystat) {
                                fprintf(readstat, "%s\n", id);
                }
        }
        if (Tflag != NOSTR)
                fclose(readstat);
        if (p == msgCount && !modify && !anystat) {

-               if (p == 1)
-                       printf("Held 1 message in %s\n", mailname);
-               else
-                       printf("Held %2d messages in %s\n", p, mailname);
-               unlock();
+               printf("Held %d message%s in %s\n",
+                       p, p == 1 ? "" : "s", mailname);
+               fclose(fbuf);

                return;
        }
        if (c == 0) {
                if (p != 0) {
                        writeback(rbuf);
                return;
        }
        if (c == 0) {
                if (p != 0) {
                        writeback(rbuf);

-                       unlock();
+                       fclose(fbuf);

                        return;
                }
                goto cream;
                        return;
                }
                goto cream;


@@ -148,55 +178,58 @@ quit()
         * just copy saveable entries at the end.
         */
 
         * just copy saveable entries at the end.
         */
 

+       mbox = expand("&");

        mcount = c;
        if (value("append") == NOSTR) {
                if ((obuf = fopen(tempQuit, "w")) == NULL) {
                        perror(tempQuit);
        mcount = c;
        if (value("append") == NOSTR) {
                if ((obuf = fopen(tempQuit, "w")) == NULL) {
                        perror(tempQuit);

-                       unlock();
+                       fclose(fbuf);

                        return;
                }
                if ((ibuf = fopen(tempQuit, "r")) == NULL) {
                        perror(tempQuit);
                        remove(tempQuit);
                        fclose(obuf);
                        return;
                }
                if ((ibuf = fopen(tempQuit, "r")) == NULL) {
                        perror(tempQuit);
                        remove(tempQuit);
                        fclose(obuf);

-                       unlock();
+                       fclose(fbuf);

                        return;
                }
                remove(tempQuit);
                        return;
                }
                remove(tempQuit);

-               if ((fbuf = fopen(mbox, "r")) != NULL) {
-                       while ((c = getc(fbuf)) != EOF)
-                               putc(c, obuf);
-                       fclose(fbuf);
+               if ((abuf = fopen(mbox, "r")) != NULL) {
+                       while ((c = getc(abuf)) != EOF)
+                               (void) putc(c, obuf);
+                       fclose(abuf);

                }
                if (ferror(obuf)) {
                        perror(tempQuit);
                        fclose(ibuf);
                        fclose(obuf);
                }
                if (ferror(obuf)) {
                        perror(tempQuit);
                        fclose(ibuf);
                        fclose(obuf);

-                       unlock();
+                       fclose(fbuf);

                        return;
                }
                fclose(obuf);
                close(creat(mbox, 0600));
                        return;
                }
                fclose(obuf);
                close(creat(mbox, 0600));

-               if ((obuf = fopen(mbox, "w")) == NULL) {
+               if ((obuf = fopen(mbox, "r+")) == NULL) {

                        perror(mbox);
                        fclose(ibuf);
                        perror(mbox);
                        fclose(ibuf);

-                       unlock();
+                       fclose(fbuf);

                        return;
                }
        }
                        return;
                }
        }

-       if (value("append") != NOSTR)
+       if (value("append") != NOSTR) {

                if ((obuf = fopen(mbox, "a")) == NULL) {
                        perror(mbox);
                if ((obuf = fopen(mbox, "a")) == NULL) {
                        perror(mbox);

-                       unlock();
+                       fclose(fbuf);

                        return;
                }
                        return;
                }

+               fchmod(fileno(obuf), 0600);
+       }

        for (mp = &message[0]; mp < &message[msgCount]; mp++)
                if (mp->m_flag & MBOX)
        for (mp = &message[0]; mp < &message[msgCount]; mp++)
                if (mp->m_flag & MBOX)

-                       if (send(mp, obuf) < 0) {
+                       if (send(mp, obuf, saveignore, NOSTR) < 0) {

                                perror(mbox);
                                fclose(ibuf);
                                fclose(obuf);
                                perror(mbox);
                                fclose(ibuf);
                                fclose(obuf);

-                               unlock();
+                               fclose(fbuf);

                                return;
                        }
 
                                return;
                        }
 


@@ -210,7 +243,7 @@ quit()
                rewind(ibuf);
                c = getc(ibuf);
                while (c != EOF) {
                rewind(ibuf);
                c = getc(ibuf);
                while (c != EOF) {

-                       putc(c, obuf);
+                       (void) putc(c, obuf);

                        if (ferror(obuf))
                                break;
                        c = getc(ibuf);
                        if (ferror(obuf))
                                break;
                        c = getc(ibuf);


@@ -218,10 +251,11 @@ quit()
                fclose(ibuf);
                fflush(obuf);
        }
                fclose(ibuf);
                fflush(obuf);
        }

+       trunc(obuf);

        if (ferror(obuf)) {
                perror(mbox);
                fclose(obuf);
        if (ferror(obuf)) {
                perror(mbox);
                fclose(obuf);

-               unlock();
+               fclose(fbuf);

                return;
        }
        fclose(obuf);
                return;
        }
        fclose(obuf);


@@ -237,7 +271,7 @@ quit()
 
        if (p != 0) {
                writeback(rbuf);
 
        if (p != 0) {
                writeback(rbuf);

-               unlock();
+               fclose(fbuf);

                return;
        }
 
                return;
        }
 


@@ -248,24 +282,26 @@ quit()
 
 cream:
        if (rbuf != NULL) {
 
 cream:
        if (rbuf != NULL) {

-               fbuf = fopen(mailname, "w");
-               if (fbuf == NULL)
+               abuf = fopen(mailname, "r+");
+               if (abuf == NULL)

                        goto newmail;
                while ((c = getc(rbuf)) != EOF)
                        goto newmail;
                while ((c = getc(rbuf)) != EOF)

-                       putc(c, fbuf);
+                       (void) putc(c, abuf);

                fclose(rbuf);
                fclose(rbuf);

-               fclose(fbuf);
+               trunc(abuf);
+               fclose(abuf);

                alter(mailname);
                alter(mailname);

-               unlock();
+               fclose(fbuf);

                return;
        }
        demail();
                return;
        }
        demail();

-       unlock();
+       fclose(fbuf);

        return;
 
 newmail:
        printf("Thou hast new mail.\n");
        return;
 
 newmail:
        printf("Thou hast new mail.\n");

-       unlock();
+       if (fbuf != NULL)
+               fclose(fbuf);

 }
 
 /*
 }
 
 /*


@@ -274,7 +310,6 @@ newmail:
  * saved.  On any error, just return -1.  Else return 0.
  * Incorporate the any new mail that we found.
  */
  * saved.  On any error, just return -1.  Else return 0.
  * Incorporate the any new mail that we found.
  */

-

 writeback(res)
        register FILE *res;
 {
 writeback(res)
        register FILE *res;
 {


@@ -283,19 +318,19 @@ writeback(res)
        FILE *obuf;
 
        p = 0;
        FILE *obuf;
 
        p = 0;

-       if ((obuf = fopen(mailname, "w")) == NULL) {
+       if ((obuf = fopen(mailname, "r+")) == NULL) {

                perror(mailname);
                return(-1);
        }
 #ifndef APPEND
        if (res != NULL)
                while ((c = getc(res)) != EOF)
                perror(mailname);
                return(-1);
        }
 #ifndef APPEND
        if (res != NULL)
                while ((c = getc(res)) != EOF)

-                       putc(c, obuf);
+                       (void) putc(c, obuf);

 #endif
        for (mp = &message[0]; mp < &message[msgCount]; mp++)
                if ((mp->m_flag&MPRESERVE)||(mp->m_flag&MTOUCH)==0) {
                        p++;
 #endif
        for (mp = &message[0]; mp < &message[msgCount]; mp++)
                if ((mp->m_flag&MPRESERVE)||(mp->m_flag&MTOUCH)==0) {
                        p++;

-                       if (send(mp, obuf) < 0) {
+                       if (send(mp, obuf, (struct ignoretab *)0, NOSTR) < 0) {

                                perror(mailname);
                                fclose(obuf);
                                return(-1);
                                perror(mailname);
                                fclose(obuf);
                                return(-1);


@@ -304,9 +339,10 @@ writeback(res)
 #ifdef APPEND
        if (res != NULL)
                while ((c = getc(res)) != EOF)
 #ifdef APPEND
        if (res != NULL)
                while ((c = getc(res)) != EOF)

-                       putc(c, obuf);
+                       (void) putc(c, obuf);

 #endif
        fflush(obuf);
 #endif
        fflush(obuf);

+       trunc(obuf);

        if (ferror(obuf)) {
                perror(mailname);
                fclose(obuf);
        if (ferror(obuf)) {
                perror(mailname);
                fclose(obuf);


@@ -322,3 +358,113 @@ writeback(res)
                printf("Held %d messages in %s\n", p, mailname);
        return(0);
 }
                printf("Held %d messages in %s\n", p, mailname);
        return(0);
 }

+
+/*
+ * Terminate an editing session by attempting to write out the user's
+ * file from the temporary.  Save any new stuff appended to the file.
+ */
+edstop()
+{
+       register int gotcha, c;
+       register struct message *mp;
+       FILE *obuf, *ibuf, *readstat;
+       struct stat statb;
+       char tempname[30];
+       char *mktemp();
+
+       if (readonly)
+               return;
+       holdsigs();
+       if (Tflag != NOSTR) {
+               if ((readstat = fopen(Tflag, "w")) == NULL)
+                       Tflag = NOSTR;
+       }
+       for (mp = &message[0], gotcha = 0; mp < &message[msgCount]; mp++) {
+               if (mp->m_flag & MNEW) {
+                       mp->m_flag &= ~MNEW;
+                       mp->m_flag |= MSTATUS;
+               }
+               if (mp->m_flag & (MODIFY|MDELETED|MSTATUS))
+                       gotcha++;
+               if (Tflag != NOSTR && (mp->m_flag & (MREAD|MDELETED)) != 0) {
+                       char *id;
+
+                       if ((id = hfield("article-id", mp)) != NOSTR)
+                               fprintf(readstat, "%s\n", id);
+               }
+       }
+       if (Tflag != NOSTR)
+               fclose(readstat);
+       if (!gotcha || Tflag != NOSTR)
+               goto done;
+       ibuf = NULL;
+       if (stat(mailname, &statb) >= 0 && statb.st_size > mailsize) {
+               strcpy(tempname, "/tmp/mboxXXXXXX");
+               mktemp(tempname);
+               if ((obuf = fopen(tempname, "w")) == NULL) {
+                       perror(tempname);
+                       relsesigs();
+                       reset(0);
+               }
+               if ((ibuf = fopen(mailname, "r")) == NULL) {
+                       perror(mailname);
+                       fclose(obuf);
+                       remove(tempname);
+                       relsesigs();
+                       reset(0);
+               }
+               fseek(ibuf, mailsize, 0);
+               while ((c = getc(ibuf)) != EOF)
+                       (void) putc(c, obuf);
+               fclose(ibuf);
+               fclose(obuf);
+               if ((ibuf = fopen(tempname, "r")) == NULL) {
+                       perror(tempname);
+                       remove(tempname);
+                       relsesigs();
+                       reset(0);
+               }
+               remove(tempname);
+       }
+       printf("\"%s\" ", mailname);
+       fflush(stdout);
+       if ((obuf = fopen(mailname, "r+")) == NULL) {
+               perror(mailname);
+               relsesigs();
+               reset(0);
+       }
+       trunc(obuf);
+       c = 0;
+       for (mp = &message[0]; mp < &message[msgCount]; mp++) {
+               if ((mp->m_flag & MDELETED) != 0)
+                       continue;
+               c++;
+               if (send(mp, obuf, (struct ignoretab *) NULL, NOSTR) < 0) {
+                       perror(mailname);
+                       relsesigs();
+                       reset(0);
+               }
+       }
+       gotcha = (c == 0 && ibuf == NULL);
+       if (ibuf != NULL) {
+               while ((c = getc(ibuf)) != EOF)
+                       (void) putc(c, obuf);
+               fclose(ibuf);
+       }
+       fflush(obuf);
+       if (ferror(obuf)) {
+               perror(mailname);
+               relsesigs();
+               reset(0);
+       }
+       fclose(obuf);
+       if (gotcha) {
+               remove(mailname);
+               printf("removed\n");
+       } else
+               printf("complete\n");
+       fflush(stdout);
+
+done:
+       relsesigs();
+}