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"
33 #include "statusbar.h"
35 #include "prefs_common.h"
40 #include "alertpanel.h"
45 typedef struct _FlagInfo FlagInfo;
53 static GHashTable *procmsg_read_mark_file (const gchar *folder);
54 void procmsg_msginfo_write_flags (MsgInfo *msginfo);
56 GHashTable *procmsg_msg_hash_table_create(GSList *mlist)
58 GHashTable *msg_table;
60 if (mlist == NULL) return NULL;
62 msg_table = g_hash_table_new(NULL, g_direct_equal);
63 procmsg_msg_hash_table_append(msg_table, mlist);
68 void procmsg_msg_hash_table_append(GHashTable *msg_table, GSList *mlist)
73 if (msg_table == NULL || mlist == NULL) return;
75 for (cur = mlist; cur != NULL; cur = cur->next) {
76 msginfo = (MsgInfo *)cur->data;
78 g_hash_table_insert(msg_table,
79 GUINT_TO_POINTER(msginfo->msgnum),
84 GHashTable *procmsg_to_folder_hash_table_create(GSList *mlist)
86 GHashTable *msg_table;
90 if (mlist == NULL) return NULL;
92 msg_table = g_hash_table_new(NULL, g_direct_equal);
94 for (cur = mlist; cur != NULL; cur = cur->next) {
95 msginfo = (MsgInfo *)cur->data;
96 g_hash_table_insert(msg_table, msginfo->to_folder, msginfo);
102 static gint procmsg_read_cache_data_str(FILE *fp, gchar **str)
108 if (fread(&len, sizeof(len), 1, fp) == 1) {
115 size_t size = MIN(len, BUFFSIZE - 1);
117 if (fread(buf, size, 1, fp) != 1) {
119 if (tmp) g_free(tmp);
126 *str = g_strconcat(tmp, buf, NULL);
130 tmp = *str = g_strdup(buf);
139 g_warning("Cache data is corrupted\n");
144 #define READ_CACHE_DATA(data, fp) \
146 if (procmsg_read_cache_data_str(fp, &data) < 0) { \
147 procmsg_msginfo_free(msginfo); \
152 #define READ_CACHE_DATA_INT(n, fp) \
154 if (fread(&n, sizeof(n), 1, fp) != 1) { \
155 g_warning("Cache data is corrupted\n"); \
156 procmsg_msginfo_free(msginfo); \
161 GSList *procmsg_read_cache(FolderItem *item, gboolean scan_file)
163 GSList *mlist = NULL;
168 MsgFlags default_flags;
169 gchar file_buf[BUFFSIZE];
174 g_return_val_if_fail(item != NULL, NULL);
175 g_return_val_if_fail(item->folder != NULL, NULL);
176 type = item->folder->type;
178 default_flags.perm_flags = MSG_NEW|MSG_UNREAD;
179 default_flags.tmp_flags = MSG_CACHED;
180 if (type == F_MH || type == F_IMAP) {
181 if (item->stype == F_QUEUE) {
182 MSG_SET_TMP_FLAGS(default_flags, MSG_QUEUED);
183 } else if (item->stype == F_DRAFT) {
184 MSG_SET_TMP_FLAGS(default_flags, MSG_DRAFT);
187 if (type == F_IMAP) {
188 MSG_SET_TMP_FLAGS(default_flags, MSG_IMAP);
189 } else if (type == F_NEWS) {
190 MSG_SET_TMP_FLAGS(default_flags, MSG_NEWS);
196 path = folder_item_get_path(item);
197 if (change_dir(path) < 0) {
203 cache_file = folder_item_get_cache_file(item);
204 if ((fp = fopen(cache_file, "rb")) == NULL) {
205 debug_print("\tNo cache file\n");
209 setvbuf(fp, file_buf, _IOFBF, sizeof(file_buf));
212 debug_print("\tReading summary cache...\n");
214 /* compare cache version */
215 if (fread(&ver, sizeof(ver), 1, fp) != 1 ||
216 CACHE_VERSION != ver) {
217 debug_print("Cache version is different. Discarding it.\n");
222 while (fread(&num, sizeof(num), 1, fp) == 1) {
223 msginfo = procmsg_msginfo_new();
224 msginfo->msgnum = num;
225 READ_CACHE_DATA_INT(msginfo->size, fp);
226 READ_CACHE_DATA_INT(msginfo->mtime, fp);
227 READ_CACHE_DATA_INT(msginfo->date_t, fp);
228 READ_CACHE_DATA_INT(msginfo->flags.tmp_flags, fp);
230 READ_CACHE_DATA(msginfo->fromname, fp);
232 READ_CACHE_DATA(msginfo->date, fp);
233 READ_CACHE_DATA(msginfo->from, fp);
234 READ_CACHE_DATA(msginfo->to, fp);
235 READ_CACHE_DATA(msginfo->cc, fp);
236 READ_CACHE_DATA(msginfo->newsgroups, fp);
237 READ_CACHE_DATA(msginfo->subject, fp);
238 READ_CACHE_DATA(msginfo->msgid, fp);
239 READ_CACHE_DATA(msginfo->inreplyto, fp);
240 READ_CACHE_DATA(msginfo->references, fp);
241 READ_CACHE_DATA(msginfo->xref, fp);
244 MSG_SET_PERM_FLAGS(msginfo->flags, default_flags.perm_flags);
245 MSG_SET_TMP_FLAGS(msginfo->flags, default_flags.tmp_flags);
247 /* if the message file doesn't exist or is changed,
248 don't add the data */
249 if (type == F_MH && scan_file &&
250 folder_item_is_msg_changed(item, msginfo))
251 procmsg_msginfo_free(msginfo);
253 msginfo->folder = item;
256 last = mlist = g_slist_append(NULL, msginfo);
258 last = g_slist_append(last, msginfo);
265 debug_print("done.\n");
270 #undef READ_CACHE_DATA
271 #undef READ_CACHE_DATA_INT
273 void procmsg_set_flags(GSList *mlist, FolderItem *item)
280 GHashTable *mark_table;
284 g_return_if_fail(item != NULL);
285 g_return_if_fail(item->folder != NULL);
287 debug_print("\tMarking the messages...\n");
289 markdir = folder_item_get_path(item);
290 if (!is_dir_exist(markdir))
291 make_dir_hier(markdir);
293 mark_table = procmsg_read_mark_file(markdir);
296 if (!mark_table) return;
298 for (cur = mlist; cur != NULL; cur = cur->next) {
299 msginfo = (MsgInfo *)cur->data;
301 if (lastnum < msginfo->msgnum)
302 lastnum = msginfo->msgnum;
304 flags = g_hash_table_lookup
305 (mark_table, GUINT_TO_POINTER(msginfo->msgnum));
308 /* add the permanent flags only */
309 msginfo->flags.perm_flags = flags->perm_flags;
310 if (item->folder->type == F_IMAP) {
311 MSG_SET_TMP_FLAGS(msginfo->flags, MSG_IMAP);
312 } else if (item->folder->type == F_NEWS) {
313 MSG_SET_TMP_FLAGS(msginfo->flags, MSG_NEWS);
316 /* not found (new message) */
318 for (tmp = mlist; tmp != cur; tmp = tmp->next)
320 (((MsgInfo *)tmp->data)->flags,
327 item->last_num = lastnum;
329 debug_print("done.\n");
331 debug_print("\t%d new message(s)\n", newmsg);
333 hash_free_value_mem(mark_table);
334 g_hash_table_destroy(mark_table);
337 gint procmsg_get_last_num_in_msg_list(GSList *mlist)
343 for (cur = mlist; cur != NULL; cur = cur->next) {
344 msginfo = (MsgInfo *)cur->data;
345 if (msginfo && msginfo->msgnum > last)
346 last = msginfo->msgnum;
352 void procmsg_msg_list_free(GSList *mlist)
357 for (cur = mlist; cur != NULL; cur = cur->next) {
358 msginfo = (MsgInfo *)cur->data;
359 procmsg_msginfo_free(msginfo);
364 void procmsg_write_cache(MsgInfo *msginfo, FILE *fp)
366 MsgTmpFlags flags = msginfo->flags.tmp_flags & MSG_CACHED_FLAG_MASK;
368 WRITE_CACHE_DATA_INT(msginfo->msgnum, fp);
369 WRITE_CACHE_DATA_INT(msginfo->size, fp);
370 WRITE_CACHE_DATA_INT(msginfo->mtime, fp);
371 WRITE_CACHE_DATA_INT(msginfo->date_t, fp);
372 WRITE_CACHE_DATA_INT(flags, fp);
374 WRITE_CACHE_DATA(msginfo->fromname, fp);
376 WRITE_CACHE_DATA(msginfo->date, fp);
377 WRITE_CACHE_DATA(msginfo->from, fp);
378 WRITE_CACHE_DATA(msginfo->to, fp);
379 WRITE_CACHE_DATA(msginfo->cc, fp);
380 WRITE_CACHE_DATA(msginfo->newsgroups, fp);
381 WRITE_CACHE_DATA(msginfo->subject, fp);
382 WRITE_CACHE_DATA(msginfo->msgid, fp);
383 WRITE_CACHE_DATA(msginfo->inreplyto, fp);
384 WRITE_CACHE_DATA(msginfo->references, fp);
385 WRITE_CACHE_DATA(msginfo->xref, fp);
389 void procmsg_write_flags(MsgInfo *msginfo, FILE *fp)
391 MsgPermFlags flags = msginfo->flags.perm_flags;
393 WRITE_CACHE_DATA_INT(msginfo->msgnum, fp);
394 WRITE_CACHE_DATA_INT(flags, fp);
397 void procmsg_flush_mark_queue(FolderItem *item, FILE *fp)
401 g_return_if_fail(item != NULL);
402 g_return_if_fail(fp != NULL);
404 while (item->mark_queue != NULL) {
405 flaginfo = (MsgInfo *)item->mark_queue->data;
406 procmsg_write_flags(flaginfo, fp);
407 procmsg_msginfo_free(flaginfo);
408 item->mark_queue = g_slist_remove(item->mark_queue, flaginfo);
412 void procmsg_add_flags(FolderItem *item, gint num, MsgFlags flags)
418 g_return_if_fail(item != NULL);
421 MsgInfo *queue_msginfo;
423 queue_msginfo = g_new0(MsgInfo, 1);
424 queue_msginfo->msgnum = num;
425 queue_msginfo->flags = flags;
426 item->mark_queue = g_slist_append
427 (item->mark_queue, queue_msginfo);
431 path = folder_item_get_path(item);
432 g_return_if_fail(path != NULL);
434 if ((fp = procmsg_open_mark_file(path, TRUE)) == NULL) {
435 g_warning("can't open mark file\n");
441 msginfo.msgnum = num;
442 msginfo.flags = flags;
444 procmsg_write_flags(&msginfo, fp);
457 static GHashTable *procmsg_read_mark_file(const gchar *folder)
460 GHashTable *mark_table = NULL;
463 MsgPermFlags perm_flags;
465 if ((fp = procmsg_open_mark_file(folder, FALSE)) == NULL)
468 mark_table = g_hash_table_new(NULL, g_direct_equal);
470 while (fread(&num, sizeof(num), 1, fp) == 1) {
471 if (fread(&perm_flags, sizeof(perm_flags), 1, fp) != 1) break;
473 flags = g_hash_table_lookup(mark_table, GUINT_TO_POINTER(num));
477 flags = g_new0(MsgFlags, 1);
478 flags->perm_flags = perm_flags;
480 if (!MSG_IS_REALLY_DELETED(*flags)) {
481 g_hash_table_insert(mark_table, GUINT_TO_POINTER(num), flags);
483 g_hash_table_remove(mark_table, GUINT_TO_POINTER(num));
491 FILE *procmsg_open_mark_file(const gchar *folder, gboolean append)
497 markfile = g_strconcat(folder, G_DIR_SEPARATOR_S, MARK_FILE, NULL);
499 if ((fp = fopen(markfile, "rb")) == NULL)
500 debug_print("Mark file not found.\n");
501 else if (fread(&ver, sizeof(ver), 1, fp) != 1 || MARK_VERSION != ver) {
502 debug_print("Mark version is different (%d != %d). "
503 "Discarding it.\n", ver, MARK_VERSION);
509 if (append == FALSE) {
515 /* reopen with append mode */
517 if ((fp = fopen(markfile, "ab")) == NULL)
518 g_warning("Can't open mark file with append mode.\n");
520 /* open with overwrite mode if mark file doesn't exist or
521 version is different */
522 if ((fp = fopen(markfile, "wb")) == NULL)
523 g_warning("Can't open mark file with write mode.\n");
526 WRITE_CACHE_DATA_INT(ver, fp);
534 static gboolean procmsg_ignore_node(GNode *node, gpointer data)
536 MsgInfo *msginfo = (MsgInfo *)node->data;
538 procmsg_msginfo_set_flags(msginfo, MSG_IGNORE_THREAD, 0);
543 /* return the reversed thread tree */
544 GNode *procmsg_get_thread_tree(GSList *mlist)
546 GNode *root, *parent, *node, *next;
547 GHashTable *msgid_table;
548 GHashTable *subject_table;
551 const gchar *subject;
552 GNode *found_subject;
554 root = g_node_new(NULL);
555 msgid_table = g_hash_table_new(g_str_hash, g_str_equal);
556 subject_table = g_hash_table_new(g_str_hash, g_str_equal);
558 for (; mlist != NULL; mlist = mlist->next) {
559 msginfo = (MsgInfo *)mlist->data;
562 if (msginfo->inreplyto) {
563 parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
564 if (parent == NULL) {
567 if (MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
568 procmsg_msginfo_set_flags(msginfo, MSG_IGNORE_THREAD, 0);
572 node = g_node_insert_data_before
573 (parent, parent == root ? parent->children : NULL,
575 if ((msgid = msginfo->msgid) &&
576 g_hash_table_lookup(msgid_table, msgid) == NULL)
577 g_hash_table_insert(msgid_table, (gchar *)msgid, node);
579 if (prefs_common.thread_by_subject) {
580 subject = msginfo->subject;
581 found_subject = subject_table_lookup(subject_table,
583 if (found_subject == NULL)
584 subject_table_insert(subject_table, (gchar *) subject,
587 /* replace if msg in table is older than current one
588 * can add here more stuff. */
589 if ( ((MsgInfo*)(found_subject->data))->date_t >
590 ((MsgInfo*)(node->data))->date_t ) {
591 subject_table_remove(subject_table, (gchar *) subject);
592 subject_table_insert(subject_table, (gchar *) subject, node);
598 /* complete the unfinished threads */
599 for (node = root->children; node != NULL; ) {
601 msginfo = (MsgInfo *)node->data;
603 if (msginfo->inreplyto)
604 parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
605 if (parent && parent != node) {
608 (parent, parent->children, node);
609 /* CLAWS: ignore thread */
610 if (MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
611 g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, -1, procmsg_ignore_node, NULL);
617 /* CLAWS: now see if the first level (below root) still has some nodes that can be
618 * threaded by subject line. we need to handle this in a special way to prevent
619 * circular reference from a node that has already been threaded by IN-REPLY-TO
620 * but is also in the subject line hash table */
621 if (prefs_common.thread_by_subject) {
622 for (node = root->children; node != NULL; ) {
624 msginfo = (MsgInfo *) node->data;
626 if (subject_is_reply(msginfo->subject)) {
627 parent = subject_table_lookup(subject_table,
629 /* the node may already be threaded by IN-REPLY-TO,
630 so go up in the tree to find the parent node */
631 if (parent != NULL) {
632 if (g_node_is_ancestor(node, parent))
640 g_node_append(parent, node);
641 /* CLAWS: ignore thread */
642 if (MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
643 g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, -1, procmsg_ignore_node, NULL);
651 g_hash_table_destroy(subject_table);
652 g_hash_table_destroy(msgid_table);
657 void procmsg_move_messages(GSList *mlist)
659 GSList *cur, *movelist = NULL;
661 FolderItem *dest = NULL;
665 folder_item_update_freeze();
667 for (cur = mlist; cur != NULL; cur = cur->next) {
668 msginfo = (MsgInfo *)cur->data;
670 dest = msginfo->to_folder;
671 movelist = g_slist_append(movelist, msginfo);
672 } else if (dest == msginfo->to_folder) {
673 movelist = g_slist_append(movelist, msginfo);
675 folder_item_move_msgs_with_dest(dest, movelist);
676 g_slist_free(movelist);
678 dest = msginfo->to_folder;
679 movelist = g_slist_append(movelist, msginfo);
681 procmsg_msginfo_set_to_folder(msginfo, NULL);
685 folder_item_move_msgs_with_dest(dest, movelist);
686 g_slist_free(movelist);
689 folder_item_update_thaw();
692 void procmsg_copy_messages(GSList *mlist)
694 GSList *cur, *copylist = NULL;
696 FolderItem *dest = NULL;
700 folder_item_update_freeze();
702 for (cur = mlist; cur != NULL; cur = cur->next) {
703 msginfo = (MsgInfo *)cur->data;
705 dest = msginfo->to_folder;
706 copylist = g_slist_append(copylist, msginfo);
707 } else if (dest == msginfo->to_folder) {
708 copylist = g_slist_append(copylist, msginfo);
710 folder_item_copy_msgs_with_dest(dest, copylist);
711 g_slist_free(copylist);
713 dest = msginfo->to_folder;
714 copylist = g_slist_append(copylist, msginfo);
716 procmsg_msginfo_set_to_folder(msginfo, NULL);
720 folder_item_copy_msgs_with_dest(dest, copylist);
721 g_slist_free(copylist);
724 folder_item_update_thaw();
727 gchar *procmsg_get_message_file_path(MsgInfo *msginfo)
731 g_return_val_if_fail(msginfo != NULL, NULL);
733 if (msginfo->plaintext_file)
734 file = g_strdup(msginfo->plaintext_file);
736 path = folder_item_get_path(msginfo->folder);
737 file = g_strconcat(path, G_DIR_SEPARATOR_S,
738 itos(msginfo->msgnum), NULL);
745 gchar *procmsg_get_message_file(MsgInfo *msginfo)
747 gchar *filename = NULL;
749 g_return_val_if_fail(msginfo != NULL, NULL);
751 filename = folder_item_fetch_msg(msginfo->folder, msginfo->msgnum);
753 g_warning("can't fetch message %d\n", msginfo->msgnum);
758 FILE *procmsg_open_message(MsgInfo *msginfo)
763 g_return_val_if_fail(msginfo != NULL, NULL);
765 file = procmsg_get_message_file_path(msginfo);
766 g_return_val_if_fail(file != NULL, NULL);
768 if (!is_file_exist(file)) {
770 file = procmsg_get_message_file(msginfo);
771 g_return_val_if_fail(file != NULL, NULL);
774 if ((fp = fopen(file, "rb")) == NULL) {
775 FILE_OP_ERROR(file, "fopen");
782 if (MSG_IS_QUEUED(msginfo->flags) || MSG_IS_DRAFT(msginfo->flags)) {
785 while (fgets(buf, sizeof(buf), fp) != NULL)
786 if (buf[0] == '\r' || buf[0] == '\n') break;
793 FILE *procmsg_open_message_decrypted(MsgInfo *msginfo, MimeInfo **mimeinfo)
798 g_return_val_if_fail(msginfo != NULL, NULL);
800 if (mimeinfo) *mimeinfo = NULL;
802 if ((fp = procmsg_open_message(msginfo)) == NULL) return NULL;
804 mimeinfo_ = procmime_scan_mime_header(fp);
810 if (!MSG_IS_ENCRYPTED(msginfo->flags) &&
811 rfc2015_is_encrypted(mimeinfo_)) {
812 MSG_SET_TMP_FLAGS(msginfo->flags, MSG_ENCRYPTED);
815 if (MSG_IS_ENCRYPTED(msginfo->flags) &&
816 (!msginfo->plaintext_file || msginfo->decryption_failed)) {
817 rfc2015_decrypt_message(msginfo, mimeinfo_, fp);
818 if (msginfo->plaintext_file &&
819 !msginfo->decryption_failed) {
821 procmime_mimeinfo_free_all(mimeinfo_);
822 if ((fp = procmsg_open_message(msginfo)) == NULL)
824 mimeinfo_ = procmime_scan_mime_header(fp);
832 if (mimeinfo) *mimeinfo = mimeinfo_;
837 gboolean procmsg_msg_exist(MsgInfo *msginfo)
842 if (!msginfo) return FALSE;
844 path = folder_item_get_path(msginfo->folder);
846 ret = !folder_item_is_msg_changed(msginfo->folder, msginfo);
852 void procmsg_empty_trash(void)
857 for (cur = folder_get_list(); cur != NULL; cur = cur->next) {
858 trash = FOLDER(cur->data)->trash;
859 if (trash && trash->total > 0)
860 folder_item_remove_all_msg(trash);
864 gint procmsg_send_queue(FolderItem *queue, gboolean save_msgs)
870 queue = folder_get_default_queue();
871 g_return_val_if_fail(queue != NULL, -1);
873 folder_item_scan(queue);
874 list = folder_item_get_msg_list(queue);
877 for (elem = list; elem != NULL; elem = elem->next) {
881 msginfo = (MsgInfo *)(elem->data);
883 file = folder_item_fetch_msg(queue, msginfo->msgnum);
885 if (procmsg_send_message_queue(file) < 0) {
886 g_warning("Sending queued message %d failed.\n", msginfo->msgnum);
890 * We save in procmsg_send_message_queue because
891 * we need the destination folder from the queue
895 procmsg_save_to_outbox
896 (queue->folder->outbox,
899 folder_item_remove_msg(queue, msginfo->msgnum);
903 procmsg_msginfo_free(msginfo);
909 gint procmsg_remove_special_headers(const gchar *in, const gchar *out)
914 if ((fp = fopen(in, "rb")) == NULL) {
915 FILE_OP_ERROR(in, "fopen");
918 if ((outfp = fopen(out, "wb")) == NULL) {
919 FILE_OP_ERROR(out, "fopen");
923 while (fgets(buf, sizeof(buf), fp) != NULL)
924 if (buf[0] == '\r' || buf[0] == '\n') break;
925 while (fgets(buf, sizeof(buf), fp) != NULL)
932 gint procmsg_save_to_outbox(FolderItem *outbox, const gchar *file,
938 debug_print("saving sent message...\n");
941 outbox = folder_get_default_outbox();
942 g_return_val_if_fail(outbox != NULL, -1);
944 /* remove queueing headers */
946 gchar tmp[MAXPATHLEN + 1];
948 g_snprintf(tmp, sizeof(tmp), "%s%ctmpmsg.out.%08x",
949 get_rc_dir(), G_DIR_SEPARATOR, (guint)random());
951 if (procmsg_remove_special_headers(file, tmp) !=0)
954 folder_item_scan(outbox);
955 if ((num = folder_item_add_msg(outbox, tmp, TRUE)) < 0) {
956 g_warning("can't save message\n");
961 folder_item_scan(outbox);
962 if ((num = folder_item_add_msg(outbox, file, FALSE)) < 0) {
963 g_warning("can't save message\n");
968 msginfo = folder_item_get_msginfo(outbox, num);
969 if (msginfo != NULL) {
970 procmsg_msginfo_unset_flags(msginfo, ~0, 0);
971 procmsg_msginfo_free(msginfo);
973 folder_item_update(outbox, TRUE);
978 void procmsg_print_message(MsgInfo *msginfo, const gchar *cmdline)
980 static const gchar *def_cmd = "lpr %s";
987 g_return_if_fail(msginfo);
989 if ((tmpfp = procmime_get_first_text_content(msginfo)) == NULL) {
990 g_warning("Can't get text part\n");
994 prtmp = g_strdup_printf("%s%cprinttmp.%08x",
995 get_mime_tmp_dir(), G_DIR_SEPARATOR, id++);
997 if ((prfp = fopen(prtmp, "wb")) == NULL) {
998 FILE_OP_ERROR(prtmp, "fopen");
1004 if (msginfo->date) fprintf(prfp, "Date: %s\n", msginfo->date);
1005 if (msginfo->from) fprintf(prfp, "From: %s\n", msginfo->from);
1006 if (msginfo->to) fprintf(prfp, "To: %s\n", msginfo->to);
1007 if (msginfo->cc) fprintf(prfp, "Cc: %s\n", msginfo->cc);
1008 if (msginfo->newsgroups)
1009 fprintf(prfp, "Newsgroups: %s\n", msginfo->newsgroups);
1010 if (msginfo->subject) fprintf(prfp, "Subject: %s\n", msginfo->subject);
1013 while (fgets(buf, sizeof(buf), tmpfp) != NULL)
1019 if (cmdline && (p = strchr(cmdline, '%')) && *(p + 1) == 's' &&
1020 !strchr(p + 2, '%'))
1021 g_snprintf(buf, sizeof(buf) - 1, cmdline, prtmp);
1024 g_warning("Print command line is invalid: `%s'\n",
1026 g_snprintf(buf, sizeof(buf) - 1, def_cmd, prtmp);
1032 if (buf[strlen(buf) - 1] != '&') strcat(buf, "&");
1036 MsgInfo *procmsg_msginfo_new_ref(MsgInfo *msginfo)
1043 MsgInfo *procmsg_msginfo_new()
1045 MsgInfo *newmsginfo;
1047 newmsginfo = g_new0(MsgInfo, 1);
1048 newmsginfo->refcnt = 1;
1053 MsgInfo *procmsg_msginfo_copy(MsgInfo *msginfo)
1055 MsgInfo *newmsginfo;
1057 if (msginfo == NULL) return NULL;
1059 newmsginfo = g_new0(MsgInfo, 1);
1061 newmsginfo->refcnt = 1;
1063 #define MEMBCOPY(mmb) newmsginfo->mmb = msginfo->mmb
1064 #define MEMBDUP(mmb) newmsginfo->mmb = msginfo->mmb ? \
1065 g_strdup(msginfo->mmb) : NULL
1079 MEMBDUP(newsgroups);
1086 MEMBCOPY(to_folder);
1089 MEMBDUP(dispositionnotificationto);
1090 MEMBDUP(returnreceiptto);
1091 MEMBDUP(references);
1094 MEMBCOPY(threadscore);
1099 MsgInfo *procmsg_msginfo_get_full_info(MsgInfo *msginfo)
1101 MsgInfo *full_msginfo;
1104 if (msginfo == NULL) return NULL;
1106 file = procmsg_get_message_file(msginfo);
1108 g_warning("procmsg_msginfo_get_full_info(): can't get message file.\n");
1112 full_msginfo = procheader_parse_file(file, msginfo->flags, TRUE, FALSE);
1114 if (!full_msginfo) return NULL;
1116 full_msginfo->msgnum = msginfo->msgnum;
1117 full_msginfo->size = msginfo->size;
1118 full_msginfo->mtime = msginfo->mtime;
1119 full_msginfo->folder = msginfo->folder;
1121 full_msginfo->plaintext_file = g_strdup(msginfo->plaintext_file);
1122 full_msginfo->decryption_failed = msginfo->decryption_failed;
1124 procmsg_msginfo_set_to_folder(full_msginfo, msginfo->to_folder);
1126 return full_msginfo;
1129 void procmsg_msginfo_free(MsgInfo *msginfo)
1131 if (msginfo == NULL) return;
1134 if (msginfo->refcnt > 0)
1137 debug_print("freeing msginfo %d is %s\n", msginfo->msgnum, msginfo->folder ? msginfo->folder->path : "(nil)");
1139 if (msginfo->to_folder) {
1140 msginfo->to_folder->op_count--;
1141 folder_item_update(msginfo->to_folder, F_ITEM_UPDATE_MSGCNT);
1144 g_free(msginfo->fromspace);
1145 g_free(msginfo->references);
1146 g_free(msginfo->returnreceiptto);
1147 g_free(msginfo->dispositionnotificationto);
1148 g_free(msginfo->xface);
1150 g_free(msginfo->fromname);
1152 g_free(msginfo->date);
1153 g_free(msginfo->from);
1154 g_free(msginfo->to);
1155 g_free(msginfo->cc);
1156 g_free(msginfo->newsgroups);
1157 g_free(msginfo->subject);
1158 g_free(msginfo->msgid);
1159 g_free(msginfo->inreplyto);
1160 g_free(msginfo->xref);
1165 guint procmsg_msginfo_memusage(MsgInfo *msginfo)
1169 memusage += sizeof(MsgInfo);
1170 if (msginfo->fromname)
1171 memusage += strlen(msginfo->fromname);
1173 memusage += strlen(msginfo->date);
1175 memusage += strlen(msginfo->from);
1177 memusage += strlen(msginfo->to);
1179 memusage += strlen(msginfo->cc);
1180 if (msginfo->newsgroups)
1181 memusage += strlen(msginfo->newsgroups);
1182 if (msginfo->subject)
1183 memusage += strlen(msginfo->subject);
1185 memusage += strlen(msginfo->msgid);
1186 if (msginfo->inreplyto)
1187 memusage += strlen(msginfo->inreplyto);
1189 memusage += strlen(msginfo->xface);
1190 if (msginfo->dispositionnotificationto)
1191 memusage += strlen(msginfo->dispositionnotificationto);
1192 if (msginfo->returnreceiptto)
1193 memusage += strlen(msginfo->returnreceiptto);
1194 if (msginfo->references)
1195 memusage += strlen(msginfo->references);
1196 if (msginfo->fromspace)
1197 memusage += strlen(msginfo->fromspace);
1202 gint procmsg_cmp_msgnum_for_sort(gconstpointer a, gconstpointer b)
1204 const MsgInfo *msginfo1 = a;
1205 const MsgInfo *msginfo2 = b;
1212 return msginfo1->msgnum - msginfo2->msgnum;
1221 Q_MAIL_ACCOUNT_ID = 4,
1222 Q_NEWS_ACCOUNT_ID = 5,
1223 Q_SAVE_COPY_FOLDER = 6,
1224 Q_REPLY_MESSAGE_ID = 7,
1225 Q_FWD_MESSAGE_ID = 8
1228 gint procmsg_send_message_queue(const gchar *file)
1230 static HeaderEntry qentry[] = {{"S:", NULL, FALSE},
1231 {"SSV:", NULL, FALSE},
1232 {"R:", NULL, FALSE},
1233 {"NG:", NULL, FALSE},
1234 {"MAID:", NULL, FALSE},
1235 {"NAID:", NULL, FALSE},
1236 {"SCF:", NULL, FALSE},
1237 {"RMID:", NULL, FALSE},
1238 {"FMID:", NULL, FALSE},
1239 {NULL, NULL, FALSE}};
1242 gint mailval = 0, newsval = 0;
1244 gchar *smtpserver = NULL;
1245 GSList *to_list = NULL;
1246 GSList *newsgroup_list = NULL;
1247 gchar *savecopyfolder = NULL;
1248 gchar *replymessageid = NULL;
1249 gchar *fwdmessageid = NULL;
1250 gchar buf[BUFFSIZE];
1252 PrefsAccount *mailac = NULL, *newsac = NULL;
1255 g_return_val_if_fail(file != NULL, -1);
1257 if ((fp = fopen(file, "rb")) == NULL) {
1258 FILE_OP_ERROR(file, "fopen");
1262 while ((hnum = procheader_get_one_field(buf, sizeof(buf), fp, qentry))
1264 gchar *p = buf + strlen(qentry[hnum].name);
1268 if (!from) from = g_strdup(p);
1271 if (!smtpserver) smtpserver = g_strdup(p);
1274 to_list = address_list_append(to_list, p);
1277 newsgroup_list = newsgroup_list_append(newsgroup_list, p);
1279 case Q_MAIL_ACCOUNT_ID:
1280 mailac = account_find_from_id(atoi(p));
1282 case Q_NEWS_ACCOUNT_ID:
1283 newsac = account_find_from_id(atoi(p));
1285 case Q_SAVE_COPY_FOLDER:
1286 if (!savecopyfolder) savecopyfolder = g_strdup(p);
1288 case Q_REPLY_MESSAGE_ID:
1289 if (!replymessageid) replymessageid = g_strdup(p);
1291 case Q_FWD_MESSAGE_ID:
1292 if (!fwdmessageid) fwdmessageid = g_strdup(p);
1296 filepos = ftell(fp);
1299 debug_print("Sending message by mail\n");
1301 g_warning("Queued message header is broken.\n");
1303 } else if (mailac && mailac->use_mail_command &&
1304 mailac->mail_command && (* mailac->mail_command)) {
1305 mailval = send_message_local(mailac->mail_command, fp);
1307 } else if (prefs_common.use_extsend && prefs_common.extsend_cmd) {
1308 mailval = send_message_local(prefs_common.extsend_cmd, fp);
1312 mailac = account_find_from_smtp_server(from, smtpserver);
1314 g_warning("Account not found. "
1315 "Using current account...\n");
1316 mailac = cur_account;
1321 mailval = send_message_smtp(mailac, to_list, fp);
1323 PrefsAccount tmp_ac;
1325 g_warning("Account not found.\n");
1327 memset(&tmp_ac, 0, sizeof(PrefsAccount));
1328 tmp_ac.address = from;
1329 tmp_ac.smtp_server = smtpserver;
1330 tmp_ac.smtpport = SMTP_PORT;
1331 mailval = send_message_smtp(&tmp_ac, to_list, fp);
1336 alertpanel_error_log(
1337 _("Error occurred while sending the message to `%s'."),
1338 mailac ? mailac->smtp_server : smtpserver);
1340 alertpanel_error_log(
1341 _("Error occurred while sending the message with command `%s'."),
1342 (mailac && mailac->use_mail_command &&
1343 mailac->mail_command && (*mailac->mail_command)) ?
1344 mailac->mail_command : prefs_common.extsend_cmd);
1348 fseek(fp, filepos, SEEK_SET);
1349 if (newsgroup_list && (newsval == 0)) {
1354 /* write to temporary file */
1355 tmp = g_strdup_printf("%s%ctmp%d", g_get_tmp_dir(),
1356 G_DIR_SEPARATOR, (gint)file);
1357 if ((tmpfp = fopen(tmp, "wb")) == NULL) {
1358 FILE_OP_ERROR(tmp, "fopen");
1360 alertpanel_error(_("Could not create temporary file for news sending."));
1362 if (change_file_mode_rw(tmpfp, tmp) < 0) {
1363 FILE_OP_ERROR(tmp, "chmod");
1364 g_warning("can't change file mode\n");
1367 while ((newsval == 0) && fgets(buf, sizeof(buf), fp) != NULL) {
1368 if (fputs(buf, tmpfp) == EOF) {
1369 FILE_OP_ERROR(tmp, "fputs");
1371 alertpanel_error(_("Error when writing temporary file for news sending."));
1377 debug_print("Sending message by news\n");
1379 folder = FOLDER(newsac->folder);
1381 newsval = news_post(folder, tmp);
1383 alertpanel_error(_("Error occurred while posting the message to %s ."),
1384 newsac->nntp_server);
1392 slist_free_strings(to_list);
1393 g_slist_free(to_list);
1394 slist_free_strings(newsgroup_list);
1395 g_slist_free(newsgroup_list);
1400 /* save message to outbox */
1401 if (mailval == 0 && newsval == 0 && savecopyfolder) {
1404 debug_print("saving sent message...\n");
1406 outbox = folder_find_item_from_identifier(savecopyfolder);
1408 outbox = folder_get_default_outbox();
1410 procmsg_save_to_outbox(outbox, file, TRUE);
1413 if (replymessageid != NULL || fwdmessageid != NULL) {
1417 if (replymessageid != NULL)
1418 tokens = g_strsplit(replymessageid, "\x7f", 0);
1420 tokens = g_strsplit(fwdmessageid, "\x7f", 0);
1421 item = folder_find_item_from_identifier(tokens[0]);
1425 msginfo = folder_item_get_msginfo(item, atoi(tokens[1]));
1426 if ((msginfo != NULL) && (strcmp(msginfo->msgid, tokens[2]) != 0)) {
1427 procmsg_msginfo_free(msginfo);
1431 if (msginfo == NULL) {
1432 msginfo = folder_item_get_msginfo_by_msgid(item, tokens[2]);
1435 if (msginfo != NULL) {
1436 if (replymessageid != NULL) {
1437 procmsg_msginfo_unset_flags(msginfo, MSG_FORWARDED, 0);
1438 procmsg_msginfo_set_flags(msginfo, MSG_REPLIED, 0);
1441 procmsg_msginfo_unset_flags(msginfo, MSG_REPLIED, 0);
1442 procmsg_msginfo_set_flags(msginfo, MSG_FORWARDED, 0);
1444 procmsg_msginfo_free(msginfo);
1450 g_free(savecopyfolder);
1451 g_free(replymessageid);
1452 g_free(fwdmessageid);
1454 return (newsval != 0 ? newsval : mailval);
1457 #define CHANGE_FLAGS(msginfo) \
1459 if (msginfo->folder->folder->change_flags != NULL) \
1460 msginfo->folder->folder->change_flags(msginfo->folder->folder, \
1465 void procmsg_msginfo_set_flags(MsgInfo *msginfo, MsgPermFlags perm_flags, MsgTmpFlags tmp_flags)
1468 MsgInfoUpdate msginfo_update;
1470 g_return_if_fail(msginfo != NULL);
1471 item = msginfo->folder;
1472 g_return_if_fail(item != NULL);
1474 debug_print("Setting flags for message %d in folder %s\n", msginfo->msgnum, item->path);
1476 /* if new flag is set */
1477 if ((perm_flags & MSG_NEW) && !MSG_IS_NEW(msginfo->flags) &&
1478 !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
1482 /* if unread flag is set */
1483 if ((perm_flags & MSG_UNREAD) && !MSG_IS_UNREAD(msginfo->flags) &&
1484 !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
1488 if (!MSG_IS_UNREAD(msginfo->flags) &&(perm_flags & MSG_UNREAD)
1489 && procmsg_msg_has_marked_parent(msginfo)) {
1490 item->unreadmarked++;
1493 if (!MSG_IS_MARKED(msginfo->flags) && (perm_flags & MSG_MARKED)) {
1494 procmsg_update_unread_children(msginfo, TRUE);
1498 /* if ignore thread flag is set */
1499 if ((perm_flags & MSG_IGNORE_THREAD) && !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
1500 if (MSG_IS_NEW(msginfo->flags) || (perm_flags & MSG_NEW)) {
1503 if (MSG_IS_UNREAD(msginfo->flags) || (perm_flags & MSG_UNREAD)) {
1506 if ((perm_flags & MSG_UNREAD) || (MSG_IS_UNREAD(msginfo->flags)
1507 && procmsg_msg_has_marked_parent(msginfo))) {
1508 item->unreadmarked--;
1510 if ((perm_flags & MSG_MARKED) || (MSG_IS_MARKED(msginfo->flags)
1511 && !MSG_IS_IGNORE_THREAD(msginfo->flags))) {
1512 procmsg_update_unread_children(msginfo, FALSE);
1517 if (MSG_IS_IMAP(msginfo->flags))
1518 imap_msg_set_perm_flags(msginfo, perm_flags);
1520 msginfo->flags.perm_flags |= perm_flags;
1521 msginfo->flags.tmp_flags |= tmp_flags;
1523 msginfo_update.msginfo = msginfo;
1524 hooks_invoke(MSGINFO_UPDATE_HOOKLIST, &msginfo_update);
1525 folder_item_update(msginfo->folder, F_ITEM_UPDATE_MSGCNT);
1527 CHANGE_FLAGS(msginfo);
1528 procmsg_msginfo_write_flags(msginfo);
1531 void procmsg_msginfo_unset_flags(MsgInfo *msginfo, MsgPermFlags perm_flags, MsgTmpFlags tmp_flags)
1534 MsgInfoUpdate msginfo_update;
1536 g_return_if_fail(msginfo != NULL);
1537 item = msginfo->folder;
1538 g_return_if_fail(item != NULL);
1540 debug_print("Unsetting flags for message %d in folder %s\n", msginfo->msgnum, item->path);
1542 /* if new flag is unset */
1543 if ((perm_flags & MSG_NEW) && MSG_IS_NEW(msginfo->flags) &&
1544 !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
1548 /* if unread flag is unset */
1549 if ((perm_flags & MSG_UNREAD) && MSG_IS_UNREAD(msginfo->flags) &&
1550 !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
1554 if (MSG_IS_UNREAD(msginfo->flags) && (perm_flags & MSG_UNREAD)
1555 && !MSG_IS_IGNORE_THREAD(msginfo->flags)
1556 && procmsg_msg_has_marked_parent(msginfo)) {
1557 item->unreadmarked--;
1560 if (MSG_IS_MARKED(msginfo->flags) && (perm_flags & MSG_MARKED)
1561 && !MSG_IS_IGNORE_THREAD(msginfo->flags)) {
1562 procmsg_update_unread_children(msginfo, FALSE);
1565 /* if ignore thread flag is unset */
1566 if ((perm_flags & MSG_IGNORE_THREAD) && MSG_IS_IGNORE_THREAD(msginfo->flags)) {
1567 if (MSG_IS_NEW(msginfo->flags) && !(perm_flags & MSG_NEW)) {
1570 if (MSG_IS_UNREAD(msginfo->flags) && !(perm_flags & MSG_UNREAD)) {
1573 if (MSG_IS_UNREAD(msginfo->flags) && !(perm_flags & MSG_UNREAD)
1574 && procmsg_msg_has_marked_parent(msginfo)) {
1575 item->unreadmarked++;
1577 if (MSG_IS_MARKED(msginfo->flags) && !(perm_flags & MSG_MARKED)) {
1578 procmsg_update_unread_children(msginfo, TRUE);
1583 if (MSG_IS_IMAP(msginfo->flags))
1584 imap_msg_unset_perm_flags(msginfo, perm_flags);
1586 msginfo->flags.perm_flags &= ~perm_flags;
1587 msginfo->flags.tmp_flags &= ~tmp_flags;
1589 msginfo_update.msginfo = msginfo;
1590 hooks_invoke(MSGINFO_UPDATE_HOOKLIST, &msginfo_update);
1591 folder_item_update(msginfo->folder, F_ITEM_UPDATE_MSGCNT);
1593 CHANGE_FLAGS(msginfo);
1594 procmsg_msginfo_write_flags(msginfo);
1597 void procmsg_msginfo_write_flags(MsgInfo *msginfo)
1602 destdir = folder_item_get_path(msginfo->folder);
1603 if (!is_dir_exist(destdir))
1604 make_dir_hier(destdir);
1606 if ((fp = procmsg_open_mark_file(destdir, TRUE))) {
1607 procmsg_write_flags(msginfo, fp);
1610 g_warning("Can't open mark file.\n");
1617 *\brief check for flags (e.g. mark) in prior msgs of current thread
1619 *\param info Current message
1620 *\param perm_flags Flags to be checked
1621 *\param parentmsgs Hash of prior msgs to avoid loops
1623 *\return gboolean TRUE if perm_flags are found
1625 gboolean procmsg_msg_has_flagged_parent_real(MsgInfo *info,
1626 MsgPermFlags perm_flags, GHashTable *parentmsgs)
1630 g_return_val_if_fail(info != NULL, FALSE);
1632 if (info != NULL && info->folder != NULL && info->inreplyto != NULL) {
1633 tmp = folder_item_get_msginfo_by_msgid(info->folder,
1635 if (tmp && (tmp->flags.perm_flags & perm_flags)) {
1636 procmsg_msginfo_free(tmp);
1638 } else if (tmp != NULL) {
1641 if (g_hash_table_lookup(parentmsgs, info)) {
1642 debug_print("loop detected: %s%c%d\n",
1643 folder_item_get_path(info->folder),
1644 G_DIR_SEPARATOR, info->msgnum);
1647 g_hash_table_insert(parentmsgs, info, "1");
1648 result = procmsg_msg_has_flagged_parent_real(
1649 tmp, perm_flags, parentmsgs);
1651 procmsg_msginfo_free(tmp);
1661 *\brief Callback for cleaning up hash of parentmsgs
1663 gboolean parentmsgs_hash_remove(gpointer key,
1671 *\brief Set up list of parentmsgs
1672 * See procmsg_msg_has_flagged_parent_real()
1674 gboolean procmsg_msg_has_flagged_parent(MsgInfo *info, MsgPermFlags perm_flags)
1677 GHashTable *parentmsgs = g_hash_table_new(NULL, NULL);
1679 result = procmsg_msg_has_flagged_parent_real(info, perm_flags, parentmsgs);
1680 g_hash_table_foreach_remove(parentmsgs, parentmsgs_hash_remove, NULL);
1681 g_hash_table_destroy(parentmsgs);
1686 *\brief Check if msgs prior in thread are marked
1687 * See procmsg_msg_has_flagged_parent_real()
1689 gboolean procmsg_msg_has_marked_parent(MsgInfo *info)
1691 return procmsg_msg_has_flagged_parent(info, MSG_MARKED);
1695 GSList *procmsg_find_children_func(MsgInfo *info,
1696 GSList *children, GSList *all)
1700 g_return_val_if_fail(info!=NULL, children);
1701 if (info->msgid == NULL)
1704 for (cur = all; cur != NULL; cur = g_slist_next(cur)) {
1705 MsgInfo *tmp = (MsgInfo *)cur->data;
1706 if (tmp->inreplyto && !strcmp(tmp->inreplyto, info->msgid)) {
1707 /* Check if message is already in the list */
1708 if ((children == NULL) ||
1709 (g_slist_index(children, tmp) == -1)) {
1710 children = g_slist_prepend(children,
1711 procmsg_msginfo_new_ref(tmp));
1712 children = procmsg_find_children_func(tmp,
1721 GSList *procmsg_find_children (MsgInfo *info)
1726 g_return_val_if_fail(info!=NULL, NULL);
1727 all = folder_item_get_msg_list(info->folder);
1728 children = procmsg_find_children_func(info, NULL, all);
1729 if (children != NULL) {
1730 for (cur = all; cur != NULL; cur = g_slist_next(cur)) {
1731 /* this will not free the used pointers
1732 created with procmsg_msginfo_new_ref */
1733 procmsg_msginfo_free((MsgInfo *)cur->data);
1741 void procmsg_update_unread_children(MsgInfo *info, gboolean newly_marked)
1743 GSList *children = procmsg_find_children(info);
1745 for (cur = children; cur != NULL; cur = g_slist_next(cur)) {
1746 MsgInfo *tmp = (MsgInfo *)cur->data;
1747 if(MSG_IS_UNREAD(tmp->flags) && !MSG_IS_IGNORE_THREAD(tmp->flags)) {
1749 info->folder->unreadmarked++;
1751 info->folder->unreadmarked--;
1752 folder_item_update(info->folder, F_ITEM_UPDATE_MSGCNT);
1754 procmsg_msginfo_free(tmp);
1756 g_slist_free(children);
1760 * Set the destination folder for a copy or move operation
1762 * \param msginfo The message which's destination folder is changed
1763 * \param to_folder The destination folder for the operation
1765 void procmsg_msginfo_set_to_folder(MsgInfo *msginfo, FolderItem *to_folder)
1767 if(msginfo->to_folder != NULL) {
1768 msginfo->to_folder->op_count--;
1769 folder_item_update(msginfo->to_folder, F_ITEM_UPDATE_MSGCNT);
1771 msginfo->to_folder = to_folder;
1772 if(to_folder != NULL) {
1773 to_folder->op_count++;
1774 folder_item_update(msginfo->to_folder, F_ITEM_UPDATE_MSGCNT);