src/folder.c

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