2012-07-07 [colin] 3.8.1cvs7
[claws.git] / src / folder.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2012 Hiroyuki Yamamoto and the Claws Mail team
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 3 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, see <http://www.gnu.org/licenses/>.
17  * 
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #  include "config.h"
22 #include "claws-features.h"
23 #endif
24
25 #include "defs.h"
26
27 #include <glib.h>
28 #include <glib/gi18n.h>
29 #include <stdio.h>
30 #include <string.h>
31 #include <sys/types.h>
32 #include <sys/stat.h>
33 #include <unistd.h>
34 #include <stdlib.h>
35 #ifdef WIN32
36 #include <w32lib.h>
37 #endif
38
39 #include "folder.h"
40 #include "session.h"
41 #include "inc.h"
42 #include "imap.h"
43 #include "news.h"
44 #include "mh.h"
45 #include "utils.h"
46 #include "xml.h"
47 #include "codeconv.h"
48 #include "prefs_gtk.h"
49 #include "account.h"
50 #include "filtering.h"
51 #include "procheader.h"
52 #include "hooks.h"
53 #include "log.h"
54 #include "folder_item_prefs.h"
55 #include "remotefolder.h"
56 #include "partial_download.h"
57 #include "statusbar.h"
58 #include "gtkutils.h"
59 #include "timing.h"
60 #include "compose.h"
61 #include "main.h"
62
63 /* Dependecies to be removed ?! */
64 #include "prefs_common.h"
65 #include "prefs_account.h"
66
67 /* Define possible missing constants for Windows. */
68 #ifdef G_OS_WIN32
69 # ifndef S_IRGRP
70 # define S_IRGRP 0
71 # define S_IWGRP 0
72 # endif
73 # ifndef S_IROTH
74 # define S_IROTH 0
75 # define S_IWOTH 0
76 # endif
77 #endif
78
79 static GList *folder_list = NULL;
80 static GSList *class_list = NULL;
81 static GSList *folder_unloaded_list = NULL;
82
83 void folder_init                (Folder         *folder,
84                                  const gchar    *name);
85
86 static gchar *folder_item_get_cache_file        (FolderItem     *item);
87 static gchar *folder_item_get_mark_file (FolderItem     *item);
88 static gchar *folder_item_get_tags_file (FolderItem     *item);
89 static gchar *folder_get_list_path      (void);
90 static GNode *folder_get_xml_node       (Folder         *folder);
91 static Folder *folder_get_from_xml      (GNode          *node);
92 static void folder_update_op_count_rec  (GNode          *node);
93
94
95 static void folder_get_persist_prefs_recursive
96                                         (GNode *node, GHashTable *pptable);
97 static gboolean persist_prefs_free      (gpointer key, gpointer val, gpointer data);
98 static void folder_item_read_cache              (FolderItem *item);
99 gint folder_item_scan_full              (FolderItem *item, gboolean filtering);
100 static void folder_item_update_with_msg (FolderItem *item, FolderItemUpdateFlags update_flags,
101                                          MsgInfo *msg);
102 static GHashTable *folder_persist_prefs_new     (Folder *folder);
103 static void folder_persist_prefs_free           (GHashTable *pptable);
104 static void folder_item_restore_persist_prefs   (FolderItem *item, GHashTable *pptable);
105
106 void folder_system_init(void)
107 {
108         folder_register_class(mh_get_class());
109         folder_register_class(imap_get_class());
110         folder_register_class(news_get_class());
111 }
112
113 static GSList *folder_get_class_list(void)
114 {
115         return class_list;
116 }
117
118 void folder_register_class(FolderClass *klass)
119 {
120         GSList *xmllist, *cur;
121
122         debug_print("registering folder class %s\n", klass->idstr);
123
124         class_list = g_slist_append(class_list, klass);
125
126         xmllist = g_slist_copy(folder_unloaded_list);
127         for (cur = xmllist; cur != NULL; cur = g_slist_next(cur)) {
128                 GNode *node = (GNode *) cur->data;
129                 XMLNode *xmlnode = (XMLNode *) node->data;
130                 GList *cur = xmlnode->tag->attr;
131
132                 for (; cur != NULL; cur = g_list_next(cur)) {
133                         XMLAttr *attr = (XMLAttr *) cur->data;
134
135                         if (!attr || !attr->name || !attr->value) continue;
136                         if (!strcmp(attr->name, "type") && !strcmp(attr->value, klass->idstr)) {
137                                 Folder *folder;
138
139                                 folder = folder_get_from_xml(node);
140                                 if (folder) {
141                                         folder_add(folder);
142                                         folder_unloaded_list = g_slist_remove(folder_unloaded_list, node);
143                                 }
144                                 cur = NULL;
145                                 continue;
146                         }
147                 }
148         }
149         g_slist_free(xmllist);
150 }
151
152 void folder_unregister_class(FolderClass *klass)
153 {
154         GList *folderlist, *cur;
155
156         debug_print("unregistering folder class %s\n", klass->idstr);
157
158         class_list = g_slist_remove(class_list, klass);
159
160         folderlist = g_list_copy(folder_get_list());
161         for (cur = folderlist; cur != NULL; cur = g_list_next(cur)) {
162                 Folder *folder = (Folder *) cur->data;
163
164                 if (folder->klass == klass) {
165                         GNode *xmlnode = folder_get_xml_node(folder);
166                         folder_unloaded_list = g_slist_append(folder_unloaded_list, xmlnode);
167                         folder_destroy(folder);
168                 }
169         }
170         g_list_free(folderlist);
171 }
172
173 Folder *folder_new(FolderClass *klass, const gchar *name, const gchar *path)
174 {
175         Folder *folder = NULL;
176         FolderItem *item;
177
178         cm_return_val_if_fail(klass != NULL, NULL);
179
180         name = name ? name : path;
181         folder = klass->new_folder(name, path);
182
183         /* Create root folder item */
184         item = folder_item_new(folder, name, NULL);
185         if (item == NULL) {
186                 return NULL;
187         }
188         item->folder = folder;
189         folder->node = item->node = g_node_new(item);
190         folder->data = NULL;
191
192         return folder;
193 }
194
195 void folder_init(Folder *folder, const gchar *name)
196 {
197         cm_return_if_fail(folder != NULL);
198
199         folder_set_name(folder, name);
200
201         /* Init folder data */
202         folder->account = NULL;
203         folder->sort = 0;
204         folder->inbox = NULL;
205         folder->outbox = NULL;
206         folder->draft = NULL;
207         folder->queue = NULL;
208         folder->trash = NULL;
209 }
210
211 static void reset_parent_type(FolderItem *item, gpointer data) {
212         item->parent_stype = -1;
213 }
214
215 void folder_item_change_type(FolderItem *item, SpecialFolderItemType newtype)
216 {
217         Folder *folder = NULL;
218         FolderUpdateData hookdata;
219
220         if (item == NULL)
221                 return;
222
223         folder = item->folder;
224         /* unset previous root of newtype */
225         switch(newtype) {
226         case F_INBOX:
227                 folder_item_change_type(folder->inbox, F_NORMAL);
228                 folder->inbox = item;
229                 break;
230         case F_OUTBOX:
231                 folder_item_change_type(folder->outbox, F_NORMAL);
232                 folder->outbox = item;
233                 break;
234         case F_QUEUE:
235                 folder_item_change_type(folder->queue, F_NORMAL);
236                 folder->queue = item;
237                 break;
238         case F_DRAFT:
239                 folder_item_change_type(folder->draft, F_NORMAL);
240                 folder->draft = item;
241                 break;
242         case F_TRASH:
243                 folder_item_change_type(folder->trash, F_NORMAL);
244                 folder->trash = item;
245                 break;
246         case F_NORMAL:
247         default:
248                 break;
249         }
250         /* set new type for current folder and sons */
251         item->stype = newtype;
252         folder_func_to_all_folders(reset_parent_type, NULL);
253         
254         hookdata.folder = folder;
255         hookdata.update_flags = FOLDER_TREE_CHANGED;
256         hookdata.item = NULL;
257         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
258 }
259
260 void folder_destroy(Folder *folder)
261 {
262         cm_return_if_fail(folder != NULL);
263         cm_return_if_fail(folder->klass->destroy_folder != NULL);
264
265         folder_remove(folder);
266
267         folder_tree_destroy(folder);
268
269         folder->klass->destroy_folder(folder);
270
271         g_free(folder->name);
272         g_free(folder);
273 }
274
275 void folder_set_xml(Folder *folder, XMLTag *tag)
276 {
277         GList *cur;
278         FolderItem *rootitem = NULL;
279
280         if ((folder->node != NULL) && (folder->node->data != NULL))
281                 rootitem = (FolderItem *) folder->node->data;
282
283         for (cur = tag->attr; cur != NULL; cur = g_list_next(cur)) {
284                 XMLAttr *attr = (XMLAttr *) cur->data;
285
286                 if (!attr || !attr->name || !attr->value) continue;
287                 if (!strcmp(attr->name, "name")) {
288                         g_free(folder->name);
289                         folder->name = g_strdup(attr->value);
290                         if (rootitem != NULL) {
291                                 g_free(rootitem->name);
292                                 rootitem->name = g_strdup(attr->value);
293                         }
294                 } else if (!strcmp(attr->name, "account_id")) {
295                         PrefsAccount *account;
296
297                         account = account_find_from_id(atoi(attr->value));
298                         if (!account)
299                                 g_warning("account_id: %s not found\n", attr->value);
300                         else {
301                                 folder->account = account;
302                                 account->folder = folder;
303                         }
304                 } else if (!strcmp(attr->name, "collapsed")) {
305                         if (rootitem != NULL)
306                                 rootitem->collapsed = *attr->value == '1' ? TRUE : FALSE;
307                 } else if (!strcmp(attr->name, "sort")) {
308                         folder->sort = atoi(attr->value);
309                 }
310         }
311 }
312
313 XMLTag *folder_get_xml(Folder *folder)
314 {
315         XMLTag *tag;
316
317         tag = xml_tag_new("folder");
318
319         if (folder->name)
320                 xml_tag_add_attr(tag, xml_attr_new("name", folder->name));
321         if (folder->account)
322                 xml_tag_add_attr(tag, xml_attr_new_int("account_id", folder->account->account_id));
323         if (folder->node && folder->node->data) {
324                 FolderItem *rootitem = (FolderItem *) folder->node->data;
325
326                 xml_tag_add_attr(tag, xml_attr_new("collapsed", rootitem->collapsed ? "1" : "0"));
327         }
328         xml_tag_add_attr(tag, xml_attr_new_int("sort", folder->sort));
329
330         return tag;
331 }
332
333 FolderItem *folder_item_new(Folder *folder, const gchar *name, const gchar *path)
334 {
335         FolderItem *item = NULL;
336         
337         cm_return_val_if_fail(folder != NULL, NULL);
338         
339         if (folder->klass->item_new) {
340                 item = folder->klass->item_new(folder);
341         } else {
342                 item = g_new0(FolderItem, 1);
343         }
344
345         cm_return_val_if_fail(item != NULL, NULL);
346
347         item->stype = F_NORMAL;
348         item->name = g_strdup(name);
349         item->path = g_strdup(path);
350         item->mtime = 0;
351         item->new_msgs = 0;
352         item->unread_msgs = 0;
353         item->unreadmarked_msgs = 0;
354         item->marked_msgs = 0;
355         item->total_msgs = 0;
356         item->replied_msgs = 0;
357         item->forwarded_msgs = 0;
358         item->locked_msgs = 0;
359         item->ignored_msgs = 0;
360         item->watched_msgs = 0;
361         item->order = 0;
362         item->last_num = -1;
363         item->cache = NULL;
364         item->no_sub = FALSE;
365         item->no_select = FALSE;
366         item->collapsed = FALSE;
367         item->thread_collapsed = FALSE;
368         item->threaded  = TRUE;
369         item->ret_rcpt  = FALSE;
370         item->opened    = FALSE;
371         item->node = g_node_new(item);
372         item->folder = NULL;
373         item->account = NULL;
374         item->apply_sub = FALSE;
375         item->mark_queue = NULL;
376         item->data = NULL;
377         item->parent_stype = -1;
378
379         item->sort_key = SORT_BY_DATE;
380         item->sort_type = SORT_ASCENDING;
381
382         item->prefs = folder_item_prefs_new();
383
384         return item;
385 }
386
387 void folder_item_append(FolderItem *parent, FolderItem *item)
388 {
389         cm_return_if_fail(parent != NULL);
390         cm_return_if_fail(parent->folder != NULL);
391         cm_return_if_fail(parent->node != NULL);
392         cm_return_if_fail(item != NULL);
393
394         item->folder = parent->folder;
395         g_node_append(parent->node, item->node);
396 }
397
398 void folder_item_remove(FolderItem *item)
399 {
400         GNode *node, *start_node;
401         FolderUpdateData hookdata;
402         gchar *tags_file = NULL, *tags_dir = NULL;
403
404         cm_return_if_fail(item != NULL);
405         cm_return_if_fail(item->folder != NULL);
406         cm_return_if_fail(item->folder->node != NULL);
407
408         start_node = node = item->node;
409         
410         node = item->folder->node;
411         
412         node = g_node_find(node, G_PRE_ORDER, G_TRAVERSE_ALL, item);
413         node = node->children;
414
415         /* remove my children */
416         while (node != NULL) {
417                 if (node && node->data) {
418                         FolderItem *sub_item = (FolderItem*) node->data;
419                         node = node->next;
420                         folder_item_remove(sub_item);
421                 }
422         }
423         
424         /* remove myself */
425         if (item->cache != NULL) {
426                 msgcache_destroy(item->cache);
427                 item->cache = NULL;
428         }
429         tags_file = folder_item_get_tags_file(item);
430         if (tags_file)
431                 claws_unlink(tags_file);
432         tags_dir = g_path_get_dirname(tags_file);
433         if (tags_dir)
434                 rmdir(tags_dir);
435
436         g_free(tags_file);
437         g_free(tags_dir);
438
439         hookdata.folder = item->folder;
440         hookdata.update_flags = FOLDER_TREE_CHANGED | FOLDER_REMOVE_FOLDERITEM;
441         hookdata.item = item;
442         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
443
444         node = start_node;
445
446         if (item->folder->node == node)
447                 item->folder->node = NULL;
448
449         folder_item_destroy(item);
450
451         g_node_destroy(node);
452 }
453
454 void folder_item_remove_children(FolderItem *item)
455 {
456         GNode *node, *next;
457
458         cm_return_if_fail(item != NULL);
459         cm_return_if_fail(item->folder != NULL);
460         cm_return_if_fail(item->node != NULL);
461
462         node = item->node->children;
463         while (node != NULL) {
464                 next = node->next;
465                 folder_item_remove(FOLDER_ITEM(node->data));
466                 node = next;
467         }
468 }
469
470 void folder_item_destroy(FolderItem *item)
471 {
472         Folder *folder;
473
474         cm_return_if_fail(item != NULL);
475
476         folder = item->folder;
477         if (folder) {
478                 if (folder->inbox == item)
479                         folder->inbox = NULL;
480                 else if (folder->outbox == item)
481                         folder->outbox = NULL;
482                 else if (folder->draft == item)
483                         folder->draft = NULL;
484                 else if (folder->queue == item)
485                         folder->queue = NULL;
486                 else if (folder->trash == item)
487                         folder->trash = NULL;
488         }
489
490         if (item->cache)
491                 folder_item_free_cache(item, TRUE);
492         if (item->prefs)
493                 folder_item_prefs_free(item->prefs);
494         g_free(item->name);
495         g_free(item->path);
496
497         if (item->folder != NULL) {
498                 if(item->folder->klass->item_destroy) {
499                         item->folder->klass->item_destroy(item->folder, item);
500                 } else {
501                         g_free(item);
502                 }
503         }
504 }
505
506 FolderItem *folder_item_parent(FolderItem *item)
507 {
508         cm_return_val_if_fail(item != NULL, NULL);
509         cm_return_val_if_fail(item->node != NULL, NULL);
510
511         if (item->node->parent == NULL)
512                 return NULL;
513         return (FolderItem *) item->node->parent->data;
514 }
515
516 void folder_item_set_xml(Folder *folder, FolderItem *item, XMLTag *tag)
517 {
518         GList *cur;
519
520         for (cur = tag->attr; cur != NULL; cur = g_list_next(cur)) {
521                 XMLAttr *attr = (XMLAttr *) cur->data;
522
523                 if (!attr || !attr->name || !attr->value) continue;
524                 if (!strcmp(attr->name, "type")) {
525                         if (!g_ascii_strcasecmp(attr->value, "normal"))
526                                 item->stype = F_NORMAL;
527                         else if (!g_ascii_strcasecmp(attr->value, "inbox"))
528                                 item->stype = F_INBOX;
529                         else if (!g_ascii_strcasecmp(attr->value, "outbox"))
530                                 item->stype = F_OUTBOX;
531                         else if (!g_ascii_strcasecmp(attr->value, "draft"))
532                                 item->stype = F_DRAFT;
533                         else if (!g_ascii_strcasecmp(attr->value, "queue"))
534                                 item->stype = F_QUEUE;
535                         else if (!g_ascii_strcasecmp(attr->value, "trash"))
536                                 item->stype = F_TRASH;
537                 } else if (!strcmp(attr->name, "name")) {
538                         g_free(item->name);
539                         item->name = g_strdup(attr->value);
540                 } else if (!strcmp(attr->name, "path")) {
541                         g_free(item->path);
542                         item->path = g_strdup(attr->value);
543                 } else if (!strcmp(attr->name, "mtime"))
544                         item->mtime = strtoul(attr->value, NULL, 10);
545                 else if (!strcmp(attr->name, "new"))
546                         item->new_msgs = atoi(attr->value);
547                 else if (!strcmp(attr->name, "unread"))
548                         item->unread_msgs = atoi(attr->value);
549                 else if (!strcmp(attr->name, "unreadmarked"))
550                         item->unreadmarked_msgs = atoi(attr->value);
551                 else if (!strcmp(attr->name, "marked"))
552                         item->marked_msgs = atoi(attr->value);
553                 else if (!strcmp(attr->name, "replied"))
554                         item->replied_msgs = atoi(attr->value);
555                 else if (!strcmp(attr->name, "forwarded"))
556                         item->forwarded_msgs = atoi(attr->value);
557                 else if (!strcmp(attr->name, "locked"))
558                         item->locked_msgs = atoi(attr->value);
559                 else if (!strcmp(attr->name, "ignored"))
560                         item->ignored_msgs = atoi(attr->value);
561                 else if (!strcmp(attr->name, "watched"))
562                         item->watched_msgs = atoi(attr->value);
563                 else if (!strcmp(attr->name, "order"))
564                         item->order = atoi(attr->value);
565                 else if (!strcmp(attr->name, "total"))
566                         item->total_msgs = atoi(attr->value);
567                 else if (!strcmp(attr->name, "no_sub"))
568                         item->no_sub = *attr->value == '1' ? TRUE : FALSE;
569                 else if (!strcmp(attr->name, "no_select"))
570                         item->no_select = *attr->value == '1' ? TRUE : FALSE;
571                 else if (!strcmp(attr->name, "collapsed"))
572                         item->collapsed = *attr->value == '1' ? TRUE : FALSE;
573                 else if (!strcmp(attr->name, "thread_collapsed"))
574                         item->thread_collapsed =  *attr->value == '1' ? TRUE : FALSE;
575                 else if (!strcmp(attr->name, "threaded"))
576                         item->threaded =  *attr->value == '1' ? TRUE : FALSE;
577                 else if (!strcmp(attr->name, "hidereadmsgs"))
578                         item->hide_read_msgs =  *attr->value == '1' ? TRUE : FALSE;
579                 else if (!strcmp(attr->name, "hidedelmsgs"))
580                         item->hide_del_msgs =  *attr->value == '1' ? TRUE : FALSE;
581                 else if (!strcmp(attr->name, "hidereadthreads"))
582                         item->hide_read_threads =  *attr->value == '1' ? TRUE : FALSE;
583                 else if (!strcmp(attr->name, "reqretrcpt"))
584                         item->ret_rcpt =  *attr->value == '1' ? TRUE : FALSE;
585                 else if (!strcmp(attr->name, "sort_key")) {
586                         if (!strcmp(attr->value, "none"))
587                                 item->sort_key = SORT_BY_NONE;
588                         else if (!strcmp(attr->value, "number"))
589                                 item->sort_key = SORT_BY_NUMBER;
590                         else if (!strcmp(attr->value, "size"))
591                                 item->sort_key = SORT_BY_SIZE;
592                         else if (!strcmp(attr->value, "date"))
593                                 item->sort_key = SORT_BY_DATE;
594                         else if (!strcmp(attr->value, "from"))
595                                 item->sort_key = SORT_BY_FROM;
596                         else if (!strcmp(attr->value, "subject"))
597                                 item->sort_key = SORT_BY_SUBJECT;
598                         else if (!strcmp(attr->value, "score"))
599                                 item->sort_key = SORT_BY_SCORE;
600                         else if (!strcmp(attr->value, "label"))
601                                 item->sort_key = SORT_BY_LABEL;
602                         else if (!strcmp(attr->value, "mark"))
603                                 item->sort_key = SORT_BY_MARK;
604                         else if (!strcmp(attr->value, "unread"))
605                                 item->sort_key = SORT_BY_STATUS;
606                         else if (!strcmp(attr->value, "mime"))
607                                 item->sort_key = SORT_BY_MIME;
608                         else if (!strcmp(attr->value, "to"))
609                                 item->sort_key = SORT_BY_TO;
610                         else if (!strcmp(attr->value, "locked"))
611                                 item->sort_key = SORT_BY_LOCKED;
612                         else if (!strcmp(attr->value, "tags"))
613                                 item->sort_key = SORT_BY_TAGS;
614                         else if (!strcmp(attr->value, "thread_date"))
615                                 item->sort_key = SORT_BY_THREAD_DATE;
616                 } else if (!strcmp(attr->name, "sort_type")) {
617                         if (!strcmp(attr->value, "ascending"))
618                                 item->sort_type = SORT_ASCENDING;
619                         else
620                                 item->sort_type = SORT_DESCENDING;
621                 } else if (!strcmp(attr->name, "account_id")) {
622                         PrefsAccount *account;
623
624                         account = account_find_from_id(atoi(attr->value));
625                         if (!account)
626                                 g_warning("account_id: %s not found\n", attr->value);
627                         else
628                                 item->account = account;
629                 } else if (!strcmp(attr->name, "apply_sub")) {
630                         item->apply_sub = *attr->value == '1' ? TRUE : FALSE;
631                 } else if (!strcmp(attr->name, "last_seen")) {
632                         if (!claws_crashed())
633                                 item->last_seen = atoi(attr->value);
634                         else
635                                 item->last_seen = 0;
636                 }
637         }
638 }
639
640 XMLTag *folder_item_get_xml(Folder *folder, FolderItem *item)
641 {
642         static gchar *folder_item_stype_str[] = {"normal", "inbox", "outbox",
643                                                  "draft", "queue", "trash"};
644         static gchar *sort_key_str[] = {"none", "number", "size", "date",
645                                         "from", "subject", "score", "label",
646                                         "mark", "unread", "mime", "to", 
647                                         "locked", "tags", "thread_date" };
648         XMLTag *tag;
649         gchar *value;
650
651         tag = xml_tag_new("folderitem");
652
653         xml_tag_add_attr(tag, xml_attr_new("type", folder_item_stype_str[item->stype]));
654         if (item->name)
655                 xml_tag_add_attr(tag, xml_attr_new("name", item->name));
656         if (item->path)
657                 xml_tag_add_attr(tag, xml_attr_new("path", item->path));
658         if (item->no_sub)
659                 xml_tag_add_attr(tag, xml_attr_new("no_sub", "1"));
660         if (item->no_select)
661                 xml_tag_add_attr(tag, xml_attr_new("no_select", "1"));
662         xml_tag_add_attr(tag, xml_attr_new("collapsed", item->collapsed && item->node->children ? "1" : "0"));
663         xml_tag_add_attr(tag, xml_attr_new("thread_collapsed", item->thread_collapsed ? "1" : "0"));
664         xml_tag_add_attr(tag, xml_attr_new("threaded", item->threaded ? "1" : "0"));
665         xml_tag_add_attr(tag, xml_attr_new("hidereadmsgs", item->hide_read_msgs ? "1" : "0"));
666         xml_tag_add_attr(tag, xml_attr_new("hidedelmsgs", item->hide_del_msgs ? "1" : "0"));
667         xml_tag_add_attr(tag, xml_attr_new("hidereadthreads", item->hide_read_threads ? "1" : "0"));
668         if (item->ret_rcpt)
669                 xml_tag_add_attr(tag, xml_attr_new("reqretrcpt", "1"));
670
671         if (item->sort_key != SORT_BY_NONE) {
672                 xml_tag_add_attr(tag, xml_attr_new("sort_key", sort_key_str[item->sort_key]));
673                 xml_tag_add_attr(tag, xml_attr_new("sort_type", item->sort_type == SORT_ASCENDING ? "ascending" : "descending"));
674         }
675
676         value = g_strdup_printf("%ld", (unsigned long int) item->mtime);
677         xml_tag_add_attr(tag, xml_attr_new("mtime", value));
678         g_free(value);
679         xml_tag_add_attr(tag, xml_attr_new_int("new", item->new_msgs));
680         xml_tag_add_attr(tag, xml_attr_new_int("unread", item->unread_msgs));
681         xml_tag_add_attr(tag, xml_attr_new_int("unreadmarked", item->unreadmarked_msgs));
682         xml_tag_add_attr(tag, xml_attr_new_int("marked", item->marked_msgs));
683         xml_tag_add_attr(tag, xml_attr_new_int("total", item->total_msgs));
684         xml_tag_add_attr(tag, xml_attr_new_int("replied", item->replied_msgs));
685         xml_tag_add_attr(tag, xml_attr_new_int("forwarded", item->forwarded_msgs));
686         xml_tag_add_attr(tag, xml_attr_new_int("locked", item->locked_msgs));
687         xml_tag_add_attr(tag, xml_attr_new_int("ignore", item->ignored_msgs));
688         xml_tag_add_attr(tag, xml_attr_new_int("watched", item->watched_msgs));
689         xml_tag_add_attr(tag, xml_attr_new_int("order", item->order));
690
691         if (item->account)
692                 xml_tag_add_attr(tag, xml_attr_new_int("account_id", item->account->account_id));
693         if (item->apply_sub)
694                 xml_tag_add_attr(tag, xml_attr_new("apply_sub", "1"));
695
696         xml_tag_add_attr(tag, xml_attr_new_int("last_seen", item->last_seen));
697
698         return tag;
699 }
700
701 void folder_set_ui_func(Folder *folder, FolderUIFunc func, gpointer data)
702 {
703         cm_return_if_fail(folder != NULL);
704
705         folder->ui_func = func;
706         folder->ui_func_data = data;
707 }
708
709 void folder_set_name(Folder *folder, const gchar *name)
710 {
711         cm_return_if_fail(folder != NULL);
712
713         g_free(folder->name);
714         folder->name = name ? g_strdup(name) : NULL;
715         if (folder->node && folder->node->data) {
716                 FolderItem *item = (FolderItem *)folder->node->data;
717
718                 g_free(item->name);
719                 item->name = name ? g_strdup(name) : NULL;
720         }
721 }
722
723 void folder_set_sort(Folder *folder, guint sort)
724 {
725         cm_return_if_fail(folder != NULL);
726
727         if (folder->sort != sort) {
728                 folder_remove(folder);
729                 folder->sort = sort;
730                 folder_add(folder);
731         }
732 }
733
734 static gboolean folder_tree_destroy_func(GNode *node, gpointer data) {
735         FolderItem *item = (FolderItem *) node->data;
736
737         folder_item_destroy(item);
738         return FALSE;
739 }
740
741 void folder_tree_destroy(Folder *folder)
742 {
743         GNode *node;
744
745         cm_return_if_fail(folder != NULL);
746
747         node = folder->node;
748         
749         prefs_filtering_clear_folder(folder);
750
751         if (node != NULL) {
752                 g_node_traverse(node, G_POST_ORDER, G_TRAVERSE_ALL, -1,
753                                 folder_tree_destroy_func, NULL);
754                 g_node_destroy(node);
755                 folder->node = NULL;
756         }
757 }
758
759 void folder_add(Folder *folder)
760 {
761         Folder *cur_folder;
762         GList *cur;
763         gint i;
764         FolderUpdateData hookdata;
765
766         cm_return_if_fail(folder != NULL);
767
768         if ((FOLDER_TYPE(folder) == F_IMAP ||
769              FOLDER_TYPE(folder) == F_NEWS) &&
770             folder->account == NULL) {
771                 return;
772         }
773
774         for (i = 0, cur = folder_list; cur != NULL; cur = cur->next, i++) {
775                 cur_folder = FOLDER(cur->data);
776                 if (cur_folder->sort < folder->sort)
777                         break;
778         }
779
780         folder_list = g_list_insert(folder_list, folder, i);
781
782         hookdata.folder = folder;
783         hookdata.update_flags = FOLDER_ADD_FOLDER;
784         hookdata.item = NULL;
785         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
786 }
787
788 void folder_remove(Folder *folder)
789 {
790         FolderUpdateData hookdata;
791
792         cm_return_if_fail(folder != NULL);
793
794         folder_list = g_list_remove(folder_list, folder);
795
796         hookdata.folder = folder;
797         hookdata.update_flags = FOLDER_REMOVE_FOLDER;
798         hookdata.item = NULL;
799         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
800 }
801
802 GList *folder_get_list(void)
803 {
804         return folder_list;
805 }
806
807 gint folder_read_list(void)
808 {
809         GNode *node, *cur;
810         XMLNode *xmlnode;
811         gchar *path;
812
813         path = folder_get_list_path();
814         if (!is_file_exist(path)) return -1;
815         node = xml_parse_file(path);
816         if (!node) return -1;
817
818         xmlnode = node->data;
819         if (strcmp2(xmlnode->tag->tag, "folderlist") != 0) {
820                 g_warning("wrong folder list\n");
821                 xml_free_tree(node);
822                 return -1;
823         }
824
825         cur = node->children;
826         while (cur != NULL) {
827                 Folder *folder;
828
829                 folder = folder_get_from_xml(cur);
830                 if (folder != NULL)
831                         folder_add(folder);
832                 else
833                         folder_unloaded_list = g_slist_append(folder_unloaded_list,
834                                 (gpointer) xml_copy_tree(cur));
835                 cur = cur->next;
836         }
837
838         xml_free_tree(node);
839         if (folder_list || folder_unloaded_list)
840                 return 0;
841         else
842                 return -1;
843 }
844
845 void folder_write_list(void)
846 {
847         GList *list;
848         GSList *slist;
849         Folder *folder;
850         gchar *path;
851         PrefFile *pfile;
852         GNode *rootnode;
853         XMLNode *xmlnode;
854         XMLTag *tag;
855
856         path = folder_get_list_path();
857         if ((pfile = prefs_write_open(path)) == NULL) return;
858
859         if (xml_file_put_xml_decl(pfile->fp) < 0) {
860                 prefs_file_close_revert(pfile);
861                 g_warning("failed to start write folder list.\n");
862                 return;         
863         }
864         tag = xml_tag_new("folderlist");
865
866         xmlnode = xml_node_new(tag, NULL);
867
868         rootnode = g_node_new(xmlnode);
869
870         for (list = folder_list; list != NULL; list = list->next) {
871                 GNode *node;
872
873                 folder = list->data;
874                 node = folder_get_xml_node(folder);
875                 if (node != NULL)
876                         g_node_append(rootnode, node);
877         }
878
879         for (slist = folder_unloaded_list; slist != NULL; slist = g_slist_next(slist)) {
880                 GNode *node = (GNode *) slist->data;
881
882                 g_node_append(rootnode, (gpointer) xml_copy_tree(node));
883         }
884
885         if (xml_write_tree(rootnode, pfile->fp) < 0) {
886                 prefs_file_close_revert(pfile);
887                 g_warning("failed to write folder list.\n");
888         } else if (prefs_file_close(pfile) < 0) {
889                 g_warning("failed to write folder list.\n");
890         }
891         xml_free_tree(rootnode);
892 }
893
894 static gboolean folder_scan_tree_func(GNode *node, gpointer data)
895 {
896         GHashTable *pptable = (GHashTable *)data;
897         FolderItem *item = (FolderItem *)node->data;
898         
899         folder_item_restore_persist_prefs(item, pptable);
900         folder_item_scan_full(item, FALSE);
901
902         return FALSE;
903 }
904
905 void folder_scan_tree(Folder *folder, gboolean rebuild)
906 {
907         GHashTable *pptable;
908         FolderUpdateData hookdata;
909         Folder *old_folder = folder;
910
911         if (!folder->klass->scan_tree)
912                 return;
913         
914         pptable = folder_persist_prefs_new(folder);
915
916         if (rebuild)
917                 folder_remove(folder);
918
919         if (folder->klass->scan_tree(folder) < 0) {
920                 if (rebuild)
921                         folder_add(old_folder);
922                 return;
923         } else if (rebuild)
924                 folder_add(folder);
925
926         hookdata.folder = folder;
927         hookdata.update_flags = FOLDER_TREE_CHANGED;
928         hookdata.item = NULL;
929         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
930
931         g_node_traverse(folder->node, G_POST_ORDER, G_TRAVERSE_ALL, -1, folder_scan_tree_func, pptable);
932         folder_persist_prefs_free(pptable);
933
934         prefs_matcher_read_config();
935
936         folder_write_list();
937 }
938
939 static gboolean folder_restore_prefs_func(GNode *node, gpointer data)
940 {
941         GHashTable *pptable = (GHashTable *)data;
942         FolderItem *item = (FolderItem *)node->data;
943         
944         folder_item_restore_persist_prefs(item, pptable);
945
946         return FALSE;
947 }
948
949 void folder_fast_scan_tree(Folder *folder)
950 {
951         GHashTable *pptable;
952         FolderUpdateData hookdata;
953
954         if (!folder->klass->scan_tree)
955                 return;
956         
957         pptable = folder_persist_prefs_new(folder);
958
959         if (folder->klass->scan_tree(folder) < 0) {
960                 return;
961         } 
962
963         hookdata.folder = folder;
964         hookdata.update_flags = FOLDER_TREE_CHANGED;
965         hookdata.item = NULL;
966         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
967
968         g_node_traverse(folder->node, G_POST_ORDER, G_TRAVERSE_ALL, -1, folder_restore_prefs_func, pptable);
969         folder_persist_prefs_free(pptable);
970
971         prefs_matcher_read_config();
972
973         folder_write_list();
974 }
975
976 FolderItem *folder_create_folder(FolderItem *parent, const gchar *name)
977 {
978         FolderItem *new_item;
979         
980         cm_return_val_if_fail(parent != NULL, NULL);
981
982         new_item = parent->folder->klass->create_folder(parent->folder, parent, name);
983         if (new_item) {
984                 FolderUpdateData hookdata;
985
986                 new_item->cache = msgcache_new();
987                 new_item->cache_dirty = TRUE;
988                 new_item->mark_dirty = TRUE;
989                 new_item->tags_dirty = TRUE;
990
991                 hookdata.folder = new_item->folder;
992                 hookdata.update_flags = FOLDER_TREE_CHANGED | FOLDER_ADD_FOLDERITEM;
993                 hookdata.item = new_item;
994                 hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
995         }
996
997         return new_item;
998 }
999
1000 gint folder_item_rename(FolderItem *item, gchar *newname)
1001 {
1002         gint retval;
1003
1004         cm_return_val_if_fail(item != NULL, -1);
1005         cm_return_val_if_fail(newname != NULL, -1);
1006
1007         retval = item->folder->klass->rename_folder(item->folder, item, newname);
1008
1009         if (retval >= 0) {
1010                 FolderItemUpdateData hookdata;
1011                 FolderUpdateData hookdata2;
1012
1013                 hookdata.item = item;
1014                 hookdata.update_flags = F_ITEM_UPDATE_NAME;
1015                 hookdata.msg = NULL;
1016                 hooks_invoke(FOLDER_ITEM_UPDATE_HOOKLIST, &hookdata);
1017
1018                 hookdata2.folder = item->folder;
1019                 hookdata2.item = item;
1020                 hookdata2.update_flags = FOLDER_RENAME_FOLDERITEM;
1021                 hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata2);
1022         }
1023
1024         return retval;
1025 }
1026
1027 struct TotalMsgCount
1028 {
1029         guint new_msgs;
1030         guint unread_msgs;
1031         guint unreadmarked_msgs;
1032         guint marked_msgs;
1033         guint total_msgs;
1034         guint replied_msgs;
1035         guint forwarded_msgs;
1036         guint locked_msgs;
1037         guint ignored_msgs;
1038         guint watched_msgs;
1039 };
1040
1041 struct FuncToAllFoldersData
1042 {
1043         FolderItemFunc  function;
1044         gpointer        data;
1045 };
1046
1047 static gboolean folder_func_to_all_folders_func(GNode *node, gpointer data)
1048 {
1049         FolderItem *item;
1050         struct FuncToAllFoldersData *function_data = (struct FuncToAllFoldersData *) data;
1051
1052         cm_return_val_if_fail(node->data != NULL, FALSE);
1053
1054         item = FOLDER_ITEM(node->data);
1055         cm_return_val_if_fail(item != NULL, FALSE);
1056
1057         function_data->function(item, function_data->data);
1058
1059         return FALSE;
1060 }
1061
1062 void folder_func_to_all_folders(FolderItemFunc function, gpointer data)
1063 {
1064         GList *list;
1065         Folder *folder;
1066         struct FuncToAllFoldersData function_data;
1067         
1068         function_data.function = function;
1069         function_data.data = data;
1070
1071         for (list = folder_list; list != NULL; list = list->next) {
1072                 folder = FOLDER(list->data);
1073                 if (folder->node)
1074                         g_node_traverse(folder->node, G_PRE_ORDER,
1075                                         G_TRAVERSE_ALL, -1,
1076                                         folder_func_to_all_folders_func,
1077                                         &function_data);
1078         }
1079 }
1080
1081 static void folder_count_total_msgs_func(FolderItem *item, gpointer data)
1082 {
1083         struct TotalMsgCount *count = (struct TotalMsgCount *)data;
1084
1085         count->new_msgs += item->new_msgs;
1086         count->unread_msgs += item->unread_msgs;
1087         count->unreadmarked_msgs += item->unreadmarked_msgs;
1088         count->marked_msgs += item->marked_msgs;
1089         count->total_msgs += item->total_msgs;
1090         count->replied_msgs += item->replied_msgs;
1091         count->forwarded_msgs += item->forwarded_msgs;
1092         count->locked_msgs += item->locked_msgs;
1093         count->ignored_msgs += item->ignored_msgs;
1094         count->watched_msgs += item->watched_msgs;
1095 }
1096
1097 struct TotalMsgStatus
1098 {
1099         guint new;
1100         guint unread;
1101         guint total;
1102         GString *str;
1103 };
1104
1105 static gboolean folder_get_status_full_all_func(GNode *node, gpointer data)
1106 {
1107         FolderItem *item;
1108         struct TotalMsgStatus *status = (struct TotalMsgStatus *)data;
1109         gchar *id;
1110  
1111         cm_return_val_if_fail(node->data != NULL, FALSE);
1112  
1113         item = FOLDER_ITEM(node->data);
1114
1115         if (!item->path) return FALSE;
1116
1117         status->new += item->new_msgs;
1118         status->unread += item->unread_msgs;
1119         status->total += item->total_msgs;
1120
1121         if (status->str) {
1122                 id = folder_item_get_identifier(item);
1123                 g_string_append_printf(status->str, "%5d %5d %5d %s\n",
1124                                   item->new_msgs, item->unread_msgs,
1125                                   item->total_msgs, id);
1126                 g_free(id);
1127         }
1128  
1129         return FALSE;
1130  }
1131  
1132 static void folder_get_status_full_all(GString *str, guint *new, guint *unread,
1133                                        guint *total)
1134 {
1135         GList *list;
1136         Folder *folder;
1137         struct TotalMsgStatus status;
1138  
1139         status.new = status.unread = status.total = 0;
1140         status.str = str;
1141  
1142         debug_print("Counting total number of messages...\n");
1143  
1144         for (list = folder_list; list != NULL; list = list->next) {
1145                 folder = FOLDER(list->data);
1146                 if (folder->node)
1147                         g_node_traverse(folder->node, G_PRE_ORDER,
1148                                         G_TRAVERSE_ALL, -1,
1149                                         folder_get_status_full_all_func,
1150                                         &status);
1151         }
1152  
1153         *new = status.new;
1154         *unread = status.unread;
1155         *total = status.total;
1156 }
1157
1158 gchar *folder_get_status(GPtrArray *folders, gboolean full)
1159 {
1160         guint new, unread, total;
1161         GString *str;
1162         gint i;
1163         gchar *ret;
1164
1165         new = unread = total = 0;
1166
1167         str = g_string_new(NULL);
1168
1169         if (folders) {
1170                 for (i = 0; i < folders->len; i++) {
1171                         FolderItem *item;
1172
1173                         item = g_ptr_array_index(folders, i);
1174                         new += item->new_msgs;
1175                         unread += item->unread_msgs;
1176                         total += item->total_msgs;
1177
1178                         if (full) {
1179                                 gchar *id;
1180
1181                                 id = folder_item_get_identifier(item);
1182                                 g_string_append_printf(str, "%5d %5d %5d %s\n",
1183                                                   item->new_msgs, item->unread_msgs,
1184                                                   item->total_msgs, id);
1185                                 g_free(id);
1186                         }
1187                 }
1188         } else {
1189                 folder_get_status_full_all(full ? str : NULL,
1190                                            &new, &unread, &total);
1191         }
1192
1193         if (full)
1194                 g_string_append_printf(str, "%5d %5d %5d\n", new, unread, total);
1195         else
1196                 g_string_append_printf(str, "%d %d %d\n", new, unread, total);
1197
1198         ret = str->str;
1199         g_string_free(str, FALSE);
1200  
1201         return ret;
1202 }
1203
1204 void folder_count_total_msgs(guint *new_msgs, guint *unread_msgs, 
1205                              guint *unreadmarked_msgs, guint *marked_msgs,
1206                              guint *total_msgs, guint *replied_msgs,
1207                              guint *forwarded_msgs, guint *locked_msgs,
1208                              guint *ignored_msgs, guint *watched_msgs)
1209 {
1210         struct TotalMsgCount count;
1211
1212         count.new_msgs = count.unread_msgs = count.unreadmarked_msgs = 0;
1213         count.total_msgs = count.replied_msgs = count.forwarded_msgs = 0;
1214         count.locked_msgs = count.ignored_msgs = count.watched_msgs = 0;
1215         count.marked_msgs = 0;
1216
1217         debug_print("Counting total number of messages...\n");
1218
1219         folder_func_to_all_folders(folder_count_total_msgs_func, &count);
1220
1221         *new_msgs = count.new_msgs;
1222         *unread_msgs = count.unread_msgs;
1223         *unreadmarked_msgs = count.unreadmarked_msgs;
1224         *marked_msgs = count.marked_msgs;
1225         *total_msgs = count.total_msgs;
1226         *replied_msgs = count.replied_msgs;
1227         *forwarded_msgs = count.forwarded_msgs;
1228         *locked_msgs = count.locked_msgs;
1229         *ignored_msgs = count.ignored_msgs;
1230         *watched_msgs = count.watched_msgs;
1231 }
1232
1233 Folder *folder_find_from_path(const gchar *path)
1234 {
1235         GList *list;
1236         Folder *folder;
1237
1238         for (list = folder_list; list != NULL; list = list->next) {
1239                 folder = list->data;
1240                 if ((FOLDER_TYPE(folder) == F_MH || 
1241                      FOLDER_TYPE(folder) == F_MBOX) &&
1242                     !path_cmp(LOCAL_FOLDER(folder)->rootpath, path))
1243                         return folder;
1244         }
1245
1246         return NULL;
1247 }
1248
1249 Folder *folder_find_from_name(const gchar *name, FolderClass *klass)
1250 {
1251         GList *list;
1252         Folder *folder;
1253
1254         for (list = folder_list; list != NULL; list = list->next) {
1255                 folder = list->data;
1256                 if (folder->klass == klass && 
1257                     strcmp2(name, folder->name) == 0)
1258                         return folder;
1259         }
1260
1261         return NULL;
1262 }
1263
1264 static gboolean folder_item_find_func(GNode *node, gpointer data)
1265 {
1266         FolderItem *item = node->data;
1267         gpointer *d = data;
1268         const gchar *path = d[0];
1269
1270         if (path_cmp(path, item->path) != 0)
1271                 return FALSE;
1272
1273         d[1] = item;
1274
1275         return TRUE;
1276 }
1277
1278 FolderItem *folder_find_item_from_path(const gchar *path)
1279 {
1280         Folder *folder;
1281         gpointer d[2];
1282         GList *list = folder_get_list();
1283         
1284         folder = list ? list->data:NULL;
1285         
1286         cm_return_val_if_fail(folder != NULL, NULL);
1287
1288         d[0] = (gpointer)path;
1289         d[1] = NULL;
1290         while (d[1] == NULL && list) {
1291                 folder = FOLDER(list->data);
1292                 g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
1293                         folder_item_find_func, d);
1294                 list = list->next;
1295         }
1296         return d[1];
1297 }
1298
1299 static gboolean folder_item_find_func_real_path(GNode *node, gpointer data)
1300 {
1301         FolderItem *item = node->data;
1302         gpointer *d = data;
1303         const gchar *path = d[0];
1304         gchar *tmp = folder_item_get_path(item);
1305         if (path_cmp(path, tmp) != 0) {
1306                 g_free(tmp);
1307                 return FALSE;
1308         }
1309         g_free(tmp);
1310         d[1] = item;
1311
1312         return TRUE;
1313 }
1314
1315 FolderItem *folder_find_item_from_real_path(const gchar *path)
1316 {
1317         Folder *folder;
1318         gpointer d[2];
1319         GList *list = folder_get_list();
1320         
1321         folder = list ? list->data:NULL;
1322         
1323         cm_return_val_if_fail(folder != NULL, NULL);
1324
1325         d[0] = (gpointer)path;
1326         d[1] = NULL;
1327         while (d[1] == NULL && list) {
1328                 folder = FOLDER(list->data);
1329                 g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
1330                         folder_item_find_func_real_path, d);
1331                 list = list->next;
1332         }
1333         return d[1];
1334 }
1335
1336 FolderItem *folder_find_child_item_by_name(FolderItem *item, const gchar *name)
1337 {
1338         GNode *node;
1339         FolderItem *child;
1340
1341         for (node = item->node->children; node != NULL; node = node->next) {
1342                 child = FOLDER_ITEM(node->data);
1343                 if (strcmp2(child->name, name) == 0) {
1344                         return child;
1345                 }
1346         }
1347
1348         return NULL;
1349 }
1350
1351 FolderClass *folder_get_class_from_string(const gchar *str)
1352 {
1353         GSList *classlist;
1354
1355         classlist = folder_get_class_list();
1356         for (; classlist != NULL; classlist = g_slist_next(classlist)) {
1357                 FolderClass *class = (FolderClass *) classlist->data;
1358                 if (g_ascii_strcasecmp(class->idstr, str) == 0)
1359                         return class;
1360         }
1361
1362         return NULL;
1363 }
1364
1365 gchar *folder_get_identifier(Folder *folder)
1366 {
1367         gchar *type_str;
1368
1369         cm_return_val_if_fail(folder != NULL, NULL);
1370
1371         type_str = folder->klass->idstr;
1372         return g_strconcat("#", type_str, "/", folder->name, NULL);
1373 }
1374
1375 gchar *folder_item_get_identifier(FolderItem *item)
1376 {
1377         gchar *id = NULL;
1378         gchar *folder_id = NULL;
1379
1380         cm_return_val_if_fail(item != NULL, NULL);
1381
1382         if (item->path == NULL)
1383                 return NULL;
1384
1385         folder_id = folder_get_identifier(item->folder);
1386         id = g_strconcat(folder_id, "/", item->path, NULL);
1387         g_free(folder_id);
1388
1389         return id;
1390 }
1391
1392 Folder *folder_find_from_identifier(const gchar *identifier)
1393 {
1394         gchar *str;
1395         gchar *p;
1396         gchar *name;
1397         FolderClass *class;
1398
1399         cm_return_val_if_fail(identifier != NULL, NULL);
1400
1401         if (*identifier != '#')
1402                 return NULL;
1403
1404         Xstrdup_a(str, identifier, return NULL);
1405
1406         p = strchr(str, '/');
1407         if (!p)
1408                 return NULL;
1409         *p = '\0';
1410         p++;
1411         class = folder_get_class_from_string(&str[1]);
1412         if (class == NULL)
1413                 return NULL;
1414
1415         name = p;
1416         p = strchr(p, '/');
1417         if (p)
1418                 return NULL;
1419
1420         return folder_find_from_name(name, class);
1421 }
1422
1423 FolderItem *folder_find_item_from_identifier(const gchar *identifier)
1424 {
1425         Folder *folder;
1426         gpointer d[2];
1427         gchar *str;
1428         gchar *p;
1429         gchar *name;
1430         gchar *path;
1431         FolderClass *class;
1432
1433         cm_return_val_if_fail(identifier != NULL, NULL);
1434
1435         if (*identifier != '#')
1436                 return folder_find_item_from_path(identifier);
1437
1438         Xstrdup_a(str, identifier, return NULL);
1439
1440         p = strchr(str, '/');
1441         if (!p)
1442                 return folder_find_item_from_path(identifier);
1443         *p = '\0';
1444         p++;
1445         class = folder_get_class_from_string(&str[1]);
1446         if (class == NULL)
1447                 return folder_find_item_from_path(identifier);
1448
1449         name = p;
1450         p = strchr(p, '/');
1451         if (!p)
1452                 return folder_find_item_from_path(identifier);
1453         *p = '\0';
1454         p++;
1455
1456         folder = folder_find_from_name(name, class);
1457         if (!folder)
1458                 return folder_find_item_from_path(identifier);
1459
1460         path = p;
1461
1462         d[0] = (gpointer)path;
1463         d[1] = NULL;
1464         g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
1465                         folder_item_find_func, d);
1466         return d[1];
1467 }
1468
1469 /** Returns the FolderItem from a given identifier
1470  *
1471  * The FolderItem is created if it doesn't already exist.
1472  * If creation failed, the function returns NULL.
1473  * 
1474  * Identifiers are of the form #type/Mailbox/FolderA/FolderB/FolderC
1475  */
1476 FolderItem *folder_get_item_from_identifier(const gchar *identifier)
1477 {
1478         FolderItem *item, *last_parent;
1479         Folder *folder;
1480         gchar *p1, *p2, *str;
1481         size_t len;
1482         FolderClass *class;
1483         gboolean created_something = FALSE;
1484
1485         item = folder_find_item_from_identifier(identifier);
1486         if(item)
1487                 return item;
1488
1489         /* trivial sanity check: need at least # and two slashes */
1490         len = strlen(identifier);
1491         if(len < 3)
1492                 return NULL;
1493
1494         /* make sure identifier ends with a slash */
1495         if(identifier[len-1] == G_DIR_SEPARATOR) {
1496                 Xstrdup_a(str, identifier, return NULL);
1497         }
1498         else {
1499                 Xstrndup_a(str, identifier, len+1, return NULL);
1500                 str[len] = G_DIR_SEPARATOR;
1501         }
1502
1503         /* find folder class */
1504         p1 = strchr(str, G_DIR_SEPARATOR);
1505         if(!p1)
1506                 return NULL;
1507         *p1 = '\0';
1508         class = folder_get_class_from_string(&str[1]);
1509         if(!class)
1510                 return NULL;
1511         *p1 = G_DIR_SEPARATOR;
1512         ++p1;
1513
1514         /* find folder from class and name */
1515         p2 = strchr(p1, G_DIR_SEPARATOR);
1516         if(!p2)
1517                 return NULL;
1518         *p2 = '\0';
1519         folder = folder_find_from_name(p1, class);
1520         if(!folder)
1521                 return NULL;
1522         *p2 = G_DIR_SEPARATOR;
1523         ++p2;
1524         p1 = p2;
1525
1526         /* Now, move forward and make sure all sections in the path exist */
1527         last_parent = folder->node->data;
1528         while((p1 = strchr(p1, G_DIR_SEPARATOR)) != NULL) {
1529                 *p1 = '\0';
1530                 item = folder_find_item_from_identifier(str);
1531                 if(!item) {
1532                         item = folder_create_folder(last_parent, p2);
1533                         if(!item)
1534                                 return NULL;
1535                         debug_print("Created folder '%s'\n", str);
1536                         created_something = TRUE;
1537                         if(prefs_common.inherit_folder_props && (last_parent != item->folder->node->data)) {
1538                                 folder_item_prefs_copy_prefs(last_parent, item);
1539                         }
1540                 }
1541                 last_parent = item;
1542                 *p1 = G_DIR_SEPARATOR;
1543                 ++p1;
1544                 p2 = p1;
1545         }
1546
1547         if(created_something)
1548                 folder_write_list();
1549
1550         return item;
1551 }
1552
1553
1554 /**
1555  * Get a displayable name for a FolderItem
1556  *
1557  * \param item FolderItem for that a name should be created
1558  * \return Displayable name for item, returned string has to
1559  *         be freed
1560  */
1561 gchar *folder_item_get_name(FolderItem *item)
1562 {
1563         gchar *name = NULL;
1564
1565         cm_return_val_if_fail(item != NULL, g_strdup(""));
1566
1567         switch (item->stype) {
1568         case F_INBOX:
1569                 name = g_strdup(!strcmp2(item->name, INBOX_DIR) ? _("Inbox") :
1570                                 item->name);
1571                 break;
1572         case F_OUTBOX:
1573                 name = g_strdup(!strcmp2(item->name, OUTBOX_DIR) ? _("Sent") :
1574                                 item->name);
1575                 break;
1576         case F_QUEUE:
1577                 name = g_strdup(!strcmp2(item->name, QUEUE_DIR) ? _("Queue") :
1578                                 item->name);
1579                 break;
1580         case F_TRASH:
1581                 name = g_strdup(!strcmp2(item->name, TRASH_DIR) ? _("Trash") :
1582                                 item->name);
1583                 break;
1584         case F_DRAFT:
1585                 name = g_strdup(!strcmp2(item->name, DRAFT_DIR) ? _("Drafts") :
1586                                 item->name);
1587                 break;
1588         default:
1589                 break;
1590         }
1591
1592         if (name == NULL) {
1593                 /*
1594                  * should probably be done by a virtual function,
1595                  * the folder knows the ui string and how to abbrev
1596                 */
1597                 if (folder_item_parent(item) == NULL) {
1598                         name = g_strconcat(item->name, " (", item->folder->klass->uistr, ")", NULL);
1599                 } else {
1600                         if (FOLDER_CLASS(item->folder) == news_get_class() &&
1601                             item->path && !strcmp2(item->name, item->path))
1602                                 name = get_abbrev_newsgroup_name
1603                                         (item->path,
1604                                          prefs_common.ng_abbrev_len);
1605                         else
1606                                 name = g_strdup(item->name);
1607                 }
1608         }
1609
1610         if (name == NULL)
1611                 name = g_strdup("");
1612
1613         return name;
1614 }
1615
1616 gboolean folder_have_mailbox (void)
1617 {
1618         GList *cur;
1619         for (cur = folder_list; cur != NULL; cur = g_list_next(cur)) {
1620                 Folder *folder = FOLDER(cur->data);
1621                 if (folder->inbox && folder->outbox)
1622                         return TRUE;
1623         }
1624         return FALSE;
1625 }
1626
1627 FolderItem *folder_get_default_inbox(void)
1628 {
1629         GList *flist;
1630
1631         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1632                 Folder * folder = FOLDER(flist->data);
1633
1634                 if (folder == NULL)
1635                         continue;
1636                 if (folder->inbox == NULL)
1637                         continue;
1638                 if (folder->klass->type == F_UNKNOWN)
1639                         continue;
1640
1641                 return folder->inbox;
1642         }
1643
1644         return NULL;
1645 }
1646
1647 FolderItem *folder_get_default_inbox_for_class(FolderType type)
1648 {
1649         GList *flist;
1650
1651         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1652                 Folder * folder = FOLDER(flist->data);
1653
1654                 if (folder == NULL)
1655                         continue;
1656                 if (folder->inbox == NULL)
1657                         continue;
1658                 if (folder->klass->type != type)
1659                         continue;
1660
1661                 return folder->inbox;
1662         }
1663
1664         return NULL;
1665 }
1666
1667 FolderItem *folder_get_default_outbox(void)
1668 {
1669         GList *flist;
1670
1671         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1672                 Folder * folder = FOLDER(flist->data);
1673
1674                 if (folder == NULL)
1675                         continue;
1676                 if (folder->outbox == NULL)
1677                         continue;
1678                 if (folder->klass->type == F_UNKNOWN)
1679                         continue;
1680
1681                 return folder->outbox;
1682         }
1683
1684         return NULL;
1685 }
1686
1687 FolderItem *folder_get_default_outbox_for_class(FolderType type)
1688 {
1689         GList *flist;
1690
1691         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1692                 Folder * folder = FOLDER(flist->data);
1693
1694                 if (folder == NULL)
1695                         continue;
1696                 if (folder->outbox == NULL)
1697                         continue;
1698                 if (folder->klass->type != type)
1699                         continue;
1700
1701                 return folder->outbox;
1702         }
1703
1704         return NULL;
1705 }
1706
1707 FolderItem *folder_get_default_draft(void)
1708 {
1709         GList *flist;
1710
1711         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1712                 Folder * folder = FOLDER(flist->data);
1713
1714                 if (folder == NULL)
1715                         continue;
1716                 if (folder->draft == NULL)
1717                         continue;
1718                 if (folder->klass->type == F_UNKNOWN)
1719                         continue;
1720
1721                 return folder->draft;
1722         }
1723
1724         return NULL;
1725 }
1726
1727 FolderItem *folder_get_default_draft_for_class(FolderType type)
1728 {
1729         GList *flist;
1730
1731         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1732                 Folder * folder = FOLDER(flist->data);
1733
1734                 if (folder == NULL)
1735                         continue;
1736                 if (folder->draft == NULL)
1737                         continue;
1738                 if (folder->klass->type != type)
1739                         continue;
1740
1741                 return folder->draft;
1742         }
1743
1744         return NULL;
1745 }
1746
1747 FolderItem *folder_get_default_queue(void)
1748 {
1749         GList *flist;
1750
1751         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1752                 Folder * folder = FOLDER(flist->data);
1753
1754                 if (folder == NULL)
1755                         continue;
1756                 if (folder->queue == NULL)
1757                         continue;
1758                 if (folder->klass->type == F_UNKNOWN)
1759                         continue;
1760
1761                 return folder->queue;
1762         }
1763
1764         return NULL;
1765 }
1766
1767 FolderItem *folder_get_default_queue_for_class(FolderType type)
1768 {
1769         GList *flist;
1770
1771         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1772                 Folder * folder = FOLDER(flist->data);
1773
1774                 if (folder == NULL)
1775                         continue;
1776                 if (folder->queue == NULL)
1777                         continue;
1778                 if (folder->klass->type != type)
1779                         continue;
1780
1781                 return folder->queue;
1782         }
1783
1784         return NULL;
1785 }
1786
1787 FolderItem *folder_get_default_trash(void)
1788 {
1789         GList *flist;
1790
1791         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1792                 Folder * folder = FOLDER(flist->data);
1793
1794                 if (folder == NULL)
1795                         continue;
1796                 if (folder->trash == NULL)
1797                         continue;
1798                 if (folder->klass->type == F_UNKNOWN)
1799                         continue;
1800
1801                 return folder->trash;
1802         }
1803
1804         return NULL;
1805 }
1806
1807 FolderItem *folder_get_default_trash_for_class(FolderType type)
1808 {
1809         GList *flist;
1810
1811         for (flist = folder_list; flist != NULL; flist = g_list_next(flist)) {
1812                 Folder * folder = FOLDER(flist->data);
1813
1814                 if (folder == NULL)
1815                         continue;
1816                 if (folder->trash == NULL)
1817                         continue;
1818                 if (folder->klass->type != type)
1819                         continue;
1820
1821                 return folder->trash;
1822         }
1823
1824         return NULL;
1825 }
1826
1827 #define CREATE_FOLDER_IF_NOT_EXIST(member, dir, type)           \
1828 {                                                               \
1829         if (!folder->member) {                                  \
1830                 item = folder_item_new(folder, dir, dir);       \
1831                 item->stype = type;                             \
1832                 folder_item_append(rootitem, item);             \
1833                 folder->member = item;                          \
1834         }                                                       \
1835 }
1836
1837 void folder_set_missing_folders(void)
1838 {
1839         Folder *folder;
1840         FolderItem *rootitem;
1841         FolderItem *item;
1842         GList *list;
1843
1844         for (list = folder_list; list != NULL; list = list->next) {
1845                 folder = list->data;
1846                 if (FOLDER_TYPE(folder) != F_MH) continue;
1847                 rootitem = FOLDER_ITEM(folder->node->data);
1848                 cm_return_if_fail(rootitem != NULL);
1849
1850                 if (folder->inbox && folder->outbox && folder->draft &&
1851                     folder->queue && folder->trash)
1852                         continue;
1853
1854                 if (folder->klass->create_tree(folder) < 0) {
1855                         g_warning("%s: can't create the folder tree.\n",
1856                                   LOCAL_FOLDER(folder)->rootpath);
1857                         continue;
1858                 }
1859
1860                 CREATE_FOLDER_IF_NOT_EXIST(inbox,  INBOX_DIR,  F_INBOX);
1861                 CREATE_FOLDER_IF_NOT_EXIST(outbox, OUTBOX_DIR, F_OUTBOX);
1862                 CREATE_FOLDER_IF_NOT_EXIST(draft,  DRAFT_DIR,  F_DRAFT);
1863                 CREATE_FOLDER_IF_NOT_EXIST(queue,  QUEUE_DIR,  F_QUEUE);
1864                 CREATE_FOLDER_IF_NOT_EXIST(trash,  TRASH_DIR,  F_TRASH);
1865         }
1866 }
1867
1868 static gboolean folder_unref_account_func(GNode *node, gpointer data)
1869 {
1870         FolderItem *item = node->data;
1871         PrefsAccount *account = data;
1872
1873         if (item->account == account)
1874                 item->account = NULL;
1875
1876         return FALSE;
1877 }
1878
1879 void folder_unref_account_all(PrefsAccount *account)
1880 {
1881         Folder *folder;
1882         GList *list;
1883
1884         if (!account) return;
1885
1886         for (list = folder_list; list != NULL; list = list->next) {
1887                 folder = list->data;
1888                 if (folder->account == account)
1889                         folder->account = NULL;
1890                 g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
1891                                 folder_unref_account_func, account);
1892         }
1893 }
1894
1895 #undef CREATE_FOLDER_IF_NOT_EXIST
1896
1897 gchar *folder_item_get_path(FolderItem *item)
1898 {
1899         Folder *folder;
1900
1901         cm_return_val_if_fail(item != NULL, NULL);
1902         folder = item->folder;
1903         cm_return_val_if_fail(folder != NULL, NULL);
1904
1905         return folder->klass->item_get_path(folder, item);
1906 }
1907
1908 static gint folder_sort_cache_list_by_msgnum(gconstpointer a, gconstpointer b)
1909 {
1910         MsgInfo *msginfo_a = (MsgInfo *) a;
1911         MsgInfo *msginfo_b = (MsgInfo *) b;
1912
1913         return (msginfo_a->msgnum - msginfo_b->msgnum);
1914 }
1915
1916 static gint folder_sort_folder_list(gconstpointer a, gconstpointer b)
1917 {
1918         guint gint_a = GPOINTER_TO_INT(a);
1919         guint gint_b = GPOINTER_TO_INT(b);
1920         
1921         return (gint_a - gint_b);
1922 }
1923
1924 static gint syncronize_flags(FolderItem *item, MsgInfoList *msglist)
1925 {
1926         GHashTable *relation;
1927         gint ret = 0;
1928         GSList *cur;
1929
1930         if(msglist == NULL)
1931                 return 0;
1932         if(item->folder->klass->get_flags == NULL)
1933                 return 0;
1934         if (item->no_select)
1935                 return 0;
1936
1937         relation = g_hash_table_new(g_direct_hash, g_direct_equal);
1938         if ((ret = item->folder->klass->get_flags(
1939             item->folder, item, msglist, relation)) == 0) {
1940                 gpointer data, old_key;
1941                 MsgInfo *msginfo;
1942                 MsgPermFlags permflags = 0;
1943
1944                 folder_item_update_freeze();
1945                 folder_item_set_batch(item, TRUE);
1946                 for (cur = msglist; cur != NULL; cur = g_slist_next(cur)) {
1947                         msginfo = (MsgInfo *) cur->data;
1948                 
1949                         if (g_hash_table_lookup_extended(relation, msginfo, &old_key, &data)) {
1950                                 permflags = GPOINTER_TO_INT(data);
1951
1952                                 if (msginfo->flags.perm_flags != permflags) {
1953                                         procmsg_msginfo_change_flags(msginfo,
1954                                                 permflags & ~msginfo->flags.perm_flags, 0,
1955                                                 ~permflags & msginfo->flags.perm_flags, 0);
1956                                 }
1957                         }
1958                 }
1959                 folder_item_set_batch(item, FALSE);
1960                 folder_item_update_thaw();
1961         }
1962         g_hash_table_destroy(relation); 
1963
1964         return ret;
1965 }
1966
1967 static gint folder_item_syncronize_flags(FolderItem *item)
1968 {
1969         MsgInfoList *msglist = NULL;
1970         GSList *cur;
1971         gint ret = 0;
1972         
1973         cm_return_val_if_fail(item != NULL, -1);
1974         cm_return_val_if_fail(item->folder != NULL, -1);
1975         cm_return_val_if_fail(item->folder->klass != NULL, -1);
1976         if (item->no_select)
1977                 return -1;
1978
1979         item->scanning = ITEM_SCANNING_WITH_FLAGS;
1980
1981         if (item->cache == NULL)
1982                 folder_item_read_cache(item);
1983         
1984         msglist = msgcache_get_msg_list(item->cache);
1985         
1986         ret = syncronize_flags(item, msglist);
1987
1988         for (cur = msglist; cur != NULL; cur = g_slist_next(cur))
1989                 procmsg_msginfo_free((MsgInfo *) cur->data);
1990         
1991         g_slist_free(msglist);
1992
1993         item->scanning = ITEM_NOT_SCANNING;
1994
1995         return ret;
1996 }
1997
1998 static void folder_item_process_open (FolderItem *item,
1999                                  void (*before_proc_func)(gpointer data),
2000                                  void (*after_proc_func)(gpointer data),
2001                                  gpointer data)
2002 {
2003         gchar *buf;
2004         if (item == NULL)
2005                 return;
2006         if((item->folder->klass->scan_required != NULL) &&
2007            (item->folder->klass->scan_required(item->folder, item))) {
2008                 folder_item_scan_full(item, TRUE);
2009         } else {
2010                 folder_item_syncronize_flags(item);
2011         }
2012         
2013         /* Processing */
2014         if (item->prefs->enable_processing_when_opening) {
2015                 buf = g_strdup_printf(_("Processing (%s)...\n"), 
2016                               item->path ? item->path : item->name);
2017                 g_free(buf);
2018
2019                 if (before_proc_func)
2020                         before_proc_func(data);
2021
2022                 folder_item_apply_processing(item);
2023
2024                 if (after_proc_func)
2025                         after_proc_func(data);
2026         }
2027         item->processing_pending = FALSE;
2028         return; 
2029 }
2030
2031 gint folder_item_open(FolderItem *item)
2032 {
2033         START_TIMING(""); 
2034         if (item->no_select)
2035                 return -1;
2036
2037         if (item->scanning != ITEM_NOT_SCANNING) {
2038                 debug_print("%s is scanning... \n", item->path ? item->path : item->name);
2039                 return -2;
2040         }
2041
2042         item->processing_pending = TRUE;
2043         folder_item_process_open (item, NULL, NULL, NULL);
2044         
2045         item->opened = TRUE;
2046         END_TIMING();
2047         return 0;
2048 }
2049
2050 gint folder_item_close(FolderItem *item)
2051 {
2052         GSList *mlist, *cur;
2053         Folder *folder;
2054         
2055         cm_return_val_if_fail(item != NULL, -1);
2056
2057         if (item->no_select)
2058                 return -1;
2059
2060         if (item->new_msgs) {
2061                 folder_item_update_freeze();
2062                 mlist = folder_item_get_msg_list(item);
2063                 for (cur = mlist ; cur != NULL ; cur = cur->next) {
2064                         MsgInfo * msginfo;
2065
2066                         msginfo = (MsgInfo *) cur->data;
2067                         if (MSG_IS_NEW(msginfo->flags))
2068                                 procmsg_msginfo_unset_flags(msginfo, MSG_NEW, 0);
2069                         procmsg_msginfo_free(msginfo);
2070                 }
2071                 g_slist_free(mlist);
2072                 folder_item_update_thaw();
2073         }               
2074
2075         folder_item_write_cache(item);
2076         
2077         folder_item_update(item, F_ITEM_UPDATE_MSGCNT);
2078
2079         item->opened = FALSE;
2080         folder = item->folder;
2081
2082         if (folder->klass->close == NULL)
2083                 return 0;
2084
2085         return folder->klass->close(folder, item);
2086 }
2087
2088 static MsgInfoList *get_msginfos(FolderItem *item, MsgNumberList *numlist)
2089 {
2090         MsgInfoList *msglist = NULL;
2091         Folder *folder = item->folder;
2092         if (item->no_select)
2093                 return NULL;
2094         
2095         if (folder->klass->get_msginfos != NULL)
2096                 msglist = folder->klass->get_msginfos(folder, item, numlist);
2097         else {
2098                 MsgNumberList *elem;
2099
2100                 for (elem = numlist; elem != NULL; elem = g_slist_next(elem)) {
2101                         MsgInfo *msginfo;
2102                         guint num;
2103
2104                         num = GPOINTER_TO_INT(elem->data);
2105                         msginfo = folder->klass->get_msginfo(folder, item, num);
2106                         if (msginfo != NULL)
2107                                 msglist = g_slist_prepend(msglist, msginfo);
2108                 }               
2109         }
2110
2111         return msglist;
2112 }
2113
2114 static MsgInfo *get_msginfo(FolderItem *item, guint num)
2115 {
2116         MsgNumberList numlist;
2117         MsgInfoList *msglist;
2118         MsgInfo *msginfo = NULL;
2119
2120         numlist.data = GINT_TO_POINTER(num);
2121         numlist.next = NULL;
2122         msglist = get_msginfos(item, &numlist);
2123         if (msglist != NULL)
2124                 msginfo = procmsg_msginfo_new_ref(msglist->data);
2125         procmsg_msg_list_free(msglist);
2126
2127         return msginfo;
2128 }
2129
2130 gint folder_item_scan_full(FolderItem *item, gboolean filtering)
2131 {
2132         Folder *folder;
2133         GSList *folder_list = NULL, *cache_list = NULL;
2134         GSList *folder_list_cur, *cache_list_cur, *new_list = NULL;
2135         GSList *exists_list = NULL, *elem;
2136         GSList *newmsg_list = NULL;
2137         guint newcnt = 0, unreadcnt = 0, totalcnt = 0;
2138         guint markedcnt = 0, unreadmarkedcnt = 0;
2139         guint repliedcnt = 0, forwardedcnt = 0;
2140         guint lockedcnt = 0, ignoredcnt = 0, watchedcnt = 0;
2141
2142         guint cache_max_num, folder_max_num, cache_cur_num, folder_cur_num;
2143         gboolean update_flags = 0, old_uids_valid = FALSE;
2144         GHashTable *subject_table = NULL;
2145         
2146         cm_return_val_if_fail(item != NULL, -1);
2147         if (item->path == NULL) return -1;
2148
2149         folder = item->folder;
2150
2151         cm_return_val_if_fail(folder != NULL, -1);
2152         cm_return_val_if_fail(folder->klass->get_num_list != NULL, -1);
2153
2154         item->scanning = ITEM_SCANNING_WITH_FLAGS;
2155
2156         debug_print("Scanning folder %s for cache changes.\n", item->path ? item->path : "(null)");
2157         
2158         /* Get list of messages for folder and cache */
2159         if (folder->klass->get_num_list(item->folder, item, &folder_list, &old_uids_valid) < 0) {
2160                 debug_print("Error fetching list of message numbers\n");
2161                 item->scanning = ITEM_NOT_SCANNING;
2162                 return(-1);
2163         }
2164
2165         if(prefs_common.thread_by_subject) {
2166                 subject_table = g_hash_table_new(g_str_hash, g_str_equal);
2167         }
2168         
2169         if (old_uids_valid) {
2170                 if (!item->cache)
2171                         folder_item_read_cache(item);
2172                 cache_list = msgcache_get_msg_list(item->cache);
2173         } else {
2174                 if (item->cache)
2175                         msgcache_destroy(item->cache);
2176                 item->cache = msgcache_new();
2177                 item->cache_dirty = TRUE;
2178                 item->mark_dirty = TRUE;
2179                 item->tags_dirty = TRUE;
2180                 cache_list = NULL;
2181         }
2182
2183         /* Sort both lists */
2184         cache_list = g_slist_sort(cache_list, folder_sort_cache_list_by_msgnum);
2185         folder_list = g_slist_sort(folder_list, folder_sort_folder_list);
2186
2187         cache_list_cur = cache_list;
2188         folder_list_cur = folder_list;
2189
2190         if (cache_list_cur != NULL) {
2191                 GSList *cache_list_last;
2192         
2193                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
2194                 cache_list_last = g_slist_last(cache_list);
2195                 cache_max_num = ((MsgInfo *)cache_list_last->data)->msgnum;
2196         } else {
2197                 cache_cur_num = G_MAXINT;
2198                 cache_max_num = 0;
2199         }
2200
2201         if (folder_list_cur != NULL) {
2202                 GSList *folder_list_last;
2203         
2204                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
2205                 folder_list_last = g_slist_last(folder_list);
2206                 folder_max_num = GPOINTER_TO_INT(folder_list_last->data);
2207         } else {
2208                 folder_cur_num = G_MAXINT;
2209                 folder_max_num = 0;
2210         }
2211
2212         while ((cache_cur_num != G_MAXINT) || (folder_cur_num != G_MAXINT)) {
2213                 /*
2214                  *  Message only exists in the folder
2215                  *  Remember message for fetching
2216                  */
2217                 if (folder_cur_num < cache_cur_num) {
2218                         gboolean add = FALSE;
2219
2220                         switch(FOLDER_TYPE(folder)) {
2221                                 case F_NEWS:
2222                                         if (folder_cur_num < cache_max_num)
2223                                                 break;
2224                                         
2225                                         if (folder->account->max_articles == 0) {
2226                                                 add = TRUE;
2227                                         }
2228
2229                                         if (folder_max_num <= folder->account->max_articles) {
2230                                                 add = TRUE;
2231                                         } else if (folder_cur_num > (folder_max_num - folder->account->max_articles)) {
2232                                                 add = TRUE;
2233                                         }
2234                                         break;
2235                                 default:
2236                                         add = TRUE;
2237                                         break;
2238                         }
2239                         
2240                         if (add) {
2241                                 new_list = g_slist_prepend(new_list, GINT_TO_POINTER(folder_cur_num));
2242                                 debug_print("Remembered message %d for fetching\n", folder_cur_num);
2243                         }
2244
2245                         /* Move to next folder number */
2246                         if (folder_list_cur)
2247                                 folder_list_cur = folder_list_cur->next;
2248
2249                         if (folder_list_cur != NULL)
2250                                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
2251                         else
2252                                 folder_cur_num = G_MAXINT;
2253
2254                         continue;
2255                 }
2256
2257                 /*
2258                  *  Message only exists in the cache
2259                  *  Remove the message from the cache
2260                  */
2261                 if (cache_cur_num < folder_cur_num) {
2262                         msgcache_remove_msg(item->cache, cache_cur_num);
2263                         debug_print("Removed message %d from cache.\n", cache_cur_num);
2264
2265                         /* Move to next cache number */
2266                         if (cache_list_cur)
2267                                 cache_list_cur = cache_list_cur->next;
2268
2269                         if (cache_list_cur != NULL)
2270                                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
2271                         else
2272                                 cache_cur_num = G_MAXINT;
2273
2274                         update_flags |= F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT;
2275
2276                         continue;
2277                 }
2278
2279                 /*
2280                  *  Message number exists in folder and cache!
2281                  *  Check if the message has been modified
2282                  */
2283                 if (cache_cur_num == folder_cur_num) {
2284                         MsgInfo *msginfo;
2285
2286                         msginfo = msgcache_get_msg(item->cache, folder_cur_num);
2287                         if (msginfo && folder->klass->is_msg_changed && folder->klass->is_msg_changed(folder, item, msginfo)) {
2288                                 msgcache_remove_msg(item->cache, msginfo->msgnum);
2289                                 new_list = g_slist_prepend(new_list, GINT_TO_POINTER(msginfo->msgnum));
2290                                 procmsg_msginfo_free(msginfo);
2291
2292                                 debug_print("Remembering message %d to update...\n", folder_cur_num);
2293                         } else if (msginfo) {
2294                                 exists_list = g_slist_prepend(exists_list, msginfo);
2295
2296                                 if(prefs_common.thread_by_subject &&
2297                                         MSG_IS_IGNORE_THREAD(msginfo->flags) &&
2298                                         !subject_table_lookup(subject_table, msginfo->subject)) {
2299                                         subject_table_insert(subject_table, msginfo->subject, msginfo);
2300                                 }
2301                         }
2302                         
2303                         /* Move to next folder and cache number */
2304                         if (cache_list_cur)
2305                                 cache_list_cur = cache_list_cur->next;
2306                         
2307                         if (folder_list_cur)
2308                                 folder_list_cur = folder_list_cur->next;
2309
2310                         if (cache_list_cur != NULL)
2311                                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
2312                         else
2313                                 cache_cur_num = G_MAXINT;
2314
2315                         if (folder_list_cur != NULL)
2316                                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
2317                         else
2318                                 folder_cur_num = G_MAXINT;
2319
2320                         continue;
2321                 }
2322         }
2323         
2324         for(cache_list_cur = cache_list; cache_list_cur != NULL; cache_list_cur = g_slist_next(cache_list_cur))
2325                 procmsg_msginfo_free((MsgInfo *) cache_list_cur->data);
2326
2327         g_slist_free(cache_list);
2328         g_slist_free(folder_list);
2329
2330         if (new_list != NULL) {
2331                 GSList *tmp_list = NULL;
2332                 newmsg_list = get_msginfos(item, new_list);
2333                 g_slist_free(new_list);
2334                 tmp_list = g_slist_concat(g_slist_copy(exists_list), g_slist_copy(newmsg_list));
2335                 syncronize_flags(item, tmp_list);
2336                 g_slist_free(tmp_list);
2337         } else {
2338                 syncronize_flags(item, exists_list);
2339         }
2340
2341         folder_item_update_freeze();
2342         
2343         item->scanning = ITEM_SCANNING;
2344
2345         if (newmsg_list != NULL) {
2346                 GSList *elem, *to_filter = NULL;
2347                 gboolean do_filter = (filtering == TRUE) &&
2348                                         (item->stype == F_INBOX) &&
2349                                         (item->folder->account != NULL) && 
2350                                         (item->folder->account->filter_on_recv);
2351                 
2352                 for (elem = newmsg_list; elem != NULL; elem = g_slist_next(elem)) {
2353                         MsgInfo *msginfo = (MsgInfo *) elem->data;
2354
2355                         msgcache_add_msg(item->cache, msginfo);
2356                         if (!do_filter) {
2357                                 exists_list = g_slist_prepend(exists_list, msginfo);
2358
2359                                 if(prefs_common.thread_by_subject &&
2360                                         MSG_IS_IGNORE_THREAD(msginfo->flags) &&
2361                                         !subject_table_lookup(subject_table, msginfo->subject)) {
2362                                         subject_table_insert(subject_table, msginfo->subject, msginfo);
2363                                 }                       
2364                         }
2365                 }
2366
2367                 if (do_filter) {
2368                         GSList *unfiltered;
2369                         
2370                         folder_item_set_batch(item, TRUE);
2371                         procmsg_msglist_filter(newmsg_list, item->folder->account, 
2372                                         &to_filter, &unfiltered, 
2373                                         TRUE);
2374                         folder_item_set_batch(item, FALSE);
2375                         
2376                         filtering_move_and_copy_msgs(newmsg_list);
2377                         if (to_filter != NULL) {
2378                                 for (elem = to_filter; elem; elem = g_slist_next(elem)) {
2379                                         MsgInfo *msginfo = (MsgInfo *)elem->data;
2380                                         procmsg_msginfo_free(msginfo);
2381                                 }
2382                                 g_slist_free(to_filter);
2383                         }
2384                         if (unfiltered != NULL) {
2385                                 for (elem = unfiltered; elem; elem = g_slist_next(elem)) {
2386                                         MsgInfo *msginfo = (MsgInfo *)elem->data;
2387                                         exists_list = g_slist_prepend(exists_list, msginfo);
2388
2389                                         if(prefs_common.thread_by_subject &&
2390                                                 MSG_IS_IGNORE_THREAD(msginfo->flags) &&
2391                                                 !subject_table_lookup(subject_table, msginfo->subject)) {
2392                                                 subject_table_insert(subject_table, msginfo->subject, msginfo);
2393                                         }
2394                                 }
2395                                 g_slist_free(unfiltered);
2396                         }
2397                         if (prefs_common.real_time_sync)
2398                                 folder_item_synchronise(item);
2399                 } else {
2400                         if (prefs_common.real_time_sync)
2401                                 folder_item_synchronise(item);
2402                 }
2403
2404                 g_slist_free(newmsg_list);
2405
2406                 update_flags |= F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT;
2407         }
2408
2409         folder_item_set_batch(item, TRUE);
2410         for (elem = exists_list; elem != NULL; elem = g_slist_next(elem)) {
2411                 MsgInfo *msginfo, *parent_msginfo;
2412
2413                 msginfo = elem->data;
2414                 if (MSG_IS_IGNORE_THREAD(msginfo->flags) && (MSG_IS_NEW(msginfo->flags) || MSG_IS_UNREAD(msginfo->flags)))
2415                         procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
2416                 if (!MSG_IS_IGNORE_THREAD(msginfo->flags) && procmsg_msg_has_flagged_parent(msginfo, MSG_IGNORE_THREAD)) {
2417                         procmsg_msginfo_change_flags(msginfo, MSG_IGNORE_THREAD, 0, MSG_NEW | MSG_UNREAD, 0);
2418                 }
2419                 if (!MSG_IS_WATCH_THREAD(msginfo->flags) && procmsg_msg_has_flagged_parent(msginfo, MSG_WATCH_THREAD)) {
2420                         procmsg_msginfo_set_flags(msginfo, MSG_WATCH_THREAD, 0);
2421                 }
2422                 if(prefs_common.thread_by_subject && !msginfo->inreplyto &&
2423                         !msginfo->references && !MSG_IS_IGNORE_THREAD(msginfo->flags) &&
2424                         (parent_msginfo = subject_table_lookup(subject_table, msginfo->subject)))
2425                 {
2426                         if(MSG_IS_IGNORE_THREAD(parent_msginfo->flags)) {
2427                                 procmsg_msginfo_change_flags(msginfo, MSG_IGNORE_THREAD, 0,
2428                                                 MSG_NEW | MSG_UNREAD, 0);
2429                         }
2430                 }
2431                 if ((folder_has_parent_of_type(item, F_OUTBOX) ||
2432                      folder_has_parent_of_type(item, F_QUEUE)  ||
2433                      folder_has_parent_of_type(item, F_DRAFT)  ||
2434                      folder_has_parent_of_type(item, F_TRASH)) &&
2435                     (MSG_IS_NEW(msginfo->flags) || MSG_IS_UNREAD(msginfo->flags)))
2436                         procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
2437                 if (MSG_IS_NEW(msginfo->flags))
2438                         newcnt++;
2439                 if (MSG_IS_UNREAD(msginfo->flags))
2440                         unreadcnt++;
2441                 if (MSG_IS_UNREAD(msginfo->flags) && procmsg_msg_has_marked_parent(msginfo))
2442                         unreadmarkedcnt++;
2443                 if (MSG_IS_MARKED(msginfo->flags))
2444                         markedcnt++;
2445                 if (MSG_IS_REPLIED(msginfo->flags))
2446                         repliedcnt++;
2447                 if (MSG_IS_FORWARDED(msginfo->flags))
2448                         forwardedcnt++;
2449                 if (MSG_IS_LOCKED(msginfo->flags))
2450                         lockedcnt++;
2451                 if (MSG_IS_IGNORE_THREAD(msginfo->flags))
2452                         ignoredcnt++;
2453                 if (MSG_IS_WATCH_THREAD(msginfo->flags))
2454                         watchedcnt++;
2455
2456                 totalcnt++;
2457
2458                 procmsg_msginfo_free(msginfo);
2459         }
2460         folder_item_set_batch(item, FALSE);
2461         g_slist_free(exists_list);
2462         
2463         if(prefs_common.thread_by_subject) {
2464                 g_hash_table_destroy(subject_table);
2465         }
2466         
2467         if (item->new_msgs != newcnt || item->unread_msgs != unreadcnt
2468         ||  item->total_msgs != totalcnt || item->marked_msgs != markedcnt
2469         ||  item->unreadmarked_msgs != unreadmarkedcnt
2470         ||  item->replied_msgs != repliedcnt || item->forwarded_msgs != forwardedcnt
2471         ||  item->locked_msgs != lockedcnt || item->ignored_msgs != ignoredcnt
2472         ||  item->watched_msgs != watchedcnt) {
2473                 update_flags |= F_ITEM_UPDATE_CONTENT;
2474         }
2475
2476         item->new_msgs = newcnt;
2477         item->unread_msgs = unreadcnt;
2478         item->total_msgs = totalcnt;
2479         item->unreadmarked_msgs = unreadmarkedcnt;
2480         item->marked_msgs = markedcnt;
2481         item->replied_msgs = repliedcnt;
2482         item->forwarded_msgs = forwardedcnt;
2483         item->locked_msgs = lockedcnt;
2484         item->ignored_msgs = ignoredcnt;
2485         item->watched_msgs = watchedcnt;
2486
2487         update_flags |= F_ITEM_UPDATE_MSGCNT;
2488
2489         folder_item_update(item, update_flags);
2490         folder_item_update_thaw();
2491         
2492         item->scanning = ITEM_NOT_SCANNING;
2493
2494         return 0;
2495 }
2496
2497 gint folder_item_scan(FolderItem *item)
2498 {
2499         return folder_item_scan_full(item, TRUE);
2500 }
2501
2502 static void folder_count_total_cache_memusage(FolderItem *item, gpointer data)
2503 {
2504         gint *memusage = (gint *)data;
2505
2506         if (item->cache == NULL)
2507                 return;
2508         
2509         *memusage += msgcache_get_memory_usage(item->cache);
2510 }
2511
2512 static gint folder_cache_time_compare_func(gconstpointer a, gconstpointer b)
2513 {
2514         FolderItem *fa = (FolderItem *)a;
2515         FolderItem *fb = (FolderItem *)b;
2516         
2517         return (gint) (msgcache_get_last_access_time(fa->cache) - msgcache_get_last_access_time(fb->cache));
2518 }
2519
2520 static void folder_find_expired_caches(FolderItem *item, gpointer data)
2521 {
2522         GSList **folder_item_list = (GSList **)data;
2523         gint difftime, expiretime;
2524         
2525         if (item->cache == NULL)
2526                 return;
2527
2528         if (item->opened > 0)
2529                 return;
2530
2531         difftime = (gint) (time(NULL) - msgcache_get_last_access_time(item->cache));
2532         expiretime = prefs_common.cache_min_keep_time * 60;
2533         debug_print("Cache unused time: %d (Expire time: %d)\n", difftime, expiretime);
2534
2535         if (difftime > expiretime && !item->opened && !item->processing_pending) {
2536                 *folder_item_list = g_slist_insert_sorted(*folder_item_list, item, folder_cache_time_compare_func);
2537         }
2538 }
2539
2540 gboolean folder_item_free_cache(FolderItem *item, gboolean force)
2541 {
2542         cm_return_val_if_fail(item != NULL, TRUE);
2543         
2544         if (item->cache == NULL)
2545                 return TRUE;
2546         
2547         if (item->opened > 0 && !force)
2548                 return FALSE;
2549
2550         folder_item_write_cache(item);
2551         msgcache_destroy(item->cache);
2552         item->cache = NULL;
2553         return TRUE;
2554 }
2555
2556 void folder_clean_cache_memory_force(void)
2557 {
2558         int old_cache_max_mem_usage = prefs_common.cache_max_mem_usage;
2559         int old_cache_min_keep_time = prefs_common.cache_min_keep_time;
2560
2561         prefs_common.cache_max_mem_usage = 0;
2562         prefs_common.cache_min_keep_time = 0;
2563
2564         folder_clean_cache_memory(NULL);
2565
2566         prefs_common.cache_max_mem_usage = old_cache_max_mem_usage;
2567         prefs_common.cache_min_keep_time = old_cache_min_keep_time;
2568 }
2569
2570 void folder_clean_cache_memory(FolderItem *protected_item)
2571 {
2572         gint memusage = 0;
2573
2574         folder_func_to_all_folders(folder_count_total_cache_memusage, &memusage);       
2575         debug_print("Total cache memory usage: %d\n", memusage);
2576         
2577         if (memusage > (prefs_common.cache_max_mem_usage * 1024)) {
2578                 GSList *folder_item_list = NULL, *listitem;
2579                 
2580                 debug_print("Trying to free cache memory\n");
2581
2582                 folder_func_to_all_folders(folder_find_expired_caches, &folder_item_list);      
2583                 listitem = folder_item_list;
2584                 while((listitem != NULL) && (memusage > (prefs_common.cache_max_mem_usage * 1024))) {
2585                         FolderItem *item = (FolderItem *)(listitem->data);
2586                         gint cache_size = 0;
2587                         if (item == protected_item) {
2588                                 listitem = listitem->next;
2589                                 continue;
2590                         }
2591                         debug_print("Freeing cache memory for %s\n", item->path ? item->path : item->name);
2592                         cache_size = msgcache_get_memory_usage(item->cache);
2593                         if (folder_item_free_cache(item, FALSE))
2594                                 memusage -= cache_size;
2595
2596                         listitem = listitem->next;
2597                 }
2598                 g_slist_free(folder_item_list);
2599         }
2600 }
2601
2602 static void folder_item_remove_cached_msg(FolderItem *item, MsgInfo *msginfo)
2603 {
2604         Folder *folder = item->folder;
2605
2606         cm_return_if_fail(folder != NULL);
2607
2608         if (folder->klass->remove_cached_msg == NULL)
2609                 return;
2610         
2611         folder->klass->remove_cached_msg(folder, item, msginfo);
2612 }
2613
2614 static void folder_item_clean_local_files(FolderItem *item, gint days)
2615 {
2616         cm_return_if_fail(item != NULL);
2617         cm_return_if_fail(item->folder != NULL);
2618
2619         if (FOLDER_TYPE(item->folder) == F_IMAP ||
2620             FOLDER_TYPE(item->folder) == F_NEWS) {
2621                 GSList *msglist = folder_item_get_msg_list(item);
2622                 GSList *cur;
2623                 time_t t = time(NULL);
2624                 for (cur = msglist; cur; cur = cur->next) {
2625                         MsgInfo *msginfo = (MsgInfo *)cur->data;
2626                         gint age = (t - msginfo->date_t) / (60*60*24);
2627                         if (age > days)
2628                                 folder_item_remove_cached_msg(item, msginfo);
2629                 }
2630                 procmsg_msg_list_free(msglist);
2631         }
2632 }
2633
2634 static void folder_item_read_cache(FolderItem *item)
2635 {
2636         gchar *cache_file, *mark_file, *tags_file;
2637         START_TIMING("");
2638         cm_return_if_fail(item != NULL);
2639
2640         if (item->path != NULL) {
2641                 cache_file = folder_item_get_cache_file(item);
2642                 mark_file = folder_item_get_mark_file(item);
2643                 tags_file = folder_item_get_tags_file(item);
2644                 item->cache = msgcache_read_cache(item, cache_file);
2645                 item->cache_dirty = FALSE;
2646                 item->mark_dirty = FALSE;
2647                 item->tags_dirty = FALSE;
2648                 if (!item->cache) {
2649                         MsgInfoList *list, *cur;
2650                         guint newcnt = 0, unreadcnt = 0;
2651                         guint markedcnt = 0, unreadmarkedcnt = 0;
2652                         guint repliedcnt = 0, forwardedcnt = 0;
2653                         guint lockedcnt = 0, ignoredcnt = 0;
2654                         guint watchedcnt = 0;
2655                         MsgInfo *msginfo;
2656
2657                         item->cache = msgcache_new();
2658                         item->cache_dirty = TRUE;
2659                         item->mark_dirty = TRUE;
2660                         item->tags_dirty = TRUE;
2661                         folder_item_scan_full(item, TRUE);
2662
2663                         msgcache_read_mark(item->cache, mark_file);
2664
2665                         list = msgcache_get_msg_list(item->cache);
2666                         for (cur = list; cur != NULL; cur = g_slist_next(cur)) {
2667                                 msginfo = cur->data;
2668
2669                                 if (MSG_IS_NEW(msginfo->flags))
2670                                         newcnt++;
2671                                 if (MSG_IS_UNREAD(msginfo->flags))
2672                                         unreadcnt++;
2673                                 if (MSG_IS_UNREAD(msginfo->flags) && procmsg_msg_has_marked_parent(msginfo))
2674                                         unreadmarkedcnt++;
2675                                 if (MSG_IS_MARKED(msginfo->flags))
2676                                         markedcnt++;
2677                                 if (MSG_IS_REPLIED(msginfo->flags))
2678                                         repliedcnt++;
2679                                 if (MSG_IS_FORWARDED(msginfo->flags))
2680                                         forwardedcnt++;
2681                                 if (MSG_IS_LOCKED(msginfo->flags))
2682                                         lockedcnt++;
2683                                 if (MSG_IS_IGNORE_THREAD(msginfo->flags))
2684                                         ignoredcnt++;
2685                                 if (MSG_IS_WATCH_THREAD(msginfo->flags))
2686                                         watchedcnt++;
2687                                 procmsg_msginfo_unset_flags(msginfo, MSG_FULLY_CACHED, 0);
2688                         }
2689                         item->new_msgs = newcnt;
2690                         item->unread_msgs = unreadcnt;
2691                         item->unreadmarked_msgs = unreadmarkedcnt;
2692                         item->marked_msgs = markedcnt;
2693                         item->replied_msgs = repliedcnt;
2694                         item->forwarded_msgs = forwardedcnt;
2695                         item->locked_msgs = lockedcnt;
2696                         item->ignored_msgs = ignoredcnt;
2697                         item->watched_msgs = watchedcnt;
2698                         procmsg_msg_list_free(list);
2699                 } else
2700                         msgcache_read_mark(item->cache, mark_file);
2701
2702                 msgcache_read_tags(item->cache, tags_file);
2703
2704                 g_free(cache_file);
2705                 g_free(mark_file);
2706                 g_free(tags_file);
2707         } else {
2708                 item->cache = msgcache_new();
2709                 item->cache_dirty = TRUE;
2710                 item->mark_dirty = TRUE;
2711                 item->tags_dirty = TRUE;
2712         }
2713
2714         END_TIMING();
2715         folder_clean_cache_memory(item);
2716 }
2717
2718 void folder_item_write_cache(FolderItem *item)
2719 {
2720         gchar *cache_file = NULL, *mark_file = NULL, *tags_file = NULL;
2721         FolderItemPrefs *prefs;
2722         gint filemode = 0;
2723         gchar *id;
2724         time_t last_mtime = (time_t)0;
2725         gboolean need_scan = FALSE;
2726         
2727         if (!item || !item->path || !item->cache)
2728                 return;
2729
2730         last_mtime = item->mtime;
2731         if (item->folder->klass->set_mtime) {
2732                 if (item->folder->klass->scan_required)
2733                         need_scan = item->folder->klass->scan_required(item->folder, item);
2734                 else
2735                         need_scan = TRUE;
2736         }
2737
2738         id = folder_item_get_identifier(item);
2739         debug_print("Save cache for folder %s\n", id);
2740         g_free(id);
2741
2742         if (item->cache_dirty)
2743                 cache_file = folder_item_get_cache_file(item);
2744         if (item->cache_dirty || item->mark_dirty)
2745                 mark_file = folder_item_get_mark_file(item);
2746         if (item->cache_dirty || item->tags_dirty)
2747                 tags_file = folder_item_get_tags_file(item);
2748         if (msgcache_write(cache_file, mark_file, tags_file, item->cache) < 0) {
2749                 prefs = item->prefs;
2750                 if (prefs && prefs->enable_folder_chmod && prefs->folder_chmod) {
2751                         /* for cache file */
2752                         filemode = prefs->folder_chmod;
2753                         if (filemode & S_IRGRP) filemode |= S_IWGRP;
2754                         if (filemode & S_IROTH) filemode |= S_IWOTH;
2755                         chmod(cache_file, filemode);
2756                 }
2757         } else {
2758                 item->cache_dirty = FALSE;
2759                 item->mark_dirty = FALSE;
2760                 item->tags_dirty = FALSE;
2761         }
2762
2763         if (!need_scan && item->folder->klass->set_mtime) {
2764                 if (item->mtime == last_mtime) {
2765                         item->folder->klass->set_mtime(item->folder, item);
2766                 }
2767         }
2768
2769         g_free(cache_file);
2770         g_free(mark_file);
2771         g_free(tags_file);
2772 }
2773
2774 MsgInfo *folder_item_get_msginfo(FolderItem *item, gint num)
2775 {
2776         Folder *folder;
2777         MsgInfo *msginfo = NULL;
2778         
2779         cm_return_val_if_fail(item != NULL, NULL);
2780         if (item->no_select)
2781                 return NULL;
2782         folder = item->folder;
2783         if (!item->cache)
2784                 folder_item_read_cache(item);
2785         
2786         if ((msginfo = msgcache_get_msg(item->cache, num)) != NULL)
2787                 return msginfo;
2788         
2789         msginfo = get_msginfo(item, num);
2790         if (msginfo != NULL) {
2791                 msgcache_add_msg(item->cache, msginfo);
2792                 return msginfo;
2793         }
2794         
2795         return NULL;
2796 }
2797
2798 MsgInfo *folder_item_get_msginfo_by_msgid(FolderItem *item, const gchar *msgid)
2799 {
2800         Folder *folder;
2801         MsgInfo *msginfo;
2802         
2803         cm_return_val_if_fail(item != NULL, NULL);
2804         cm_return_val_if_fail(msgid != NULL, NULL);
2805         if (item->no_select)
2806                 return FALSE;
2807         
2808         folder = item->folder;
2809         if (!item->cache)
2810                 folder_item_read_cache(item);
2811         
2812         if ((msginfo = msgcache_get_msg_by_id(item->cache, msgid)) != NULL)
2813                 return msginfo;
2814
2815         return NULL;
2816 }
2817
2818 GSList *folder_item_get_msg_list(FolderItem *item)
2819 {
2820         cm_return_val_if_fail(item != NULL, NULL);
2821         if (item->no_select)
2822                 return FALSE;
2823         
2824         if (item->cache == 0)
2825                 folder_item_read_cache(item);
2826
2827         cm_return_val_if_fail(item->cache != NULL, NULL);
2828         
2829         return msgcache_get_msg_list(item->cache);
2830 }
2831
2832 static void msginfo_set_mime_flags(GNode *node, gpointer data)
2833 {
2834         MsgInfo *msginfo = data;
2835         MimeInfo *mimeinfo = node->data;
2836         
2837         if (mimeinfo->disposition == DISPOSITIONTYPE_ATTACHMENT
2838          && (!mimeinfo->subtype || (strcmp(mimeinfo->subtype, "pgp-signature") &&
2839              strcmp(mimeinfo->subtype, "x-pkcs7-signature") &&
2840              strcmp(mimeinfo->subtype, "pkcs7-signature")))) {
2841                 procmsg_msginfo_set_flags(msginfo, 0, MSG_HAS_ATTACHMENT);
2842         } else if (mimeinfo->disposition == DISPOSITIONTYPE_UNKNOWN && 
2843                  mimeinfo->id == NULL &&
2844                  mimeinfo->type != MIMETYPE_TEXT &&
2845                  mimeinfo->type != MIMETYPE_MULTIPART) {
2846                 if (!mimeinfo->subtype 
2847                 || (strcmp(mimeinfo->subtype, "pgp-signature") && 
2848                     strcmp(mimeinfo->subtype, "x-pkcs7-signature") &&
2849                     strcmp(mimeinfo->subtype, "pkcs7-signature")))
2850                         procmsg_msginfo_set_flags(msginfo, 0, MSG_HAS_ATTACHMENT);
2851         } else if (mimeinfo->disposition == DISPOSITIONTYPE_INLINE &&
2852                  mimeinfo->id == NULL &&
2853                 (strcmp(mimeinfo->subtype, "pgp-signature") &&
2854                  strcmp(mimeinfo->subtype, "x-pkcs7-signature") &&
2855                  strcmp(mimeinfo->subtype, "pkcs7-signature")) && 
2856                 (procmime_mimeinfo_get_parameter(mimeinfo, "name") != NULL ||
2857                  procmime_mimeinfo_get_parameter(mimeinfo, "filename") != NULL)) {
2858                 procmsg_msginfo_set_flags(msginfo, 0, MSG_HAS_ATTACHMENT);
2859         } 
2860
2861         /* don't descend below top level message for signed and encrypted info */
2862         if (mimeinfo->type == MIMETYPE_MESSAGE)
2863                 return;
2864
2865         if (privacy_mimeinfo_is_signed(mimeinfo)) {
2866                 procmsg_msginfo_set_flags(msginfo, 0, MSG_SIGNED);
2867         }
2868
2869         if (privacy_mimeinfo_is_encrypted(mimeinfo)) {
2870                 procmsg_msginfo_set_flags(msginfo, 0, MSG_ENCRYPTED);
2871         } else {
2872                 /* searching inside encrypted parts doesn't really make sense */
2873                 g_node_children_foreach(mimeinfo->node, G_TRAVERSE_ALL, msginfo_set_mime_flags, msginfo);
2874         }
2875 }
2876
2877 gchar *folder_item_fetch_msg(FolderItem *item, gint num)
2878 {
2879         Folder *folder;
2880         gchar *msgfile;
2881         MsgInfo *msginfo;
2882
2883         cm_return_val_if_fail(item != NULL, NULL);
2884
2885         folder = item->folder;
2886
2887         cm_return_val_if_fail(folder->klass->fetch_msg != NULL, NULL);
2888         if (item->no_select)
2889                 return NULL;
2890
2891         msgfile = folder->klass->fetch_msg(folder, item, num);
2892
2893         if (msgfile != NULL) {
2894                 msginfo = folder_item_get_msginfo(item, num);
2895                 if ((msginfo != NULL) && !MSG_IS_SCANNED(msginfo->flags)) {
2896                         MimeInfo *mimeinfo;
2897
2898                         if (!folder_has_parent_of_type(msginfo->folder, F_QUEUE) && 
2899                             !folder_has_parent_of_type(msginfo->folder, F_DRAFT))
2900                                 mimeinfo = procmime_scan_file(msgfile);
2901                         else
2902                                 mimeinfo = procmime_scan_queue_file(msgfile);
2903                         /* check for attachments */
2904                         if (mimeinfo != NULL) { 
2905                                 g_node_children_foreach(mimeinfo->node, G_TRAVERSE_ALL, msginfo_set_mime_flags, msginfo);
2906                                 procmime_mimeinfo_free_all(mimeinfo);
2907
2908                                 procmsg_msginfo_set_flags(msginfo, 0, MSG_SCANNED);
2909                         }
2910                 }
2911                 procmsg_msginfo_free(msginfo);
2912         }
2913
2914         return msgfile;
2915 }
2916
2917 gchar *folder_item_fetch_msg_full(FolderItem *item, gint num, gboolean headers,
2918                                   gboolean body)
2919 {
2920         Folder *folder;
2921         gchar *msgfile;
2922         MsgInfo *msginfo;
2923
2924         cm_return_val_if_fail(item != NULL, NULL);
2925         if (item->no_select)
2926                 return NULL;
2927         
2928         folder = item->folder;
2929
2930         if (folder->klass->fetch_msg_full == NULL)
2931                 return folder_item_fetch_msg(item, num);
2932
2933         if (item->prefs->offlinesync && prefs_common.real_time_sync)
2934                 msgfile = folder->klass->fetch_msg_full(folder, item, num, 
2935                                                 TRUE, TRUE);
2936         else
2937                 msgfile = folder->klass->fetch_msg_full(folder, item, num, 
2938                                                 headers, body);
2939
2940         if (msgfile != NULL) {
2941                 msginfo = folder_item_get_msginfo(item, num);
2942                 if ((msginfo != NULL) && !MSG_IS_SCANNED(msginfo->flags)) {
2943                         MimeInfo *mimeinfo;
2944
2945                         if (!folder_has_parent_of_type(msginfo->folder, F_QUEUE) &&
2946                             !folder_has_parent_of_type(msginfo->folder, F_DRAFT))
2947                                 mimeinfo = procmime_scan_file(msgfile);
2948                         else
2949                                 mimeinfo = procmime_scan_queue_file(msgfile);
2950                         /* check for attachments */
2951                         if (mimeinfo != NULL) { 
2952                                 g_node_children_foreach(mimeinfo->node, G_TRAVERSE_ALL, msginfo_set_mime_flags, msginfo);
2953                                 procmime_mimeinfo_free_all(mimeinfo);
2954
2955                                 procmsg_msginfo_set_flags(msginfo, 0, MSG_SCANNED);
2956                         }
2957                 }
2958                 procmsg_msginfo_free(msginfo);
2959         }
2960
2961         return msgfile;
2962 }
2963
2964
2965 static gint folder_item_get_msg_num_by_file(FolderItem *dest, const gchar *file)
2966 {
2967         static HeaderEntry hentry[] = {{"Message-ID:",  NULL, TRUE},
2968                                        {NULL,           NULL, FALSE}};
2969         FILE *fp;
2970         MsgInfo *msginfo;
2971         gint msgnum = 0;
2972         gchar buf[BUFFSIZE];
2973
2974         if ((fp = g_fopen(file, "rb")) == NULL)
2975                 return 0;
2976
2977         if ((folder_has_parent_of_type(dest, F_QUEUE)) || 
2978             (folder_has_parent_of_type(dest, F_DRAFT)))
2979                 while (fgets(buf, sizeof(buf), fp) != NULL) {
2980                         /* new way */
2981                         if ((!strncmp(buf, "X-Claws-End-Special-Headers: 1",
2982                                 strlen("X-Claws-End-Special-Headers:"))) ||
2983                             (!strncmp(buf, "X-Sylpheed-End-Special-Headers: 1",
2984                                 strlen("X-Sylpheed-End-Special-Headers:"))))
2985                                 break;
2986                         /* old way */
2987                         if (buf[0] == '\r' || buf[0] == '\n') break;
2988                         /* from other mailers */
2989                         if (!strncmp(buf, "Date: ", 6)
2990                         ||  !strncmp(buf, "To: ", 4)
2991                         ||  !strncmp(buf, "From: ", 6)
2992                         ||  !strncmp(buf, "Subject: ", 9)) {
2993                                 rewind(fp);
2994                                 break;
2995                         }
2996                 }
2997
2998         procheader_get_header_fields(fp, hentry);
2999         debug_print("looking for %s\n", hentry[0].body);
3000         if (hentry[0].body) {
3001                 extract_parenthesis(hentry[0].body, '<', '>');
3002                 remove_space(hentry[0].body);
3003                 if ((msginfo = msgcache_get_msg_by_id(dest->cache, hentry[0].body)) != NULL) {
3004                         msgnum = msginfo->msgnum;
3005                         procmsg_msginfo_free(msginfo);
3006
3007                         debug_print("found message as uid %d\n", msgnum);
3008                 }
3009         }
3010         
3011         g_free(hentry[0].body);
3012         hentry[0].body = NULL;
3013         fclose(fp);
3014
3015         return msgnum;
3016 }
3017
3018 static void copy_msginfo_flags(MsgInfo *source, MsgInfo *dest)
3019 {
3020         MsgPermFlags perm_flags = 0;
3021         MsgTmpFlags tmp_flags = 0;
3022
3023         /* create new flags */
3024         if (source != NULL) {
3025                 /* copy original flags */
3026                 perm_flags = source->flags.perm_flags;
3027                 tmp_flags = source->flags.tmp_flags;
3028         } else {
3029                 perm_flags = dest->flags.perm_flags;
3030                 tmp_flags = dest->flags.tmp_flags;
3031         }
3032
3033         /* remove new, unread and deleted in special folders */
3034         if (folder_has_parent_of_type(dest->folder, F_OUTBOX) || 
3035             folder_has_parent_of_type(dest->folder, F_QUEUE) || 
3036             folder_has_parent_of_type(dest->folder, F_DRAFT) || 
3037             folder_has_parent_of_type(dest->folder, F_TRASH))
3038                 perm_flags &= ~(MSG_NEW | MSG_UNREAD | MSG_DELETED);
3039
3040         /* set ignore flag of ignored parent exists */
3041         if (procmsg_msg_has_flagged_parent(dest, MSG_IGNORE_THREAD))
3042                 perm_flags |= MSG_IGNORE_THREAD;
3043
3044         /* unset FULLY_CACHED flags */
3045         perm_flags &= ~MSG_FULLY_CACHED;
3046
3047         if (procmsg_msg_has_flagged_parent(dest, MSG_WATCH_THREAD))
3048                 perm_flags |= MSG_WATCH_THREAD;
3049
3050         /* Unset tmp flags that should not be copied */
3051         tmp_flags &= ~(MSG_MOVE | MSG_COPY | MSG_MOVE_DONE);
3052
3053         /* unset flags that are set but should not */
3054         /* and set new flags */
3055         procmsg_msginfo_change_flags(dest,
3056                                   ~dest->flags.perm_flags & perm_flags,
3057                                   ~dest->flags.tmp_flags  & tmp_flags,
3058                                    dest->flags.perm_flags & ~perm_flags,
3059                                    dest->flags.tmp_flags  & ~tmp_flags);
3060         
3061         if (source && source->tags) {
3062                 g_slist_free(dest->tags);
3063                 dest->tags = g_slist_copy(source->tags);
3064                 folder_item_commit_tags(dest->folder, dest, dest->tags, NULL);
3065         }
3066 }
3067
3068 static void add_msginfo_to_cache(FolderItem *item, MsgInfo *newmsginfo, MsgInfo *flagsource)
3069 {
3070         /* update folder stats */
3071         if (MSG_IS_NEW(newmsginfo->flags))
3072                 item->new_msgs++;
3073         if (MSG_IS_UNREAD(newmsginfo->flags))
3074                 item->unread_msgs++;
3075         if (MSG_IS_UNREAD(newmsginfo->flags) && procmsg_msg_has_marked_parent(newmsginfo))
3076                 item->unreadmarked_msgs++;
3077         if (MSG_IS_MARKED(newmsginfo->flags))
3078                 item->marked_msgs++;
3079         if (MSG_IS_REPLIED(newmsginfo->flags))
3080                 item->replied_msgs++;
3081         if (MSG_IS_FORWARDED(newmsginfo->flags))
3082                 item->forwarded_msgs++;
3083         if (MSG_IS_LOCKED(newmsginfo->flags))
3084                 item->locked_msgs++;
3085         if (MSG_IS_IGNORE_THREAD(newmsginfo->flags))
3086                 item->ignored_msgs++;
3087         if (MSG_IS_WATCH_THREAD(newmsginfo->flags))
3088                 item->watched_msgs++;
3089         item->total_msgs++;
3090
3091         folder_item_update_freeze();
3092
3093         if (!item->cache)
3094                 folder_item_read_cache(item);
3095
3096         msgcache_add_msg(item->cache, newmsginfo);
3097         copy_msginfo_flags(flagsource, newmsginfo);
3098         folder_item_update_with_msg(item,  F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT | F_ITEM_UPDATE_ADDMSG, newmsginfo);
3099         folder_item_update_thaw();
3100 }
3101
3102 static void remove_msginfo_from_cache(FolderItem *item, MsgInfo *msginfo)
3103 {
3104         MsgInfoUpdate msginfo_update;
3105
3106         if (!item->cache)
3107                 folder_item_read_cache(item);
3108
3109         if (MSG_IS_NEW(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
3110                 msginfo->folder->new_msgs--;
3111         if (MSG_IS_UNREAD(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
3112                 msginfo->folder->unread_msgs--;
3113         if (MSG_IS_UNREAD(msginfo->flags) && procmsg_msg_has_marked_parent(msginfo))
3114                 msginfo->folder->unreadmarked_msgs--;
3115         if (MSG_IS_MARKED(msginfo->flags))
3116                 item->marked_msgs--;
3117         if (MSG_IS_REPLIED(msginfo->flags))
3118                 item->replied_msgs--;
3119         if (MSG_IS_FORWARDED(msginfo->flags))
3120                 item->forwarded_msgs--;
3121         if (MSG_IS_LOCKED(msginfo->flags))
3122                 item->locked_msgs--;
3123         if (MSG_IS_IGNORE_THREAD(msginfo->flags))
3124                 item->ignored_msgs--;
3125         if (MSG_IS_WATCH_THREAD(msginfo->flags))
3126                 item->watched_msgs--;
3127
3128         msginfo->folder->total_msgs--;
3129
3130         msginfo_update.msginfo = msginfo;
3131         msginfo_update.flags = MSGINFO_UPDATE_DELETED;
3132         hooks_invoke(MSGINFO_UPDATE_HOOKLIST, &msginfo_update);
3133
3134         msgcache_remove_msg(item->cache, msginfo->msgnum);
3135         folder_item_update_with_msg(msginfo->folder, F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT | F_ITEM_UPDATE_REMOVEMSG, msginfo);
3136 }
3137
3138 gint folder_item_add_msg(FolderItem *dest, const gchar *file,
3139                          MsgFlags *flags, gboolean remove_source)
3140 {
3141         GSList file_list;
3142         MsgFileInfo fileinfo;
3143
3144         cm_return_val_if_fail(dest != NULL, -1);
3145         cm_return_val_if_fail(file != NULL, -1);
3146  
3147         fileinfo.msginfo = NULL;
3148         fileinfo.file = (gchar *)file;
3149         fileinfo.flags = flags;
3150         file_list.data = &fileinfo;
3151         file_list.next = NULL;
3152
3153         return folder_item_add_msgs(dest, &file_list, remove_source);
3154 }
3155
3156 gint folder_item_add_msgs(FolderItem *dest, GSList *file_list,
3157                           gboolean remove_source)
3158 {
3159         Folder *folder;
3160         gint ret, num, lastnum = -1;
3161         GSList *file_cur;
3162         GHashTable *relation;
3163         MsgFileInfo *fileinfo = NULL;
3164         gboolean folderscan = FALSE;
3165
3166         cm_return_val_if_fail(dest != NULL, -1);
3167         cm_return_val_if_fail(file_list != NULL, -1);
3168         cm_return_val_if_fail(dest->folder != NULL, -1);
3169         if (dest->no_select)
3170                 return -1;
3171
3172         folder = dest->folder;
3173
3174         relation = g_hash_table_new(g_direct_hash, g_direct_equal);
3175
3176         if (folder->klass->add_msgs != NULL) {
3177                 ret = folder->klass->add_msgs(folder, dest, file_list, relation);
3178                 if (ret < 0) {
3179                         g_hash_table_destroy(relation);
3180                         return ret;
3181                 }
3182         } else {
3183                 for (file_cur = file_list; file_cur != NULL; file_cur = g_slist_next(file_cur)) {
3184                         fileinfo = (MsgFileInfo *) file_cur->data;
3185
3186                         ret = folder->klass->add_msg(folder, dest, fileinfo->file, fileinfo->flags);
3187                         if (ret < 0) {
3188                                 g_hash_table_destroy(relation);
3189                                 return ret;
3190                         }
3191                         g_hash_table_insert(relation, fileinfo, GINT_TO_POINTER(ret));
3192                 }
3193         }
3194
3195         for (file_cur = file_list; file_cur != NULL; file_cur = g_slist_next(file_cur)) {
3196                 gpointer data, old_key;
3197
3198                 fileinfo = (MsgFileInfo *) file_cur->data;
3199                 if (g_hash_table_lookup_extended(relation, fileinfo, &old_key, &data))
3200                         num = GPOINTER_TO_INT(data);
3201                 else
3202                         num = -1;
3203
3204                 if (num >= 0) {
3205                         MsgInfo *newmsginfo;
3206
3207                         if (num == 0) {
3208                                 if (!folderscan) {
3209                                         folder_item_scan_full(dest, FALSE);
3210                                         folderscan = TRUE;
3211                                 }
3212                                 num = folder_item_get_msg_num_by_file(dest, fileinfo->file);
3213                                 debug_print("got num %d\n", num);
3214                         }
3215
3216                         if (num > lastnum)
3217                                 lastnum = num;
3218
3219                         if (num >= 0 && remove_source) {
3220                                 if (claws_unlink(fileinfo->file) < 0)
3221                                         FILE_OP_ERROR(fileinfo->file, "unlink");
3222                         }
3223
3224                         if (num == 0)
3225                                 continue;
3226
3227                         if (!folderscan && 
3228                             ((newmsginfo = get_msginfo(dest, num)) != NULL)) {
3229                                 add_msginfo_to_cache(dest, newmsginfo, NULL);
3230                                 procmsg_msginfo_free(newmsginfo);
3231                         } else if ((newmsginfo = msgcache_get_msg(dest->cache, num)) != NULL) {
3232                                 /* TODO: set default flags */
3233                                 procmsg_msginfo_free(newmsginfo);
3234                         }
3235                 }
3236         }
3237
3238         g_hash_table_destroy(relation);
3239
3240         return lastnum;
3241 }
3242
3243 static FolderItem *folder_item_move_recursive(FolderItem *src, FolderItem *dest, gboolean copy) 
3244 {
3245         GSList *mlist;
3246         FolderItem *new_item;
3247         FolderItem *next_item;
3248         GNode *srcnode;
3249         gchar *old_id, *new_id;
3250
3251         /* move messages */
3252         debug_print("%s %s to %s\n", copy?"Copying":"Moving", src->path, dest->path);
3253         new_item = folder_create_folder(dest, src->name);
3254         if (new_item == NULL) {
3255                 g_print("Can't create folder\n");
3256                 return NULL;
3257         }
3258         
3259         if (new_item->folder == NULL)
3260                 new_item->folder = dest->folder;
3261
3262         /* move messages */
3263         log_message(LOG_PROTOCOL, copy ?_("Copying %s to %s...\n"):_("Moving %s to %s...\n"), 
3264                         src->name, new_item->path);
3265
3266         mlist = folder_item_get_msg_list(src);
3267         
3268         if (mlist != NULL) {
3269                 if (copy)
3270                         folder_item_copy_msgs(new_item, mlist);
3271                 else
3272                         folder_item_move_msgs(new_item, mlist);
3273                 procmsg_msg_list_free(mlist);
3274         }
3275         
3276         /*copy prefs*/
3277         folder_item_prefs_copy_prefs(src, new_item);
3278         
3279         /* copy internal data */
3280         if (src->folder->klass == new_item->folder->klass &&
3281             src->folder->klass->copy_private_data != NULL)
3282                 src->folder->klass->copy_private_data(src->folder,
3283                                         src, new_item);
3284         new_item->collapsed = src->collapsed;
3285         new_item->thread_collapsed = src->thread_collapsed;
3286         new_item->threaded  = src->threaded;
3287         new_item->ret_rcpt  = src->ret_rcpt;
3288         new_item->hide_read_msgs = src->hide_read_msgs;
3289         new_item->hide_del_msgs = src->hide_del_msgs;
3290         new_item->hide_read_threads = src->hide_read_threads;
3291         new_item->sort_key  = src->sort_key;
3292         new_item->sort_type = src->sort_type;
3293
3294         prefs_matcher_write_config();
3295         
3296         /* recurse */
3297         srcnode = src->folder->node;    
3298         srcnode = g_node_find(srcnode, G_PRE_ORDER, G_TRAVERSE_ALL, src);
3299         srcnode = srcnode->children;
3300         while (srcnode != NULL) {
3301                 if (srcnode && srcnode->data) {
3302                         next_item = (FolderItem*) srcnode->data;
3303                         srcnode = srcnode->next;
3304                         if (folder_item_move_recursive(next_item, new_item, copy) == NULL) {
3305                                 return NULL;
3306                         }
3307                 }
3308         }
3309         old_id = folder_item_get_identifier(src);
3310         new_id = folder_item_get_identifier(new_item);
3311
3312         /* if src supports removing, otherwise only copy folder */
3313         if (src->folder->klass->remove_folder != NULL && !copy) 
3314                 src->folder->klass->remove_folder(src->folder, src);
3315         folder_write_list();
3316
3317         if (!copy) {
3318                 debug_print("updating rules : %s => %s\n", old_id, new_id);
3319                 if (old_id != NULL && new_id != NULL) {
3320                         prefs_filtering_rename_path(old_id, new_id);
3321                         account_rename_path(old_id, new_id);
3322                 }
3323         }
3324         g_free(old_id);
3325         g_free(new_id);
3326         
3327         return new_item;
3328 }
3329
3330 gint folder_item_move_to(FolderItem *src, FolderItem *dest, FolderItem **new_item, gboolean copy)
3331 {
3332         FolderItem *tmp = folder_item_parent(dest);
3333         gchar * src_identifier, * dst_identifier;
3334         gchar * phys_srcpath, * phys_dstpath, *tmppath;
3335
3336         while (tmp) {
3337                 if (tmp == src) {
3338                         return F_MOVE_FAILED_DEST_IS_CHILD;
3339                 }
3340                 tmp = folder_item_parent(tmp);
3341         }
3342         
3343         tmp = folder_item_parent(src);
3344         
3345         src_identifier = folder_item_get_identifier(src);
3346         dst_identifier = folder_item_get_identifier(dest);
3347         
3348         if(dst_identifier == NULL && dest->folder && folder_item_parent(dest) == NULL) {
3349                 /* dest can be a root folder */
3350                 dst_identifier = folder_get_identifier(dest->folder);
3351         }
3352         if (src_identifier == NULL || dst_identifier == NULL) {
3353                 debug_print("Can't get identifiers\n");
3354                 return F_MOVE_FAILED;
3355         }
3356
3357         if (src->folder != dest->folder && !copy) {
3358                 return F_MOVE_FAILED_DEST_OUTSIDE_MAILBOX;
3359         }
3360
3361         phys_srcpath = folder_item_get_path(src);
3362         tmppath = folder_item_get_path(dest);
3363         phys_dstpath = g_strconcat(tmppath,
3364                        G_DIR_SEPARATOR_S,
3365                        g_path_get_basename(phys_srcpath),
3366                        NULL);
3367         g_free(tmppath);
3368
3369         if (folder_item_parent(src) == dest || src == dest) {
3370                 g_free(src_identifier);
3371                 g_free(dst_identifier);
3372                 g_free(phys_srcpath);
3373                 g_free(phys_dstpath);
3374                 return F_MOVE_FAILED_DEST_IS_PARENT;
3375         }
3376         debug_print("moving \"%s\" to \"%s\"\n", phys_srcpath, phys_dstpath);
3377         if ((tmp = folder_item_move_recursive(src, dest, copy)) == NULL) {
3378                 return F_MOVE_FAILED;
3379         }
3380         
3381         g_free(src_identifier);
3382         g_free(dst_identifier);
3383         g_free(phys_srcpath);
3384         g_free(phys_dstpath);
3385
3386         *new_item = tmp;
3387
3388         return F_MOVE_OK;
3389 }
3390
3391 struct find_data
3392 {
3393         gboolean found;
3394 };      
3395 static void find_num(gpointer key, gpointer value, gpointer data)
3396 {
3397         struct find_data *fdata = (struct find_data *)data;
3398         if (GPOINTER_TO_INT(value) == 0)
3399                 fdata->found = TRUE;
3400 }
3401
3402 static gboolean some_msgs_have_zero_num(GHashTable *hashtable)
3403 {
3404         struct find_data fdata;
3405         
3406         fdata.found = FALSE;
3407         g_hash_table_foreach(hashtable, find_num, &fdata);
3408         
3409         return fdata.found;
3410 }
3411
3412 /**
3413  * Copy a list of message to a new folder and remove
3414  * source messages if wanted
3415  */
3416 static gint do_copy_msgs(FolderItem *dest, GSList *msglist, gboolean remove_source)
3417 {
3418         Folder *folder;
3419         GSList *l;
3420         gint num, lastnum = -1;
3421         gboolean folderscan = FALSE;
3422         GHashTable *relation;
3423         GSList *not_moved = NULL;
3424         gint total = 0, curmsg = 0;
3425         MsgInfo *msginfo = NULL;
3426
3427         cm_return_val_if_fail(dest != NULL, -1);
3428         cm_return_val_if_fail(msglist != NULL, -1);
3429
3430         folder = dest->folder;
3431
3432         cm_return_val_if_fail(folder->klass->copy_msg != NULL, -1);
3433         if (dest->no_select)
3434                 return -1;
3435
3436         msginfo = (MsgInfo *)msglist->data;
3437         
3438         if (!msginfo)
3439                 return -1;
3440         
3441         if (!MSG_IS_QUEUED(msginfo->flags) && 
3442             MSG_IS_DRAFT(msginfo->flags) && 
3443             folder_has_parent_of_type(dest, F_QUEUE)) {
3444                 GSList *cur = msglist;
3445                 gboolean queue_err = FALSE;
3446                 for (; cur; cur = cur->next) {
3447                         Compose *compose = NULL;
3448                         FolderItem *queue = dest;
3449                         int val = 0;
3450                         
3451                         msginfo = (MsgInfo *)cur->data;
3452                         compose = compose_reedit(msginfo, TRUE);
3453                         if (compose == NULL) {
3454                                 queue_err = TRUE;
3455                                 continue;
3456                         }
3457                         val = compose_queue(compose, NULL, &queue, NULL,
3458                                         FALSE);
3459                         if (val < 0) {
3460                                 queue_err = TRUE;
3461                         } else if (remove_source) {
3462                                 folder_item_remove_msg(msginfo->folder, msginfo->msgnum);
3463                         }
3464                         if (val == 0)
3465                                 compose_close(compose);
3466                 }
3467                 return queue_err ? -1:0;
3468         }
3469
3470         relation = g_hash_table_new(g_direct_hash, g_direct_equal);
3471
3472         for (l = msglist ; l != NULL ; l = g_slist_next(l)) {
3473                 MsgInfo * msginfo = (MsgInfo *) l->data;
3474
3475                 if (msginfo->planned_download != 0) {
3476                         int old_planned = msginfo->planned_download;
3477                         partial_unmark(msginfo);
3478                         /* little hack to reenable after */
3479                         msginfo->planned_download = old_planned;
3480                 }
3481         }
3482
3483         /* 
3484          * Copy messages to destination folder and 
3485          * store new message numbers in newmsgnums
3486          */
3487         if (folder->klass->copy_msgs != NULL) {
3488                 if (folder->klass->copy_msgs(folder, dest, msglist, relation) < 0) {
3489                         g_hash_table_destroy(relation);
3490                         return -1;
3491                 }
3492         } else {
3493                 MsgInfo * msginfo;
3494                 l = msglist;
3495
3496                 /* immediately stop if src and dest folders are identical */
3497                 if (l != NULL) {
3498                         msginfo = (MsgInfo *) l->data;
3499                         if (msginfo != NULL && msginfo->folder == dest) {
3500                                 g_hash_table_destroy(relation);
3501                                 return -1;
3502                         }
3503                 }
3504
3505                 for (; l != NULL ; l = g_slist_next(l)) {
3506                         msginfo = (MsgInfo *) l->data;
3507
3508                         num = folder->klass->copy_msg(folder, dest, msginfo);
3509                         if (num > 0)
3510                                 g_hash_table_insert(relation, msginfo, GINT_TO_POINTER(num));
3511                         else
3512                                 not_moved = g_slist_prepend(not_moved, msginfo);
3513                 }
3514         }
3515
3516         if (remove_source) {
3517                 MsgInfo *msginfo = (MsgInfo *) msglist->data;
3518                 FolderItem *item = msginfo->folder;
3519                 /*
3520                  * Remove source messages from their folders if
3521                  * copying was successfull and update folder
3522                  * message counts
3523                  */
3524                 if (not_moved == NULL && item->folder->klass->remove_msgs) {
3525                         item->folder->klass->remove_msgs(item->folder,
3526                                                                 msginfo->folder,
3527                                                                 msglist,
3528                                                                 relation);
3529                 }
3530                 for (l = msglist; l != NULL; l = g_slist_next(l)) {
3531                         gpointer old_key, data;
3532                         msginfo = (MsgInfo *) l->data;
3533                         item = msginfo->folder;
3534
3535                         if (g_hash_table_lookup_extended(relation, msginfo, &old_key, &data))
3536                                 num = GPOINTER_TO_INT(data);
3537                         else
3538                                 num = 0;
3539
3540                         if (g_slist_find(not_moved, msginfo))
3541                                 continue;
3542
3543                         if ((num >= 0) && (item->folder->klass->remove_msg != NULL)) {
3544                                 if (!item->folder->klass->remove_msgs)
3545                                         item->folder->klass->remove_msg(item->folder,
3546                                                                 msginfo->folder,
3547                                                                 msginfo->msgnum);
3548                                 if (!item->folder->account || item->folder->account->imap_use_trash) {
3549                                         remove_msginfo_from_cache(item, msginfo);
3550                                 }
3551                         }
3552                 }
3553         }
3554
3555         /* Read cache for dest folder */
3556         if (!dest->cache) folder_item_read_cache(dest);
3557
3558         /* 
3559          * Fetch new MsgInfos for new messages in dest folder,
3560          * add them to the msgcache and update folder message counts
3561          */
3562         if (some_msgs_have_zero_num(relation)) {
3563                 folder_item_scan_full(dest, FALSE);
3564                 folderscan = TRUE;
3565         }
3566
3567         statusbar_print_all(_("Updating cache for %s..."), dest->path ? dest->path : "(null)");
3568         total = g_slist_length(msglist);
3569         
3570         if (FOLDER_TYPE(dest->folder) == F_IMAP && total > 1) {
3571                 folder_item_scan_full(dest, FALSE);
3572                 folderscan = TRUE;
3573         }
3574         folder_item_set_batch(dest, TRUE);
3575         for (l = msglist; l != NULL; l = g_slist_next(l)) {
3576                 MsgInfo *msginfo = (MsgInfo *) l->data;
3577                 gpointer data, old_key;
3578
3579                 if (!msginfo)
3580                         continue;
3581
3582                 if (g_hash_table_lookup_extended(relation, msginfo, &old_key, &data))
3583                         num = GPOINTER_TO_INT(data);
3584                 else
3585                         num = 0;
3586
3587                 statusbar_progress_all(curmsg++,total, 100);
3588                 if (curmsg % 100 == 0)
3589                         GTK_EVENTS_FLUSH();
3590
3591                 if (num >= 0) {
3592                         MsgInfo *newmsginfo = NULL;
3593
3594                         if (!folderscan && num > 0) {
3595                                 newmsginfo = get_msginfo(dest, num);
3596                                 if (newmsginfo != NULL) {
3597                                         add_msginfo_to_cache(dest, newmsginfo, msginfo);
3598                                 }
3599                         }
3600                         if (newmsginfo == NULL) {
3601                                 if (!folderscan) {
3602                                         folder_item_scan_full(dest, FALSE);
3603                                         folderscan = TRUE;
3604                                 }
3605                                 if (msginfo->msgid != NULL) {
3606                                         newmsginfo = folder_item_get_msginfo_by_msgid(dest, msginfo->msgid);
3607                                         if (newmsginfo != NULL) {
3608                                                 copy_msginfo_flags(msginfo, newmsginfo);
3609                                                 num = newmsginfo->msgnum;
3610                                         }
3611                                 }
3612                         }
3613
3614                         if (msginfo->planned_download 
3615                             == POP3_PARTIAL_DLOAD_DELE) {
3616                                 partial_mark_for_delete(newmsginfo);
3617                         }
3618                         if (msginfo->planned_download 
3619                             == POP3_PARTIAL_DLOAD_DLOAD) {
3620                                 partial_mark_for_download(newmsginfo);
3621                         }
3622                         if (!MSG_IS_POSTFILTERED (msginfo->flags)) {
3623                                 procmsg_msginfo_set_flags (   msginfo, MSG_POSTFILTERED, 0);
3624                                 if (newmsginfo) {
3625                                         procmsg_msginfo_set_flags (newmsginfo, MSG_POSTFILTERED, 0);
3626                                         hooks_invoke (MAIL_POSTFILTERING_HOOKLIST, newmsginfo);
3627                                 }
3628                         }
3629                         procmsg_msginfo_free(newmsginfo);
3630
3631
3632                         if (num > lastnum)
3633                                 lastnum = num;
3634                 }
3635         }
3636         folder_item_set_batch(dest, FALSE);
3637         statusbar_progress_all(0,0,0);
3638         statusbar_pop_all();
3639
3640         g_hash_table_destroy(relation);
3641         if (not_moved != NULL) {
3642                 g_slist_free(not_moved);
3643                 return -1;
3644         } else
3645                 return lastnum;
3646 }
3647
3648 /**
3649  * Move a message to a new folder.
3650  *
3651  * \param dest Destination folder
3652  * \param msginfo The message
3653  */
3654 gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
3655 {
3656         GSList list;
3657
3658         cm_return_val_if_fail(dest != NULL, -1);
3659         cm_return_val_if_fail(msginfo != NULL, -1);
3660
3661         list.data = msginfo;
3662         list.next = NULL;
3663
3664         return do_copy_msgs(dest, &list, TRUE);
3665 }
3666
3667 /**
3668  * Move a list of messages to a new folder.
3669  *
3670  * \param dest Destination folder
3671  * \param msglist List of messages
3672  */
3673 gint folder_item_move_msgs(FolderItem *dest, GSList *msglist)
3674 {
3675         gint result = -1;
3676         cm_return_val_if_fail(dest != NULL, -1);
3677         cm_return_val_if_fail(msglist != NULL, -1);
3678         inc_lock();
3679         result = do_copy_msgs(dest, msglist, TRUE);
3680         inc_unlock();
3681         return result;
3682 }
3683
3684 /**
3685  * Copy a message to a new folder.
3686  *
3687  * \param dest Destination folder
3688  * \param msginfo The message
3689  */
3690 gint folder_item_copy_msg(FolderItem *dest, MsgInfo *msginfo)
3691 {
3692         GSList list;
3693
3694         cm_return_val_if_fail(dest != NULL, -1);
3695         cm_return_val_if_fail(msginfo != NULL, -1);
3696     
3697         list.data = msginfo;
3698         list.next = NULL;
3699
3700         return do_copy_msgs(dest, &list, FALSE);
3701 }
3702
3703 /**
3704  * Copy a list of messages to a new folder.
3705  *
3706  * \param dest Destination folder
3707  * \param msglist List of messages
3708  */
3709 gint folder_item_copy_msgs(FolderItem *dest, GSList *msglist)
3710 {
3711         gint result;
3712         cm_return_val_if_fail(dest != NULL, -1);
3713         cm_return_val_if_fail(msglist != NULL, -1);
3714
3715         inc_lock();
3716         result = do_copy_msgs(dest, msglist, FALSE);
3717         inc_unlock();
3718         
3719         return result;
3720 }
3721
3722 gint folder_item_remove_msg(FolderItem *item, gint num)
3723 {
3724         Folder *folder;
3725         gint ret;
3726         MsgInfo *msginfo;
3727
3728         cm_return_val_if_fail(item != NULL, -1);
3729         folder = item->folder;
3730         cm_return_val_if_fail(folder->klass->remove_msg != NULL, -1);
3731         if (item->no_select)
3732                 return -1;
3733
3734         if (!item->cache) folder_item_read_cache(item);
3735
3736         msginfo = msgcache_get_msg(item->cache, num);
3737         if (msginfo && MSG_IS_LOCKED(msginfo->flags)) {
3738                 procmsg_msginfo_free(msginfo);
3739                 return -1;
3740         }
3741         ret = folder->klass->remove_msg(folder, item, num);
3742
3743         if (!item->folder->account || item->folder->account->imap_use_trash) {
3744                 if (msginfo != NULL) {
3745                         if (ret == 0)
3746                                 remove_msginfo_from_cache(item, msginfo);
3747                         procmsg_msginfo_free(msginfo);
3748                 }
3749         }
3750
3751         return ret;
3752 }
3753
3754 gint folder_item_remove_msgs(FolderItem *item, GSList *msglist)
3755 {
3756         Folder *folder;
3757         gint ret = 0;
3758         GSList *real_list = NULL, *cur = NULL;
3759
3760         cm_return_val_if_fail(item != NULL, -1);
3761         folder = item->folder;
3762         cm_return_val_if_fail(folder != NULL, -1);
3763         if (item->no_select)
3764                 return -1;
3765         inc_lock();
3766         if (!item->cache) folder_item_read_cache(item);
3767
3768         folder_item_update_freeze();
3769         
3770         /* filter out locked mails */
3771         for (cur = msglist; cur; cur = cur->next) {
3772                 MsgInfo *info = (MsgInfo *)cur->data;
3773                 if (!MSG_IS_LOCKED(info->flags))
3774                         real_list = g_slist_prepend(real_list, info);
3775         }
3776
3777         real_list = g_slist_reverse(real_list);
3778
3779         if (item->folder->klass->remove_msgs) {
3780                 ret = item->folder->klass->remove_msgs(item->folder,
3781                                                         item,
3782                                                         real_list,
3783                                                         NULL);
3784         }
3785         while (ret == 0 && real_list != NULL) {
3786                 MsgInfo *msginfo = (MsgInfo *)real_list->data;
3787                 if (msginfo && MSG_IS_LOCKED(msginfo->flags)) {
3788                         real_list = real_list->next;
3789                         continue;
3790                 }
3791                 if (!item->folder->klass->remove_msgs)
3792                         ret = folder_item_remove_msg(item, msginfo->msgnum);
3793                 if (ret != 0) break;
3794                 msgcache_remove_msg(item->cache, msginfo->msgnum);
3795                 real_list = real_list->next;
3796         }
3797         g_slist_free(real_list);
3798         folder_item_scan_full(item, FALSE);
3799         folder_item_update_thaw();
3800         inc_unlock();
3801         return ret;
3802 }
3803
3804 gint folder_item_expunge(FolderItem *item)
3805 {
3806         Folder *folder = item->folder;
3807         gint result = 0;
3808         if (folder == NULL)
3809                 return -1;
3810         if (folder->klass->expunge) {
3811                 GSList *msglist = folder_item_get_msg_list(item);
3812                 GSList *cur;
3813                 result = folder->klass->expunge(folder, item);
3814                 if (result == 0) {
3815                         for (cur = msglist; cur; cur = cur->next) {
3816                                 MsgInfo *msginfo = (MsgInfo *)cur->data;
3817                                 if (MSG_IS_DELETED(msginfo->flags)) {
3818                                         remove_msginfo_from_cache(item, msginfo);
3819                                 }
3820                         }
3821                 }
3822                 procmsg_msg_list_free(msglist);
3823         }
3824         return result;
3825 }
3826
3827 gint folder_item_remove_all_msg(FolderItem *item)
3828 {
3829         Folder *folder;
3830         gint result;
3831
3832         cm_return_val_if_fail(item != NULL, -1);
3833         if (item->no_select)
3834                 return -1;
3835
3836         folder = item->folder;
3837
3838         inc_lock();
3839         if (folder->klass->remove_all_msg != NULL) {
3840                 result = folder->klass->remove_all_msg(folder, item);
3841
3842                 if (result == 0) {
3843                         folder_item_free_cache(item, TRUE);
3844                         item->cache = msgcache_new();
3845                         item->cache_dirty = TRUE;
3846                         item->mark_dirty = TRUE;
3847                         item->tags_dirty = TRUE;
3848                 }
3849         } else {
3850                 MsgInfoList *msglist;
3851
3852                 msglist = folder_item_get_msg_list(item);
3853                 result = folder_item_remove_msgs(item, msglist);
3854                 procmsg_msg_list_free(msglist);
3855         }
3856
3857         if (result == 0) {
3858                 item->new_msgs = 0;
3859                 item->unread_msgs = 0;
3860                 item->unreadmarked_msgs = 0;
3861                 item->marked_msgs = 0;
3862                 item->total_msgs = 0;
3863                 item->replied_msgs = 0;
3864                 item->forwarded_msgs = 0;
3865                 item->locked_msgs = 0;
3866                 item->ignored_msgs = 0;
3867                 item->watched_msgs = 0;
3868                 folder_item_update(item, F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT);
3869         }
3870
3871         inc_unlock();
3872         return result;
3873 }
3874
3875 void folder_item_change_msg_flags(FolderItem *item, MsgInfo *msginfo, MsgPermFlags newflags)
3876 {
3877         cm_return_if_fail(item != NULL);
3878         cm_return_if_fail(msginfo != NULL);
3879         
3880         item->mark_dirty = TRUE;
3881
3882         if (item->no_select)
3883                 return;
3884         
3885         if (item->folder->klass->change_flags != NULL && item->scanning != ITEM_SCANNING_WITH_FLAGS) {
3886                 item->folder->klass->change_flags(item->folder, item, msginfo, newflags);
3887         } else {
3888                 msginfo->flags.perm_flags = newflags;
3889         }
3890 }
3891
3892 void folder_item_commit_tags(FolderItem *item, MsgInfo *msginfo, GSList *tags_set, GSList *tags_unset)
3893 {
3894         Folder *folder = NULL;
3895
3896         if (!msginfo)
3897                 return;
3898         if (!item)
3899                 return;
3900         if (!tags_set && !tags_unset)
3901                 return;
3902
3903         folder = item->folder;
3904         if (!folder)
3905                 return;
3906         
3907         item->tags_dirty = TRUE;
3908
3909         if (folder->klass->commit_tags == NULL)
3910                 return;
3911         
3912         folder->klass->commit_tags(item, msginfo, tags_set, tags_unset);
3913 }
3914
3915 gboolean folder_item_is_msg_changed(FolderItem *item, MsgInfo *msginfo)
3916 {
3917         Folder *folder;
3918
3919         cm_return_val_if_fail(item != NULL, FALSE);
3920         if (item->no_select)
3921                 return FALSE;
3922
3923         folder = item->folder;
3924
3925         cm_return_val_if_fail(folder->klass->is_msg_changed != NULL, -1);
3926
3927         return folder->klass->is_msg_changed(folder, item, msginfo);
3928 }
3929
3930 void folder_item_discard_cache(FolderItem *item)
3931 {
3932         gchar *dir;
3933         gchar *cache;
3934
3935         if (!item)
3936                 return;
3937
3938         if (item->cache) {
3939                 msgcache_destroy(item->cache);
3940                 item->cache = NULL;
3941         }
3942         dir = folder_item_get_path(item);
3943         if (is_dir_exist(dir))
3944                 remove_all_numbered_files(dir);
3945         g_free(dir);
3946         
3947         cache = folder_item_get_cache_file(item);
3948         if (is_file_exist(cache))
3949                 claws_unlink(cache);
3950         g_free(cache);
3951         
3952 }
3953
3954 static gchar *folder_item_get_cache_file(FolderItem *item)
3955 {
3956         gchar *path;
3957         gchar *file;
3958         gchar *old_file;
3959
3960         cm_return_val_if_fail(item != NULL, NULL);
3961         cm_return_val_if_fail(item->path != NULL, NULL);
3962
3963         path = folder_item_get_path(item);
3964         cm_return_val_if_fail(path != NULL, NULL);
3965         if (!is_dir_exist(path))
3966                 make_dir_hier(path);
3967         file = g_strconcat(path, G_DIR_SEPARATOR_S, CACHE_FILE, NULL);
3968         old_file = g_strconcat(path, G_DIR_SEPARATOR_S, OLD_CACHE_FILE, NULL);
3969
3970         if (!is_file_exist(file) && is_file_exist(old_file))
3971                 move_file(old_file, file, FALSE);
3972         g_free(old_file);
3973         g_free(path);
3974
3975         return file;
3976 }
3977
3978 static gchar *folder_item_get_mark_file(FolderItem *item)
3979 {
3980         gchar *path;
3981         gchar *file;
3982         gchar *old_file;
3983
3984         cm_return_val_if_fail(item != NULL, NULL);
3985         cm_return_val_if_fail(item->path != NULL, NULL);
3986
3987         path = folder_item_get_path(item);
3988         cm_return_val_if_fail(path != NULL, NULL);
3989         if (!is_dir_exist(path))
3990                 make_dir_hier(path);
3991         file = g_strconcat(path, G_DIR_SEPARATOR_S, MARK_FILE, NULL);
3992         old_file = g_strconcat(path, G_DIR_SEPARATOR_S, OLD_MARK_FILE, NULL);
3993
3994         if (!is_file_exist(file) && is_file_exist(old_file))
3995                 move_file(old_file, file, FALSE);
3996         g_free(old_file);
3997         g_free(path);
3998
3999         return file;
4000 }
4001
4002 static gchar *folder_item_get_tags_file(FolderItem *item)
4003 {
4004         gchar *path;
4005         gchar *identifier;
4006         gchar *file;
4007
4008         /* we save tags files in rc_dir, because tagsrc is there too,
4009          * and storing tags directly in the mailboxes would give strange
4010          * result when using another Claws mailbox from another install
4011          * with different tags. */
4012
4013         cm_return_val_if_fail(item != NULL, NULL);
4014
4015         identifier = folder_item_get_identifier(item);
4016         cm_return_val_if_fail(identifier != NULL, NULL);
4017
4018 #ifdef G_OS_WIN32
4019         while (strchr(identifier, '/'))
4020                 *strchr(identifier, '/') = '\\';
4021 #endif
4022
4023         path = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
4024                            "tagsdb", G_DIR_SEPARATOR_S,
4025                            identifier, NULL);
4026         
4027         g_free(identifier);
4028                            
4029         if (!is_dir_exist(path))
4030                 make_dir_hier(path);
4031
4032         file = g_strconcat(path, G_DIR_SEPARATOR_S, TAGS_FILE, NULL);
4033         
4034         g_free(path);
4035
4036         return file;
4037 }
4038
4039 static gpointer xml_to_folder_item(gpointer nodedata, gpointer data)
4040 {
4041         XMLNode *xmlnode = (XMLNode *) nodedata;
4042         Folder *folder = (Folder *) data;
4043         FolderItem *item;
4044
4045         cm_return_val_if_fail(xmlnode != NULL, NULL);
4046         cm_return_val_if_fail(folder != NULL, NULL);
4047
4048         if (strcmp2(xmlnode->tag->tag, "folderitem") != 0) {
4049                 g_warning("tag name != \"folderitem\"\n");
4050                 return NULL;
4051         }
4052
4053         item = folder_item_new(folder, "", "");
4054         if (folder->klass->item_set_xml != NULL)
4055                 folder->klass->item_set_xml(folder, item, xmlnode->tag);
4056         else
4057                 folder_item_set_xml(folder, item, xmlnode->tag);
4058
4059         item->folder = folder;
4060
4061         switch (item->stype) {
4062         case F_INBOX:  folder->inbox  = item; break;
4063         case F_OUTBOX: folder->outbox = item; break;
4064         case F_DRAFT:  folder->draft  = item; break;
4065         case F_QUEUE:  folder->queue  = item; break;
4066         case F_TRASH:  folder->trash  = item; break;
4067         default:       break;
4068         }
4069         folder_item_prefs_read_config(item);
4070
4071         return item;
4072 }
4073
4074 static gboolean folder_item_set_node(GNode *node, gpointer data)
4075 {
4076         FolderItem *item = (FolderItem *) node->data;
4077         item->node = node;
4078
4079         return FALSE;
4080 }
4081
4082 static Folder *folder_get_from_xml(GNode *node)
4083 {
4084         Folder *folder;
4085         XMLNode *xmlnode;
4086         GList *list;
4087         FolderClass *klass = NULL;
4088         GNode *cur;
4089
4090         cm_return_val_if_fail(node->data != NULL, NULL);
4091
4092         xmlnode = node->data;
4093         if (strcmp2(xmlnode->tag->tag, "folder") != 0) {
4094                 g_warning("tag name != \"folder\"\n");
4095                 return NULL;
4096         }
4097         list = xmlnode->tag->attr;
4098         for (; list != NULL; list = list->next) {
4099                 XMLAttr *attr = list->data;
4100
4101                 if (!attr || !attr->name || !attr->value) continue;
4102                 if (!strcmp(attr->name, "type"))
4103                         klass = folder_get_class_from_string(attr->value);
4104         }
4105         if (klass == NULL)
4106                 return NULL;
4107
4108         folder = folder_new(klass, "", "");
4109         cm_return_val_if_fail(folder != NULL, NULL);
4110
4111         if (klass->set_xml)
4112                 klass->set_xml(folder, xmlnode->tag);
4113         else
4114                 folder_set_xml(folder, xmlnode->tag);
4115
4116         cur = node->children;
4117         while (cur != NULL) {
4118                 GNode *itemnode;
4119
4120                 itemnode = g_node_map(cur, xml_to_folder_item, (gpointer) folder);
4121                 g_node_append(folder->node, itemnode);
4122                 cur = cur->next;
4123         }
4124         g_node_traverse(folder->node, G_IN_ORDER, G_TRAVERSE_ALL, -1, folder_item_set_node, NULL);
4125         
4126         return folder;
4127 }
4128
4129 static gchar *folder_get_list_path(void)
4130 {
4131         static gchar *filename = NULL;
4132
4133         if (!filename)
4134                 filename =  g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
4135                                         FOLDER_LIST, NULL);
4136
4137         return filename;
4138 }
4139
4140 static gpointer folder_item_to_xml(gpointer nodedata, gpointer data)
4141 {
4142         FolderItem *item = (FolderItem *) nodedata;
4143         XMLTag *tag;
4144
4145         cm_return_val_if_fail(item != NULL, NULL);
4146
4147         if (item->folder->klass->item_get_xml != NULL)
4148                 tag = item->folder->klass->item_get_xml(item->folder, item);
4149         else
4150                 tag = folder_item_get_xml(item->folder, item);
4151
4152         return xml_node_new(tag, NULL);
4153 }
4154
4155 static GNode *folder_get_xml_node(Folder *folder)
4156 {
4157         GNode *node;
4158         XMLNode *xmlnode;
4159         XMLTag *tag;
4160
4161         cm_return_val_if_fail(folder != NULL, NULL);
4162
4163         if (folder->klass->get_xml != NULL)
4164                 tag = folder->klass->get_xml(folder);
4165         else
4166                 tag = folder_get_xml(folder);
4167
4168         xml_tag_add_attr(tag, xml_attr_new("type", folder->klass->idstr));
4169
4170         xmlnode = xml_node_new(tag, NULL);
4171
4172         node = g_node_new(xmlnode);
4173         
4174         cm_return_val_if_fail (folder->node != NULL, NULL);
4175         
4176         if (folder->node->children) {
4177                 GNode *cur;
4178
4179                 cur = folder->node->children;
4180                 while (cur) {
4181                         GNode *xmlnode;
4182
4183                         xmlnode = g_node_map(cur, folder_item_to_xml, (gpointer) folder);
4184                         g_node_append(node, xmlnode);
4185                         cur = cur->next;
4186                 }
4187         }
4188
4189         return node;
4190 }
4191
4192 static void folder_update_op_count_rec(GNode *node)
4193 {
4194         FolderItem *fitem = FOLDER_ITEM(node->data);
4195
4196         if (g_node_depth(node) > 0) {
4197                 if (fitem->op_count > 0) {
4198                         fitem->op_count = 0;
4199                         folder_item_update(fitem, F_ITEM_UPDATE_MSGCNT);
4200                 }
4201                 if (node->children) {
4202                         GNode *child;
4203
4204                         child = node->children;
4205                         while (child) {
4206                                 GNode *cur;
4207
4208                                 cur = child;
4209                                 child = cur->next;
4210                                 folder_update_op_count_rec(cur);
4211                         }
4212                 }
4213         }
4214 }
4215
4216 void folder_update_op_count(void) 
4217 {
4218         GList *cur;
4219         Folder *folder;
4220
4221         for (cur = folder_list; cur != NULL; cur = cur->next) {
4222                 folder = cur->data;
4223                 folder_update_op_count_rec(folder->node);
4224         }
4225 }
4226
4227 typedef struct _type_str {
4228         gchar * str;
4229         gint type;
4230 } type_str;
4231
4232
4233 /*
4234 static gchar * folder_item_get_tree_identifier(FolderItem * item)
4235 {
4236         if (item->parent != NULL) {
4237                 gchar * path;
4238                 gchar * id;
4239
4240                 path = folder_item_get_tree_identifier(item->parent);
4241                 if (path == NULL)
4242                         return NULL;
4243
4244                 id = g_strconcat(path, "/", item->name, NULL);
4245                 g_free(path);
4246
4247                 return id;
4248         }
4249         else {
4250                 return g_strconcat("/", item->name, NULL);
4251         }
4252 }
4253 */
4254
4255 /* CLAWS: temporary local folder for filtering */
4256 #define TEMP_FOLDER "TEMP_FOLDER"
4257 #define PROCESSING_FOLDER_ITEM "processing"     
4258
4259 static FolderItem *processing_folder_item;
4260
4261 static void folder_create_processing_folder(void)
4262 {
4263         Folder *processing_folder;
4264         gchar      *tmpname;
4265
4266         if ((processing_folder = folder_find_from_name(TEMP_FOLDER, mh_get_class())) == NULL) {
4267                 gchar *tmppath;
4268
4269                 tmppath =
4270                     g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
4271                                 "tempfolder", NULL);
4272                 processing_folder =
4273                     folder_new(mh_get_class(), TEMP_FOLDER, tmppath);
4274                 g_free(tmppath);
4275         }
4276         g_assert(processing_folder != NULL);
4277
4278         debug_print("tmpparentroot %s\n", LOCAL_FOLDER(processing_folder)->rootpath);
4279         /* FIXME: [W32] The code below does not correctly merge
4280            relative filenames; there should be a function to handle
4281            this.  */
4282         if (!is_relative_filename(LOCAL_FOLDER(processing_folder)->rootpath))
4283                 tmpname = g_strconcat(LOCAL_FOLDER(processing_folder)->rootpath,
4284                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER_ITEM,
4285                                       NULL);
4286         else
4287                 tmpname = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
4288                                       LOCAL_FOLDER(processing_folder)->rootpath,
4289                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER_ITEM,
4290                                       NULL);
4291
4292         if (!is_dir_exist(tmpname)) {
4293                 debug_print("*TMP* creating %s\n", tmpname);
4294                 processing_folder_item = processing_folder->klass->create_folder(processing_folder,
4295                                                                                  processing_folder->node->data,
4296                                                                                  PROCESSING_FOLDER_ITEM);
4297         } else {
4298                 debug_print("*TMP* already created\n");
4299                 processing_folder_item = folder_item_new(processing_folder, PROCESSING_FOLDER_ITEM, PROCESSING_FOLDER_ITEM);
4300                 g_assert(processing_folder_item);
4301                 folder_item_append(processing_folder->node->data, processing_folder_item);
4302         }
4303         g_assert(processing_folder_item != NULL);
4304         g_free(tmpname);
4305 }
4306
4307 FolderItem *folder_get_default_processing(void)
4308 {
4309         if (!processing_folder_item) {
4310                 folder_create_processing_folder();
4311         }
4312         return processing_folder_item;
4313 }
4314
4315 /* folder_persist_prefs_new() - return hash table with persistent
4316  * settings (and folder name as key). 
4317  * (note that in claws other options are in the folder_item_prefs_RC
4318  * file, so those don't need to be included in PersistPref yet) 
4319  */
4320 static GHashTable *folder_persist_prefs_new(Folder *folder)
4321 {
4322         GHashTable *pptable;
4323
4324         cm_return_val_if_fail(folder, NULL);
4325         pptable = g_hash_table_new(g_str_hash, g_str_equal);
4326         folder_get_persist_prefs_recursive(folder->node, pptable);
4327         return pptable;
4328 }
4329
4330 static void folder_persist_prefs_free(GHashTable *pptable)
4331 {
4332         cm_return_if_fail(pptable);
4333         g_hash_table_foreach_remove(pptable, persist_prefs_free, NULL);
4334         g_hash_table_destroy(pptable);
4335 }
4336
4337 static const PersistPrefs *folder_get_persist_prefs(GHashTable *pptable, const char *name)
4338 {
4339         if (pptable == NULL || name == NULL) return NULL;
4340         return g_hash_table_lookup(pptable, name);
4341 }
4342
4343 static void folder_item_restore_persist_prefs(FolderItem *item, GHashTable *pptable)
4344 {
4345         const PersistPrefs *pp;
4346         gchar *id = folder_item_get_identifier(item);
4347
4348         pp = folder_get_persist_prefs(pptable, id); 
4349         g_free(id);
4350
4351         if (!pp) return;
4352
4353         /* CLAWS: since not all folder properties have been migrated to 
4354          * folderlist.xml, we need to call the old stuff first before
4355          * setting things that apply both to Main and Claws. */
4356         folder_item_prefs_read_config(item); 
4357
4358         item->collapsed = pp->collapsed;
4359         item->thread_collapsed = pp->thread_collapsed;
4360         item->threaded  = pp->threaded;
4361         item->ret_rcpt  = pp->ret_rcpt;
4362         item->hide_read_msgs = pp->hide_read_msgs;
4363         item->hide_del_msgs = pp->hide_del_msgs;
4364         item->hide_read_threads = pp->hide_read_threads;
4365         item->sort_key  = pp->sort_key;
4366         item->sort_type = pp->sort_type;
4367 }
4368
4369 static void folder_get_persist_prefs_recursive(GNode *node, GHashTable *pptable)
4370 {
4371         FolderItem *item = FOLDER_ITEM(node->data);
4372         PersistPrefs *pp;
4373         GNode *child, *cur;
4374         gchar *id;
4375
4376         cm_return_if_fail(node != NULL);
4377         cm_return_if_fail(item != NULL);
4378
4379         /* NOTE: item->path == NULL means top level folder; not interesting
4380          * to store preferences of that one.  */
4381         if (item->path) {
4382                 id = folder_item_get_identifier(item);
4383                 pp = g_new0(PersistPrefs, 1);
4384                 cm_return_if_fail(pp != NULL);
4385                 pp->collapsed = item->collapsed;
4386                 pp->thread_collapsed = item->thread_collapsed;
4387                 pp->threaded  = item->threaded;
4388                 pp->ret_rcpt  = item->ret_rcpt; 
4389                 pp->hide_read_msgs = item->hide_read_msgs;
4390                 pp->hide_del_msgs = item->hide_del_msgs;
4391                 pp->hide_read_threads = item->hide_read_threads;
4392                 pp->sort_key  = item->sort_key;
4393                 pp->sort_type = item->sort_type;
4394                 g_hash_table_insert(pptable, id, pp);
4395         }
4396
4397         if (node->children) {
4398                 child = node->children;
4399                 while (child) {
4400                         cur = child;
4401                         child = cur->next;
4402                         folder_get_persist_prefs_recursive(cur, pptable);
4403                 }
4404         }       
4405 }
4406
4407 static gboolean persist_prefs_free(gpointer key, gpointer val, gpointer data)
4408 {
4409         g_free(key);
4410         g_free(val);
4411         return TRUE;    
4412 }
4413
4414 void folder_item_apply_processing(FolderItem *item)
4415 {
4416         GSList *processing_list;
4417         GSList *mlist, *cur;
4418         guint total = 0, curmsg = 0;
4419         gint last_apply_per_account;
4420
4421         cm_return_if_fail(item != NULL);
4422
4423         if (item->no_select)
4424                return;
4425
4426         processing_list = item->prefs->processing;
4427
4428         if (!pre_global_processing && !processing_list
4429         &&  !post_global_processing)
4430                 return;
4431
4432         debug_print("processing %s\n", item->name);
4433         folder_item_update_freeze();
4434
4435         inc_lock();
4436
4437         mlist = folder_item_get_msg_list(item);
4438         total = g_slist_length(mlist);
4439         statusbar_print_all(_("Processing messages..."));
4440
4441         last_apply_per_account = prefs_common.apply_per_account_filtering_rules;
4442         prefs_common.apply_per_account_filtering_rules = FILTERING_ACCOUNT_RULES_SKIP;
4443
4444         folder_item_set_batch(item, TRUE);
4445         for (cur = mlist ; cur != NULL ; cur = cur->next) {
4446                 MsgInfo * msginfo;
4447
4448                 msginfo = (MsgInfo *) cur->data;
4449                 
4450                 /* reset parameters that can be modified by processing */
4451                 msginfo->hidden = 0;
4452                 msginfo->score = 0;
4453
4454                 statusbar_progress_all(curmsg++,total, 10);
4455
4456                 /* apply pre global rules */
4457                 filter_message_by_msginfo(pre_global_processing, msginfo, NULL,
4458                                 FILTERING_PRE_PROCESSING, NULL);
4459                 
4460                 /* apply rules of the folder */
4461                 filter_message_by_msginfo(processing_list, msginfo, NULL,
4462                                 FILTERING_FOLDER_PROCESSING, item->name);
4463
4464                 /* apply post global rules */
4465                 filter_message_by_msginfo(post_global_processing, msginfo, NULL,
4466                                 FILTERING_POST_PROCESSING, NULL);
4467                 if (curmsg % 1000 == 0)
4468                         GTK_EVENTS_FLUSH();
4469         }
4470         folder_item_set_batch(item, FALSE);
4471
4472         prefs_common.apply_per_account_filtering_rules = last_apply_per_account;
4473
4474         if (pre_global_processing || processing_list
4475             || post_global_processing)
4476                 filtering_move_and_copy_msgs(mlist);
4477         for (cur = mlist ; cur != NULL ; cur = cur->next) {
4478                 MsgInfo * msginfo = (MsgInfo *)cur->data;
4479                 procmsg_msginfo_free(msginfo);
4480         }
4481         g_slist_free(mlist);
4482         
4483         statusbar_progress_all(0,0,0);
4484         statusbar_pop_all();
4485
4486         inc_unlock();
4487
4488         folder_item_update_thaw();
4489 }
4490
4491 /*
4492  *  functions for handling FolderItem content changes
4493  */
4494 static gint folder_item_update_freeze_cnt = 0;
4495
4496 static void folder_item_update_with_msg(FolderItem *item, FolderItemUpdateFlags update_flags, MsgInfo *msg)
4497 {
4498         if (folder_item_update_freeze_cnt == 0 /* || (msg != NULL && item->opened) */) {
4499                 FolderItemUpdateData source;
4500         
4501                 source.item = item;
4502                 source.update_flags = update_flags;
4503                 source.msg = msg;
4504                 hooks_invoke(FOLDER_ITEM_UPDATE_HOOKLIST, &source);
4505         } else {
4506                 item->update_flags |= update_flags & ~(F_ITEM_UPDATE_ADDMSG | F_ITEM_UPDATE_REMOVEMSG);
4507         }
4508 }
4509
4510 /**
4511  * Notify the folder system about changes to a folder. If the
4512  * update system is not frozen the FOLDER_ITEM_UPDATE_HOOKLIST will
4513  * be invoked, otherwise the changes will be remebered until
4514  * the folder system is thawed.
4515  *
4516  * \param item The FolderItem that was changed
4517  * \param update_flags Type of changed that was made
4518  */
4519 void folder_item_update(FolderItem *item, FolderItemUpdateFlags update_flags)
4520 {
4521         folder_item_update_with_msg(item, update_flags, NULL);
4522 }
4523
4524 void folder_item_update_recursive(FolderItem *item, FolderItemUpdateFlags update_flags)
4525 {
4526         GNode *node = item->folder->node;       
4527
4528         node = g_node_find(node, G_PRE_ORDER, G_TRAVERSE_ALL, item);
4529         node = node->children;
4530
4531         folder_item_update(item, update_flags);
4532         while (node != NULL) {
4533                 if (node && node->data) {
4534                         FolderItem *next_item = (FolderItem*) node->data;
4535
4536                         folder_item_update(next_item, update_flags);
4537                 }
4538                 node = node->next;
4539         }
4540 }
4541
4542 void folder_item_update_freeze(void)
4543 {
4544         folder_item_update_freeze_cnt++;
4545 }
4546
4547 static void folder_item_update_func(FolderItem *item, gpointer data)
4548 {
4549         FolderItemUpdateData source;
4550     
4551         if (item->update_flags) {
4552                 source.item = item;
4553                 source.update_flags = item->update_flags;
4554                 source.msg = NULL;
4555                 hooks_invoke(FOLDER_ITEM_UPDATE_HOOKLIST, &source);                             
4556                 item->update_flags = 0;
4557         }
4558 }
4559
4560 void folder_item_update_thaw(void)
4561 {
4562         if (folder_item_update_freeze_cnt > 0)
4563                 folder_item_update_freeze_cnt--;
4564         if (folder_item_update_freeze_cnt == 0) {
4565                 /* Update all folders */
4566                 folder_func_to_all_folders(folder_item_update_func, NULL);
4567         }
4568 }
4569
4570 void folder_item_synchronise(FolderItem *item)
4571 {
4572         if (!item)
4573                 return;
4574         if (item->prefs->offlinesync && item->folder->klass->synchronise) {
4575                 statuswindow_print_all(_("Synchronising %s for offline use...\n"), item->path ? item->path : "(null)");
4576                 item->folder->klass->synchronise(item, 
4577                         item->prefs->offlinesync_days);
4578                 if (item->prefs->offlinesync_days > 0 &&
4579                     item->prefs->remove_old_bodies)
4580                         folder_item_clean_local_files(item, item->prefs->offlinesync_days);
4581                 statuswindow_pop_all();
4582         }
4583 }
4584
4585 static void folder_item_synchronise_func(FolderItem *item, gpointer data)
4586 {
4587         Folder *folder = (Folder *)data;
4588         if (folder == NULL || item->folder == folder) {
4589                 folder_item_synchronise(item);
4590         }
4591 }
4592
4593 void folder_synchronise(Folder *folder)
4594 {
4595         folder_func_to_all_folders(folder_item_synchronise_func, folder);
4596 }
4597
4598 typedef struct _WantSyncData {
4599         Folder *folder;
4600         gboolean want_sync;
4601 } WantSyncData;
4602
4603 static void folder_item_want_synchronise_func(FolderItem *item, gpointer data)
4604 {
4605         WantSyncData *want_sync_data = (WantSyncData *)data;
4606         
4607         if (want_sync_data->folder == NULL || item->folder == want_sync_data->folder) {
4608                 if (item->prefs->offlinesync && item->folder->klass->synchronise)
4609                         want_sync_data->want_sync |= TRUE;
4610         }
4611 }
4612
4613 gboolean folder_want_synchronise(Folder *folder)
4614 {
4615         WantSyncData *want_sync_data = g_new0(WantSyncData, 1);
4616         gboolean result;
4617         want_sync_data->folder = folder;
4618         want_sync_data->want_sync = FALSE;
4619         
4620         folder_func_to_all_folders(folder_item_want_synchronise_func, want_sync_data);
4621         result = want_sync_data->want_sync;
4622         g_free(want_sync_data);
4623         if (result > 0)
4624                 debug_print("Folder %s wants sync\n", folder->name);
4625         return result;
4626 }
4627
4628 void folder_item_set_batch (FolderItem *item, gboolean batch)
4629 {
4630         if (!item || !item->folder)
4631                 return;
4632         if (item->folder->klass->set_batch) {
4633                 item->folder->klass->set_batch(item->folder, item, batch);
4634         }
4635 }
4636
4637 gboolean folder_has_parent_of_type(FolderItem *item, 
4638                                           SpecialFolderItemType type) 
4639 {
4640         FolderItem *cur = item;
4641
4642         if (!item)
4643                 return FALSE;
4644         /* if we already know it, make it short */
4645         if (item->parent_stype != -1) {
4646                 return (item->parent_stype == type);
4647         }
4648         
4649         /* if we don't, find the type from the first possible parent,
4650          * and set our parent type to be faster next time */
4651         while (cur) {
4652                 if (cur->stype == type || cur->parent_stype == type) {
4653                         item->parent_stype = type;
4654                         return TRUE;
4655                 }
4656                 cur = folder_item_parent(cur);
4657         }
4658         
4659         /* if we didn't match what was asked, we didn't return. If our
4660          * parent type is unknown, we may as well find it now to be faster
4661          * later. */
4662         if (item->parent_stype == -1) {
4663                 cur = item;
4664                 while (cur) {
4665                         /* here's an exception: Inbox subfolders are normal. */
4666                         if (item->parent_stype == -1 && cur->stype == F_INBOX 
4667                         && item != cur) {
4668                                 item->parent_stype = F_NORMAL;
4669                                 break;
4670                         }
4671                         /* ah, we know this parent's parent's type, we may as 
4672                          * well copy it instead of going up the full way */
4673                         if (cur->parent_stype != -1) {
4674                                 item->parent_stype = cur->parent_stype;
4675                                 break;
4676                         }
4677                         /* we found a parent that has a special type. That's 
4678                          * our parent type. */
4679                         if (cur->stype != F_NORMAL) {
4680                                 cur->parent_stype = cur->stype;
4681                                 item->parent_stype = cur->stype;
4682                                 break;
4683                         }
4684                         /* if we didn't find anything, go up once more */
4685                         cur = folder_item_parent(cur);
4686                 }
4687                 /* as we still didn't find anything, our parents must all be 
4688                  * normal. */
4689                 if (item->parent_stype == -1) {
4690                         item->parent_stype = F_NORMAL;
4691                 }
4692         }
4693         return FALSE;
4694 }
4695
4696 gboolean folder_subscribe (const gchar *uri)
4697 {
4698         GList *cur;
4699         for (cur = folder_get_list(); cur != NULL; cur = g_list_next(cur)) {
4700                 Folder *folder = (Folder *) cur->data;
4701
4702                 if (folder->klass->subscribe
4703                 &&  folder->klass->subscribe(folder, uri)) {
4704                         return TRUE;
4705                 }
4706         }
4707         return FALSE;
4708
4709 }
4710
4711 gboolean folder_get_sort_type           (Folder         *folder,
4712                                          FolderSortKey  *sort_key,
4713                                          FolderSortType *sort_type)
4714 {
4715         if (!folder || !sort_key || !sort_type)
4716                 return FALSE;
4717         if (folder->klass->get_sort_type == NULL)
4718                 return FALSE;
4719         folder->klass->get_sort_type(folder, sort_key, sort_type); 
4720         return TRUE;
4721 }