6e69c1a28948ac75bcaf1b833b7553bb7652a40c
[claws.git] / src / procmsg.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2001 Hiroyuki Yamamoto
4  *
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.
9  *
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.
14  *
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.
18  */
19
20 #include "defs.h"
21
22 #include <glib.h>
23 #include <stdio.h>
24 #include <stdlib.h>
25
26 #include "intl.h"
27 #include "main.h"
28 #include "utils.h"
29 #include "procmsg.h"
30 #include "procheader.h"
31 #include "send.h"
32 #include "procmime.h"
33 #include "statusbar.h"
34 #include "folder.h"
35
36 typedef struct _FlagInfo        FlagInfo;
37
38 struct _FlagInfo
39 {
40         guint    msgnum;
41         MsgFlags flags;
42 };
43
44 static void mark_sum_func                       (gpointer        key,
45                                                  gpointer        value,
46                                                  gpointer        data);
47
48 static GHashTable *procmsg_read_mark_file       (const gchar    *folder);
49 static gint procmsg_cmp_msgnum                  (gconstpointer   a,
50                                                  gconstpointer   b);
51 static gint procmsg_cmp_flag_msgnum             (gconstpointer   a,
52                                                  gconstpointer   b);
53
54
55 GHashTable *procmsg_msg_hash_table_create(GSList *mlist)
56 {
57         GHashTable *msg_table;
58
59         if (mlist == NULL) return NULL;
60
61         msg_table = g_hash_table_new(NULL, g_direct_equal);
62         procmsg_msg_hash_table_append(msg_table, mlist);
63
64         return msg_table;
65 }
66
67 void procmsg_msg_hash_table_append(GHashTable *msg_table, GSList *mlist)
68 {
69         GSList *cur;
70         MsgInfo *msginfo;
71
72         if (msg_table == NULL || mlist == NULL) return;
73
74         for (cur = mlist; cur != NULL; cur = cur->next) {
75                 msginfo = (MsgInfo *)cur->data;
76
77                 g_hash_table_insert(msg_table,
78                                     GUINT_TO_POINTER(msginfo->msgnum),
79                                     msginfo);
80         }
81 }
82
83 GHashTable *procmsg_to_folder_hash_table_create(GSList *mlist)
84 {
85         GHashTable *msg_table;
86         GSList *cur;
87         MsgInfo *msginfo;
88
89         if (mlist == NULL) return NULL;
90
91         msg_table = g_hash_table_new(NULL, g_direct_equal);
92
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);
96         }
97
98         return msg_table;
99 }
100
101 static gint procmsg_read_cache_data_str(FILE *fp, gchar **str)
102 {
103         gchar buf[BUFFSIZE];
104         gint ret = 0;
105         size_t len;
106
107         if (fread(&len, sizeof(len), 1, fp) == 1) {
108                 if (len < 0)
109                         ret = -1;
110                 else {
111                         gchar *tmp = NULL;
112
113                         while (len > 0) {
114                                 size_t size = MIN(len, BUFFSIZE - 1);
115
116                                 if (fread(buf, size, 1, fp) != 1) {
117                                         ret = -1;
118                                         if (tmp) g_free(tmp);
119                                         *str = NULL;
120                                         break;
121                                 }
122
123                                 buf[size] = '\0';
124                                 if (tmp) {
125                                         *str = g_strconcat(tmp, buf, NULL);
126                                         g_free(tmp);
127                                         tmp = *str;
128                                 } else
129                                         tmp = *str = g_strdup(buf);
130
131                                 len -= size;
132                         }
133                 }
134         } else
135                 ret = -1;
136
137         if (ret < 0)
138                 g_warning(_("Cache data is corrupted\n"));
139
140         return ret;
141 }
142
143 #define READ_CACHE_DATA(data, fp) \
144 { \
145         if (procmsg_read_cache_data_str(fp, &data) < 0) { \
146                 procmsg_msginfo_free(msginfo); \
147                 break; \
148         } \
149 }
150
151 #define READ_CACHE_DATA_INT(n, fp) \
152 { \
153         if (fread(&n, sizeof(n), 1, fp) != 1) { \
154                 g_warning(_("Cache data is corrupted\n")); \
155                 procmsg_msginfo_free(msginfo); \
156                 break; \
157         } \
158 }
159
160 GSList *procmsg_read_cache(FolderItem *item, gboolean scan_file)
161 {
162         GSList *mlist = NULL;
163         GSList *last = NULL;
164         gchar *cache_file;
165         FILE *fp;
166         MsgInfo *msginfo;
167         MsgFlags default_flags;
168         gchar file_buf[BUFFSIZE];
169         gint ver;
170         guint num;
171         FolderType type;
172
173         g_return_val_if_fail(item != NULL, NULL);
174         g_return_val_if_fail(item->folder != NULL, NULL);
175         type = item->folder->type;
176
177         default_flags.perm_flags = MSG_NEW|MSG_UNREAD;
178         default_flags.tmp_flags = MSG_CACHED;
179         if (type == F_MH) {
180                 if (item->stype == F_QUEUE) {
181                         MSG_SET_TMP_FLAGS(default_flags, MSG_QUEUED);
182                 } else if (item->stype == F_DRAFT) {
183                         MSG_SET_TMP_FLAGS(default_flags, MSG_DRAFT);
184                 }
185         } else if (type == F_IMAP) {
186                 MSG_SET_TMP_FLAGS(default_flags, MSG_IMAP);
187         } else if (type == F_NEWS) {
188                 MSG_SET_TMP_FLAGS(default_flags, MSG_NEWS);
189         }
190
191         if (type == F_MH) {
192                 gchar *path;
193
194                 path = folder_item_get_path(item);
195                 if (change_dir(path) < 0) {
196                         g_free(path);
197                         return NULL;
198                 }
199                 g_free(path);
200         }
201         cache_file = folder_item_get_cache_file(item);
202         if ((fp = fopen(cache_file, "r")) == NULL) {
203                 debug_print(_("\tNo cache file\n"));
204                 g_free(cache_file);
205                 return NULL;
206         }
207         setvbuf(fp, file_buf, _IOFBF, sizeof(file_buf));
208         g_free(cache_file);
209
210         debug_print(_("\tReading summary cache...\n"));
211
212         /* compare cache version */
213         if (fread(&ver, sizeof(ver), 1, fp) != 1 ||
214             CACHE_VERSION != ver) {
215                 debug_print(_("Cache version is different. Discarding it.\n"));
216                 fclose(fp);
217                 return NULL;
218         }
219
220         while (fread(&num, sizeof(num), 1, fp) == 1) {
221                 msginfo = g_new0(MsgInfo, 1);
222                 msginfo->msgnum = num;
223                 READ_CACHE_DATA_INT(msginfo->size, fp);
224                 READ_CACHE_DATA_INT(msginfo->mtime, fp);
225                 READ_CACHE_DATA_INT(msginfo->date_t, fp);
226                 READ_CACHE_DATA_INT(msginfo->flags.tmp_flags, fp);
227
228                 READ_CACHE_DATA(msginfo->fromname, fp);
229
230                 READ_CACHE_DATA(msginfo->date, fp);
231                 READ_CACHE_DATA(msginfo->from, fp);
232                 READ_CACHE_DATA(msginfo->to, fp);
233                 READ_CACHE_DATA(msginfo->cc, fp);
234                 READ_CACHE_DATA(msginfo->newsgroups, fp);
235                 READ_CACHE_DATA(msginfo->subject, fp);
236                 READ_CACHE_DATA(msginfo->msgid, fp);
237                 READ_CACHE_DATA(msginfo->inreplyto, fp);
238                 READ_CACHE_DATA(msginfo->references, fp);
239
240                 MSG_SET_PERM_FLAGS(msginfo->flags, default_flags.perm_flags);
241                 MSG_SET_TMP_FLAGS(msginfo->flags, default_flags.tmp_flags);
242
243                 /* if the message file doesn't exist or is changed,
244                    don't add the data */
245                 if (type == F_MH && scan_file &&
246                     folder_item_is_msg_changed(item, msginfo))
247                         procmsg_msginfo_free(msginfo);
248                 else {
249                         msginfo->folder = item;
250
251                         if (!mlist)
252                                 last = mlist = g_slist_append(NULL, msginfo);
253                         else {
254                                 last = g_slist_append(last, msginfo);
255                                 last = last->next;
256                         }
257                 }
258         }
259
260         fclose(fp);
261         debug_print(_("done.\n"));
262
263         return mlist;
264 }
265
266 #undef READ_CACHE_DATA
267 #undef READ_CACHE_DATA_INT
268
269 void procmsg_set_flags(GSList *mlist, FolderItem *item)
270 {
271         GSList *cur, *tmp;
272         gint newmsg = 0;
273         gint lastnum = 0;
274         gchar *markdir;
275         MsgInfo *msginfo;
276         GHashTable *mark_table;
277         MsgFlags *flags;
278
279         if (!mlist) return;
280         g_return_if_fail(item != NULL);
281         g_return_if_fail(item->folder != NULL);
282
283         debug_print(_("\tMarking the messages...\n"));
284
285         markdir = folder_item_get_path(item);
286         if (!is_dir_exist(markdir))
287                 make_dir_hier(markdir);
288
289         mark_table = procmsg_read_mark_file(markdir);
290         g_free(markdir);
291
292         if (!mark_table) return;
293
294         for (cur = mlist; cur != NULL; cur = cur->next) {
295                 msginfo = (MsgInfo *)cur->data;
296
297                 if (lastnum < msginfo->msgnum)
298                         lastnum = msginfo->msgnum;
299
300                 flags = g_hash_table_lookup
301                         (mark_table, GUINT_TO_POINTER(msginfo->msgnum));
302
303                 if (flags != NULL) {
304                         /* add the permanent flags only */
305                         msginfo->flags.perm_flags = flags->perm_flags;
306                         if (item->folder->type == F_IMAP) {
307                                 MSG_SET_TMP_FLAGS(msginfo->flags, MSG_IMAP);
308                         } else if (item->folder->type == F_NEWS) {
309                                 MSG_SET_TMP_FLAGS(msginfo->flags, MSG_NEWS);
310                         }
311                 } else {
312                         /* not found (new message) */
313                         if (newmsg == 0) {
314                                 for (tmp = mlist; tmp != cur; tmp = tmp->next)
315                                         MSG_UNSET_PERM_FLAGS
316                                                 (((MsgInfo *)tmp->data)->flags,
317                                                  MSG_NEW);
318                         }
319                         newmsg++;
320                 }
321         }
322
323         item->last_num = lastnum;
324
325         debug_print(_("done.\n"));
326         if (newmsg)
327                 debug_print(_("\t%d new message(s)\n"), newmsg);
328
329         hash_free_value_mem(mark_table);
330         g_hash_table_destroy(mark_table);
331 }
332
333 gint procmsg_get_last_num_in_cache(GSList *mlist)
334 {
335         GSList *cur;
336         MsgInfo *msginfo;
337         gint last = 0;
338
339         if (mlist == NULL) return 0;
340
341         for (cur = mlist; cur != NULL; cur = cur->next) {
342                 msginfo = (MsgInfo *)cur->data;
343                 if (msginfo && msginfo->msgnum > last)
344                         last = msginfo->msgnum;
345         }
346
347         return last;
348 }
349
350 void procmsg_msg_list_free(GSList *mlist)
351 {
352         GSList *cur;
353         MsgInfo *msginfo;
354
355         for (cur = mlist; cur != NULL; cur = cur->next) {
356                 msginfo = (MsgInfo *)cur->data;
357                 procmsg_msginfo_free(msginfo);
358         }
359         g_slist_free(mlist);
360 }
361
362 void procmsg_write_cache(MsgInfo *msginfo, FILE *fp)
363 {
364         MsgTmpFlags flags = msginfo->flags.tmp_flags & MSG_CACHED_FLAG_MASK;
365
366         WRITE_CACHE_DATA_INT(msginfo->msgnum, fp);
367         WRITE_CACHE_DATA_INT(msginfo->size, fp);
368         WRITE_CACHE_DATA_INT(msginfo->mtime, fp);
369         WRITE_CACHE_DATA_INT(msginfo->date_t, fp);
370         WRITE_CACHE_DATA_INT(flags, fp);
371
372         WRITE_CACHE_DATA(msginfo->fromname, fp);
373
374         WRITE_CACHE_DATA(msginfo->date, fp);
375         WRITE_CACHE_DATA(msginfo->from, fp);
376         WRITE_CACHE_DATA(msginfo->to, fp);
377         WRITE_CACHE_DATA(msginfo->cc, fp);
378         WRITE_CACHE_DATA(msginfo->newsgroups, fp);
379         WRITE_CACHE_DATA(msginfo->subject, fp);
380         WRITE_CACHE_DATA(msginfo->msgid, fp);
381         WRITE_CACHE_DATA(msginfo->inreplyto, fp);
382         WRITE_CACHE_DATA(msginfo->references, fp);
383 }
384
385 void procmsg_write_flags(MsgInfo *msginfo, FILE *fp)
386 {
387         MsgPermFlags flags = msginfo->flags.perm_flags;
388
389         WRITE_CACHE_DATA_INT(msginfo->msgnum, fp);
390         WRITE_CACHE_DATA_INT(flags, fp);
391 }
392
393 struct MarkSum {
394         gint *new;
395         gint *unread;
396         gint *total;
397 };
398
399 static void mark_sum_func(gpointer key, gpointer value, gpointer data)
400 {
401         MsgFlags *flags = value;
402         struct MarkSum *marksum = data;
403
404         if (MSG_IS_NEW(*flags) && !MSG_IS_IGNORE_THREAD(*flags)) (*marksum->new)++;
405         if (MSG_IS_UNREAD(*flags) && !MSG_IS_IGNORE_THREAD(*flags)) (*marksum->unread)++;
406         (*marksum->total)++;
407
408         g_free(flags);
409 }
410
411 void procmsg_get_mark_sum(const gchar *folder,
412                           gint *new, gint *unread, gint *total)
413 {
414         GHashTable *mark_table;
415         struct MarkSum marksum;
416
417         *new = *unread = *total = 0;
418         marksum.new    = new;
419         marksum.unread = unread;
420         marksum.total  = total;
421
422         mark_table = procmsg_read_mark_file(folder);
423
424         if (mark_table) {
425                 g_hash_table_foreach(mark_table, mark_sum_func, &marksum);
426                 g_hash_table_destroy(mark_table);
427         }
428 }
429
430 static GHashTable *procmsg_read_mark_file(const gchar *folder)
431 {
432         FILE *fp;
433         GHashTable *mark_table = NULL;
434         gint num;
435         MsgFlags *flags;
436         MsgPermFlags perm_flags;
437
438         if ((fp = procmsg_open_mark_file(folder, FALSE)) == NULL)
439                 return NULL;
440
441         mark_table = g_hash_table_new(NULL, g_direct_equal);
442
443         while (fread(&num, sizeof(num), 1, fp) == 1) {
444                 if (fread(&perm_flags, sizeof(flags), 1, fp) != 1) break;
445
446                 flags = g_new0(MsgFlags, 1);
447                 flags->perm_flags = perm_flags;
448
449                 g_hash_table_insert(mark_table, GUINT_TO_POINTER(num), flags);
450         }
451
452         fclose(fp);
453         return mark_table;
454 }
455
456 FILE *procmsg_open_mark_file(const gchar *folder, gboolean append)
457 {
458         gchar *markfile;
459         FILE *fp;
460         gint ver;
461
462         markfile = g_strconcat(folder, G_DIR_SEPARATOR_S, MARK_FILE, NULL);
463
464         if ((fp = fopen(markfile, "r")) == NULL)
465                 debug_print(_("Mark file not found.\n"));
466         else if (fread(&ver, sizeof(ver), 1, fp) != 1 || MARK_VERSION != ver) {
467                 debug_print(_("Mark version is different (%d != %d). "
468                               "Discarding it.\n"), ver, MARK_VERSION);
469                 fclose(fp);
470                 fp = NULL;
471         }
472
473         /* read mode */
474         if (append == FALSE) {
475                 g_free(markfile);
476                 return fp;
477         }
478
479         if (fp) {
480                 /* reopen with append mode */
481                 fclose(fp);
482                 if ((fp = fopen(markfile, "a")) == NULL)
483                         g_warning(_("Can't open mark file with append mode.\n"));
484         } else {
485                 /* open with overwrite mode if mark file doesn't exist or
486                    version is different */
487                 if ((fp = fopen(markfile, "w")) == NULL)
488                         g_warning(_("Can't open mark file with write mode.\n"));
489                 else {
490                         ver = MARK_VERSION;
491                         WRITE_CACHE_DATA_INT(ver, fp);
492                 }
493         }
494
495         g_free(markfile);
496         return fp;
497 }
498
499 static GNode * subject_table_lookup(GHashTable * subject_table,
500                                     gchar * subject)
501 {
502         if (subject == NULL)
503                 subject = "";
504
505         if (g_strncasecmp(subject, "Re: ", 4) == 0)
506                 return g_hash_table_lookup(subject_table, subject + 4);
507         else
508                 return g_hash_table_lookup(subject_table, subject);
509 }
510
511 static void subject_table_insert(GHashTable * subject_table, gchar * subject,
512                                  GNode * node)
513 {
514         if (subject == NULL)
515                 subject = "";
516
517         if (g_strncasecmp(subject, "Re: ", 4) == 0)
518                 g_hash_table_insert(subject_table, subject + 4, node);
519         else
520                 g_hash_table_insert(subject_table, subject, node);
521 }
522
523 /* return the reversed thread tree */
524 GNode *procmsg_get_thread_tree(GSList *mlist)
525 {
526         GNode *root, *parent, *node, *next;
527         GHashTable *msgid_table;
528         GHashTable *subject_table;
529         MsgInfo *msginfo;
530         const gchar *msgid;
531         const gchar *subject;
532
533         root = g_node_new(NULL);
534         msgid_table = g_hash_table_new(g_str_hash, g_str_equal);
535         subject_table = g_hash_table_new(g_str_hash, g_str_equal);
536
537         for (; mlist != NULL; mlist = mlist->next) {
538                 msginfo = (MsgInfo *)mlist->data;
539                 parent = root;
540
541                 if (msginfo->inreplyto) {
542                         parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
543                         if (parent == NULL) {
544                                 parent = root;
545                         } else {
546                                 if(MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags)) {
547                                         MSG_SET_PERM_FLAGS(msginfo->flags, MSG_IGNORE_THREAD);
548                                 }
549                         }
550                 }
551                 node = g_node_insert_data_before
552                         (parent, parent == root ? parent->children : NULL,
553                          msginfo);
554                 if ((msgid = msginfo->msgid) &&
555                     g_hash_table_lookup(msgid_table, msgid) == NULL)
556                         g_hash_table_insert(msgid_table, (gchar *)msgid, node);
557
558                 subject = msginfo->subject;
559                 if (subject_table_lookup(subject_table,
560                                          (gchar *) subject) == NULL)
561                         subject_table_insert(subject_table, (gchar *)subject,
562                                              node);
563         }
564
565         /* complete the unfinished threads */
566         for (node = root->children; node != NULL; ) {
567                 next = node->next;
568                 msginfo = (MsgInfo *)node->data;
569                 parent = NULL;
570
571                 if (msginfo->inreplyto)
572                         parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
573                 if (parent == NULL)
574                         parent = subject_table_lookup(subject_table, msginfo->subject);
575
576                 
577                 if (parent && parent != node) {
578                         g_node_unlink(node);
579                         g_node_insert_before
580                                 (parent, parent->children, node);
581                         if(MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags)) {
582                                 MSG_SET_PERM_FLAGS(msginfo->flags, MSG_IGNORE_THREAD);
583                         }
584                 }
585                 node = next;
586         }
587
588         g_hash_table_destroy(subject_table);
589         g_hash_table_destroy(msgid_table);
590
591         return root;
592 }
593
594 void procmsg_move_messages(GSList *mlist)
595 {
596         GSList *cur, *movelist = NULL;
597         MsgInfo *msginfo;
598         FolderItem *dest = NULL;
599         GHashTable *hash;
600
601         if (!mlist) return;
602
603         hash = procmsg_to_folder_hash_table_create(mlist);
604         folder_item_scan_foreach(hash);
605         g_hash_table_destroy(hash);
606
607         for (cur = mlist; cur != NULL; cur = cur->next) {
608                 msginfo = (MsgInfo *)cur->data;
609                 if (!dest) {
610                         dest = msginfo->to_folder;
611                         movelist = g_slist_append(movelist, msginfo);
612                 } else if (dest == msginfo->to_folder) {
613                         movelist = g_slist_append(movelist, msginfo);
614                 } else {
615                         folder_item_move_msgs_with_dest(dest, movelist);
616                         g_slist_free(movelist);
617                         movelist = NULL;
618                         dest = msginfo->to_folder;
619                         movelist = g_slist_append(movelist, msginfo);
620                 }
621         }
622
623         if (movelist) {
624                 folder_item_move_msgs_with_dest(dest, movelist);
625                 g_slist_free(movelist);
626         }
627 }
628
629 void procmsg_copy_messages(GSList *mlist)
630 {
631         GSList *cur, *copylist = NULL;
632         MsgInfo *msginfo;
633         FolderItem *dest = NULL;
634         GHashTable *hash;
635
636         if (!mlist) return;
637
638         hash = procmsg_to_folder_hash_table_create(mlist);
639         folder_item_scan_foreach(hash);
640         g_hash_table_destroy(hash);
641
642         for (cur = mlist; cur != NULL; cur = cur->next) {
643                 msginfo = (MsgInfo *)cur->data;
644                 if (!dest) {
645                         dest = msginfo->to_folder;
646                         copylist = g_slist_append(copylist, msginfo);
647                 } else if (dest == msginfo->to_folder) {
648                         copylist = g_slist_append(copylist, msginfo);
649                 } else {
650                         folder_item_copy_msgs_with_dest(dest, copylist);
651                         g_slist_free(copylist);
652                         copylist = NULL;
653                         dest = msginfo->to_folder;
654                         copylist = g_slist_append(copylist, msginfo);
655                 }
656         }
657
658         if (copylist) {
659                 folder_item_copy_msgs_with_dest(dest, copylist);
660                 g_slist_free(copylist);
661         }
662 }
663
664 gchar *procmsg_get_message_file_path(MsgInfo *msginfo)
665 {
666         gchar *path, *file;
667
668         g_return_val_if_fail(msginfo != NULL, NULL);
669
670         if (msginfo->plaintext_file)
671                 file = g_strdup(msginfo->plaintext_file);
672         else {
673                 path = folder_item_get_path(msginfo->folder);
674                 file = g_strconcat(path, G_DIR_SEPARATOR_S,
675                                    itos(msginfo->msgnum), NULL);
676                 g_free(path);
677         }
678
679         return file;
680 }
681
682 gchar *procmsg_get_message_file(MsgInfo *msginfo)
683 {
684         gchar *filename = NULL;
685
686         g_return_val_if_fail(msginfo != NULL, NULL);
687
688         filename = folder_item_fetch_msg(msginfo->folder, msginfo->msgnum);
689         if (!filename)
690                 g_warning(_("can't fetch message %d\n"), msginfo->msgnum);
691
692         return filename;
693 }
694
695 FILE *procmsg_open_message(MsgInfo *msginfo)
696 {
697         FILE *fp;
698         gchar *file;
699
700         g_return_val_if_fail(msginfo != NULL, NULL);
701
702         file = procmsg_get_message_file_path(msginfo);
703         g_return_val_if_fail(file != NULL, NULL);
704
705         if ((fp = fopen(file, "r")) == NULL) {
706                 FILE_OP_ERROR(file, "fopen");
707                 g_free(file);
708                 return NULL;
709         }
710
711         g_free(file);
712
713         if (MSG_IS_QUEUED(msginfo->flags)) {
714                 gchar buf[BUFFSIZE];
715
716                 while (fgets(buf, sizeof(buf), fp) != NULL)
717                         if (buf[0] == '\r' || buf[0] == '\n') break;
718         }
719
720         return fp;
721 }
722
723 gboolean procmsg_msg_exist(MsgInfo *msginfo)
724 {
725         gchar *path;
726         gboolean ret;
727
728         if (!msginfo) return FALSE;
729
730         path = folder_item_get_path(msginfo->folder);
731         change_dir(path);
732         ret = !folder_item_is_msg_changed(msginfo->folder, msginfo);
733         g_free(path);
734
735         return ret;
736 }
737
738 void procmsg_empty_trash(void)
739 {
740         FolderItem *trash;
741         GList *cur;
742
743         for (cur = folder_get_list(); cur != NULL; cur = cur->next) {
744                 trash = FOLDER(cur->data)->trash;
745                 if (trash) folder_item_remove_all_msg(trash);
746         }
747 }
748
749 gint procmsg_send_queue(void)
750 {
751         FolderItem *queue;
752         gint i;
753         gint ret = 0;
754
755         queue = folder_get_default_queue();
756         g_return_val_if_fail(queue != NULL, -1);
757         folder_item_scan(queue);
758         if (queue->last_num < 0) return -1;
759         else if (queue->last_num == 0) return 0;
760
761         for (i = 1; i <= queue->last_num; i++) {
762                 gchar *file;
763
764                 file = folder_item_fetch_msg(queue, i);
765                 if (file) {
766                         if (send_message_queue(file) < 0) {
767                                 g_warning(_("Sending queued message %d failed.\n"), i);
768                                 ret = -1;
769                         } else
770                                 folder_item_remove_msg(queue, i);
771                         g_free(file);
772                 }
773         }
774
775         return ret;
776 }
777
778 void procmsg_print_message(MsgInfo *msginfo, const gchar *cmdline)
779 {
780         static const gchar *def_cmd = "lpr %s";
781         static guint id = 0;
782         gchar *prtmp;
783         FILE *tmpfp, *prfp;
784         gchar buf[1024];
785         gchar *p;
786
787         g_return_if_fail(msginfo);
788
789         if ((tmpfp = procmime_get_first_text_content(msginfo)) == NULL) {
790                 g_warning(_("Can't get text part\n"));
791                 return;
792         }
793
794         prtmp = g_strdup_printf("%s%cprinttmp.%08x",
795                                 get_mime_tmp_dir(), G_DIR_SEPARATOR, id++);
796
797         if ((prfp = fopen(prtmp, "w")) == NULL) {
798                 FILE_OP_ERROR(prtmp, "fopen");
799                 g_free(prtmp);
800                 fclose(tmpfp);
801                 return;
802         }
803
804         if (msginfo->date) fprintf(prfp, "Date: %s\n", msginfo->date);
805         if (msginfo->from) fprintf(prfp, "From: %s\n", msginfo->from);
806         if (msginfo->to)   fprintf(prfp, "To: %s\n", msginfo->to);
807         if (msginfo->cc)   fprintf(prfp, "Cc: %s\n", msginfo->cc);
808         if (msginfo->newsgroups)
809                 fprintf(prfp, "Newsgroups: %s\n", msginfo->newsgroups);
810         if (msginfo->subject) fprintf(prfp, "Subject: %s\n", msginfo->subject);
811         fputc('\n', prfp);
812
813         while (fgets(buf, sizeof(buf), tmpfp) != NULL)
814                 fputs(buf, prfp);
815
816         fclose(prfp);
817         fclose(tmpfp);
818
819         if (cmdline && (p = strchr(cmdline, '%')) && *(p + 1) == 's' &&
820             !strchr(p + 2, '%'))
821                 g_snprintf(buf, sizeof(buf) - 1, cmdline, prtmp);
822         else {
823                 if (cmdline)
824                         g_warning(_("Print command line is invalid: `%s'\n"),
825                                   cmdline);
826                 g_snprintf(buf, sizeof(buf) - 1, def_cmd, prtmp);
827         }
828
829         g_free(prtmp);
830
831         g_strchomp(buf);
832         if (buf[strlen(buf) - 1] != '&') strcat(buf, "&");
833         system(buf);
834 }
835
836 MsgInfo *procmsg_msginfo_copy(MsgInfo *msginfo)
837 {
838         MsgInfo *newmsginfo;
839
840         if (msginfo == NULL) return NULL;
841
842         newmsginfo = g_new0(MsgInfo, 1);
843
844 #define MEMBCOPY(mmb)   newmsginfo->mmb = msginfo->mmb
845 #define MEMBDUP(mmb)    newmsginfo->mmb = msginfo->mmb ? \
846                         g_strdup(msginfo->mmb) : NULL
847
848         MEMBCOPY(msgnum);
849         MEMBCOPY(size);
850         MEMBCOPY(mtime);
851         MEMBCOPY(date_t);
852         MEMBCOPY(flags);
853
854         MEMBDUP(fromname);
855
856         MEMBDUP(date);
857         MEMBDUP(from);
858         MEMBDUP(to);
859         MEMBDUP(cc);
860         MEMBDUP(newsgroups);
861         MEMBDUP(subject);
862         MEMBDUP(msgid);
863         MEMBDUP(inreplyto);
864
865         MEMBCOPY(folder);
866         MEMBCOPY(to_folder);
867
868         MEMBDUP(xface);
869         MEMBDUP(dispositionnotificationto);
870         MEMBDUP(returnreceiptto);
871         MEMBDUP(references);
872
873         MEMBCOPY(score);
874         MEMBCOPY(threadscore);
875
876         return newmsginfo;
877 }
878
879 void procmsg_msginfo_free(MsgInfo *msginfo)
880 {
881         if (msginfo == NULL) return;
882
883         g_free(msginfo->fromspace);
884         g_free(msginfo->references);
885         g_free(msginfo->returnreceiptto);
886         g_free(msginfo->dispositionnotificationto);
887         g_free(msginfo->xface);
888
889         g_free(msginfo->fromname);
890
891         g_free(msginfo->date);
892         g_free(msginfo->from);
893         g_free(msginfo->to);
894         g_free(msginfo->cc);
895         g_free(msginfo->newsgroups);
896         g_free(msginfo->subject);
897         g_free(msginfo->msgid);
898         g_free(msginfo->inreplyto);
899
900         g_free(msginfo);
901 }
902
903 static gint procmsg_cmp_msgnum(gconstpointer a, gconstpointer b)
904 {
905         const MsgInfo *msginfo = a;
906         const guint msgnum = GPOINTER_TO_UINT(b);
907
908         if (!msginfo)
909                 return -1;
910
911         return msginfo->msgnum - msgnum;
912 }
913
914 gint procmsg_cmp_msgnum_for_sort(gconstpointer a, gconstpointer b)
915 {
916         const MsgInfo *msginfo1 = a;
917         const MsgInfo *msginfo2 = b;
918
919         if (!msginfo1)
920                 return -1;
921         if (!msginfo2)
922                 return -1;
923
924         return msginfo1->msgnum - msginfo2->msgnum;
925 }
926
927 static gint procmsg_cmp_flag_msgnum(gconstpointer a, gconstpointer b)
928 {
929         const FlagInfo *finfo = a;
930         const guint msgnum = GPOINTER_TO_UINT(b);
931
932         if (!finfo)
933                 return -1;
934
935         return finfo->msgnum - msgnum;
936 }