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