src/folder.c

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