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