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