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.
30 #include "procheader.h"
31 #include "send_message.h"
33 #include "statusbar.h"
34 #include "prefs_filtering.h"
35 #include "filtering.h"
37 #include "prefs_common.h"
42 #include "alertpanel.h"
47 typedef struct _FlagInfo FlagInfo;
55 GHashTable *procmsg_msg_hash_table_create(GSList *mlist)
57 GHashTable *msg_table;
59 if (mlist == NULL) return NULL;
61 msg_table = g_hash_table_new(NULL, g_direct_equal);
62 procmsg_msg_hash_table_append(msg_table, mlist);
67 void procmsg_msg_hash_table_append(GHashTable *msg_table, GSList *mlist)
72 if (msg_table == NULL || mlist == NULL) return;
74 for (cur = mlist; cur != NULL; cur = cur->next) {
75 msginfo = (MsgInfo *)cur->data;
77 g_hash_table_insert(msg_table,
78 GUINT_TO_POINTER(msginfo->msgnum),
83 GHashTable *procmsg_to_folder_hash_table_create(GSList *mlist)
85 GHashTable *msg_table;
89 if (mlist == NULL) return NULL;
91 msg_table = g_hash_table_new(NULL, g_direct_equal);
93 for (cur = mlist; cur != NULL; cur = cur->next) {
94 msginfo = (MsgInfo *)cur->data;
95 g_hash_table_insert(msg_table, msginfo->to_folder, msginfo);
101 gint procmsg_get_last_num_in_msg_list(GSList *mlist)
107 for (cur = mlist; cur != NULL; cur = cur->next) {
108 msginfo = (MsgInfo *)cur->data;
109 if (msginfo && msginfo->msgnum > last)
110 last = msginfo->msgnum;
116 void procmsg_msg_list_free(GSList *mlist)
121 for (cur = mlist; cur != NULL; cur = cur->next) {
122 msginfo = (MsgInfo *)cur->data;
123 procmsg_msginfo_free(msginfo);
137 static gboolean procmsg_ignore_node(GNode *node, gpointer data)
139 MsgInfo *msginfo = (MsgInfo *)node->data;
141 procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
142 procmsg_msginfo_set_flags(msginfo, MSG_IGNORE_THREAD, 0);
147 /* return the reversed thread tree */
148 GNode *procmsg_get_thread_tree(GSList *mlist)
150 GNode *root, *parent, *node, *next;
151 GHashTable *msgid_table;
152 GHashTable *subject_table;
155 const gchar *subject;
156 GNode *found_subject;
158 root = g_node_new(NULL);
159 msgid_table = g_hash_table_new(g_str_hash, g_str_equal);
160 subject_table = g_hash_table_new(g_str_hash, g_str_equal);
162 for (; mlist != NULL; mlist = mlist->next) {
163 msginfo = (MsgInfo *)mlist->data;
166 if (msginfo->inreplyto) {
167 parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
168 if (parent == NULL) {
171 if (MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
172 procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
173 procmsg_msginfo_set_flags(msginfo, MSG_IGNORE_THREAD, 0);
177 node = g_node_insert_data_before
178 (parent, parent == root ? parent->children : NULL,
180 if ((msgid = msginfo->msgid) &&
181 g_hash_table_lookup(msgid_table, msgid) == NULL)
182 g_hash_table_insert(msgid_table, (gchar *)msgid, node);
184 if (prefs_common.thread_by_subject) {
185 subject = msginfo->subject;
186 found_subject = subject_table_lookup(subject_table,
188 if (found_subject == NULL)
189 subject_table_insert(subject_table, (gchar *) subject,
192 /* replace if msg in table is older than current one
193 * can add here more stuff. */
194 if ( ((MsgInfo*)(found_subject->data))->date_t >
195 ((MsgInfo*)(node->data))->date_t ) {
196 subject_table_remove(subject_table, (gchar *) subject);
197 subject_table_insert(subject_table, (gchar *) subject, node);
203 /* complete the unfinished threads */
204 for (node = root->children; node != NULL; ) {
206 msginfo = (MsgInfo *)node->data;
208 if (msginfo->inreplyto)
209 parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
210 if (parent && parent != node) {
213 (parent, parent->children, node);
214 /* CLAWS: ignore thread */
215 if (MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
216 g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, -1, procmsg_ignore_node, NULL);
222 /* CLAWS: now see if the first level (below root) still has some nodes that can be
223 * threaded by subject line. we need to handle this in a special way to prevent
224 * circular reference from a node that has already been threaded by IN-REPLY-TO
225 * but is also in the subject line hash table */
226 if (prefs_common.thread_by_subject) {
227 for (node = root->children; node != NULL; ) {
229 msginfo = (MsgInfo *) node->data;
231 if (subject_is_reply(msginfo->subject)) {
232 parent = subject_table_lookup(subject_table,
234 /* the node may already be threaded by IN-REPLY-TO,
235 so go up in the tree to find the parent node */
236 if (parent != NULL) {
237 if (g_node_is_ancestor(node, parent))
245 g_node_append(parent, node);
246 /* CLAWS: ignore thread */
247 if (MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
248 g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, -1, procmsg_ignore_node, NULL);
256 g_hash_table_destroy(subject_table);
257 g_hash_table_destroy(msgid_table);
262 void procmsg_move_messages(GSList *mlist)
264 GSList *cur, *movelist = NULL;
266 FolderItem *dest = NULL;
270 folder_item_update_freeze();
272 for (cur = mlist; cur != NULL; cur = cur->next) {
273 msginfo = (MsgInfo *)cur->data;
275 dest = msginfo->to_folder;
276 movelist = g_slist_append(movelist, msginfo);
277 } else if (dest == msginfo->to_folder) {
278 movelist = g_slist_append(movelist, msginfo);
280 folder_item_move_msgs_with_dest(dest, movelist);
281 g_slist_free(movelist);
283 dest = msginfo->to_folder;
284 movelist = g_slist_append(movelist, msginfo);
286 procmsg_msginfo_set_to_folder(msginfo, NULL);
290 folder_item_move_msgs_with_dest(dest, movelist);
291 g_slist_free(movelist);
294 folder_item_update_thaw();
297 void procmsg_copy_messages(GSList *mlist)
299 GSList *cur, *copylist = NULL;
301 FolderItem *dest = NULL;
305 folder_item_update_freeze();
307 for (cur = mlist; cur != NULL; cur = cur->next) {
308 msginfo = (MsgInfo *)cur->data;
310 dest = msginfo->to_folder;
311 copylist = g_slist_append(copylist, msginfo);
312 } else if (dest == msginfo->to_folder) {
313 copylist = g_slist_append(copylist, msginfo);
315 folder_item_copy_msgs_with_dest(dest, copylist);
316 g_slist_free(copylist);
318 dest = msginfo->to_folder;
319 copylist = g_slist_append(copylist, msginfo);
321 procmsg_msginfo_set_to_folder(msginfo, NULL);
325 folder_item_copy_msgs_with_dest(dest, copylist);
326 g_slist_free(copylist);
329 folder_item_update_thaw();
332 gchar *procmsg_get_message_file_path(MsgInfo *msginfo)
336 g_return_val_if_fail(msginfo != NULL, NULL);
338 if (msginfo->plaintext_file)
339 file = g_strdup(msginfo->plaintext_file);
341 path = folder_item_get_path(msginfo->folder);
342 file = g_strconcat(path, G_DIR_SEPARATOR_S,
343 itos(msginfo->msgnum), NULL);
350 gchar *procmsg_get_message_file(MsgInfo *msginfo)
352 gchar *filename = NULL;
354 g_return_val_if_fail(msginfo != NULL, NULL);
356 filename = folder_item_fetch_msg(msginfo->folder, msginfo->msgnum);
358 g_warning("can't fetch message %d\n", msginfo->msgnum);
363 FILE *procmsg_open_message(MsgInfo *msginfo)
368 g_return_val_if_fail(msginfo != NULL, NULL);
370 file = procmsg_get_message_file_path(msginfo);
371 g_return_val_if_fail(file != NULL, NULL);
373 if (!is_file_exist(file)) {
375 file = procmsg_get_message_file(msginfo);
376 g_return_val_if_fail(file != NULL, NULL);
379 if ((fp = fopen(file, "rb")) == NULL) {
380 FILE_OP_ERROR(file, "fopen");
387 if (MSG_IS_QUEUED(msginfo->flags) || MSG_IS_DRAFT(msginfo->flags)) {
390 while (fgets(buf, sizeof(buf), fp) != NULL)
391 if (buf[0] == '\r' || buf[0] == '\n') break;
398 FILE *procmsg_open_message_decrypted(MsgInfo *msginfo, MimeInfo **mimeinfo)
403 g_return_val_if_fail(msginfo != NULL, NULL);
405 if (mimeinfo) *mimeinfo = NULL;
407 if ((fp = procmsg_open_message(msginfo)) == NULL) return NULL;
409 mimeinfo_ = procmime_scan_mime_header(fp);
415 if (!MSG_IS_ENCRYPTED(msginfo->flags) &&
416 rfc2015_is_encrypted(mimeinfo_)) {
417 MSG_SET_TMP_FLAGS(msginfo->flags, MSG_ENCRYPTED);
420 if (MSG_IS_ENCRYPTED(msginfo->flags) &&
421 (!msginfo->plaintext_file || msginfo->decryption_failed)) {
422 rfc2015_decrypt_message(msginfo, mimeinfo_, fp);
423 if (msginfo->plaintext_file &&
424 !msginfo->decryption_failed) {
426 procmime_mimeinfo_free_all(mimeinfo_);
427 if ((fp = procmsg_open_message(msginfo)) == NULL)
429 mimeinfo_ = procmime_scan_mime_header(fp);
437 if (mimeinfo) *mimeinfo = mimeinfo_;
442 gboolean procmsg_msg_exist(MsgInfo *msginfo)
447 if (!msginfo) return FALSE;
449 path = folder_item_get_path(msginfo->folder);
451 ret = !folder_item_is_msg_changed(msginfo->folder, msginfo);
457 void procmsg_get_filter_keyword(MsgInfo *msginfo, gchar **header, gchar **key,
458 PrefsFilterType type)
460 static HeaderEntry hentry[] = {{"X-BeenThere:", NULL, FALSE},
461 {"X-ML-Name:", NULL, FALSE},
462 {"X-List:", NULL, FALSE},
463 {"X-Mailing-list:", NULL, FALSE},
464 {"List-Id:", NULL, FALSE},
465 {NULL, NULL, FALSE}};
472 H_X_MAILING_LIST = 3,
478 g_return_if_fail(msginfo != NULL);
479 g_return_if_fail(header != NULL);
480 g_return_if_fail(key != NULL);
489 if ((fp = procmsg_open_message(msginfo)) == NULL)
491 procheader_get_header_fields(fp, hentry);
494 if (hentry[H_X_BEENTHERE].body != NULL) {
495 *header = g_strdup("header \"X-BeenThere\"");
496 *key = hentry[H_X_BEENTHERE].body;
497 hentry[H_X_BEENTHERE].body = NULL;
498 } else if (hentry[H_X_ML_NAME].body != NULL) {
499 *header = g_strdup("header \"X-ML-Name\"");
500 *key = hentry[H_X_ML_NAME].body;
501 hentry[H_X_ML_NAME].body = NULL;
502 } else if (hentry[H_X_LIST].body != NULL) {
503 *header = g_strdup("header \"X-List\"");
504 *key = hentry[H_X_LIST].body;
505 hentry[H_X_LIST].body = NULL;
506 } else if (hentry[H_X_MAILING_LIST].body != NULL) {
507 *header = g_strdup("header \"X-Mailing-List\"");
508 *key = hentry[H_X_MAILING_LIST].body;
509 hentry[H_X_MAILING_LIST].body = NULL;
510 } else if (hentry[H_LIST_ID].body != NULL) {
511 *header = g_strdup("header \"List-Id\"");
512 *key = hentry[H_LIST_ID].body;
513 hentry[H_LIST_ID].body = NULL;
514 } else if (msginfo->subject) {
515 *header = g_strdup("subject");
516 *key = g_strdup(msginfo->subject);
519 g_free(hentry[H_X_BEENTHERE].body);
520 hentry[H_X_BEENTHERE].body = NULL;
521 g_free(hentry[H_X_ML_NAME].body);
522 hentry[H_X_ML_NAME].body = NULL;
523 g_free(hentry[H_X_LIST].body);
524 hentry[H_X_LIST].body = NULL;
525 g_free(hentry[H_X_MAILING_LIST].body);
526 hentry[H_X_MAILING_LIST].body = NULL;
527 g_free(hentry[H_LIST_ID].body);
528 hentry[H_LIST_ID].body = NULL;
532 *header = g_strdup("from");
533 *key = g_strdup(msginfo->from);
536 *header = g_strdup("to");
537 *key = g_strdup(msginfo->to);
539 case FILTER_BY_SUBJECT:
540 *header = g_strdup("subject");
541 *key = g_strdup(msginfo->subject);
548 void procmsg_empty_trash(void)
553 for (cur = folder_get_list(); cur != NULL; cur = cur->next) {
554 trash = FOLDER(cur->data)->trash;
555 if (trash && trash->total_msgs > 0)
556 folder_item_remove_all_msg(trash);
561 *\brief Send messages in queue
563 *\param queue Queue folder to process
564 *\param save_msgs Unused
566 *\return Number of messages sent, negative if an error occurred
567 * positive if no error occurred
569 gint procmsg_send_queue(FolderItem *queue, gboolean save_msgs)
571 gint ret = 1, count = 0;
575 queue = folder_get_default_queue();
576 g_return_val_if_fail(queue != NULL, -1);
578 folder_item_scan(queue);
579 list = folder_item_get_msg_list(queue);
581 for (elem = list; elem != NULL; elem = elem->next) {
585 msginfo = (MsgInfo *)(elem->data);
586 if (!MSG_IS_LOCKED(msginfo->flags)) {
587 file = folder_item_fetch_msg(queue, msginfo->msgnum);
589 if (procmsg_send_message_queue(file) < 0) {
590 g_warning("Sending queued message %d failed.\n",
595 * We save in procmsg_send_message_queue because
596 * we need the destination folder from the queue
600 procmsg_save_to_outbox
601 (queue->folder->outbox,
605 folder_item_remove_msg(queue, msginfo->msgnum);
610 /* FIXME: supposedly if only one message is locked, and queue
611 * is being flushed, the following free says something like
612 * "freeing msg ## in folder (nil)". */
613 procmsg_msginfo_free(msginfo);
619 gint procmsg_remove_special_headers(const gchar *in, const gchar *out)
624 if ((fp = fopen(in, "rb")) == NULL) {
625 FILE_OP_ERROR(in, "fopen");
628 if ((outfp = fopen(out, "wb")) == NULL) {
629 FILE_OP_ERROR(out, "fopen");
633 while (fgets(buf, sizeof(buf), fp) != NULL)
634 if (buf[0] == '\r' || buf[0] == '\n') break;
635 while (fgets(buf, sizeof(buf), fp) != NULL)
642 gint procmsg_save_to_outbox(FolderItem *outbox, const gchar *file,
648 debug_print("saving sent message...\n");
651 outbox = folder_get_default_outbox();
652 g_return_val_if_fail(outbox != NULL, -1);
654 /* remove queueing headers */
656 gchar tmp[MAXPATHLEN + 1];
658 g_snprintf(tmp, sizeof(tmp), "%s%ctmpmsg.out.%08x",
659 get_rc_dir(), G_DIR_SEPARATOR, (guint)random());
661 if (procmsg_remove_special_headers(file, tmp) !=0)
664 folder_item_scan(outbox);
665 if ((num = folder_item_add_msg(outbox, tmp, TRUE)) < 0) {
666 g_warning("can't save message\n");
671 folder_item_scan(outbox);
672 if ((num = folder_item_add_msg(outbox, file, FALSE)) < 0) {
673 g_warning("can't save message\n");
678 msginfo = folder_item_get_msginfo(outbox, num);
679 if (msginfo != NULL) {
680 procmsg_msginfo_unset_flags(msginfo, ~0, 0);
681 procmsg_msginfo_free(msginfo);
683 folder_item_update(outbox, TRUE);
688 void procmsg_print_message(MsgInfo *msginfo, const gchar *cmdline)
690 static const gchar *def_cmd = "lpr %s";
697 g_return_if_fail(msginfo);
699 if ((tmpfp = procmime_get_first_text_content(msginfo)) == NULL) {
700 g_warning("Can't get text part\n");
704 prtmp = g_strdup_printf("%s%cprinttmp.%08x",
705 get_mime_tmp_dir(), G_DIR_SEPARATOR, id++);
707 if ((prfp = fopen(prtmp, "wb")) == NULL) {
708 FILE_OP_ERROR(prtmp, "fopen");
714 if (msginfo->date) fprintf(prfp, "Date: %s\n", msginfo->date);
715 if (msginfo->from) fprintf(prfp, "From: %s\n", msginfo->from);
716 if (msginfo->to) fprintf(prfp, "To: %s\n", msginfo->to);
717 if (msginfo->cc) fprintf(prfp, "Cc: %s\n", msginfo->cc);
718 if (msginfo->newsgroups)
719 fprintf(prfp, "Newsgroups: %s\n", msginfo->newsgroups);
720 if (msginfo->subject) fprintf(prfp, "Subject: %s\n", msginfo->subject);
723 while (fgets(buf, sizeof(buf), tmpfp) != NULL)
729 if (cmdline && (p = strchr(cmdline, '%')) && *(p + 1) == 's' &&
731 g_snprintf(buf, sizeof(buf) - 1, cmdline, prtmp);
734 g_warning("Print command line is invalid: `%s'\n",
736 g_snprintf(buf, sizeof(buf) - 1, def_cmd, prtmp);
742 if (buf[strlen(buf) - 1] != '&') strcat(buf, "&");
746 MsgInfo *procmsg_msginfo_new_ref(MsgInfo *msginfo)
753 MsgInfo *procmsg_msginfo_new()
757 newmsginfo = g_new0(MsgInfo, 1);
758 newmsginfo->refcnt = 1;
763 MsgInfo *procmsg_msginfo_copy(MsgInfo *msginfo)
767 if (msginfo == NULL) return NULL;
769 newmsginfo = g_new0(MsgInfo, 1);
771 newmsginfo->refcnt = 1;
773 #define MEMBCOPY(mmb) newmsginfo->mmb = msginfo->mmb
774 #define MEMBDUP(mmb) newmsginfo->mmb = msginfo->mmb ? \
775 g_strdup(msginfo->mmb) : NULL
799 MEMBDUP(dispositionnotificationto);
800 MEMBDUP(returnreceiptto);
804 MEMBCOPY(threadscore);
809 MsgInfo *procmsg_msginfo_get_full_info(MsgInfo *msginfo)
811 MsgInfo *full_msginfo;
814 if (msginfo == NULL) return NULL;
816 file = procmsg_get_message_file(msginfo);
818 g_warning("procmsg_msginfo_get_full_info(): can't get message file.\n");
822 full_msginfo = procheader_parse_file(file, msginfo->flags, TRUE, FALSE);
824 if (!full_msginfo) return NULL;
826 full_msginfo->msgnum = msginfo->msgnum;
827 full_msginfo->size = msginfo->size;
828 full_msginfo->mtime = msginfo->mtime;
829 full_msginfo->folder = msginfo->folder;
831 full_msginfo->plaintext_file = g_strdup(msginfo->plaintext_file);
832 full_msginfo->decryption_failed = msginfo->decryption_failed;
834 procmsg_msginfo_set_to_folder(full_msginfo, msginfo->to_folder);
839 void procmsg_msginfo_free(MsgInfo *msginfo)
841 if (msginfo == NULL) return;
844 if (msginfo->refcnt > 0)
847 debug_print("freeing msginfo %d in %s\n", msginfo->msgnum, msginfo->folder ? msginfo->folder->path : "(nil)");
849 if (msginfo->to_folder) {
850 msginfo->to_folder->op_count--;
851 folder_item_update(msginfo->to_folder, F_ITEM_UPDATE_MSGCNT);
854 g_free(msginfo->fromspace);
855 g_free(msginfo->references);
856 g_free(msginfo->returnreceiptto);
857 g_free(msginfo->dispositionnotificationto);
858 g_free(msginfo->xface);
860 g_free(msginfo->fromname);
862 g_free(msginfo->date);
863 g_free(msginfo->from);
866 g_free(msginfo->newsgroups);
867 g_free(msginfo->subject);
868 g_free(msginfo->msgid);
869 g_free(msginfo->inreplyto);
870 g_free(msginfo->xref);
875 guint procmsg_msginfo_memusage(MsgInfo *msginfo)
879 memusage += sizeof(MsgInfo);
880 if (msginfo->fromname)
881 memusage += strlen(msginfo->fromname);
883 memusage += strlen(msginfo->date);
885 memusage += strlen(msginfo->from);
887 memusage += strlen(msginfo->to);
889 memusage += strlen(msginfo->cc);
890 if (msginfo->newsgroups)
891 memusage += strlen(msginfo->newsgroups);
892 if (msginfo->subject)
893 memusage += strlen(msginfo->subject);
895 memusage += strlen(msginfo->msgid);
896 if (msginfo->inreplyto)
897 memusage += strlen(msginfo->inreplyto);
899 memusage += strlen(msginfo->xface);
900 if (msginfo->dispositionnotificationto)
901 memusage += strlen(msginfo->dispositionnotificationto);
902 if (msginfo->returnreceiptto)
903 memusage += strlen(msginfo->returnreceiptto);
904 if (msginfo->references)
905 memusage += strlen(msginfo->references);
906 if (msginfo->fromspace)
907 memusage += strlen(msginfo->fromspace);
912 gint procmsg_cmp_msgnum_for_sort(gconstpointer a, gconstpointer b)
914 const MsgInfo *msginfo1 = a;
915 const MsgInfo *msginfo2 = b;
922 return msginfo1->msgnum - msginfo2->msgnum;
931 Q_MAIL_ACCOUNT_ID = 4,
932 Q_NEWS_ACCOUNT_ID = 5,
933 Q_SAVE_COPY_FOLDER = 6,
934 Q_REPLY_MESSAGE_ID = 7,
938 gint procmsg_send_message_queue(const gchar *file)
940 static HeaderEntry qentry[] = {{"S:", NULL, FALSE},
941 {"SSV:", NULL, FALSE},
943 {"NG:", NULL, FALSE},
944 {"MAID:", NULL, FALSE},
945 {"NAID:", NULL, FALSE},
946 {"SCF:", NULL, FALSE},
947 {"RMID:", NULL, FALSE},
948 {"FMID:", NULL, FALSE},
949 {NULL, NULL, FALSE}};
952 gint mailval = 0, newsval = 0;
954 gchar *smtpserver = NULL;
955 GSList *to_list = NULL;
956 GSList *newsgroup_list = NULL;
957 gchar *savecopyfolder = NULL;
958 gchar *replymessageid = NULL;
959 gchar *fwdmessageid = NULL;
962 PrefsAccount *mailac = NULL, *newsac = NULL;
965 g_return_val_if_fail(file != NULL, -1);
967 if ((fp = fopen(file, "rb")) == NULL) {
968 FILE_OP_ERROR(file, "fopen");
972 while ((hnum = procheader_get_one_field(buf, sizeof(buf), fp, qentry))
974 gchar *p = buf + strlen(qentry[hnum].name);
978 if (!from) from = g_strdup(p);
981 if (!smtpserver) smtpserver = g_strdup(p);
984 to_list = address_list_append(to_list, p);
987 newsgroup_list = newsgroup_list_append(newsgroup_list, p);
989 case Q_MAIL_ACCOUNT_ID:
990 mailac = account_find_from_id(atoi(p));
992 case Q_NEWS_ACCOUNT_ID:
993 newsac = account_find_from_id(atoi(p));
995 case Q_SAVE_COPY_FOLDER:
996 if (!savecopyfolder) savecopyfolder = g_strdup(p);
998 case Q_REPLY_MESSAGE_ID:
999 if (!replymessageid) replymessageid = g_strdup(p);
1001 case Q_FWD_MESSAGE_ID:
1002 if (!fwdmessageid) fwdmessageid = g_strdup(p);
1006 filepos = ftell(fp);
1009 debug_print("Sending message by mail\n");
1011 g_warning("Queued message header is broken.\n");
1013 } else if (mailac && mailac->use_mail_command &&
1014 mailac->mail_command && (* mailac->mail_command)) {
1015 mailval = send_message_local(mailac->mail_command, fp);
1017 } else if (prefs_common.use_extsend && prefs_common.extsend_cmd) {
1018 mailval = send_message_local(prefs_common.extsend_cmd, fp);
1022 mailac = account_find_from_smtp_server(from, smtpserver);
1024 g_warning("Account not found. "
1025 "Using current account...\n");
1026 mailac = cur_account;
1031 mailval = send_message_smtp(mailac, to_list, fp);
1033 PrefsAccount tmp_ac;
1035 g_warning("Account not found.\n");
1037 memset(&tmp_ac, 0, sizeof(PrefsAccount));
1038 tmp_ac.address = from;
1039 tmp_ac.smtp_server = smtpserver;
1040 tmp_ac.smtpport = SMTP_PORT;
1041 mailval = send_message_smtp(&tmp_ac, to_list, fp);
1046 alertpanel_error_log(
1047 _("Error occurred while sending the message to `%s'."),
1048 mailac ? mailac->smtp_server : smtpserver);
1050 alertpanel_error_log(
1051 _("Error occurred while sending the message with command `%s'."),
1052 (mailac && mailac->use_mail_command &&
1053 mailac->mail_command && (*mailac->mail_command)) ?
1054 mailac->mail_command : prefs_common.extsend_cmd);
1058 fseek(fp, filepos, SEEK_SET);
1059 if (newsgroup_list && (newsval == 0)) {
1064 /* write to temporary file */
1065 tmp = g_strdup_printf("%s%ctmp%d", g_get_tmp_dir(),
1066 G_DIR_SEPARATOR, (gint)file);
1067 if ((tmpfp = fopen(tmp, "wb")) == NULL) {
1068 FILE_OP_ERROR(tmp, "fopen");
1070 alertpanel_error(_("Could not create temporary file for news sending."));
1072 if (change_file_mode_rw(tmpfp, tmp) < 0) {
1073 FILE_OP_ERROR(tmp, "chmod");
1074 g_warning("can't change file mode\n");
1077 while ((newsval == 0) && fgets(buf, sizeof(buf), fp) != NULL) {
1078 if (fputs(buf, tmpfp) == EOF) {
1079 FILE_OP_ERROR(tmp, "fputs");
1081 alertpanel_error(_("Error when writing temporary file for news sending."));
1087 debug_print("Sending message by news\n");
1089 folder = FOLDER(newsac->folder);
1091 newsval = news_post(folder, tmp);
1093 alertpanel_error(_("Error occurred while posting the message to %s ."),
1094 newsac->nntp_server);
1102 slist_free_strings(to_list);
1103 g_slist_free(to_list);
1104 slist_free_strings(newsgroup_list);
1105 g_slist_free(newsgroup_list);
1110 /* save message to outbox */
1111 if (mailval == 0 && newsval == 0 && savecopyfolder) {
1114 debug_print("saving sent message...\n");
1116 outbox = folder_find_item_from_identifier(savecopyfolder);
1118 outbox = folder_get_default_outbox();
1120 procmsg_save_to_outbox(outbox, file, TRUE);
1123 if (replymessageid != NULL || fwdmessageid != NULL) {
1127 if (replymessageid != NULL)
1128 tokens = g_strsplit(replymessageid, "\x7f", 0);
1130 tokens = g_strsplit(fwdmessageid, "\x7f", 0);
1131 item = folder_find_item_from_identifier(tokens[0]);
1135 msginfo = folder_item_get_msginfo(item, atoi(tokens[1]));
1136 if ((msginfo != NULL) && (strcmp(msginfo->msgid, tokens[2]) != 0)) {
1137 procmsg_msginfo_free(msginfo);
1141 if (msginfo == NULL) {
1142 msginfo = folder_item_get_msginfo_by_msgid(item, tokens[2]);
1145 if (msginfo != NULL) {
1146 if (replymessageid != NULL) {
1147 procmsg_msginfo_unset_flags(msginfo, MSG_FORWARDED, 0);
1148 procmsg_msginfo_set_flags(msginfo, MSG_REPLIED, 0);
1151 procmsg_msginfo_unset_flags(msginfo, MSG_REPLIED, 0);
1152 procmsg_msginfo_set_flags(msginfo, MSG_FORWARDED, 0);
1154 procmsg_msginfo_free(msginfo);
1160 g_free(savecopyfolder);
1161 g_free(replymessageid);
1162 g_free(fwdmessageid);
1164 return (newsval != 0 ? newsval : mailval);
1167 static void update_folder_msg_counts(FolderItem *item, MsgInfo *msginfo, MsgPermFlags old_flags)
1169 MsgPermFlags new_flags = msginfo->flags.perm_flags;
1172 if (!(old_flags & MSG_NEW) && (new_flags & MSG_NEW)) {
1176 if ((old_flags & MSG_NEW) && !(new_flags & MSG_NEW)) {
1181 if (!(old_flags & MSG_UNREAD) && (new_flags & MSG_UNREAD)) {
1182 item->unread_msgs++;
1183 if (procmsg_msg_has_marked_parent(msginfo))
1184 item->unreadmarked_msgs++;
1187 if ((old_flags & MSG_UNREAD) && !(new_flags & MSG_UNREAD)) {
1188 item->unread_msgs--;
1189 if (procmsg_msg_has_marked_parent(msginfo))
1190 item->unreadmarked_msgs--;
1194 if (!(old_flags & MSG_MARKED) && (new_flags & MSG_MARKED)) {
1195 procmsg_update_unread_children(msginfo, TRUE);
1198 if ((old_flags & MSG_MARKED) && !(new_flags & MSG_MARKED)) {
1199 procmsg_update_unread_children(msginfo, FALSE);
1203 void procmsg_msginfo_set_flags(MsgInfo *msginfo, MsgPermFlags perm_flags, MsgTmpFlags tmp_flags)
1206 MsgInfoUpdate msginfo_update;
1207 MsgPermFlags perm_flags_new, perm_flags_old;
1209 g_return_if_fail(msginfo != NULL);
1210 item = msginfo->folder;
1211 g_return_if_fail(item != NULL);
1213 debug_print("Setting flags for message %d in folder %s\n", msginfo->msgnum, item->path);
1215 /* Perm Flags handling */
1216 perm_flags_old = msginfo->flags.perm_flags;
1217 perm_flags_new = msginfo->flags.perm_flags | perm_flags;
1218 if ((perm_flags & MSG_IGNORE_THREAD) || (perm_flags_old & MSG_IGNORE_THREAD)) {
1219 perm_flags_new &= ~(MSG_NEW | MSG_UNREAD);
1222 if (perm_flags_old != perm_flags_new) {
1223 folder_item_change_msg_flags(msginfo->folder, msginfo, perm_flags_new);
1225 update_folder_msg_counts(item, msginfo, perm_flags_old);
1227 msginfo_update.msginfo = msginfo;
1228 hooks_invoke(MSGINFO_UPDATE_HOOKLIST, &msginfo_update);
1229 folder_item_update(msginfo->folder, F_ITEM_UPDATE_MSGCNT);
1232 /* Tmp flags hanlding */
1233 msginfo->flags.tmp_flags |= tmp_flags;
1236 void procmsg_msginfo_unset_flags(MsgInfo *msginfo, MsgPermFlags perm_flags, MsgTmpFlags tmp_flags)
1239 MsgInfoUpdate msginfo_update;
1240 MsgPermFlags perm_flags_new, perm_flags_old;
1242 g_return_if_fail(msginfo != NULL);
1243 item = msginfo->folder;
1244 g_return_if_fail(item != NULL);
1246 debug_print("Unsetting flags for message %d in folder %s\n", msginfo->msgnum, item->path);
1248 /* Perm Flags handling */
1249 perm_flags_old = msginfo->flags.perm_flags;
1250 perm_flags_new = msginfo->flags.perm_flags & ~perm_flags;
1252 if (perm_flags_old != perm_flags_new) {
1253 folder_item_change_msg_flags(msginfo->folder, msginfo, perm_flags_new);
1255 update_folder_msg_counts(item, msginfo, perm_flags_old);
1257 msginfo_update.msginfo = msginfo;
1258 hooks_invoke(MSGINFO_UPDATE_HOOKLIST, &msginfo_update);
1259 folder_item_update(msginfo->folder, F_ITEM_UPDATE_MSGCNT);
1262 /* Tmp flags hanlding */
1263 msginfo->flags.tmp_flags &= ~tmp_flags;
1267 *\brief check for flags (e.g. mark) in prior msgs of current thread
1269 *\param info Current message
1270 *\param perm_flags Flags to be checked
1271 *\param parentmsgs Hash of prior msgs to avoid loops
1273 *\return gboolean TRUE if perm_flags are found
1275 gboolean procmsg_msg_has_flagged_parent_real(MsgInfo *info,
1276 MsgPermFlags perm_flags, GHashTable *parentmsgs)
1280 g_return_val_if_fail(info != NULL, FALSE);
1282 if (info != NULL && info->folder != NULL && info->inreplyto != NULL) {
1283 tmp = folder_item_get_msginfo_by_msgid(info->folder,
1285 if (tmp && (tmp->flags.perm_flags & perm_flags)) {
1286 procmsg_msginfo_free(tmp);
1288 } else if (tmp != NULL) {
1291 if (g_hash_table_lookup(parentmsgs, info)) {
1292 debug_print("loop detected: %s%c%d\n",
1293 folder_item_get_path(info->folder),
1294 G_DIR_SEPARATOR, info->msgnum);
1297 g_hash_table_insert(parentmsgs, info, "1");
1298 result = procmsg_msg_has_flagged_parent_real(
1299 tmp, perm_flags, parentmsgs);
1301 procmsg_msginfo_free(tmp);
1311 *\brief Callback for cleaning up hash of parentmsgs
1313 gboolean parentmsgs_hash_remove(gpointer key,
1321 *\brief Set up list of parentmsgs
1322 * See procmsg_msg_has_flagged_parent_real()
1324 gboolean procmsg_msg_has_flagged_parent(MsgInfo *info, MsgPermFlags perm_flags)
1327 GHashTable *parentmsgs = g_hash_table_new(NULL, NULL);
1329 result = procmsg_msg_has_flagged_parent_real(info, perm_flags, parentmsgs);
1330 g_hash_table_foreach_remove(parentmsgs, parentmsgs_hash_remove, NULL);
1331 g_hash_table_destroy(parentmsgs);
1336 *\brief Check if msgs prior in thread are marked
1337 * See procmsg_msg_has_flagged_parent_real()
1339 gboolean procmsg_msg_has_marked_parent(MsgInfo *info)
1341 return procmsg_msg_has_flagged_parent(info, MSG_MARKED);
1345 GSList *procmsg_find_children_func(MsgInfo *info,
1346 GSList *children, GSList *all)
1350 g_return_val_if_fail(info!=NULL, children);
1351 if (info->msgid == NULL)
1354 for (cur = all; cur != NULL; cur = g_slist_next(cur)) {
1355 MsgInfo *tmp = (MsgInfo *)cur->data;
1356 if (tmp->inreplyto && !strcmp(tmp->inreplyto, info->msgid)) {
1357 /* Check if message is already in the list */
1358 if ((children == NULL) ||
1359 (g_slist_index(children, tmp) == -1)) {
1360 children = g_slist_prepend(children,
1361 procmsg_msginfo_new_ref(tmp));
1362 children = procmsg_find_children_func(tmp,
1371 GSList *procmsg_find_children (MsgInfo *info)
1376 g_return_val_if_fail(info!=NULL, NULL);
1377 all = folder_item_get_msg_list(info->folder);
1378 children = procmsg_find_children_func(info, NULL, all);
1379 if (children != NULL) {
1380 for (cur = all; cur != NULL; cur = g_slist_next(cur)) {
1381 /* this will not free the used pointers
1382 created with procmsg_msginfo_new_ref */
1383 procmsg_msginfo_free((MsgInfo *)cur->data);
1391 void procmsg_update_unread_children(MsgInfo *info, gboolean newly_marked)
1393 GSList *children = procmsg_find_children(info);
1395 for (cur = children; cur != NULL; cur = g_slist_next(cur)) {
1396 MsgInfo *tmp = (MsgInfo *)cur->data;
1397 if(MSG_IS_UNREAD(tmp->flags) && !MSG_IS_IGNORE_THREAD(tmp->flags)) {
1399 info->folder->unreadmarked_msgs++;
1401 info->folder->unreadmarked_msgs--;
1402 folder_item_update(info->folder, F_ITEM_UPDATE_MSGCNT);
1404 procmsg_msginfo_free(tmp);
1406 g_slist_free(children);
1410 * Set the destination folder for a copy or move operation
1412 * \param msginfo The message which's destination folder is changed
1413 * \param to_folder The destination folder for the operation
1415 void procmsg_msginfo_set_to_folder(MsgInfo *msginfo, FolderItem *to_folder)
1417 if(msginfo->to_folder != NULL) {
1418 msginfo->to_folder->op_count--;
1419 folder_item_update(msginfo->to_folder, F_ITEM_UPDATE_MSGCNT);
1421 msginfo->to_folder = to_folder;
1422 if(to_folder != NULL) {
1423 to_folder->op_count++;
1424 folder_item_update(msginfo->to_folder, F_ITEM_UPDATE_MSGCNT);
1429 * Apply filtering actions to the msginfo
1431 * \param msginfo The MsgInfo describing the message that should be filtered
1432 * \return TRUE if the message was moved and MsgInfo is now invalid,
1435 gboolean procmsg_msginfo_filter(MsgInfo *msginfo)
1437 MailFilteringData mail_filtering_data;
1439 mail_filtering_data.msginfo = msginfo;
1440 if (hooks_invoke(MAIL_FILTERING_HOOKLIST, &mail_filtering_data))
1443 /* filter if enabled in prefs or move to inbox if not */
1444 if((global_processing != NULL) &&
1445 filter_message_by_msginfo(global_processing, msginfo))