16357e922a4804bf303f47f54815b5f3c40a884d
[claws.git] / src / folder.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2005 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 <glib/gi18n.h>
28 #include <stdio.h>
29 #include <string.h>
30 #include <sys/types.h>
31 #include <sys/stat.h>
32 #include <unistd.h>
33 #include <stdlib.h>
34
35 #include "folder.h"
36 #include "session.h"
37 #include "imap.h"
38 #include "news.h"
39 #include "mh.h"
40 #include "utils.h"
41 #include "xml.h"
42 #include "codeconv.h"
43 #include "prefs_gtk.h"
44 #include "account.h"
45 #include "filtering.h"
46 #include "procheader.h"
47 #include "hooks.h"
48 #include "log.h"
49 #include "folder_item_prefs.h"
50 #include "remotefolder.h"
51 #include "partial_download.h"
52
53 /* Dependecies to be removed ?! */
54 #include "prefs_common.h"
55 #include "prefs_account.h"
56
57 static GList *folder_list = NULL;
58 static GSList *class_list = NULL;
59 static GSList *folder_unloaded_list = NULL;
60
61 void folder_init                (Folder         *folder,
62                                  const gchar    *name);
63
64 static gchar *folder_get_list_path      (void);
65 static GNode *folder_get_xml_node       (Folder         *folder);
66 static Folder *folder_get_from_xml      (GNode          *node);
67 static void folder_update_op_count_rec  (GNode          *node);
68
69
70 static void folder_get_persist_prefs_recursive
71                                         (GNode *node, GHashTable *pptable);
72 static gboolean persist_prefs_free      (gpointer key, gpointer val, gpointer data);
73 void folder_item_read_cache             (FolderItem *item);
74 void folder_item_free_cache             (FolderItem *item);
75 gint folder_item_scan_full              (FolderItem *item, gboolean filtering);
76 static void folder_item_update_with_msg (FolderItem *item, FolderItemUpdateFlags update_flags,
77                                          MsgInfo *msg);
78
79 void folder_system_init(void)
80 {
81         folder_register_class(mh_get_class());
82         folder_register_class(imap_get_class());
83         folder_register_class(news_get_class());
84 }
85
86 GSList *folder_get_class_list(void)
87 {
88         return class_list;
89 }
90
91 void folder_register_class(FolderClass *klass)
92 {
93         GSList *xmllist, *cur;
94
95         debug_print("registering folder class %s\n", klass->idstr);
96
97         class_list = g_slist_append(class_list, klass);
98
99         xmllist = g_slist_copy(folder_unloaded_list);
100         for (cur = xmllist; cur != NULL; cur = g_slist_next(cur)) {
101                 GNode *node = (GNode *) cur->data;
102                 XMLNode *xmlnode = (XMLNode *) node->data;
103                 GList *cur = xmlnode->tag->attr;
104
105                 for (; cur != NULL; cur = g_list_next(cur)) {
106                         XMLAttr *attr = (XMLAttr *) cur->data;
107
108                         if (!attr || !attr->name || !attr->value) continue;
109                         if (!strcmp(attr->name, "type") && !strcmp(attr->value, klass->idstr)) {
110                                 Folder *folder;
111
112                                 folder = folder_get_from_xml(node);
113                                 folder_add(folder);
114                                 folder_unloaded_list = g_slist_remove(folder_unloaded_list, node);
115
116                                 cur = NULL;
117                                 continue;
118                         }
119                 }
120         }
121         g_slist_free(xmllist);
122 }
123
124 void folder_unregister_class(FolderClass *klass)
125 {
126         GList *folderlist, *cur;
127
128         debug_print("unregistering folder class %s\n", klass->idstr);
129
130         class_list = g_slist_remove(class_list, klass);
131
132         folderlist = g_list_copy(folder_get_list());
133         for (cur = folderlist; cur != NULL; cur = g_list_next(cur)) {
134                 Folder *folder = (Folder *) cur->data;
135
136                 if (folder->klass == klass) {
137                         GNode *xmlnode = folder_get_xml_node(folder);
138                         folder_unloaded_list = g_slist_append(folder_unloaded_list, xmlnode);
139                         folder_destroy(folder);
140                 }
141         }
142         g_list_free(folderlist);
143 }
144
145 Folder *folder_new(FolderClass *klass, const gchar *name, const gchar *path)
146 {
147         Folder *folder = NULL;
148         FolderItem *item;
149
150         g_return_val_if_fail(klass != NULL, NULL);
151
152         name = name ? name : path;
153         folder = klass->new_folder(name, path);
154
155         /* Create root folder item */
156         item = folder_item_new(folder, name, NULL);
157         item->folder = folder;
158         folder->node = item->node = g_node_new(item);
159         folder->data = NULL;
160
161         return folder;
162 }
163
164 void folder_init(Folder *folder, const gchar *name)
165 {
166         g_return_if_fail(folder != NULL);
167
168         folder_set_name(folder, name);
169
170         /* Init folder data */
171         folder->account = NULL;
172         folder->sort = 0;
173         folder->inbox = NULL;
174         folder->outbox = NULL;
175         folder->draft = NULL;
176         folder->queue = NULL;
177         folder->trash = NULL;
178 }
179
180 void folder_destroy(Folder *folder)
181 {
182         g_return_if_fail(folder != NULL);
183         g_return_if_fail(folder->klass->destroy_folder != NULL);
184
185         folder_remove(folder);
186
187         folder_tree_destroy(folder);
188
189         folder->klass->destroy_folder(folder);
190
191         g_free(folder->name);
192         g_free(folder);
193 }
194
195 void folder_set_xml(Folder *folder, XMLTag *tag)
196 {
197         GList *cur;
198         FolderItem *rootitem = NULL;
199
200         if ((folder->node != NULL) && (folder->node->data != NULL))
201                 rootitem = (FolderItem *) folder->node->data;
202
203         for (cur = tag->attr; cur != NULL; cur = g_list_next(cur)) {
204                 XMLAttr *attr = (XMLAttr *) cur->data;
205
206                 if (!attr || !attr->name || !attr->value) continue;
207                 if (!strcmp(attr->name, "name")) {
208                         if (folder->name != NULL)
209                                 g_free(folder->name);
210                         folder->name = g_strdup(attr->value);
211                         if (rootitem != NULL) {
212                                 if (rootitem->name != NULL)
213                                         g_free(rootitem->name);
214                                 rootitem->name = g_strdup(attr->value);
215                         }
216                 } else if (!strcmp(attr->name, "account_id")) {
217                         PrefsAccount *account;
218
219                         account = account_find_from_id(atoi(attr->value));
220                         if (!account)
221                                 g_warning("account_id: %s not found\n", attr->value);
222                         else {
223                                 folder->account = account;
224                                 account->folder = folder;
225                         }
226                 } else if (!strcmp(attr->name, "collapsed")) {
227                         if (rootitem != NULL)
228                                 rootitem->collapsed = *attr->value == '1' ? TRUE : FALSE;
229                 } else if (!strcmp(attr->name, "sort")) {
230                         folder->sort = atoi(attr->value);
231                 }
232         }
233 }
234
235 XMLTag *folder_get_xml(Folder *folder)
236 {
237         XMLTag *tag;
238
239         tag = xml_tag_new("folder");
240
241         if (folder->name)
242                 xml_tag_add_attr(tag, xml_attr_new("name", folder->name));
243         if (folder->account)
244                 xml_tag_add_attr(tag, xml_attr_new_int("account_id", folder->account->account_id));
245         if (folder->node && folder->node->data) {
246                 FolderItem *rootitem = (FolderItem *) folder->node->data;
247
248                 xml_tag_add_attr(tag, xml_attr_new("collapsed", rootitem->collapsed ? "1" : "0"));
249         }
250         xml_tag_add_attr(tag, xml_attr_new_int("sort", folder->sort));
251
252         return tag;
253 }
254
255 FolderItem *folder_item_new(Folder *folder, const gchar *name, const gchar *path)
256 {
257         FolderItem *item = NULL;
258
259         if (folder->klass->item_new) {
260                 item = folder->klass->item_new(folder);
261         } else {
262                 item = g_new0(FolderItem, 1);
263         }
264
265         g_return_val_if_fail(item != NULL, NULL);
266
267         item->stype = F_NORMAL;
268         item->name = g_strdup(name);
269         item->path = g_strdup(path);
270         item->mtime = 0;
271         item->new_msgs = 0;
272         item->unread_msgs = 0;
273         item->unreadmarked_msgs = 0;
274         item->total_msgs = 0;
275         item->last_num = -1;
276         item->cache = NULL;
277         item->no_sub = FALSE;
278         item->no_select = FALSE;
279         item->collapsed = FALSE;
280         item->thread_collapsed = FALSE;
281         item->threaded  = TRUE;
282         item->ret_rcpt  = FALSE;
283         item->opened    = FALSE;
284         item->node = g_node_new(item);
285         item->folder = NULL;
286         item->account = NULL;
287         item->apply_sub = FALSE;
288         item->mark_queue = NULL;
289         item->data = NULL;
290
291         item->prefs = folder_item_prefs_new();
292
293         return item;
294 }
295
296 void folder_item_append(FolderItem *parent, FolderItem *item)
297 {
298         g_return_if_fail(parent != NULL);
299         g_return_if_fail(parent->folder != NULL);
300         g_return_if_fail(parent->node != NULL);
301         g_return_if_fail(item != NULL);
302
303         item->folder = parent->folder;
304         g_node_append(parent->node, item->node);
305 }
306
307 static gboolean folder_item_remove_func(GNode *node, gpointer data)
308 {
309         FolderItem *item = FOLDER_ITEM(node->data);
310         FolderUpdateData hookdata;
311
312         if (item->cache != NULL) {
313                 msgcache_destroy(item->cache);
314                 item->cache = NULL;
315         }
316
317         hookdata.folder = item->folder;
318         hookdata.update_flags = FOLDER_TREE_CHANGED | FOLDER_REMOVE_FOLDERITEM;
319         hookdata.item = item;
320         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
321
322         folder_item_destroy(item);
323
324         return FALSE;
325 }
326
327 void folder_item_remove(FolderItem *item)
328 {
329         GNode *node;
330
331         g_return_if_fail(item != NULL);
332         g_return_if_fail(item->folder != NULL);
333         g_return_if_fail(item->node != NULL);
334
335         node = item->node;
336
337         if (item->folder->node == node)
338                 item->folder->node = NULL;
339
340         g_node_traverse(node, G_POST_ORDER, G_TRAVERSE_ALL, -1,
341                         folder_item_remove_func, NULL);
342         g_node_destroy(node);
343 }
344
345 void folder_item_remove_children(FolderItem *item)
346 {
347         GNode *node, *next;
348
349         g_return_if_fail(item != NULL);
350         g_return_if_fail(item->folder != NULL);
351         g_return_if_fail(item->node != NULL);
352
353         node = item->node->children;
354         while (node != NULL) {
355                 next = node->next;
356                 folder_item_remove(FOLDER_ITEM(node->data));
357                 node = next;
358         }
359 }
360
361 void folder_item_destroy(FolderItem *item)
362 {
363         Folder *folder;
364
365         g_return_if_fail(item != NULL);
366
367         folder = item->folder;
368         if (folder) {
369                 if (folder->inbox == item)
370                         folder->inbox = NULL;
371                 else if (folder->outbox == item)
372                         folder->outbox = NULL;
373                 else if (folder->draft == item)
374                         folder->draft = NULL;
375                 else if (folder->queue == item)
376                         folder->queue = NULL;
377                 else if (folder->trash == item)
378                         folder->trash = NULL;
379         }
380
381         if (item->cache)
382                 folder_item_free_cache(item);
383         if (item->prefs)
384                 folder_item_prefs_free(item->prefs);
385         g_free(item->name);
386         g_free(item->path);
387
388         if (item->folder != NULL) {
389                 if(item->folder->klass->item_destroy) {
390                         item->folder->klass->item_destroy(item->folder, item);
391                 } else {
392                         g_free(item);
393                 }
394         }
395 }
396
397 FolderItem *folder_item_parent(FolderItem *item)
398 {
399         g_return_val_if_fail(item != NULL, NULL);
400         g_return_val_if_fail(item->node != NULL, NULL);
401
402         if (item->node->parent == NULL)
403                 return NULL;
404         return (FolderItem *) item->node->parent->data;
405 }
406
407 void folder_item_set_xml(Folder *folder, FolderItem *item, XMLTag *tag)
408 {
409         GList *cur;
410
411         for (cur = tag->attr; cur != NULL; cur = g_list_next(cur)) {
412                 XMLAttr *attr = (XMLAttr *) cur->data;
413
414                 if (!attr || !attr->name || !attr->value) continue;
415                 if (!strcmp(attr->name, "type")) {
416                         if (!g_ascii_strcasecmp(attr->value, "normal"))
417                                 item->stype = F_NORMAL;
418                         else if (!g_ascii_strcasecmp(attr->value, "inbox"))
419                                 item->stype = F_INBOX;
420                         else if (!g_ascii_strcasecmp(attr->value, "outbox"))
421                                 item->stype = F_OUTBOX;
422                         else if (!g_ascii_strcasecmp(attr->value, "draft"))
423                                 item->stype = F_DRAFT;
424                         else if (!g_ascii_strcasecmp(attr->value, "queue"))
425                                 item->stype = F_QUEUE;
426                         else if (!g_ascii_strcasecmp(attr->value, "trash"))
427                                 item->stype = F_TRASH;
428                 } else if (!strcmp(attr->name, "name")) {
429                         if (item->name != NULL)
430                                 g_free(item->name);
431                         item->name = g_strdup(attr->value);
432                 } else if (!strcmp(attr->name, "path")) {
433                         if (item->path != NULL)
434                                 g_free(item->path);
435                         item->path = g_strdup(attr->value);
436                 } else if (!strcmp(attr->name, "mtime"))
437                         item->mtime = strtoul(attr->value, NULL, 10);
438                 else if (!strcmp(attr->name, "new"))
439                         item->new_msgs = atoi(attr->value);
440                 else if (!strcmp(attr->name, "unread"))
441                         item->unread_msgs = atoi(attr->value);
442                 else if (!strcmp(attr->name, "unreadmarked"))
443                         item->unreadmarked_msgs = atoi(attr->value);
444                 else if (!strcmp(attr->name, "total"))
445                         item->total_msgs = atoi(attr->value);
446                 else if (!strcmp(attr->name, "no_sub"))
447                         item->no_sub = *attr->value == '1' ? TRUE : FALSE;
448                 else if (!strcmp(attr->name, "no_select"))
449                         item->no_select = *attr->value == '1' ? TRUE : FALSE;
450                 else if (!strcmp(attr->name, "collapsed"))
451                         item->collapsed = *attr->value == '1' ? TRUE : FALSE;
452                 else if (!strcmp(attr->name, "thread_collapsed"))
453                         item->thread_collapsed =  *attr->value == '1' ? TRUE : FALSE;
454                 else if (!strcmp(attr->name, "threaded"))
455                         item->threaded =  *attr->value == '1' ? TRUE : FALSE;
456                 else if (!strcmp(attr->name, "hidereadmsgs"))
457                         item->hide_read_msgs =  *attr->value == '1' ? TRUE : FALSE;
458                 else if (!strcmp(attr->name, "reqretrcpt"))
459                         item->ret_rcpt =  *attr->value == '1' ? TRUE : FALSE;
460                 else if (!strcmp(attr->name, "sort_key")) {
461                         if (!strcmp(attr->value, "none"))
462                                 item->sort_key = SORT_BY_NONE;
463                         else if (!strcmp(attr->value, "number"))
464                                 item->sort_key = SORT_BY_NUMBER;
465                         else if (!strcmp(attr->value, "size"))
466                                 item->sort_key = SORT_BY_SIZE;
467                         else if (!strcmp(attr->value, "date"))
468                                 item->sort_key = SORT_BY_DATE;
469                         else if (!strcmp(attr->value, "from"))
470                                 item->sort_key = SORT_BY_FROM;
471                         else if (!strcmp(attr->value, "subject"))
472                                 item->sort_key = SORT_BY_SUBJECT;
473                         else if (!strcmp(attr->value, "score"))
474                                 item->sort_key = SORT_BY_SCORE;
475                         else if (!strcmp(attr->value, "label"))
476                                 item->sort_key = SORT_BY_LABEL;
477                         else if (!strcmp(attr->value, "mark"))
478                                 item->sort_key = SORT_BY_MARK;
479                         else if (!strcmp(attr->value, "unread"))
480                                 item->sort_key = SORT_BY_STATUS;
481                         else if (!strcmp(attr->value, "mime"))
482                                 item->sort_key = SORT_BY_MIME;
483                         else if (!strcmp(attr->value, "to"))
484                                 item->sort_key = SORT_BY_TO;
485                         else if (!strcmp(attr->value, "locked"))
486                                 item->sort_key = SORT_BY_LOCKED;
487                 } else if (!strcmp(attr->name, "sort_type")) {
488                         if (!strcmp(attr->value, "ascending"))
489                                 item->sort_type = SORT_ASCENDING;
490                         else
491                                 item->sort_type = SORT_DESCENDING;
492                 } else if (!strcmp(attr->name, "account_id")) {
493                         PrefsAccount *account;
494
495                         account = account_find_from_id(atoi(attr->value));
496                         if (!account)
497                                 g_warning("account_id: %s not found\n", attr->value);
498                         else
499                                 item->account = account;
500                 } else if (!strcmp(attr->name, "apply_sub"))
501                         item->apply_sub = *attr->value == '1' ? TRUE : FALSE;
502         }
503 }
504
505 XMLTag *folder_item_get_xml(Folder *folder, FolderItem *item)
506 {
507         static gchar *folder_item_stype_str[] = {"normal", "inbox", "outbox",
508                                                  "draft", "queue", "trash"};
509         static gchar *sort_key_str[] = {"none", "number", "size", "date",
510                                         "from", "subject", "score", "label",
511                                         "mark", "unread", "mime", "to", 
512                                         "locked"};
513         XMLTag *tag;
514         gchar *value;
515
516         tag = xml_tag_new("folderitem");
517
518         xml_tag_add_attr(tag, xml_attr_new("type", folder_item_stype_str[item->stype]));
519         if (item->name)
520                 xml_tag_add_attr(tag, xml_attr_new("name", item->name));
521         if (item->path)
522                 xml_tag_add_attr(tag, xml_attr_new("path", item->path));
523         if (item->no_sub)
524                 xml_tag_add_attr(tag, xml_attr_new("no_sub", "1"));
525         if (item->no_select)
526                 xml_tag_add_attr(tag, xml_attr_new("no_select", "1"));
527         xml_tag_add_attr(tag, xml_attr_new("collapsed", item->collapsed && item->node->children ? "1" : "0"));
528         xml_tag_add_attr(tag, xml_attr_new("thread_collapsed", item->thread_collapsed ? "1" : "0"));
529         xml_tag_add_attr(tag, xml_attr_new("threaded", item->threaded ? "1" : "0"));
530         xml_tag_add_attr(tag, xml_attr_new("hidereadmsgs", item->hide_read_msgs ? "1" : "0"));
531         if (item->ret_rcpt)
532                 xml_tag_add_attr(tag, xml_attr_new("reqretrcpt", "1"));
533
534         if (item->sort_key != SORT_BY_NONE) {
535                 xml_tag_add_attr(tag, xml_attr_new("sort_key", sort_key_str[item->sort_key]));
536                 xml_tag_add_attr(tag, xml_attr_new("sort_type", item->sort_type == SORT_ASCENDING ? "ascending" : "descending"));
537         }
538
539         value = g_strdup_printf("%ld", (unsigned long int) item->mtime);
540         xml_tag_add_attr(tag, xml_attr_new("mtime", value));
541         g_free(value);
542         xml_tag_add_attr(tag, xml_attr_new_int("new", item->new_msgs));
543         xml_tag_add_attr(tag, xml_attr_new_int("unread", item->unread_msgs));
544         xml_tag_add_attr(tag, xml_attr_new_int("unreadmarked", item->unreadmarked_msgs));
545         xml_tag_add_attr(tag, xml_attr_new_int("total", item->total_msgs));
546
547         if (item->account)
548                 xml_tag_add_attr(tag, xml_attr_new_int("account_id", item->account->account_id));
549         if (item->apply_sub)
550                 xml_tag_add_attr(tag, xml_attr_new("apply_sub", "1"));
551
552         return tag;
553 }
554
555 void folder_set_ui_func(Folder *folder, FolderUIFunc func, gpointer data)
556 {
557         g_return_if_fail(folder != NULL);
558
559         folder->ui_func = func;
560         folder->ui_func_data = data;
561 }
562
563 void folder_set_name(Folder *folder, const gchar *name)
564 {
565         g_return_if_fail(folder != NULL);
566
567         g_free(folder->name);
568         folder->name = name ? g_strdup(name) : NULL;
569         if (folder->node && folder->node->data) {
570                 FolderItem *item = (FolderItem *)folder->node->data;
571
572                 g_free(item->name);
573                 item->name = name ? g_strdup(name) : NULL;
574         }
575 }
576
577 void folder_set_sort(Folder *folder, guint sort)
578 {
579         g_return_if_fail(folder != NULL);
580
581         if (folder->sort != sort) {
582                 folder_remove(folder);
583                 folder->sort = sort;
584                 folder_add(folder);
585         }
586 }
587
588 gboolean folder_tree_destroy_func(GNode *node, gpointer data) {
589         FolderItem *item = (FolderItem *) node->data;
590
591         folder_item_destroy(item);
592         return FALSE;
593 }
594
595 void folder_tree_destroy(Folder *folder)
596 {
597         GNode *node;
598
599         g_return_if_fail(folder != NULL);
600
601         node = folder->node;
602         
603         prefs_filtering_clear_folder(folder);
604
605         if (node != NULL) {
606                 g_node_traverse(node, G_POST_ORDER, G_TRAVERSE_ALL, -1,
607                                 folder_tree_destroy_func, NULL);
608                 g_node_destroy(node);
609                 folder->node = NULL;
610         }
611 }
612
613 void folder_add(Folder *folder)
614 {
615         Folder *cur_folder;
616         GList *cur;
617         gint i;
618         FolderUpdateData hookdata;
619
620         g_return_if_fail(folder != NULL);
621
622         for (i = 0, cur = folder_list; cur != NULL; cur = cur->next, i++) {
623                 cur_folder = FOLDER(cur->data);
624                 if (cur_folder->sort < folder->sort)
625                         break;
626         }
627
628         folder_list = g_list_insert(folder_list, folder, i);
629
630         hookdata.folder = folder;
631         hookdata.update_flags = FOLDER_ADD_FOLDER;
632         hookdata.item = NULL;
633         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
634 }
635
636 void folder_remove(Folder *folder)
637 {
638         FolderUpdateData hookdata;
639
640         g_return_if_fail(folder != NULL);
641
642         folder_list = g_list_remove(folder_list, folder);
643
644         hookdata.folder = folder;
645         hookdata.update_flags = FOLDER_REMOVE_FOLDER;
646         hookdata.item = NULL;
647         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
648 }
649
650 GList *folder_get_list(void)
651 {
652         return folder_list;
653 }
654
655 gint folder_read_list(void)
656 {
657         GNode *node, *cur;
658         XMLNode *xmlnode;
659         gchar *path;
660
661         path = folder_get_list_path();
662         if (!is_file_exist(path)) return -1;
663         node = xml_parse_file(path);
664         if (!node) return -1;
665
666         xmlnode = node->data;
667         if (strcmp2(xmlnode->tag->tag, "folderlist") != 0) {
668                 g_warning("wrong folder list\n");
669                 xml_free_tree(node);
670                 return -1;
671         }
672
673         cur = node->children;
674         while (cur != NULL) {
675                 Folder *folder;
676
677                 folder = folder_get_from_xml(cur);
678                 if (folder != NULL)
679                         folder_add(folder);
680                 else
681                         folder_unloaded_list = g_slist_append(folder_unloaded_list,
682                                 (gpointer) xml_copy_tree(cur));
683                 cur = cur->next;
684         }
685
686         xml_free_tree(node);
687         if (folder_list)
688                 return 0;
689         else
690                 return -1;
691 }
692
693 void folder_write_list(void)
694 {
695         GList *list;
696         GSList *slist;
697         Folder *folder;
698         gchar *path;
699         PrefFile *pfile;
700         GNode *rootnode;
701         XMLNode *xmlnode;
702         XMLTag *tag;
703
704         path = folder_get_list_path();
705         if ((pfile = prefs_write_open(path)) == NULL) return;
706
707         xml_file_put_xml_decl(pfile->fp);
708         tag = xml_tag_new("folderlist");
709
710         xmlnode = xml_node_new(tag, NULL);
711
712         rootnode = g_node_new(xmlnode);
713
714         for (list = folder_list; list != NULL; list = list->next) {
715                 GNode *node;
716
717                 folder = list->data;
718                 node = folder_get_xml_node(folder);
719                 if (node != NULL)
720                         g_node_append(rootnode, node);
721         }
722
723         for (slist = folder_unloaded_list; slist != NULL; slist = g_slist_next(slist)) {
724                 GNode *node = (GNode *) slist->data;
725
726                 g_node_append(rootnode, (gpointer) xml_copy_tree(node));
727         }
728
729         xml_write_tree(rootnode, pfile->fp);
730
731         if (prefs_file_close(pfile) < 0)
732                 g_warning("failed to write folder list.\n");
733
734         xml_free_tree(rootnode);
735 }
736
737 gboolean folder_scan_tree_func(GNode *node, gpointer data)
738 {
739         GHashTable *pptable = (GHashTable *)data;
740         FolderItem *item = (FolderItem *)node->data;
741         
742         folder_item_restore_persist_prefs(item, pptable);
743         folder_item_scan_full(item, FALSE);
744
745         return FALSE;
746 }
747
748 void folder_scan_tree(Folder *folder)
749 {
750         GHashTable *pptable;
751         FolderUpdateData hookdata;
752         
753         if (!folder->klass->scan_tree)
754                 return;
755         
756         pptable = folder_persist_prefs_new(folder);
757
758         /*
759          * should be changed and tree update should be done without 
760          * destroying the tree first
761          */
762         folder_tree_destroy(folder);
763         folder->klass->scan_tree(folder);
764
765         hookdata.folder = folder;
766         hookdata.update_flags = FOLDER_TREE_CHANGED;
767         hookdata.item = NULL;
768         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
769
770         g_node_traverse(folder->node, G_POST_ORDER, G_TRAVERSE_ALL, -1, folder_scan_tree_func, pptable);
771         folder_persist_prefs_free(pptable);
772
773         prefs_matcher_read_config();
774
775         folder_write_list();
776 }
777
778 FolderItem *folder_create_folder(FolderItem *parent, const gchar *name)
779 {
780         FolderItem *new_item;
781
782         new_item = parent->folder->klass->create_folder(parent->folder, parent, name);
783         if (new_item) {
784                 FolderUpdateData hookdata;
785
786                 new_item->cache = msgcache_new();
787
788                 hookdata.folder = new_item->folder;
789                 hookdata.update_flags = FOLDER_TREE_CHANGED | FOLDER_ADD_FOLDERITEM;
790                 hookdata.item = new_item;
791                 hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
792         }
793
794         return new_item;
795 }
796
797 gint folder_item_rename(FolderItem *item, gchar *newname)
798 {
799         gint retval;
800
801         g_return_val_if_fail(item != NULL, -1);
802         g_return_val_if_fail(newname != NULL, -1);
803
804         retval = item->folder->klass->rename_folder(item->folder, item, newname);
805
806         if (retval >= 0) {
807                 FolderItemUpdateData hookdata;
808
809                 hookdata.item = item;
810                 hookdata.update_flags = F_ITEM_UPDATE_NAME;
811                 hookdata.msg = NULL;
812                 hooks_invoke(FOLDER_ITEM_UPDATE_HOOKLIST, &hookdata);
813         }
814
815         return retval;
816 }
817
818 struct TotalMsgCount
819 {
820         guint new_msgs;
821         guint unread_msgs;
822         guint unreadmarked_msgs;
823         guint total_msgs;
824 };
825
826 struct FuncToAllFoldersData
827 {
828         FolderItemFunc  function;
829         gpointer        data;
830 };
831
832 static gboolean folder_func_to_all_folders_func(GNode *node, gpointer data)
833 {
834         FolderItem *item;
835         struct FuncToAllFoldersData *function_data = (struct FuncToAllFoldersData *) data;
836
837         g_return_val_if_fail(node->data != NULL, FALSE);
838
839         item = FOLDER_ITEM(node->data);
840         g_return_val_if_fail(item != NULL, FALSE);
841
842         function_data->function(item, function_data->data);
843
844         return FALSE;
845 }
846
847 void folder_func_to_all_folders(FolderItemFunc function, gpointer data)
848 {
849         GList *list;
850         Folder *folder;
851         struct FuncToAllFoldersData function_data;
852         
853         function_data.function = function;
854         function_data.data = data;
855
856         for (list = folder_list; list != NULL; list = list->next) {
857                 folder = FOLDER(list->data);
858                 if (folder->node)
859                         g_node_traverse(folder->node, G_PRE_ORDER,
860                                         G_TRAVERSE_ALL, -1,
861                                         folder_func_to_all_folders_func,
862                                         &function_data);
863         }
864 }
865
866 static void folder_count_total_msgs_func(FolderItem *item, gpointer data)
867 {
868         struct TotalMsgCount *count = (struct TotalMsgCount *)data;
869
870         count->new_msgs += item->new_msgs;
871         count->unread_msgs += item->unread_msgs;
872         count->unreadmarked_msgs += item->unreadmarked_msgs;
873         count->total_msgs += item->total_msgs;
874 }
875
876 struct TotalMsgStatus
877 {
878         guint new;
879         guint unread;
880         guint total;
881         GString *str;
882 };
883
884 static gboolean folder_get_status_full_all_func(GNode *node, gpointer data)
885 {
886         FolderItem *item;
887         struct TotalMsgStatus *status = (struct TotalMsgStatus *)data;
888         gchar *id;
889  
890         g_return_val_if_fail(node->data != NULL, FALSE);
891  
892         item = FOLDER_ITEM(node->data);
893
894         if (!item->path) return FALSE;
895
896         status->new += item->new_msgs;
897         status->unread += item->unread_msgs;
898         status->total += item->total_msgs;
899
900         if (status->str) {
901                 id = folder_item_get_identifier(item);
902                 g_string_append_printf(status->str, "%5d %5d %5d %s\n",
903                                   item->new_msgs, item->unread_msgs,
904                                   item->total_msgs, id);
905                 g_free(id);
906         }
907  
908         return FALSE;
909  }
910  
911 static void folder_get_status_full_all(GString *str, guint *new, guint *unread,
912                                        guint *total)
913 {
914         GList *list;
915         Folder *folder;
916         struct TotalMsgStatus status;
917  
918         status.new = status.unread = status.total = 0;
919         status.str = str;
920  
921         debug_print("Counting total number of messages...\n");
922  
923         for (list = folder_list; list != NULL; list = list->next) {
924                 folder = FOLDER(list->data);
925                 if (folder->node)
926                         g_node_traverse(folder->node, G_PRE_ORDER,
927                                         G_TRAVERSE_ALL, -1,
928                                         folder_get_status_full_all_func,
929                                         &status);
930         }
931  
932         *new = status.new;
933         *unread = status.unread;
934         *total = status.total;
935 }
936
937 gchar *folder_get_status(GPtrArray *folders, gboolean full)
938 {
939         guint new, unread, total;
940         GString *str;
941         gint i;
942         gchar *ret;
943
944         new = unread = total = 0;
945
946         str = g_string_new(NULL);
947
948         if (folders) {
949                 for (i = 0; i < folders->len; i++) {
950                         FolderItem *item;
951
952                         item = g_ptr_array_index(folders, i);
953                         new += item->new_msgs;
954                         unread += item->unread_msgs;
955                         total += item->total_msgs;
956
957                         if (full) {
958                                 gchar *id;
959
960                                 id = folder_item_get_identifier(item);
961                                 g_string_append_printf(str, "%5d %5d %5d %s\n",
962                                                   item->new_msgs, item->unread_msgs,
963                                                   item->total_msgs, id);
964                                 g_free(id);
965                         }
966                 }
967         } else {
968                 folder_get_status_full_all(full ? str : NULL,
969                                            &new, &unread, &total);
970         }
971
972         if (full)
973                 g_string_append_printf(str, "%5d %5d %5d\n", new, unread, total);
974         else
975                 g_string_append_printf(str, "%d %d %d\n", new, unread, total);
976
977         ret = str->str;
978         g_string_free(str, FALSE);
979  
980         return ret;
981 }
982
983 void folder_count_total_msgs(guint *new_msgs, guint *unread_msgs, guint *unreadmarked_msgs, guint *total_msgs)
984 {
985         struct TotalMsgCount count;
986
987         count.new_msgs = count.unread_msgs = count.unreadmarked_msgs = count.total_msgs = 0;
988
989         debug_print("Counting total number of messages...\n");
990
991         folder_func_to_all_folders(folder_count_total_msgs_func, &count);
992
993         *new_msgs = count.new_msgs;
994         *unread_msgs = count.unread_msgs;
995         *unreadmarked_msgs = count.unreadmarked_msgs;
996         *total_msgs = count.total_msgs;
997 }
998
999 Folder *folder_find_from_path(const gchar *path)
1000 {
1001         GList *list;
1002         Folder *folder;
1003
1004         for (list = folder_list; list != NULL; list = list->next) {
1005                 folder = list->data;
1006                 if ((FOLDER_TYPE(folder) == F_MH || 
1007                      FOLDER_TYPE(folder) == F_MBOX) &&
1008                     !path_cmp(LOCAL_FOLDER(folder)->rootpath, path))
1009                         return folder;
1010         }
1011
1012         return NULL;
1013 }
1014
1015 Folder *folder_find_from_name(const gchar *name, FolderClass *klass)
1016 {
1017         GList *list;
1018         Folder *folder;
1019
1020         for (list = folder_list; list != NULL; list = list->next) {
1021                 folder = list->data;
1022                 if (folder->klass == klass && 
1023                     strcmp2(name, folder->name) == 0)
1024                         return folder;
1025         }
1026
1027         return NULL;
1028 }
1029
1030 static gboolean folder_item_find_func(GNode *node, gpointer data)
1031 {
1032         FolderItem *item = node->data;
1033         gpointer *d = data;
1034         const gchar *path = d[0];
1035
1036         if (path_cmp(path, item->path) != 0)
1037                 return FALSE;
1038
1039         d[1] = item;
1040
1041         return TRUE;
1042 }
1043
1044 FolderItem *folder_find_item_from_path(const gchar *path)
1045 {
1046         Folder *folder;
1047         gpointer d[2];
1048
1049         folder = folder_get_default_folder();
1050         g_return_val_if_fail(folder != NULL, NULL);
1051
1052         d[0] = (gpointer)path;
1053         d[1] = NULL;
1054         g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
1055                         folder_item_find_func, d);
1056         return d[1];
1057 }
1058
1059 FolderItem *folder_find_child_item_by_name(FolderItem *item, const gchar *name)
1060 {
1061         GNode *node;
1062         FolderItem *child;
1063
1064         for (node = item->node->children; node != NULL; node = node->next) {
1065                 gchar *base;
1066                 child = FOLDER_ITEM(node->data);
1067                 base = g_path_get_basename(child->path);
1068                 if (strcmp2(base, name) == 0) {
1069                         g_free(base);
1070                         return child;
1071                 }
1072                 g_free(base);
1073         }
1074
1075         return NULL;
1076 }
1077
1078 FolderClass *folder_get_class_from_string(const gchar *str)
1079 {
1080         GSList *classlist;
1081
1082         classlist = folder_get_class_list();
1083         for (; classlist != NULL; classlist = g_slist_next(classlist)) {
1084                 FolderClass *class = (FolderClass *) classlist->data;
1085                 if (g_ascii_strcasecmp(class->idstr, str) == 0)
1086                         return class;
1087         }
1088
1089         return NULL;
1090 }
1091
1092 gchar *folder_get_identifier(Folder *folder)
1093 {
1094         gchar *type_str;
1095
1096         g_return_val_if_fail(folder != NULL, NULL);
1097
1098         type_str = folder->klass->idstr;
1099         return g_strconcat("#", type_str, "/", folder->name, NULL);
1100 }
1101
1102 gchar *folder_item_get_identifier(FolderItem *item)
1103 {
1104         gchar *id = NULL;
1105         gchar *folder_id = NULL;
1106
1107         g_return_val_if_fail(item != NULL, NULL);
1108         g_return_val_if_fail(item->path != NULL, NULL);
1109
1110         folder_id = folder_get_identifier(item->folder);
1111         id = g_strconcat(folder_id, "/", item->path, NULL);
1112         g_free(folder_id);
1113
1114         return id;
1115 }
1116
1117 FolderItem *folder_find_item_from_identifier(const gchar *identifier)
1118 {
1119         Folder *folder;
1120         gpointer d[2];
1121         gchar *str;
1122         gchar *p;
1123         gchar *name;
1124         gchar *path;
1125         FolderClass *class;
1126
1127         g_return_val_if_fail(identifier != NULL, NULL);
1128
1129         if (*identifier != '#')
1130                 return folder_find_item_from_path(identifier);
1131
1132         Xstrdup_a(str, identifier, return NULL);
1133
1134         p = strchr(str, '/');
1135         if (!p)
1136                 return folder_find_item_from_path(identifier);
1137         *p = '\0';
1138         p++;
1139         class = folder_get_class_from_string(&str[1]);
1140         if (class == NULL)
1141                 return folder_find_item_from_path(identifier);
1142
1143         name = p;
1144         p = strchr(p, '/');
1145         if (!p)
1146                 return folder_find_item_from_path(identifier);
1147         *p = '\0';
1148         p++;
1149
1150         folder = folder_find_from_name(name, class);
1151         if (!folder)
1152                 return folder_find_item_from_path(identifier);
1153
1154         path = p;
1155
1156         d[0] = (gpointer)path;
1157         d[1] = NULL;
1158         g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
1159                         folder_item_find_func, d);
1160         return d[1];
1161 }
1162
1163 /**
1164  * Get a displayable name for a FolderItem
1165  *
1166  * \param item FolderItem for that a name should be created
1167  * \return Displayable name for item, returned string has to
1168  *         be freed
1169  */
1170 gchar *folder_item_get_name(FolderItem *item)
1171 {
1172         gchar *name = NULL;
1173
1174         g_return_val_if_fail(item != NULL, g_strdup(""));
1175
1176         switch (item->stype) {
1177         case F_INBOX:
1178                 name = g_strdup(!strcmp2(item->name, INBOX_DIR) ? _("Inbox") :
1179                                 item->name);
1180                 break;
1181         case F_OUTBOX:
1182                 name = g_strdup(!strcmp2(item->name, OUTBOX_DIR) ? _("Sent") :
1183                                 item->name);
1184                 break;
1185         case F_QUEUE:
1186                 name = g_strdup(!strcmp2(item->name, QUEUE_DIR) ? _("Queue") :
1187                                 item->name);
1188                 break;
1189         case F_TRASH:
1190                 name = g_strdup(!strcmp2(item->name, TRASH_DIR) ? _("Trash") :
1191                                 item->name);
1192                 break;
1193         case F_DRAFT:
1194                 name = g_strdup(!strcmp2(item->name, DRAFT_DIR) ? _("Drafts") :
1195                                 item->name);
1196                 break;
1197         default:
1198                 break;
1199         }
1200
1201         if (name == NULL) {
1202                 /*
1203                  * should probably be done by a virtual function,
1204                  * the folder knows the ui string and how to abbrev
1205                 */
1206                 if (folder_item_parent(item) == NULL) {
1207                         name = g_strconcat(item->name, " (", item->folder->klass->uistr, ")", NULL);
1208                 } else {
1209                         if (FOLDER_CLASS(item->folder) == news_get_class() &&
1210                             item->path && !strcmp2(item->name, item->path))
1211                                 name = get_abbrev_newsgroup_name
1212                                         (item->path,
1213                                          prefs_common.ng_abbrev_len);
1214                         else
1215                                 name = g_strdup(item->name);
1216                 }
1217         }
1218
1219         if (name == NULL)
1220                 name = g_strdup("");
1221
1222         return name;
1223 }
1224
1225 Folder *folder_get_default_folder(void)
1226 {
1227         return folder_list ? FOLDER(folder_list->data) : NULL;
1228 }
1229
1230 FolderItem *folder_get_default_inbox(void)
1231 {
1232         GList *flist;
1233
1234         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1235                 Folder * folder = FOLDER(flist->data);
1236
1237                 if (folder == NULL)
1238                         continue;
1239                 if (folder->inbox == NULL)
1240                         continue;
1241
1242                 return folder->inbox;
1243         }
1244
1245         return NULL;
1246 }
1247
1248 FolderItem *folder_get_default_outbox(void)
1249 {
1250         GList *flist;
1251
1252         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1253                 Folder * folder = FOLDER(flist->data);
1254
1255                 if (folder == NULL)
1256                         continue;
1257                 if (folder->outbox == NULL)
1258                         continue;
1259
1260                 return folder->outbox;
1261         }
1262
1263         return NULL;
1264 }
1265
1266 FolderItem *folder_get_default_draft(void)
1267 {
1268         GList *flist;
1269
1270         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1271                 Folder * folder = FOLDER(flist->data);
1272
1273                 if (folder == NULL)
1274                         continue;
1275                 if (folder->draft == NULL)
1276                         continue;
1277
1278                 return folder->draft;
1279         }
1280
1281         return NULL;
1282 }
1283
1284 FolderItem *folder_get_default_queue(void)
1285 {
1286         GList *flist;
1287
1288         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1289                 Folder * folder = FOLDER(flist->data);
1290
1291                 if (folder == NULL)
1292                         continue;
1293                 if (folder->queue == NULL)
1294                         continue;
1295
1296                 return folder->queue;
1297         }
1298
1299         return NULL;
1300 }
1301
1302 FolderItem *folder_get_default_trash(void)
1303 {
1304         GList *flist;
1305
1306         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1307                 Folder * folder = FOLDER(flist->data);
1308
1309                 if (folder == NULL)
1310                         continue;
1311                 if (folder->trash == NULL)
1312                         continue;
1313
1314                 return folder->trash;
1315         }
1316
1317         return NULL;
1318 }
1319
1320 #define CREATE_FOLDER_IF_NOT_EXIST(member, dir, type)           \
1321 {                                                               \
1322         if (!folder->member) {                                  \
1323                 item = folder_item_new(folder, dir, dir);       \
1324                 item->stype = type;                             \
1325                 folder_item_append(rootitem, item);             \
1326                 folder->member = item;                          \
1327         }                                                       \
1328 }
1329
1330 void folder_set_missing_folders(void)
1331 {
1332         Folder *folder;
1333         FolderItem *rootitem;
1334         FolderItem *item;
1335         GList *list;
1336
1337         for (list = folder_list; list != NULL; list = list->next) {
1338                 folder = list->data;
1339                 if (FOLDER_TYPE(folder) != F_MH) continue;
1340                 rootitem = FOLDER_ITEM(folder->node->data);
1341                 g_return_if_fail(rootitem != NULL);
1342
1343                 if (folder->inbox && folder->outbox && folder->draft &&
1344                     folder->queue && folder->trash)
1345                         continue;
1346
1347                 if (folder->klass->create_tree(folder) < 0) {
1348                         g_warning("%s: can't create the folder tree.\n",
1349                                   LOCAL_FOLDER(folder)->rootpath);
1350                         continue;
1351                 }
1352
1353                 CREATE_FOLDER_IF_NOT_EXIST(inbox,  INBOX_DIR,  F_INBOX);
1354                 CREATE_FOLDER_IF_NOT_EXIST(outbox, OUTBOX_DIR, F_OUTBOX);
1355                 CREATE_FOLDER_IF_NOT_EXIST(draft,  DRAFT_DIR,  F_DRAFT);
1356                 CREATE_FOLDER_IF_NOT_EXIST(queue,  QUEUE_DIR,  F_QUEUE);
1357                 CREATE_FOLDER_IF_NOT_EXIST(trash,  TRASH_DIR,  F_TRASH);
1358         }
1359 }
1360
1361 static gboolean folder_unref_account_func(GNode *node, gpointer data)
1362 {
1363         FolderItem *item = node->data;
1364         PrefsAccount *account = data;
1365
1366         if (item->account == account)
1367                 item->account = NULL;
1368
1369         return FALSE;
1370 }
1371
1372 void folder_unref_account_all(PrefsAccount *account)
1373 {
1374         Folder *folder;
1375         GList *list;
1376
1377         if (!account) return;
1378
1379         for (list = folder_list; list != NULL; list = list->next) {
1380                 folder = list->data;
1381                 if (folder->account == account)
1382                         folder->account = NULL;
1383                 g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
1384                                 folder_unref_account_func, account);
1385         }
1386 }
1387
1388 #undef CREATE_FOLDER_IF_NOT_EXIST
1389
1390 gchar *folder_item_get_path(FolderItem *item)
1391 {
1392         Folder *folder;
1393
1394         g_return_val_if_fail(item != NULL, NULL);
1395         folder = item->folder;
1396         g_return_val_if_fail(folder != NULL, NULL);
1397
1398         return folder->klass->item_get_path(folder, item);
1399 }
1400
1401 void folder_item_set_default_flags(FolderItem *dest, MsgFlags *flags)
1402 {
1403         if (!(dest->stype == F_OUTBOX ||
1404               dest->stype == F_QUEUE  ||
1405               dest->stype == F_DRAFT  ||
1406               dest->stype == F_TRASH)) {
1407                 flags->perm_flags = MSG_NEW|MSG_UNREAD;
1408         } else {
1409                 flags->perm_flags = 0;
1410         }
1411         if (FOLDER_TYPE(dest->folder) == F_MH) {
1412                 if (dest->stype == F_QUEUE) {
1413                         MSG_SET_TMP_FLAGS(*flags, MSG_QUEUED);
1414                 } else if (dest->stype == F_DRAFT) {
1415                         MSG_SET_TMP_FLAGS(*flags, MSG_DRAFT);
1416                 }
1417         }
1418 }
1419
1420 static gint folder_sort_cache_list_by_msgnum(gconstpointer a, gconstpointer b)
1421 {
1422         MsgInfo *msginfo_a = (MsgInfo *) a;
1423         MsgInfo *msginfo_b = (MsgInfo *) b;
1424
1425         return (msginfo_a->msgnum - msginfo_b->msgnum);
1426 }
1427
1428 static gint folder_sort_folder_list(gconstpointer a, gconstpointer b)
1429 {
1430         guint gint_a = GPOINTER_TO_INT(a);
1431         guint gint_b = GPOINTER_TO_INT(b);
1432         
1433         return (gint_a - gint_b);
1434 }
1435
1436 gint folder_item_open(FolderItem *item)
1437 {
1438         gchar *buf;
1439         if((item->folder->klass->scan_required != NULL) &&
1440            (item->folder->klass->scan_required(item->folder, item))) {
1441                 folder_item_scan_full(item, TRUE);
1442         }
1443         folder_item_syncronize_flags(item);
1444         
1445         /* Processing */
1446         buf = g_strdup_printf(_("Processing (%s)...\n"), 
1447                               item->path ? item->path : item->name);
1448         debug_print("%s\n", buf);
1449         g_free(buf);
1450         
1451         folder_item_apply_processing(item);
1452
1453         item->opened = TRUE;
1454
1455         debug_print("done.\n");
1456
1457         return 0;
1458 }
1459
1460 gint folder_item_close(FolderItem *item)
1461 {
1462         GSList *mlist, *cur;
1463         Folder *folder;
1464         
1465         g_return_val_if_fail(item != NULL, -1);
1466
1467         if (item->new_msgs) {
1468                 folder_item_update_freeze();
1469                 mlist = folder_item_get_msg_list(item);
1470                 for (cur = mlist ; cur != NULL ; cur = cur->next) {
1471                         MsgInfo * msginfo;
1472
1473                         msginfo = (MsgInfo *) cur->data;
1474                         if (MSG_IS_NEW(msginfo->flags))
1475                                 procmsg_msginfo_unset_flags(msginfo, MSG_NEW, 0);
1476                         procmsg_msginfo_free(msginfo);
1477                 }
1478                 g_slist_free(mlist);
1479                 folder_item_update_thaw();
1480         }               
1481
1482         folder_item_write_cache(item);
1483         
1484         folder_item_update(item, F_ITEM_UPDATE_MSGCNT);
1485
1486         item->opened = FALSE;
1487         folder = item->folder;
1488
1489         if (folder->klass->close == NULL)
1490                 return 0;
1491
1492         return folder->klass->close(folder, item);
1493 }
1494
1495 static MsgInfoList *get_msginfos(FolderItem *item, MsgNumberList *numlist)
1496 {
1497         MsgInfoList *msglist = NULL;
1498         Folder *folder = item->folder;
1499
1500         if (folder->klass->get_msginfos != NULL)
1501                 msglist = folder->klass->get_msginfos(folder, item, numlist);
1502         else {
1503                 MsgNumberList *elem;
1504
1505                 for (elem = numlist; elem != NULL; elem = g_slist_next(elem)) {
1506                         MsgInfo *msginfo;
1507                         guint num;
1508
1509                         num = GPOINTER_TO_INT(elem->data);
1510                         msginfo = folder->klass->get_msginfo(folder, item, num);
1511                         if (msginfo != NULL)
1512                                 msglist = g_slist_prepend(msglist, msginfo);
1513                 }               
1514         }
1515
1516         return msglist;
1517 }
1518
1519 static MsgInfo *get_msginfo(FolderItem *item, guint num)
1520 {
1521         MsgNumberList numlist;
1522         MsgInfoList *msglist;
1523         MsgInfo *msginfo = NULL;
1524
1525         numlist.data = GINT_TO_POINTER(num);
1526         numlist.next = NULL;
1527         msglist = get_msginfos(item, &numlist);
1528         if (msglist != NULL)
1529                 msginfo = procmsg_msginfo_new_ref(msglist->data);
1530         procmsg_msg_list_free(msglist);
1531
1532         return msginfo;
1533 }
1534
1535 static gint syncronize_flags(FolderItem *item, MsgInfoList *msglist)
1536 {
1537         GRelation *relation;
1538         gint ret = 0;
1539         GSList *cur;
1540
1541         if(msglist == NULL)
1542                 return 0;
1543         if(item->folder->klass->get_flags == NULL)
1544                 return 0;
1545
1546         relation = g_relation_new(2);
1547         g_relation_index(relation, 0, g_direct_hash, g_direct_equal);
1548         if ((ret = item->folder->klass->get_flags(
1549             item->folder, item, msglist, relation)) == 0) {
1550                 GTuples *tuples;
1551                 MsgInfo *msginfo;
1552                 MsgPermFlags permflags = 0;
1553                 gboolean skip;
1554
1555                 for (cur = msglist; cur != NULL; cur = g_slist_next(cur)) {
1556                         msginfo = (MsgInfo *) cur->data;
1557                 
1558                         tuples = g_relation_select(relation, msginfo, 0);
1559                         skip = tuples->len < 1;
1560                         if (!skip)
1561                                 permflags = GPOINTER_TO_INT(g_tuples_index(tuples, 0, 1));
1562                         g_tuples_destroy(tuples);
1563                         if (skip)
1564                                 continue;
1565                         
1566                         if (msginfo->flags.perm_flags != permflags) {
1567                                 procmsg_msginfo_set_flags(msginfo,
1568                                         permflags & ~msginfo->flags.perm_flags, 0);
1569                                 procmsg_msginfo_unset_flags(msginfo,
1570                                         ~permflags & msginfo->flags.perm_flags, 0);
1571                         }
1572                 }
1573         }
1574         g_relation_destroy(relation);   
1575
1576         return ret;
1577 }
1578
1579 gint folder_item_scan_full(FolderItem *item, gboolean filtering)
1580 {
1581         Folder *folder;
1582         GSList *folder_list = NULL, *cache_list = NULL;
1583         GSList *folder_list_cur, *cache_list_cur, *new_list = NULL;
1584         GSList *exists_list = NULL, *elem;
1585         GSList *newmsg_list = NULL;
1586         guint newcnt = 0, unreadcnt = 0, totalcnt = 0, unreadmarkedcnt = 0;
1587         guint cache_max_num, folder_max_num, cache_cur_num, folder_cur_num;
1588         gboolean update_flags = 0, old_uids_valid = FALSE;
1589     
1590         g_return_val_if_fail(item != NULL, -1);
1591         if (item->path == NULL) return -1;
1592
1593         folder = item->folder;
1594
1595         g_return_val_if_fail(folder != NULL, -1);
1596         g_return_val_if_fail(folder->klass->get_num_list != NULL, -1);
1597
1598         debug_print("Scanning folder %s for cache changes.\n", item->path);
1599
1600         /* Get list of messages for folder and cache */
1601         if (folder->klass->get_num_list(item->folder, item, &folder_list, &old_uids_valid) < 0) {
1602                 debug_print("Error fetching list of message numbers\n");
1603                 return(-1);
1604         }
1605
1606         if (old_uids_valid) {
1607                 if (!item->cache)
1608                         folder_item_read_cache(item);
1609                 cache_list = msgcache_get_msg_list(item->cache);
1610         } else {
1611                 if (item->cache)
1612                         msgcache_destroy(item->cache);
1613                 item->cache = msgcache_new();
1614                 cache_list = NULL;
1615         }
1616
1617         /* Sort both lists */
1618         cache_list = g_slist_sort(cache_list, folder_sort_cache_list_by_msgnum);
1619         folder_list = g_slist_sort(folder_list, folder_sort_folder_list);
1620
1621         cache_list_cur = cache_list;
1622         folder_list_cur = folder_list;
1623
1624         if (cache_list_cur != NULL) {
1625                 GSList *cache_list_last;
1626         
1627                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
1628                 cache_list_last = g_slist_last(cache_list);
1629                 cache_max_num = ((MsgInfo *)cache_list_last->data)->msgnum;
1630         } else {
1631                 cache_cur_num = G_MAXINT;
1632                 cache_max_num = 0;
1633         }
1634
1635         if (folder_list_cur != NULL) {
1636                 GSList *folder_list_last;
1637         
1638                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
1639                 folder_list_last = g_slist_last(folder_list);
1640                 folder_max_num = GPOINTER_TO_INT(folder_list_last->data);
1641         } else {
1642                 folder_cur_num = G_MAXINT;
1643                 folder_max_num = 0;
1644         }
1645
1646         while ((cache_cur_num != G_MAXINT) || (folder_cur_num != G_MAXINT)) {
1647                 /*
1648                  *  Message only exists in the folder
1649                  *  Remember message for fetching
1650                  */
1651                 if (folder_cur_num < cache_cur_num) {
1652                         gboolean add = FALSE;
1653
1654                         switch(FOLDER_TYPE(folder)) {
1655                                 case F_NEWS:
1656                                         if (folder_cur_num < cache_max_num)
1657                                                 break;
1658                                         
1659                                         if (folder->account->max_articles == 0) {
1660                                                 add = TRUE;
1661                                         }
1662
1663                                         if (folder_max_num <= folder->account->max_articles) {
1664                                                 add = TRUE;
1665                                         } else if (folder_cur_num > (folder_max_num - folder->account->max_articles)) {
1666                                                 add = TRUE;
1667                                         }
1668                                         break;
1669                                 default:
1670                                         add = TRUE;
1671                                         break;
1672                         }
1673                         
1674                         if (add) {
1675                                 new_list = g_slist_prepend(new_list, GINT_TO_POINTER(folder_cur_num));
1676                                 debug_print("Remembered message %d for fetching\n", folder_cur_num);
1677                         }
1678
1679                         /* Move to next folder number */
1680                         folder_list_cur = folder_list_cur->next;
1681
1682                         if (folder_list_cur != NULL)
1683                                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
1684                         else
1685                                 folder_cur_num = G_MAXINT;
1686
1687                         continue;
1688                 }
1689
1690                 /*
1691                  *  Message only exists in the cache
1692                  *  Remove the message from the cache
1693                  */
1694                 if (cache_cur_num < folder_cur_num) {
1695                         msgcache_remove_msg(item->cache, cache_cur_num);
1696                         debug_print("Removed message %d from cache.\n", cache_cur_num);
1697
1698                         /* Move to next cache number */
1699                         cache_list_cur = cache_list_cur->next;
1700
1701                         if (cache_list_cur != NULL)
1702                                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
1703                         else
1704                                 cache_cur_num = G_MAXINT;
1705
1706                         update_flags |= F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT;
1707
1708                         continue;
1709                 }
1710
1711                 /*
1712                  *  Message number exists in folder and cache!
1713                  *  Check if the message has been modified
1714                  */
1715                 if (cache_cur_num == folder_cur_num) {
1716                         MsgInfo *msginfo;
1717
1718                         msginfo = msgcache_get_msg(item->cache, folder_cur_num);
1719                         if (folder->klass->is_msg_changed && folder->klass->is_msg_changed(folder, item, msginfo)) {
1720                                 msgcache_remove_msg(item->cache, msginfo->msgnum);
1721                                 new_list = g_slist_prepend(new_list, GINT_TO_POINTER(msginfo->msgnum));
1722                                 procmsg_msginfo_free(msginfo);
1723
1724                                 debug_print("Remembering message %d to update...\n", folder_cur_num);
1725                         } else
1726                                 exists_list = g_slist_prepend(exists_list, msginfo);
1727
1728                         /* Move to next folder and cache number */
1729                         cache_list_cur = cache_list_cur->next;
1730                         folder_list_cur = folder_list_cur->next;
1731
1732                         if (cache_list_cur != NULL)
1733                                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
1734                         else
1735                                 cache_cur_num = G_MAXINT;
1736
1737                         if (folder_list_cur != NULL)
1738                                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
1739                         else
1740                                 folder_cur_num = G_MAXINT;
1741
1742                         continue;
1743                 }
1744         }
1745         
1746         for(cache_list_cur = cache_list; cache_list_cur != NULL; cache_list_cur = g_slist_next(cache_list_cur))
1747                 procmsg_msginfo_free((MsgInfo *) cache_list_cur->data);
1748
1749         g_slist_free(cache_list);
1750         g_slist_free(folder_list);
1751
1752         if (new_list != NULL) {
1753                 newmsg_list = get_msginfos(item, new_list);
1754                 g_slist_free(new_list);
1755         }
1756
1757         syncronize_flags(item, exists_list);
1758
1759         folder_item_update_freeze();
1760         if (newmsg_list != NULL) {
1761                 GSList *elem;
1762
1763                 for (elem = newmsg_list; elem != NULL; elem = g_slist_next(elem)) {
1764                         MsgInfo *msginfo = (MsgInfo *) elem->data;
1765
1766                         msgcache_add_msg(item->cache, msginfo);
1767                         if ((filtering == TRUE) &&
1768                             (item->stype == F_INBOX) &&
1769                             (item->folder->account != NULL) && 
1770                             (item->folder->account->filter_on_recv) &&
1771                             procmsg_msginfo_filter(msginfo))
1772                                 procmsg_msginfo_free(msginfo);
1773                         else
1774                                 exists_list = g_slist_prepend(exists_list, msginfo);
1775                 }
1776                 g_slist_free(newmsg_list);
1777
1778                 update_flags |= F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT;
1779         }
1780
1781         for (elem = exists_list; elem != NULL; elem = g_slist_next(elem)) {
1782                 MsgInfo *msginfo;
1783
1784                 msginfo = elem->data;
1785                 if (MSG_IS_IGNORE_THREAD(msginfo->flags) && (MSG_IS_NEW(msginfo->flags) || MSG_IS_UNREAD(msginfo->flags)))
1786                         procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
1787                 if (!MSG_IS_IGNORE_THREAD(msginfo->flags) && procmsg_msg_has_flagged_parent(msginfo, MSG_IGNORE_THREAD)) {
1788                         procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
1789                         procmsg_msginfo_set_flags(msginfo, MSG_IGNORE_THREAD, 0);
1790                 }
1791                 if ((item->stype == F_OUTBOX ||
1792                      item->stype == F_QUEUE  ||
1793                      item->stype == F_DRAFT  ||
1794                      item->stype == F_TRASH) &&
1795                     (MSG_IS_NEW(msginfo->flags) || MSG_IS_UNREAD(msginfo->flags)))
1796                         procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
1797                 if (MSG_IS_NEW(msginfo->flags))
1798                         newcnt++;
1799                 if (MSG_IS_UNREAD(msginfo->flags))
1800                         unreadcnt++;
1801                 if (MSG_IS_UNREAD(msginfo->flags) && procmsg_msg_has_marked_parent(msginfo))
1802                         unreadmarkedcnt++;
1803                 totalcnt++;
1804
1805                 procmsg_msginfo_free(msginfo);
1806         }
1807         g_slist_free(exists_list);
1808
1809         item->new_msgs = newcnt;
1810         item->unread_msgs = unreadcnt;
1811         item->total_msgs = totalcnt;
1812         item->unreadmarked_msgs = unreadmarkedcnt;
1813
1814         update_flags |= F_ITEM_UPDATE_MSGCNT;
1815
1816         folder_item_update(item, update_flags);
1817         folder_item_update_thaw();
1818
1819         return 0;
1820 }
1821
1822 gint folder_item_scan(FolderItem *item)
1823 {
1824         return folder_item_scan_full(item, TRUE);
1825 }
1826
1827 static gboolean folder_scan_all_items_func(GNode *node, gpointer data)
1828 {
1829         FolderItem *item = node->data;
1830
1831         folder_item_scan(item);
1832
1833         return FALSE;
1834 }
1835
1836 void folder_scan_all_items(Folder * folder)
1837 {
1838         g_node_traverse(folder->node, G_PRE_ORDER,
1839                         G_TRAVERSE_ALL, -1, folder_scan_all_items_func, NULL);
1840 }
1841
1842 static void folder_item_scan_foreach_func(gpointer key, gpointer val,
1843                                           gpointer data)
1844 {
1845         folder_item_scan(FOLDER_ITEM(key));
1846 }
1847
1848 void folder_item_scan_foreach(GHashTable *table)
1849 {
1850         g_hash_table_foreach(table, folder_item_scan_foreach_func, NULL);
1851 }
1852
1853 void folder_count_total_cache_memusage(FolderItem *item, gpointer data)
1854 {
1855         gint *memusage = (gint *)data;
1856
1857         if (item->cache == NULL)
1858                 return;
1859         
1860         *memusage += msgcache_get_memory_usage(item->cache);
1861 }
1862
1863 gint folder_item_syncronize_flags(FolderItem *item)
1864 {
1865         MsgInfoList *msglist = NULL;
1866         GSList *cur;
1867         gint ret = 0;
1868         
1869         g_return_val_if_fail(item != NULL, -1);
1870         g_return_val_if_fail(item->folder != NULL, -1);
1871         g_return_val_if_fail(item->folder->klass != NULL, -1);
1872         
1873         if (item->cache == NULL)
1874                 folder_item_read_cache(item);
1875         
1876         msglist = msgcache_get_msg_list(item->cache);
1877         
1878         ret = syncronize_flags(item, msglist);
1879
1880         for (cur = msglist; cur != NULL; cur = g_slist_next(cur))
1881                 procmsg_msginfo_free((MsgInfo *) cur->data);
1882         
1883         return ret;
1884 }
1885
1886 gint folder_cache_time_compare_func(gconstpointer a, gconstpointer b)
1887 {
1888         FolderItem *fa = (FolderItem *)a;
1889         FolderItem *fb = (FolderItem *)b;
1890         
1891         return (gint) (msgcache_get_last_access_time(fa->cache) - msgcache_get_last_access_time(fb->cache));
1892 }
1893
1894 void folder_find_expired_caches(FolderItem *item, gpointer data)
1895 {
1896         GSList **folder_item_list = (GSList **)data;
1897         gint difftime, expiretime;
1898         
1899         if (item->cache == NULL)
1900                 return;
1901
1902         if (item->opened > 0)
1903                 return;
1904
1905         difftime = (gint) (time(NULL) - msgcache_get_last_access_time(item->cache));
1906         expiretime = prefs_common.cache_min_keep_time * 60;
1907         debug_print("Cache unused time: %d (Expire time: %d)\n", difftime, expiretime);
1908         if (difftime > expiretime) {
1909                 *folder_item_list = g_slist_insert_sorted(*folder_item_list, item, folder_cache_time_compare_func);
1910         }
1911 }
1912
1913 void folder_item_free_cache(FolderItem *item)
1914 {
1915         g_return_if_fail(item != NULL);
1916         
1917         if (item->cache == NULL)
1918                 return;
1919         
1920         if (item->opened > 0)
1921                 return;
1922
1923         folder_item_write_cache(item);
1924         msgcache_destroy(item->cache);
1925         item->cache = NULL;
1926 }
1927
1928 void folder_clean_cache_memory(void)
1929 {
1930         gint memusage = 0;
1931
1932         folder_func_to_all_folders(folder_count_total_cache_memusage, &memusage);       
1933         debug_print("Total cache memory usage: %d\n", memusage);
1934         
1935         if (memusage > (prefs_common.cache_max_mem_usage * 1024)) {
1936                 GSList *folder_item_list = NULL, *listitem;
1937                 
1938                 debug_print("Trying to free cache memory\n");
1939
1940                 folder_func_to_all_folders(folder_find_expired_caches, &folder_item_list);      
1941                 listitem = folder_item_list;
1942                 while((listitem != NULL) && (memusage > (prefs_common.cache_max_mem_usage * 1024))) {
1943                         FolderItem *item = (FolderItem *)(listitem->data);
1944
1945                         debug_print("Freeing cache memory for %s\n", item->path ? item->path : item->name);
1946                         memusage -= msgcache_get_memory_usage(item->cache);
1947                         folder_item_free_cache(item);
1948                         listitem = listitem->next;
1949                 }
1950                 g_slist_free(folder_item_list);
1951         }
1952 }
1953
1954 void folder_item_read_cache(FolderItem *item)
1955 {
1956         gchar *cache_file, *mark_file;
1957         
1958         g_return_if_fail(item != NULL);
1959
1960         if (item->path != NULL) {
1961                 cache_file = folder_item_get_cache_file(item);
1962                 mark_file = folder_item_get_mark_file(item);
1963                 item->cache = msgcache_read_cache(item, cache_file);
1964                 if (!item->cache) {
1965                         MsgInfoList *list, *cur;
1966                         guint newcnt = 0, unreadcnt = 0, unreadmarkedcnt = 0;
1967                         MsgInfo *msginfo;
1968
1969                         item->cache = msgcache_new();
1970                         folder_item_scan_full(item, TRUE);
1971
1972                         msgcache_read_mark(item->cache, mark_file);
1973
1974                         list = msgcache_get_msg_list(item->cache);
1975                         for (cur = list; cur != NULL; cur = g_slist_next(cur)) {
1976                                 msginfo = cur->data;
1977
1978                                 if (MSG_IS_NEW(msginfo->flags))
1979                                         newcnt++;
1980                                 if (MSG_IS_UNREAD(msginfo->flags))
1981                                         unreadcnt++;
1982                                 if (MSG_IS_UNREAD(msginfo->flags) && procmsg_msg_has_marked_parent(msginfo))
1983                                         unreadmarkedcnt++;
1984                         }
1985                         item->new_msgs = newcnt;
1986                         item->unread_msgs = unreadcnt;
1987                         item->unreadmarked_msgs = unreadmarkedcnt;
1988                         procmsg_msg_list_free(list);
1989                 } else
1990                         msgcache_read_mark(item->cache, mark_file);
1991
1992                 g_free(cache_file);
1993                 g_free(mark_file);
1994         } else {
1995                 item->cache = msgcache_new();
1996         }
1997
1998         folder_clean_cache_memory();
1999 }
2000
2001 void folder_item_write_cache(FolderItem *item)
2002 {
2003         gchar *cache_file, *mark_file;
2004         FolderItemPrefs *prefs;
2005         gint filemode = 0;
2006         gchar *id;
2007         
2008         if (!item || !item->path || !item->cache)
2009                 return;
2010
2011         id = folder_item_get_identifier(item);
2012         debug_print("Save cache for folder %s\n", id);
2013         g_free(id);
2014
2015         cache_file = folder_item_get_cache_file(item);
2016         mark_file = folder_item_get_mark_file(item);
2017         if (msgcache_write(cache_file, mark_file, item->cache) < 0) {
2018                 prefs = item->prefs;
2019                 if (prefs && prefs->enable_folder_chmod && prefs->folder_chmod) {
2020                         /* for cache file */
2021                         filemode = prefs->folder_chmod;
2022                         if (filemode & S_IRGRP) filemode |= S_IWGRP;
2023                         if (filemode & S_IROTH) filemode |= S_IWOTH;
2024                         chmod(cache_file, filemode);
2025                 }
2026         }
2027
2028         g_free(cache_file);
2029         g_free(mark_file);
2030 }
2031
2032 MsgInfo *folder_item_get_msginfo(FolderItem *item, gint num)
2033 {
2034         Folder *folder;
2035         MsgInfo *msginfo = NULL;
2036         
2037         g_return_val_if_fail(item != NULL, NULL);
2038         
2039         folder = item->folder;
2040         if (!item->cache)
2041                 folder_item_read_cache(item);
2042         
2043         if ((msginfo = msgcache_get_msg(item->cache, num)) != NULL)
2044                 return msginfo;
2045         
2046         msginfo = get_msginfo(item, num);
2047         if (msginfo != NULL) {
2048                 msgcache_add_msg(item->cache, msginfo);
2049                 return msginfo;
2050         }
2051         
2052         return NULL;
2053 }
2054
2055 MsgInfo *folder_item_get_msginfo_by_msgid(FolderItem *item, const gchar *msgid)
2056 {
2057         Folder *folder;
2058         MsgInfo *msginfo;
2059         
2060         g_return_val_if_fail(item != NULL, NULL);
2061         g_return_val_if_fail(msgid != NULL, NULL);
2062         
2063         folder = item->folder;
2064         if (!item->cache)
2065                 folder_item_read_cache(item);
2066         
2067         if ((msginfo = msgcache_get_msg_by_id(item->cache, msgid)) != NULL)
2068                 return msginfo;
2069
2070         return NULL;
2071 }
2072
2073 GSList *folder_item_get_msg_list(FolderItem *item)
2074 {
2075         g_return_val_if_fail(item != NULL, NULL);
2076         
2077         if (item->cache == 0)
2078                 folder_item_read_cache(item);
2079
2080         g_return_val_if_fail(item->cache != NULL, NULL);
2081         
2082         return msgcache_get_msg_list(item->cache);
2083 }
2084
2085 void msginfo_set_mime_flags(GNode *node, gpointer data)
2086 {
2087         MsgInfo *msginfo = data;
2088         MimeInfo *mimeinfo = node->data;
2089         
2090         if (mimeinfo->disposition == DISPOSITIONTYPE_ATTACHMENT) {
2091                 procmsg_msginfo_set_flags(msginfo, 0, MSG_HAS_ATTACHMENT);
2092         } else if (mimeinfo->disposition == DISPOSITIONTYPE_UNKNOWN && 
2093                  mimeinfo->type != MIMETYPE_TEXT &&
2094                  mimeinfo->type != MIMETYPE_MULTIPART) {
2095                 if (!mimeinfo->subtype 
2096                 ||  strcmp(mimeinfo->subtype, "pgp-signature"))
2097                         procmsg_msginfo_set_flags(msginfo, 0, MSG_HAS_ATTACHMENT);
2098         }
2099
2100         /* don't descend below top level message for signed and encrypted info */
2101         if (mimeinfo->type == MIMETYPE_MESSAGE)
2102                 return;
2103
2104         if (privacy_mimeinfo_is_signed(mimeinfo)) {
2105                 procmsg_msginfo_set_flags(msginfo, 0, MSG_SIGNED);
2106         }
2107
2108         if (privacy_mimeinfo_is_encrypted(mimeinfo)) {
2109                 procmsg_msginfo_set_flags(msginfo, 0, MSG_ENCRYPTED);
2110         } else {
2111                 /* searching inside encrypted parts doesn't really make sense */
2112                 g_node_children_foreach(mimeinfo->node, G_TRAVERSE_ALL, msginfo_set_mime_flags, msginfo);
2113         }
2114 }
2115
2116 gchar *folder_item_fetch_msg(FolderItem *item, gint num)
2117 {
2118         Folder *folder;
2119         gchar *msgfile;
2120         MsgInfo *msginfo;
2121
2122         g_return_val_if_fail(item != NULL, NULL);
2123
2124         folder = item->folder;
2125
2126         g_return_val_if_fail(folder->klass->fetch_msg != NULL, NULL);
2127
2128         msgfile = folder->klass->fetch_msg(folder, item, num);
2129
2130         if (msgfile != NULL) {
2131                 msginfo = folder_item_get_msginfo(item, num);
2132                 if ((msginfo != NULL) && !MSG_IS_SCANNED(msginfo->flags)) {
2133                         MimeInfo *mimeinfo;
2134
2135                         if (msginfo->folder->stype != F_QUEUE && 
2136                             msginfo->folder->stype != F_DRAFT)
2137                                 mimeinfo = procmime_scan_file(msgfile);
2138                         else
2139                                 mimeinfo = procmime_scan_queue_file(msgfile);
2140                         /* check for attachments */
2141                         if (mimeinfo != NULL) { 
2142                                 g_node_children_foreach(mimeinfo->node, G_TRAVERSE_ALL, msginfo_set_mime_flags, msginfo);
2143                                 procmime_mimeinfo_free_all(mimeinfo);
2144
2145                                 procmsg_msginfo_set_flags(msginfo, 0, MSG_SCANNED);
2146                         }
2147                 }
2148         }
2149
2150         return msgfile;
2151 }
2152
2153 gint folder_item_fetch_all_msg(FolderItem *item)
2154 {
2155         Folder *folder;
2156         GSList *mlist;
2157         GSList *cur;
2158         gint num = 0;
2159         gint ret = 0;
2160
2161         g_return_val_if_fail(item != NULL, -1);
2162
2163         debug_print("fetching all messages in %s ...\n", item->path);
2164
2165         folder = item->folder;
2166
2167         if (folder->ui_func)
2168                 folder->ui_func(folder, item, folder->ui_func_data ?
2169                                 folder->ui_func_data : GINT_TO_POINTER(num));
2170
2171         mlist = folder_item_get_msg_list(item);
2172
2173         for (cur = mlist; cur != NULL; cur = cur->next) {
2174                 MsgInfo *msginfo = (MsgInfo *)cur->data;
2175                 gchar *msg;
2176
2177                 num++;
2178                 if (folder->ui_func)
2179                         folder->ui_func(folder, item,
2180                                         folder->ui_func_data ?
2181                                         folder->ui_func_data :
2182                                         GINT_TO_POINTER(num));
2183
2184                 msg = folder_item_fetch_msg(item, msginfo->msgnum);
2185                 if (!msg) {
2186                         g_warning("Can't fetch message %d. Aborting.\n",
2187                                   msginfo->msgnum);
2188                         ret = -1;
2189                         break;
2190                 }
2191                 g_free(msg);
2192         }
2193
2194         procmsg_msg_list_free(mlist);
2195
2196         return ret;
2197 }
2198
2199 static gint folder_item_get_msg_num_by_file(FolderItem *dest, const gchar *file)
2200 {
2201         static HeaderEntry hentry[] = {{"Message-ID:",  NULL, TRUE},
2202                                        {NULL,           NULL, FALSE}};
2203         FILE *fp;
2204         MsgInfo *msginfo;
2205         gint msgnum = 0;
2206         gchar buf[BUFFSIZE];
2207
2208         if ((fp = fopen(file, "rb")) == NULL)
2209                 return 0;
2210
2211         if ((dest->stype == F_QUEUE) || (dest->stype == F_DRAFT))
2212                 while (fgets(buf, sizeof(buf), fp) != NULL)
2213                         if (buf[0] == '\r' || buf[0] == '\n') break;
2214
2215         procheader_get_header_fields(fp, hentry);
2216         if (hentry[0].body) {
2217                 extract_parenthesis(hentry[0].body, '<', '>');
2218                 remove_space(hentry[0].body);
2219                 if ((msginfo = msgcache_get_msg_by_id(dest->cache, hentry[0].body)) != NULL) {
2220                         msgnum = msginfo->msgnum;
2221                         procmsg_msginfo_free(msginfo);
2222
2223                         debug_print("found message as uid %d\n", msgnum);
2224                 }
2225         }
2226         
2227         g_free(hentry[0].body);
2228         hentry[0].body = NULL;
2229         fclose(fp);
2230
2231         return msgnum;
2232 }
2233
2234 static void copy_msginfo_flags(MsgInfo *source, MsgInfo *dest)
2235 {
2236         MsgPermFlags perm_flags = 0;
2237         MsgTmpFlags tmp_flags = 0;
2238
2239         /* create new flags */
2240         if (source != NULL) {
2241                 /* copy original flags */
2242                 perm_flags = source->flags.perm_flags;
2243                 tmp_flags = source->flags.tmp_flags;
2244         } else {
2245                 perm_flags = dest->flags.perm_flags;
2246                 tmp_flags = dest->flags.tmp_flags;
2247         }
2248
2249         /* remove new, unread and deleted in special folders */
2250         if (dest->folder->stype == F_OUTBOX ||
2251             dest->folder->stype == F_QUEUE  ||
2252             dest->folder->stype == F_DRAFT  ||
2253             dest->folder->stype == F_TRASH)
2254                 perm_flags &= ~(MSG_NEW | MSG_UNREAD | MSG_DELETED);
2255
2256         /* set ignore flag of ignored parent exists */
2257         if (procmsg_msg_has_flagged_parent(dest, MSG_IGNORE_THREAD))
2258                 perm_flags |= MSG_IGNORE_THREAD;
2259
2260         /* Unset tmp flags that should not be copied */
2261         tmp_flags &= ~(MSG_MOVE | MSG_COPY);
2262
2263         /* unset flags that are set but should not */
2264         procmsg_msginfo_unset_flags(dest,
2265                                     dest->flags.perm_flags & ~perm_flags,
2266                                     dest->flags.tmp_flags  & ~tmp_flags);
2267         /* set new flags */
2268         procmsg_msginfo_set_flags(dest,
2269                                   ~dest->flags.perm_flags & perm_flags,
2270                                   ~dest->flags.tmp_flags  & tmp_flags);
2271 }
2272
2273 static void add_msginfo_to_cache(FolderItem *item, MsgInfo *newmsginfo, MsgInfo *flagsource)
2274 {
2275         /* update folder stats */
2276         if (MSG_IS_NEW(newmsginfo->flags))
2277                 item->new_msgs++;
2278         if (MSG_IS_UNREAD(newmsginfo->flags))
2279                 item->unread_msgs++;
2280         if (MSG_IS_UNREAD(newmsginfo->flags) && procmsg_msg_has_marked_parent(newmsginfo))
2281                 item->unreadmarked_msgs++;
2282         item->total_msgs++;
2283
2284         folder_item_update_freeze();
2285         msgcache_add_msg(item->cache, newmsginfo);
2286         copy_msginfo_flags(flagsource, newmsginfo);
2287         folder_item_update_with_msg(item,  F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT | F_ITEM_UPDATE_ADDMSG, newmsginfo);
2288         folder_item_update_thaw();
2289 }
2290
2291 static void remove_msginfo_from_cache(FolderItem *item, MsgInfo *msginfo)
2292 {
2293         MsgInfoUpdate msginfo_update;
2294
2295         if (!item->cache)
2296                 folder_item_read_cache(item);
2297
2298         if (MSG_IS_NEW(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
2299                 msginfo->folder->new_msgs--;
2300         if (MSG_IS_UNREAD(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
2301                 msginfo->folder->unread_msgs--;
2302         if (MSG_IS_UNREAD(msginfo->flags) && procmsg_msg_has_marked_parent(msginfo))
2303                 msginfo->folder->unreadmarked_msgs--;
2304         msginfo->folder->total_msgs--;
2305
2306         msginfo_update.msginfo = msginfo;
2307         msginfo_update.flags = MSGINFO_UPDATE_DELETED;
2308         hooks_invoke(MSGINFO_UPDATE_HOOKLIST, &msginfo_update);
2309
2310         msgcache_remove_msg(item->cache, msginfo->msgnum);
2311         folder_item_update_with_msg(msginfo->folder, F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT | F_ITEM_UPDATE_REMOVEMSG, msginfo);
2312 }
2313
2314 gint folder_item_add_msg(FolderItem *dest, const gchar *file,
2315                          MsgFlags *flags, gboolean remove_source)
2316 {
2317         GSList file_list;
2318         MsgFileInfo fileinfo;
2319
2320         g_return_val_if_fail(dest != NULL, -1);
2321         g_return_val_if_fail(file != NULL, -1);
2322  
2323         fileinfo.msginfo = NULL;
2324         fileinfo.file = (gchar *)file;
2325         fileinfo.flags = flags;
2326         file_list.data = &fileinfo;
2327         file_list.next = NULL;
2328
2329         return folder_item_add_msgs(dest, &file_list, remove_source);
2330 }
2331
2332 gint folder_item_add_msgs(FolderItem *dest, GSList *file_list,
2333                           gboolean remove_source)
2334 {
2335         Folder *folder;
2336         gint ret, num, lastnum = -1;
2337         GSList *file_cur;
2338         GRelation *relation;
2339         MsgFileInfo *fileinfo = NULL;
2340         gboolean folderscan = FALSE;
2341
2342         g_return_val_if_fail(dest != NULL, -1);
2343         g_return_val_if_fail(file_list != NULL, -1);
2344         g_return_val_if_fail(dest->folder != NULL, -1);
2345
2346         folder = dest->folder;
2347
2348         relation = g_relation_new(2);
2349         g_relation_index(relation, 0, g_direct_hash, g_direct_equal);
2350
2351         if (folder->klass->add_msgs != NULL) {
2352                 ret = folder->klass->add_msgs(folder, dest, file_list, relation);
2353                 if (ret < 0) {
2354                         g_relation_destroy(relation);
2355                         return ret;
2356                 }
2357         } else {
2358                 for (file_cur = file_list; file_cur != NULL; file_cur = g_slist_next(file_cur)) {
2359                         fileinfo = (MsgFileInfo *) file_cur->data;
2360
2361                         ret = folder->klass->add_msg(folder, dest, fileinfo->file, fileinfo->flags);
2362                         if (ret < 0) {
2363                                 g_relation_destroy(relation);
2364                                 return ret;
2365                         }
2366                         g_relation_insert(relation, fileinfo, GINT_TO_POINTER(ret));
2367                 }
2368         }
2369
2370         for (file_cur = file_list; file_cur != NULL; file_cur = g_slist_next(file_cur)) {
2371                 GTuples *tuples;
2372
2373                 fileinfo = (MsgFileInfo *) file_cur->data;
2374                 tuples = g_relation_select(relation, fileinfo, 0);
2375                 num = GPOINTER_TO_INT(g_tuples_index(tuples, 0, 1));
2376                 g_tuples_destroy(tuples);
2377
2378                 if (num >= 0) {
2379                         MsgInfo *newmsginfo;
2380
2381                         if (num == 0) {
2382                                 if (!folderscan) {
2383                                         folder_item_scan_full(dest, FALSE);
2384                                         folderscan = TRUE;
2385                                 }
2386                                 num = folder_item_get_msg_num_by_file(dest, fileinfo->file);
2387                         }
2388
2389                         if (num > lastnum)
2390                                 lastnum = num;
2391
2392                         if (num >= 0 && remove_source) {
2393                                 if (unlink(fileinfo->file) < 0)
2394                                         FILE_OP_ERROR(fileinfo->file, "unlink");
2395                         }
2396
2397                         if (num == 0)
2398                                 continue;
2399
2400                         if (!folderscan && 
2401                             ((newmsginfo = get_msginfo(dest, num)) != NULL)) {
2402                                 add_msginfo_to_cache(dest, newmsginfo, NULL);
2403                                 procmsg_msginfo_free(newmsginfo);
2404                         } else if ((newmsginfo = msgcache_get_msg(dest->cache, num)) != NULL) {
2405                                 /* TODO: set default flags */
2406                                 procmsg_msginfo_free(newmsginfo);
2407                         }
2408                 }
2409         }
2410
2411         g_relation_destroy(relation);
2412
2413         return lastnum;
2414 }
2415
2416 /*
2417 gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
2418 {
2419         Folder *folder;
2420         gint num;
2421
2422         g_return_val_if_fail(dest != NULL, -1);
2423         g_return_val_if_fail(msginfo != NULL, -1);
2424
2425         folder = dest->folder;
2426         if (dest->last_num < 0) folder->scan(folder, dest);
2427
2428         num = folder->move_msg(folder, dest, msginfo);
2429         if (num > 0) dest->last_num = num;
2430
2431         return num;
2432 }
2433 */
2434                 
2435 FolderItem *folder_item_move_recursive(FolderItem *src, FolderItem *dest) 
2436 {
2437         GSList *mlist;
2438         FolderItem *new_item;
2439         FolderItem *next_item;
2440         GNode *srcnode;
2441         gchar *old_id, *new_id;
2442
2443         mlist = folder_item_get_msg_list(src);
2444
2445         /* move messages */
2446         debug_print("Moving %s to %s\n", src->path, dest->path);
2447         new_item = folder_create_folder(dest, src->name);
2448         if (new_item == NULL) {
2449                 printf("Can't create folder\n");
2450                 return NULL;
2451         }
2452         
2453         if (new_item->folder == NULL)
2454                 new_item->folder = dest->folder;
2455
2456         /* move messages */
2457         log_message(_("Moving %s to %s...\n"), 
2458                         src->name, new_item->path);
2459         if (mlist != NULL)
2460                 folder_item_move_msgs(new_item, mlist);
2461         
2462         /*copy prefs*/
2463         folder_item_prefs_copy_prefs(src, new_item);
2464         new_item->collapsed = src->collapsed;
2465         new_item->thread_collapsed = src->thread_collapsed;
2466         new_item->threaded  = src->threaded;
2467         new_item->ret_rcpt  = src->ret_rcpt;
2468         new_item->hide_read_msgs = src->hide_read_msgs;
2469         new_item->sort_key  = src->sort_key;
2470         new_item->sort_type = src->sort_type;
2471
2472         prefs_matcher_write_config();
2473         
2474         /* recurse */
2475         srcnode = src->folder->node;    
2476         srcnode = g_node_find(srcnode, G_PRE_ORDER, G_TRAVERSE_ALL, src);
2477         srcnode = srcnode->children;
2478         while (srcnode != NULL) {
2479                 if (srcnode && srcnode->data) {
2480                         next_item = (FolderItem*) srcnode->data;
2481                         srcnode = srcnode->next;
2482                         if (folder_item_move_recursive(next_item, new_item) == NULL)
2483                                 return NULL;
2484                 }
2485         }
2486         old_id = folder_item_get_identifier(src);
2487         new_id = folder_item_get_identifier(new_item);
2488         debug_print("updating rules : %s => %s\n", old_id, new_id);
2489
2490         /* if src supports removing, otherwise only copy folder */
2491         if (src->folder->klass->remove_folder != NULL)  
2492                 src->folder->klass->remove_folder(src->folder, src);
2493         folder_write_list();
2494
2495         if (old_id != NULL && new_id != NULL)
2496                 prefs_filtering_rename_path(old_id, new_id);
2497         g_free(old_id);
2498         g_free(new_id);
2499
2500         return new_item;
2501 }
2502
2503 gint folder_item_move_to(FolderItem *src, FolderItem *dest, FolderItem **new_item)
2504 {
2505         FolderItem *tmp = folder_item_parent(dest);
2506         gchar * src_identifier, * dst_identifier;
2507         gchar * phys_srcpath, * phys_dstpath;
2508         
2509         while (tmp) {
2510                 if (tmp == src) {
2511                         return F_MOVE_FAILED_DEST_IS_CHILD;
2512                 }
2513                 tmp = folder_item_parent(tmp);;
2514         }
2515         
2516         tmp = folder_item_parent(src);
2517         
2518         src_identifier = folder_item_get_identifier(src);
2519         dst_identifier = folder_item_get_identifier(dest);
2520         
2521         if(dst_identifier == NULL && dest->folder && folder_item_parent(dest) == NULL) {
2522                 /* dest can be a root folder */
2523                 dst_identifier = folder_get_identifier(dest->folder);
2524         }
2525         if (src_identifier == NULL || dst_identifier == NULL) {
2526                 debug_print("Can't get identifiers\n");
2527                 return F_MOVE_FAILED;
2528         }
2529
2530         if (src->folder != dest->folder) {
2531                 return F_MOVE_FAILED_DEST_OUTSIDE_MAILBOX;
2532         }
2533
2534         phys_srcpath = folder_item_get_path(src);
2535         phys_dstpath = g_strconcat(folder_item_get_path(dest),
2536                        G_DIR_SEPARATOR_S,
2537                        g_path_get_basename(phys_srcpath),
2538                        NULL);
2539
2540         if (folder_item_parent(src) == dest || src == dest) {
2541                 g_free(src_identifier);
2542                 g_free(dst_identifier);
2543                 g_free(phys_srcpath);
2544                 g_free(phys_dstpath);
2545                 return F_MOVE_FAILED_DEST_IS_PARENT;
2546         }
2547         debug_print("moving \"%s\" to \"%s\"\n", phys_srcpath, phys_dstpath);
2548         if ((tmp = folder_item_move_recursive(src, dest)) == NULL) {
2549                 return F_MOVE_FAILED;
2550         }
2551         
2552         g_free(src_identifier);
2553         g_free(dst_identifier);
2554         g_free(phys_srcpath);
2555         g_free(phys_dstpath);
2556
2557         *new_item = tmp;
2558
2559         return F_MOVE_OK;
2560 }
2561
2562 /**
2563  * Copy a list of message to a new folder and remove
2564  * source messages if wanted
2565  */
2566 static gint do_copy_msgs(FolderItem *dest, GSList *msglist, gboolean remove_source)
2567 {
2568         Folder *folder;
2569         GSList *l;
2570         gint num, lastnum = -1;
2571         gboolean folderscan = FALSE;
2572         GRelation *relation;
2573
2574         g_return_val_if_fail(dest != NULL, -1);
2575         g_return_val_if_fail(msglist != NULL, -1);
2576
2577         folder = dest->folder;
2578
2579         g_return_val_if_fail(folder->klass->copy_msg != NULL, -1);
2580
2581         relation = g_relation_new(2);
2582         g_relation_index(relation, 0, g_direct_hash, g_direct_equal);
2583         g_relation_index(relation, 1, g_direct_hash, g_direct_equal);
2584
2585         for (l = msglist ; l != NULL ; l = g_slist_next(l)) {
2586                 MsgInfo * msginfo = (MsgInfo *) l->data;
2587
2588                 if (msginfo->planned_download != 0) {
2589                         int old_planned = msginfo->planned_download;
2590                         partial_unmark(msginfo);
2591                         /* little hack to reenable after */
2592                         msginfo->planned_download = old_planned;
2593                 }
2594         }
2595
2596         /* 
2597          * Copy messages to destination folder and 
2598          * store new message numbers in newmsgnums
2599          */
2600         if (folder->klass->copy_msgs != NULL) {
2601                 if (folder->klass->copy_msgs(folder, dest, msglist, relation) < 0) {
2602                         g_relation_destroy(relation);
2603                         return -1;
2604                 }
2605         } else {
2606                 for (l = msglist ; l != NULL ; l = g_slist_next(l)) {
2607                         MsgInfo * msginfo = (MsgInfo *) l->data;
2608
2609                         num = folder->klass->copy_msg(folder, dest, msginfo);
2610                         g_relation_insert(relation, msginfo, GINT_TO_POINTER(num));
2611                 }
2612         }
2613
2614         /* Read cache for dest folder */
2615         if (!dest->cache) folder_item_read_cache(dest);
2616
2617         /* 
2618          * Fetch new MsgInfos for new messages in dest folder,
2619          * add them to the msgcache and update folder message counts
2620          */
2621         if (g_relation_count(relation, GINT_TO_POINTER(0), 1) > 0) {
2622                 folder_item_scan_full(dest, FALSE);
2623                 folderscan = TRUE;
2624         }
2625
2626         for (l = msglist; l != NULL; l = g_slist_next(l)) {
2627                 MsgInfo *msginfo = (MsgInfo *) l->data;
2628                 GTuples *tuples;
2629
2630                 tuples = g_relation_select(relation, msginfo, 0);
2631                 num = GPOINTER_TO_INT(g_tuples_index(tuples, 0, 1));
2632                 g_tuples_destroy(tuples);
2633
2634                 if (num >= 0) {
2635                         MsgInfo *newmsginfo = NULL;
2636
2637                         if (folderscan) {
2638                                 if (msginfo->msgid != NULL) {
2639                                         newmsginfo = folder_item_get_msginfo_by_msgid(dest, msginfo->msgid);
2640                                         if (newmsginfo != NULL) {
2641                                                 copy_msginfo_flags(msginfo, newmsginfo);
2642                                                 num = newmsginfo->msgnum;
2643                                         }
2644                                 }
2645                         } else {
2646                                 newmsginfo = get_msginfo(dest, num);
2647                                 if (newmsginfo != NULL) {
2648                                         add_msginfo_to_cache(dest, newmsginfo, msginfo);
2649                                 }
2650                         }
2651
2652                         if (msginfo->planned_download 
2653                             == POP3_PARTIAL_DLOAD_DELE) {
2654                                 partial_mark_for_delete(newmsginfo);
2655                         }
2656                         if (msginfo->planned_download 
2657                             == POP3_PARTIAL_DLOAD_DLOAD) {
2658                                 partial_mark_for_download(newmsginfo);
2659                         }
2660                         procmsg_msginfo_free(newmsginfo);
2661
2662
2663                         if (num > lastnum)
2664                                 lastnum = num;
2665                 }
2666         }
2667
2668         if (remove_source) {
2669                 /*
2670                  * Remove source messages from their folders if
2671                  * copying was successfull and update folder
2672                  * message counts
2673                  */
2674                 for (l = msglist; l != NULL; l = g_slist_next(l)) {
2675                         MsgInfo *msginfo = (MsgInfo *) l->data;
2676                         FolderItem *item = msginfo->folder;
2677                         GTuples *tuples;
2678
2679                         tuples = g_relation_select(relation, msginfo, 0);
2680                         num = GPOINTER_TO_INT(g_tuples_index(tuples, 0, 1));
2681                         g_tuples_destroy(tuples);
2682
2683                         if ((num >= 0) && (item->folder->klass->remove_msg != NULL)) {
2684                                 item->folder->klass->remove_msg(item->folder,
2685                                                                 msginfo->folder,
2686                                                                 msginfo->msgnum);
2687                                 remove_msginfo_from_cache(item, msginfo);
2688                         }
2689                 }
2690         }
2691
2692         g_relation_destroy(relation);
2693         return lastnum;
2694 }
2695
2696 /**
2697  * Move a message to a new folder.
2698  *
2699  * \param dest Destination folder
2700  * \param msginfo The message
2701  */
2702 gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
2703 {
2704         GSList list;
2705
2706         g_return_val_if_fail(dest != NULL, -1);
2707         g_return_val_if_fail(msginfo != NULL, -1);
2708
2709         list.data = msginfo;
2710         list.next = NULL;
2711
2712         return do_copy_msgs(dest, &list, TRUE);
2713 }
2714
2715 /**
2716  * Move a list of messages to a new folder.
2717  *
2718  * \param dest Destination folder
2719  * \param msglist List of messages
2720  */
2721 gint folder_item_move_msgs(FolderItem *dest, GSList *msglist)
2722 {
2723         g_return_val_if_fail(dest != NULL, -1);
2724         g_return_val_if_fail(msglist != NULL, -1);
2725
2726         return do_copy_msgs(dest, msglist, TRUE);
2727 }
2728
2729 /**
2730  * Copy a message to a new folder.
2731  *
2732  * \param dest Destination folder
2733  * \param msginfo The message
2734  */
2735 gint folder_item_copy_msg(FolderItem *dest, MsgInfo *msginfo)
2736 {
2737         GSList list;
2738
2739         g_return_val_if_fail(dest != NULL, -1);
2740         g_return_val_if_fail(msginfo != NULL, -1);
2741     
2742         list.data = msginfo;
2743         list.next = NULL;
2744         
2745         return do_copy_msgs(dest, &list, FALSE);
2746 }
2747
2748 /**
2749  * Copy a list of messages to a new folder.
2750  *
2751  * \param dest Destination folder
2752  * \param msglist List of messages
2753  */
2754 gint folder_item_copy_msgs(FolderItem *dest, GSList *msglist)
2755 {
2756         g_return_val_if_fail(dest != NULL, -1);
2757         g_return_val_if_fail(msglist != NULL, -1);
2758
2759         return do_copy_msgs(dest, msglist, FALSE);
2760 }
2761
2762 gint folder_item_remove_msg(FolderItem *item, gint num)
2763 {
2764         Folder *folder;
2765         gint ret;
2766         MsgInfo *msginfo;
2767
2768         g_return_val_if_fail(item != NULL, -1);
2769         folder = item->folder;
2770         g_return_val_if_fail(folder->klass->remove_msg != NULL, -1);
2771
2772         if (!item->cache) folder_item_read_cache(item);
2773
2774         ret = folder->klass->remove_msg(folder, item, num);
2775
2776         msginfo = msgcache_get_msg(item->cache, num);
2777         if (msginfo != NULL) {
2778                 remove_msginfo_from_cache(item, msginfo);
2779                 procmsg_msginfo_free(msginfo);
2780         }
2781
2782         return ret;
2783 }
2784
2785 gint folder_item_remove_msgs(FolderItem *item, GSList *msglist)
2786 {
2787         Folder *folder;
2788         gint ret = 0;
2789
2790         g_return_val_if_fail(item != NULL, -1);
2791         folder = item->folder;
2792         g_return_val_if_fail(folder != NULL, -1);
2793
2794         if (!item->cache) folder_item_read_cache(item);
2795
2796         folder_item_update_freeze();
2797         while (msglist != NULL) {
2798                 MsgInfo *msginfo = (MsgInfo *)msglist->data;
2799                 if (MSG_IS_LOCKED(msginfo->flags)) {
2800                         msglist = msglist->next;
2801                         continue;
2802                 }
2803                 ret = folder_item_remove_msg(item, msginfo->msgnum);
2804                 if (ret != 0) break;
2805                 msgcache_remove_msg(item->cache, msginfo->msgnum);
2806                 msglist = msglist->next;
2807         }
2808         folder_item_update_thaw();
2809
2810         return ret;
2811 }
2812
2813 gint folder_item_remove_all_msg(FolderItem *item)
2814 {
2815         Folder *folder;
2816         gint result;
2817
2818         g_return_val_if_fail(item != NULL, -1);
2819
2820         folder = item->folder;
2821
2822         if (folder->klass->remove_all_msg != NULL) {
2823                 result = folder->klass->remove_all_msg(folder, item);
2824
2825                 if (result == 0) {
2826                         folder_item_free_cache(item);
2827                         item->cache = msgcache_new();
2828                 }
2829         } else {
2830                 MsgInfoList *msglist;
2831
2832                 msglist = folder_item_get_msg_list(item);
2833                 result = folder_item_remove_msgs(item, msglist);
2834                 procmsg_msg_list_free(msglist);
2835         }
2836
2837         if (result == 0) {
2838                 item->new_msgs = 0;
2839                 item->unread_msgs = 0;
2840                 item->unreadmarked_msgs = 0;
2841                 item->total_msgs = 0;
2842                 folder_item_update(item, F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT);
2843         }
2844
2845         return result;
2846 }
2847
2848 void folder_item_change_msg_flags(FolderItem *item, MsgInfo *msginfo, MsgPermFlags newflags)
2849 {
2850         g_return_if_fail(item != NULL);
2851         g_return_if_fail(msginfo != NULL);
2852         
2853         if (item->folder->klass->change_flags != NULL) {
2854                 item->folder->klass->change_flags(item->folder, item, msginfo, newflags);
2855         } else {
2856                 msginfo->flags.perm_flags = newflags;
2857         }
2858 }
2859
2860 gboolean folder_item_is_msg_changed(FolderItem *item, MsgInfo *msginfo)
2861 {
2862         Folder *folder;
2863
2864         g_return_val_if_fail(item != NULL, FALSE);
2865
2866         folder = item->folder;
2867
2868         g_return_val_if_fail(folder->klass->is_msg_changed != NULL, -1);
2869
2870         return folder->klass->is_msg_changed(folder, item, msginfo);
2871 }
2872
2873 gchar *folder_item_get_cache_file(FolderItem *item)
2874 {
2875         gchar *path;
2876         gchar *file;
2877
2878         g_return_val_if_fail(item != NULL, NULL);
2879         g_return_val_if_fail(item->path != NULL, NULL);
2880
2881         path = folder_item_get_path(item);
2882         g_return_val_if_fail(path != NULL, NULL);
2883         if (!is_dir_exist(path))
2884                 make_dir_hier(path);
2885         file = g_strconcat(path, G_DIR_SEPARATOR_S, CACHE_FILE, NULL);
2886         g_free(path);
2887
2888         return file;
2889 }
2890
2891 gchar *folder_item_get_mark_file(FolderItem *item)
2892 {
2893         gchar *path;
2894         gchar *file;
2895
2896         g_return_val_if_fail(item != NULL, NULL);
2897         g_return_val_if_fail(item->path != NULL, NULL);
2898
2899         path = folder_item_get_path(item);
2900         g_return_val_if_fail(path != NULL, NULL);
2901         if (!is_dir_exist(path))
2902                 make_dir_hier(path);
2903         file = g_strconcat(path, G_DIR_SEPARATOR_S, MARK_FILE, NULL);
2904         g_free(path);
2905
2906         return file;
2907 }
2908
2909 static gpointer xml_to_folder_item(gpointer nodedata, gpointer data)
2910 {
2911         XMLNode *xmlnode = (XMLNode *) nodedata;
2912         Folder *folder = (Folder *) data;
2913         FolderItem *item;
2914
2915         g_return_val_if_fail(xmlnode != NULL, NULL);
2916         g_return_val_if_fail(folder != NULL, NULL);
2917
2918         if (strcmp2(xmlnode->tag->tag, "folderitem") != 0) {
2919                 g_warning("tag name != \"folderitem\"\n");
2920                 return NULL;
2921         }
2922
2923         item = folder_item_new(folder, "", "");
2924         if (folder->klass->item_set_xml != NULL)
2925                 folder->klass->item_set_xml(folder, item, xmlnode->tag);
2926         else
2927                 folder_item_set_xml(folder, item, xmlnode->tag);
2928
2929         item->folder = folder;
2930
2931         switch (item->stype) {
2932         case F_INBOX:  folder->inbox  = item; break;
2933         case F_OUTBOX: folder->outbox = item; break;
2934         case F_DRAFT:  folder->draft  = item; break;
2935         case F_QUEUE:  folder->queue  = item; break;
2936         case F_TRASH:  folder->trash  = item; break;
2937         default:       break;
2938         }
2939         folder_item_prefs_read_config(item);
2940
2941         return item;
2942 }
2943
2944 static gboolean folder_item_set_node(GNode *node, gpointer data)
2945 {
2946         FolderItem *item = (FolderItem *) node->data;
2947         item->node = node;
2948
2949         return FALSE;
2950 }
2951
2952 static Folder *folder_get_from_xml(GNode *node)
2953 {
2954         Folder *folder;
2955         XMLNode *xmlnode;
2956         GList *list;
2957         FolderClass *klass = NULL;
2958         GNode *cur;
2959
2960         g_return_val_if_fail(node->data != NULL, NULL);
2961
2962         xmlnode = node->data;
2963         if (strcmp2(xmlnode->tag->tag, "folder") != 0) {
2964                 g_warning("tag name != \"folder\"\n");
2965                 return NULL;
2966         }
2967         list = xmlnode->tag->attr;
2968         for (; list != NULL; list = list->next) {
2969                 XMLAttr *attr = list->data;
2970
2971                 if (!attr || !attr->name || !attr->value) continue;
2972                 if (!strcmp(attr->name, "type"))
2973                         klass = folder_get_class_from_string(attr->value);
2974         }
2975         if (klass == NULL)
2976                 return NULL;
2977
2978         folder = folder_new(klass, "", "");
2979         g_return_val_if_fail(folder != NULL, NULL);
2980
2981         if (klass->set_xml)
2982                 klass->set_xml(folder, xmlnode->tag);
2983         else
2984                 folder_set_xml(folder, xmlnode->tag);
2985
2986         cur = node->children;
2987         while (cur != NULL) {
2988                 GNode *itemnode;
2989
2990                 itemnode = g_node_map(cur, xml_to_folder_item, (gpointer) folder);
2991                 g_node_append(folder->node, itemnode);
2992                 cur = cur->next;
2993         }
2994         g_node_traverse(folder->node, G_IN_ORDER, G_TRAVERSE_ALL, -1, folder_item_set_node, NULL);
2995         
2996         return folder;
2997 }
2998
2999 static gchar *folder_get_list_path(void)
3000 {
3001         static gchar *filename = NULL;
3002
3003         if (!filename)
3004                 filename =  g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
3005                                         FOLDER_LIST, NULL);
3006
3007         return filename;
3008 }
3009
3010 #define PUT_ESCAPE_STR(fp, attr, str)                   \
3011 {                                                       \
3012         fputs(" " attr "=\"", fp);                      \
3013         xml_file_put_escape_str(fp, str);               \
3014         fputs("\"", fp);                                \
3015 }
3016
3017 static gpointer folder_item_to_xml(gpointer nodedata, gpointer data)
3018 {
3019         FolderItem *item = (FolderItem *) nodedata;
3020         XMLTag *tag;
3021
3022         g_return_val_if_fail(item != NULL, NULL);
3023
3024         if (item->folder->klass->item_get_xml != NULL)
3025                 tag = item->folder->klass->item_get_xml(item->folder, item);
3026         else
3027                 tag = folder_item_get_xml(item->folder, item);
3028
3029         return xml_node_new(tag, NULL);;
3030 }
3031
3032 static GNode *folder_get_xml_node(Folder *folder)
3033 {
3034         GNode *node;
3035         XMLNode *xmlnode;
3036         XMLTag *tag;
3037
3038         g_return_val_if_fail(folder != NULL, NULL);
3039
3040         if (folder->klass->get_xml != NULL)
3041                 tag = folder->klass->get_xml(folder);
3042         else
3043                 tag = folder_get_xml(folder);
3044
3045         xml_tag_add_attr(tag, xml_attr_new("type", folder->klass->idstr));
3046
3047         xmlnode = xml_node_new(tag, NULL);
3048
3049         node = g_node_new(xmlnode);
3050         if (folder->node->children) {
3051                 GNode *cur;
3052
3053                 cur = folder->node->children;
3054                 while (cur) {
3055                         GNode *xmlnode;
3056
3057                         xmlnode = g_node_map(cur, folder_item_to_xml, (gpointer) folder);
3058                         g_node_append(node, xmlnode);
3059                         cur = cur->next;
3060                 }
3061         }
3062
3063         return node;
3064 }
3065
3066 static void folder_update_op_count_rec(GNode *node)
3067 {
3068         FolderItem *fitem = FOLDER_ITEM(node->data);
3069
3070         if (g_node_depth(node) > 0) {
3071                 if (fitem->op_count > 0) {
3072                         fitem->op_count = 0;
3073                         folder_item_update(fitem, F_ITEM_UPDATE_MSGCNT);
3074                 }
3075                 if (node->children) {
3076                         GNode *child;
3077
3078                         child = node->children;
3079                         while (child) {
3080                                 GNode *cur;
3081
3082                                 cur = child;
3083                                 child = cur->next;
3084                                 folder_update_op_count_rec(cur);
3085                         }
3086                 }
3087         }
3088 }
3089
3090 void folder_update_op_count(void) 
3091 {
3092         GList *cur;
3093         Folder *folder;
3094
3095         for (cur = folder_list; cur != NULL; cur = cur->next) {
3096                 folder = cur->data;
3097                 folder_update_op_count_rec(folder->node);
3098         }
3099 }
3100
3101 typedef struct _type_str {
3102         gchar * str;
3103         gint type;
3104 } type_str;
3105
3106
3107 /*
3108 static gchar * folder_item_get_tree_identifier(FolderItem * item)
3109 {
3110         if (item->parent != NULL) {
3111                 gchar * path;
3112                 gchar * id;
3113
3114                 path = folder_item_get_tree_identifier(item->parent);
3115                 if (path == NULL)
3116                         return NULL;
3117
3118                 id = g_strconcat(path, "/", item->name, NULL);
3119                 g_free(path);
3120
3121                 return id;
3122         }
3123         else {
3124                 return g_strconcat("/", item->name, NULL);
3125         }
3126 }
3127 */
3128
3129 /* CLAWS: temporary local folder for filtering */
3130 #define TEMP_FOLDER "TEMP_FOLDER"
3131 #define PROCESSING_FOLDER_ITEM "processing"     
3132
3133 static FolderItem *processing_folder_item;
3134
3135 static void folder_create_processing_folder(void)
3136 {
3137         Folder *processing_folder;
3138         gchar      *tmpname;
3139
3140         if ((processing_folder = folder_find_from_name(TEMP_FOLDER, mh_get_class())) == NULL) {
3141                 gchar *tmppath;
3142
3143                 tmppath =
3144                     g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
3145                                 "tempfolder", NULL);
3146                 processing_folder =
3147                     folder_new(mh_get_class(), TEMP_FOLDER, tmppath);
3148                 g_free(tmppath);
3149         }
3150         g_assert(processing_folder != NULL);
3151
3152         debug_print("tmpparentroot %s\n", LOCAL_FOLDER(processing_folder)->rootpath);
3153         if (LOCAL_FOLDER(processing_folder)->rootpath[0] == '/')
3154                 tmpname = g_strconcat(LOCAL_FOLDER(processing_folder)->rootpath,
3155                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER_ITEM,
3156                                       NULL);
3157         else
3158                 tmpname = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
3159                                       LOCAL_FOLDER(processing_folder)->rootpath,
3160                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER_ITEM,
3161                                       NULL);
3162
3163         if (!is_dir_exist(tmpname)) {
3164                 debug_print("*TMP* creating %s\n", tmpname);
3165                 processing_folder_item = processing_folder->klass->create_folder(processing_folder,
3166                                                                                  processing_folder->node->data,
3167                                                                                  PROCESSING_FOLDER_ITEM);
3168         } else {
3169                 debug_print("*TMP* already created\n");
3170                 processing_folder_item = folder_item_new(processing_folder, PROCESSING_FOLDER_ITEM, PROCESSING_FOLDER_ITEM);
3171                 g_assert(processing_folder_item);
3172                 folder_item_append(processing_folder->node->data, processing_folder_item);
3173         }
3174         g_assert(processing_folder_item != NULL);
3175         g_free(tmpname);
3176 }
3177
3178 FolderItem *folder_get_default_processing(void)
3179 {
3180         if (!processing_folder_item) {
3181                 folder_create_processing_folder();
3182         }
3183         return processing_folder_item;
3184 }
3185
3186 /* folder_persist_prefs_new() - return hash table with persistent
3187  * settings (and folder name as key). 
3188  * (note that in claws other options are in the folder_item_prefs_RC
3189  * file, so those don't need to be included in PersistPref yet) 
3190  */
3191 GHashTable *folder_persist_prefs_new(Folder *folder)
3192 {
3193         GHashTable *pptable;
3194
3195         g_return_val_if_fail(folder, NULL);
3196         pptable = g_hash_table_new(g_str_hash, g_str_equal);
3197         folder_get_persist_prefs_recursive(folder->node, pptable);
3198         return pptable;
3199 }
3200
3201 void folder_persist_prefs_free(GHashTable *pptable)
3202 {
3203         g_return_if_fail(pptable);
3204         g_hash_table_foreach_remove(pptable, persist_prefs_free, NULL);
3205         g_hash_table_destroy(pptable);
3206 }
3207
3208 const PersistPrefs *folder_get_persist_prefs(GHashTable *pptable, const char *name)
3209 {
3210         if (pptable == NULL || name == NULL) return NULL;
3211         return g_hash_table_lookup(pptable, name);
3212 }
3213
3214 void folder_item_restore_persist_prefs(FolderItem *item, GHashTable *pptable)
3215 {
3216         const PersistPrefs *pp;
3217         gchar *id = folder_item_get_identifier(item);
3218
3219         pp = folder_get_persist_prefs(pptable, id); 
3220         g_free(id);
3221
3222         if (!pp) return;
3223
3224         /* CLAWS: since not all folder properties have been migrated to 
3225          * folderlist.xml, we need to call the old stuff first before
3226          * setting things that apply both to Main and Claws. */
3227         folder_item_prefs_read_config(item); 
3228
3229         item->collapsed = pp->collapsed;
3230         item->thread_collapsed = pp->thread_collapsed;
3231         item->threaded  = pp->threaded;
3232         item->ret_rcpt  = pp->ret_rcpt;
3233         item->hide_read_msgs = pp->hide_read_msgs;
3234         item->sort_key  = pp->sort_key;
3235         item->sort_type = pp->sort_type;
3236 }
3237
3238 static void folder_get_persist_prefs_recursive(GNode *node, GHashTable *pptable)
3239 {
3240         FolderItem *item = FOLDER_ITEM(node->data);
3241         PersistPrefs *pp;
3242         GNode *child, *cur;
3243         gchar *id;
3244
3245         g_return_if_fail(node != NULL);
3246         g_return_if_fail(item != NULL);
3247
3248         /* NOTE: item->path == NULL means top level folder; not interesting
3249          * to store preferences of that one.  */
3250         if (item->path) {
3251                 id = folder_item_get_identifier(item);
3252                 pp = g_new0(PersistPrefs, 1);
3253                 g_return_if_fail(pp != NULL);
3254                 pp->collapsed = item->collapsed;
3255                 pp->thread_collapsed = item->thread_collapsed;
3256                 pp->threaded  = item->threaded;
3257                 pp->ret_rcpt  = item->ret_rcpt; 
3258                 pp->hide_read_msgs = item->hide_read_msgs;
3259                 pp->sort_key  = item->sort_key;
3260                 pp->sort_type = item->sort_type;
3261                 g_hash_table_insert(pptable, id, pp);
3262         }
3263
3264         if (node->children) {
3265                 child = node->children;
3266                 while (child) {
3267                         cur = child;
3268                         child = cur->next;
3269                         folder_get_persist_prefs_recursive(cur, pptable);
3270                 }
3271         }       
3272 }
3273
3274 static gboolean persist_prefs_free(gpointer key, gpointer val, gpointer data)
3275 {
3276         if (key) 
3277                 g_free(key);
3278         if (val) 
3279                 g_free(val);
3280         return TRUE;    
3281 }
3282
3283 void folder_item_apply_processing(FolderItem *item)
3284 {
3285         GSList *processing_list;
3286         GSList *mlist, *cur;
3287         
3288         g_return_if_fail(item != NULL);
3289         
3290         processing_list = item->prefs->processing;
3291
3292         folder_item_update_freeze();
3293
3294         mlist = folder_item_get_msg_list(item);
3295         for (cur = mlist ; cur != NULL ; cur = cur->next) {
3296                 MsgInfo * msginfo;
3297
3298                 msginfo = (MsgInfo *) cur->data;
3299                 
3300                 /* reset parameters that can be modified by processing */
3301                 msginfo->hidden = 0;
3302                 msginfo->score = 0;
3303                 
3304                 /* apply pre global rules */
3305                 filter_message_by_msginfo(pre_global_processing, msginfo);
3306                 
3307                 /* apply rules of the folder */
3308                 filter_message_by_msginfo(processing_list, msginfo);
3309
3310                 /* apply post global rules */
3311                 filter_message_by_msginfo(post_global_processing, msginfo);
3312                 
3313                 procmsg_msginfo_free(msginfo);
3314         }
3315         g_slist_free(mlist);
3316
3317         folder_item_update_thaw();
3318 }
3319
3320 /*
3321  *  functions for handling FolderItem content changes
3322  */
3323 static gint folder_item_update_freeze_cnt = 0;
3324
3325 static void folder_item_update_with_msg(FolderItem *item, FolderItemUpdateFlags update_flags, MsgInfo *msg)
3326 {
3327         if (folder_item_update_freeze_cnt == 0 /* || (msg != NULL && item->opened) */) {
3328                 FolderItemUpdateData source;
3329         
3330                 source.item = item;
3331                 source.update_flags = update_flags;
3332                 source.msg = msg;
3333                 hooks_invoke(FOLDER_ITEM_UPDATE_HOOKLIST, &source);
3334         } else {
3335                 item->update_flags |= update_flags & ~(F_ITEM_UPDATE_ADDMSG | F_ITEM_UPDATE_REMOVEMSG);
3336         }
3337 }
3338
3339 /**
3340  * Notify the folder system about changes to a folder. If the
3341  * update system is not frozen the FOLDER_ITEM_UPDATE_HOOKLIST will
3342  * be invoked, otherwise the changes will be remebered until
3343  * the folder system is thawed.
3344  *
3345  * \param item The FolderItem that was changed
3346  * \param update_flags Type of changed that was made
3347  */
3348 void folder_item_update(FolderItem *item, FolderItemUpdateFlags update_flags)
3349 {
3350         folder_item_update_with_msg(item, update_flags, NULL);
3351 }
3352
3353 void folder_item_update_recursive(FolderItem *item, FolderItemUpdateFlags update_flags)
3354 {
3355         GNode *node = item->folder->node;       
3356
3357         node = g_node_find(node, G_PRE_ORDER, G_TRAVERSE_ALL, item);
3358         node = node->children;
3359
3360         folder_item_update(item, update_flags);
3361         while (node != NULL) {
3362                 if (node && node->data) {
3363                         FolderItem *next_item = (FolderItem*) node->data;
3364
3365                         folder_item_update(next_item, update_flags);
3366                 }
3367                 node = node->next;
3368         }
3369 }
3370
3371 void folder_item_update_freeze(void)
3372 {
3373         folder_item_update_freeze_cnt++;
3374 }
3375
3376 static void folder_item_update_func(FolderItem *item, gpointer data)
3377 {
3378         FolderItemUpdateData source;
3379     
3380         if (item->update_flags) {
3381                 source.item = item;
3382                 source.update_flags = item->update_flags;
3383                 hooks_invoke(FOLDER_ITEM_UPDATE_HOOKLIST, &source);                             
3384                 item->update_flags = 0;
3385         }
3386 }
3387
3388 void folder_item_update_thaw(void)
3389 {
3390         if (folder_item_update_freeze_cnt > 0)
3391                 folder_item_update_freeze_cnt--;
3392         if (folder_item_update_freeze_cnt == 0) {
3393                 /* Update all folders */
3394                 folder_func_to_all_folders(folder_item_update_func, NULL);
3395         }
3396 }
3397
3398 #undef PUT_ESCAPE_STR