sync with sylpheed 0.7.1cvs1
[claws.git] / src / procmsg.c
index 065a1540e57ed5b508a1c7f77b9e106f9d8a450b..b1ceec61f5cfb6cc2f0db2e55494ec3a5847ad6a 100644 (file)
@@ -32,6 +32,8 @@
 #include "procmime.h"
 #include "statusbar.h"
 #include "folder.h"
+#include "prefs_common.h"
+#include "account.h"
 
 typedef struct _FlagInfo       FlagInfo;
 
@@ -174,17 +176,18 @@ GSList *procmsg_read_cache(FolderItem *item, gboolean scan_file)
        g_return_val_if_fail(item->folder != NULL, NULL);
        type = item->folder->type;
 
-       default_flags = MSG_NEW|MSG_UNREAD|MSG_CACHED;
+       default_flags.perm_flags = MSG_NEW|MSG_UNREAD;
+       default_flags.tmp_flags = MSG_CACHED;
        if (type == F_MH) {
                if (item->stype == F_QUEUE) {
-                       MSG_SET_FLAGS(default_flags, MSG_QUEUED);
+                       MSG_SET_TMP_FLAGS(default_flags, MSG_QUEUED);
                } else if (item->stype == F_DRAFT) {
-                       MSG_SET_FLAGS(default_flags, MSG_DRAFT);
+                       MSG_SET_TMP_FLAGS(default_flags, MSG_DRAFT);
                }
        } else if (type == F_IMAP) {
-               MSG_SET_FLAGS(default_flags, MSG_IMAP);
+               MSG_SET_TMP_FLAGS(default_flags, MSG_IMAP);
        } else if (type == F_NEWS) {
-               MSG_SET_FLAGS(default_flags, MSG_NEWS);
+               MSG_SET_TMP_FLAGS(default_flags, MSG_NEWS);
        }
 
        if (type == F_MH) {
@@ -206,7 +209,7 @@ GSList *procmsg_read_cache(FolderItem *item, gboolean scan_file)
        setvbuf(fp, file_buf, _IOFBF, sizeof(file_buf));
        g_free(cache_file);
 
-       debug_print(_("\tReading summary cache..."));
+       debug_print(_("\tReading summary cache...\n"));
 
        /* compare cache version */
        if (fread(&ver, sizeof(ver), 1, fp) != 1 ||
@@ -222,7 +225,7 @@ GSList *procmsg_read_cache(FolderItem *item, gboolean scan_file)
                READ_CACHE_DATA_INT(msginfo->size, fp);
                READ_CACHE_DATA_INT(msginfo->mtime, fp);
                READ_CACHE_DATA_INT(msginfo->date_t, fp);
-               READ_CACHE_DATA_INT(msginfo->flags, fp);
+               READ_CACHE_DATA_INT(msginfo->flags.tmp_flags, fp);
 
                READ_CACHE_DATA(msginfo->fromname, fp);
 
@@ -236,7 +239,8 @@ GSList *procmsg_read_cache(FolderItem *item, gboolean scan_file)
                READ_CACHE_DATA(msginfo->inreplyto, fp);
                READ_CACHE_DATA(msginfo->references, fp);
 
-               MSG_SET_FLAGS(msginfo->flags, default_flags);
+               MSG_SET_PERM_FLAGS(msginfo->flags, default_flags.perm_flags);
+               MSG_SET_TMP_FLAGS(msginfo->flags, default_flags.tmp_flags);
 
                /* if the message file doesn't exist or is changed,
                   don't add the data */
@@ -272,15 +276,18 @@ void procmsg_set_flags(GSList *mlist, FolderItem *item)
        gchar *markdir;
        MsgInfo *msginfo;
        GHashTable *mark_table;
-       MsgFlags flags;
+       MsgFlags *flags;
 
        if (!mlist) return;
        g_return_if_fail(item != NULL);
        g_return_if_fail(item->folder != NULL);
 
-       debug_print(_("\tMarking the messages..."));
+       debug_print(_("\tMarking the messages...\n"));
 
        markdir = folder_item_get_path(item);
+       if (!is_dir_exist(markdir))
+               make_dir_hier(markdir);
+
        mark_table = procmsg_read_mark_file(markdir);
        g_free(markdir);
 
@@ -292,25 +299,22 @@ void procmsg_set_flags(GSList *mlist, FolderItem *item)
                if (lastnum < msginfo->msgnum)
                        lastnum = msginfo->msgnum;
 
-               flags = GPOINTER_TO_UINT(g_hash_table_lookup(mark_table,
-                                        GUINT_TO_POINTER(msginfo->msgnum)));
+               flags = g_hash_table_lookup
+                       (mark_table, GUINT_TO_POINTER(msginfo->msgnum));
 
-               if (flags != 0) {
+               if (flags != NULL) {
                        /* add the permanent flags only */
-                       MSG_UNSET_FLAGS(msginfo->flags,
-                                       MSG_PERMANENT_FLAG_MASK);
-                       MSG_SET_FLAGS(msginfo->flags,
-                                     flags & MSG_PERMANENT_FLAG_MASK);
+                       msginfo->flags.perm_flags = flags->perm_flags;
                        if (item->folder->type == F_IMAP) {
-                               MSG_SET_FLAGS(msginfo->flags, MSG_IMAP);
+                               MSG_SET_TMP_FLAGS(msginfo->flags, MSG_IMAP);
                        } else if (item->folder->type == F_NEWS) {
-                               MSG_SET_FLAGS(msginfo->flags, MSG_NEWS);
+                               MSG_SET_TMP_FLAGS(msginfo->flags, MSG_NEWS);
                        }
                } else {
                        /* not found (new message) */
                        if (newmsg == 0) {
                                for (tmp = mlist; tmp != cur; tmp = tmp->next)
-                                       MSG_UNSET_FLAGS
+                                       MSG_UNSET_PERM_FLAGS
                                                (((MsgInfo *)tmp->data)->flags,
                                                 MSG_NEW);
                        }
@@ -324,6 +328,7 @@ void procmsg_set_flags(GSList *mlist, FolderItem *item)
        if (newmsg)
                debug_print(_("\t%d new message(s)\n"), newmsg);
 
+       hash_free_value_mem(mark_table);
        g_hash_table_destroy(mark_table);
 }
 
@@ -344,9 +349,21 @@ gint procmsg_get_last_num_in_cache(GSList *mlist)
        return last;
 }
 
+void procmsg_msg_list_free(GSList *mlist)
+{
+       GSList *cur;
+       MsgInfo *msginfo;
+
+       for (cur = mlist; cur != NULL; cur = cur->next) {
+               msginfo = (MsgInfo *)cur->data;
+               procmsg_msginfo_free(msginfo);
+       }
+       g_slist_free(mlist);
+}
+
 void procmsg_write_cache(MsgInfo *msginfo, FILE *fp)
 {
-       MsgFlags flags = msginfo->flags & MSG_CACHED_FLAG_MASK;
+       MsgTmpFlags flags = msginfo->flags.tmp_flags & MSG_CACHED_FLAG_MASK;
 
        WRITE_CACHE_DATA_INT(msginfo->msgnum, fp);
        WRITE_CACHE_DATA_INT(msginfo->size, fp);
@@ -369,9 +386,7 @@ void procmsg_write_cache(MsgInfo *msginfo, FILE *fp)
 
 void procmsg_write_flags(MsgInfo *msginfo, FILE *fp)
 {
-       MsgFlags flags;
-
-       flags = msginfo->flags & MSG_PERMANENT_FLAG_MASK;
+       MsgPermFlags flags = msginfo->flags.perm_flags;
 
        WRITE_CACHE_DATA_INT(msginfo->msgnum, fp);
        WRITE_CACHE_DATA_INT(flags, fp);
@@ -385,12 +400,14 @@ struct MarkSum {
 
 static void mark_sum_func(gpointer key, gpointer value, gpointer data)
 {
-       MsgFlags flags = GPOINTER_TO_UINT(value);
+       MsgFlags *flags = value;
        struct MarkSum *marksum = data;
 
-       if (MSG_IS_NEW(flags)) (*marksum->new)++;
-       if (MSG_IS_UNREAD(flags)) (*marksum->unread)++;
+       if (MSG_IS_NEW(*flags) && !MSG_IS_IGNORE_THREAD(*flags)) (*marksum->new)++;
+       if (MSG_IS_UNREAD(*flags) && !MSG_IS_IGNORE_THREAD(*flags)) (*marksum->unread)++;
        (*marksum->total)++;
+
+       g_free(flags);
 }
 
 void procmsg_get_mark_sum(const gchar *folder,
@@ -410,6 +427,8 @@ void procmsg_get_mark_sum(const gchar *folder,
                g_hash_table_foreach(mark_table, mark_sum_func, &marksum);
                g_hash_table_destroy(mark_table);
        }
+       debug_print("mark->new = %d, mark->unread = %d, mark->total = %d\n",
+                   *(marksum.new), *(marksum.unread), *(marksum.total));
 }
 
 static GHashTable *procmsg_read_mark_file(const gchar *folder)
@@ -417,7 +436,8 @@ static GHashTable *procmsg_read_mark_file(const gchar *folder)
        FILE *fp;
        GHashTable *mark_table = NULL;
        gint num;
-       MsgFlags flags;
+       MsgFlags *flags;
+       MsgPermFlags perm_flags;
 
        if ((fp = procmsg_open_mark_file(folder, FALSE)) == NULL)
                return NULL;
@@ -425,12 +445,12 @@ static GHashTable *procmsg_read_mark_file(const gchar *folder)
        mark_table = g_hash_table_new(NULL, g_direct_equal);
 
        while (fread(&num, sizeof(num), 1, fp) == 1) {
-               if (fread(&flags, sizeof(flags), 1, fp) != 1) break;
-               MSG_SET_FLAGS(flags, MSG_CACHED);
+               if (fread(&perm_flags, sizeof(perm_flags), 1, fp) != 1) break;
 
-               g_hash_table_insert(mark_table,
-                                   GUINT_TO_POINTER(num),
-                                   GUINT_TO_POINTER(flags));
+               flags = g_new0(MsgFlags, 1);
+               flags->perm_flags = perm_flags;
+
+               g_hash_table_insert(mark_table, GUINT_TO_POINTER(num), flags);
        }
 
        fclose(fp);
@@ -480,6 +500,105 @@ FILE *procmsg_open_mark_file(const gchar *folder, gboolean append)
        return fp;
 }
 
+/* return the reversed thread tree */
+GNode *procmsg_get_thread_tree(GSList *mlist)
+{
+       GNode *root, *parent, *node, *next;
+       GHashTable *msgid_table;
+       GHashTable *subject_table;
+       MsgInfo *msginfo;
+       const gchar *msgid;
+       const gchar *subject;
+
+       root = g_node_new(NULL);
+       msgid_table = g_hash_table_new(g_str_hash, g_str_equal);
+       subject_table = g_hash_table_new(g_str_hash, g_str_equal);
+
+       for (; mlist != NULL; mlist = mlist->next) {
+               msginfo = (MsgInfo *)mlist->data;
+               parent = root;
+
+               if (msginfo->inreplyto) {
+                       parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
+                       if (parent == NULL) {
+                               parent = root;
+                       } else {
+                               if(MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags)) {
+                                       MSG_SET_PERM_FLAGS(msginfo->flags, MSG_IGNORE_THREAD);
+                               }
+                       }
+               }
+               node = g_node_insert_data_before
+                       (parent, parent == root ? parent->children : NULL,
+                        msginfo);
+               if ((msgid = msginfo->msgid) &&
+                   g_hash_table_lookup(msgid_table, msgid) == NULL)
+                       g_hash_table_insert(msgid_table, (gchar *)msgid, node);
+
+               subject = msginfo->subject;
+               if (subject_table_lookup(subject_table,
+                                        (gchar *) subject) == NULL)
+                       subject_table_insert(subject_table, (gchar *)subject,
+                                            node);
+       }
+
+       /* complete the unfinished threads */
+       for (node = root->children; node != NULL; ) {
+               next = node->next;
+               msginfo = (MsgInfo *)node->data;
+               parent = NULL;
+               if (msginfo->inreplyto) 
+                       parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
+               if (parent && parent != node) {
+                       g_node_unlink(node);
+                       g_node_insert_before
+                               (parent, parent->children, node);
+                       /* CLAWS: ignore thread */
+                       if(MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags)) {
+                               MSG_SET_PERM_FLAGS(msginfo->flags, MSG_IGNORE_THREAD);
+                       }
+               }
+               node = next;
+       }
+
+       /* CLAWS: now see if the first level (below root) still has some nodes that can be
+        * threaded by subject line. we need to handle this in a special way to prevent
+        * circular reference from a node that has already been threaded by IN-REPLY-TO
+        * but is also in the subject line hash table */
+       for (node = root->children; node != NULL; ) {
+               next = node->next;
+               msginfo = (MsgInfo *) node->data;
+               parent = NULL;
+               if (subject_is_reply(msginfo->subject)) {
+                       parent = subject_table_lookup(subject_table,
+                                                     msginfo->subject);
+                       /* the node may already be threaded by IN-REPLY-TO,
+                          so go up in the tree to find the parent node */
+                       if (parent != NULL) {
+                               if (g_node_is_ancestor(node, parent))
+                                       parent = NULL;
+                               if (parent == node)
+                                       parent = NULL;
+                       }
+
+                       if (parent) {
+                               g_node_unlink(node);
+                               g_node_append(parent, node);
+                               /* CLAWS: ignore thread */
+                               if(MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags)) {
+                                       MSG_SET_PERM_FLAGS(msginfo->flags, MSG_IGNORE_THREAD);
+                               }
+                       }
+               }                                       
+               node = next;
+       }               
+               
+       g_hash_table_destroy(subject_table);
+       g_hash_table_destroy(msgid_table);
+
+       return root;
+}
+
 void procmsg_move_messages(GSList *mlist)
 {
        GSList *cur, *movelist = NULL;
@@ -591,6 +710,12 @@ FILE *procmsg_open_message(MsgInfo *msginfo)
        file = procmsg_get_message_file_path(msginfo);
        g_return_val_if_fail(file != NULL, NULL);
 
+       if (!is_file_exist(file)) {
+               g_free(file);
+               file = procmsg_get_message_file(msginfo);
+               g_return_val_if_fail(file != NULL, NULL);
+       }
+
        if ((fp = fopen(file, "r")) == NULL) {
                FILE_OP_ERROR(file, "fopen");
                g_free(file);
@@ -616,7 +741,7 @@ gboolean procmsg_msg_exist(MsgInfo *msginfo)
 
        if (!msginfo) return FALSE;
 
-       path = procmsg_get_message_file_path(msginfo);
+       path = folder_item_get_path(msginfo->folder);
        change_dir(path);
        ret = !folder_item_is_msg_changed(msginfo->folder, msginfo);
        g_free(path);
@@ -631,7 +756,8 @@ void procmsg_empty_trash(void)
 
        for (cur = folder_get_list(); cur != NULL; cur = cur->next) {
                trash = FOLDER(cur->data)->trash;
-               if (trash) folder_item_remove_all_msg(trash);
+               if (trash && trash->total > 0)
+                       folder_item_remove_all_msg(trash);
        }
 }
 
@@ -639,6 +765,7 @@ gint procmsg_send_queue(void)
 {
        FolderItem *queue;
        gint i;
+       gint ret = 0;
 
        queue = folder_get_default_queue();
        g_return_val_if_fail(queue != NULL, -1);
@@ -651,17 +778,16 @@ gint procmsg_send_queue(void)
 
                file = folder_item_fetch_msg(queue, i);
                if (file) {
-                       if (send_message_queue(file) < 0) {
-                               g_warning(_("Sending queued message failed.\n"));
-                               g_free(file);
-                               return -1;
-                       }
-                       folder_item_remove_msg(queue, i);
+                       if (procmsg_send_message_queue(file) < 0) {
+                               g_warning(_("Sending queued message %d failed.\n"), i);
+                               ret = -1;
+                       } else
+                               folder_item_remove_msg(queue, i);
                        g_free(file);
                }
        }
 
-       return 0;
+       return ret;
 }
 
 void procmsg_print_message(MsgInfo *msginfo, const gchar *cmdline)
@@ -675,7 +801,7 @@ void procmsg_print_message(MsgInfo *msginfo, const gchar *cmdline)
 
        g_return_if_fail(msginfo);
 
-       if ((tmpfp = procmime_get_text_part(msginfo)) == NULL) {
+       if ((tmpfp = procmime_get_first_text_content(msginfo)) == NULL) {
                g_warning(_("Can't get text part\n"));
                return;
        }
@@ -769,6 +895,7 @@ void procmsg_msginfo_free(MsgInfo *msginfo)
 {
        if (msginfo == NULL) return;
 
+       g_free(msginfo->fromspace);
        g_free(msginfo->references);
        g_free(msginfo->returnreceiptto);
        g_free(msginfo->dispositionnotificationto);
@@ -822,3 +949,203 @@ static gint procmsg_cmp_flag_msgnum(gconstpointer a, gconstpointer b)
 
        return finfo->msgnum - msgnum;
 }
+
+enum
+{
+       Q_SENDER           = 0,
+       Q_SMTPSERVER       = 1,
+       Q_RECIPIENTS       = 2,
+       Q_NEWSGROUPS       = 3,
+       Q_MAIL_ACCOUNT_ID  = 4,
+       Q_NEWS_ACCOUNT_ID  = 5,
+       Q_SAVE_COPY_FOLDER = 6
+};
+
+gint procmsg_send_message_queue(const gchar *file)
+{
+       static HeaderEntry qentry[] = {{"S:",    NULL, FALSE},
+                                      {"SSV:",  NULL, FALSE},
+                                      {"R:",    NULL, FALSE},
+                                      {"NG:",   NULL, FALSE},
+                                      {"MAID:", NULL, FALSE},
+                                      {"NAID:", NULL, FALSE},
+                                      {"SCF:",  NULL, FALSE},
+                                      {NULL,    NULL, FALSE}};
+       FILE *fp;
+       gint filepos;
+       gint mailval = 0, newsval = 0;
+       gchar *from = NULL;
+       gchar *smtpserver = NULL;
+       GSList *to_list = NULL;
+       GSList *newsgroup_list = NULL;
+       gchar *savecopyfolder = NULL;
+       gchar buf[BUFFSIZE];
+       gint hnum;
+       PrefsAccount *mailac = NULL, *newsac = NULL;
+       gchar *tmp = NULL;
+
+       g_return_val_if_fail(file != NULL, -1);
+
+       if ((fp = fopen(file, "r")) == NULL) {
+               FILE_OP_ERROR(file, "fopen");
+               return -1;
+       }
+
+       while ((hnum = procheader_get_one_field(buf, sizeof(buf), fp, qentry))
+              != -1) {
+               gchar *p = buf + strlen(qentry[hnum].name);
+
+               switch (hnum) {
+               case Q_SENDER:
+                       if (!from) from = g_strdup(p);
+                       break;
+               case Q_SMTPSERVER:
+                       if (!smtpserver) smtpserver = g_strdup(p);
+                       break;
+               case Q_RECIPIENTS:
+                       to_list = address_list_append(to_list, p);
+                       break;
+               case Q_NEWSGROUPS:
+                       newsgroup_list = newsgroup_list_append(newsgroup_list, p);
+                       break;
+               case Q_MAIL_ACCOUNT_ID:
+                       mailac = account_find_from_id(atoi(p));
+                       break;
+               case Q_NEWS_ACCOUNT_ID:
+                       newsac = account_find_from_id(atoi(p));
+                       break;
+               case Q_SAVE_COPY_FOLDER:
+                       if (!savecopyfolder) savecopyfolder = g_strdup(p);
+                       break;
+               default:
+               }
+       }
+       filepos = ftell(fp);
+
+       if(newsgroup_list || prefs_common.savemsg) {
+               FILE *tmpfp;
+
+               /* write to temporary file */
+               tmp = g_strdup_printf("%s%ctmp%d", g_get_tmp_dir(),
+                           G_DIR_SEPARATOR, (gint)file);
+               if ((tmpfp = fopen(tmp, "w")) == NULL) {
+                       FILE_OP_ERROR(tmp, "fopen");
+                       newsval = -1;
+               }
+               if (change_file_mode_rw(tmpfp, tmp) < 0) {
+                       FILE_OP_ERROR(tmp, "chmod");
+                       g_warning(_("can't change file mode\n"));
+               }
+
+               while ((newsval == 0) && fgets(buf, sizeof(buf), fp) != NULL) {
+                       if (fputs(buf, tmpfp) == EOF) {
+                               FILE_OP_ERROR(tmp, "fputs");
+                               newsval = -1;
+                       }
+               }
+               fclose(tmpfp);
+       }
+
+       fseek(fp, filepos, SEEK_SET);
+       if (to_list) {
+               debug_print(_("Sending message by mail\n"));
+               if(!from) {
+                       g_warning(_("Queued message header is broken.\n"));
+                       mailval = -1;
+               } else if (prefs_common.use_extsend && prefs_common.extsend_cmd) {
+                       mailval = send_message_local(prefs_common.extsend_cmd, fp);
+               } else {
+                       if (!mailac) {
+                               mailac = account_find_from_smtp_server(from, smtpserver);
+                               if (!mailac) {
+                                       g_warning(_("Account not found. "
+                                                   "Using current account...\n"));
+                                       mailac = cur_account;
+                               }
+                       }
+
+                       if (mailac)
+                               mailval = send_message_smtp(mailac, to_list, fp);
+                       else {
+                               PrefsAccount tmp_ac;
+
+                               g_warning(_("Account not found.\n"));
+
+                               memset(&tmp_ac, 0, sizeof(PrefsAccount));
+                               tmp_ac.address = from;
+                               tmp_ac.smtp_server = smtpserver;
+                               tmp_ac.smtpport = SMTP_PORT;
+                               mailval = send_message_smtp(&tmp_ac, to_list, fp);
+                       }
+               }
+               if (mailval < 0) {
+                       alertpanel_error(_("Error occurred while sending the message to %s ."),
+                                 mailac ? mailac->smtp_server : smtpserver);
+               }
+       }
+
+       if(newsgroup_list && (newsval == 0)) {
+               Folder *folder;
+
+               debug_print(_("Sending message by news\n"));
+
+               folder = FOLDER(newsac->folder);
+
+               newsval = news_post(folder, tmp);
+               if (newsval < 0) {
+                       alertpanel_error(_("Error occurred while posting the message to %s ."),
+                                 newsac->nntp_server);
+               }
+       }
+
+       /* save message to outbox */
+       if (mailval == 0 && newsval == 0 && savecopyfolder) {
+               FolderItem *folder;
+               gchar *path;
+               gint num;
+               FILE *fp;
+
+               debug_print(_("saving sent message...\n"));
+
+               folder = folder_find_item_from_identifier(savecopyfolder);
+               if(!folder)
+                       folder = folder_get_default_outbox();
+               path = folder_item_get_path(folder);
+               if (!is_dir_exist(path))
+                       make_dir_hier(path);
+
+               folder_item_scan(folder);
+               if ((num = folder_item_add_msg(folder, tmp, FALSE)) < 0) {
+                       g_warning(_("can't save message\n"));
+               }
+
+               if(num) {
+                       if ((fp = procmsg_open_mark_file(path, TRUE)) == NULL)
+                               g_warning(_("can't open mark file\n"));
+                       else {
+                               MsgInfo newmsginfo;
+
+                               newmsginfo.msgnum = num;
+                               newmsginfo.flags.perm_flags = 0;
+                               newmsginfo.flags.tmp_flags = 0;
+                               procmsg_write_flags(&newmsginfo, fp);
+                               fclose(fp);
+                       }
+               }
+               g_free(path);
+       }
+
+       slist_free_strings(to_list);
+       g_slist_free(to_list);
+       slist_free_strings(newsgroup_list);
+       g_slist_free(newsgroup_list);
+       g_free(from);
+       g_free(smtpserver);
+       fclose(fp);
+       if(tmp) {
+               unlink(tmp);
+               g_free(tmp);
+       }
+
+       return (newsval != 0 ? newsval : mailval);
+}