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 (!g_ascii_strcasecmp(attr->value, "normal"))
 417                                 item->stype = F_NORMAL;
 418                         else if (!g_ascii_strcasecmp(attr->value, "inbox"))
 419                                 item->stype = F_INBOX;
 420                         else if (!g_ascii_strcasecmp(attr->value, "outbox"))
 421                                 item->stype = F_OUTBOX;
 422                         else if (!g_ascii_strcasecmp(attr->value, "draft"))
 423                                 item->stype = F_DRAFT;
 424                         else if (!g_ascii_strcasecmp(attr->value, "queue"))
 425                                 item->stype = F_QUEUE;
 426                         else if (!g_ascii_strcasecmp(attr->value, "trash"))
 427                                 item->stype = F_TRASH;
 428                 } else if (!strcmp(attr->name, "name")) {
 429                         if (item->name != NULL)
 430                                 g_free(item->name);
 431                         item->name = g_strdup(attr->value);
 432                 } else if (!strcmp(attr->name, "path")) {
 433                         if (item->path != NULL)
 434                                 g_free(item->path);
 435                         item->path = g_strdup(attr->value);
 436                 } else if (!strcmp(attr->name, "mtime"))
 437                         item->mtime = strtoul(attr->value, NULL, 10);
 438                 else if (!strcmp(attr->name, "new"))
 439                         item->new_msgs = atoi(attr->value);
 440                 else if (!strcmp(attr->name, "unread"))
 441                         item->unread_msgs = atoi(attr->value);
 442                 else if (!strcmp(attr->name, "unreadmarked"))
 443                         item->unreadmarked_msgs = atoi(attr->value);
 444                 else if (!strcmp(attr->name, "total"))
 445                         item->total_msgs = atoi(attr->value);
 446                 else if (!strcmp(attr->name, "no_sub"))
 447                         item->no_sub = *attr->value == '1' ? TRUE : FALSE;
 448                 else if (!strcmp(attr->name, "no_select"))
 449                         item->no_select = *attr->value == '1' ? TRUE : FALSE;
 450                 else if (!strcmp(attr->name, "collapsed"))
 451                         item->collapsed = *attr->value == '1' ? TRUE : FALSE;
 452                 else if (!strcmp(attr->name, "thread_collapsed"))
 453                         item->thread_collapsed =  *attr->value == '1' ? TRUE : FALSE;
 454                 else if (!strcmp(attr->name, "threaded"))
 455                         item->threaded =  *attr->value == '1' ? TRUE : FALSE;
 456                 else if (!strcmp(attr->name, "hidereadmsgs"))
 457                         item->hide_read_msgs =  *attr->value == '1' ? TRUE : FALSE;
 458                 else if (!strcmp(attr->name, "reqretrcpt"))
 459                         item->ret_rcpt =  *attr->value == '1' ? TRUE : FALSE;
 460                 else if (!strcmp(attr->name, "sort_key")) {
 461                         if (!strcmp(attr->value, "none"))
 462                                 item->sort_key = SORT_BY_NONE;
 463                         else if (!strcmp(attr->value, "number"))
 464                                 item->sort_key = SORT_BY_NUMBER;
 465                         else if (!strcmp(attr->value, "size"))
 466                                 item->sort_key = SORT_BY_SIZE;
 467                         else if (!strcmp(attr->value, "date"))
 468                                 item->sort_key = SORT_BY_DATE;
 469                         else if (!strcmp(attr->value, "from"))
 470                                 item->sort_key = SORT_BY_FROM;
 471                         else if (!strcmp(attr->value, "subject"))
 472                                 item->sort_key = SORT_BY_SUBJECT;
 473                         else if (!strcmp(attr->value, "score"))
 474                                 item->sort_key = SORT_BY_SCORE;
 475                         else if (!strcmp(attr->value, "label"))
 476                                 item->sort_key = SORT_BY_LABEL;
 477                         else if (!strcmp(attr->value, "mark"))
 478                                 item->sort_key = SORT_BY_MARK;
 479                         else if (!strcmp(attr->value, "unread"))
 480                                 item->sort_key = SORT_BY_STATUS;
 481                         else if (!strcmp(attr->value, "mime"))
 482                                 item->sort_key = SORT_BY_MIME;
 483                         else if (!strcmp(attr->value, "to"))
 484                                 item->sort_key = SORT_BY_TO;
 485                         else if (!strcmp(attr->value, "locked"))
 486                                 item->sort_key = SORT_BY_LOCKED;
 487                 } else if (!strcmp(attr->name, "sort_type")) {
 488                         if (!strcmp(attr->value, "ascending"))
 489                                 item->sort_type = SORT_ASCENDING;
 490                         else
 491                                 item->sort_type = SORT_DESCENDING;
 492                 } else if (!strcmp(attr->name, "account_id")) {
 493                         PrefsAccount *account;
 494
 495                         account = account_find_from_id(atoi(attr->value));
 496                         if (!account)
 497                                 g_warning("account_id: %s not found\n", attr->value);
 498                         else
 499                                 item->account = account;
 500                 } else if (!strcmp(attr->name, "apply_sub"))
 501                         item->apply_sub = *attr->value == '1' ? TRUE : FALSE;
 502         }
 503 }
 504
 505 XMLTag *folder_item_get_xml(Folder *folder, FolderItem *item)
 506 {
 507         static gchar *folder_item_stype_str[] = {"normal", "inbox", "outbox",
 508                                                  "draft", "queue", "trash"};
 509         static gchar *sort_key_str[] = {"none", "number", "size", "date",
 510                                         "from", "subject", "score", "label",
 511                                         "mark", "unread", "mime", "to",
 512                                         "locked"};
 513         XMLTag *tag;
 514         gchar *value;
 515
 516         tag = xml_tag_new("folderitem");
 517
 518         xml_tag_add_attr(tag, xml_attr_new("type", folder_item_stype_str[item->stype]));
 519         if (item->name)
 520                 xml_tag_add_attr(tag, xml_attr_new("name", item->name));
 521         if (item->path)
 522                 xml_tag_add_attr(tag, xml_attr_new("path", item->path));
 523         if (item->no_sub)
 524                 xml_tag_add_attr(tag, xml_attr_new("no_sub", "1"));
 525         if (item->no_select)
 526                 xml_tag_add_attr(tag, xml_attr_new("no_select", "1"));
 527         xml_tag_add_attr(tag, xml_attr_new("collapsed", item->collapsed && item->node->children ? "1" : "0"));
 528         xml_tag_add_attr(tag, xml_attr_new("thread_collapsed", item->thread_collapsed ? "1" : "0"));
 529         xml_tag_add_attr(tag, xml_attr_new("threaded", item->threaded ? "1" : "0"));
 530         xml_tag_add_attr(tag, xml_attr_new("hidereadmsgs", item->hide_read_msgs ? "1" : "0"));
 531         if (item->ret_rcpt)
 532                 xml_tag_add_attr(tag, xml_attr_new("reqretrcpt", "1"));
 533
 534         if (item->sort_key != SORT_BY_NONE) {
 535                 xml_tag_add_attr(tag, xml_attr_new("sort_key", sort_key_str[item->sort_key]));
 536                 xml_tag_add_attr(tag, xml_attr_new("sort_type", item->sort_type == SORT_ASCENDING ? "ascending" : "descending"));
 537         }
 538
 539         value = g_strdup_printf("%ld", (unsigned long int) item->mtime);
 540         xml_tag_add_attr(tag, xml_attr_new("mtime", value));
 541         g_free(value);
 542         xml_tag_add_attr(tag, xml_attr_new_int("new", item->new_msgs));
 543         xml_tag_add_attr(tag, xml_attr_new_int("unread", item->unread_msgs));
 544         xml_tag_add_attr(tag, xml_attr_new_int("unreadmarked", item->unreadmarked_msgs));
 545         xml_tag_add_attr(tag, xml_attr_new_int("total", item->total_msgs));
 546
 547         if (item->account)
 548                 xml_tag_add_attr(tag, xml_attr_new_int("account_id", item->account->account_id));
 549         if (item->apply_sub)
 550                 xml_tag_add_attr(tag, xml_attr_new("apply_sub", "1"));
 551
 552         return tag;
 553 }
 554
 555 void folder_set_ui_func(Folder *folder, FolderUIFunc func, gpointer data)
 556 {
 557         g_return_if_fail(folder != NULL);
 558
 559         folder->ui_func = func;
 560         folder->ui_func_data = data;
 561 }
 562
 563 void folder_set_name(Folder *folder, const gchar *name)
 564 {
 565         g_return_if_fail(folder != NULL);
 566
 567         g_free(folder->name);
 568         folder->name = name ? g_strdup(name) : NULL;
 569         if (folder->node && folder->node->data) {
 570                 FolderItem *item = (FolderItem *)folder->node->data;
 571
 572                 g_free(item->name);
 573                 item->name = name ? g_strdup(name) : NULL;
 574         }
 575 }
 576
 577 void folder_set_sort(Folder *folder, guint sort)
 578 {
 579         g_return_if_fail(folder != NULL);
 580
 581         if (folder->sort != sort) {
 582                 folder_remove(folder);
 583                 folder->sort = sort;
 584                 folder_add(folder);
 585         }
 586 }
 587
 588 gboolean folder_tree_destroy_func(GNode *node, gpointer data) {
 589         FolderItem *item = (FolderItem *) node->data;
 590
 591         folder_item_destroy(item);
 592         return FALSE;
 593 }
 594
 595 void folder_tree_destroy(Folder *folder)
 596 {
 597         GNode *node;
 598
 599         g_return_if_fail(folder != NULL);
 600
 601         node = folder->node;
 602
 603         prefs_filtering_clear_folder(folder);
 604
 605         if (node != NULL) {
 606                 g_node_traverse(node, G_POST_ORDER, G_TRAVERSE_ALL, -1,
 607                                 folder_tree_destroy_func, NULL);
 608                 g_node_destroy(node);
 609                 folder->node = NULL;
 610         }
 611 }
 612
 613 void folder_add(Folder *folder)
 614 {
 615         Folder *cur_folder;
 616         GList *cur;
 617         gint i;
 618         FolderUpdateData hookdata;
 619
 620         g_return_if_fail(folder != NULL);
 621
 622         for (i = 0, cur = folder_list; cur != NULL; cur = cur->next, i++) {
 623                 cur_folder = FOLDER(cur->data);
 624                 if (cur_folder->sort < folder->sort)
 625                         break;
 626         }
 627
 628         folder_list = g_list_insert(folder_list, folder, i);
 629
 630         hookdata.folder = folder;
 631         hookdata.update_flags = FOLDER_ADD_FOLDER;
 632         hookdata.item = NULL;
 633         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
 634 }
 635
 636 void folder_remove(Folder *folder)
 637 {
 638         FolderUpdateData hookdata;
 639
 640         g_return_if_fail(folder != NULL);
 641
 642         folder_list = g_list_remove(folder_list, folder);
 643
 644         hookdata.folder = folder;
 645         hookdata.update_flags = FOLDER_REMOVE_FOLDER;
 646         hookdata.item = NULL;
 647         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
 648 }
 649
 650 GList *folder_get_list(void)
 651 {
 652         return folder_list;
 653 }
 654
 655 gint folder_read_list(void)
 656 {
 657         GNode *node, *cur;
 658         XMLNode *xmlnode;
 659         gchar *path;
 660
 661         path = folder_get_list_path();
 662         if (!is_file_exist(path)) return -1;
 663         node = xml_parse_file(path);
 664         if (!node) return -1;
 665
 666         xmlnode = node->data;
 667         if (strcmp2(xmlnode->tag->tag, "folderlist") != 0) {
 668                 g_warning("wrong folder list\n");
 669                 xml_free_tree(node);
 670                 return -1;
 671         }
 672
 673         cur = node->children;
 674         while (cur != NULL) {
 675                 Folder *folder;
 676
 677                 folder = folder_get_from_xml(cur);
 678                 if (folder != NULL)
 679                         folder_add(folder);
 680                 else
 681                         folder_unloaded_list = g_slist_append(folder_unloaded_list,
 682                                 (gpointer) xml_copy_tree(cur));
 683                 cur = cur->next;
 684         }
 685
 686         xml_free_tree(node);
 687         if (folder_list)
 688                 return 0;
 689         else
 690                 return -1;
 691 }
 692
 693 void folder_write_list(void)
 694 {
 695         GList *list;
 696         GSList *slist;
 697         Folder *folder;
 698         gchar *path;
 699         PrefFile *pfile;
 700         GNode *rootnode;
 701         XMLNode *xmlnode;
 702         XMLTag *tag;
 703
 704         path = folder_get_list_path();
 705         if ((pfile = prefs_write_open(path)) == NULL) return;
 706
 707         xml_file_put_xml_decl(pfile->fp);
 708         tag = xml_tag_new("folderlist");
 709
 710         xmlnode = xml_node_new(tag, NULL);
 711
 712         rootnode = g_node_new(xmlnode);
 713
 714         for (list = folder_list; list != NULL; list = list->next) {
 715                 GNode *node;
 716
 717                 folder = list->data;
 718                 node = folder_get_xml_node(folder);
 719                 if (node != NULL)
 720                         g_node_append(rootnode, node);
 721         }
 722
 723         for (slist = folder_unloaded_list; slist != NULL; slist = g_slist_next(slist)) {
 724                 GNode *node = (GNode *) slist->data;
 725
 726                 g_node_append(rootnode, (gpointer) xml_copy_tree(node));
 727         }
 728
 729         xml_write_tree(rootnode, pfile->fp);
 730
 731         if (prefs_file_close(pfile) < 0)
 732                 g_warning("failed to write folder list.\n");
 733
 734         xml_free_tree(rootnode);
 735 }
 736
 737 gboolean folder_scan_tree_func(GNode *node, gpointer data)
 738 {
 739         GHashTable *pptable = (GHashTable *)data;
 740         FolderItem *item = (FolderItem *)node->data;
 741
 742         folder_item_restore_persist_prefs(item, pptable);
 743         folder_item_scan_full(item, FALSE);
 744
 745         return FALSE;
 746 }
 747
 748 void folder_scan_tree(Folder *folder)
 749 {
 750         GHashTable *pptable;
 751         FolderUpdateData hookdata;
 752
 753         if (!folder->klass->scan_tree)
 754                 return;
 755
 756         pptable = folder_persist_prefs_new(folder);
 757
 758         /*
 759          * should be changed and tree update should be done without
 760          * destroying the tree first
 761          */
 762         folder_tree_destroy(folder);
 763         folder->klass->scan_tree(folder);
 764
 765         hookdata.folder = folder;
 766         hookdata.update_flags = FOLDER_TREE_CHANGED;
 767         hookdata.item = NULL;
 768         hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
 769
 770         g_node_traverse(folder->node, G_POST_ORDER, G_TRAVERSE_ALL, -1, folder_scan_tree_func, pptable);
 771         folder_persist_prefs_free(pptable);
 772
 773         prefs_matcher_read_config();
 774
 775         folder_write_list();
 776 }
 777
 778 FolderItem *folder_create_folder(FolderItem *parent, const gchar *name)
 779 {
 780         FolderItem *new_item;
 781
 782         new_item = parent->folder->klass->create_folder(parent->folder, parent, name);
 783         if (new_item) {
 784                 FolderUpdateData hookdata;
 785
 786                 new_item->cache = msgcache_new();
 787
 788                 hookdata.folder = new_item->folder;
 789                 hookdata.update_flags = FOLDER_TREE_CHANGED | FOLDER_ADD_FOLDERITEM;
 790                 hookdata.item = new_item;
 791                 hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
 792         }
 793
 794         return new_item;
 795 }
 796
 797 gint folder_item_rename(FolderItem *item, gchar *newname)
 798 {
 799         gint retval;
 800
 801         g_return_val_if_fail(item != NULL, -1);
 802         g_return_val_if_fail(newname != NULL, -1);
 803
 804         retval = item->folder->klass->rename_folder(item->folder, item, newname);
 805
 806         if (retval >= 0) {
 807                 FolderItemUpdateData hookdata;
 808
 809                 hookdata.item = item;
 810                 hookdata.update_flags = F_ITEM_UPDATE_NAME;
 811                 hookdata.msg = NULL;
 812                 hooks_invoke(FOLDER_ITEM_UPDATE_HOOKLIST, &hookdata);
 813         }
 814
 815         return retval;
 816 }
 817
 818 struct TotalMsgCount
 819 {
 820         guint new_msgs;
 821         guint unread_msgs;
 822         guint unreadmarked_msgs;
 823         guint total_msgs;
 824 };
 825
 826 struct FuncToAllFoldersData
 827 {
 828         FolderItemFunc  function;
 829         gpointer        data;
 830 };
 831
 832 static gboolean folder_func_to_all_folders_func(GNode *node, gpointer data)
 833 {
 834         FolderItem *item;
 835         struct FuncToAllFoldersData *function_data = (struct FuncToAllFoldersData *) data;
 836
 837         g_return_val_if_fail(node->data != NULL, FALSE);
 838
 839         item = FOLDER_ITEM(node->data);
 840         g_return_val_if_fail(item != NULL, FALSE);
 841
 842         function_data->function(item, function_data->data);
 843
 844         return FALSE;
 845 }
 846
 847 void folder_func_to_all_folders(FolderItemFunc function, gpointer data)
 848 {
 849         GList *list;
 850         Folder *folder;
 851         struct FuncToAllFoldersData function_data;
 852
 853         function_data.function = function;
 854         function_data.data = data;
 855
 856         for (list = folder_list; list != NULL; list = list->next) {
 857                 folder = FOLDER(list->data);
 858                 if (folder->node)
 859                         g_node_traverse(folder->node, G_PRE_ORDER,
 860                                         G_TRAVERSE_ALL, -1,
 861                                         folder_func_to_all_folders_func,
 862                                         &function_data);
 863         }
 864 }
 865
 866 static void folder_count_total_msgs_func(FolderItem *item, gpointer data)
 867 {
 868         struct TotalMsgCount *count = (struct TotalMsgCount *)data;
 869
 870         count->new_msgs += item->new_msgs;
 871         count->unread_msgs += item->unread_msgs;
 872         count->unreadmarked_msgs += item->unreadmarked_msgs;
 873         count->total_msgs += item->total_msgs;
 874 }
 875
 876 struct TotalMsgStatus
 877 {
 878         guint new;
 879         guint unread;
 880         guint total;
 881         GString *str;
 882 };
 883
 884 static gboolean folder_get_status_full_all_func(GNode *node, gpointer data)
 885 {
 886         FolderItem *item;
 887         struct TotalMsgStatus *status = (struct TotalMsgStatus *)data;
 888         gchar *id;
 889
 890         g_return_val_if_fail(node->data != NULL, FALSE);
 891
 892         item = FOLDER_ITEM(node->data);
 893
 894         if (!item->path) return FALSE;
 895
 896         status->new += item->new_msgs;
 897         status->unread += item->unread_msgs;
 898         status->total += item->total_msgs;
 899
 900         if (status->str) {
 901                 id = folder_item_get_identifier(item);
 902                 g_string_append_printf(status->str, "%5d %5d %5d %s\n",
 903                                   item->new_msgs, item->unread_msgs,
 904                                   item->total_msgs, id);
 905                 g_free(id);
 906         }
 907
 908         return FALSE;
 909  }
 910
 911 static void folder_get_status_full_all(GString *str, guint *new, guint *unread,
 912                                        guint *total)
 913 {
 914         GList *list;
 915         Folder *folder;
 916         struct TotalMsgStatus status;
 917
 918         status.new = status.unread = status.total = 0;
 919         status.str = str;
 920
 921         debug_print("Counting total number of messages...\n");
 922
 923         for (list = folder_list; list != NULL; list = list->next) {
 924                 folder = FOLDER(list->data);
 925                 if (folder->node)
 926                         g_node_traverse(folder->node, G_PRE_ORDER,
 927                                         G_TRAVERSE_ALL, -1,
 928                                         folder_get_status_full_all_func,
 929                                         &status);
 930         }
 931
 932         *new = status.new;
 933         *unread = status.unread;
 934         *total = status.total;
 935 }
 936
 937 gchar *folder_get_status(GPtrArray *folders, gboolean full)
 938 {
 939         guint new, unread, total;
 940         GString *str;
 941         gint i;
 942         gchar *ret;
 943
 944         new = unread = total = 0;
 945
 946         str = g_string_new(NULL);
 947
 948         if (folders) {
 949                 for (i = 0; i < folders->len; i++) {
 950                         FolderItem *item;
 951
 952                         item = g_ptr_array_index(folders, i);
 953                         new += item->new_msgs;
 954                         unread += item->unread_msgs;
 955                         total += item->total_msgs;
 956
 957                         if (full) {
 958                                 gchar *id;
 959
 960                                 id = folder_item_get_identifier(item);
 961                                 g_string_append_printf(str, "%5d %5d %5d %s\n",
 962                                                   item->new_msgs, item->unread_msgs,
 963                                                   item->total_msgs, id);
 964                                 g_free(id);
 965                         }
 966                 }
 967         } else {
 968                 folder_get_status_full_all(full ? str : NULL,
 969                                            &new, &unread, &total);
 970         }
 971
 972         if (full)
 973                 g_string_append_printf(str, "%5d %5d %5d\n", new, unread, total);
 974         else
 975                 g_string_append_printf(str, "%d %d %d\n", new, unread, total);
 976
 977         ret = str->str;
 978         g_string_free(str, FALSE);
 979
 980         return ret;
 981 }
 982
 983 void folder_count_total_msgs(guint *new_msgs, guint *unread_msgs, guint *unreadmarked_msgs, guint *total_msgs)
 984 {
 985         struct TotalMsgCount count;
 986
 987         count.new_msgs = count.unread_msgs = count.unreadmarked_msgs = count.total_msgs = 0;
 988
 989         debug_print("Counting total number of messages...\n");
 990
 991         folder_func_to_all_folders(folder_count_total_msgs_func, &count);
 992
 993         *new_msgs = count.new_msgs;
 994         *unread_msgs = count.unread_msgs;
 995         *unreadmarked_msgs = count.unreadmarked_msgs;
 996         *total_msgs = count.total_msgs;
 997 }
 998
 999 Folder *folder_find_from_path(const gchar *path)
1000 {
1001         GList *list;
1002         Folder *folder;
1003
1004         for (list = folder_list; list != NULL; list = list->next) {
1005                 folder = list->data;
1006                 if ((FOLDER_TYPE(folder) == F_MH ||
1007                      FOLDER_TYPE(folder) == F_MBOX) &&
1008                     !path_cmp(LOCAL_FOLDER(folder)->rootpath, path))
1009                         return folder;
1010         }
1011
1012         return NULL;
1013 }
1014
1015 Folder *folder_find_from_name(const gchar *name, FolderClass *klass)
1016 {
1017         GList *list;
1018         Folder *folder;
1019
1020         for (list = folder_list; list != NULL; list = list->next) {
1021                 folder = list->data;
1022                 if (folder->klass == klass &&
1023                     strcmp2(name, folder->name) == 0)
1024                         return folder;
1025         }
1026
1027         return NULL;
1028 }
1029
1030 static gboolean folder_item_find_func(GNode *node, gpointer data)
1031 {
1032         FolderItem *item = node->data;
1033         gpointer *d = data;
1034         const gchar *path = d[0];
1035
1036         if (path_cmp(path, item->path) != 0)
1037                 return FALSE;
1038
1039         d[1] = item;
1040
1041         return TRUE;
1042 }
1043
1044 FolderItem *folder_find_item_from_path(const gchar *path)
1045 {
1046         Folder *folder;
1047         gpointer d[2];
1048
1049         folder = folder_get_default_folder();
1050         g_return_val_if_fail(folder != NULL, NULL);
1051
1052         d[0] = (gpointer)path;
1053         d[1] = NULL;
1054         g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
1055                         folder_item_find_func, d);
1056         return d[1];
1057 }
1058
1059 FolderItem *folder_find_child_item_by_name(FolderItem *item, const gchar *name)
1060 {
1061         GNode *node;
1062         FolderItem *child;
1063
1064         for (node = item->node->children; node != NULL; node = node->next) {
1065                 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_ascii_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         if (msgfile != NULL) {
2108                 msginfo = folder_item_get_msginfo(item, num);
2109                 if ((msginfo != NULL) && !MSG_IS_SCANNED(msginfo->flags)) {
2110                         MimeInfo *mimeinfo;
2111
2112                         if (msginfo->folder->stype != F_QUEUE &&
2113                             msginfo->folder->stype != F_DRAFT)
2114                                 mimeinfo = procmime_scan_file(msgfile);
2115                         else
2116                                 mimeinfo = procmime_scan_queue_file(msgfile);
2117                         /* check for attachments */
2118                         if (mimeinfo != NULL) {
2119                                 g_node_children_foreach(mimeinfo->node, G_TRAVERSE_ALL, msginfo_set_mime_flags, msginfo);
2120                                 procmime_mimeinfo_free_all(mimeinfo);
2121
2122                                 procmsg_msginfo_set_flags(msginfo, 0, MSG_SCANNED);
2123                         }
2124                 }
2125         }
2126
2127         return msgfile;
2128 }
2129
2130 gint folder_item_fetch_all_msg(FolderItem *item)
2131 {
2132         Folder *folder;
2133         GSList *mlist;
2134         GSList *cur;
2135         gint num = 0;
2136         gint ret = 0;
2137
2138         g_return_val_if_fail(item != NULL, -1);
2139
2140         debug_print("fetching all messages in %s ...\n", item->path);
2141
2142         folder = item->folder;
2143
2144         if (folder->ui_func)
2145                 folder->ui_func(folder, item, folder->ui_func_data ?
2146                                 folder->ui_func_data : GINT_TO_POINTER(num));
2147
2148         mlist = folder_item_get_msg_list(item);
2149
2150         for (cur = mlist; cur != NULL; cur = cur->next) {
2151                 MsgInfo *msginfo = (MsgInfo *)cur->data;
2152                 gchar *msg;
2153
2154                 num++;
2155                 if (folder->ui_func)
2156                         folder->ui_func(folder, item,
2157                                         folder->ui_func_data ?
2158                                         folder->ui_func_data :
2159                                         GINT_TO_POINTER(num));
2160
2161                 msg = folder_item_fetch_msg(item, msginfo->msgnum);
2162                 if (!msg) {
2163                         g_warning("Can't fetch message %d. Aborting.\n",
2164                                   msginfo->msgnum);
2165                         ret = -1;
2166                         break;
2167                 }
2168                 g_free(msg);
2169         }
2170
2171         procmsg_msg_list_free(mlist);
2172
2173         return ret;
2174 }
2175
2176 static gint folder_item_get_msg_num_by_file(FolderItem *dest, const gchar *file)
2177 {
2178         static HeaderEntry hentry[] = {{"Message-ID:",  NULL, TRUE},
2179                                        {NULL,           NULL, FALSE}};
2180         FILE *fp;
2181         MsgInfo *msginfo;
2182         gint msgnum = 0;
2183         gchar buf[BUFFSIZE];
2184
2185         if ((fp = fopen(file, "rb")) == NULL)
2186                 return 0;
2187
2188         if ((dest->stype == F_QUEUE) || (dest->stype == F_DRAFT))
2189                 while (fgets(buf, sizeof(buf), fp) != NULL)
2190                         if (buf[0] == '\r' || buf[0] == '\n') break;
2191
2192         procheader_get_header_fields(fp, hentry);
2193         if (hentry[0].body) {
2194                 extract_parenthesis(hentry[0].body, '<', '>');
2195                 remove_space(hentry[0].body);
2196                 if ((msginfo = msgcache_get_msg_by_id(dest->cache, hentry[0].body)) != NULL) {
2197                         msgnum = msginfo->msgnum;
2198                         procmsg_msginfo_free(msginfo);
2199
2200                         debug_print("found message as uid %d\n", msgnum);
2201                 }
2202         }
2203
2204         g_free(hentry[0].body);
2205         hentry[0].body = NULL;
2206         fclose(fp);
2207
2208         return msgnum;
2209 }
2210
2211 static void copy_msginfo_flags(MsgInfo *source, MsgInfo *dest)
2212 {
2213         MsgPermFlags perm_flags = 0;
2214         MsgTmpFlags tmp_flags = 0;
2215
2216         /* create new flags */
2217         if (source != NULL) {
2218                 /* copy original flags */
2219                 perm_flags = source->flags.perm_flags;
2220                 tmp_flags = source->flags.tmp_flags;
2221         } else {
2222                 perm_flags = dest->flags.perm_flags;
2223                 tmp_flags = dest->flags.tmp_flags;
2224         }
2225
2226         /* remove new, unread and deleted in special folders */
2227         if (dest->folder->stype == F_OUTBOX ||
2228             dest->folder->stype == F_QUEUE  ||
2229             dest->folder->stype == F_DRAFT  ||
2230             dest->folder->stype == F_TRASH)
2231                 perm_flags &= ~(MSG_NEW | MSG_UNREAD | MSG_DELETED);
2232
2233         /* set ignore flag of ignored parent exists */
2234         if (procmsg_msg_has_flagged_parent(dest, MSG_IGNORE_THREAD))
2235                 perm_flags |= MSG_IGNORE_THREAD;
2236
2237         /* Unset tmp flags that should not be copied */
2238         tmp_flags &= ~(MSG_MOVE | MSG_COPY);
2239
2240         /* unset flags that are set but should not */
2241         procmsg_msginfo_unset_flags(dest,
2242                                     dest->flags.perm_flags & ~perm_flags,
2243                                     dest->flags.tmp_flags  & ~tmp_flags);
2244         /* set new flags */
2245         procmsg_msginfo_set_flags(dest,
2246                                   ~dest->flags.perm_flags & perm_flags,
2247                                   ~dest->flags.tmp_flags  & tmp_flags);
2248 }
2249
2250 static void add_msginfo_to_cache(FolderItem *item, MsgInfo *newmsginfo, MsgInfo *flagsource)
2251 {
2252         /* update folder stats */
2253         if (MSG_IS_NEW(newmsginfo->flags))
2254                 item->new_msgs++;
2255         if (MSG_IS_UNREAD(newmsginfo->flags))
2256                 item->unread_msgs++;
2257         if (MSG_IS_UNREAD(newmsginfo->flags) && procmsg_msg_has_marked_parent(newmsginfo))
2258                 item->unreadmarked_msgs++;
2259         item->total_msgs++;
2260
2261         folder_item_update_freeze();
2262         msgcache_add_msg(item->cache, newmsginfo);
2263         copy_msginfo_flags(flagsource, newmsginfo);
2264         folder_item_update_with_msg(item,  F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT | F_ITEM_UPDATE_ADDMSG, newmsginfo);
2265         folder_item_update_thaw();
2266 }
2267
2268 static void remove_msginfo_from_cache(FolderItem *item, MsgInfo *msginfo)
2269 {
2270         MsgInfoUpdate msginfo_update;
2271
2272         if (!item->cache)
2273                 folder_item_read_cache(item);
2274
2275         if (MSG_IS_NEW(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
2276                 msginfo->folder->new_msgs--;
2277         if (MSG_IS_UNREAD(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
2278                 msginfo->folder->unread_msgs--;
2279         if (MSG_IS_UNREAD(msginfo->flags) && procmsg_msg_has_marked_parent(msginfo))
2280                 msginfo->folder->unreadmarked_msgs--;
2281         msginfo->folder->total_msgs--;
2282
2283         msginfo_update.msginfo = msginfo;
2284         msginfo_update.flags = MSGINFO_UPDATE_DELETED;
2285         hooks_invoke(MSGINFO_UPDATE_HOOKLIST, &msginfo_update);
2286
2287         msgcache_remove_msg(item->cache, msginfo->msgnum);
2288         folder_item_update_with_msg(msginfo->folder, F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT | F_ITEM_UPDATE_REMOVEMSG, msginfo);
2289 }
2290
2291 gint folder_item_add_msg(FolderItem *dest, const gchar *file,
2292                          MsgFlags *flags, gboolean remove_source)
2293 {
2294         GSList file_list;
2295         MsgFileInfo fileinfo;
2296
2297         g_return_val_if_fail(dest != NULL, -1);
2298         g_return_val_if_fail(file != NULL, -1);
2299
2300         fileinfo.msginfo = NULL;
2301         fileinfo.file = (gchar *)file;
2302         fileinfo.flags = flags;
2303         file_list.data = &fileinfo;
2304         file_list.next = NULL;
2305
2306         return folder_item_add_msgs(dest, &file_list, remove_source);
2307 }
2308
2309 gint folder_item_add_msgs(FolderItem *dest, GSList *file_list,
2310                           gboolean remove_source)
2311 {
2312         Folder *folder;
2313         gint ret, num, lastnum = -1;
2314         GSList *file_cur;
2315         GRelation *relation;
2316         MsgFileInfo *fileinfo = NULL;
2317         gboolean folderscan = FALSE;
2318
2319         g_return_val_if_fail(dest != NULL, -1);
2320         g_return_val_if_fail(file_list != NULL, -1);
2321         g_return_val_if_fail(dest->folder != NULL, -1);
2322
2323         folder = dest->folder;
2324
2325         relation = g_relation_new(2);
2326         g_relation_index(relation, 0, g_direct_hash, g_direct_equal);
2327
2328         if (folder->klass->add_msgs != NULL) {
2329                 ret = folder->klass->add_msgs(folder, dest, file_list, relation);
2330                 if (ret < 0) {
2331                         g_relation_destroy(relation);
2332                         return ret;
2333                 }
2334         } else {
2335                 for (file_cur = file_list; file_cur != NULL; file_cur = g_slist_next(file_cur)) {
2336                         fileinfo = (MsgFileInfo *) file_cur->data;
2337
2338                         ret = folder->klass->add_msg(folder, dest, fileinfo->file, fileinfo->flags);
2339                         if (ret < 0) {
2340                                 g_relation_destroy(relation);
2341                                 return ret;
2342                         }
2343                         g_relation_insert(relation, fileinfo, GINT_TO_POINTER(ret));
2344                 }
2345         }
2346
2347         for (file_cur = file_list; file_cur != NULL; file_cur = g_slist_next(file_cur)) {
2348                 GTuples *tuples;
2349
2350                 fileinfo = (MsgFileInfo *) file_cur->data;
2351                 tuples = g_relation_select(relation, fileinfo, 0);
2352                 num = GPOINTER_TO_INT(g_tuples_index(tuples, 0, 1));
2353                 g_tuples_destroy(tuples);
2354
2355                 if (num >= 0) {
2356                         MsgInfo *newmsginfo;
2357
2358                         if (num == 0) {
2359                                 if (!folderscan) {
2360                                         folder_item_scan_full(dest, FALSE);
2361                                         folderscan = TRUE;
2362                                 }
2363                                 num = folder_item_get_msg_num_by_file(dest, fileinfo->file);
2364                         }
2365
2366                         if (num > lastnum)
2367                                 lastnum = num;
2368
2369                         if (num >= 0 && remove_source) {
2370                                 if (unlink(fileinfo->file) < 0)
2371                                         FILE_OP_ERROR(fileinfo->file, "unlink");
2372                         }
2373
2374                         if (num == 0)
2375                                 continue;
2376
2377                         if (!folderscan &&
2378                             ((newmsginfo = get_msginfo(dest, num)) != NULL)) {
2379                                 add_msginfo_to_cache(dest, newmsginfo, NULL);
2380                                 procmsg_msginfo_free(newmsginfo);
2381                         } else if ((newmsginfo = msgcache_get_msg(dest->cache, num)) != NULL) {
2382                                 /* TODO: set default flags */
2383                                 procmsg_msginfo_free(newmsginfo);
2384                         }
2385                 }
2386         }
2387
2388         g_relation_destroy(relation);
2389
2390         return lastnum;
2391 }
2392
2393 /*
2394 gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
2395 {
2396         Folder *folder;
2397         gint num;
2398
2399         g_return_val_if_fail(dest != NULL, -1);
2400         g_return_val_if_fail(msginfo != NULL, -1);
2401
2402         folder = dest->folder;
2403         if (dest->last_num < 0) folder->scan(folder, dest);
2404
2405         num = folder->move_msg(folder, dest, msginfo);
2406         if (num > 0) dest->last_num = num;
2407
2408         return num;
2409 }
2410 */
2411
2412 FolderItem *folder_item_move_recursive(FolderItem *src, FolderItem *dest)
2413 {
2414         GSList *mlist;
2415         FolderItem *new_item;
2416         FolderItem *next_item;
2417         GNode *srcnode;
2418         gchar *old_id, *new_id;
2419
2420         mlist = folder_item_get_msg_list(src);
2421
2422         /* move messages */
2423         debug_print("Moving %s to %s\n", src->path, dest->path);
2424         new_item = folder_create_folder(dest, src->name);
2425         if (new_item == NULL) {
2426                 printf("Can't create folder\n");
2427                 return NULL;
2428         }
2429
2430         if (new_item->folder == NULL)
2431                 new_item->folder = dest->folder;
2432
2433         /* move messages */
2434         log_message(_("Moving %s to %s...\n"),
2435                         src->name, new_item->path);
2436         if (mlist != NULL)
2437                 folder_item_move_msgs(new_item, mlist);
2438
2439         /*copy prefs*/
2440         folder_item_prefs_copy_prefs(src, new_item);
2441         new_item->collapsed = src->collapsed;
2442         new_item->thread_collapsed = src->thread_collapsed;
2443         new_item->threaded  = src->threaded;
2444         new_item->ret_rcpt  = src->ret_rcpt;
2445         new_item->hide_read_msgs = src->hide_read_msgs;
2446         new_item->sort_key  = src->sort_key;
2447         new_item->sort_type = src->sort_type;
2448
2449         prefs_matcher_write_config();
2450
2451         /* recurse */
2452         srcnode = src->folder->node;
2453         srcnode = g_node_find(srcnode, G_PRE_ORDER, G_TRAVERSE_ALL, src);
2454         srcnode = srcnode->children;
2455         while (srcnode != NULL) {
2456                 if (srcnode && srcnode->data) {
2457                         next_item = (FolderItem*) srcnode->data;
2458                         srcnode = srcnode->next;
2459                         if (folder_item_move_recursive(next_item, new_item) == NULL)
2460                                 return NULL;
2461                 }
2462         }
2463         old_id = folder_item_get_identifier(src);
2464         new_id = folder_item_get_identifier(new_item);
2465         debug_print("updating rules : %s => %s\n", old_id, new_id);
2466
2467         /* if src supports removing, otherwise only copy folder */
2468         if (src->folder->klass->remove_folder != NULL)
2469                 src->folder->klass->remove_folder(src->folder, src);
2470         folder_write_list();
2471
2472         if (old_id != NULL && new_id != NULL)
2473                 prefs_filtering_rename_path(old_id, new_id);
2474         g_free(old_id);
2475         g_free(new_id);
2476
2477         return new_item;
2478 }
2479
2480 gint folder_item_move_to(FolderItem *src, FolderItem *dest, FolderItem **new_item)
2481 {
2482         FolderItem *tmp = folder_item_parent(dest);
2483         gchar * src_identifier, * dst_identifier;
2484         gchar * phys_srcpath, * phys_dstpath;
2485
2486         while (tmp) {
2487                 if (tmp == src) {
2488                         return F_MOVE_FAILED_DEST_IS_CHILD;
2489                 }
2490                 tmp = folder_item_parent(tmp);;
2491         }
2492
2493         tmp = folder_item_parent(src);
2494
2495         src_identifier = folder_item_get_identifier(src);
2496         dst_identifier = folder_item_get_identifier(dest);
2497
2498         if(dst_identifier == NULL && dest->folder && folder_item_parent(dest) == NULL) {
2499                 /* dest can be a root folder */
2500                 dst_identifier = folder_get_identifier(dest->folder);
2501         }
2502         if (src_identifier == NULL || dst_identifier == NULL) {
2503                 debug_print("Can't get identifiers\n");
2504                 return F_MOVE_FAILED;
2505         }
2506
2507         if (src->folder != dest->folder) {
2508                 return F_MOVE_FAILED_DEST_OUTSIDE_MAILBOX;
2509         }
2510
2511         phys_srcpath = folder_item_get_path(src);
2512         phys_dstpath = g_strconcat(folder_item_get_path(dest),G_DIR_SEPARATOR_S,g_basename(phys_srcpath),NULL);
2513
2514         if (folder_item_parent(src) == dest || src == dest) {
2515                 g_free(src_identifier);
2516                 g_free(dst_identifier);
2517                 g_free(phys_srcpath);
2518                 g_free(phys_dstpath);
2519                 return F_MOVE_FAILED_DEST_IS_PARENT;
2520         }
2521         debug_print("moving \"%s\" to \"%s\"\n", phys_srcpath, phys_dstpath);
2522         if ((tmp = folder_item_move_recursive(src, dest)) == NULL) {
2523                 return F_MOVE_FAILED;
2524         }
2525
2526         g_free(src_identifier);
2527         g_free(dst_identifier);
2528         g_free(phys_srcpath);
2529         g_free(phys_dstpath);
2530
2531         *new_item = tmp;
2532
2533         return F_MOVE_OK;
2534 }
2535
2536 /**
2537  * Copy a list of message to a new folder and remove
2538  * source messages if wanted
2539  */
2540 static gint do_copy_msgs(FolderItem *dest, GSList *msglist, gboolean remove_source)
2541 {
2542         Folder *folder;
2543         GSList *l;
2544         gint num, lastnum = -1;
2545         gboolean folderscan = FALSE;
2546         GRelation *relation;
2547
2548         g_return_val_if_fail(dest != NULL, -1);
2549         g_return_val_if_fail(msglist != NULL, -1);
2550
2551         folder = dest->folder;
2552
2553         g_return_val_if_fail(folder->klass->copy_msg != NULL, -1);
2554
2555         relation = g_relation_new(2);
2556         g_relation_index(relation, 0, g_direct_hash, g_direct_equal);
2557         g_relation_index(relation, 1, g_direct_hash, g_direct_equal);
2558
2559         for (l = msglist ; l != NULL ; l = g_slist_next(l)) {
2560                 MsgInfo * msginfo = (MsgInfo *) l->data;
2561
2562                 if (msginfo->planned_download != 0) {
2563                         int old_planned = msginfo->planned_download;
2564                         partial_unmark(msginfo);
2565                         /* little hack to reenable after */
2566                         msginfo->planned_download = old_planned;
2567                 }
2568         }
2569
2570         /*
2571          * Copy messages to destination folder and
2572          * store new message numbers in newmsgnums
2573          */
2574         if (folder->klass->copy_msgs != NULL) {
2575                 if (folder->klass->copy_msgs(folder, dest, msglist, relation) < 0) {
2576                         g_relation_destroy(relation);
2577                         return -1;
2578                 }
2579         } else {
2580                 for (l = msglist ; l != NULL ; l = g_slist_next(l)) {
2581                         MsgInfo * msginfo = (MsgInfo *) l->data;
2582
2583                         num = folder->klass->copy_msg(folder, dest, msginfo);
2584                         g_relation_insert(relation, msginfo, GINT_TO_POINTER(num));
2585                 }
2586         }
2587
2588         /* Read cache for dest folder */
2589         if (!dest->cache) folder_item_read_cache(dest);
2590
2591         /*
2592          * Fetch new MsgInfos for new messages in dest folder,
2593          * add them to the msgcache and update folder message counts
2594          */
2595         if (g_relation_count(relation, GINT_TO_POINTER(0), 1) > 0) {
2596                 folder_item_scan_full(dest, FALSE);
2597                 folderscan = TRUE;
2598         }
2599
2600         for (l = msglist; l != NULL; l = g_slist_next(l)) {
2601                 MsgInfo *msginfo = (MsgInfo *) l->data;
2602                 GTuples *tuples;
2603
2604                 tuples = g_relation_select(relation, msginfo, 0);
2605                 num = GPOINTER_TO_INT(g_tuples_index(tuples, 0, 1));
2606                 g_tuples_destroy(tuples);
2607
2608                 if (num >= 0) {
2609                         MsgInfo *newmsginfo = NULL;
2610
2611                         if (folderscan) {
2612                                 if (msginfo->msgid != NULL) {
2613                                         newmsginfo = folder_item_get_msginfo_by_msgid(dest, msginfo->msgid);
2614                                         if (newmsginfo != NULL) {
2615                                                 copy_msginfo_flags(msginfo, newmsginfo);
2616                                                 num = newmsginfo->msgnum;
2617                                         }
2618                                 }
2619                         } else {
2620                                 newmsginfo = get_msginfo(dest, num);
2621                                 if (newmsginfo != NULL) {
2622                                         add_msginfo_to_cache(dest, newmsginfo, msginfo);
2623                                 }
2624                         }
2625
2626                         if (msginfo->planned_download
2627                             == POP3_PARTIAL_DLOAD_DELE) {
2628                                 partial_mark_for_delete(newmsginfo);
2629                         }
2630                         if (msginfo->planned_download
2631                             == POP3_PARTIAL_DLOAD_DLOAD) {
2632                                 partial_mark_for_download(newmsginfo);
2633                         }
2634                         procmsg_msginfo_free(newmsginfo);
2635
2636
2637                         if (num > lastnum)
2638                                 lastnum = num;
2639                 }
2640         }
2641
2642         if (remove_source) {
2643                 /*
2644                  * Remove source messages from their folders if
2645                  * copying was successfull and update folder
2646                  * message counts
2647                  */
2648                 for (l = msglist; l != NULL; l = g_slist_next(l)) {
2649                         MsgInfo *msginfo = (MsgInfo *) l->data;
2650                         FolderItem *item = msginfo->folder;
2651                         GTuples *tuples;
2652
2653                         tuples = g_relation_select(relation, msginfo, 0);
2654                         num = GPOINTER_TO_INT(g_tuples_index(tuples, 0, 1));
2655                         g_tuples_destroy(tuples);
2656
2657                         if ((num >= 0) && (item->folder->klass->remove_msg != NULL)) {
2658                                 item->folder->klass->remove_msg(item->folder,
2659                                                                 msginfo->folder,
2660                                                                 msginfo->msgnum);
2661                                 remove_msginfo_from_cache(item, msginfo);
2662                         }
2663                 }
2664         }
2665
2666         g_relation_destroy(relation);
2667         return lastnum;
2668 }
2669
2670 /**
2671  * Move a message to a new folder.
2672  *
2673  * \param dest Destination folder
2674  * \param msginfo The message
2675  */
2676 gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
2677 {
2678         GSList list;
2679
2680         g_return_val_if_fail(dest != NULL, -1);
2681         g_return_val_if_fail(msginfo != NULL, -1);
2682
2683         list.data = msginfo;
2684         list.next = NULL;
2685
2686         return do_copy_msgs(dest, &list, TRUE);
2687 }
2688
2689 /**
2690  * Move a list of messages to a new folder.
2691  *
2692  * \param dest Destination folder
2693  * \param msglist List of messages
2694  */
2695 gint folder_item_move_msgs(FolderItem *dest, GSList *msglist)
2696 {
2697         g_return_val_if_fail(dest != NULL, -1);
2698         g_return_val_if_fail(msglist != NULL, -1);
2699
2700         return do_copy_msgs(dest, msglist, TRUE);
2701 }
2702
2703 /**
2704  * Copy a message to a new folder.
2705  *
2706  * \param dest Destination folder
2707  * \param msginfo The message
2708  */
2709 gint folder_item_copy_msg(FolderItem *dest, MsgInfo *msginfo)
2710 {
2711         GSList list;
2712
2713         g_return_val_if_fail(dest != NULL, -1);
2714         g_return_val_if_fail(msginfo != NULL, -1);
2715
2716         list.data = msginfo;
2717         list.next = NULL;
2718
2719         return do_copy_msgs(dest, &list, FALSE);
2720 }
2721
2722 /**
2723  * Copy a list of messages to a new folder.
2724  *
2725  * \param dest Destination folder
2726  * \param msglist List of messages
2727  */
2728 gint folder_item_copy_msgs(FolderItem *dest, GSList *msglist)
2729 {
2730         g_return_val_if_fail(dest != NULL, -1);
2731         g_return_val_if_fail(msglist != NULL, -1);
2732
2733         return do_copy_msgs(dest, msglist, FALSE);
2734 }
2735
2736 gint folder_item_remove_msg(FolderItem *item, gint num)
2737 {
2738         Folder *folder;
2739         gint ret;
2740         MsgInfo *msginfo;
2741
2742         g_return_val_if_fail(item != NULL, -1);
2743         folder = item->folder;
2744         g_return_val_if_fail(folder->klass->remove_msg != NULL, -1);
2745
2746         if (!item->cache) folder_item_read_cache(item);
2747
2748         ret = folder->klass->remove_msg(folder, item, num);
2749
2750         msginfo = msgcache_get_msg(item->cache, num);
2751         if (msginfo != NULL) {
2752                 remove_msginfo_from_cache(item, msginfo);
2753                 procmsg_msginfo_free(msginfo);
2754         }
2755
2756         return ret;
2757 }
2758
2759 gint folder_item_remove_msgs(FolderItem *item, GSList *msglist)
2760 {
2761         Folder *folder;
2762         gint ret = 0;
2763
2764         g_return_val_if_fail(item != NULL, -1);
2765         folder = item->folder;
2766         g_return_val_if_fail(folder != NULL, -1);
2767
2768         if (!item->cache) folder_item_read_cache(item);
2769
2770         folder_item_update_freeze();
2771         while (msglist != NULL) {
2772                 MsgInfo *msginfo = (MsgInfo *)msglist->data;
2773
2774                 ret = folder_item_remove_msg(item, msginfo->msgnum);
2775                 if (ret != 0) break;
2776                 msgcache_remove_msg(item->cache, msginfo->msgnum);
2777                 msglist = msglist->next;
2778         }
2779         folder_item_update_thaw();
2780
2781         return ret;
2782 }
2783
2784 gint folder_item_remove_all_msg(FolderItem *item)
2785 {
2786         Folder *folder;
2787         gint result;
2788
2789         g_return_val_if_fail(item != NULL, -1);
2790
2791         folder = item->folder;
2792
2793         g_return_val_if_fail(folder->klass->remove_all_msg != NULL, -1);
2794
2795         result = folder->klass->remove_all_msg(folder, item);
2796
2797         if (result == 0) {
2798                 folder_item_free_cache(item);
2799                 item->cache = msgcache_new();
2800
2801                 item->new_msgs = 0;
2802                 item->unread_msgs = 0;
2803                 item->unreadmarked_msgs = 0;
2804                 item->total_msgs = 0;
2805                 folder_item_update(item, F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT);
2806         }
2807
2808         return result;
2809 }
2810
2811 void folder_item_change_msg_flags(FolderItem *item, MsgInfo *msginfo, MsgPermFlags newflags)
2812 {
2813         g_return_if_fail(item != NULL);
2814         g_return_if_fail(msginfo != NULL);
2815
2816         if (item->folder->klass->change_flags != NULL) {
2817                 item->folder->klass->change_flags(item->folder, item, msginfo, newflags);
2818         } else {
2819                 msginfo->flags.perm_flags = newflags;
2820         }
2821 }
2822
2823 gboolean folder_item_is_msg_changed(FolderItem *item, MsgInfo *msginfo)
2824 {
2825         Folder *folder;
2826
2827         g_return_val_if_fail(item != NULL, FALSE);
2828
2829         folder = item->folder;
2830
2831         g_return_val_if_fail(folder->klass->is_msg_changed != NULL, -1);
2832
2833         return folder->klass->is_msg_changed(folder, item, msginfo);
2834 }
2835
2836 gchar *folder_item_get_cache_file(FolderItem *item)
2837 {
2838         gchar *path;
2839         gchar *file;
2840
2841         g_return_val_if_fail(item != NULL, NULL);
2842         g_return_val_if_fail(item->path != NULL, NULL);
2843
2844         path = folder_item_get_path(item);
2845         g_return_val_if_fail(path != NULL, NULL);
2846         if (!is_dir_exist(path))
2847                 make_dir_hier(path);
2848         file = g_strconcat(path, G_DIR_SEPARATOR_S, CACHE_FILE, NULL);
2849         g_free(path);
2850
2851         return file;
2852 }
2853
2854 gchar *folder_item_get_mark_file(FolderItem *item)
2855 {
2856         gchar *path;
2857         gchar *file;
2858
2859         g_return_val_if_fail(item != NULL, NULL);
2860         g_return_val_if_fail(item->path != NULL, NULL);
2861
2862         path = folder_item_get_path(item);
2863         g_return_val_if_fail(path != NULL, NULL);
2864         if (!is_dir_exist(path))
2865                 make_dir_hier(path);
2866         file = g_strconcat(path, G_DIR_SEPARATOR_S, MARK_FILE, NULL);
2867         g_free(path);
2868
2869         return file;
2870 }
2871
2872 static gpointer xml_to_folder_item(gpointer nodedata, gpointer data)
2873 {
2874         XMLNode *xmlnode = (XMLNode *) nodedata;
2875         Folder *folder = (Folder *) data;
2876         FolderItem *item;
2877
2878         g_return_val_if_fail(xmlnode != NULL, NULL);
2879         g_return_val_if_fail(folder != NULL, NULL);
2880
2881         if (strcmp2(xmlnode->tag->tag, "folderitem") != 0) {
2882                 g_warning("tag name != \"folderitem\"\n");
2883                 return NULL;
2884         }
2885
2886         item = folder_item_new(folder, "", "");
2887         if (folder->klass->item_set_xml != NULL)
2888                 folder->klass->item_set_xml(folder, item, xmlnode->tag);
2889         else
2890                 folder_item_set_xml(folder, item, xmlnode->tag);
2891
2892         item->folder = folder;
2893
2894         switch (item->stype) {
2895         case F_INBOX:  folder->inbox  = item; break;
2896         case F_OUTBOX: folder->outbox = item; break;
2897         case F_DRAFT:  folder->draft  = item; break;
2898         case F_QUEUE:  folder->queue  = item; break;
2899         case F_TRASH:  folder->trash  = item; break;
2900         default:       break;
2901         }
2902         folder_item_prefs_read_config(item);
2903
2904         return item;
2905 }
2906
2907 static gboolean folder_item_set_node(GNode *node, gpointer data)
2908 {
2909         FolderItem *item = (FolderItem *) node->data;
2910         item->node = node;
2911
2912         return FALSE;
2913 }
2914
2915 static Folder *folder_get_from_xml(GNode *node)
2916 {
2917         Folder *folder;
2918         XMLNode *xmlnode;
2919         GList *list;
2920         FolderClass *klass = NULL;
2921         GNode *cur;
2922
2923         g_return_val_if_fail(node->data != NULL, NULL);
2924
2925         xmlnode = node->data;
2926         if (strcmp2(xmlnode->tag->tag, "folder") != 0) {
2927                 g_warning("tag name != \"folder\"\n");
2928                 return NULL;
2929         }
2930         list = xmlnode->tag->attr;
2931         for (; list != NULL; list = list->next) {
2932                 XMLAttr *attr = list->data;
2933
2934                 if (!attr || !attr->name || !attr->value) continue;
2935                 if (!strcmp(attr->name, "type"))
2936                         klass = folder_get_class_from_string(attr->value);
2937         }
2938         if (klass == NULL)
2939                 return NULL;
2940
2941         folder = folder_new(klass, "", "");
2942         g_return_val_if_fail(folder != NULL, NULL);
2943
2944         if (klass->set_xml)
2945                 klass->set_xml(folder, xmlnode->tag);
2946         else
2947                 folder_set_xml(folder, xmlnode->tag);
2948
2949         cur = node->children;
2950         while (cur != NULL) {
2951                 GNode *itemnode;
2952
2953                 itemnode = g_node_map(cur, xml_to_folder_item, (gpointer) folder);
2954                 g_node_append(folder->node, itemnode);
2955                 cur = cur->next;
2956         }
2957         g_node_traverse(folder->node, G_IN_ORDER, G_TRAVERSE_ALL, -1, folder_item_set_node, NULL);
2958
2959         return folder;
2960 }
2961
2962 static gchar *folder_get_list_path(void)
2963 {
2964         static gchar *filename = NULL;
2965
2966         if (!filename)
2967                 filename =  g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
2968                                         FOLDER_LIST, NULL);
2969
2970         return filename;
2971 }
2972
2973 #define PUT_ESCAPE_STR(fp, attr, str)                   \
2974 {                                                       \
2975         fputs(" " attr "=\"", fp);                      \
2976         xml_file_put_escape_str(fp, str);               \
2977         fputs("\"", fp);                                \
2978 }
2979
2980 static gpointer folder_item_to_xml(gpointer nodedata, gpointer data)
2981 {
2982         FolderItem *item = (FolderItem *) nodedata;
2983         XMLTag *tag;
2984
2985         g_return_val_if_fail(item != NULL, NULL);
2986
2987         if (item->folder->klass->item_get_xml != NULL)
2988                 tag = item->folder->klass->item_get_xml(item->folder, item);
2989         else
2990                 tag = folder_item_get_xml(item->folder, item);
2991
2992         return xml_node_new(tag, NULL);;
2993 }
2994
2995 static GNode *folder_get_xml_node(Folder *folder)
2996 {
2997         GNode *node;
2998         XMLNode *xmlnode;
2999         XMLTag *tag;
3000
3001         g_return_val_if_fail(folder != NULL, NULL);
3002
3003         if (folder->klass->get_xml != NULL)
3004                 tag = folder->klass->get_xml(folder);
3005         else
3006                 tag = folder_get_xml(folder);
3007
3008         xml_tag_add_attr(tag, xml_attr_new("type", folder->klass->idstr));
3009
3010         xmlnode = xml_node_new(tag, NULL);
3011
3012         node = g_node_new(xmlnode);
3013         if (folder->node->children) {
3014                 GNode *cur;
3015
3016                 cur = folder->node->children;
3017                 while (cur) {
3018                         GNode *xmlnode;
3019
3020                         xmlnode = g_node_map(cur, folder_item_to_xml, (gpointer) folder);
3021                         g_node_append(node, xmlnode);
3022                         cur = cur->next;
3023                 }
3024         }
3025
3026         return node;
3027 }
3028
3029 static void folder_update_op_count_rec(GNode *node)
3030 {
3031         FolderItem *fitem = FOLDER_ITEM(node->data);
3032
3033         if (g_node_depth(node) > 0) {
3034                 if (fitem->op_count > 0) {
3035                         fitem->op_count = 0;
3036                         folder_item_update(fitem, F_ITEM_UPDATE_MSGCNT);
3037                 }
3038                 if (node->children) {
3039                         GNode *child;
3040
3041                         child = node->children;
3042                         while (child) {
3043                                 GNode *cur;
3044
3045                                 cur = child;
3046                                 child = cur->next;
3047                                 folder_update_op_count_rec(cur);
3048                         }
3049                 }
3050         }
3051 }
3052
3053 void folder_update_op_count(void)
3054 {
3055         GList *cur;
3056         Folder *folder;
3057
3058         for (cur = folder_list; cur != NULL; cur = cur->next) {
3059                 folder = cur->data;
3060                 folder_update_op_count_rec(folder->node);
3061         }
3062 }
3063
3064 typedef struct _type_str {
3065         gchar * str;
3066         gint type;
3067 } type_str;
3068
3069
3070 /*
3071 static gchar * folder_item_get_tree_identifier(FolderItem * item)
3072 {
3073         if (item->parent != NULL) {
3074                 gchar * path;
3075                 gchar * id;
3076
3077                 path = folder_item_get_tree_identifier(item->parent);
3078                 if (path == NULL)
3079                         return NULL;
3080
3081                 id = g_strconcat(path, "/", item->name, NULL);
3082                 g_free(path);
3083
3084                 return id;
3085         }
3086         else {
3087                 return g_strconcat("/", item->name, NULL);
3088         }
3089 }
3090 */
3091
3092 /* CLAWS: temporary local folder for filtering */
3093 #define TEMP_FOLDER "TEMP_FOLDER"
3094 #define PROCESSING_FOLDER_ITEM "processing"
3095
3096 static FolderItem *processing_folder_item;
3097
3098 static void folder_create_processing_folder(void)
3099 {
3100         Folder *processing_folder;
3101         gchar      *tmpname;
3102
3103         if ((processing_folder = folder_find_from_name(TEMP_FOLDER, mh_get_class())) == NULL) {
3104                 gchar *tmppath;
3105
3106                 tmppath =
3107                     g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
3108                                 "tempfolder", NULL);
3109                 processing_folder =
3110                     folder_new(mh_get_class(), TEMP_FOLDER, tmppath);
3111                 g_free(tmppath);
3112         }
3113         g_assert(processing_folder != NULL);
3114
3115         debug_print("tmpparentroot %s\n", LOCAL_FOLDER(processing_folder)->rootpath);
3116         if (LOCAL_FOLDER(processing_folder)->rootpath[0] == '/')
3117                 tmpname = g_strconcat(LOCAL_FOLDER(processing_folder)->rootpath,
3118                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER_ITEM,
3119                                       NULL);
3120         else
3121                 tmpname = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
3122                                       LOCAL_FOLDER(processing_folder)->rootpath,
3123                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER_ITEM,
3124                                       NULL);
3125
3126         if (!is_dir_exist(tmpname)) {
3127                 debug_print("*TMP* creating %s\n", tmpname);
3128                 processing_folder_item = processing_folder->klass->create_folder(processing_folder,
3129                                                                                  processing_folder->node->data,
3130                                                                                  PROCESSING_FOLDER_ITEM);
3131         } else {
3132                 debug_print("*TMP* already created\n");
3133                 processing_folder_item = folder_item_new(processing_folder, PROCESSING_FOLDER_ITEM, PROCESSING_FOLDER_ITEM);
3134                 g_assert(processing_folder_item);
3135                 folder_item_append(processing_folder->node->data, processing_folder_item);
3136         }
3137         g_assert(processing_folder_item != NULL);
3138         g_free(tmpname);
3139 }
3140
3141 FolderItem *folder_get_default_processing(void)
3142 {
3143         if (!processing_folder_item) {
3144                 folder_create_processing_folder();
3145         }
3146         return processing_folder_item;
3147 }
3148
3149 /* folder_persist_prefs_new() - return hash table with persistent
3150  * settings (and folder name as key).
3151  * (note that in claws other options are in the folder_item_prefs_RC
3152  * file, so those don't need to be included in PersistPref yet)
3153  */
3154 GHashTable *folder_persist_prefs_new(Folder *folder)
3155 {
3156         GHashTable *pptable;
3157
3158         g_return_val_if_fail(folder, NULL);
3159         pptable = g_hash_table_new(g_str_hash, g_str_equal);
3160         folder_get_persist_prefs_recursive(folder->node, pptable);
3161         return pptable;
3162 }
3163
3164 void folder_persist_prefs_free(GHashTable *pptable)
3165 {
3166         g_return_if_fail(pptable);
3167         g_hash_table_foreach_remove(pptable, persist_prefs_free, NULL);
3168         g_hash_table_destroy(pptable);
3169 }
3170
3171 const PersistPrefs *folder_get_persist_prefs(GHashTable *pptable, const char *name)
3172 {
3173         if (pptable == NULL || name == NULL) return NULL;
3174         return g_hash_table_lookup(pptable, name);
3175 }
3176
3177 void folder_item_restore_persist_prefs(FolderItem *item, GHashTable *pptable)
3178 {
3179         const PersistPrefs *pp;
3180         gchar *id = folder_item_get_identifier(item);
3181
3182         pp = folder_get_persist_prefs(pptable, id);
3183         g_free(id);
3184
3185         if (!pp) return;
3186
3187         /* CLAWS: since not all folder properties have been migrated to
3188          * folderlist.xml, we need to call the old stuff first before
3189          * setting things that apply both to Main and Claws. */
3190         folder_item_prefs_read_config(item);
3191
3192         item->collapsed = pp->collapsed;
3193         item->thread_collapsed = pp->thread_collapsed;
3194         item->threaded  = pp->threaded;
3195         item->ret_rcpt  = pp->ret_rcpt;
3196         item->hide_read_msgs = pp->hide_read_msgs;
3197         item->sort_key  = pp->sort_key;
3198         item->sort_type = pp->sort_type;
3199 }
3200
3201 static void folder_get_persist_prefs_recursive(GNode *node, GHashTable *pptable)
3202 {
3203         FolderItem *item = FOLDER_ITEM(node->data);
3204         PersistPrefs *pp;
3205         GNode *child, *cur;
3206         gchar *id;
3207
3208         g_return_if_fail(node != NULL);
3209         g_return_if_fail(item != NULL);
3210
3211         /* NOTE: item->path == NULL means top level folder; not interesting
3212          * to store preferences of that one.  */
3213         if (item->path) {
3214                 id = folder_item_get_identifier(item);
3215                 pp = g_new0(PersistPrefs, 1);
3216                 g_return_if_fail(pp != NULL);
3217                 pp->collapsed = item->collapsed;
3218                 pp->thread_collapsed = item->thread_collapsed;
3219                 pp->threaded  = item->threaded;
3220                 pp->ret_rcpt  = item->ret_rcpt;
3221                 pp->hide_read_msgs = item->hide_read_msgs;
3222                 pp->sort_key  = item->sort_key;
3223                 pp->sort_type = item->sort_type;
3224                 g_hash_table_insert(pptable, id, pp);
3225         }
3226
3227         if (node->children) {
3228                 child = node->children;
3229                 while (child) {
3230                         cur = child;
3231                         child = cur->next;
3232                         folder_get_persist_prefs_recursive(cur, pptable);
3233                 }
3234         }
3235 }
3236
3237 static gboolean persist_prefs_free(gpointer key, gpointer val, gpointer data)
3238 {
3239         if (key)
3240                 g_free(key);
3241         if (val)
3242                 g_free(val);
3243         return TRUE;
3244 }
3245
3246 void folder_item_apply_processing(FolderItem *item)
3247 {
3248         GSList *processing_list;
3249         GSList *mlist, *cur;
3250
3251         g_return_if_fail(item != NULL);
3252
3253         processing_list = item->prefs->processing;
3254
3255         folder_item_update_freeze();
3256
3257         mlist = folder_item_get_msg_list(item);
3258         for (cur = mlist ; cur != NULL ; cur = cur->next) {
3259                 MsgInfo * msginfo;
3260
3261                 msginfo = (MsgInfo *) cur->data;
3262
3263                 /* reset parameters that can be modified by processing */
3264                 msginfo->hidden = 0;
3265                 msginfo->score = 0;
3266
3267                 /* apply pre global rules */
3268                 filter_message_by_msginfo(pre_global_processing, msginfo);
3269
3270                 /* apply rules of the folder */
3271                 filter_message_by_msginfo(processing_list, msginfo);
3272
3273                 /* apply post global rules */
3274                 filter_message_by_msginfo(post_global_processing, msginfo);
3275
3276                 procmsg_msginfo_free(msginfo);
3277         }
3278         g_slist_free(mlist);
3279
3280         folder_item_update_thaw();
3281 }
3282
3283 /*
3284  *  functions for handling FolderItem content changes
3285  */
3286 static gint folder_item_update_freeze_cnt = 0;
3287
3288 static void folder_item_update_with_msg(FolderItem *item, FolderItemUpdateFlags update_flags, MsgInfo *msg)
3289 {
3290         if (folder_item_update_freeze_cnt == 0 /* || (msg != NULL && item->opened) */) {
3291                 FolderItemUpdateData source;
3292
3293                 source.item = item;
3294                 source.update_flags = update_flags;
3295                 source.msg = msg;
3296                 hooks_invoke(FOLDER_ITEM_UPDATE_HOOKLIST, &source);
3297         } else {
3298                 item->update_flags |= update_flags & ~(F_ITEM_UPDATE_ADDMSG | F_ITEM_UPDATE_REMOVEMSG);
3299         }
3300 }
3301
3302 /**
3303  * Notify the folder system about changes to a folder. If the
3304  * update system is not frozen the FOLDER_ITEM_UPDATE_HOOKLIST will
3305  * be invoked, otherwise the changes will be remebered until
3306  * the folder system is thawed.
3307  *
3308  * \param item The FolderItem that was changed
3309  * \param update_flags Type of changed that was made
3310  */
3311 void folder_item_update(FolderItem *item, FolderItemUpdateFlags update_flags)
3312 {
3313         folder_item_update_with_msg(item, update_flags, NULL);
3314 }
3315
3316 void folder_item_update_recursive(FolderItem *item, FolderItemUpdateFlags update_flags)
3317 {
3318         GNode *node = item->folder->node;
3319
3320         node = g_node_find(node, G_PRE_ORDER, G_TRAVERSE_ALL, item);
3321         node = node->children;
3322
3323         folder_item_update(item, update_flags);
3324         while (node != NULL) {
3325                 if (node && node->data) {
3326                         FolderItem *next_item = (FolderItem*) node->data;
3327
3328                         folder_item_update(next_item, update_flags);
3329                 }
3330                 node = node->next;
3331         }
3332 }
3333
3334 void folder_item_update_freeze(void)
3335 {
3336         folder_item_update_freeze_cnt++;
3337 }
3338
3339 static void folder_item_update_func(FolderItem *item, gpointer data)
3340 {
3341         FolderItemUpdateData source;
3342
3343         if (item->update_flags) {
3344                 source.item = item;
3345                 source.update_flags = item->update_flags;
3346                 hooks_invoke(FOLDER_ITEM_UPDATE_HOOKLIST, &source);
3347                 item->update_flags = 0;
3348         }
3349 }
3350
3351 void folder_item_update_thaw(void)
3352 {
3353         if (folder_item_update_freeze_cnt > 0)
3354                 folder_item_update_freeze_cnt--;
3355         if (folder_item_update_freeze_cnt == 0) {
3356                 /* Update all folders */
3357                 folder_func_to_all_folders(folder_item_update_func, NULL);
3358         }
3359 }
3360
3361 #undef PUT_ESCAPE_STR