]> code.citadel.org Git - citadel.git/blobdiff - citadel/imap_misc.c
* Cc: and Bcc: support. Not finished yet.
[citadel.git] / citadel / imap_misc.c
index 505f40950a96525cd44638ab4b2dade04cebe793..192f9c833878c9f5d2c596891297a4a74b6c8ea9 100644 (file)
 int imap_do_copy(char *destination_folder) {
        int i;
        char roomname[ROOMNAMELEN];
+       struct ctdlroom qrbuf;
 
-       i = imap_grabroom(roomname, destination_folder);
+       if (IMAP->num_msgs < 1) {
+               return(0);
+       }
+
+       i = imap_grabroom(roomname, destination_folder, 0);
+       if (i != 0) return(i);
+
+       for (i = 0; i < IMAP->num_msgs; ++i) {
+               if (IMAP->flags[i] & IMAP_SELECTED) {
+                       CtdlCopyMsgToRoom(IMAP->msgids[i], roomname);
+               }
+       }
+
+       /* Set the flags... */
+       i = getroom(&qrbuf, roomname);
        if (i != 0) return(i);
 
-       if (IMAP->num_msgs > 0) {
-               for (i = 0; i < IMAP->num_msgs; ++i) {
-                       if (IMAP->flags[i] & IMAP_SELECTED) {
-                               CtdlCopyMsgToRoom(
-                                       IMAP->msgids[i], roomname);
-                       }
+       for (i = 0; i < IMAP->num_msgs; ++i) {
+               if (IMAP->flags[i] & IMAP_SELECTED) {
+                       CtdlSetSeen(IMAP->msgids[i],
+                               ((IMAP->flags[i] & IMAP_SEEN) ? 1 : 0),
+                               ctdlsetseen_seen,
+                               NULL, &qrbuf
+                       );
+                       CtdlSetSeen(IMAP->msgids[i],
+                               ((IMAP->flags[i] & IMAP_ANSWERED) ? 1 : 0),
+                               ctdlsetseen_answered,
+                               NULL, &qrbuf
+                       );
                }
        }
 
@@ -79,6 +100,7 @@ int imap_do_copy(char *destination_folder) {
 }
 
 
+
 /*
  * This function is called by the main command loop.
  */
@@ -143,7 +165,7 @@ void imap_print_instant_messages(void) {
        char tmp[SIZ];
        int i;
        size_t size, size2;
-       struct tm *stamp;
+       struct tm stamp;
 
        if (CC->FirstExpressMessage == NULL) {
                return;
@@ -154,7 +176,7 @@ void imap_print_instant_messages(void) {
        end_critical_section(S_SESSION_TABLE);
 
        while (ptr != NULL) {
-               stamp = localtime(&(ptr->timestamp));
+               localtime_r(&(ptr->timestamp), &stamp);
                size = strlen(ptr->text) + SIZ;
                dumpomatic = malloc(size);
                strcpy(dumpomatic, "");
@@ -168,17 +190,17 @@ void imap_print_instant_messages(void) {
                        strcat(dumpomatic, "Message ");
 
                /* Timestamp.  Can this be improved? */
-               if (stamp->tm_hour == 0 || stamp->tm_hour == 12)
+               if (stamp.tm_hour == 0 || stamp.tm_hour == 12)
                        sprintf(tmp, "at 12:%02d%cm",
-                               stamp->tm_min, 
-                               stamp->tm_hour ? 'p' : 'a');
-               else if (stamp->tm_hour > 12)           /* pm */
+                               stamp.tm_min, 
+                               stamp.tm_hour ? 'p' : 'a');
+               else if (stamp.tm_hour > 12)            /* pm */
                        sprintf(tmp, "at %d:%02dpm",
-                               stamp->tm_hour - 12,
-                               stamp->tm_min);
+                               stamp.tm_hour - 12,
+                               stamp.tm_min);
                else                                    /* am */
                        sprintf(tmp, "at %d:%02dam",
-                               stamp->tm_hour, stamp->tm_min);
+                               stamp.tm_hour, stamp.tm_min);
                strcat(dumpomatic, tmp);
 
                size2 = strlen(dumpomatic);
@@ -205,23 +227,53 @@ void imap_print_instant_messages(void) {
 }
 
 
+/*
+ * imap_do_append_flags() is called by imap_append() to set any flags that
+ * the client specified at append time.
+ *
+ * FIXME find a way to do these in bulk so we don't max out our db journal
+ */
+void imap_do_append_flags(long new_msgnum, char *new_message_flags) {
+       char flags[32];
+       char this_flag[sizeof flags];
+       int i;
+
+       if (new_message_flags == NULL) return;
+       if (strlen(new_message_flags) == 0) return;
+
+       safestrncpy(flags, new_message_flags, sizeof flags);
+
+       for (i=0; i<num_tokens(flags, ' '); ++i) {
+               extract_token(this_flag, flags, i, ' ', sizeof this_flag);
+               if (this_flag[0] == '\\') strcpy(this_flag, &this_flag[1]);
+               if (!strcasecmp(this_flag, "Seen")) {
+                       CtdlSetSeen(new_msgnum, 1, ctdlsetseen_seen,
+                               NULL, NULL);
+               }
+               if (!strcasecmp(this_flag, "Answered")) {
+                       CtdlSetSeen(new_msgnum, 1, ctdlsetseen_answered,
+                               NULL, NULL);
+               }
+       }
+}
+
 
 /*
  * This function is called by the main command loop.
  */
 void imap_append(int num_parms, char *parms[]) {
-       size_t literal_length;
-       size_t bytes_transferred;
-       size_t stripped_length = 0;
+       long literal_length;
+       long bytes_transferred;
+       long stripped_length = 0;
        struct CtdlMessage *msg;
+       long new_msgnum = (-1L);
        int ret = 0;
-       size_t blksize;
        char roomname[ROOMNAMELEN];
        char buf[SIZ];
        char savedroom[ROOMNAMELEN];
        int msgs, new;
        int i;
-
+       char new_message_flags[SIZ];
 
        if (num_parms < 4) {
                cprintf("%s BAD usage error\r\n", parms[0]);
@@ -234,7 +286,22 @@ void imap_append(int num_parms, char *parms[]) {
                return;
        }
 
-       literal_length = (size_t) atol(&parms[num_parms-1][1]);
+       strcpy(new_message_flags, "");
+       if (num_parms >= 5) {
+               for (i=3; i<num_parms; ++i) {
+                       strcat(new_message_flags, parms[i]);
+                       strcat(new_message_flags, " ");
+               }
+               stripallbut(new_message_flags, '(', ')');
+       }
+
+       /* This is how we'd do this if it were relevant in our data store.
+        * if (num_parms >= 6) {
+        *  new_message_internaldate = parms[4];
+        * }
+        */
+
+       literal_length = atol(&parms[num_parms-1][1]);
        if (literal_length < 1) {
                cprintf("%s BAD Message length must be at least 1.\r\n",
                        parms[0]);
@@ -250,62 +317,43 @@ void imap_append(int num_parms, char *parms[]) {
        IMAP->transmitted_length = literal_length;
 
        cprintf("+ Transmit message now.\r\n");
-       lprintf(CTDL_DEBUG, "imap_append() expecting %d bytes\n",
-               literal_length);
 
        bytes_transferred = 0;
 
-       do {
-               blksize = literal_length - bytes_transferred;
-               if (blksize > SIZ) blksize = SIZ;
-
-               ret = client_read(&IMAP->transmitted_message[bytes_transferred], blksize);
-               if (ret < 1) {
-                       bytes_transferred = literal_length;     /* bail out */
-               }
-               else {
-                       bytes_transferred += blksize;           /* keep going */
-               }
-               lprintf(CTDL_DEBUG, "Received %d of %d bytes (%d%%)\n",
-                       bytes_transferred,
-                       literal_length,
-                       ((bytes_transferred * 100) / literal_length)
-               );
-       } while (bytes_transferred < literal_length);
-
+       ret = client_read(IMAP->transmitted_message, literal_length);
        IMAP->transmitted_message[literal_length] = 0;
+
        if (ret != 1) {
                cprintf("%s NO Read failed.\r\n", parms[0]);
                return;
        }
-       lprintf(CTDL_DEBUG, "imap_append() finished reading message\n");
 
-       /* I think there's supposed to be a trailing CRLF after the
-        * literal (the message text) is received.  This call to
-        * client_gets() absorbs it.
+       /* Client will transmit a trailing CRLF after the literal (the message
+        * text) is received.  This call to client_getln() absorbs it.
         */
-       client_gets(buf);
-       lprintf(CTDL_DEBUG, "Trailing CRLF: %s\n", buf);
+       flush_output();
+       client_getln(buf, sizeof buf);
 
        /* Convert RFC822 newlines (CRLF) to Unix newlines (LF) */
-       lprintf(CTDL_DEBUG, "Converting newline format\n");
+       lprintf(CTDL_DEBUG, "Converting CRLF to LF\n");
        stripped_length = 0;
        for (i=0; i<literal_length; ++i) {
                if (strncmp(&IMAP->transmitted_message[i], "\r\n", 2)) {
-                       IMAP->transmitted_message[stripped_length++] = IMAP->transmitted_message[i];
+                       IMAP->transmitted_message[stripped_length++] =
+                               IMAP->transmitted_message[i];
                }
        }
        literal_length = stripped_length;
        IMAP->transmitted_message[literal_length] = 0;  /* reterminate it */
 
        lprintf(CTDL_DEBUG, "Converting message format\n");
-        msg = convert_internet_message(IMAP->transmitted_message);
+       msg = convert_internet_message(IMAP->transmitted_message);
        IMAP->transmitted_message = NULL;
        IMAP->transmitted_length = 0;
 
-       ret = imap_grabroom(roomname, parms[2]);
+       ret = imap_grabroom(roomname, parms[2], 0);
        if (ret != 0) {
-               cprintf("%s NO Invalid mailbox name or location, or access denied\r\n",
+               cprintf("%s NO Invalid mailbox name or access denied\r\n",
                        parms[0]);
                return;
        }
@@ -319,23 +367,23 @@ void imap_append(int num_parms, char *parms[]) {
        }
        usergoto(roomname, 0, 0, &msgs, &new);
 
-        /* If the user is locally authenticated, FORCE the From: header to
-         * show up as the real sender.  FIXME do we really want to do this?
+       /* If the user is locally authenticated, FORCE the From: header to
+        * show up as the real sender.  FIXME do we really want to do this?
         * Probably should make it site-definable or even room-definable.
         *
         * For now, we allow "forgeries" if the room is one of the user's
         * private mailboxes.
-         */
-        if (CC->logged_in) {
+        */
+       if (CC->logged_in) {
           if ( (CC->room.QRflags & QR_MAILBOX) == 0) {
-                if (msg->cm_fields['A'] != NULL) free(msg->cm_fields['A']);
-                if (msg->cm_fields['N'] != NULL) free(msg->cm_fields['N']);
-                if (msg->cm_fields['H'] != NULL) free(msg->cm_fields['H']);
-                msg->cm_fields['A'] = strdup(CC->user.fullname);
-                msg->cm_fields['N'] = strdup(config.c_nodename);
-                msg->cm_fields['H'] = strdup(config.c_humannode);
+               if (msg->cm_fields['A'] != NULL) free(msg->cm_fields['A']);
+               if (msg->cm_fields['N'] != NULL) free(msg->cm_fields['N']);
+               if (msg->cm_fields['H'] != NULL) free(msg->cm_fields['H']);
+               msg->cm_fields['A'] = strdup(CC->user.fullname);
+               msg->cm_fields['N'] = strdup(config.c_nodename);
+               msg->cm_fields['H'] = strdup(config.c_humannode);
            }
-        }
+       }
 
        /* 
         * Can we post here?
@@ -350,9 +398,15 @@ void imap_append(int num_parms, char *parms[]) {
        else {
                /* Yes ... go ahead and post! */
                if (msg != NULL) {
-                       CtdlSubmitMsg(msg, NULL, "");
+                       new_msgnum = CtdlSubmitMsg(msg, NULL, NULL, NULL, "");
+               }
+               if (new_msgnum >= 0L) {
+                       cprintf("%s OK APPEND completed\r\n", parms[0]);
+               }
+               else {
+                       cprintf("%s BAD Error %ld saving message to disk.\r\n",
+                               parms[0], new_msgnum);
                }
-               cprintf("%s OK APPEND completed\r\n", parms[0]);
        }
 
        /*
@@ -367,4 +421,8 @@ void imap_append(int num_parms, char *parms[]) {
 
        /* We don't need this buffer anymore */
        CtdlFreeMessage(msg);
+
+       if (new_message_flags != NULL) {
+               imap_do_append_flags(new_msgnum, new_message_flags);
+       }
 }