953b1625240bb86ce7de2ddd812d34f2fd4a1379
[claws.git] / src / folder.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2002 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 #ifdef HAVE_CONFIG_H
21 #  include "config.h"
22 #endif
23
24 #include "defs.h"
25
26 #include <glib.h>
27 #include <stdio.h>
28 #include <string.h>
29 #include <sys/types.h>
30 #include <sys/stat.h>
31 #include <unistd.h>
32 #include <stdlib.h>
33
34 #include "intl.h"
35 #include "folder.h"
36 #include "folderview.h"
37 #include "session.h"
38 #include "imap.h"
39 #include "news.h"
40 #include "mh.h"
41 #include "mbox_folder.h"
42 #include "utils.h"
43 #include "xml.h"
44 #include "codeconv.h"
45 #include "prefs.h"
46 #include "prefs_common.h"
47 #include "account.h"
48 #include "prefs_account.h"
49 #include "filtering.h"
50 #include "scoring.h"
51 #include "prefs_folder_item.h"
52 #include "procheader.h"
53
54 static GList *folder_list = NULL;
55
56 static void folder_init         (Folder         *folder,
57                                  const gchar    *name);
58
59 static gboolean folder_read_folder_func (GNode          *node,
60                                          gpointer        data);
61 static gchar *folder_get_list_path      (void);
62 static void folder_write_list_recursive (GNode          *node,
63                                          gpointer        data);
64 static void folder_update_op_count_rec  (GNode          *node);
65
66
67 static void folder_get_persist_prefs_recursive
68                                         (GNode *node, GHashTable *pptable);
69 static gboolean persist_prefs_free      (gpointer key, gpointer val, gpointer data);
70 void folder_item_read_cache             (FolderItem *item);
71 void folder_item_free_cache             (FolderItem *item);
72
73 Folder *folder_new(FolderType type, const gchar *name, const gchar *path)
74 {
75         Folder *folder = NULL;
76         FolderItem *item;
77
78         name = name ? name : path;
79         switch (type) {
80         case F_MBOX:
81                 folder = mbox_folder_new(name, path);
82                 break;
83         case F_MH:
84                 folder = mh_folder_new(name, path);
85                 break;
86         case F_IMAP:
87                 folder = imap_folder_new(name, path);
88                 break;
89         case F_NEWS:
90                 folder = news_folder_new(name, path);
91                 break;
92         default:
93                 return NULL;
94         }
95
96         /* Create root folder item */
97         item = folder_item_new(folder, name, NULL);
98         item->folder = folder;
99         folder->node = g_node_new(item);
100         folder->data = NULL;
101
102         return folder;
103 }
104
105 static void folder_init(Folder *folder, const gchar *name)
106 {
107         g_return_if_fail(folder != NULL);
108
109         folder_set_name(folder, name);
110
111         /* Init folder data */
112         folder->account = NULL;
113         folder->inbox = NULL;
114         folder->outbox = NULL;
115         folder->draft = NULL;
116         folder->queue = NULL;
117         folder->trash = NULL;
118
119         /* Init Folder functions */
120         folder->item_new = NULL;
121         folder->item_destroy = NULL;
122         folder->fetch_msg = NULL;
123         folder->fetch_msginfo = NULL;
124         folder->fetch_msginfos = NULL;
125         folder->get_num_list = NULL;
126         folder->ui_func = NULL;
127         folder->ui_func_data = NULL;
128         folder->check_msgnum_validity = NULL;
129 }
130
131 void folder_local_folder_init(Folder *folder, const gchar *name,
132                               const gchar *path)
133 {
134         folder_init(folder, name);
135         LOCAL_FOLDER(folder)->rootpath = g_strdup(path);
136 }
137
138 void folder_remote_folder_init(Folder *folder, const gchar *name,
139                                const gchar *path)
140 {
141         folder_init(folder, name);
142         REMOTE_FOLDER(folder)->session = NULL;
143 }
144
145 void folder_destroy(Folder *folder)
146 {
147         g_return_if_fail(folder != NULL);
148         g_return_if_fail(folder->destroy != NULL);
149
150         folder->destroy(folder);
151
152         folder_list = g_list_remove(folder_list, folder);
153
154         folder_tree_destroy(folder);
155         g_free(folder->name);
156         g_free(folder);
157 }
158
159 void folder_local_folder_destroy(LocalFolder *lfolder)
160 {
161         g_return_if_fail(lfolder != NULL);
162
163         g_free(lfolder->rootpath);
164 }
165
166 void folder_remote_folder_destroy(RemoteFolder *rfolder)
167 {
168         g_return_if_fail(rfolder != NULL);
169
170         if (rfolder->session)
171                 session_destroy(rfolder->session);
172 }
173
174 #if 0
175 Folder *mbox_folder_new(const gchar *name, const gchar *path)
176 {
177         /* not yet implemented */
178         return NULL;
179 }
180
181 Folder *maildir_folder_new(const gchar *name, const gchar *path)
182 {
183         /* not yet implemented */
184         return NULL;
185 }
186 #endif
187
188 FolderItem *folder_item_new(Folder *folder, const gchar *name, const gchar *path)
189 {
190         FolderItem *item = NULL;
191
192         if (folder->item_new) {
193                 item = folder->item_new(folder);
194         } else {
195                 item = g_new0(FolderItem, 1);
196         }
197
198         g_return_val_if_fail(item != NULL, NULL);
199
200         item->stype = F_NORMAL;
201         item->name = g_strdup(name);
202         item->path = g_strdup(path);
203         item->mtime = 0;
204         item->new = 0;
205         item->unread = 0;
206         item->total = 0;
207         item->last_num = -1;
208         item->cache = NULL;
209         item->no_sub = FALSE;
210         item->no_select = FALSE;
211         item->collapsed = FALSE;
212         item->threaded  = TRUE;
213         item->ret_rcpt  = FALSE;
214         item->opened    = FALSE;
215         item->parent = NULL;
216         item->folder = NULL;
217         item->account = NULL;
218         item->apply_sub = FALSE;
219         item->mark_queue = NULL;
220         item->data = NULL;
221
222         item->prefs = prefs_folder_item_new();
223
224         return item;
225 }
226
227 void folder_item_append(FolderItem *parent, FolderItem *item)
228 {
229         GNode *node;
230
231         g_return_if_fail(parent != NULL);
232         g_return_if_fail(parent->folder != NULL);
233         g_return_if_fail(item != NULL);
234
235         node = parent->folder->node;
236         node = g_node_find(node, G_PRE_ORDER, G_TRAVERSE_ALL, parent);
237         g_return_if_fail(node != NULL);
238
239         item->parent = parent;
240         item->folder = parent->folder;
241         g_node_append_data(node, item);
242 }
243
244 void folder_item_remove(FolderItem *item)
245 {
246         GNode *node;
247
248         g_return_if_fail(item != NULL);
249         g_return_if_fail(item->folder != NULL);
250
251         node = item->folder->node;
252         node = g_node_find(node, G_PRE_ORDER, G_TRAVERSE_ALL, item);
253         g_return_if_fail(node != NULL);
254
255         /* TODO: free all FolderItem's first */
256         if (item->folder->node == node)
257                 item->folder->node = NULL;
258         g_node_destroy(node);
259 }
260
261 void folder_item_destroy(FolderItem *item)
262 {
263         g_return_if_fail(item != NULL);
264
265         debug_print("Destroying folder item %s\n", item->path);
266
267         if (item->cache)
268                 folder_item_free_cache(item);
269         g_free(item->name);
270         g_free(item->path);
271
272         if (item->folder != NULL) {
273                 if(item->folder->item_destroy) {
274                         item->folder->item_destroy(item->folder, item);
275                 } else {
276                         g_free(item);
277                 }
278         }
279 }
280
281 void folder_set_ui_func(Folder *folder, FolderUIFunc func, gpointer data)
282 {
283         g_return_if_fail(folder != NULL);
284
285         folder->ui_func = func;
286         folder->ui_func_data = data;
287 }
288
289 void folder_set_name(Folder *folder, const gchar *name)
290 {
291         g_return_if_fail(folder != NULL);
292
293         g_free(folder->name);
294         folder->name = name ? g_strdup(name) : NULL;
295         if (folder->node && folder->node->data) {
296                 FolderItem *item = (FolderItem *)folder->node->data;
297
298                 g_free(item->name);
299                 item->name = name ? g_strdup(name) : NULL;
300         }
301 }
302
303 gboolean folder_tree_destroy_func(GNode *node, gpointer data) {
304         FolderItem *item = (FolderItem *) node->data;
305
306         folder_item_destroy(item);
307         return FALSE;
308 }
309
310 void folder_tree_destroy(Folder *folder)
311 {
312         g_return_if_fail(folder != NULL);
313         g_return_if_fail(folder->node != NULL);
314         
315         prefs_scoring_clear();
316         prefs_filtering_clear();
317
318         g_node_traverse(folder->node, G_POST_ORDER, G_TRAVERSE_ALL, -1, folder_tree_destroy_func, NULL);
319         if (folder->node)
320                 g_node_destroy(folder->node);
321
322         folder->inbox = NULL;
323         folder->outbox = NULL;
324         folder->draft = NULL;
325         folder->queue = NULL;
326         folder->trash = NULL;
327         folder->node = NULL;
328 }
329
330 void folder_add(Folder *folder)
331 {
332         Folder *cur_folder;
333         GList *cur;
334         gint i;
335
336         g_return_if_fail(folder != NULL);
337
338         for (i = 0, cur = folder_list; cur != NULL; cur = cur->next, i++) {
339                 cur_folder = FOLDER(cur->data);
340                 if (folder->type == F_MH) {
341                         if (cur_folder->type != F_MH) break;
342                 } else if (folder->type == F_MBOX) {
343                         if (cur_folder->type != F_MH &&
344                             cur_folder->type != F_MBOX) break;
345                 } else if (folder->type == F_IMAP) {
346                         if (cur_folder->type != F_MH &&
347                             cur_folder->type != F_MBOX &&
348                             cur_folder->type != F_IMAP) break;
349                 } else if (folder->type == F_NEWS) {
350                         if (cur_folder->type != F_MH &&
351                             cur_folder->type != F_MBOX &&
352                             cur_folder->type != F_IMAP &&
353                             cur_folder->type != F_NEWS) break;
354                 }
355         }
356
357         folder_list = g_list_insert(folder_list, folder, i);
358 }
359
360 GList *folder_get_list(void)
361 {
362         return folder_list;
363 }
364
365 gint folder_read_list(void)
366 {
367         GNode *node;
368         XMLNode *xmlnode;
369         gchar *path;
370
371         path = folder_get_list_path();
372         if (!is_file_exist(path)) return -1;
373         node = xml_parse_file(path);
374         if (!node) return -1;
375
376         xmlnode = node->data;
377         if (strcmp2(xmlnode->tag->tag, "folderlist") != 0) {
378                 g_warning("wrong folder list\n");
379                 xml_free_tree(node);
380                 return -1;
381         }
382
383         g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, 2,
384                         folder_read_folder_func, NULL);
385
386         xml_free_tree(node);
387         if (folder_list)
388                 return 0;
389         else
390                 return -1;
391 }
392
393 void folder_write_list(void)
394 {
395         GList *list;
396         Folder *folder;
397         gchar *path;
398         PrefFile *pfile;
399
400         path = folder_get_list_path();
401         if ((pfile = prefs_write_open(path)) == NULL) return;
402
403         fprintf(pfile->fp, "<?xml version=\"1.0\" encoding=\"%s\"?>\n",
404                 conv_get_current_charset_str());
405         fputs("\n<folderlist>\n", pfile->fp);
406
407         for (list = folder_list; list != NULL; list = list->next) {
408                 folder = list->data;
409                 folder_write_list_recursive(folder->node, pfile->fp);
410         }
411
412         fputs("</folderlist>\n", pfile->fp);
413
414         if (prefs_write_close(pfile) < 0)
415                 g_warning("failed to write folder list.\n");
416 }
417
418 gboolean folder_scan_tree_func(GNode *node, gpointer data)
419 {
420         GHashTable *pptable = (GHashTable *)data;
421         FolderItem *item = (FolderItem *)node->data;
422         
423         folder_item_restore_persist_prefs(item, pptable);
424
425         return FALSE;
426 }
427
428 void folder_scan_tree(Folder *folder)
429 {
430         GHashTable *pptable;
431         
432         if (!folder->scan_tree)
433                 return;
434         
435         pptable = folder_persist_prefs_new(folder);
436         folder_tree_destroy(folder);
437
438         folder->scan_tree(folder);
439
440         g_node_traverse(folder->node, G_POST_ORDER, G_TRAVERSE_ALL, -1, folder_scan_tree_func, pptable);
441         folder_persist_prefs_free(pptable);
442
443         prefs_matcher_read_config();
444 }
445
446 FolderItem *folder_create_folder(FolderItem *parent, const gchar *name)
447 {
448         FolderItem *new_item;
449
450         new_item = parent->folder->create_folder(parent->folder, parent, name);
451         new_item->cache = msgcache_new();
452
453         return new_item;
454 }
455
456 struct TotalMsgCount
457 {
458         guint new;
459         guint unread;
460         guint total;
461 };
462
463 struct FuncToAllFoldersData
464 {
465         FolderItemFunc  function;
466         gpointer        data;
467 };
468
469 static gboolean folder_func_to_all_folders_func(GNode *node, gpointer data)
470 {
471         FolderItem *item;
472         struct FuncToAllFoldersData *function_data = (struct FuncToAllFoldersData *) data;
473
474         g_return_val_if_fail(node->data != NULL, FALSE);
475
476         item = FOLDER_ITEM(node->data);
477         g_return_val_if_fail(item != NULL, FALSE);
478
479         function_data->function(item, function_data->data);
480
481         return FALSE;
482 }
483
484 void folder_func_to_all_folders(FolderItemFunc function, gpointer data)
485 {
486         GList *list;
487         Folder *folder;
488         struct FuncToAllFoldersData function_data;
489         
490         function_data.function = function;
491         function_data.data = data;
492
493         for (list = folder_list; list != NULL; list = list->next) {
494                 folder = FOLDER(list->data);
495                 if (folder->node)
496                         g_node_traverse(folder->node, G_PRE_ORDER,
497                                         G_TRAVERSE_ALL, -1,
498                                         folder_func_to_all_folders_func,
499                                         &function_data);
500         }
501 }
502
503 static void folder_count_total_msgs_func(FolderItem *item, gpointer data)
504 {
505         struct TotalMsgCount *count = (struct TotalMsgCount *)data;
506
507         count->new += item->new;
508         count->unread += item->unread;
509         count->total += item->total;
510 }
511
512 void folder_count_total_msgs(guint *new, guint *unread, guint *total)
513 {
514         struct TotalMsgCount count;
515
516         count.new = count.unread = count.total = 0;
517
518         debug_print("Counting total number of messages...\n");
519
520         folder_func_to_all_folders(folder_count_total_msgs_func, &count);
521
522         *new = count.new;
523         *unread = count.unread;
524         *total = count.total;
525 }
526
527 Folder *folder_find_from_path(const gchar *path)
528 {
529         GList *list;
530         Folder *folder;
531
532         for (list = folder_list; list != NULL; list = list->next) {
533                 folder = list->data;
534                 if ((folder->type == F_MH || folder->type == F_MBOX) &&
535                     !path_cmp(LOCAL_FOLDER(folder)->rootpath, path))
536                         return folder;
537         }
538
539         return NULL;
540 }
541
542 Folder *folder_find_from_name(const gchar *name, FolderType type)
543 {
544         GList *list;
545         Folder *folder;
546
547         for (list = folder_list; list != NULL; list = list->next) {
548                 folder = list->data;
549                 if (folder->type == type && strcmp2(name, folder->name) == 0)
550                         return folder;
551         }
552
553         return NULL;
554 }
555
556 static gboolean folder_item_find_func(GNode *node, gpointer data)
557 {
558         FolderItem *item = node->data;
559         gpointer *d = data;
560         const gchar *path = d[0];
561
562         if (path_cmp(path, item->path) != 0)
563                 return FALSE;
564
565         d[1] = item;
566
567         return TRUE;
568 }
569
570 FolderItem *folder_find_item_from_path(const gchar *path)
571 {
572         Folder *folder;
573         gpointer d[2];
574
575         folder = folder_get_default_folder();
576         g_return_val_if_fail(folder != NULL, NULL);
577
578         d[0] = (gpointer)path;
579         d[1] = NULL;
580         g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
581                         folder_item_find_func, d);
582         return d[1];
583 }
584
585 static const struct {
586         gchar *str;
587         FolderType type;
588 } type_str_table[] = {
589         {"#mh"     , F_MH},
590         {"#mbox"   , F_MBOX},
591         {"#maildir", F_MAILDIR},
592         {"#imap"   , F_IMAP},
593         {"#news"   , F_NEWS}
594 };
595
596 static gchar *folder_get_type_string(FolderType type)
597 {
598         gint i;
599
600         for (i = 0; i < sizeof(type_str_table) / sizeof(type_str_table[0]);
601              i++) {
602                 if (type_str_table[i].type == type)
603                         return type_str_table[i].str;
604         }
605
606         return NULL;
607 }
608
609 static FolderType folder_get_type_from_string(const gchar *str)
610 {
611         gint i;
612
613         for (i = 0; i < sizeof(type_str_table) / sizeof(type_str_table[0]);
614              i++) {
615                 if (g_strcasecmp(type_str_table[i].str, str) == 0)
616                         return type_str_table[i].type;
617         }
618
619         return F_UNKNOWN;
620 }
621
622 gchar *folder_get_identifier(Folder *folder)
623 {
624         gchar *type_str;
625
626         g_return_val_if_fail(folder != NULL, NULL);
627
628         type_str = folder_get_type_string(folder->type);
629         return g_strconcat(type_str, "/", folder->name, NULL);
630 }
631
632 gchar *folder_item_get_identifier(FolderItem *item)
633 {
634         gchar *id;
635         gchar *folder_id;
636
637         g_return_val_if_fail(item != NULL, NULL);
638         g_return_val_if_fail(item->path != NULL, NULL);
639
640         folder_id = folder_get_identifier(item->folder);
641         id = g_strconcat(folder_id, "/", item->path, NULL);
642         g_free(folder_id);
643
644         return id;
645 }
646
647 FolderItem *folder_find_item_from_identifier(const gchar *identifier)
648 {
649         Folder *folder;
650         gpointer d[2];
651         gchar *str;
652         gchar *p;
653         gchar *name;
654         gchar *path;
655         FolderType type;
656
657         g_return_val_if_fail(identifier != NULL, NULL);
658
659         if (*identifier != '#')
660                 return folder_find_item_from_path(identifier);
661
662         Xstrdup_a(str, identifier, return NULL);
663
664         p = strchr(str, '/');
665         if (!p)
666                 return folder_find_item_from_path(identifier);
667         *p = '\0';
668         p++;
669         type = folder_get_type_from_string(str);
670         if (type == F_UNKNOWN)
671                 return folder_find_item_from_path(identifier);
672
673         name = p;
674         p = strchr(p, '/');
675         if (!p)
676                 return folder_find_item_from_path(identifier);
677         *p = '\0';
678         p++;
679
680         folder = folder_find_from_name(name, type);
681         if (!folder)
682                 return folder_find_item_from_path(identifier);
683
684         path = p;
685
686         d[0] = (gpointer)path;
687         d[1] = NULL;
688         g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
689                         folder_item_find_func, d);
690         return d[1];
691 }
692
693 Folder *folder_get_default_folder(void)
694 {
695         return folder_list ? FOLDER(folder_list->data) : NULL;
696 }
697
698 FolderItem *folder_get_default_inbox(void)
699 {
700         Folder *folder;
701
702         if (!folder_list) return NULL;
703         folder = FOLDER(folder_list->data);
704         g_return_val_if_fail(folder != NULL, NULL);
705         return folder->inbox;
706 }
707
708 FolderItem *folder_get_default_outbox(void)
709 {
710         Folder *folder;
711
712         if (!folder_list) return NULL;
713         folder = FOLDER(folder_list->data);
714         g_return_val_if_fail(folder != NULL, NULL);
715         return folder->outbox;
716 }
717
718 FolderItem *folder_get_default_draft(void)
719 {
720         Folder *folder;
721
722         if (!folder_list) return NULL;
723         folder = FOLDER(folder_list->data);
724         g_return_val_if_fail(folder != NULL, NULL);
725         return folder->draft;
726 }
727
728 FolderItem *folder_get_default_queue(void)
729 {
730         Folder *folder;
731
732         if (!folder_list) return NULL;
733         folder = FOLDER(folder_list->data);
734         g_return_val_if_fail(folder != NULL, NULL);
735         return folder->queue;
736 }
737
738 FolderItem *folder_get_default_trash(void)
739 {
740         Folder *folder;
741
742         if (!folder_list) return NULL;
743         folder = FOLDER(folder_list->data);
744         g_return_val_if_fail(folder != NULL, NULL);
745         return folder->trash;
746 }
747
748 #define CREATE_FOLDER_IF_NOT_EXIST(member, dir, type)           \
749 {                                                               \
750         if (!folder->member) {                                  \
751                 item = folder_item_new(folder, dir, dir);       \
752                 item->stype = type;                             \
753                 folder_item_append(rootitem, item);             \
754                 folder->member = item;                          \
755         }                                                       \
756 }
757
758 void folder_set_missing_folders(void)
759 {
760         Folder *folder;
761         FolderItem *rootitem;
762         FolderItem *item;
763         GList *list;
764
765         for (list = folder_list; list != NULL; list = list->next) {
766                 folder = list->data;
767                 if (folder->type != F_MH) continue;
768                 rootitem = FOLDER_ITEM(folder->node->data);
769                 g_return_if_fail(rootitem != NULL);
770
771                 if (folder->inbox && folder->outbox && folder->draft &&
772                     folder->queue && folder->trash)
773                         continue;
774
775                 if (folder->create_tree(folder) < 0) {
776                         g_warning("%s: can't create the folder tree.\n",
777                                   LOCAL_FOLDER(folder)->rootpath);
778                         continue;
779                 }
780
781                 CREATE_FOLDER_IF_NOT_EXIST(inbox,  INBOX_DIR,  F_INBOX);
782                 CREATE_FOLDER_IF_NOT_EXIST(outbox, OUTBOX_DIR, F_OUTBOX);
783                 CREATE_FOLDER_IF_NOT_EXIST(draft,  DRAFT_DIR,  F_DRAFT);
784                 CREATE_FOLDER_IF_NOT_EXIST(queue,  QUEUE_DIR,  F_QUEUE);
785                 CREATE_FOLDER_IF_NOT_EXIST(trash,  TRASH_DIR,  F_TRASH);
786         }
787 }
788
789 static gboolean folder_unref_account_func(GNode *node, gpointer data)
790 {
791         FolderItem *item = node->data;
792         PrefsAccount *account = data;
793
794         if (item->account == account)
795                 item->account = NULL;
796
797         return FALSE;
798 }
799
800 void folder_unref_account_all(PrefsAccount *account)
801 {
802         Folder *folder;
803         GList *list;
804
805         if (!account) return;
806
807         for (list = folder_list; list != NULL; list = list->next) {
808                 folder = list->data;
809                 if (folder->account == account)
810                         folder->account = NULL;
811                 g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
812                                 folder_unref_account_func, account);
813         }
814 }
815
816 #undef CREATE_FOLDER_IF_NOT_EXIST
817
818 gchar *folder_get_path(Folder *folder)
819 {
820         gchar *path;
821
822         g_return_val_if_fail(folder != NULL, NULL);
823
824         switch(FOLDER_TYPE(folder)) {
825
826                 case F_MH:
827                         path = g_strdup(LOCAL_FOLDER(folder)->rootpath);
828                         break;
829
830                 case F_IMAP:
831                         g_return_val_if_fail(folder->account != NULL, NULL);
832                         path = g_strconcat(get_imap_cache_dir(),
833                                            G_DIR_SEPARATOR_S,
834                                            folder->account->recv_server,
835                                            G_DIR_SEPARATOR_S,
836                                            folder->account->userid,
837                                            NULL);
838                         break;
839
840                 case F_NEWS:
841                         g_return_val_if_fail(folder->account != NULL, NULL);
842                         path = g_strconcat(get_news_cache_dir(),
843                                            G_DIR_SEPARATOR_S,
844                                            folder->account->nntp_server,
845                                            NULL);
846                         break;
847
848                 default:
849                         path = NULL;
850                         break;
851         }
852         
853         return path;
854 }
855
856 gchar *folder_item_get_path(FolderItem *item)
857 {
858         gchar *folder_path;
859         gchar *path;
860
861         g_return_val_if_fail(item != NULL, NULL);
862
863         if(FOLDER_TYPE(item->folder) != F_MBOX) {
864                 folder_path = folder_get_path(item->folder);
865                 g_return_val_if_fail(folder_path != NULL, NULL);
866
867                 if (folder_path[0] == G_DIR_SEPARATOR) {
868                         if (item->path)
869                                 path = g_strconcat(folder_path, G_DIR_SEPARATOR_S,
870                                                    item->path, NULL);
871                         else
872                                 path = g_strdup(folder_path);
873                 } else {
874                         if (item->path)
875                                 path = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
876                                                    folder_path, G_DIR_SEPARATOR_S,
877                                                    item->path, NULL);
878                         else
879                                 path = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
880                                                    folder_path, NULL);
881                 }
882
883                 g_free(folder_path);
884         } else {
885                 gchar *itempath;
886
887                 itempath = mbox_get_virtual_path(item);
888                 if (itempath == NULL)
889                         return NULL;
890                 path = g_strconcat(get_mbox_cache_dir(),
891                                           G_DIR_SEPARATOR_S, itempath, NULL);
892                 g_free(itempath);
893         }
894         return path;
895 }
896
897 void folder_item_set_default_flags(FolderItem *dest, MsgFlags *flags)
898 {
899         if (!(dest->stype == F_OUTBOX ||
900               dest->stype == F_QUEUE  ||
901               dest->stype == F_DRAFT  ||
902               dest->stype == F_TRASH)) {
903                 flags->perm_flags = MSG_NEW|MSG_UNREAD;
904         } else {
905                 flags->perm_flags = 0;
906         }
907         flags->tmp_flags = MSG_CACHED;
908         if (dest->folder->type == F_MH) {
909                 if (dest->stype == F_QUEUE) {
910                         MSG_SET_TMP_FLAGS(*flags, MSG_QUEUED);
911                 } else if (dest->stype == F_DRAFT) {
912                         MSG_SET_TMP_FLAGS(*flags, MSG_DRAFT);
913                 }
914         } else if (dest->folder->type == F_IMAP) {
915                 MSG_SET_TMP_FLAGS(*flags, MSG_IMAP);
916         } else if (dest->folder->type == F_NEWS) {
917                 MSG_SET_TMP_FLAGS(*flags, MSG_NEWS);
918         }
919 }
920
921 static gint folder_sort_cache_list_by_msgnum(gconstpointer a, gconstpointer b)
922 {
923         MsgInfo *msginfo_a = (MsgInfo *) a;
924         MsgInfo *msginfo_b = (MsgInfo *) b;
925
926         return (msginfo_a->msgnum - msginfo_b->msgnum);
927 }
928
929 static gint folder_sort_folder_list(gconstpointer a, gconstpointer b)
930 {
931         guint gint_a = GPOINTER_TO_INT(a);
932         guint gint_b = GPOINTER_TO_INT(b);
933         
934         return (gint_a - gint_b);
935 }
936
937 gint folder_item_scan(FolderItem *item)
938 {
939         Folder *folder;
940         GSList *folder_list, *cache_list, *folder_list_cur, *cache_list_cur, *new_list = NULL;
941         guint newcnt = 0, unreadcnt = 0, totalcnt = 0;
942         guint cache_max_num, folder_max_num, cache_cur_num, folder_cur_num;
943
944         g_return_val_if_fail(item != NULL, -1);
945         if (item->path == NULL) return -1;
946
947         folder = item->folder;
948
949         g_return_val_if_fail(folder != NULL, -1);
950         g_return_val_if_fail(folder->get_num_list != NULL, -1);
951
952         debug_print("Scanning folder %s for cache changes.\n", item->path);
953
954         /* Get list of messages for folder and cache */
955         if (!folder->check_msgnum_validity || 
956            folder->check_msgnum_validity(folder, item)) {
957                 if (!item->cache)
958                         folder_item_read_cache(item);
959                 cache_list = msgcache_get_msg_list(item->cache);
960         } else {
961                 if (item->cache)
962                         msgcache_destroy(item->cache);
963                 item->cache = msgcache_new();
964                 cache_list = NULL;
965         }
966         folder_list = folder->get_num_list(item->folder, item);
967
968         /* Sort both lists */
969         cache_list = g_slist_sort(cache_list, folder_sort_cache_list_by_msgnum);
970         folder_list = g_slist_sort(folder_list, folder_sort_folder_list);
971
972         cache_list_cur = cache_list;
973         folder_list_cur = folder_list;
974
975         if (cache_list_cur != NULL) {
976                 GSList *cache_list_last;
977         
978                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
979                 cache_list_last = g_slist_last(cache_list);
980                 cache_max_num = ((MsgInfo *)cache_list_last->data)->msgnum;
981         } else {
982                 cache_cur_num = G_MAXINT;
983                 cache_max_num = 0;
984         }
985
986         if (folder_list_cur != NULL) {
987                 GSList *folder_list_last;
988         
989                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
990                 folder_list_last = g_slist_last(folder_list);
991                 folder_max_num = GPOINTER_TO_INT(folder_list_last->data);
992         } else {
993                 folder_cur_num = G_MAXINT;
994                 folder_max_num = 0;
995         }
996
997         while ((cache_cur_num != G_MAXINT) || (folder_cur_num != G_MAXINT)) {
998                 /*
999                  *  Message only exists in the folder
1000                  *  Remember message for fetching
1001                  */
1002                 if (folder_cur_num < cache_cur_num) {
1003                         gboolean add = FALSE;
1004
1005                         switch(folder->type) {
1006                                 case F_NEWS:
1007                                         if (folder_cur_num < cache_max_num)
1008                                                 break;
1009                                         
1010                                         if (prefs_common.max_articles == 0) {
1011                                                 add = TRUE;
1012                                         }
1013
1014                                         if (folder_max_num <= prefs_common.max_articles) {
1015                                                 add = TRUE;
1016                                         } else if (folder_cur_num > (folder_max_num - prefs_common.max_articles)) {
1017                                                 add = TRUE;
1018                                         }
1019                                         break;
1020                                 default:
1021                                         add = TRUE;
1022                                         break;
1023                         }
1024                         
1025                         if (add) {
1026                                 new_list = g_slist_prepend(new_list, GINT_TO_POINTER(folder_cur_num));
1027                                 debug_print("Remembered message %d for fetching\n", folder_cur_num);
1028                         }
1029
1030                         /* Move to next folder number */
1031                         folder_list_cur = folder_list_cur->next;
1032
1033                         if (folder_list_cur != NULL)
1034                                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
1035                         else
1036                                 folder_cur_num = G_MAXINT;
1037
1038                         continue;
1039                 }
1040
1041                 /*
1042                  *  Message only exists in the cache
1043                  *  Remove the message from the cache
1044                  */
1045                 if (cache_cur_num < folder_cur_num) {
1046                         msgcache_remove_msg(item->cache, cache_cur_num);
1047                         debug_print("Removed message %d from cache.\n", cache_cur_num);
1048
1049                         /* Move to next cache number */
1050                         cache_list_cur = cache_list_cur->next;
1051
1052                         if (cache_list_cur != NULL)
1053                                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
1054                         else
1055                                 cache_cur_num = G_MAXINT;
1056
1057                         continue;
1058                 }
1059
1060                 /*
1061                  *  Message number exists in folder and cache!
1062                  *  Check if the message has been modified
1063                  */
1064                 if (cache_cur_num == folder_cur_num) {
1065                         MsgInfo *msginfo;
1066
1067                         msginfo = msgcache_get_msg(item->cache, folder_cur_num);
1068                         if (folder->is_msg_changed && folder->is_msg_changed(folder, item, msginfo)) {
1069                                 MsgInfo *newmsginfo;
1070
1071                                 msgcache_remove_msg(item->cache, msginfo->msgnum);
1072
1073                                 if (NULL != (newmsginfo = folder->fetch_msginfo(folder, item, folder_cur_num))) {
1074                                         msgcache_add_msg(item->cache, newmsginfo);
1075                                         if (MSG_IS_NEW(newmsginfo->flags) && !MSG_IS_IGNORE_THREAD(newmsginfo->flags))
1076                                                 newcnt++;
1077                                         if (MSG_IS_UNREAD(newmsginfo->flags) && !MSG_IS_IGNORE_THREAD(newmsginfo->flags))
1078                                                 unreadcnt++;
1079                                         procmsg_msginfo_free(newmsginfo);
1080                                 }                                       
1081
1082                                 debug_print("Updated msginfo for message %d.\n", folder_cur_num);
1083                         } else {
1084                                 if (MSG_IS_NEW(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1085                                         newcnt++;
1086                                 if (MSG_IS_UNREAD(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1087                                         unreadcnt++;
1088                         }
1089                         totalcnt++;
1090                         procmsg_msginfo_free(msginfo);
1091
1092                         /* Move to next folder and cache number */
1093                         cache_list_cur = cache_list_cur->next;
1094                         folder_list_cur = folder_list_cur->next;
1095
1096                         if (cache_list_cur != NULL)
1097                                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
1098                         else
1099                                 cache_cur_num = G_MAXINT;
1100
1101                         if (folder_list_cur != NULL)
1102                                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
1103                         else
1104                                 folder_cur_num = G_MAXINT;
1105
1106                         continue;
1107                 }
1108         }
1109
1110         for(cache_list_cur = cache_list; cache_list_cur != NULL; cache_list_cur = g_slist_next(cache_list_cur)) {
1111                 procmsg_msginfo_free((MsgInfo *) cache_list_cur->data);
1112         }
1113
1114         g_slist_free(cache_list);
1115         g_slist_free(folder_list);
1116
1117         if (folder->fetch_msginfos) {
1118                 GSList *elem;
1119                 GSList *newmsg_list;
1120                 MsgInfo *msginfo;
1121                 
1122                 if (new_list) {
1123                         newmsg_list = folder->fetch_msginfos(folder, item, new_list);
1124                         for (elem = newmsg_list; elem != NULL; elem = g_slist_next(elem)) {
1125                                 msginfo = (MsgInfo *) elem->data;
1126                                 msgcache_add_msg(item->cache, msginfo);
1127                                 if (MSG_IS_NEW(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1128                                         newcnt++;
1129                                 if (MSG_IS_UNREAD(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1130                                         unreadcnt++;
1131                                 totalcnt++;
1132                                 procmsg_msginfo_free(msginfo);
1133                         }
1134                         g_slist_free(newmsg_list);
1135                 }
1136         } else if (folder->fetch_msginfo) {
1137                 GSList *elem;
1138         
1139                 for (elem = new_list; elem != NULL; elem = g_slist_next(elem)) {
1140                         MsgInfo *msginfo;
1141                         guint num;
1142
1143                         num = GPOINTER_TO_INT(elem->data);
1144                         msginfo = folder->fetch_msginfo(folder, item, num);
1145                         if (msginfo != NULL) {
1146                                 msgcache_add_msg(item->cache, msginfo);
1147                                 if (MSG_IS_NEW(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1148                                     newcnt++;
1149                                 if (MSG_IS_UNREAD(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1150                                     unreadcnt++;
1151                                 totalcnt++;
1152                                 procmsg_msginfo_free(msginfo);
1153                                 debug_print("Added newly found message %d to cache.\n", num);
1154                         }
1155                 }
1156         }
1157
1158         item->new = newcnt;
1159         item->unread = unreadcnt;
1160         item->total = totalcnt;
1161         
1162         g_slist_free(new_list);
1163
1164         folderview_update_item(item, FALSE);
1165
1166         return 0;
1167 }
1168
1169 static void folder_item_scan_foreach_func(gpointer key, gpointer val,
1170                                           gpointer data)
1171 {
1172         folder_item_scan(FOLDER_ITEM(key));
1173 }
1174
1175 void folder_item_scan_foreach(GHashTable *table)
1176 {
1177         g_hash_table_foreach(table, folder_item_scan_foreach_func, NULL);
1178 }
1179
1180 void folder_count_total_cache_memusage(FolderItem *item, gpointer data)
1181 {
1182         gint *memusage = (gint *)data;
1183
1184         if (item->cache == NULL)
1185                 return;
1186         
1187         *memusage += msgcache_get_memory_usage(item->cache);
1188 }
1189
1190 gint folder_cache_time_compare_func(gconstpointer a, gconstpointer b)
1191 {
1192         FolderItem *fa = (FolderItem *)a;
1193         FolderItem *fb = (FolderItem *)b;
1194         
1195         return (gint) (msgcache_get_last_access_time(fa->cache) - msgcache_get_last_access_time(fb->cache));
1196 }
1197
1198 void folder_find_expired_caches(FolderItem *item, gpointer data)
1199 {
1200         GSList **folder_item_list = (GSList **)data;
1201         gint difftime, expiretime;
1202         
1203         if (item->cache == NULL)
1204                 return;
1205
1206         if (item->opened > 0)
1207                 return;
1208
1209         difftime = (gint) (time(NULL) - msgcache_get_last_access_time(item->cache));
1210         expiretime = prefs_common.cache_min_keep_time * 60;
1211         debug_print("Cache unused time: %d (Expire time: %d)\n", difftime, expiretime);
1212         if (difftime > expiretime) {
1213                 *folder_item_list = g_slist_insert_sorted(*folder_item_list, item, folder_cache_time_compare_func);
1214         }
1215 }
1216
1217 void folder_item_free_cache(FolderItem *item)
1218 {
1219         g_return_if_fail(item != NULL);
1220         
1221         if (item->cache == NULL)
1222                 return;
1223         
1224         if (item->opened > 0)
1225                 return;
1226
1227         folder_item_write_cache(item);
1228         msgcache_destroy(item->cache);
1229         item->cache = NULL;
1230 }
1231
1232 void folder_clean_cache_memory()
1233 {
1234         gint memusage = 0;
1235
1236         folder_func_to_all_folders(folder_count_total_cache_memusage, &memusage);       
1237         debug_print("Total cache memory usage: %d\n", memusage);
1238         
1239         if (memusage > (prefs_common.cache_max_mem_usage * 1024)) {
1240                 GSList *folder_item_list = NULL, *listitem;
1241                 
1242                 debug_print("Trying to free cache memory\n");
1243
1244                 folder_func_to_all_folders(folder_find_expired_caches, &folder_item_list);      
1245                 listitem = folder_item_list;
1246                 while((listitem != NULL) && (memusage > (prefs_common.cache_max_mem_usage * 1024))) {
1247                         FolderItem *item = (FolderItem *)(listitem->data);
1248
1249                         debug_print("Freeing cache memory for %s\n", item->path);
1250                         memusage -= msgcache_get_memory_usage(item->cache);
1251                         folder_item_free_cache(item);
1252                         listitem = listitem->next;
1253                 }
1254                 g_slist_free(folder_item_list);
1255         }
1256 }
1257
1258 void folder_item_read_cache(FolderItem *item)
1259 {
1260         gchar *cache_file, *mark_file;
1261         
1262         g_return_if_fail(item != NULL);
1263
1264         cache_file = folder_item_get_cache_file(item);
1265         mark_file = folder_item_get_mark_file(item);
1266         item->cache = msgcache_read_cache(item, cache_file);
1267         if (!item->cache) {
1268                 item->cache = msgcache_new();
1269                 folder_item_scan(item);
1270         }
1271         msgcache_read_mark(item->cache, mark_file);
1272         g_free(cache_file);
1273         g_free(mark_file);
1274
1275         folder_clean_cache_memory();
1276 }
1277
1278 void folder_item_write_cache(FolderItem *item)
1279 {
1280         gchar *cache_file, *mark_file;
1281         PrefsFolderItem *prefs;
1282         gint filemode = 0;
1283         gchar *id;
1284         
1285         if (!item || !item->path || !item->cache)
1286                 return;
1287
1288         id = folder_item_get_identifier(item);
1289         debug_print("Save cache for folder %s\n", id);
1290         g_free(id);
1291
1292         cache_file = folder_item_get_cache_file(item);
1293         mark_file = folder_item_get_mark_file(item);
1294         if (msgcache_write(cache_file, mark_file, item->cache) < 0) {
1295                 prefs = item->prefs;
1296                 if (prefs && prefs->enable_folder_chmod && prefs->folder_chmod) {
1297                         /* for cache file */
1298                         filemode = prefs->folder_chmod;
1299                         if (filemode & S_IRGRP) filemode |= S_IWGRP;
1300                         if (filemode & S_IROTH) filemode |= S_IWOTH;
1301                         chmod(cache_file, filemode);
1302                 }
1303         }
1304
1305         g_free(cache_file);
1306         g_free(mark_file);
1307 }
1308
1309 MsgInfo *folder_item_fetch_msginfo(FolderItem *item, gint num)
1310 {
1311         Folder *folder;
1312         MsgInfo *msginfo;
1313         
1314         g_return_val_if_fail(item != NULL, NULL);
1315         
1316         folder = item->folder;
1317         if (!item->cache)
1318                 folder_item_read_cache(item);
1319         
1320         if ((msginfo = msgcache_get_msg(item->cache, num)) != NULL)
1321                 return msginfo;
1322         
1323         g_return_val_if_fail(folder->fetch_msginfo, NULL);
1324         if ((msginfo = folder->fetch_msginfo(folder, item, num)) != NULL) {
1325                 msgcache_add_msg(item->cache, msginfo);
1326                 return msginfo;
1327         }
1328         
1329         return NULL;
1330 }
1331
1332 MsgInfo *folder_item_fetch_msginfo_by_id(FolderItem *item, const gchar *msgid)
1333 {
1334         Folder *folder;
1335         MsgInfo *msginfo;
1336         
1337         g_return_val_if_fail(item != NULL, NULL);
1338         
1339         folder = item->folder;
1340         if (!item->cache)
1341                 folder_item_read_cache(item);
1342         
1343         if ((msginfo = msgcache_get_msg_by_id(item->cache, msgid)) != NULL)
1344                 return msginfo;
1345
1346         return NULL;
1347 }
1348
1349 GSList *folder_item_get_msg_list(FolderItem *item)
1350 {
1351         g_return_val_if_fail(item != NULL, NULL);
1352         
1353         if (item->cache == 0)
1354                 folder_item_read_cache(item);
1355
1356         g_return_val_if_fail(item->cache != NULL, NULL);
1357         
1358         return msgcache_get_msg_list(item->cache);
1359 }
1360
1361 gchar *folder_item_fetch_msg(FolderItem *item, gint num)
1362 {
1363         Folder *folder;
1364
1365         g_return_val_if_fail(item != NULL, NULL);
1366
1367         folder = item->folder;
1368
1369         g_return_val_if_fail(folder->fetch_msg != NULL, NULL);
1370
1371         return folder->fetch_msg(folder, item, num);
1372 }
1373
1374 gint folder_item_add_msg(FolderItem *dest, const gchar *file,
1375                          gboolean remove_source)
1376 {
1377         Folder *folder;
1378         gint num;
1379         MsgInfo *msginfo;
1380
1381         g_return_val_if_fail(dest != NULL, -1);
1382         g_return_val_if_fail(file != NULL, -1);
1383
1384         folder = dest->folder;
1385
1386         g_return_val_if_fail(folder->add_msg != NULL, -1);
1387
1388         if (!dest->cache)
1389                 folder_item_read_cache(dest);
1390
1391         num = folder->add_msg(folder, dest, file, remove_source);
1392
1393         if (num > 0) {
1394                 msginfo = folder->fetch_msginfo(folder, dest, num);
1395
1396                 if (msginfo != NULL) {
1397                         if (MSG_IS_NEW(msginfo->flags))
1398                                 dest->new++;
1399                         if (MSG_IS_UNREAD(msginfo->flags))
1400                                 dest->unread++;
1401                         dest->total++;
1402
1403                         msgcache_add_msg(dest->cache, msginfo);
1404
1405                         procmsg_msginfo_free(msginfo);
1406                 }
1407
1408                 dest->last_num = num;
1409         }
1410
1411         return num;
1412 }
1413
1414 /*
1415 gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
1416 {
1417         Folder *folder;
1418         gint num;
1419
1420         g_return_val_if_fail(dest != NULL, -1);
1421         g_return_val_if_fail(msginfo != NULL, -1);
1422
1423         folder = dest->folder;
1424         if (dest->last_num < 0) folder->scan(folder, dest);
1425
1426         num = folder->move_msg(folder, dest, msginfo);
1427         if (num > 0) dest->last_num = num;
1428
1429         return num;
1430 }
1431 */
1432
1433 gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
1434 {
1435         Folder *folder;
1436         gint num;
1437         Folder *src_folder;
1438
1439         g_return_val_if_fail(dest != NULL, -1);
1440         g_return_val_if_fail(msginfo != NULL, -1);
1441
1442         folder = dest->folder;
1443
1444         g_return_val_if_fail(folder->remove_msg != NULL, -1);
1445         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1446
1447         if (!dest->cache) folder_item_read_cache(dest);
1448
1449         src_folder = msginfo->folder->folder;
1450
1451         num = folder->copy_msg(folder, dest, msginfo);
1452         
1453         if (num != -1) {
1454                 MsgInfo *newmsginfo;
1455     
1456                 /* Add new msginfo to dest folder */
1457                 if (NULL != (newmsginfo = folder->fetch_msginfo(folder, dest, num))) {
1458                         newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1459                         
1460                         if (dest->stype == F_OUTBOX || dest->stype == F_QUEUE  ||
1461                             dest->stype == F_DRAFT  || dest->stype == F_TRASH)
1462                                 MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1463                                                      MSG_NEW|MSG_UNREAD|MSG_DELETED);
1464                         msgcache_add_msg(dest->cache, newmsginfo);
1465
1466                         if (MSG_IS_NEW(newmsginfo->flags))
1467                                 dest->new++;
1468                         if (MSG_IS_UNREAD(newmsginfo->flags))
1469                                 dest->unread++;
1470                         dest->total++;
1471                         dest->need_update = TRUE;
1472
1473                         procmsg_msginfo_free(newmsginfo);
1474                 }
1475
1476                 /* remove source message from it's folder */
1477                 if (src_folder->remove_msg) {
1478                         src_folder->remove_msg(src_folder, msginfo->folder,
1479                                                msginfo->msgnum);
1480                         msgcache_remove_msg(msginfo->folder->cache, msginfo->msgnum);
1481
1482                         if (MSG_IS_NEW(msginfo->flags))
1483                                 msginfo->folder->new--;
1484                         if (MSG_IS_UNREAD(msginfo->flags))
1485                                 msginfo->folder->unread--;
1486                         msginfo->folder->total--;
1487                         msginfo->folder->need_update = TRUE;
1488                 }
1489         }
1490         
1491         if (folder->finished_copy)
1492                 folder->finished_copy(folder, dest);
1493
1494         return num;
1495 }
1496
1497 /*
1498 gint folder_item_move_msgs_with_dest(FolderItem *dest, GSList *msglist)
1499 {
1500         Folder *folder;
1501         gint num;
1502
1503         g_return_val_if_fail(dest != NULL, -1);
1504         g_return_val_if_fail(msglist != NULL, -1);
1505
1506         folder = dest->folder;
1507         if (dest->last_num < 0) folder->scan(folder, dest);
1508
1509         num = folder->move_msgs_with_dest(folder, dest, msglist);
1510         if (num > 0) dest->last_num = num;
1511         else dest->op_count = 0;
1512
1513         return num;
1514 }
1515 */
1516
1517 gint folder_item_move_msgs_with_dest(FolderItem *dest, GSList *msglist)
1518 {
1519         Folder *folder;
1520         FolderItem *item;
1521         GSList *newmsgnums = NULL;
1522         GSList *l, *l2;
1523         gint num;
1524
1525         g_return_val_if_fail(dest != NULL, -1);
1526         g_return_val_if_fail(msglist != NULL, -1);
1527
1528         folder = dest->folder;
1529
1530         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1531         g_return_val_if_fail(folder->remove_msg != NULL, -1);
1532
1533         /* 
1534          * Copy messages to destination folder and 
1535          * store new message numbers in newmsgnums
1536          */
1537         item = NULL;
1538         for (l = msglist ; l != NULL ; l = g_slist_next(l)) {
1539                 MsgInfo * msginfo = (MsgInfo *) l->data;
1540
1541                 if (!item && msginfo->folder != NULL)
1542                         item = msginfo->folder;
1543
1544                 num = folder->copy_msg(folder, dest, msginfo);
1545                 newmsgnums = g_slist_append(newmsgnums, GINT_TO_POINTER(num));
1546         }
1547
1548         /* Read cache for dest folder */
1549         if (!dest->cache) folder_item_read_cache(dest);
1550         
1551         /* 
1552          * Fetch new MsgInfos for new messages in dest folder,
1553          * add them to the msgcache and update folder message counts
1554          */
1555         l2 = newmsgnums;
1556         for (l = msglist; l != NULL; l = g_slist_next(l)) {
1557                 MsgInfo *msginfo = (MsgInfo *) l->data;
1558
1559                 num = GPOINTER_TO_INT(l2->data);
1560
1561                 if (num != -1) {
1562                         MsgInfo *newmsginfo;
1563
1564                         newmsginfo = folder->fetch_msginfo(folder, dest, num);
1565                         if (newmsginfo) {
1566                                 newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1567                                 if (dest->stype == F_OUTBOX ||
1568                                     dest->stype == F_QUEUE  ||
1569                                     dest->stype == F_DRAFT  ||
1570                                     dest->stype == F_TRASH)
1571                                         MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1572                                                              MSG_NEW|MSG_UNREAD|MSG_DELETED);
1573                                 msgcache_add_msg(dest->cache, newmsginfo);
1574
1575                                 if (MSG_IS_NEW(newmsginfo->flags))
1576                                         dest->new++;
1577                                 if (MSG_IS_UNREAD(newmsginfo->flags))
1578                                         dest->unread++;
1579                                 dest->total++;
1580                                 dest->need_update = TRUE;
1581
1582                                 procmsg_msginfo_free(newmsginfo);
1583                         }
1584                 }
1585                 l2 = g_slist_next(l2);
1586         }
1587
1588         /*
1589          * Remove source messages from their folders if
1590          * copying was successfull and update folder
1591          * message counts
1592          */
1593         l2 = newmsgnums;
1594         for (l = msglist; l != NULL; l = g_slist_next(l)) {
1595                 MsgInfo *msginfo = (MsgInfo *) l->data;
1596
1597                 num = GPOINTER_TO_INT(l2->data);
1598                 
1599                 if (num != -1) {
1600                         item->folder->remove_msg(item->folder,
1601                                                  msginfo->folder,
1602                                                  msginfo->msgnum);
1603                         if (!item->cache)
1604                                 folder_item_read_cache(item);
1605                         msgcache_remove_msg(item->cache, msginfo->msgnum);
1606
1607                         if (MSG_IS_NEW(msginfo->flags))
1608                                 msginfo->folder->new--;
1609                         if (MSG_IS_UNREAD(msginfo->flags))
1610                                 msginfo->folder->unread--;
1611                         msginfo->folder->total--;                       
1612                         msginfo->folder->need_update = TRUE;
1613                 }
1614
1615                 l2 = g_slist_next(l2);
1616         }
1617
1618
1619         if (folder->finished_copy)
1620                 folder->finished_copy(folder, dest);
1621
1622         g_slist_free(newmsgnums);
1623         return dest->last_num;
1624 }
1625
1626 /*
1627 gint folder_item_copy_msg(FolderItem *dest, MsgInfo *msginfo)
1628 {
1629         Folder *folder;
1630         gint num;
1631
1632         g_return_val_if_fail(dest != NULL, -1);
1633         g_return_val_if_fail(msginfo != NULL, -1);
1634
1635         folder = dest->folder;
1636         if (dest->last_num < 0) folder->scan(folder, dest);
1637
1638         num = folder->copy_msg(folder, dest, msginfo);
1639         if (num > 0) dest->last_num = num;
1640
1641         return num;
1642 }
1643 */
1644
1645 gint folder_item_copy_msg(FolderItem *dest, MsgInfo *msginfo)
1646 {
1647         Folder *folder;
1648         gint num;
1649
1650         g_return_val_if_fail(dest != NULL, -1);
1651         g_return_val_if_fail(msginfo != NULL, -1);
1652
1653         folder = dest->folder;
1654
1655         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1656
1657         if (!dest->cache) folder_item_read_cache(dest);
1658         
1659         num = folder->copy_msg(folder, dest, msginfo);
1660         if (num != -1) {
1661                 MsgInfo *newmsginfo;
1662
1663                 if (NULL != (newmsginfo = folder->fetch_msginfo(folder, dest, num))) {
1664                         newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1665                         if (dest->stype == F_OUTBOX ||
1666                             dest->stype == F_QUEUE  ||
1667                             dest->stype == F_DRAFT  ||
1668                             dest->stype == F_TRASH)
1669                                 MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1670                                                      MSG_NEW|MSG_UNREAD|MSG_DELETED);
1671                         msgcache_add_msg(dest->cache, newmsginfo);
1672
1673                         if (MSG_IS_NEW(newmsginfo->flags))
1674                                 dest->new++;
1675                         if (MSG_IS_UNREAD(newmsginfo->flags))
1676                                 dest->unread++;
1677                         dest->total++;
1678                         dest->need_update = TRUE;
1679
1680                         procmsg_msginfo_free(newmsginfo);
1681                 }                       
1682         }
1683
1684         if (folder->finished_copy)
1685                 folder->finished_copy(folder, dest);
1686
1687         return num;
1688 }
1689
1690 /*
1691 gint folder_item_copy_msgs_with_dest(FolderItem *dest, GSList *msglist)
1692 {
1693         Folder *folder;
1694         gint num;
1695
1696         g_return_val_if_fail(dest != NULL, -1);
1697         g_return_val_if_fail(msglist != NULL, -1);
1698
1699         folder = dest->folder;
1700         if (dest->last_num < 0) folder->scan(folder, dest);
1701
1702         num = folder->copy_msgs_with_dest(folder, dest, msglist);
1703         if (num > 0) dest->last_num = num;
1704         else dest->op_count = 0;
1705
1706         return num;
1707 }
1708 */
1709
1710 gint folder_item_copy_msgs_with_dest(FolderItem *dest, GSList *msglist)
1711 {
1712         Folder *folder;
1713         gint num;
1714         GSList *newmsgnums = NULL;
1715         GSList *l, *l2;
1716
1717         g_return_val_if_fail(dest != NULL, -1);
1718         g_return_val_if_fail(msglist != NULL, -1);
1719
1720         folder = dest->folder;
1721  
1722         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1723
1724         /* 
1725          * Copy messages to destination folder and 
1726          * store new message numbers in newmsgnums
1727          */
1728         for (l = msglist ; l != NULL ; l = g_slist_next(l)) {
1729                 MsgInfo * msginfo = (MsgInfo *) l->data;
1730
1731                 num = folder->copy_msg(folder, dest, msginfo);
1732                 newmsgnums = g_slist_append(newmsgnums, GINT_TO_POINTER(num));
1733         }
1734
1735         /* Read cache for dest folder */
1736         if (!dest->cache) folder_item_read_cache(dest);
1737
1738         /* 
1739          * Fetch new MsgInfos for new messages in dest folder,
1740          * add them to the msgcache and update folder message counts
1741          */
1742         l2 = newmsgnums;
1743         for (l = msglist; l != NULL; l = g_slist_next(l)) {
1744                 MsgInfo *msginfo = (MsgInfo *) l->data;
1745
1746                 num = GPOINTER_TO_INT(l2->data);
1747
1748                 if (num != -1) {
1749                         MsgInfo *newmsginfo;
1750
1751                         newmsginfo = folder->fetch_msginfo(folder, dest, num);
1752                         if (newmsginfo) {
1753                                 newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1754                                 if (dest->stype == F_OUTBOX ||
1755                                     dest->stype == F_QUEUE  ||
1756                                     dest->stype == F_DRAFT  ||
1757                                     dest->stype == F_TRASH)
1758                                         MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1759                                                              MSG_NEW|MSG_UNREAD|MSG_DELETED);
1760                                 msgcache_add_msg(dest->cache, newmsginfo);
1761
1762                                 if (MSG_IS_NEW(newmsginfo->flags))
1763                                         dest->new++;
1764                                 if (MSG_IS_UNREAD(newmsginfo->flags))
1765                                         dest->unread++;
1766                                 dest->total++;
1767                                 dest->need_update = TRUE;
1768
1769                                 procmsg_msginfo_free(newmsginfo);
1770                         }
1771                 }
1772                 l2 = g_slist_next(l2);
1773         }
1774         
1775         if (folder->finished_copy)
1776                 folder->finished_copy(folder, dest);
1777
1778         g_slist_free(newmsgnums);
1779         return dest->last_num;
1780 }
1781
1782 gint folder_item_remove_msg(FolderItem *item, gint num)
1783 {
1784         Folder *folder;
1785         gint ret;
1786         MsgInfo *msginfo;
1787
1788         g_return_val_if_fail(item != NULL, -1);
1789
1790         folder = item->folder;
1791         if (!item->cache) folder_item_read_cache(item);
1792
1793         ret = folder->remove_msg(folder, item, num);
1794
1795         msginfo = msgcache_get_msg(item->cache, num);
1796         if (msginfo != NULL) {
1797                 if (MSG_IS_NEW(msginfo->flags))
1798                         item->new--;
1799                 if (MSG_IS_UNREAD(msginfo->flags))
1800                         item->unread--;
1801                 procmsg_msginfo_free(msginfo);
1802                 msgcache_remove_msg(item->cache, num);
1803         }
1804         item->total--;
1805         item->need_update = TRUE;
1806
1807         return ret;
1808 }
1809
1810 gint folder_item_remove_msgs(FolderItem *item, GSList *msglist)
1811 {
1812         Folder *folder;
1813         gint ret = 0;
1814
1815         g_return_val_if_fail(item != NULL, -1);
1816         
1817         folder = item->folder;
1818         if (folder->remove_msgs) {
1819                 ret = folder->remove_msgs(folder, item, msglist);
1820                 if (ret == 0)
1821                         folder->scan(folder);
1822                 return ret;
1823         }
1824
1825         if (!item->cache) folder_item_read_cache(item);
1826
1827         while (msglist != NULL) {
1828                 MsgInfo *msginfo = (MsgInfo *)msglist->data;
1829
1830                 ret = folder_item_remove_msg(item, msginfo->msgnum);
1831                 if (ret != 0) break;
1832                 msgcache_remove_msg(item->cache, msginfo->msgnum);
1833                 msglist = msglist->next;
1834         }
1835
1836         return ret;
1837 }
1838
1839 gint folder_item_remove_all_msg(FolderItem *item)
1840 {
1841         Folder *folder;
1842         gint result;
1843
1844         g_return_val_if_fail(item != NULL, -1);
1845
1846         folder = item->folder;
1847
1848         g_return_val_if_fail(folder->remove_all_msg != NULL, -1);
1849
1850         result = folder->remove_all_msg(folder, item);
1851
1852         if (result == 0) {
1853                 if (folder->finished_remove)
1854                         folder->finished_remove(folder, item);
1855
1856                 folder_item_free_cache(item);
1857                 item->cache = msgcache_new();
1858
1859                 item->new = 0;
1860                 item->unread = 0;
1861                 item->total = 0;
1862                 item->need_update = TRUE;
1863         }
1864
1865         return result;
1866 }
1867
1868 gboolean folder_item_is_msg_changed(FolderItem *item, MsgInfo *msginfo)
1869 {
1870         Folder *folder;
1871
1872         g_return_val_if_fail(item != NULL, FALSE);
1873
1874         folder = item->folder;
1875
1876         g_return_val_if_fail(folder->is_msg_changed != NULL, -1);
1877
1878         return folder->is_msg_changed(folder, item, msginfo);
1879 }
1880
1881 gchar *folder_item_get_cache_file(FolderItem *item)
1882 {
1883         gchar *path;
1884         gchar *file;
1885
1886         g_return_val_if_fail(item != NULL, NULL);
1887         g_return_val_if_fail(item->path != NULL, NULL);
1888
1889         path = folder_item_get_path(item);
1890         g_return_val_if_fail(path != NULL, NULL);
1891         if (!is_dir_exist(path))
1892                 make_dir_hier(path);
1893         file = g_strconcat(path, G_DIR_SEPARATOR_S, CACHE_FILE, NULL);
1894         g_free(path);
1895
1896         return file;
1897 }
1898
1899 gchar *folder_item_get_mark_file(FolderItem *item)
1900 {
1901         gchar *path;
1902         gchar *file;
1903
1904         g_return_val_if_fail(item != NULL, NULL);
1905         g_return_val_if_fail(item->path != NULL, NULL);
1906
1907         path = folder_item_get_path(item);
1908         g_return_val_if_fail(path != NULL, NULL);
1909         if (!is_dir_exist(path))
1910                 make_dir_hier(path);
1911         file = g_strconcat(path, G_DIR_SEPARATOR_S, MARK_FILE, NULL);
1912         g_free(path);
1913
1914         return file;
1915 }
1916
1917 static gboolean folder_build_tree(GNode *node, gpointer data)
1918 {
1919         Folder *folder = FOLDER(data);
1920         FolderItem *item;
1921         XMLNode *xmlnode;
1922         GList *list;
1923         SpecialFolderItemType stype = F_NORMAL;
1924         const gchar *name = NULL;
1925         const gchar *path = NULL;
1926         PrefsAccount *account = NULL;
1927         gboolean no_sub = FALSE, no_select = FALSE, collapsed = FALSE, 
1928                  threaded = TRUE, apply_sub = FALSE;
1929         gboolean ret_rcpt = FALSE, hidereadmsgs = FALSE; /* CLAWS */
1930         FolderSortKey sort_key = SORT_BY_NONE;
1931         FolderSortType sort_type = SORT_ASCENDING;
1932         gint new = 0, unread = 0, total = 0;
1933         time_t mtime = 0;
1934
1935         g_return_val_if_fail(node->data != NULL, FALSE);
1936         if (!node->parent) return FALSE;
1937
1938         xmlnode = node->data;
1939         if (strcmp2(xmlnode->tag->tag, "folderitem") != 0) {
1940                 g_warning("tag name != \"folderitem\"\n");
1941                 return FALSE;
1942         }
1943
1944         list = xmlnode->tag->attr;
1945         for (; list != NULL; list = list->next) {
1946                 XMLAttr *attr = list->data;
1947
1948                 if (!attr || !attr->name || !attr->value) continue;
1949                 if (!strcmp(attr->name, "type")) {
1950                         if (!strcasecmp(attr->value, "normal"))
1951                                 stype = F_NORMAL;
1952                         else if (!strcasecmp(attr->value, "inbox"))
1953                                 stype = F_INBOX;
1954                         else if (!strcasecmp(attr->value, "outbox"))
1955                                 stype = F_OUTBOX;
1956                         else if (!strcasecmp(attr->value, "draft"))
1957                                 stype = F_DRAFT;
1958                         else if (!strcasecmp(attr->value, "queue"))
1959                                 stype = F_QUEUE;
1960                         else if (!strcasecmp(attr->value, "trash"))
1961                                 stype = F_TRASH;
1962                 } else if (!strcmp(attr->name, "name"))
1963                         name = attr->value;
1964                 else if (!strcmp(attr->name, "path"))
1965                         path = attr->value;
1966                 else if (!strcmp(attr->name, "mtime"))
1967                         mtime = strtoul(attr->value, NULL, 10);
1968                 else if (!strcmp(attr->name, "new"))
1969                         new = atoi(attr->value);
1970                 else if (!strcmp(attr->name, "unread"))
1971                         unread = atoi(attr->value);
1972                 else if (!strcmp(attr->name, "total"))
1973                         total = atoi(attr->value);
1974                 else if (!strcmp(attr->name, "no_sub"))
1975                         no_sub = *attr->value == '1' ? TRUE : FALSE;
1976                 else if (!strcmp(attr->name, "no_select"))
1977                         no_select = *attr->value == '1' ? TRUE : FALSE;
1978                 else if (!strcmp(attr->name, "collapsed"))
1979                         collapsed = *attr->value == '1' ? TRUE : FALSE;
1980                 else if (!strcmp(attr->name, "threaded"))
1981                         threaded =  *attr->value == '1' ? TRUE : FALSE;
1982                 else if (!strcmp(attr->name, "hidereadmsgs"))
1983                         hidereadmsgs =  *attr->value == '1' ? TRUE : FALSE;
1984                 else if (!strcmp(attr->name, "reqretrcpt"))
1985                         ret_rcpt =  *attr->value == '1' ? TRUE : FALSE;
1986                 else if (!strcmp(attr->name, "sort_key")) {
1987                         if (!strcmp(attr->value, "none"))
1988                                 sort_key = SORT_BY_NONE;
1989                         else if (!strcmp(attr->value, "number"))
1990                                 sort_key = SORT_BY_NUMBER;
1991                         else if (!strcmp(attr->value, "size"))
1992                                 sort_key = SORT_BY_SIZE;
1993                         else if (!strcmp(attr->value, "date"))
1994                                 sort_key = SORT_BY_DATE;
1995                         else if (!strcmp(attr->value, "from"))
1996                                 sort_key = SORT_BY_FROM;
1997                         else if (!strcmp(attr->value, "subject"))
1998                                 sort_key = SORT_BY_SUBJECT;
1999                         else if (!strcmp(attr->value, "score"))
2000                                 sort_key = SORT_BY_SCORE;
2001                         else if (!strcmp(attr->value, "label"))
2002                                 sort_key = SORT_BY_LABEL;
2003                         else if (!strcmp(attr->value, "mark"))
2004                                 sort_key = SORT_BY_MARK;
2005                         else if (!strcmp(attr->value, "unread"))
2006                                 sort_key = SORT_BY_UNREAD;
2007                         else if (!strcmp(attr->value, "mime"))
2008                                 sort_key = SORT_BY_MIME;
2009                         else if (!strcmp(attr->value, "locked"))
2010                                 sort_key = SORT_BY_LOCKED;
2011                 } else if (!strcmp(attr->name, "sort_type")) {
2012                         if (!strcmp(attr->value, "ascending"))
2013                                 sort_type = SORT_ASCENDING;
2014                         else
2015                                 sort_type = SORT_DESCENDING;
2016                 } else if (!strcmp(attr->name, "account_id")) {
2017                         account = account_find_from_id(atoi(attr->value));
2018                         if (!account) g_warning("account_id: %s not found\n",
2019                                                 attr->value);
2020                 } else if (!strcmp(attr->name, "apply_sub"))
2021                         apply_sub = *attr->value == '1' ? TRUE : FALSE;
2022         }
2023
2024         item = folder_item_new(folder, name, path);
2025         item->stype = stype;
2026         item->mtime = mtime;
2027         item->new = new;
2028         item->unread = unread;
2029         item->total = total;
2030         item->no_sub = no_sub;
2031         item->no_select = no_select;
2032         item->collapsed = collapsed;
2033         item->threaded  = threaded;
2034         item->hide_read_msgs  = hidereadmsgs;
2035         item->ret_rcpt  = ret_rcpt;
2036         item->sort_key  = sort_key;
2037         item->sort_type = sort_type;
2038         item->parent = FOLDER_ITEM(node->parent->data);
2039         item->folder = folder;
2040         switch (stype) {
2041         case F_INBOX:  folder->inbox  = item; break;
2042         case F_OUTBOX: folder->outbox = item; break;
2043         case F_DRAFT:  folder->draft  = item; break;
2044         case F_QUEUE:  folder->queue  = item; break;
2045         case F_TRASH:  folder->trash  = item; break;
2046         default:       break;
2047         }
2048         item->account = account;
2049         item->apply_sub = apply_sub;
2050         prefs_folder_item_read_config(item);
2051
2052         node->data = item;
2053         xml_free_node(xmlnode);
2054
2055         return FALSE;
2056 }
2057
2058 static gboolean folder_read_folder_func(GNode *node, gpointer data)
2059 {
2060         Folder *folder;
2061         XMLNode *xmlnode;
2062         GList *list;
2063         FolderType type = F_UNKNOWN;
2064         const gchar *name = NULL;
2065         const gchar *path = NULL;
2066         PrefsAccount *account = NULL;
2067         gboolean collapsed = FALSE, threaded = TRUE, apply_sub = FALSE;
2068         gboolean ret_rcpt = FALSE; /* CLAWS */
2069
2070         if (g_node_depth(node) != 2) return FALSE;
2071         g_return_val_if_fail(node->data != NULL, FALSE);
2072
2073         xmlnode = node->data;
2074         if (strcmp2(xmlnode->tag->tag, "folder") != 0) {
2075                 g_warning("tag name != \"folder\"\n");
2076                 return TRUE;
2077         }
2078         g_node_unlink(node);
2079         list = xmlnode->tag->attr;
2080         for (; list != NULL; list = list->next) {
2081                 XMLAttr *attr = list->data;
2082
2083                 if (!attr || !attr->name || !attr->value) continue;
2084                 if (!strcmp(attr->name, "type")) {
2085                         if (!strcasecmp(attr->value, "mh"))
2086                                 type = F_MH;
2087                         else if (!strcasecmp(attr->value, "mbox"))
2088                                 type = F_MBOX;
2089                         else if (!strcasecmp(attr->value, "maildir"))
2090                                 type = F_MAILDIR;
2091                         else if (!strcasecmp(attr->value, "imap"))
2092                                 type = F_IMAP;
2093                         else if (!strcasecmp(attr->value, "news"))
2094                                 type = F_NEWS;
2095                 } else if (!strcmp(attr->name, "name"))
2096                         name = attr->value;
2097                 else if (!strcmp(attr->name, "path"))
2098                         path = attr->value;
2099                 else if (!strcmp(attr->name, "collapsed"))
2100                         collapsed = *attr->value == '1' ? TRUE : FALSE;
2101                 else if (!strcmp(attr->name, "threaded"))
2102                         threaded = *attr->value == '1' ? TRUE : FALSE;
2103                 else if (!strcmp(attr->name, "account_id")) {
2104                         account = account_find_from_id(atoi(attr->value));
2105                         if (!account) g_warning("account_id: %s not found\n",
2106                                                 attr->value);
2107                 } else if (!strcmp(attr->name, "apply_sub"))
2108                         apply_sub = *attr->value == '1' ? TRUE : FALSE;
2109                 else if (!strcmp(attr->name, "reqretrcpt"))
2110                         ret_rcpt = *attr->value == '1' ? TRUE : FALSE;
2111         }
2112
2113         folder = folder_new(type, name, path);
2114         g_return_val_if_fail(folder != NULL, FALSE);
2115         folder->account = account;
2116         if (account && (type == F_IMAP || type == F_NEWS))
2117                 account->folder = REMOTE_FOLDER(folder);
2118         node->data = folder->node->data;
2119         g_node_destroy(folder->node);
2120         folder->node = node;
2121         folder_add(folder);
2122         FOLDER_ITEM(node->data)->collapsed = collapsed;
2123         FOLDER_ITEM(node->data)->threaded  = threaded;
2124         FOLDER_ITEM(node->data)->account   = account;
2125         FOLDER_ITEM(node->data)->apply_sub = apply_sub;
2126         FOLDER_ITEM(node->data)->ret_rcpt  = ret_rcpt;
2127
2128         g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
2129                         folder_build_tree, folder);
2130
2131         return FALSE;
2132 }
2133
2134 static gchar *folder_get_list_path(void)
2135 {
2136         static gchar *filename = NULL;
2137
2138         if (!filename)
2139                 filename =  g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
2140                                         FOLDER_LIST, NULL);
2141
2142         return filename;
2143 }
2144
2145 static void folder_write_list_recursive(GNode *node, gpointer data)
2146 {
2147         FILE *fp = (FILE *)data;
2148         FolderItem *item;
2149         gint i, depth;
2150         static gchar *folder_type_str[] = {"mh", "mbox", "maildir", "imap",
2151                                            "news", "unknown"};
2152         static gchar *folder_item_stype_str[] = {"normal", "inbox", "outbox",
2153                                                  "draft", "queue", "trash"};
2154         static gchar *sort_key_str[] = {"none", "number", "size", "date",
2155                                         "from", "subject", "score", "label",
2156                                         "mark", "unread", "mime", "locked" };
2157         g_return_if_fail(node != NULL);
2158         g_return_if_fail(fp != NULL);
2159
2160         item = FOLDER_ITEM(node->data);
2161         g_return_if_fail(item != NULL);
2162
2163         depth = g_node_depth(node);
2164         for (i = 0; i < depth; i++)
2165                 fputs("    ", fp);
2166         if (depth == 1) {
2167                 Folder *folder = item->folder;
2168
2169                 fprintf(fp, "<folder type=\"%s\"", folder_type_str[folder->type]);
2170                 if (folder->name) {
2171                         fputs(" name=\"", fp);
2172                         xml_file_put_escape_str(fp, folder->name);
2173                         fputs("\"", fp);
2174                 }
2175                 if ((folder->type == F_MH) || (folder->type == F_MBOX)) {
2176                         fputs(" path=\"", fp);
2177                         xml_file_put_escape_str
2178                                 (fp, LOCAL_FOLDER(folder)->rootpath);
2179                         fputs("\"", fp);
2180                 }
2181                 if (item->collapsed && node->children)
2182                         fputs(" collapsed=\"1\"", fp);
2183                 if (folder->account)
2184                         fprintf(fp, " account_id=\"%d\"",
2185                                 folder->account->account_id);
2186                 if (item->apply_sub)
2187                         fputs(" apply_sub=\"1\"", fp);
2188                 if (item->ret_rcpt) 
2189                         fputs(" reqretrcpt=\"1\"", fp);
2190         } else {
2191                 fprintf(fp, "<folderitem type=\"%s\"",
2192                         folder_item_stype_str[item->stype]);
2193                 if (item->name) {
2194                         fputs(" name=\"", fp);
2195                         xml_file_put_escape_str(fp, item->name);
2196                         fputs("\"", fp);
2197                 }
2198                 if (item->path) {
2199                         fputs(" path=\"", fp);
2200                         xml_file_put_escape_str(fp, item->path);
2201                         fputs("\"", fp);
2202                 }
2203                 
2204                 if (item->no_sub)
2205                         fputs(" no_sub=\"1\"", fp);
2206                 if (item->no_select)
2207                         fputs(" no_select=\"1\"", fp);
2208                 if (item->collapsed && node->children)
2209                         fputs(" collapsed=\"1\"", fp);
2210                 if (item->threaded)
2211                         fputs(" threaded=\"1\"", fp);
2212                 else
2213                         fputs(" threaded=\"0\"", fp);
2214                 if (item->hide_read_msgs)
2215                         fputs(" hidereadmsgs=\"1\"", fp);
2216                 else
2217                         fputs(" hidereadmsgs=\"0\"", fp);
2218                 if (item->ret_rcpt)
2219                         fputs(" reqretrcpt=\"1\"", fp);
2220
2221                 if (item->sort_key != SORT_BY_NONE) {
2222                         fprintf(fp, " sort_key=\"%s\"",
2223                                 sort_key_str[item->sort_key]);
2224                         if (item->sort_type == SORT_ASCENDING)
2225                                 fprintf(fp, " sort_type=\"ascending\"");
2226                         else
2227                                 fprintf(fp, " sort_type=\"descending\"");
2228                 }
2229
2230                 fprintf(fp,
2231                         " mtime=\"%lu\" new=\"%d\" unread=\"%d\" total=\"%d\"",
2232                         item->mtime, item->new, item->unread, item->total);
2233                         
2234                 if (item->account)
2235                         fprintf(fp, " account_id=\"%d\"",
2236                                 item->account->account_id);
2237                 if (item->apply_sub)
2238                         fputs(" apply_sub=\"1\"", fp);
2239         }
2240
2241         if (node->children) {
2242                 GNode *child;
2243                 fputs(">\n", fp);
2244
2245                 child = node->children;
2246                 while (child) {
2247                         GNode *cur;
2248
2249                         cur = child;
2250                         child = cur->next;
2251                         folder_write_list_recursive(cur, data);
2252                 }
2253
2254                 for (i = 0; i < depth; i++)
2255                         fputs("    ", fp);
2256                 fprintf(fp, "</%s>\n", depth == 1 ? "folder" : "folderitem");
2257         } else
2258                 fputs(" />\n", fp);
2259 }
2260
2261 static void folder_update_op_count_rec(GNode *node) {
2262         FolderItem *fitem = FOLDER_ITEM(node->data);
2263
2264         if (g_node_depth(node) > 0) {
2265                 if (fitem->op_count > 0) {
2266                         fitem->op_count = 0;
2267                         folderview_update_item(fitem, 0);
2268                 }
2269                 if (node->children) {
2270                         GNode *child;
2271
2272                         child = node->children;
2273                         while (child) {
2274                                 GNode *cur;
2275
2276                                 cur = child;
2277                                 child = cur->next;
2278                                 folder_update_op_count_rec(cur);
2279                         }
2280                 }
2281         }
2282 }
2283
2284 void folder_update_op_count() {
2285         GList *cur;
2286         Folder *folder;
2287
2288         for (cur = folder_list; cur != NULL; cur = cur->next) {
2289                 folder = cur->data;
2290                 folder_update_op_count_rec(folder->node);
2291         }
2292 }
2293
2294 typedef struct _type_str {
2295         gchar * str;
2296         gint type;
2297 } type_str;
2298
2299
2300 /*
2301 static gchar * folder_item_get_tree_identifier(FolderItem * item)
2302 {
2303         if (item->parent != NULL) {
2304                 gchar * path;
2305                 gchar * id;
2306
2307                 path = folder_item_get_tree_identifier(item->parent);
2308                 if (path == NULL)
2309                         return NULL;
2310
2311                 id = g_strconcat(path, "/", item->name, NULL);
2312                 g_free(path);
2313
2314                 return id;
2315         }
2316         else {
2317                 return g_strconcat("/", item->name, NULL);
2318         }
2319 }
2320 */
2321
2322 /* CLAWS: temporary local folder for filtering */
2323 static Folder *processing_folder;
2324 static FolderItem *processing_folder_item;
2325
2326 static void folder_create_processing_folder(void)
2327 {
2328 #define PROCESSING_FOLDER ".processing" 
2329         Folder     *tmpparent;
2330         gchar      *tmpname;
2331
2332         tmpparent = folder_get_default_folder();
2333         g_assert(tmpparent);
2334         debug_print("tmpparentroot %s\n", LOCAL_FOLDER(tmpparent)->rootpath);
2335         if (LOCAL_FOLDER(tmpparent)->rootpath[0] == '/')
2336                 tmpname = g_strconcat(LOCAL_FOLDER(tmpparent)->rootpath,
2337                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER,
2338                                       NULL);
2339         else
2340                 tmpname = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
2341                                       LOCAL_FOLDER(tmpparent)->rootpath,
2342                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER,
2343                                       NULL);
2344
2345         processing_folder = folder_new(F_MH, "PROCESSING", LOCAL_FOLDER(tmpparent)->rootpath);
2346         g_assert(processing_folder);
2347
2348         if (!is_dir_exist(tmpname)) {
2349                 debug_print("*TMP* creating %s\n", tmpname);
2350                 processing_folder_item = processing_folder->create_folder(processing_folder,
2351                                                                           processing_folder->node->data,
2352                                                                           PROCESSING_FOLDER);
2353                 g_assert(processing_folder_item);                                                                         
2354         }
2355         else {
2356                 debug_print("*TMP* already created\n");
2357                 processing_folder_item = folder_item_new(processing_folder, ".processing", ".processing");
2358                 g_assert(processing_folder_item);
2359                 folder_item_append(processing_folder->node->data, processing_folder_item);
2360         }
2361         g_free(tmpname);
2362 }
2363
2364 FolderItem *folder_get_default_processing(void)
2365 {
2366         if (!processing_folder_item) {
2367                 folder_create_processing_folder();
2368         }
2369         return processing_folder_item;
2370 }
2371
2372 /* folder_persist_prefs_new() - return hash table with persistent
2373  * settings (and folder name as key). 
2374  * (note that in claws other options are in the PREFS_FOLDER_ITEM_RC
2375  * file, so those don't need to be included in PersistPref yet) 
2376  */
2377 GHashTable *folder_persist_prefs_new(Folder *folder)
2378 {
2379         GHashTable *pptable;
2380
2381         g_return_val_if_fail(folder, NULL);
2382         pptable = g_hash_table_new(g_str_hash, g_str_equal);
2383         folder_get_persist_prefs_recursive(folder->node, pptable);
2384         return pptable;
2385 }
2386
2387 void folder_persist_prefs_free(GHashTable *pptable)
2388 {
2389         g_return_if_fail(pptable);
2390         g_hash_table_foreach_remove(pptable, persist_prefs_free, NULL);
2391         g_hash_table_destroy(pptable);
2392 }
2393
2394 const PersistPrefs *folder_get_persist_prefs(GHashTable *pptable, const char *name)
2395 {
2396         if (pptable == NULL || name == NULL) return NULL;
2397         return g_hash_table_lookup(pptable, name);
2398 }
2399
2400 void folder_item_restore_persist_prefs(FolderItem *item, GHashTable *pptable)
2401 {
2402         const PersistPrefs *pp;
2403         gchar *id = folder_item_get_identifier(item);
2404
2405         pp = folder_get_persist_prefs(pptable, id); 
2406         g_free(id);
2407
2408         if (!pp) return;
2409
2410         /* CLAWS: since not all folder properties have been migrated to 
2411          * folderlist.xml, we need to call the old stuff first before
2412          * setting things that apply both to Main and Claws. */
2413         prefs_folder_item_read_config(item); 
2414          
2415         item->collapsed = pp->collapsed;
2416         item->threaded  = pp->threaded;
2417         item->ret_rcpt  = pp->ret_rcpt;
2418         item->hide_read_msgs = pp->hide_read_msgs;
2419         item->sort_key  = pp->sort_key;
2420         item->sort_type = pp->sort_type;
2421 }
2422
2423 static void folder_get_persist_prefs_recursive(GNode *node, GHashTable *pptable)
2424 {
2425         FolderItem *item = FOLDER_ITEM(node->data);
2426         PersistPrefs *pp;
2427         GNode *child, *cur;
2428         gchar *id;
2429
2430         g_return_if_fail(node != NULL);
2431         g_return_if_fail(item != NULL);
2432
2433         /* NOTE: item->path == NULL means top level folder; not interesting
2434          * to store preferences of that one.  */
2435         if (item->path) {
2436                 id = folder_item_get_identifier(item);
2437                 pp = g_new0(PersistPrefs, 1);
2438                 g_return_if_fail(pp != NULL);
2439                 pp->collapsed = item->collapsed;
2440                 pp->threaded  = item->threaded;
2441                 pp->ret_rcpt  = item->ret_rcpt; 
2442                 pp->hide_read_msgs = item->hide_read_msgs;
2443                 pp->sort_key  = item->sort_key;
2444                 pp->sort_type = item->sort_type;
2445                 g_hash_table_insert(pptable, id, pp);
2446         }
2447
2448         if (node->children) {
2449                 child = node->children;
2450                 while (child) {
2451                         cur = child;
2452                         child = cur->next;
2453                         folder_get_persist_prefs_recursive(cur, pptable);
2454                 }
2455         }       
2456 }
2457
2458 static gboolean persist_prefs_free(gpointer key, gpointer val, gpointer data)
2459 {
2460         if (key) 
2461                 g_free(key);
2462         if (val) 
2463                 g_free(val);
2464         return TRUE;    
2465 }
2466
2467 void folder_item_apply_processing(FolderItem *item)
2468 {
2469         GSList *processing_list;
2470         GSList *mlist, *cur;
2471         
2472         g_return_if_fail(item != NULL);
2473         
2474         processing_list = item->prefs->processing;
2475         if (processing_list == NULL)
2476                 return;
2477
2478         mlist = folder_item_get_msg_list(item);
2479         
2480         for (cur = mlist ; cur != NULL ; cur = cur->next) {
2481                 MsgInfo * msginfo;
2482
2483                 msginfo = (MsgInfo *) cur->data;
2484                 filter_message_by_msginfo(processing_list, msginfo);
2485                 procmsg_msginfo_free(msginfo);
2486         }
2487         
2488         folderview_update_items_when_required(FALSE);
2489
2490         g_slist_free(mlist);
2491 }