2 * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3 * Copyright (C) 1999-2003 Hiroyuki Yamamoto
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
31 #include "procheader.h"
32 #include "send_message.h"
34 #include "statusbar.h"
35 #include "prefs_filtering.h"
36 #include "filtering.h"
38 #include "prefs_common.h"
43 #include "alertpanel.h"
48 GHashTable *procmsg_msg_hash_table_create(GSList *mlist)
50 GHashTable *msg_table;
52 if (mlist == NULL) return NULL;
54 msg_table = g_hash_table_new(NULL, g_direct_equal);
55 procmsg_msg_hash_table_append(msg_table, mlist);
60 void procmsg_msg_hash_table_append(GHashTable *msg_table, GSList *mlist)
65 if (msg_table == NULL || mlist == NULL) return;
67 for (cur = mlist; cur != NULL; cur = cur->next) {
68 msginfo = (MsgInfo *)cur->data;
70 g_hash_table_insert(msg_table,
71 GUINT_TO_POINTER(msginfo->msgnum),
76 GHashTable *procmsg_to_folder_hash_table_create(GSList *mlist)
78 GHashTable *msg_table;
82 if (mlist == NULL) return NULL;
84 msg_table = g_hash_table_new(NULL, g_direct_equal);
86 for (cur = mlist; cur != NULL; cur = cur->next) {
87 msginfo = (MsgInfo *)cur->data;
88 g_hash_table_insert(msg_table, msginfo->to_folder, msginfo);
94 gint procmsg_get_last_num_in_msg_list(GSList *mlist)
100 for (cur = mlist; cur != NULL; cur = cur->next) {
101 msginfo = (MsgInfo *)cur->data;
102 if (msginfo && msginfo->msgnum > last)
103 last = msginfo->msgnum;
109 void procmsg_msg_list_free(GSList *mlist)
114 for (cur = mlist; cur != NULL; cur = cur->next) {
115 msginfo = (MsgInfo *)cur->data;
116 procmsg_msginfo_free(msginfo);
130 static gboolean procmsg_ignore_node(GNode *node, gpointer data)
132 MsgInfo *msginfo = (MsgInfo *)node->data;
134 procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
135 procmsg_msginfo_set_flags(msginfo, MSG_IGNORE_THREAD, 0);
140 /* return the reversed thread tree */
141 GNode *procmsg_get_thread_tree(GSList *mlist)
143 GNode *root, *parent, *node, *next, *last;
144 GHashTable *msgid_table;
145 GHashTable *subject_table;
148 const gchar *subject;
149 GNode *found_subject;
151 root = g_node_new(NULL);
152 msgid_table = g_hash_table_new(g_str_hash, g_str_equal);
153 subject_table = g_hash_table_new(g_str_hash, g_str_equal);
155 for (; mlist != NULL; mlist = mlist->next) {
156 msginfo = (MsgInfo *)mlist->data;
159 if (msginfo->inreplyto) {
160 parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
161 if (parent == NULL) {
164 if (MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
165 procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
166 procmsg_msginfo_set_flags(msginfo, MSG_IGNORE_THREAD, 0);
170 node = g_node_insert_data_before
171 (parent, parent == root ? parent->children : NULL,
173 if ((msgid = msginfo->msgid) &&
174 g_hash_table_lookup(msgid_table, msgid) == NULL)
175 g_hash_table_insert(msgid_table, (gchar *)msgid, node);
177 if (prefs_common.thread_by_subject) {
178 subject = msginfo->subject;
179 subject += subject_get_reply_prefix_length(subject);
180 found_subject = subject_table_lookup_clean(subject_table,
182 if (found_subject == NULL)
183 subject_table_insert_clean(subject_table, (gchar *) subject,
186 /* replace if msg in table is older than current one
187 * can add here more stuff. */
188 if ( ((MsgInfo*)(found_subject->data))->date_t >
189 ((MsgInfo*)(node->data))->date_t ) {
190 subject_table_remove_clean(subject_table, (gchar *) subject);
191 subject_table_insert_clean(subject_table, (gchar *) subject, node);
197 /* complete the unfinished threads */
198 for (node = root->children; node != NULL; ) {
200 msginfo = (MsgInfo *)node->data;
202 if (msginfo->inreplyto)
203 parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
204 /* node should not be the parent, and node should not be an ancestor
205 * of parent (circular reference) */
206 if (parent && parent != node
207 && !g_node_is_ancestor(node, parent)) {
210 (parent, parent->children, node);
211 /* CLAWS: ignore thread */
212 if (MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
213 g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, -1, procmsg_ignore_node, NULL);
216 last = node; /* CLAWS: need to have the last one for subject threading */
220 /* CLAWS: now see if the first level (below root) still has some nodes that can be
221 * threaded by subject line. we need to handle this in a special way to prevent
222 * circular reference from a node that has already been threaded by IN-REPLY-TO
223 * but is also in the subject line hash table */
224 if (prefs_common.thread_by_subject) {
225 for (node = root->children; node && node != NULL;) {
227 msginfo = (MsgInfo *) node->data;
228 subject = msginfo->subject + subject_get_reply_prefix_length(msginfo->subject);
229 parent = subject_table_lookup_clean(subject_table, (gchar *) subject);
231 /* the node may already be threaded by IN-REPLY-TO,
232 so go up in the tree to find the parent node */
233 if (parent != NULL) {
234 if (g_node_is_ancestor(node, parent))
238 /* Make new thread parent if too old compared to previous one; probably
239 * breaks ignoring threads for subject threading. This still isn't
240 * accurate because the tree isn't sorted by date. */
241 if (parent && abs(difftime(msginfo->date_t, ((MsgInfo *)parent->data)->date_t)) >
242 prefs_common.thread_by_subject_max_age * 3600 * 24) {
243 subject_table_remove_clean(subject_table, (gchar *) subject);
244 subject_table_insert_clean(subject_table, (gchar *) subject, node);
251 g_node_append(parent, node);
252 /* CLAWS: ignore thread */
253 if (MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
254 g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, -1, procmsg_ignore_node, NULL);
261 g_hash_table_destroy(subject_table);
262 g_hash_table_destroy(msgid_table);
267 void procmsg_move_messages(GSList *mlist)
269 GSList *cur, *movelist = NULL;
271 FolderItem *dest = NULL;
275 folder_item_update_freeze();
277 for (cur = mlist; cur != NULL; cur = cur->next) {
278 msginfo = (MsgInfo *)cur->data;
280 dest = msginfo->to_folder;
281 movelist = g_slist_append(movelist, msginfo);
282 } else if (dest == msginfo->to_folder) {
283 movelist = g_slist_append(movelist, msginfo);
285 folder_item_move_msgs_with_dest(dest, movelist);
286 g_slist_free(movelist);
288 dest = msginfo->to_folder;
289 movelist = g_slist_append(movelist, msginfo);
291 procmsg_msginfo_set_to_folder(msginfo, NULL);
295 folder_item_move_msgs_with_dest(dest, movelist);
296 g_slist_free(movelist);
299 folder_item_update_thaw();
302 void procmsg_copy_messages(GSList *mlist)
304 GSList *cur, *copylist = NULL;
306 FolderItem *dest = NULL;
310 folder_item_update_freeze();
312 for (cur = mlist; cur != NULL; cur = cur->next) {
313 msginfo = (MsgInfo *)cur->data;
315 dest = msginfo->to_folder;
316 copylist = g_slist_append(copylist, msginfo);
317 } else if (dest == msginfo->to_folder) {
318 copylist = g_slist_append(copylist, msginfo);
320 folder_item_copy_msgs_with_dest(dest, copylist);
321 g_slist_free(copylist);
323 dest = msginfo->to_folder;
324 copylist = g_slist_append(copylist, msginfo);
326 procmsg_msginfo_set_to_folder(msginfo, NULL);
330 folder_item_copy_msgs_with_dest(dest, copylist);
331 g_slist_free(copylist);
334 folder_item_update_thaw();
337 gchar *procmsg_get_message_file_path(MsgInfo *msginfo)
341 g_return_val_if_fail(msginfo != NULL, NULL);
343 if (msginfo->plaintext_file)
344 file = g_strdup(msginfo->plaintext_file);
346 path = folder_item_get_path(msginfo->folder);
347 file = g_strconcat(path, G_DIR_SEPARATOR_S,
348 itos(msginfo->msgnum), NULL);
355 gchar *procmsg_get_message_file(MsgInfo *msginfo)
357 gchar *filename = NULL;
359 g_return_val_if_fail(msginfo != NULL, NULL);
361 filename = folder_item_fetch_msg(msginfo->folder, msginfo->msgnum);
363 g_warning("can't fetch message %d\n", msginfo->msgnum);
368 FILE *procmsg_open_message(MsgInfo *msginfo)
373 g_return_val_if_fail(msginfo != NULL, NULL);
375 file = procmsg_get_message_file_path(msginfo);
376 g_return_val_if_fail(file != NULL, NULL);
378 if (!is_file_exist(file)) {
380 file = procmsg_get_message_file(msginfo);
381 g_return_val_if_fail(file != NULL, NULL);
384 if ((fp = fopen(file, "rb")) == NULL) {
385 FILE_OP_ERROR(file, "fopen");
392 if (MSG_IS_QUEUED(msginfo->flags) || MSG_IS_DRAFT(msginfo->flags)) {
395 while (fgets(buf, sizeof(buf), fp) != NULL)
396 if (buf[0] == '\r' || buf[0] == '\n') break;
403 FILE *procmsg_open_message_decrypted(MsgInfo *msginfo, MimeInfo **mimeinfo)
409 g_return_val_if_fail(msginfo != NULL, NULL);
411 if (mimeinfo) *mimeinfo = NULL;
413 if ((fp = procmsg_open_message(msginfo)) == NULL) return NULL;
415 mimeinfo_ = procmime_scan_mime_header(fp);
421 if (!MSG_IS_ENCRYPTED(msginfo->flags) &&
422 rfc2015_is_encrypted(mimeinfo_)) {
423 MSG_SET_TMP_FLAGS(msginfo->flags, MSG_ENCRYPTED);
426 if (MSG_IS_ENCRYPTED(msginfo->flags) &&
427 !msginfo->plaintext_file &&
428 !msginfo->decryption_failed) {
430 rfc2015_decrypt_message(msginfo, mimeinfo_, fp);
431 if (msginfo->plaintext_file &&
432 !msginfo->decryption_failed) {
434 procmime_mimeinfo_free_all(mimeinfo_);
435 if ((fp = procmsg_open_message(msginfo)) == NULL)
437 mimeinfo_ = procmime_scan_mime_header(fp);
443 if (fseek(fp, fpos, SEEK_SET) < 0)
448 if (mimeinfo) *mimeinfo = mimeinfo_;
453 gboolean procmsg_msg_exist(MsgInfo *msginfo)
458 if (!msginfo) return FALSE;
460 path = folder_item_get_path(msginfo->folder);
462 ret = !folder_item_is_msg_changed(msginfo->folder, msginfo);
468 void procmsg_get_filter_keyword(MsgInfo *msginfo, gchar **header, gchar **key,
469 PrefsFilterType type)
471 static HeaderEntry hentry[] = {{"X-BeenThere:", NULL, TRUE},
472 {"X-ML-Name:", NULL, TRUE},
473 {"X-List:", NULL, TRUE},
474 {"X-Mailing-list:", NULL, TRUE},
475 {"List-Id:", NULL, TRUE},
476 {"X-Sequence:", NULL, TRUE},
477 {NULL, NULL, FALSE}};
483 H_X_MAILING_LIST = 3,
490 g_return_if_fail(msginfo != NULL);
491 g_return_if_fail(header != NULL);
492 g_return_if_fail(key != NULL);
501 if ((fp = procmsg_open_message(msginfo)) == NULL)
503 procheader_get_header_fields(fp, hentry);
506 #define SET_FILTER_KEY(hstr, idx) \
508 *header = g_strdup(hstr); \
509 *key = hentry[idx].body; \
510 hentry[idx].body = NULL; \
513 if (hentry[H_X_BEENTHERE].body != NULL) {
514 SET_FILTER_KEY("header \"X-BeenThere\"", H_X_BEENTHERE);
515 } else if (hentry[H_X_ML_NAME].body != NULL) {
516 SET_FILTER_KEY("header \"X-ML-Name\"", H_X_ML_NAME);
517 } else if (hentry[H_X_LIST].body != NULL) {
518 SET_FILTER_KEY("header \"X-List\"", H_X_LIST);
519 } else if (hentry[H_X_MAILING_LIST].body != NULL) {
520 SET_FILTER_KEY("header \"X-Mailing-List\"", H_X_MAILING_LIST);
521 } else if (hentry[H_LIST_ID].body != NULL) {
522 SET_FILTER_KEY("header \"List-Id\"", H_LIST_ID);
523 extract_list_id_str(*key);
524 } else if (hentry[H_X_SEQUENCE].body != NULL) {
527 SET_FILTER_KEY("X-Sequence", H_X_SEQUENCE);
530 while (*p != '\0' && !isspace(*p)) p++;
531 while (isspace(*p)) p++;
538 } else if (msginfo->subject) {
539 *header = g_strdup("subject");
540 *key = g_strdup(msginfo->subject);
543 #undef SET_FILTER_KEY
545 g_free(hentry[H_X_BEENTHERE].body);
546 hentry[H_X_BEENTHERE].body = NULL;
547 g_free(hentry[H_X_ML_NAME].body);
548 hentry[H_X_ML_NAME].body = NULL;
549 g_free(hentry[H_X_LIST].body);
550 hentry[H_X_LIST].body = NULL;
551 g_free(hentry[H_X_MAILING_LIST].body);
552 hentry[H_X_MAILING_LIST].body = NULL;
553 g_free(hentry[H_LIST_ID].body);
554 hentry[H_LIST_ID].body = NULL;
558 *header = g_strdup("from");
559 *key = g_strdup(msginfo->from);
562 *header = g_strdup("to");
563 *key = g_strdup(msginfo->to);
565 case FILTER_BY_SUBJECT:
566 *header = g_strdup("subject");
567 *key = g_strdup(msginfo->subject);
574 void procmsg_empty_trash(void)
579 for (cur = folder_get_list(); cur != NULL; cur = cur->next) {
580 trash = FOLDER(cur->data)->trash;
581 if (trash && trash->total_msgs > 0)
582 folder_item_remove_all_msg(trash);
587 *\brief Send messages in queue
589 *\param queue Queue folder to process
590 *\param save_msgs Unused
592 *\return Number of messages sent, negative if an error occurred
593 * positive if no error occurred
595 gint procmsg_send_queue(FolderItem *queue, gboolean save_msgs)
597 gint ret = 1, count = 0;
601 queue = folder_get_default_queue();
602 g_return_val_if_fail(queue != NULL, -1);
604 folder_item_scan(queue);
605 list = folder_item_get_msg_list(queue);
607 for (elem = list; elem != NULL; elem = elem->next) {
611 msginfo = (MsgInfo *)(elem->data);
612 if (!MSG_IS_LOCKED(msginfo->flags)) {
613 file = folder_item_fetch_msg(queue, msginfo->msgnum);
615 if (procmsg_send_message_queue(file) < 0) {
616 g_warning("Sending queued message %d failed.\n",
621 * We save in procmsg_send_message_queue because
622 * we need the destination folder from the queue
626 procmsg_save_to_outbox
627 (queue->folder->outbox,
631 folder_item_remove_msg(queue, msginfo->msgnum);
636 /* FIXME: supposedly if only one message is locked, and queue
637 * is being flushed, the following free says something like
638 * "freeing msg ## in folder (nil)". */
639 procmsg_msginfo_free(msginfo);
645 gint procmsg_remove_special_headers(const gchar *in, const gchar *out)
650 if ((fp = fopen(in, "rb")) == NULL) {
651 FILE_OP_ERROR(in, "fopen");
654 if ((outfp = fopen(out, "wb")) == NULL) {
655 FILE_OP_ERROR(out, "fopen");
659 while (fgets(buf, sizeof(buf), fp) != NULL)
660 if (buf[0] == '\r' || buf[0] == '\n') break;
661 while (fgets(buf, sizeof(buf), fp) != NULL)
668 gint procmsg_save_to_outbox(FolderItem *outbox, const gchar *file,
674 debug_print("saving sent message...\n");
677 outbox = folder_get_default_outbox();
678 g_return_val_if_fail(outbox != NULL, -1);
680 /* remove queueing headers */
682 gchar tmp[MAXPATHLEN + 1];
684 g_snprintf(tmp, sizeof(tmp), "%s%ctmpmsg.out.%08x",
685 get_rc_dir(), G_DIR_SEPARATOR, (guint)random());
687 if (procmsg_remove_special_headers(file, tmp) !=0)
690 folder_item_scan(outbox);
691 if ((num = folder_item_add_msg(outbox, tmp, TRUE)) < 0) {
692 g_warning("can't save message\n");
697 folder_item_scan(outbox);
698 if ((num = folder_item_add_msg(outbox, file, FALSE)) < 0) {
699 g_warning("can't save message\n");
704 msginfo = folder_item_get_msginfo(outbox, num);
705 if (msginfo != NULL) {
706 procmsg_msginfo_unset_flags(msginfo, ~0, 0);
707 procmsg_msginfo_free(msginfo);
709 folder_item_update(outbox, TRUE);
714 void procmsg_print_message(MsgInfo *msginfo, const gchar *cmdline)
716 static const gchar *def_cmd = "lpr %s";
723 g_return_if_fail(msginfo);
725 if ((tmpfp = procmime_get_first_text_content(msginfo)) == NULL) {
726 g_warning("Can't get text part\n");
730 prtmp = g_strdup_printf("%s%cprinttmp.%08x",
731 get_mime_tmp_dir(), G_DIR_SEPARATOR, id++);
733 if ((prfp = fopen(prtmp, "wb")) == NULL) {
734 FILE_OP_ERROR(prtmp, "fopen");
740 if (msginfo->date) fprintf(prfp, "Date: %s\n", msginfo->date);
741 if (msginfo->from) fprintf(prfp, "From: %s\n", msginfo->from);
742 if (msginfo->to) fprintf(prfp, "To: %s\n", msginfo->to);
743 if (msginfo->cc) fprintf(prfp, "Cc: %s\n", msginfo->cc);
744 if (msginfo->newsgroups)
745 fprintf(prfp, "Newsgroups: %s\n", msginfo->newsgroups);
746 if (msginfo->subject) fprintf(prfp, "Subject: %s\n", msginfo->subject);
749 while (fgets(buf, sizeof(buf), tmpfp) != NULL)
755 if (cmdline && (p = strchr(cmdline, '%')) && *(p + 1) == 's' &&
757 g_snprintf(buf, sizeof(buf) - 1, cmdline, prtmp);
760 g_warning("Print command line is invalid: `%s'\n",
762 g_snprintf(buf, sizeof(buf) - 1, def_cmd, prtmp);
768 if (buf[strlen(buf) - 1] != '&') strcat(buf, "&");
772 MsgInfo *procmsg_msginfo_new_ref(MsgInfo *msginfo)
779 MsgInfo *procmsg_msginfo_new(void)
783 newmsginfo = g_new0(MsgInfo, 1);
784 newmsginfo->refcnt = 1;
789 MsgInfo *procmsg_msginfo_copy(MsgInfo *msginfo)
793 if (msginfo == NULL) return NULL;
795 newmsginfo = g_new0(MsgInfo, 1);
797 newmsginfo->refcnt = 1;
799 #define MEMBCOPY(mmb) newmsginfo->mmb = msginfo->mmb
800 #define MEMBDUP(mmb) newmsginfo->mmb = msginfo->mmb ? \
801 g_strdup(msginfo->mmb) : NULL
825 MEMBDUP(dispositionnotificationto);
826 MEMBDUP(returnreceiptto);
830 MEMBCOPY(threadscore);
835 MsgInfo *procmsg_msginfo_get_full_info(MsgInfo *msginfo)
837 MsgInfo *full_msginfo;
840 if (msginfo == NULL) return NULL;
842 file = procmsg_get_message_file(msginfo);
844 g_warning("procmsg_msginfo_get_full_info(): can't get message file.\n");
848 full_msginfo = procheader_parse_file(file, msginfo->flags, TRUE, FALSE);
850 if (!full_msginfo) return NULL;
852 full_msginfo->msgnum = msginfo->msgnum;
853 full_msginfo->size = msginfo->size;
854 full_msginfo->mtime = msginfo->mtime;
855 full_msginfo->folder = msginfo->folder;
857 full_msginfo->plaintext_file = g_strdup(msginfo->plaintext_file);
858 full_msginfo->decryption_failed = msginfo->decryption_failed;
860 procmsg_msginfo_set_to_folder(full_msginfo, msginfo->to_folder);
865 void procmsg_msginfo_free(MsgInfo *msginfo)
867 if (msginfo == NULL) return;
870 if (msginfo->refcnt > 0)
873 debug_print("freeing msginfo %d in %s\n", msginfo->msgnum, msginfo->folder ? msginfo->folder->path : "(nil)");
875 if (msginfo->to_folder) {
876 msginfo->to_folder->op_count--;
877 folder_item_update(msginfo->to_folder, F_ITEM_UPDATE_MSGCNT);
880 g_free(msginfo->fromspace);
881 g_free(msginfo->references);
882 g_free(msginfo->returnreceiptto);
883 g_free(msginfo->dispositionnotificationto);
884 g_free(msginfo->xface);
886 g_free(msginfo->fromname);
888 g_free(msginfo->date);
889 g_free(msginfo->from);
892 g_free(msginfo->newsgroups);
893 g_free(msginfo->subject);
894 g_free(msginfo->msgid);
895 g_free(msginfo->inreplyto);
896 g_free(msginfo->xref);
901 guint procmsg_msginfo_memusage(MsgInfo *msginfo)
905 memusage += sizeof(MsgInfo);
906 if (msginfo->fromname)
907 memusage += strlen(msginfo->fromname);
909 memusage += strlen(msginfo->date);
911 memusage += strlen(msginfo->from);
913 memusage += strlen(msginfo->to);
915 memusage += strlen(msginfo->cc);
916 if (msginfo->newsgroups)
917 memusage += strlen(msginfo->newsgroups);
918 if (msginfo->subject)
919 memusage += strlen(msginfo->subject);
921 memusage += strlen(msginfo->msgid);
922 if (msginfo->inreplyto)
923 memusage += strlen(msginfo->inreplyto);
925 memusage += strlen(msginfo->xface);
926 if (msginfo->dispositionnotificationto)
927 memusage += strlen(msginfo->dispositionnotificationto);
928 if (msginfo->returnreceiptto)
929 memusage += strlen(msginfo->returnreceiptto);
930 if (msginfo->references)
931 memusage += strlen(msginfo->references);
932 if (msginfo->fromspace)
933 memusage += strlen(msginfo->fromspace);
938 gint procmsg_cmp_msgnum_for_sort(gconstpointer a, gconstpointer b)
940 const MsgInfo *msginfo1 = a;
941 const MsgInfo *msginfo2 = b;
948 return msginfo1->msgnum - msginfo2->msgnum;
957 Q_MAIL_ACCOUNT_ID = 4,
958 Q_NEWS_ACCOUNT_ID = 5,
959 Q_SAVE_COPY_FOLDER = 6,
960 Q_REPLY_MESSAGE_ID = 7,
964 gint procmsg_send_message_queue(const gchar *file)
966 static HeaderEntry qentry[] = {{"S:", NULL, FALSE},
967 {"SSV:", NULL, FALSE},
969 {"NG:", NULL, FALSE},
970 {"MAID:", NULL, FALSE},
971 {"NAID:", NULL, FALSE},
972 {"SCF:", NULL, FALSE},
973 {"RMID:", NULL, FALSE},
974 {"FMID:", NULL, FALSE},
975 {NULL, NULL, FALSE}};
978 gint mailval = 0, newsval = 0;
980 gchar *smtpserver = NULL;
981 GSList *to_list = NULL;
982 GSList *newsgroup_list = NULL;
983 gchar *savecopyfolder = NULL;
984 gchar *replymessageid = NULL;
985 gchar *fwdmessageid = NULL;
988 PrefsAccount *mailac = NULL, *newsac = NULL;
991 g_return_val_if_fail(file != NULL, -1);
993 if ((fp = fopen(file, "rb")) == NULL) {
994 FILE_OP_ERROR(file, "fopen");
998 while ((hnum = procheader_get_one_field(buf, sizeof(buf), fp, qentry))
1000 gchar *p = buf + strlen(qentry[hnum].name);
1004 if (!from) from = g_strdup(p);
1007 if (!smtpserver) smtpserver = g_strdup(p);
1010 to_list = address_list_append(to_list, p);
1013 newsgroup_list = newsgroup_list_append(newsgroup_list, p);
1015 case Q_MAIL_ACCOUNT_ID:
1016 mailac = account_find_from_id(atoi(p));
1018 case Q_NEWS_ACCOUNT_ID:
1019 newsac = account_find_from_id(atoi(p));
1021 case Q_SAVE_COPY_FOLDER:
1022 if (!savecopyfolder) savecopyfolder = g_strdup(p);
1024 case Q_REPLY_MESSAGE_ID:
1025 if (!replymessageid) replymessageid = g_strdup(p);
1027 case Q_FWD_MESSAGE_ID:
1028 if (!fwdmessageid) fwdmessageid = g_strdup(p);
1032 filepos = ftell(fp);
1035 debug_print("Sending message by mail\n");
1037 g_warning("Queued message header is broken.\n");
1039 } else if (mailac && mailac->use_mail_command &&
1040 mailac->mail_command && (* mailac->mail_command)) {
1041 mailval = send_message_local(mailac->mail_command, fp);
1043 } else if (prefs_common.use_extsend && prefs_common.extsend_cmd) {
1044 mailval = send_message_local(prefs_common.extsend_cmd, fp);
1048 mailac = account_find_from_smtp_server(from, smtpserver);
1050 g_warning("Account not found. "
1051 "Using current account...\n");
1052 mailac = cur_account;
1057 mailval = send_message_smtp(mailac, to_list, fp);
1059 PrefsAccount tmp_ac;
1061 g_warning("Account not found.\n");
1063 memset(&tmp_ac, 0, sizeof(PrefsAccount));
1064 tmp_ac.address = from;
1065 tmp_ac.smtp_server = smtpserver;
1066 tmp_ac.smtpport = SMTP_PORT;
1067 mailval = send_message_smtp(&tmp_ac, to_list, fp);
1072 fseek(fp, filepos, SEEK_SET);
1073 if (newsgroup_list && (newsval == 0)) {
1078 /* write to temporary file */
1079 tmp = g_strdup_printf("%s%ctmp%d", g_get_tmp_dir(),
1080 G_DIR_SEPARATOR, (gint)file);
1081 if ((tmpfp = fopen(tmp, "wb")) == NULL) {
1082 FILE_OP_ERROR(tmp, "fopen");
1084 alertpanel_error(_("Could not create temporary file for news sending."));
1086 if (change_file_mode_rw(tmpfp, tmp) < 0) {
1087 FILE_OP_ERROR(tmp, "chmod");
1088 g_warning("can't change file mode\n");
1091 while ((newsval == 0) && fgets(buf, sizeof(buf), fp) != NULL) {
1092 if (fputs(buf, tmpfp) == EOF) {
1093 FILE_OP_ERROR(tmp, "fputs");
1095 alertpanel_error(_("Error when writing temporary file for news sending."));
1101 debug_print("Sending message by news\n");
1103 folder = FOLDER(newsac->folder);
1105 newsval = news_post(folder, tmp);
1107 alertpanel_error(_("Error occurred while posting the message to %s ."),
1108 newsac->nntp_server);
1116 slist_free_strings(to_list);
1117 g_slist_free(to_list);
1118 slist_free_strings(newsgroup_list);
1119 g_slist_free(newsgroup_list);
1124 /* save message to outbox */
1125 if (mailval == 0 && newsval == 0 && savecopyfolder) {
1128 debug_print("saving sent message...\n");
1130 outbox = folder_find_item_from_identifier(savecopyfolder);
1132 outbox = folder_get_default_outbox();
1134 procmsg_save_to_outbox(outbox, file, TRUE);
1137 if (replymessageid != NULL || fwdmessageid != NULL) {
1141 if (replymessageid != NULL)
1142 tokens = g_strsplit(replymessageid, "\x7f", 0);
1144 tokens = g_strsplit(fwdmessageid, "\x7f", 0);
1145 item = folder_find_item_from_identifier(tokens[0]);
1149 msginfo = folder_item_get_msginfo(item, atoi(tokens[1]));
1151 /*!< note that if the message has no msgid (maybe it was invalid),
1152 * we also refuse to do something with the reply to flag */
1153 if ((msginfo != NULL) &&
1154 (msginfo->msgid != NULL) &&
1155 (strcmp(msginfo->msgid, tokens[2]) != 0)) {
1156 procmsg_msginfo_free(msginfo);
1160 if (msginfo == NULL) {
1161 msginfo = folder_item_get_msginfo_by_msgid(item, tokens[2]);
1164 if (msginfo != NULL) {
1165 if (replymessageid != NULL) {
1166 procmsg_msginfo_unset_flags(msginfo, MSG_FORWARDED, 0);
1167 procmsg_msginfo_set_flags(msginfo, MSG_REPLIED, 0);
1170 procmsg_msginfo_unset_flags(msginfo, MSG_REPLIED, 0);
1171 procmsg_msginfo_set_flags(msginfo, MSG_FORWARDED, 0);
1173 procmsg_msginfo_free(msginfo);
1179 g_free(savecopyfolder);
1180 g_free(replymessageid);
1181 g_free(fwdmessageid);
1183 return (newsval != 0 ? newsval : mailval);
1186 static void update_folder_msg_counts(FolderItem *item, MsgInfo *msginfo, MsgPermFlags old_flags)
1188 MsgPermFlags new_flags = msginfo->flags.perm_flags;
1191 if (!(old_flags & MSG_NEW) && (new_flags & MSG_NEW)) {
1195 if ((old_flags & MSG_NEW) && !(new_flags & MSG_NEW)) {
1200 if (!(old_flags & MSG_UNREAD) && (new_flags & MSG_UNREAD)) {
1201 item->unread_msgs++;
1202 if (procmsg_msg_has_marked_parent(msginfo))
1203 item->unreadmarked_msgs++;
1206 if ((old_flags & MSG_UNREAD) && !(new_flags & MSG_UNREAD)) {
1207 item->unread_msgs--;
1208 if (procmsg_msg_has_marked_parent(msginfo))
1209 item->unreadmarked_msgs--;
1213 if (!(old_flags & MSG_MARKED) && (new_flags & MSG_MARKED)) {
1214 procmsg_update_unread_children(msginfo, TRUE);
1217 if ((old_flags & MSG_MARKED) && !(new_flags & MSG_MARKED)) {
1218 procmsg_update_unread_children(msginfo, FALSE);
1222 void procmsg_msginfo_set_flags(MsgInfo *msginfo, MsgPermFlags perm_flags, MsgTmpFlags tmp_flags)
1225 MsgInfoUpdate msginfo_update;
1226 MsgPermFlags perm_flags_new, perm_flags_old;
1228 g_return_if_fail(msginfo != NULL);
1229 item = msginfo->folder;
1230 g_return_if_fail(item != NULL);
1232 debug_print("Setting flags for message %d in folder %s\n", msginfo->msgnum, item->path);
1234 /* Perm Flags handling */
1235 perm_flags_old = msginfo->flags.perm_flags;
1236 perm_flags_new = msginfo->flags.perm_flags | perm_flags;
1237 if ((perm_flags & MSG_IGNORE_THREAD) || (perm_flags_old & MSG_IGNORE_THREAD)) {
1238 perm_flags_new &= ~(MSG_NEW | MSG_UNREAD);
1241 if (perm_flags_old != perm_flags_new) {
1242 folder_item_change_msg_flags(msginfo->folder, msginfo, perm_flags_new);
1244 update_folder_msg_counts(item, msginfo, perm_flags_old);
1246 msginfo_update.msginfo = msginfo;
1247 hooks_invoke(MSGINFO_UPDATE_HOOKLIST, &msginfo_update);
1248 folder_item_update(msginfo->folder, F_ITEM_UPDATE_MSGCNT);
1251 /* Tmp flags hanlding */
1252 msginfo->flags.tmp_flags |= tmp_flags;
1255 void procmsg_msginfo_unset_flags(MsgInfo *msginfo, MsgPermFlags perm_flags, MsgTmpFlags tmp_flags)
1258 MsgInfoUpdate msginfo_update;
1259 MsgPermFlags perm_flags_new, perm_flags_old;
1261 g_return_if_fail(msginfo != NULL);
1262 item = msginfo->folder;
1263 g_return_if_fail(item != NULL);
1265 debug_print("Unsetting flags for message %d in folder %s\n", msginfo->msgnum, item->path);
1267 /* Perm Flags handling */
1268 perm_flags_old = msginfo->flags.perm_flags;
1269 perm_flags_new = msginfo->flags.perm_flags & ~perm_flags;
1271 if (perm_flags_old != perm_flags_new) {
1272 folder_item_change_msg_flags(msginfo->folder, msginfo, perm_flags_new);
1274 update_folder_msg_counts(item, msginfo, perm_flags_old);
1276 msginfo_update.msginfo = msginfo;
1277 hooks_invoke(MSGINFO_UPDATE_HOOKLIST, &msginfo_update);
1278 folder_item_update(msginfo->folder, F_ITEM_UPDATE_MSGCNT);
1281 /* Tmp flags hanlding */
1282 msginfo->flags.tmp_flags &= ~tmp_flags;
1286 *\brief check for flags (e.g. mark) in prior msgs of current thread
1288 *\param info Current message
1289 *\param perm_flags Flags to be checked
1290 *\param parentmsgs Hash of prior msgs to avoid loops
1292 *\return gboolean TRUE if perm_flags are found
1294 gboolean procmsg_msg_has_flagged_parent_real(MsgInfo *info,
1295 MsgPermFlags perm_flags, GHashTable *parentmsgs)
1299 g_return_val_if_fail(info != NULL, FALSE);
1301 if (info != NULL && info->folder != NULL && info->inreplyto != NULL) {
1302 tmp = folder_item_get_msginfo_by_msgid(info->folder,
1304 if (tmp && (tmp->flags.perm_flags & perm_flags)) {
1305 procmsg_msginfo_free(tmp);
1307 } else if (tmp != NULL) {
1310 if (g_hash_table_lookup(parentmsgs, info)) {
1311 debug_print("loop detected: %s%c%d\n",
1312 folder_item_get_path(info->folder),
1313 G_DIR_SEPARATOR, info->msgnum);
1316 g_hash_table_insert(parentmsgs, info, "1");
1317 result = procmsg_msg_has_flagged_parent_real(
1318 tmp, perm_flags, parentmsgs);
1320 procmsg_msginfo_free(tmp);
1330 *\brief Callback for cleaning up hash of parentmsgs
1332 gboolean parentmsgs_hash_remove(gpointer key,
1340 *\brief Set up list of parentmsgs
1341 * See procmsg_msg_has_flagged_parent_real()
1343 gboolean procmsg_msg_has_flagged_parent(MsgInfo *info, MsgPermFlags perm_flags)
1346 GHashTable *parentmsgs = g_hash_table_new(NULL, NULL);
1348 result = procmsg_msg_has_flagged_parent_real(info, perm_flags, parentmsgs);
1349 g_hash_table_foreach_remove(parentmsgs, parentmsgs_hash_remove, NULL);
1350 g_hash_table_destroy(parentmsgs);
1355 *\brief Check if msgs prior in thread are marked
1356 * See procmsg_msg_has_flagged_parent_real()
1358 gboolean procmsg_msg_has_marked_parent(MsgInfo *info)
1360 return procmsg_msg_has_flagged_parent(info, MSG_MARKED);
1364 GSList *procmsg_find_children_func(MsgInfo *info,
1365 GSList *children, GSList *all)
1369 g_return_val_if_fail(info!=NULL, children);
1370 if (info->msgid == NULL)
1373 for (cur = all; cur != NULL; cur = g_slist_next(cur)) {
1374 MsgInfo *tmp = (MsgInfo *)cur->data;
1375 if (tmp->inreplyto && !strcmp(tmp->inreplyto, info->msgid)) {
1376 /* Check if message is already in the list */
1377 if ((children == NULL) ||
1378 (g_slist_index(children, tmp) == -1)) {
1379 children = g_slist_prepend(children,
1380 procmsg_msginfo_new_ref(tmp));
1381 children = procmsg_find_children_func(tmp,
1390 GSList *procmsg_find_children (MsgInfo *info)
1395 g_return_val_if_fail(info!=NULL, NULL);
1396 all = folder_item_get_msg_list(info->folder);
1397 children = procmsg_find_children_func(info, NULL, all);
1398 if (children != NULL) {
1399 for (cur = all; cur != NULL; cur = g_slist_next(cur)) {
1400 /* this will not free the used pointers
1401 created with procmsg_msginfo_new_ref */
1402 procmsg_msginfo_free((MsgInfo *)cur->data);
1410 void procmsg_update_unread_children(MsgInfo *info, gboolean newly_marked)
1412 GSList *children = procmsg_find_children(info);
1414 for (cur = children; cur != NULL; cur = g_slist_next(cur)) {
1415 MsgInfo *tmp = (MsgInfo *)cur->data;
1416 if(MSG_IS_UNREAD(tmp->flags) && !MSG_IS_IGNORE_THREAD(tmp->flags)) {
1418 info->folder->unreadmarked_msgs++;
1420 info->folder->unreadmarked_msgs--;
1421 folder_item_update(info->folder, F_ITEM_UPDATE_MSGCNT);
1423 procmsg_msginfo_free(tmp);
1425 g_slist_free(children);
1429 * Set the destination folder for a copy or move operation
1431 * \param msginfo The message which's destination folder is changed
1432 * \param to_folder The destination folder for the operation
1434 void procmsg_msginfo_set_to_folder(MsgInfo *msginfo, FolderItem *to_folder)
1436 if(msginfo->to_folder != NULL) {
1437 msginfo->to_folder->op_count--;
1438 folder_item_update(msginfo->to_folder, F_ITEM_UPDATE_MSGCNT);
1440 msginfo->to_folder = to_folder;
1441 if(to_folder != NULL) {
1442 to_folder->op_count++;
1443 folder_item_update(msginfo->to_folder, F_ITEM_UPDATE_MSGCNT);
1448 * Apply filtering actions to the msginfo
1450 * \param msginfo The MsgInfo describing the message that should be filtered
1451 * \return TRUE if the message was moved and MsgInfo is now invalid,
1454 gboolean procmsg_msginfo_filter(MsgInfo *msginfo)
1456 MailFilteringData mail_filtering_data;
1458 mail_filtering_data.msginfo = msginfo;
1459 if (hooks_invoke(MAIL_FILTERING_HOOKLIST, &mail_filtering_data))
1462 /* filter if enabled in prefs or move to inbox if not */
1463 if((global_processing != NULL) &&
1464 filter_message_by_msginfo(global_processing, msginfo))