9fc79f721e3e2aa85dc204c152b576800ae56c5b
[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         difftime = (gint) (time(NULL) - msgcache_get_last_access_time(item->cache));
1103         expiretime = prefs_common.cache_min_keep_time * 60;
1104         debug_print(_("Cache unused time: %d (Expire time: %d)\n"), difftime, expiretime);
1105         if(difftime > expiretime) {
1106                 *folder_item_list = g_slist_insert_sorted(*folder_item_list, item, folder_cache_time_compare_func);
1107         }
1108 }
1109
1110 void folder_item_free_cache(FolderItem *item)
1111 {
1112         g_return_if_fail(item != NULL);
1113         
1114         if(item->cache == NULL)
1115                 return;
1116         
1117         folder_item_write_cache(item);
1118         msgcache_destroy(item->cache);
1119         item->cache = NULL;
1120 }
1121
1122 void folder_clean_cache_memory()
1123 {
1124         gint memusage = 0;
1125
1126         folder_func_to_all_folders(folder_count_total_cache_memusage, &memusage);       
1127         debug_print(_("Total cache memory usage: %d\n"), memusage);
1128         
1129         if(memusage > (prefs_common.cache_max_mem_usage * 1024)) {
1130                 GSList *folder_item_list = NULL, *listitem;
1131                 
1132                 debug_print(_("Trying to free cache memory\n"));
1133
1134                 folder_func_to_all_folders(folder_find_expired_caches, &folder_item_list);      
1135                 listitem = folder_item_list;
1136                 while((listitem != NULL) && (memusage > (prefs_common.cache_max_mem_usage * 1024))) {
1137                         FolderItem *item = (FolderItem *)(listitem->data);
1138
1139                         debug_print(_("Freeing cache memory for %s\n"), item->path);
1140                         memusage -= msgcache_get_memory_usage(item->cache);
1141                         folder_item_free_cache(item);
1142                         listitem = listitem->next;
1143                 }
1144                 g_slist_free(folder_item_list);
1145         }
1146 }
1147
1148 void folder_item_read_cache(FolderItem *item)
1149 {
1150         gchar *cache_file, *mark_file;
1151         
1152         g_return_if_fail(item != NULL);
1153
1154         cache_file = folder_item_get_cache_file(item);
1155         mark_file = folder_item_get_mark_file(item);
1156         item->cache = msgcache_read_cache(item, cache_file);
1157         if(!item->cache) {
1158                 item->cache = msgcache_new();
1159                 folder_item_scan(item);
1160         }
1161         msgcache_read_mark(item->cache, mark_file);
1162         g_free(cache_file);
1163         g_free(mark_file);
1164
1165         folder_clean_cache_memory();
1166 }
1167
1168 void folder_item_write_cache(FolderItem *item)
1169 {
1170         gchar *cache_file, *mark_file;
1171         PrefsFolderItem *prefs;
1172         gint filemode = 0;
1173         gchar *id;
1174         
1175         if (!item || !item->path || !item->cache)
1176                 return;
1177
1178         id = folder_item_get_identifier(item);
1179         debug_print(_("Save cache for folder %s\n"), id);
1180         g_free(id);
1181
1182         cache_file = folder_item_get_cache_file(item);
1183         mark_file = folder_item_get_mark_file(item);
1184         if(msgcache_write(cache_file, mark_file, item->cache) < 0) {
1185                 prefs = item->prefs;
1186                 if (prefs && prefs->enable_folder_chmod && prefs->folder_chmod) {
1187                         /* for cache file */
1188                         filemode = prefs->folder_chmod;
1189                         if (filemode & S_IRGRP) filemode |= S_IWGRP;
1190                         if (filemode & S_IROTH) filemode |= S_IWOTH;
1191                         chmod(cache_file, filemode);
1192                 }
1193         }
1194
1195         g_free(cache_file);
1196         g_free(mark_file);
1197 }
1198
1199 MsgInfo *folder_item_fetch_msginfo(FolderItem *item, gint num)
1200 {
1201         Folder *folder;
1202         MsgInfo *msginfo;
1203         
1204         g_return_val_if_fail(item != NULL, NULL);
1205         
1206         folder = item->folder;
1207         if(!item->cache)
1208                 folder_item_read_cache(item);
1209         
1210         if((msginfo = msgcache_get_msg(item->cache, num)) != NULL)
1211                 return msginfo;
1212         
1213         g_return_val_if_fail(folder->fetch_msginfo, NULL);
1214         if((msginfo = folder->fetch_msginfo(folder, item, num)) != NULL) {
1215                 msgcache_add_msg(item->cache, msginfo);
1216                 return msginfo;
1217         }
1218         
1219         return NULL;
1220 }
1221
1222 MsgInfo *folder_item_fetch_msginfo_by_id(FolderItem *item, const gchar *msgid)
1223 {
1224         Folder *folder;
1225         MsgInfo *msginfo;
1226         
1227         g_return_val_if_fail(item != NULL, NULL);
1228         
1229         folder = item->folder;
1230         if(!item->cache)
1231                 folder_item_read_cache(item);
1232         
1233         if((msginfo = msgcache_get_msg_by_id(item->cache, msgid)) != NULL)
1234                 return msginfo;
1235
1236         return NULL;
1237 }
1238
1239 GSList *folder_item_get_msg_list(FolderItem *item)
1240 {
1241         g_return_val_if_fail(item != NULL, NULL);
1242         
1243         if(item->cache == 0)
1244                 folder_item_read_cache(item);
1245
1246         g_return_val_if_fail(item->cache != NULL, NULL);
1247         
1248         return msgcache_get_msg_list(item->cache);
1249 }
1250
1251 gchar *folder_item_fetch_msg(FolderItem *item, gint num)
1252 {
1253         Folder *folder;
1254
1255         g_return_val_if_fail(item != NULL, NULL);
1256
1257         folder = item->folder;
1258
1259         g_return_val_if_fail(folder->fetch_msg != NULL, NULL);
1260
1261         return folder->fetch_msg(folder, item, num);
1262 }
1263
1264 gint folder_item_add_msg(FolderItem *dest, const gchar *file,
1265                          gboolean remove_source)
1266 {
1267         Folder *folder;
1268         gint num;
1269         MsgInfo *msginfo;
1270
1271         g_return_val_if_fail(dest != NULL, -1);
1272         g_return_val_if_fail(file != NULL, -1);
1273
1274         folder = dest->folder;
1275
1276         g_return_val_if_fail(folder->add_msg != NULL, -1);
1277
1278         if (!dest->cache)
1279                 folder_item_read_cache(dest);
1280
1281         num = folder->add_msg(folder, dest, file, remove_source);
1282
1283         if (num > 0) {
1284                 msginfo = folder->fetch_msginfo(folder, dest, num);
1285
1286                 if(msginfo != NULL) {
1287                         if(MSG_IS_NEW(msginfo->flags))
1288                                 dest->new++;
1289                         if(MSG_IS_UNREAD(msginfo->flags))
1290                                 dest->unread++;
1291                         dest->total++;
1292
1293                         msgcache_add_msg(dest->cache, msginfo);
1294
1295                         procmsg_msginfo_free(msginfo);
1296                 }
1297
1298                 dest->last_num = num;
1299         }
1300
1301         return num;
1302 }
1303
1304 /*
1305 gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
1306 {
1307         Folder *folder;
1308         gint num;
1309
1310         g_return_val_if_fail(dest != NULL, -1);
1311         g_return_val_if_fail(msginfo != NULL, -1);
1312
1313         folder = dest->folder;
1314         if (dest->last_num < 0) folder->scan(folder, dest);
1315
1316         num = folder->move_msg(folder, dest, msginfo);
1317         if (num > 0) dest->last_num = num;
1318
1319         return num;
1320 }
1321 */
1322
1323 gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
1324 {
1325         Folder *folder;
1326         gint num;
1327         Folder * src_folder;
1328
1329         g_return_val_if_fail(dest != NULL, -1);
1330         g_return_val_if_fail(msginfo != NULL, -1);
1331
1332         folder = dest->folder;
1333
1334         g_return_val_if_fail(folder->remove_msg != NULL, -1);
1335         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1336
1337         if (!dest->cache) folder_item_read_cache(dest);
1338
1339         src_folder = msginfo->folder->folder;
1340
1341         num = folder->copy_msg(folder, dest, msginfo);
1342         
1343         if (num != -1) {
1344                 MsgInfo *newmsginfo;
1345
1346                 newmsginfo = folder->fetch_msginfo(folder, dest, num);
1347                 newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1348                 if (dest->stype == F_OUTBOX ||
1349                     dest->stype == F_QUEUE  ||
1350                     dest->stype == F_DRAFT  ||
1351                     dest->stype == F_TRASH)
1352                         MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1353                                              MSG_NEW|MSG_UNREAD|MSG_DELETED);
1354                 msgcache_add_msg(dest->cache, newmsginfo);
1355
1356                 /* CLAWS */
1357                 if(src_folder->remove_msg) {
1358                         src_folder->remove_msg(src_folder,
1359                                                msginfo->folder,
1360                                                msginfo->msgnum);
1361                 }
1362                 msgcache_remove_msg(msginfo->folder->cache, msginfo->msgnum);
1363
1364                 if (MSG_IS_NEW(msginfo->flags))
1365                         msginfo->folder->new--;
1366                 if (MSG_IS_NEW(newmsginfo->flags))
1367                         dest->new++;
1368                 if (MSG_IS_UNREAD(msginfo->flags))
1369                         msginfo->folder->unread--;
1370                 if (MSG_IS_UNREAD(newmsginfo->flags))
1371                         dest->unread++;
1372                 msginfo->folder->total--;
1373                 dest->total++;
1374
1375                 procmsg_msginfo_free(newmsginfo);
1376         }
1377         
1378         if (folder->finished_copy)
1379                 folder->finished_copy(folder, dest);
1380
1381         return num;
1382 }
1383
1384 /*
1385 gint folder_item_move_msgs_with_dest(FolderItem *dest, GSList *msglist)
1386 {
1387         Folder *folder;
1388         gint num;
1389
1390         g_return_val_if_fail(dest != NULL, -1);
1391         g_return_val_if_fail(msglist != NULL, -1);
1392
1393         folder = dest->folder;
1394         if (dest->last_num < 0) folder->scan(folder, dest);
1395
1396         num = folder->move_msgs_with_dest(folder, dest, msglist);
1397         if (num > 0) dest->last_num = num;
1398         else dest->op_count = 0;
1399
1400         return num;
1401 }
1402 */
1403
1404 gint folder_item_move_msgs_with_dest(FolderItem *dest, GSList *msglist)
1405 {
1406         Folder *folder;
1407         FolderItem *item;
1408         GSList *newmsgnums = NULL;
1409         GSList *l, *l2;
1410         gint num;
1411
1412         g_return_val_if_fail(dest != NULL, -1);
1413         g_return_val_if_fail(msglist != NULL, -1);
1414
1415         folder = dest->folder;
1416
1417         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1418         g_return_val_if_fail(folder->remove_msg != NULL, -1);
1419
1420         /* 
1421          * Copy messages to destination folder and 
1422          * store new message numbers in newmsgnums
1423          */
1424         item = NULL;
1425         for(l = msglist ; l != NULL ; l = g_slist_next(l)) {
1426                 MsgInfo * msginfo = (MsgInfo *) l->data;
1427
1428                 if (!item && msginfo->folder != NULL)
1429                         item = msginfo->folder;
1430
1431                 num = folder->copy_msg(folder, dest, msginfo);
1432                 newmsgnums = g_slist_append(newmsgnums, GINT_TO_POINTER(num));
1433         }
1434
1435         /* Read cache for dest folder */
1436         if (!dest->cache) folder_item_read_cache(dest);
1437         
1438         /* 
1439          * Fetch new MsgInfos for new messages in dest folder,
1440          * add them to the msgcache and update folder message counts
1441          */
1442         l2 = newmsgnums;
1443         for(l = msglist; l != NULL; l = g_slist_next(l)) {
1444                 MsgInfo *msginfo = (MsgInfo *) l->data;
1445
1446                 num = GPOINTER_TO_INT(l2->data);
1447
1448                 if (num != -1) {
1449                         MsgInfo *newmsginfo;
1450
1451                         newmsginfo = folder->fetch_msginfo(folder, dest, num);
1452                         if(newmsginfo) {
1453                                 newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1454                                 if (dest->stype == F_OUTBOX ||
1455                                     dest->stype == F_QUEUE  ||
1456                                     dest->stype == F_DRAFT  ||
1457                                     dest->stype == F_TRASH)
1458                                         MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1459                                                              MSG_NEW|MSG_UNREAD|MSG_DELETED);
1460                                 msgcache_add_msg(dest->cache, newmsginfo);
1461
1462                                 if (MSG_IS_NEW(newmsginfo->flags))
1463                                         dest->new++;
1464                                 if (MSG_IS_UNREAD(newmsginfo->flags))
1465                                         dest->unread++;
1466                                 dest->total++;
1467
1468                                 procmsg_msginfo_free(newmsginfo);
1469                         }
1470                 }
1471                 l2 = g_slist_next(l2);
1472         }
1473
1474         /*
1475          * Remove source messages from their folders if
1476          * copying was successfull and update folder
1477          * message counts
1478          */
1479         l2 = newmsgnums;
1480         for(l = msglist; l != NULL; l = g_slist_next(l)) {
1481                 MsgInfo *msginfo = (MsgInfo *) l->data;
1482
1483                 num = GPOINTER_TO_INT(l2->data);
1484                 
1485                 if(num != -1) {
1486                         item->folder->remove_msg(item->folder,
1487                                                  msginfo->folder,
1488                                                  msginfo->msgnum);
1489                         if(!item->cache)
1490                                 folder_item_read_cache(item);
1491                         msgcache_remove_msg(item->cache, msginfo->msgnum);
1492
1493                         if (MSG_IS_NEW(msginfo->flags))
1494                                 msginfo->folder->new--;
1495                         if (MSG_IS_UNREAD(msginfo->flags))
1496                                 msginfo->folder->unread--;
1497                         msginfo->folder->total--;                       
1498                 }
1499
1500                 l2 = g_slist_next(l2);
1501         }
1502
1503
1504         if (folder->finished_copy)
1505                 folder->finished_copy(folder, dest);
1506
1507         g_slist_free(newmsgnums);
1508         return dest->last_num;
1509 }
1510
1511 /*
1512 gint folder_item_copy_msg(FolderItem *dest, MsgInfo *msginfo)
1513 {
1514         Folder *folder;
1515         gint num;
1516
1517         g_return_val_if_fail(dest != NULL, -1);
1518         g_return_val_if_fail(msginfo != NULL, -1);
1519
1520         folder = dest->folder;
1521         if (dest->last_num < 0) folder->scan(folder, dest);
1522
1523         num = folder->copy_msg(folder, dest, msginfo);
1524         if (num > 0) dest->last_num = num;
1525
1526         return num;
1527 }
1528 */
1529
1530 gint folder_item_copy_msg(FolderItem *dest, MsgInfo *msginfo)
1531 {
1532         Folder *folder;
1533         gint num;
1534
1535         g_return_val_if_fail(dest != NULL, -1);
1536         g_return_val_if_fail(msginfo != NULL, -1);
1537
1538         folder = dest->folder;
1539
1540         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1541
1542         if (!dest->cache) folder_item_read_cache(dest);
1543         
1544         num = folder->copy_msg(folder, dest, msginfo);
1545         if (num != -1) {
1546                 MsgInfo *newmsginfo;
1547
1548                 newmsginfo = folder->fetch_msginfo(folder, dest, num);
1549                 newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1550                 if (dest->stype == F_OUTBOX ||
1551                     dest->stype == F_QUEUE  ||
1552                     dest->stype == F_DRAFT  ||
1553                     dest->stype == F_TRASH)
1554                         MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1555                                              MSG_NEW|MSG_UNREAD|MSG_DELETED);
1556                 msgcache_add_msg(dest->cache, newmsginfo);
1557
1558                 if (MSG_IS_NEW(newmsginfo->flags))
1559                         dest->new++;
1560                 if (MSG_IS_UNREAD(newmsginfo->flags))
1561                         dest->unread++;
1562                 dest->total++;
1563
1564                 procmsg_msginfo_free(newmsginfo);
1565         }
1566
1567         if (folder->finished_copy)
1568                 folder->finished_copy(folder, dest);
1569
1570         return num;
1571 }
1572
1573 /*
1574 gint folder_item_copy_msgs_with_dest(FolderItem *dest, GSList *msglist)
1575 {
1576         Folder *folder;
1577         gint num;
1578
1579         g_return_val_if_fail(dest != NULL, -1);
1580         g_return_val_if_fail(msglist != NULL, -1);
1581
1582         folder = dest->folder;
1583         if (dest->last_num < 0) folder->scan(folder, dest);
1584
1585         num = folder->copy_msgs_with_dest(folder, dest, msglist);
1586         if (num > 0) dest->last_num = num;
1587         else dest->op_count = 0;
1588
1589         return num;
1590 }
1591 */
1592
1593 gint folder_item_copy_msgs_with_dest(FolderItem *dest, GSList *msglist)
1594 {
1595         Folder *folder;
1596         gint num;
1597         GSList *newmsgnums = NULL;
1598         GSList *l, *l2;
1599
1600         g_return_val_if_fail(dest != NULL, -1);
1601         g_return_val_if_fail(msglist != NULL, -1);
1602
1603         folder = dest->folder;
1604  
1605         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1606
1607         /* 
1608          * Copy messages to destination folder and 
1609          * store new message numbers in newmsgnums
1610          */
1611         for(l = msglist ; l != NULL ; l = g_slist_next(l)) {
1612                 MsgInfo * msginfo = (MsgInfo *) l->data;
1613
1614                 num = folder->copy_msg(folder, dest, msginfo);
1615                 newmsgnums = g_slist_append(newmsgnums, GINT_TO_POINTER(num));
1616         }
1617
1618         /* Read cache for dest folder */
1619         if (!dest->cache) folder_item_read_cache(dest);
1620         
1621         /* 
1622          * Fetch new MsgInfos for new messages in dest folder,
1623          * add them to the msgcache and update folder message counts
1624          */
1625         l2 = newmsgnums;
1626         for(l = msglist; l != NULL; l = g_slist_next(l)) {
1627                 MsgInfo *msginfo = (MsgInfo *) l->data;
1628
1629                 num = GPOINTER_TO_INT(l2->data);
1630
1631                 if (num != -1) {
1632                         MsgInfo *newmsginfo;
1633
1634                         newmsginfo = folder->fetch_msginfo(folder, dest, num);
1635                         if(newmsginfo) {
1636                                 newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1637                                 if (dest->stype == F_OUTBOX ||
1638                                     dest->stype == F_QUEUE  ||
1639                                     dest->stype == F_DRAFT  ||
1640                                     dest->stype == F_TRASH)
1641                                         MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1642                                                              MSG_NEW|MSG_UNREAD|MSG_DELETED);
1643                                 msgcache_add_msg(dest->cache, newmsginfo);
1644
1645                                 if (MSG_IS_NEW(newmsginfo->flags))
1646                                         dest->new++;
1647                                 if (MSG_IS_UNREAD(newmsginfo->flags))
1648                                         dest->unread++;
1649                                 dest->total++;
1650
1651                                 procmsg_msginfo_free(newmsginfo);
1652                         }
1653                 }
1654                 l2 = g_slist_next(l2);
1655         }
1656         
1657         if (folder->finished_copy)
1658                 folder->finished_copy(folder, dest);
1659
1660         g_slist_free(newmsgnums);
1661         return dest->last_num;
1662 }
1663
1664 gint folder_item_remove_msg(FolderItem *item, gint num)
1665 {
1666         Folder *folder;
1667         gint ret;
1668         MsgInfo *msginfo;
1669
1670         g_return_val_if_fail(item != NULL, -1);
1671
1672         folder = item->folder;
1673         if (!item->cache) folder_item_read_cache(item);
1674
1675         ret = folder->remove_msg(folder, item, num);
1676
1677         msginfo = msgcache_get_msg(item->cache, num);
1678         if(msginfo != NULL) {
1679                 if(MSG_IS_NEW(msginfo->flags))
1680                         item->new--;
1681                 if(MSG_IS_UNREAD(msginfo->flags))
1682                         item->unread--;
1683                 procmsg_msginfo_free(msginfo);
1684                 msgcache_remove_msg(item->cache, num);
1685         }
1686         item->total--;
1687
1688         return ret;
1689 }
1690
1691 gint folder_item_remove_msgs(FolderItem *item, GSList *msglist)
1692 {
1693         gint ret = 0;
1694
1695         g_return_val_if_fail(item != NULL, -1);
1696
1697         if (!item->cache) folder_item_read_cache(item);
1698
1699         while (msglist != NULL) {
1700                 MsgInfo *msginfo = (MsgInfo *)msglist->data;
1701
1702                 ret = folder_item_remove_msg(item, msginfo->msgnum);
1703                 if (ret != 0) break;
1704                 msgcache_remove_msg(item->cache, msginfo->msgnum);
1705                 msglist = msglist->next;
1706         }
1707
1708         return ret;
1709 }
1710
1711 gint folder_item_remove_all_msg(FolderItem *item)
1712 {
1713         Folder *folder;
1714         gint result;
1715
1716         g_return_val_if_fail(item != NULL, -1);
1717
1718         folder = item->folder;
1719
1720         g_return_val_if_fail(folder->remove_all_msg != NULL, -1);
1721
1722         result = folder->remove_all_msg(folder, item);
1723
1724         if (result == 0) {
1725                 if (folder->finished_remove)
1726                         folder->finished_remove(folder, item);
1727
1728                 folder_item_free_cache(item);
1729                 item->cache = msgcache_new();
1730
1731                 item->new = 0;
1732                 item->unread = 0;
1733                 item->total = 0;
1734         }
1735
1736         return result;
1737 }
1738
1739 gboolean folder_item_is_msg_changed(FolderItem *item, MsgInfo *msginfo)
1740 {
1741         Folder *folder;
1742
1743         g_return_val_if_fail(item != NULL, FALSE);
1744
1745         folder = item->folder;
1746
1747         g_return_val_if_fail(folder->is_msg_changed != NULL, -1);
1748
1749         return folder->is_msg_changed(folder, item, msginfo);
1750 }
1751
1752 gchar *folder_item_get_cache_file(FolderItem *item)
1753 {
1754         gchar *path;
1755         gchar *file;
1756
1757         g_return_val_if_fail(item != NULL, NULL);
1758         g_return_val_if_fail(item->path != NULL, NULL);
1759
1760         path = folder_item_get_path(item);
1761         g_return_val_if_fail(path != NULL, NULL);
1762         if (!is_dir_exist(path))
1763                 make_dir_hier(path);
1764         file = g_strconcat(path, G_DIR_SEPARATOR_S, CACHE_FILE, NULL);
1765         g_free(path);
1766
1767         return file;
1768 }
1769
1770 gchar *folder_item_get_mark_file(FolderItem *item)
1771 {
1772         gchar *path;
1773         gchar *file;
1774
1775         g_return_val_if_fail(item != NULL, NULL);
1776         g_return_val_if_fail(item->path != NULL, NULL);
1777
1778         path = folder_item_get_path(item);
1779         g_return_val_if_fail(path != NULL, NULL);
1780         if (!is_dir_exist(path))
1781                 make_dir_hier(path);
1782         file = g_strconcat(path, G_DIR_SEPARATOR_S, MARK_FILE, NULL);
1783         g_free(path);
1784
1785         return file;
1786 }
1787
1788 static gboolean folder_build_tree(GNode *node, gpointer data)
1789 {
1790         Folder *folder = FOLDER(data);
1791         FolderItem *item;
1792         XMLNode *xmlnode;
1793         GList *list;
1794         SpecialFolderItemType stype = F_NORMAL;
1795         const gchar *name = NULL;
1796         const gchar *path = NULL;
1797         PrefsAccount *account = NULL;
1798         gboolean no_sub = FALSE, no_select = FALSE, collapsed = FALSE, 
1799                  threaded = TRUE, ret_rcpt = FALSE, hidereadmsgs = FALSE;
1800         FolderSortKey sort_key = SORT_BY_NONE;
1801         FolderSortType sort_type = SORT_ASCENDING;
1802         gint new = 0, unread = 0, total = 0;
1803         time_t mtime = 0;
1804
1805         g_return_val_if_fail(node->data != NULL, FALSE);
1806         if (!node->parent) return FALSE;
1807
1808         xmlnode = node->data;
1809         if (strcmp2(xmlnode->tag->tag, "folderitem") != 0) {
1810                 g_warning("tag name != \"folderitem\"\n");
1811                 return FALSE;
1812         }
1813
1814         list = xmlnode->tag->attr;
1815         for (; list != NULL; list = list->next) {
1816                 XMLAttr *attr = list->data;
1817
1818                 if (!attr || !attr->name || !attr->value) continue;
1819                 if (!strcmp(attr->name, "type")) {
1820                         if (!strcasecmp(attr->value, "normal"))
1821                                 stype = F_NORMAL;
1822                         else if (!strcasecmp(attr->value, "inbox"))
1823                                 stype = F_INBOX;
1824                         else if (!strcasecmp(attr->value, "outbox"))
1825                                 stype = F_OUTBOX;
1826                         else if (!strcasecmp(attr->value, "draft"))
1827                                 stype = F_DRAFT;
1828                         else if (!strcasecmp(attr->value, "queue"))
1829                                 stype = F_QUEUE;
1830                         else if (!strcasecmp(attr->value, "trash"))
1831                                 stype = F_TRASH;
1832                 } else if (!strcmp(attr->name, "name"))
1833                         name = attr->value;
1834                 else if (!strcmp(attr->name, "path"))
1835                         path = attr->value;
1836                 else if (!strcmp(attr->name, "account_id")) {
1837                         account = account_find_from_id(atoi(attr->value));
1838                         if (!account) g_warning("account_id: %s not found\n",
1839                                                 attr->value);
1840                 } else if (!strcmp(attr->name, "mtime"))
1841                         mtime = strtoul(attr->value, NULL, 10);
1842                 else if (!strcmp(attr->name, "new"))
1843                         new = atoi(attr->value);
1844                 else if (!strcmp(attr->name, "unread"))
1845                         unread = atoi(attr->value);
1846                 else if (!strcmp(attr->name, "total"))
1847                         total = atoi(attr->value);
1848                 else if (!strcmp(attr->name, "no_sub"))
1849                         no_sub = *attr->value == '1' ? TRUE : FALSE;
1850                 else if (!strcmp(attr->name, "no_select"))
1851                         no_select = *attr->value == '1' ? TRUE : FALSE;
1852                 else if (!strcmp(attr->name, "collapsed"))
1853                         collapsed = *attr->value == '1' ? TRUE : FALSE;
1854                 else if (!strcmp(attr->name, "threaded"))
1855                         threaded =  *attr->value == '1' ? TRUE : FALSE;
1856                 else if (!strcmp(attr->name, "hidereadmsgs"))
1857                         hidereadmsgs =  *attr->value == '1' ? TRUE : FALSE;
1858                 else if (!strcmp(attr->name, "reqretrcpt"))
1859                         ret_rcpt =  *attr->value == '1' ? TRUE : FALSE;
1860                 else if (!strcmp(attr->name, "sort_key")) {
1861                         if (!strcmp(attr->value, "none"))
1862                                 sort_key = SORT_BY_NONE;
1863                         else if (!strcmp(attr->value, "number"))
1864                                 sort_key = SORT_BY_NUMBER;
1865                         else if (!strcmp(attr->value, "size"))
1866                                 sort_key = SORT_BY_SIZE;
1867                         else if (!strcmp(attr->value, "date"))
1868                                 sort_key = SORT_BY_DATE;
1869                         else if (!strcmp(attr->value, "from"))
1870                                 sort_key = SORT_BY_FROM;
1871                         else if (!strcmp(attr->value, "subject"))
1872                                 sort_key = SORT_BY_SUBJECT;
1873                         else if (!strcmp(attr->value, "score"))
1874                                 sort_key = SORT_BY_SCORE;
1875                         else if (!strcmp(attr->value, "label"))
1876                                 sort_key = SORT_BY_LABEL;
1877                         else if (!strcmp(attr->value, "mark"))
1878                                 sort_key = SORT_BY_MARK;
1879                         else if (!strcmp(attr->value, "unread"))
1880                                 sort_key = SORT_BY_UNREAD;
1881                         else if (!strcmp(attr->value, "mime"))
1882                                 sort_key = SORT_BY_MIME;
1883                         else if (!strcmp(attr->value, "locked"))
1884                                 sort_key = SORT_BY_LOCKED;
1885                 } else if (!strcmp(attr->name, "sort_type")) {
1886                         if (!strcmp(attr->value, "ascending"))
1887                                 sort_type = SORT_ASCENDING;
1888                         else
1889                                 sort_type = SORT_DESCENDING;
1890                 }
1891         }
1892
1893         item = folder_item_new(folder, name, path);
1894         item->stype = stype;
1895         item->account = account;
1896         item->mtime = mtime;
1897         item->new = new;
1898         item->unread = unread;
1899         item->total = total;
1900         item->no_sub = no_sub;
1901         item->no_select = no_select;
1902         item->collapsed = collapsed;
1903         item->threaded  = threaded;
1904         item->hide_read_msgs  = hidereadmsgs;
1905         item->ret_rcpt  = ret_rcpt;
1906         item->sort_key  = sort_key;
1907         item->sort_type = sort_type;
1908         item->parent = FOLDER_ITEM(node->parent->data);
1909         item->folder = folder;
1910         switch (stype) {
1911         case F_INBOX:  folder->inbox  = item; break;
1912         case F_OUTBOX: folder->outbox = item; break;
1913         case F_DRAFT:  folder->draft  = item; break;
1914         case F_QUEUE:  folder->queue  = item; break;
1915         case F_TRASH:  folder->trash  = item; break;
1916         default:       break;
1917         }
1918
1919         prefs_folder_item_read_config(item);
1920
1921         node->data = item;
1922         xml_free_node(xmlnode);
1923
1924         return FALSE;
1925 }
1926
1927 static gboolean folder_read_folder_func(GNode *node, gpointer data)
1928 {
1929         Folder *folder;
1930         XMLNode *xmlnode;
1931         GList *list;
1932         FolderType type = F_UNKNOWN;
1933         const gchar *name = NULL;
1934         const gchar *path = NULL;
1935         PrefsAccount *account = NULL;
1936         gboolean collapsed = FALSE, threaded = TRUE, ret_rcpt = FALSE;
1937
1938         if (g_node_depth(node) != 2) return FALSE;
1939         g_return_val_if_fail(node->data != NULL, FALSE);
1940
1941         xmlnode = node->data;
1942         if (strcmp2(xmlnode->tag->tag, "folder") != 0) {
1943                 g_warning("tag name != \"folder\"\n");
1944                 return TRUE;
1945         }
1946         g_node_unlink(node);
1947         list = xmlnode->tag->attr;
1948         for (; list != NULL; list = list->next) {
1949                 XMLAttr *attr = list->data;
1950
1951                 if (!attr || !attr->name || !attr->value) continue;
1952                 if (!strcmp(attr->name, "type")) {
1953                         if (!strcasecmp(attr->value, "mh"))
1954                                 type = F_MH;
1955                         else if (!strcasecmp(attr->value, "mbox"))
1956                                 type = F_MBOX;
1957                         else if (!strcasecmp(attr->value, "maildir"))
1958                                 type = F_MAILDIR;
1959                         else if (!strcasecmp(attr->value, "imap"))
1960                                 type = F_IMAP;
1961                         else if (!strcasecmp(attr->value, "news"))
1962                                 type = F_NEWS;
1963                 } else if (!strcmp(attr->name, "name"))
1964                         name = attr->value;
1965                 else if (!strcmp(attr->name, "path"))
1966                         path = attr->value;
1967                 else if (!strcmp(attr->name, "account_id")) {
1968                         account = account_find_from_id(atoi(attr->value));
1969                         if (!account) g_warning("account_id: %s not found\n",
1970                                                 attr->value);
1971                 } else if (!strcmp(attr->name, "collapsed"))
1972                         collapsed = *attr->value == '1' ? TRUE : FALSE;
1973                 else if (!strcmp(attr->name, "threaded"))
1974                         threaded = *attr->value == '1' ? TRUE : FALSE;
1975                 else if (!strcmp(attr->name, "reqretrcpt"))
1976                         ret_rcpt = *attr->value == '1' ? TRUE : FALSE;
1977         }
1978
1979         folder = folder_new(type, name, path);
1980         g_return_val_if_fail(folder != NULL, FALSE);
1981         folder->account = account;
1982         if (account && (type == F_IMAP || type == F_NEWS))
1983                 account->folder = REMOTE_FOLDER(folder);
1984         node->data = folder->node->data;
1985         g_node_destroy(folder->node);
1986         folder->node = node;
1987         folder_add(folder);
1988         FOLDER_ITEM(node->data)->collapsed = collapsed;
1989         FOLDER_ITEM(node->data)->threaded  = threaded;
1990         FOLDER_ITEM(node->data)->ret_rcpt  = ret_rcpt;
1991
1992         g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
1993                         folder_build_tree, folder);
1994
1995         return FALSE;
1996 }
1997
1998 static gchar *folder_get_list_path(void)
1999 {
2000         static gchar *filename = NULL;
2001
2002         if (!filename)
2003                 filename =  g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
2004                                         FOLDER_LIST, NULL);
2005
2006         return filename;
2007 }
2008
2009 static void folder_write_list_recursive(GNode *node, gpointer data)
2010 {
2011         FILE *fp = (FILE *)data;
2012         FolderItem *item = FOLDER_ITEM(node->data);
2013         gint i, depth;
2014         static gchar *folder_type_str[] = {"mh", "mbox", "maildir", "imap",
2015                                            "news", "unknown"};
2016         static gchar *folder_item_stype_str[] = {"normal", "inbox", "outbox",
2017                                                  "draft", "queue", "trash"};
2018         static gchar *sort_key_str[] = {"none", "number", "size", "date",
2019                                         "from", "subject", "score", "label",
2020                                         "mark", "unread", "mime", "locked" };
2021
2022         g_return_if_fail(item != NULL);
2023
2024         depth = g_node_depth(node);
2025         for (i = 0; i < depth; i++)
2026                 fputs("    ", fp);
2027         if (depth == 1) {
2028                 Folder *folder = item->folder;
2029
2030                 fprintf(fp, "<folder type=\"%s\"", folder_type_str[folder->type]);
2031                 if (folder->name) {
2032                         fputs(" name=\"", fp);
2033                         xml_file_put_escape_str(fp, folder->name);
2034                         fputs("\"", fp);
2035                 }
2036                 if ((folder->type == F_MH) || (folder->type == F_MBOX)) {
2037                         fputs(" path=\"", fp);
2038                         xml_file_put_escape_str
2039                                 (fp, LOCAL_FOLDER(folder)->rootpath);
2040                         fputs("\"", fp);
2041                 }
2042                 if (folder->account)
2043                         fprintf(fp, " account_id=\"%d\"",
2044                                 folder->account->account_id);
2045                 if (item->collapsed && node->children)
2046                         fputs(" collapsed=\"1\"", fp);
2047                 if (item->ret_rcpt) 
2048                         fputs(" reqretrcpt=\"1\"", fp);
2049         } else {
2050                 fprintf(fp, "<folderitem type=\"%s\"",
2051                         folder_item_stype_str[item->stype]);
2052                 if (item->name) {
2053                         fputs(" name=\"", fp);
2054                         xml_file_put_escape_str(fp, item->name);
2055                         fputs("\"", fp);
2056                 }
2057                 if (item->path) {
2058                         fputs(" path=\"", fp);
2059                         xml_file_put_escape_str(fp, item->path);
2060                         fputs("\"", fp);
2061                 }
2062                 if (item->account)
2063                         fprintf(fp, " account_id=\"%d\"",
2064                                 item->account->account_id);
2065                 if (item->no_sub)
2066                         fputs(" no_sub=\"1\"", fp);
2067                 if (item->no_select)
2068                         fputs(" no_select=\"1\"", fp);
2069                 if (item->collapsed && node->children)
2070                         fputs(" collapsed=\"1\"", fp);
2071                 if (item->threaded)
2072                         fputs(" threaded=\"1\"", fp);
2073                 else
2074                         fputs(" threaded=\"0\"", fp);
2075                 if (item->hide_read_msgs)
2076                         fputs(" hidereadmsgs=\"1\"", fp);
2077                 else
2078                         fputs(" hidereadmsgs=\"0\"", fp);
2079                 if (item->ret_rcpt)
2080                         fputs(" reqretrcpt=\"1\"", fp);
2081
2082                 if (item->sort_key != SORT_BY_NONE) {
2083                         fprintf(fp, " sort_key=\"%s\"",
2084                                 sort_key_str[item->sort_key]);
2085                         if (item->sort_type == SORT_ASCENDING)
2086                                 fprintf(fp, " sort_type=\"ascending\"");
2087                         else
2088                                 fprintf(fp, " sort_type=\"descending\"");
2089                 }
2090
2091                 fprintf(fp,
2092                         " mtime=\"%lu\" new=\"%d\" unread=\"%d\" total=\"%d\"",
2093                         item->mtime, item->new, item->unread, item->total);
2094         }
2095
2096         if (node->children) {
2097                 GNode *child;
2098                 fputs(">\n", fp);
2099
2100                 child = node->children;
2101                 while (child) {
2102                         GNode *cur;
2103
2104                         cur = child;
2105                         child = cur->next;
2106                         folder_write_list_recursive(cur, data);
2107                 }
2108
2109                 for (i = 0; i < depth; i++)
2110                         fputs("    ", fp);
2111                 fprintf(fp, "</%s>\n", depth == 1 ? "folder" : "folderitem");
2112         } else
2113                 fputs(" />\n", fp);
2114 }
2115
2116 static void folder_update_op_count_rec(GNode *node) {
2117         FolderItem *fitem = FOLDER_ITEM(node->data);
2118
2119         if (g_node_depth(node) > 0) {
2120                 if (fitem->op_count > 0) {
2121                         fitem->op_count = 0;
2122                         folderview_update_item(fitem, 0);
2123                 }
2124                 if (node->children) {
2125                         GNode *child;
2126
2127                         child = node->children;
2128                         while (child) {
2129                                 GNode *cur;
2130
2131                                 cur = child;
2132                                 child = cur->next;
2133                                 folder_update_op_count_rec(cur);
2134                         }
2135                 }
2136         }
2137 }
2138
2139 void folder_update_op_count() {
2140         GList *cur;
2141         Folder *folder;
2142
2143         for (cur = folder_list; cur != NULL; cur = cur->next) {
2144                 folder = cur->data;
2145                 folder_update_op_count_rec(folder->node);
2146         }
2147 }
2148
2149 typedef struct _type_str {
2150         gchar * str;
2151         gint type;
2152 } type_str;
2153
2154
2155 /*
2156 static gchar * folder_item_get_tree_identifier(FolderItem * item)
2157 {
2158         if (item->parent != NULL) {
2159                 gchar * path;
2160                 gchar * id;
2161
2162                 path = folder_item_get_tree_identifier(item->parent);
2163                 if (path == NULL)
2164                         return NULL;
2165
2166                 id = g_strconcat(path, "/", item->name, NULL);
2167                 g_free(path);
2168
2169                 return id;
2170         }
2171         else {
2172                 return g_strconcat("/", item->name, NULL);
2173         }
2174 }
2175 */
2176
2177 /* CLAWS: temporary local folder for filtering */
2178 static Folder *processing_folder;
2179 static FolderItem *processing_folder_item;
2180
2181 static void folder_create_processing_folder(void)
2182 {
2183 #define PROCESSING_FOLDER ".processing" 
2184         Folder     *tmpparent;
2185         gchar      *tmpname;
2186
2187         tmpparent = folder_get_default_folder();
2188         g_assert(tmpparent);
2189         debug_print("tmpparentroot %s\n", LOCAL_FOLDER(tmpparent)->rootpath);
2190         if (LOCAL_FOLDER(tmpparent)->rootpath[0] == '/')
2191                 tmpname = g_strconcat(LOCAL_FOLDER(tmpparent)->rootpath,
2192                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER,
2193                                       NULL);
2194         else
2195                 tmpname = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
2196                                       LOCAL_FOLDER(tmpparent)->rootpath,
2197                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER,
2198                                       NULL);
2199
2200         processing_folder = folder_new(F_MH, "PROCESSING", LOCAL_FOLDER(tmpparent)->rootpath);
2201         g_assert(processing_folder);
2202
2203         if (!is_dir_exist(tmpname)) {
2204                 debug_print("*TMP* creating %s\n", tmpname);
2205                 processing_folder_item = processing_folder->create_folder(processing_folder,
2206                                                                           processing_folder->node->data,
2207                                                                           PROCESSING_FOLDER);
2208                 g_assert(processing_folder_item);                                                                         
2209         }
2210         else {
2211                 debug_print("*TMP* already created\n");
2212                 processing_folder_item = folder_item_new(processing_folder, ".processing", ".processing");
2213                 g_assert(processing_folder_item);
2214                 folder_item_append(processing_folder->node->data, processing_folder_item);
2215         }
2216         g_free(tmpname);
2217 }
2218
2219 FolderItem *folder_get_default_processing(void)
2220 {
2221         if (!processing_folder_item) {
2222                 folder_create_processing_folder();
2223         }
2224         return processing_folder_item;
2225 }
2226
2227 /* folder_persist_prefs_new() - return hash table with persistent
2228  * settings (and folder name as key). 
2229  * (note that in claws other options are in the PREFS_FOLDER_ITEM_RC
2230  * file, so those don't need to be included in PersistPref yet) 
2231  */
2232 GHashTable *folder_persist_prefs_new(Folder *folder)
2233 {
2234         GHashTable *pptable;
2235
2236         g_return_val_if_fail(folder, NULL);
2237         pptable = g_hash_table_new(g_str_hash, g_str_equal);
2238         folder_get_persist_prefs_recursive(folder->node, pptable);
2239         return pptable;
2240 }
2241
2242 void folder_persist_prefs_free(GHashTable *pptable)
2243 {
2244         g_return_if_fail(pptable);
2245         g_hash_table_foreach_remove(pptable, persist_prefs_free, NULL);
2246         g_hash_table_destroy(pptable);
2247 }
2248
2249 const PersistPrefs *folder_get_persist_prefs(GHashTable *pptable, const char *name)
2250 {
2251         if (pptable == NULL || name == NULL) return NULL;
2252         return g_hash_table_lookup(pptable, name);
2253 }
2254
2255 void folder_item_restore_persist_prefs(FolderItem *item, GHashTable *pptable)
2256 {
2257         const PersistPrefs *pp;
2258         gchar *id = folder_item_get_identifier(item);
2259
2260         pp = folder_get_persist_prefs(pptable, id); 
2261         g_free(id);
2262
2263         if (!pp) return;
2264
2265         /* CLAWS: since not all folder properties have been migrated to 
2266          * folderlist.xml, we need to call the old stuff first before
2267          * setting things that apply both to Main and Claws. */
2268         prefs_folder_item_read_config(item); 
2269          
2270         item->collapsed = pp->collapsed;
2271         item->threaded  = pp->threaded;
2272         item->ret_rcpt  = pp->ret_rcpt;
2273         item->hide_read_msgs = pp->hide_read_msgs;
2274         item->sort_key  = pp->sort_key;
2275         item->sort_type = pp->sort_type;
2276 }
2277
2278 static void folder_get_persist_prefs_recursive(GNode *node, GHashTable *pptable)
2279 {
2280         FolderItem *item = FOLDER_ITEM(node->data);
2281         PersistPrefs *pp;
2282         GNode *child, *cur;
2283         gchar *id;
2284
2285         g_return_if_fail(node != NULL);
2286         g_return_if_fail(item != NULL);
2287
2288         /* NOTE: item->path == NULL means top level folder; not interesting
2289          * to store preferences of that one.  */
2290         if (item->path) {
2291                 id = folder_item_get_identifier(item);
2292                 pp = g_new0(PersistPrefs, 1);
2293                 g_return_if_fail(pp != NULL);
2294                 pp->collapsed = item->collapsed;
2295                 pp->threaded  = item->threaded;
2296                 pp->ret_rcpt  = item->ret_rcpt; 
2297                 pp->hide_read_msgs = item->hide_read_msgs;
2298                 pp->sort_key  = item->sort_key;
2299                 pp->sort_type = item->sort_type;
2300                 g_hash_table_insert(pptable, id, pp);
2301         }
2302
2303         if (node->children) {
2304                 child = node->children;
2305                 while (child) {
2306                         cur = child;
2307                         child = cur->next;
2308                         folder_get_persist_prefs_recursive(cur, pptable);
2309                 }
2310         }       
2311 }
2312
2313 static gboolean persist_prefs_free(gpointer key, gpointer val, gpointer data)
2314 {
2315         if (key) 
2316                 g_free(key);
2317         if (val) 
2318                 g_free(val);
2319         return TRUE;    
2320 }
2321
2322 void folder_item_apply_processing(FolderItem *item)
2323 {
2324         GSList *processing_list;
2325         GSList *mlist, *cur;
2326         GHashTable *folder_table;
2327         
2328         g_return_if_fail(item != NULL);
2329         
2330         processing_list = item->prefs->processing;
2331         if (processing_list == NULL)
2332                 return;
2333         folder_table = g_hash_table_new(NULL, NULL);
2334
2335         mlist = folder_item_get_msg_list(item);
2336         
2337         for(cur = mlist ; cur != NULL ; cur = cur->next) {
2338                 MsgInfo * msginfo;
2339
2340                 msginfo = (MsgInfo *) cur->data;
2341                 filter_message_by_msginfo(processing_list, msginfo,
2342                                           folder_table);
2343                 procmsg_msginfo_free(msginfo);
2344         }
2345         
2346         /* folder_item_scan_foreach(summaryview->folder_table); */
2347         folderview_update_item_foreach(folder_table);
2348
2349         g_slist_free(mlist);
2350         
2351         g_hash_table_destroy(folder_table);
2352 }