diplodocus.org Git - nmh/blob - sbr/folder_addmsg.c

   1
   2 /*
   3  * folder_addmsg.c -- Link message into folder
   4  *
   5  * This code is Copyright (c) 2002, by the authors of nmh.  See the
   6  * COPYRIGHT file in the root directory of the nmh distribution for
   7  * complete copyright information.
   8  */
   9
  10 #include <h/mh.h>
  11 #include <fcntl.h>
  12
  13 /*
  14  * Link message into a folder.  Return the new number
  15  * of the message.  If an error occurs, return -1.
  16  */
  17
  18 int
  19 folder_addmsg (struct msgs **mpp, char *msgfile, int selected,
  20                int unseen, int preserve, int deleting, char *from_dir)
  21 {
  22     int infd, outfd, linkerr, msgnum;
  23     char *nmsg, newmsg[BUFSIZ];
  24     char oldmsg[BUFSIZ];
  25     struct msgs *mp;
  26     struct stat st1, st2;
  27
  28     mp = *mpp;
  29
  30     /* should we preserve the numbering of the message? */
  31     if (preserve && (msgnum = m_atoi (msgfile)) > 0) {
  32         ;
  33     } else if (mp->nummsg == 0) {
  34         /* check if we are adding to empty folder */
  35         msgnum = 1;
  36     } else {
  37         /* else use highest message number + 1 */
  38         msgnum = mp->hghmsg + 1;
  39     }
  40
  41     /*
  42      * We might need to make several attempts
  43      * in order to add the message to the folder.
  44      */
  45     for (;; msgnum++) {
  46
  47         /*
  48          * See if we need more space.  If we need space at the
  49          * end, then we allocate space for an addition 100 messages.
  50          * If we need space at the beginning of the range, then just
  51          * extend message status range to cover this message number.
  52          */
  53         if (msgnum > mp->hghoff) {
  54             if ((mp = folder_realloc (mp, mp->lowoff, msgnum + 100)))
  55                 *mpp = mp;
  56             else {
  57                 advise (NULL, "unable to allocate folder storage");
  58                 return -1;
  59             }
  60         } else if (msgnum < mp->lowoff) {
  61             if ((mp = folder_realloc (mp, msgnum, mp->hghoff)))
  62                 *mpp = mp;
  63             else {
  64                 advise (NULL, "unable to allocate folder storage");
  65                 return -1;
  66             }
  67         }
  68
  69         /*
  70          * If a message is already in that slot,
  71          * then loop to next available slot.
  72          */
  73         if (does_exist (mp, msgnum))
  74             continue;
  75
  76         /* setup the bit flags for this message */
  77         clear_msg_flags (mp, msgnum);
  78         set_exists (mp, msgnum);
  79
  80         /* should we set the SELECT_UNSEEN bit? */
  81         if (unseen) {
  82             set_unseen (mp, msgnum);
  83         }
  84
  85         /* should we set the SELECTED bit? */
  86         if (selected) {
  87             set_selected (mp, msgnum);
  88
  89             /* check if highest or lowest selected */
  90             if (mp->numsel == 0) {
  91                 mp->lowsel = msgnum;
  92                 mp->hghsel = msgnum;
  93             } else {
  94                 if (msgnum < mp->lowsel)
  95                     mp->lowsel = msgnum;
  96                 if (msgnum > mp->hghsel)
  97                     mp->hghsel = msgnum;
  98             }
  99
 100             /* increment number selected */
 101             mp->numsel++;
 102         }
 103
 104         /*
 105          * check if this is highest or lowest message
 106          */
 107         if (mp->nummsg == 0) {
 108             mp->lowmsg = msgnum;
 109             mp->hghmsg = msgnum;
 110         } else {
 111             if (msgnum < mp->lowmsg)
 112                 mp->lowmsg = msgnum;
 113             if (msgnum > mp->hghmsg)
 114                 mp->hghmsg = msgnum;
 115         }
 116
 117         /* increment message count */
 118         mp->nummsg++;
 119
 120         nmsg = m_name (msgnum);
 121         snprintf (newmsg, sizeof(newmsg), "%s/%s", mp->foldpath, nmsg);
 122
 123         /*
 124          * Now try to link message into folder.
 125          * Then run the external hook on the message if one was specified in the context.
 126          * Run the refile hook if we're moving the message from one place to another.
 127          * We have to construct the from path name for this because it's not there.
 128          * Run the add hook if the message is getting copied or linked somewhere else.
 129          */
 130         if (link (msgfile, newmsg) != -1) {
 131
 132             if (deleting) {
 133                 (void)snprintf(oldmsg, sizeof (oldmsg), "%s/%s", from_dir, msgfile);
 134                 (void)ext_hook("ref-hook", oldmsg, newmsg);
 135             }
 136             else
 137                 (void)ext_hook("add-hook", newmsg, (char *)0);
 138
 139             return msgnum;
 140         } else {
 141             linkerr = errno;
 142
 143 #ifdef EISREMOTE
 144             if (linkerr == EISREMOTE)
 145                 linkerr = EXDEV;
 146 #endif /* EISREMOTE */
 147
 148             /*
 149              * Check if the file in our desired location is the same
 150              * as the source file.  If so, then just leave it alone
 151              * and return.  Otherwise, we will continue the main loop
 152              * and try again at another slot (hghmsg+1).
 153              */
 154             if (linkerr == EEXIST) {
 155                 if (stat (msgfile, &st2) == 0 && stat (newmsg, &st1) == 0
 156                     && st2.st_ino == st1.st_ino) {
 157                     return msgnum;
 158                 } else {
 159                     continue;
 160                 }
 161             }
 162
 163             /*
 164              * If link failed because we are trying to link
 165              * across devices, then check if there is a message
 166              * already in the desired location.  If so, then return
 167              * error, else just copy the message.
 168              * Cygwin with FAT32 filesystem produces EPERM.
 169              */
 170             if (linkerr == EXDEV  ||  linkerr == EPERM) {
 171                 if (stat (newmsg, &st1) == 0) {
 172                     advise (NULL, "message %s:%s already exists", mp->foldpath, newmsg);
 173                     return -1;
 174                 } else {
 175                     if ((infd = open (msgfile, O_RDONLY)) == -1) {
 176                         advise (msgfile, "unable to open message %s", msgfile);
 177                         return -1;
 178                     }
 179                     fstat (infd, &st1);
 180                     if ((outfd = creat (newmsg, (int) st1.st_mode & 0777)) == -1) {
 181                         advise (newmsg, "unable to create");
 182                         close (infd);
 183                         return -1;
 184                     }
 185                     cpydata (infd, outfd, msgfile, newmsg);
 186                     close (infd);
 187                     close (outfd);
 188
 189                     if (deleting) {
 190                         (void)snprintf(oldmsg, sizeof (oldmsg), "%s/%s", from_dir, msgfile);
 191                         (void)ext_hook("ref-hook", oldmsg, newmsg);
 192                     }
 193                     else
 194                         (void)ext_hook("add-hook", newmsg, (char *)0);
 195
 196                     return msgnum;
 197                 }
 198             }
 199
 200             /*
 201              * Else, some other type of link error,
 202              * so just return error.
 203              */
 204             advise (newmsg, "error linking %s to", msgfile);
 205             return -1;
 206         }
 207     }
 208 }