src/folder.c

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