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