src/folder.c

   1 /*
   2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
   3  * Copyright (C) 1999-2002 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 "folderview.h"
  37 #include "session.h"
  38 #include "imap.h"
  39 #include "news.h"
  40 #include "mh.h"
  41 #include "mbox_folder.h"
  42 #include "utils.h"
  43 #include "xml.h"
  44 #include "codeconv.h"
  45 #include "prefs.h"
  46 #include "prefs_common.h"
  47 #include "account.h"
  48 #include "prefs_account.h"
  49 #include "filtering.h"
  50 #include "scoring.h"
  51 #include "prefs_folder_item.h"
  52 #include "procheader.h"
  53
  54 static GList *folder_list = NULL;
  55
  56 static void folder_init         (Folder         *folder,
  57                                  const gchar    *name);
  58
  59 static gboolean folder_read_folder_func (GNode          *node,
  60                                          gpointer        data);
  61 static gchar *folder_get_list_path      (void);
  62 static void folder_write_list_recursive (GNode          *node,
  63                                          gpointer        data);
  64 static void folder_update_op_count_rec  (GNode          *node);
  65
  66
  67 static void folder_get_persist_prefs_recursive
  68                                         (GNode *node, GHashTable *pptable);
  69 static gboolean persist_prefs_free      (gpointer key, gpointer val, gpointer data);
  70 void folder_item_read_cache             (FolderItem *item);
  71 void folder_item_free_cache             (FolderItem *item);
  72
  73 Folder *folder_new(FolderType type, const gchar *name, const gchar *path)
  74 {
  75         Folder *folder = NULL;
  76
  77         name = name ? name : path;
  78         switch (type) {
  79         case F_MBOX:
  80                 folder = mbox_folder_new(name, path);
  81                 break;
  82         case F_MH:
  83                 folder = mh_folder_new(name, path);
  84                 break;
  85         case F_IMAP:
  86                 folder = imap_folder_new(name, path);
  87                 break;
  88         case F_NEWS:
  89                 folder = news_folder_new(name, path);
  90                 break;
  91         default:
  92                 return NULL;
  93         }
  94
  95         return folder;
  96 }
  97
  98 static void folder_init(Folder *folder, const gchar *name)
  99 {
 100         FolderItem *item;
 101
 102         g_return_if_fail(folder != NULL);
 103
 104         folder_set_name(folder, name);
 105
 106         /* Init folder data */
 107         folder->account = NULL;
 108         folder->inbox = NULL;
 109         folder->outbox = NULL;
 110         folder->draft = NULL;
 111         folder->queue = NULL;
 112         folder->trash = NULL;
 113
 114         /* Init Folder functions */
 115         folder->fetch_msg = NULL;
 116         folder->fetch_msginfo = NULL;
 117         folder->fetch_msginfos = NULL;
 118         folder->get_num_list = NULL;
 119         folder->ui_func = NULL;
 120         folder->ui_func_data = NULL;
 121         folder->check_msgnum_validity = NULL;
 122
 123         /* Create root folder item */
 124         item = folder_item_new(folder, name, NULL);
 125         item->folder = folder;
 126         folder->node = g_node_new(item);
 127         folder->data = NULL;
 128 }
 129
 130 void folder_local_folder_init(Folder *folder, const gchar *name,
 131                               const gchar *path)
 132 {
 133         folder_init(folder, name);
 134         LOCAL_FOLDER(folder)->rootpath = g_strdup(path);
 135 }
 136
 137 void folder_remote_folder_init(Folder *folder, const gchar *name,
 138                                const gchar *path)
 139 {
 140         folder_init(folder, name);
 141         REMOTE_FOLDER(folder)->session = NULL;
 142 }
 143
 144 void folder_destroy(Folder *folder)
 145 {
 146         g_return_if_fail(folder != NULL);
 147         g_return_if_fail(folder->destroy != NULL);
 148
 149         folder->destroy(folder);
 150
 151         folder_list = g_list_remove(folder_list, folder);
 152
 153         folder_tree_destroy(folder);
 154         g_free(folder->name);
 155         g_free(folder);
 156 }
 157
 158 void folder_local_folder_destroy(LocalFolder *lfolder)
 159 {
 160         g_return_if_fail(lfolder != NULL);
 161
 162         g_free(lfolder->rootpath);
 163 }
 164
 165 void folder_remote_folder_destroy(RemoteFolder *rfolder)
 166 {
 167         g_return_if_fail(rfolder != NULL);
 168
 169         if (rfolder->session)
 170                 session_destroy(rfolder->session);
 171 }
 172
 173 #if 0
 174 Folder *mbox_folder_new(const gchar *name, const gchar *path)
 175 {
 176         /* not yet implemented */
 177         return NULL;
 178 }
 179
 180 Folder *maildir_folder_new(const gchar *name, const gchar *path)
 181 {
 182         /* not yet implemented */
 183         return NULL;
 184 }
 185 #endif
 186
 187 FolderItem *folder_item_new(Folder *folder, const gchar *name, const gchar *path)
 188 {
 189         FolderItem *item = NULL;
 190
 191         switch (folder->type) {
 192         case F_IMAP:
 193                 item = imap_folder_item_new();
 194                 break;
 195         case F_MH:
 196         case F_NEWS:
 197         case F_MBOX:
 198                 item = g_new0(FolderItem, 1);
 199                 break;
 200         default:
 201                 return NULL;
 202         }
 203
 204         g_return_val_if_fail(item != NULL, NULL);
 205
 206         item->stype = F_NORMAL;
 207         item->name = g_strdup(name);
 208         item->path = g_strdup(path);
 209         item->account = NULL;
 210         item->mtime = 0;
 211         item->new = 0;
 212         item->unread = 0;
 213         item->total = 0;
 214         item->last_num = -1;
 215         item->cache = NULL;
 216         item->no_sub = FALSE;
 217         item->no_select = FALSE;
 218         item->collapsed = FALSE;
 219         item->threaded  = TRUE;
 220         item->ret_rcpt  = FALSE;
 221         item->opened    = FALSE;
 222         item->parent = NULL;
 223         item->folder = NULL;
 224         item->mark_queue = NULL;
 225         item->data = NULL;
 226
 227         item->prefs = prefs_folder_item_new();
 228
 229         return item;
 230 }
 231
 232 void folder_item_append(FolderItem *parent, FolderItem *item)
 233 {
 234         GNode *node;
 235
 236         g_return_if_fail(parent != NULL);
 237         g_return_if_fail(parent->folder != NULL);
 238         g_return_if_fail(item != NULL);
 239
 240         node = parent->folder->node;
 241         node = g_node_find(node, G_PRE_ORDER, G_TRAVERSE_ALL, parent);
 242         g_return_if_fail(node != NULL);
 243
 244         item->parent = parent;
 245         item->folder = parent->folder;
 246         g_node_append_data(node, item);
 247 }
 248
 249 void folder_item_remove(FolderItem *item)
 250 {
 251         GNode *node;
 252
 253         g_return_if_fail(item != NULL);
 254         g_return_if_fail(item->folder != NULL);
 255
 256         node = item->folder->node;
 257         node = g_node_find(node, G_PRE_ORDER, G_TRAVERSE_ALL, item);
 258         g_return_if_fail(node != NULL);
 259
 260         /* TODO: free all FolderItem's first */
 261         if (item->folder->node == node)
 262                 item->folder->node = NULL;
 263         g_node_destroy(node);
 264 }
 265
 266 void folder_item_destroy(FolderItem *item)
 267 {
 268         g_return_if_fail(item != NULL);
 269
 270         debug_print("Destroying folder item %s\n", item->path);
 271
 272         if (item->folder != NULL) {
 273                 switch (item->folder->type) {
 274                 case F_IMAP:
 275                         imap_folder_item_destroy(item);
 276                         break;
 277                 default:
 278                         break;
 279                 }
 280         }
 281
 282         if (item->cache)
 283                 folder_item_free_cache(item);
 284         g_free(item->name);
 285         g_free(item->path);
 286         g_free(item);
 287 }
 288
 289 void folder_set_ui_func(Folder *folder, FolderUIFunc func, gpointer data)
 290 {
 291         g_return_if_fail(folder != NULL);
 292
 293         folder->ui_func = func;
 294         folder->ui_func_data = data;
 295 }
 296
 297 void folder_set_name(Folder *folder, const gchar *name)
 298 {
 299         g_return_if_fail(folder != NULL);
 300
 301         g_free(folder->name);
 302         folder->name = name ? g_strdup(name) : NULL;
 303         if (folder->node && folder->node->data) {
 304                 FolderItem *item = (FolderItem *)folder->node->data;
 305
 306                 g_free(item->name);
 307                 item->name = name ? g_strdup(name) : NULL;
 308         }
 309 }
 310
 311 gboolean folder_tree_destroy_func(GNode *node, gpointer data) {
 312         FolderItem *item = (FolderItem *) node->data;
 313
 314         folder_item_destroy(item);
 315         return FALSE;
 316 }
 317
 318 void folder_tree_destroy(Folder *folder)
 319 {
 320         g_return_if_fail(folder != NULL);
 321         g_return_if_fail(folder->node != NULL);
 322
 323         prefs_scoring_clear();
 324         prefs_filtering_clear();
 325
 326         g_node_traverse(folder->node, G_POST_ORDER, G_TRAVERSE_ALL, -1, folder_tree_destroy_func, NULL);
 327         if (folder->node)
 328                 g_node_destroy(folder->node);
 329
 330         folder->inbox = NULL;
 331         folder->outbox = NULL;
 332         folder->draft = NULL;
 333         folder->queue = NULL;
 334         folder->trash = NULL;
 335         folder->node = NULL;
 336 }
 337
 338 void folder_add(Folder *folder)
 339 {
 340         Folder *cur_folder;
 341         GList *cur;
 342         gint i;
 343
 344         g_return_if_fail(folder != NULL);
 345
 346         for (i = 0, cur = folder_list; cur != NULL; cur = cur->next, i++) {
 347                 cur_folder = FOLDER(cur->data);
 348                 if (folder->type == F_MH) {
 349                         if (cur_folder->type != F_MH) break;
 350                 } else if (folder->type == F_MBOX) {
 351                         if (cur_folder->type != F_MH &&
 352                             cur_folder->type != F_MBOX) break;
 353                 } else if (folder->type == F_IMAP) {
 354                         if (cur_folder->type != F_MH &&
 355                             cur_folder->type != F_MBOX &&
 356                             cur_folder->type != F_IMAP) break;
 357                 } else if (folder->type == F_NEWS) {
 358                         if (cur_folder->type != F_MH &&
 359                             cur_folder->type != F_MBOX &&
 360                             cur_folder->type != F_IMAP &&
 361                             cur_folder->type != F_NEWS) break;
 362                 }
 363         }
 364
 365         folder_list = g_list_insert(folder_list, folder, i);
 366 }
 367
 368 GList *folder_get_list(void)
 369 {
 370         return folder_list;
 371 }
 372
 373 gint folder_read_list(void)
 374 {
 375         GNode *node;
 376         XMLNode *xmlnode;
 377         gchar *path;
 378
 379         path = folder_get_list_path();
 380         if (!is_file_exist(path)) return -1;
 381         node = xml_parse_file(path);
 382         if (!node) return -1;
 383
 384         xmlnode = node->data;
 385         if (strcmp2(xmlnode->tag->tag, "folderlist") != 0) {
 386                 g_warning("wrong folder list\n");
 387                 xml_free_tree(node);
 388                 return -1;
 389         }
 390
 391         g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, 2,
 392                         folder_read_folder_func, NULL);
 393
 394         xml_free_tree(node);
 395         if (folder_list)
 396                 return 0;
 397         else
 398                 return -1;
 399 }
 400
 401 void folder_write_list(void)
 402 {
 403         GList *list;
 404         Folder *folder;
 405         gchar *path;
 406         PrefFile *pfile;
 407
 408         path = folder_get_list_path();
 409         if ((pfile = prefs_write_open(path)) == NULL) return;
 410
 411         fprintf(pfile->fp, "<?xml version=\"1.0\" encoding=\"%s\"?>\n",
 412                 conv_get_current_charset_str());
 413         fputs("\n<folderlist>\n", pfile->fp);
 414
 415         for (list = folder_list; list != NULL; list = list->next) {
 416                 folder = list->data;
 417                 folder_write_list_recursive(folder->node, pfile->fp);
 418         }
 419
 420         fputs("</folderlist>\n", pfile->fp);
 421
 422         if (prefs_write_close(pfile) < 0)
 423                 g_warning("failed to write folder list.\n");
 424 }
 425
 426 gboolean folder_scan_tree_func(GNode *node, gpointer data)
 427 {
 428         GHashTable *pptable = (GHashTable *)data;
 429         FolderItem *item = (FolderItem *)node->data;
 430
 431         folder_item_restore_persist_prefs(item, pptable);
 432
 433         return FALSE;
 434 }
 435
 436 void folder_scan_tree(Folder *folder)
 437 {
 438         GHashTable *pptable;
 439
 440         if (!folder->scan_tree)
 441                 return;
 442
 443         pptable = folder_persist_prefs_new(folder);
 444         folder_tree_destroy(folder);
 445
 446         folder->scan_tree(folder);
 447
 448         g_node_traverse(folder->node, G_POST_ORDER, G_TRAVERSE_ALL, -1, folder_scan_tree_func, pptable);
 449         folder_persist_prefs_free(pptable);
 450
 451         prefs_matcher_read_config();
 452 }
 453
 454 FolderItem *folder_create_folder(FolderItem *parent, const gchar *name)
 455 {
 456         FolderItem *new_item;
 457
 458         new_item = parent->folder->create_folder(parent->folder, parent, name);
 459         new_item->cache = msgcache_new();
 460
 461         return new_item;
 462 }
 463
 464 struct TotalMsgCount
 465 {
 466         guint new;
 467         guint unread;
 468         guint total;
 469 };
 470
 471 struct FuncToAllFoldersData
 472 {
 473         FolderItemFunc  function;
 474         gpointer        data;
 475 };
 476
 477 static gboolean folder_func_to_all_folders_func(GNode *node, gpointer data)
 478 {
 479         FolderItem *item;
 480         struct FuncToAllFoldersData *function_data = (struct FuncToAllFoldersData *) data;
 481
 482         g_return_val_if_fail(node->data != NULL, FALSE);
 483
 484         item = FOLDER_ITEM(node->data);
 485         g_return_val_if_fail(item != NULL, FALSE);
 486
 487         function_data->function(item, function_data->data);
 488
 489         return FALSE;
 490 }
 491
 492 void folder_func_to_all_folders(FolderItemFunc function, gpointer data)
 493 {
 494         GList *list;
 495         Folder *folder;
 496         struct FuncToAllFoldersData function_data;
 497
 498         function_data.function = function;
 499         function_data.data = data;
 500
 501         for (list = folder_list; list != NULL; list = list->next) {
 502                 folder = FOLDER(list->data);
 503                 if (folder->node)
 504                         g_node_traverse(folder->node, G_PRE_ORDER,
 505                                         G_TRAVERSE_ALL, -1,
 506                                         folder_func_to_all_folders_func,
 507                                         &function_data);
 508         }
 509 }
 510
 511 static void folder_count_total_msgs_func(FolderItem *item, gpointer data)
 512 {
 513         struct TotalMsgCount *count = (struct TotalMsgCount *)data;
 514
 515         count->new += item->new;
 516         count->unread += item->unread;
 517         count->total += item->total;
 518 }
 519
 520 void folder_count_total_msgs(guint *new, guint *unread, guint *total)
 521 {
 522         struct TotalMsgCount count;
 523
 524         count.new = count.unread = count.total = 0;
 525
 526         debug_print("Counting total number of messages...\n");
 527
 528         folder_func_to_all_folders(folder_count_total_msgs_func, &count);
 529
 530         *new = count.new;
 531         *unread = count.unread;
 532         *total = count.total;
 533 }
 534
 535 Folder *folder_find_from_path(const gchar *path)
 536 {
 537         GList *list;
 538         Folder *folder;
 539
 540         for (list = folder_list; list != NULL; list = list->next) {
 541                 folder = list->data;
 542                 if ((folder->type == F_MH || folder->type == F_MBOX) &&
 543                     !path_cmp(LOCAL_FOLDER(folder)->rootpath, path))
 544                         return folder;
 545         }
 546
 547         return NULL;
 548 }
 549
 550 Folder *folder_find_from_name(const gchar *name, FolderType type)
 551 {
 552         GList *list;
 553         Folder *folder;
 554
 555         for (list = folder_list; list != NULL; list = list->next) {
 556                 folder = list->data;
 557                 if (folder->type == type && strcmp2(name, folder->name) == 0)
 558                         return folder;
 559         }
 560
 561         return NULL;
 562 }
 563
 564 static gboolean folder_item_find_func(GNode *node, gpointer data)
 565 {
 566         FolderItem *item = node->data;
 567         gpointer *d = data;
 568         const gchar *path = d[0];
 569
 570         if (path_cmp(path, item->path) != 0)
 571                 return FALSE;
 572
 573         d[1] = item;
 574
 575         return TRUE;
 576 }
 577
 578 FolderItem *folder_find_item_from_path(const gchar *path)
 579 {
 580         Folder *folder;
 581         gpointer d[2];
 582
 583         folder = folder_get_default_folder();
 584         g_return_val_if_fail(folder != NULL, NULL);
 585
 586         d[0] = (gpointer)path;
 587         d[1] = NULL;
 588         g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
 589                         folder_item_find_func, d);
 590         return d[1];
 591 }
 592
 593 static const struct {
 594         gchar *str;
 595         FolderType type;
 596 } type_str_table[] = {
 597         {"#mh"     , F_MH},
 598         {"#mbox"   , F_MBOX},
 599         {"#maildir", F_MAILDIR},
 600         {"#imap"   , F_IMAP},
 601         {"#news"   , F_NEWS}
 602 };
 603
 604 static gchar *folder_get_type_string(FolderType type)
 605 {
 606         gint i;
 607
 608         for (i = 0; i < sizeof(type_str_table) / sizeof(type_str_table[0]);
 609              i++) {
 610                 if (type_str_table[i].type == type)
 611                         return type_str_table[i].str;
 612         }
 613
 614         return NULL;
 615 }
 616
 617 static FolderType folder_get_type_from_string(const gchar *str)
 618 {
 619         gint i;
 620
 621         for (i = 0; i < sizeof(type_str_table) / sizeof(type_str_table[0]);
 622              i++) {
 623                 if (g_strcasecmp(type_str_table[i].str, str) == 0)
 624                         return type_str_table[i].type;
 625         }
 626
 627         return F_UNKNOWN;
 628 }
 629
 630 gchar *folder_get_identifier(Folder *folder)
 631 {
 632         gchar *type_str;
 633
 634         g_return_val_if_fail(folder != NULL, NULL);
 635
 636         type_str = folder_get_type_string(folder->type);
 637         return g_strconcat(type_str, "/", folder->name, NULL);
 638 }
 639
 640 gchar *folder_item_get_identifier(FolderItem *item)
 641 {
 642         gchar *id;
 643         gchar *folder_id;
 644
 645         g_return_val_if_fail(item != NULL, NULL);
 646         g_return_val_if_fail(item->path != NULL, NULL);
 647
 648         folder_id = folder_get_identifier(item->folder);
 649         id = g_strconcat(folder_id, "/", item->path, NULL);
 650         g_free(folder_id);
 651
 652         return id;
 653 }
 654
 655 FolderItem *folder_find_item_from_identifier(const gchar *identifier)
 656 {
 657         Folder *folder;
 658         gpointer d[2];
 659         gchar *str;
 660         gchar *p;
 661         gchar *name;
 662         gchar *path;
 663         FolderType type;
 664
 665         g_return_val_if_fail(identifier != NULL, NULL);
 666
 667         if (*identifier != '#')
 668                 return folder_find_item_from_path(identifier);
 669
 670         Xstrdup_a(str, identifier, return NULL);
 671
 672         p = strchr(str, '/');
 673         if (!p)
 674                 return folder_find_item_from_path(identifier);
 675         *p = '\0';
 676         p++;
 677         type = folder_get_type_from_string(str);
 678         if (type == F_UNKNOWN)
 679                 return folder_find_item_from_path(identifier);
 680
 681         name = p;
 682         p = strchr(p, '/');
 683         if (!p)
 684                 return folder_find_item_from_path(identifier);
 685         *p = '\0';
 686         p++;
 687
 688         folder = folder_find_from_name(name, type);
 689         if (!folder)
 690                 return folder_find_item_from_path(identifier);
 691
 692         path = p;
 693
 694         d[0] = (gpointer)path;
 695         d[1] = NULL;
 696         g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
 697                         folder_item_find_func, d);
 698         return d[1];
 699 }
 700
 701 Folder *folder_get_default_folder(void)
 702 {
 703         return folder_list ? FOLDER(folder_list->data) : NULL;
 704 }
 705
 706 FolderItem *folder_get_default_inbox(void)
 707 {
 708         Folder *folder;
 709
 710         if (!folder_list) return NULL;
 711         folder = FOLDER(folder_list->data);
 712         g_return_val_if_fail(folder != NULL, NULL);
 713         return folder->inbox;
 714 }
 715
 716 FolderItem *folder_get_default_outbox(void)
 717 {
 718         Folder *folder;
 719
 720         if (!folder_list) return NULL;
 721         folder = FOLDER(folder_list->data);
 722         g_return_val_if_fail(folder != NULL, NULL);
 723         return folder->outbox;
 724 }
 725
 726 FolderItem *folder_get_default_draft(void)
 727 {
 728         Folder *folder;
 729
 730         if (!folder_list) return NULL;
 731         folder = FOLDER(folder_list->data);
 732         g_return_val_if_fail(folder != NULL, NULL);
 733         return folder->draft;
 734 }
 735
 736 FolderItem *folder_get_default_queue(void)
 737 {
 738         Folder *folder;
 739
 740         if (!folder_list) return NULL;
 741         folder = FOLDER(folder_list->data);
 742         g_return_val_if_fail(folder != NULL, NULL);
 743         return folder->queue;
 744 }
 745
 746 FolderItem *folder_get_default_trash(void)
 747 {
 748         Folder *folder;
 749
 750         if (!folder_list) return NULL;
 751         folder = FOLDER(folder_list->data);
 752         g_return_val_if_fail(folder != NULL, NULL);
 753         return folder->trash;
 754 }
 755
 756 #define CREATE_FOLDER_IF_NOT_EXIST(member, dir, type)           \
 757 {                                                               \
 758         if (!folder->member) {                                  \
 759                 item = folder_item_new(folder, dir, dir);       \
 760                 item->stype = type;                             \
 761                 folder_item_append(rootitem, item);             \
 762                 folder->member = item;                          \
 763         }                                                       \
 764 }
 765
 766 void folder_set_missing_folders(void)
 767 {
 768         Folder *folder;
 769         FolderItem *rootitem;
 770         FolderItem *item;
 771         GList *list;
 772
 773         for (list = folder_list; list != NULL; list = list->next) {
 774                 folder = list->data;
 775                 if (folder->type != F_MH) continue;
 776                 rootitem = FOLDER_ITEM(folder->node->data);
 777                 g_return_if_fail(rootitem != NULL);
 778
 779                 if (folder->inbox && folder->outbox && folder->draft &&
 780                     folder->queue && folder->trash)
 781                         continue;
 782
 783                 if (folder->create_tree(folder) < 0) {
 784                         g_warning("%s: can't create the folder tree.\n",
 785                                   LOCAL_FOLDER(folder)->rootpath);
 786                         continue;
 787                 }
 788
 789                 CREATE_FOLDER_IF_NOT_EXIST(inbox,  INBOX_DIR,  F_INBOX);
 790                 CREATE_FOLDER_IF_NOT_EXIST(outbox, OUTBOX_DIR, F_OUTBOX);
 791                 CREATE_FOLDER_IF_NOT_EXIST(draft,  DRAFT_DIR,  F_DRAFT);
 792                 CREATE_FOLDER_IF_NOT_EXIST(queue,  QUEUE_DIR,  F_QUEUE);
 793                 CREATE_FOLDER_IF_NOT_EXIST(trash,  TRASH_DIR,  F_TRASH);
 794         }
 795 }
 796
 797 #undef CREATE_FOLDER_IF_NOT_EXIST
 798
 799 gchar *folder_get_path(Folder *folder)
 800 {
 801         gchar *path;
 802
 803         g_return_val_if_fail(folder != NULL, NULL);
 804
 805         switch(FOLDER_TYPE(folder)) {
 806
 807                 case F_MH:
 808                         path = g_strdup(LOCAL_FOLDER(folder)->rootpath);
 809                         break;
 810
 811                 case F_IMAP:
 812                         g_return_val_if_fail(folder->account != NULL, NULL);
 813                         path = g_strconcat(get_imap_cache_dir(),
 814                                            G_DIR_SEPARATOR_S,
 815                                            folder->account->recv_server,
 816                                            G_DIR_SEPARATOR_S,
 817                                            folder->account->userid,
 818                                            NULL);
 819                         break;
 820
 821                 case F_NEWS:
 822                         g_return_val_if_fail(folder->account != NULL, NULL);
 823                         path = g_strconcat(get_news_cache_dir(),
 824                                            G_DIR_SEPARATOR_S,
 825                                            folder->account->nntp_server,
 826                                            NULL);
 827                         break;
 828
 829                 default:
 830                         path = NULL;
 831                         break;
 832         }
 833
 834         return path;
 835 }
 836
 837 gchar *folder_item_get_path(FolderItem *item)
 838 {
 839         gchar *folder_path;
 840         gchar *path;
 841
 842         g_return_val_if_fail(item != NULL, NULL);
 843
 844         if(FOLDER_TYPE(item->folder) != F_MBOX) {
 845                 folder_path = folder_get_path(item->folder);
 846                 g_return_val_if_fail(folder_path != NULL, NULL);
 847
 848                 if (folder_path[0] == G_DIR_SEPARATOR) {
 849                         if (item->path)
 850                                 path = g_strconcat(folder_path, G_DIR_SEPARATOR_S,
 851                                                    item->path, NULL);
 852                         else
 853                                 path = g_strdup(folder_path);
 854                 } else {
 855                         if (item->path)
 856                                 path = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
 857                                                    folder_path, G_DIR_SEPARATOR_S,
 858                                                    item->path, NULL);
 859                         else
 860                                 path = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
 861                                                    folder_path, NULL);
 862                 }
 863
 864                 g_free(folder_path);
 865         } else {
 866                 gchar *itempath;
 867
 868                 itempath = mbox_get_virtual_path(item);
 869                 if (itempath == NULL)
 870                         return NULL;
 871                 path = g_strconcat(get_mbox_cache_dir(),
 872                                           G_DIR_SEPARATOR_S, itempath, NULL);
 873                 g_free(itempath);
 874         }
 875         return path;
 876 }
 877
 878 void folder_item_set_default_flags(FolderItem *dest, MsgFlags *flags)
 879 {
 880         if (!(dest->stype == F_OUTBOX ||
 881               dest->stype == F_QUEUE  ||
 882               dest->stype == F_DRAFT  ||
 883               dest->stype == F_TRASH)) {
 884                 flags->perm_flags = MSG_NEW|MSG_UNREAD;
 885         } else {
 886                 flags->perm_flags = 0;
 887         }
 888         flags->tmp_flags = MSG_CACHED;
 889         if (dest->folder->type == F_MH) {
 890                 if (dest->stype == F_QUEUE) {
 891                         MSG_SET_TMP_FLAGS(*flags, MSG_QUEUED);
 892                 } else if (dest->stype == F_DRAFT) {
 893                         MSG_SET_TMP_FLAGS(*flags, MSG_DRAFT);
 894                 }
 895         } else if (dest->folder->type == F_IMAP) {
 896                 MSG_SET_TMP_FLAGS(*flags, MSG_IMAP);
 897         } else if (dest->folder->type == F_NEWS) {
 898                 MSG_SET_TMP_FLAGS(*flags, MSG_NEWS);
 899         }
 900 }
 901
 902 static gint folder_sort_cache_list_by_msgnum(gconstpointer a, gconstpointer b)
 903 {
 904         MsgInfo *msginfo_a = (MsgInfo *) a;
 905         MsgInfo *msginfo_b = (MsgInfo *) b;
 906
 907         return (msginfo_a->msgnum - msginfo_b->msgnum);
 908 }
 909
 910 static gint folder_sort_folder_list(gconstpointer a, gconstpointer b)
 911 {
 912         guint gint_a = GPOINTER_TO_INT(a);
 913         guint gint_b = GPOINTER_TO_INT(b);
 914
 915         return (gint_a - gint_b);
 916 }
 917
 918 gint folder_item_scan(FolderItem *item)
 919 {
 920         Folder *folder;
 921         GSList *folder_list, *cache_list, *folder_list_cur, *cache_list_cur, *new_list = NULL;
 922         guint newcnt = 0, unreadcnt = 0, totalcnt = 0;
 923         guint cache_max_num, folder_max_num, cache_cur_num, folder_cur_num;
 924
 925         g_return_val_if_fail(item != NULL, -1);
 926         if (item->path == NULL) return -1;
 927
 928         folder = item->folder;
 929
 930         g_return_val_if_fail(folder != NULL, -1);
 931         g_return_val_if_fail(folder->get_num_list != NULL, -1);
 932
 933         debug_print("Scanning folder %s for cache changes.\n", item->path);
 934
 935         /* Get list of messages for folder and cache */
 936         if (!folder->check_msgnum_validity ||
 937            folder->check_msgnum_validity(folder, item)) {
 938                 if (!item->cache)
 939                         folder_item_read_cache(item);
 940                 cache_list = msgcache_get_msg_list(item->cache);
 941         } else {
 942                 if (item->cache)
 943                         msgcache_destroy(item->cache);
 944                 item->cache = msgcache_new();
 945                 cache_list = NULL;
 946         }
 947         folder_list = folder->get_num_list(item->folder, item);
 948
 949         /* Sort both lists */
 950         cache_list = g_slist_sort(cache_list, folder_sort_cache_list_by_msgnum);
 951         folder_list = g_slist_sort(folder_list, folder_sort_folder_list);
 952
 953         cache_list_cur = cache_list;
 954         folder_list_cur = folder_list;
 955
 956         if (cache_list_cur != NULL) {
 957                 GSList *cache_list_last;
 958
 959                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
 960                 cache_list_last = g_slist_last(cache_list);
 961                 cache_max_num = ((MsgInfo *)cache_list_last->data)->msgnum;
 962         } else {
 963                 cache_cur_num = G_MAXINT;
 964                 cache_max_num = 0;
 965         }
 966
 967         if (folder_list_cur != NULL) {
 968                 GSList *folder_list_last;
 969
 970                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
 971                 folder_list_last = g_slist_last(folder_list);
 972                 folder_max_num = GPOINTER_TO_INT(folder_list_last->data);
 973         } else {
 974                 folder_cur_num = G_MAXINT;
 975                 folder_max_num = 0;
 976         }
 977
 978         while ((cache_cur_num != G_MAXINT) || (folder_cur_num != G_MAXINT)) {
 979                 /*
 980                  *  Message only exists in the folder
 981                  *  Remember message for fetching
 982                  */
 983                 if (folder_cur_num < cache_cur_num) {
 984                         gboolean add = FALSE;
 985
 986                         switch(folder->type) {
 987                                 case F_NEWS:
 988                                         if (folder_cur_num < cache_max_num)
 989                                                 break;
 990
 991                                         if (prefs_common.max_articles == 0) {
 992                                                 add = TRUE;
 993                                         }
 994
 995                                         if (folder_max_num <= prefs_common.max_articles) {
 996                                                 add = TRUE;
 997                                         } else if (folder_cur_num > (folder_max_num - prefs_common.max_articles)) {
 998                                                 add = TRUE;
 999                                         }
1000                                         break;
1001                                 default:
1002                                         add = TRUE;
1003                                         break;
1004                         }
1005
1006                         if (add) {
1007                                 new_list = g_slist_prepend(new_list, GINT_TO_POINTER(folder_cur_num));
1008                                 debug_print("Remembered message %d for fetching\n", folder_cur_num);
1009                         }
1010
1011                         /* Move to next folder number */
1012                         folder_list_cur = folder_list_cur->next;
1013
1014                         if (folder_list_cur != NULL)
1015                                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
1016                         else
1017                                 folder_cur_num = G_MAXINT;
1018
1019                         continue;
1020                 }
1021
1022                 /*
1023                  *  Message only exists in the cache
1024                  *  Remove the message from the cache
1025                  */
1026                 if (cache_cur_num < folder_cur_num) {
1027                         msgcache_remove_msg(item->cache, cache_cur_num);
1028                         debug_print("Removed message %d from cache.\n", cache_cur_num);
1029
1030                         /* Move to next cache number */
1031                         cache_list_cur = cache_list_cur->next;
1032
1033                         if (cache_list_cur != NULL)
1034                                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
1035                         else
1036                                 cache_cur_num = G_MAXINT;
1037
1038                         continue;
1039                 }
1040
1041                 /*
1042                  *  Message number exists in folder and cache!
1043                  *  Check if the message has been modified
1044                  */
1045                 if (cache_cur_num == folder_cur_num) {
1046                         MsgInfo *msginfo;
1047
1048                         msginfo = msgcache_get_msg(item->cache, folder_cur_num);
1049                         if (folder->is_msg_changed && folder->is_msg_changed(folder, item, msginfo)) {
1050                                 MsgInfo *newmsginfo;
1051
1052                                 msgcache_remove_msg(item->cache, msginfo->msgnum);
1053
1054                                 if (NULL != (newmsginfo = folder->fetch_msginfo(folder, item, folder_cur_num))) {
1055                                         msgcache_add_msg(item->cache, newmsginfo);
1056                                         if (MSG_IS_NEW(newmsginfo->flags) && !MSG_IS_IGNORE_THREAD(newmsginfo->flags))
1057                                                 newcnt++;
1058                                         if (MSG_IS_UNREAD(newmsginfo->flags) && !MSG_IS_IGNORE_THREAD(newmsginfo->flags))
1059                                                 unreadcnt++;
1060                                         procmsg_msginfo_free(newmsginfo);
1061                                 }
1062
1063                                 debug_print("Updated msginfo for message %d.\n", folder_cur_num);
1064                         } else {
1065                                 if (MSG_IS_NEW(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1066                                         newcnt++;
1067                                 if (MSG_IS_UNREAD(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1068                                         unreadcnt++;
1069                         }
1070                         totalcnt++;
1071                         procmsg_msginfo_free(msginfo);
1072
1073                         /* Move to next folder and cache number */
1074                         cache_list_cur = cache_list_cur->next;
1075                         folder_list_cur = folder_list_cur->next;
1076
1077                         if (cache_list_cur != NULL)
1078                                 cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
1079                         else
1080                                 cache_cur_num = G_MAXINT;
1081
1082                         if (folder_list_cur != NULL)
1083                                 folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
1084                         else
1085                                 folder_cur_num = G_MAXINT;
1086
1087                         continue;
1088                 }
1089         }
1090
1091         for(cache_list_cur = cache_list; cache_list_cur != NULL; cache_list_cur = g_slist_next(cache_list_cur)) {
1092                 procmsg_msginfo_free((MsgInfo *) cache_list_cur->data);
1093         }
1094
1095         g_slist_free(cache_list);
1096         g_slist_free(folder_list);
1097
1098         if (folder->fetch_msginfos) {
1099                 GSList *elem;
1100                 GSList *newmsg_list;
1101                 MsgInfo *msginfo;
1102
1103                 if (new_list) {
1104                         newmsg_list = folder->fetch_msginfos(folder, item, new_list);
1105                         for (elem = newmsg_list; elem != NULL; elem = g_slist_next(elem)) {
1106                                 msginfo = (MsgInfo *) elem->data;
1107                                 msgcache_add_msg(item->cache, msginfo);
1108                                 if (MSG_IS_NEW(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1109                                         newcnt++;
1110                                 if (MSG_IS_UNREAD(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1111                                         unreadcnt++;
1112                                 totalcnt++;
1113                                 procmsg_msginfo_free(msginfo);
1114                         }
1115                         g_slist_free(newmsg_list);
1116                         folderview_update_item(item, FALSE);
1117                 }
1118         } else if (folder->fetch_msginfo) {
1119                 GSList *elem;
1120
1121                 for (elem = new_list; elem != NULL; elem = g_slist_next(elem)) {
1122                         MsgInfo *msginfo;
1123                         guint num;
1124
1125                         num = GPOINTER_TO_INT(elem->data);
1126                         msginfo = folder->fetch_msginfo(folder, item, num);
1127                         if (msginfo != NULL) {
1128                                 msgcache_add_msg(item->cache, msginfo);
1129                                 if (MSG_IS_NEW(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1130                                     newcnt++;
1131                                 if (MSG_IS_UNREAD(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
1132                                     unreadcnt++;
1133                                 totalcnt++;
1134                                 procmsg_msginfo_free(msginfo);
1135                                 debug_print("Added newly found message %d to cache.\n", num);
1136                         }
1137                 }
1138                 folderview_update_item(item, FALSE);
1139         }
1140
1141         item->new = newcnt;
1142         item->unread = unreadcnt;
1143         item->total = totalcnt;
1144
1145         g_slist_free(new_list);
1146
1147         folderview_update_item(item, FALSE);
1148
1149         return 0;
1150 }
1151
1152 static void folder_item_scan_foreach_func(gpointer key, gpointer val,
1153                                           gpointer data)
1154 {
1155         folder_item_scan(FOLDER_ITEM(key));
1156 }
1157
1158 void folder_item_scan_foreach(GHashTable *table)
1159 {
1160         g_hash_table_foreach(table, folder_item_scan_foreach_func, NULL);
1161 }
1162
1163 void folder_count_total_cache_memusage(FolderItem *item, gpointer data)
1164 {
1165         gint *memusage = (gint *)data;
1166
1167         if (item->cache == NULL)
1168                 return;
1169
1170         *memusage += msgcache_get_memory_usage(item->cache);
1171 }
1172
1173 gint folder_cache_time_compare_func(gconstpointer a, gconstpointer b)
1174 {
1175         FolderItem *fa = (FolderItem *)a;
1176         FolderItem *fb = (FolderItem *)b;
1177
1178         return (gint) (msgcache_get_last_access_time(fa->cache) - msgcache_get_last_access_time(fb->cache));
1179 }
1180
1181 void folder_find_expired_caches(FolderItem *item, gpointer data)
1182 {
1183         GSList **folder_item_list = (GSList **)data;
1184         gint difftime, expiretime;
1185
1186         if (item->cache == NULL)
1187                 return;
1188
1189         if (item->opened > 0)
1190                 return;
1191
1192         difftime = (gint) (time(NULL) - msgcache_get_last_access_time(item->cache));
1193         expiretime = prefs_common.cache_min_keep_time * 60;
1194         debug_print("Cache unused time: %d (Expire time: %d)\n", difftime, expiretime);
1195         if (difftime > expiretime) {
1196                 *folder_item_list = g_slist_insert_sorted(*folder_item_list, item, folder_cache_time_compare_func);
1197         }
1198 }
1199
1200 void folder_item_free_cache(FolderItem *item)
1201 {
1202         g_return_if_fail(item != NULL);
1203
1204         if (item->cache == NULL)
1205                 return;
1206
1207         if (item->opened > 0)
1208                 return;
1209
1210         folder_item_write_cache(item);
1211         msgcache_destroy(item->cache);
1212         item->cache = NULL;
1213 }
1214
1215 void folder_clean_cache_memory()
1216 {
1217         gint memusage = 0;
1218
1219         folder_func_to_all_folders(folder_count_total_cache_memusage, &memusage);
1220         debug_print("Total cache memory usage: %d\n", memusage);
1221
1222         if (memusage > (prefs_common.cache_max_mem_usage * 1024)) {
1223                 GSList *folder_item_list = NULL, *listitem;
1224
1225                 debug_print("Trying to free cache memory\n");
1226
1227                 folder_func_to_all_folders(folder_find_expired_caches, &folder_item_list);
1228                 listitem = folder_item_list;
1229                 while((listitem != NULL) && (memusage > (prefs_common.cache_max_mem_usage * 1024))) {
1230                         FolderItem *item = (FolderItem *)(listitem->data);
1231
1232                         debug_print("Freeing cache memory for %s\n", item->path);
1233                         memusage -= msgcache_get_memory_usage(item->cache);
1234                         folder_item_free_cache(item);
1235                         listitem = listitem->next;
1236                 }
1237                 g_slist_free(folder_item_list);
1238         }
1239 }
1240
1241 void folder_item_read_cache(FolderItem *item)
1242 {
1243         gchar *cache_file, *mark_file;
1244
1245         g_return_if_fail(item != NULL);
1246
1247         cache_file = folder_item_get_cache_file(item);
1248         mark_file = folder_item_get_mark_file(item);
1249         item->cache = msgcache_read_cache(item, cache_file);
1250         if (!item->cache) {
1251                 item->cache = msgcache_new();
1252                 folder_item_scan(item);
1253         }
1254         msgcache_read_mark(item->cache, mark_file);
1255         g_free(cache_file);
1256         g_free(mark_file);
1257
1258         folder_clean_cache_memory();
1259 }
1260
1261 void folder_item_write_cache(FolderItem *item)
1262 {
1263         gchar *cache_file, *mark_file;
1264         PrefsFolderItem *prefs;
1265         gint filemode = 0;
1266         gchar *id;
1267
1268         if (!item || !item->path || !item->cache)
1269                 return;
1270
1271         id = folder_item_get_identifier(item);
1272         debug_print("Save cache for folder %s\n", id);
1273         g_free(id);
1274
1275         cache_file = folder_item_get_cache_file(item);
1276         mark_file = folder_item_get_mark_file(item);
1277         if (msgcache_write(cache_file, mark_file, item->cache) < 0) {
1278                 prefs = item->prefs;
1279                 if (prefs && prefs->enable_folder_chmod && prefs->folder_chmod) {
1280                         /* for cache file */
1281                         filemode = prefs->folder_chmod;
1282                         if (filemode & S_IRGRP) filemode |= S_IWGRP;
1283                         if (filemode & S_IROTH) filemode |= S_IWOTH;
1284                         chmod(cache_file, filemode);
1285                 }
1286         }
1287
1288         g_free(cache_file);
1289         g_free(mark_file);
1290 }
1291
1292 MsgInfo *folder_item_fetch_msginfo(FolderItem *item, gint num)
1293 {
1294         Folder *folder;
1295         MsgInfo *msginfo;
1296
1297         g_return_val_if_fail(item != NULL, NULL);
1298
1299         folder = item->folder;
1300         if (!item->cache)
1301                 folder_item_read_cache(item);
1302
1303         if ((msginfo = msgcache_get_msg(item->cache, num)) != NULL)
1304                 return msginfo;
1305
1306         g_return_val_if_fail(folder->fetch_msginfo, NULL);
1307         if ((msginfo = folder->fetch_msginfo(folder, item, num)) != NULL) {
1308                 msgcache_add_msg(item->cache, msginfo);
1309                 return msginfo;
1310         }
1311
1312         return NULL;
1313 }
1314
1315 MsgInfo *folder_item_fetch_msginfo_by_id(FolderItem *item, const gchar *msgid)
1316 {
1317         Folder *folder;
1318         MsgInfo *msginfo;
1319
1320         g_return_val_if_fail(item != NULL, NULL);
1321
1322         folder = item->folder;
1323         if (!item->cache)
1324                 folder_item_read_cache(item);
1325
1326         if ((msginfo = msgcache_get_msg_by_id(item->cache, msgid)) != NULL)
1327                 return msginfo;
1328
1329         return NULL;
1330 }
1331
1332 GSList *folder_item_get_msg_list(FolderItem *item)
1333 {
1334         g_return_val_if_fail(item != NULL, NULL);
1335
1336         if (item->cache == 0)
1337                 folder_item_read_cache(item);
1338
1339         g_return_val_if_fail(item->cache != NULL, NULL);
1340
1341         return msgcache_get_msg_list(item->cache);
1342 }
1343
1344 gchar *folder_item_fetch_msg(FolderItem *item, gint num)
1345 {
1346         Folder *folder;
1347
1348         g_return_val_if_fail(item != NULL, NULL);
1349
1350         folder = item->folder;
1351
1352         g_return_val_if_fail(folder->fetch_msg != NULL, NULL);
1353
1354         return folder->fetch_msg(folder, item, num);
1355 }
1356
1357 gint folder_item_add_msg(FolderItem *dest, const gchar *file,
1358                          gboolean remove_source)
1359 {
1360         Folder *folder;
1361         gint num;
1362         MsgInfo *msginfo;
1363
1364         g_return_val_if_fail(dest != NULL, -1);
1365         g_return_val_if_fail(file != NULL, -1);
1366
1367         folder = dest->folder;
1368
1369         g_return_val_if_fail(folder->add_msg != NULL, -1);
1370
1371         if (!dest->cache)
1372                 folder_item_read_cache(dest);
1373
1374         num = folder->add_msg(folder, dest, file, remove_source);
1375
1376         if (num > 0) {
1377                 msginfo = folder->fetch_msginfo(folder, dest, num);
1378
1379                 if (msginfo != NULL) {
1380                         if (MSG_IS_NEW(msginfo->flags))
1381                                 dest->new++;
1382                         if (MSG_IS_UNREAD(msginfo->flags))
1383                                 dest->unread++;
1384                         dest->total++;
1385
1386                         msgcache_add_msg(dest->cache, msginfo);
1387
1388                         procmsg_msginfo_free(msginfo);
1389                 }
1390
1391                 dest->last_num = num;
1392         }
1393
1394         return num;
1395 }
1396
1397 /*
1398 gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
1399 {
1400         Folder *folder;
1401         gint num;
1402
1403         g_return_val_if_fail(dest != NULL, -1);
1404         g_return_val_if_fail(msginfo != NULL, -1);
1405
1406         folder = dest->folder;
1407         if (dest->last_num < 0) folder->scan(folder, dest);
1408
1409         num = folder->move_msg(folder, dest, msginfo);
1410         if (num > 0) dest->last_num = num;
1411
1412         return num;
1413 }
1414 */
1415
1416 gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
1417 {
1418         Folder *folder;
1419         gint num;
1420         Folder *src_folder;
1421
1422         g_return_val_if_fail(dest != NULL, -1);
1423         g_return_val_if_fail(msginfo != NULL, -1);
1424
1425         folder = dest->folder;
1426
1427         g_return_val_if_fail(folder->remove_msg != NULL, -1);
1428         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1429
1430         if (!dest->cache) folder_item_read_cache(dest);
1431
1432         src_folder = msginfo->folder->folder;
1433
1434         num = folder->copy_msg(folder, dest, msginfo);
1435
1436         if (num != -1) {
1437                 MsgInfo *newmsginfo;
1438
1439                 if (NULL != (newmsginfo = folder->fetch_msginfo(folder, dest, num))) {
1440                         newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1441
1442                         if (dest->stype == F_OUTBOX || dest->stype == F_QUEUE  ||
1443                             dest->stype == F_DRAFT  || dest->stype == F_TRASH)
1444                                 MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1445                                                      MSG_NEW|MSG_UNREAD|MSG_DELETED);
1446                         msgcache_add_msg(dest->cache, newmsginfo);
1447
1448                         /* CLAWS */
1449                         if (src_folder->remove_msg)
1450                                 src_folder->remove_msg(src_folder, msginfo->folder,
1451                                                        msginfo->msgnum);
1452
1453                         msgcache_remove_msg(msginfo->folder->cache, msginfo->msgnum);
1454
1455                         if (MSG_IS_NEW(msginfo->flags))
1456                                 msginfo->folder->new--;
1457                         if (MSG_IS_NEW(newmsginfo->flags))
1458                                 dest->new++;
1459                         if (MSG_IS_UNREAD(msginfo->flags))
1460                                 msginfo->folder->unread--;
1461                         if (MSG_IS_UNREAD(newmsginfo->flags))
1462                                 dest->unread++;
1463                         msginfo->folder->total--;
1464                         dest->total++;
1465
1466                         procmsg_msginfo_free(newmsginfo);
1467                 }
1468         }
1469
1470         if (folder->finished_copy)
1471                 folder->finished_copy(folder, dest);
1472
1473         return num;
1474 }
1475
1476 /*
1477 gint folder_item_move_msgs_with_dest(FolderItem *dest, GSList *msglist)
1478 {
1479         Folder *folder;
1480         gint num;
1481
1482         g_return_val_if_fail(dest != NULL, -1);
1483         g_return_val_if_fail(msglist != NULL, -1);
1484
1485         folder = dest->folder;
1486         if (dest->last_num < 0) folder->scan(folder, dest);
1487
1488         num = folder->move_msgs_with_dest(folder, dest, msglist);
1489         if (num > 0) dest->last_num = num;
1490         else dest->op_count = 0;
1491
1492         return num;
1493 }
1494 */
1495
1496 gint folder_item_move_msgs_with_dest(FolderItem *dest, GSList *msglist)
1497 {
1498         Folder *folder;
1499         FolderItem *item;
1500         GSList *newmsgnums = NULL;
1501         GSList *l, *l2;
1502         gint num;
1503
1504         g_return_val_if_fail(dest != NULL, -1);
1505         g_return_val_if_fail(msglist != NULL, -1);
1506
1507         folder = dest->folder;
1508
1509         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1510         g_return_val_if_fail(folder->remove_msg != NULL, -1);
1511
1512         /*
1513          * Copy messages to destination folder and
1514          * store new message numbers in newmsgnums
1515          */
1516         item = NULL;
1517         for (l = msglist ; l != NULL ; l = g_slist_next(l)) {
1518                 MsgInfo * msginfo = (MsgInfo *) l->data;
1519
1520                 if (!item && msginfo->folder != NULL)
1521                         item = msginfo->folder;
1522
1523                 num = folder->copy_msg(folder, dest, msginfo);
1524                 newmsgnums = g_slist_append(newmsgnums, GINT_TO_POINTER(num));
1525         }
1526
1527         /* Read cache for dest folder */
1528         if (!dest->cache) folder_item_read_cache(dest);
1529
1530         /*
1531          * Fetch new MsgInfos for new messages in dest folder,
1532          * add them to the msgcache and update folder message counts
1533          */
1534         l2 = newmsgnums;
1535         for (l = msglist; l != NULL; l = g_slist_next(l)) {
1536                 MsgInfo *msginfo = (MsgInfo *) l->data;
1537
1538                 num = GPOINTER_TO_INT(l2->data);
1539
1540                 if (num != -1) {
1541                         MsgInfo *newmsginfo;
1542
1543                         newmsginfo = folder->fetch_msginfo(folder, dest, num);
1544                         if (newmsginfo) {
1545                                 newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1546                                 if (dest->stype == F_OUTBOX ||
1547                                     dest->stype == F_QUEUE  ||
1548                                     dest->stype == F_DRAFT  ||
1549                                     dest->stype == F_TRASH)
1550                                         MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1551                                                              MSG_NEW|MSG_UNREAD|MSG_DELETED);
1552                                 msgcache_add_msg(dest->cache, newmsginfo);
1553
1554                                 if (MSG_IS_NEW(newmsginfo->flags))
1555                                         dest->new++;
1556                                 if (MSG_IS_UNREAD(newmsginfo->flags))
1557                                         dest->unread++;
1558                                 dest->total++;
1559
1560                                 procmsg_msginfo_free(newmsginfo);
1561                         }
1562                 }
1563                 l2 = g_slist_next(l2);
1564         }
1565
1566         /*
1567          * Remove source messages from their folders if
1568          * copying was successfull and update folder
1569          * message counts
1570          */
1571         l2 = newmsgnums;
1572         for (l = msglist; l != NULL; l = g_slist_next(l)) {
1573                 MsgInfo *msginfo = (MsgInfo *) l->data;
1574
1575                 num = GPOINTER_TO_INT(l2->data);
1576
1577                 if (num != -1) {
1578                         item->folder->remove_msg(item->folder,
1579                                                  msginfo->folder,
1580                                                  msginfo->msgnum);
1581                         if (!item->cache)
1582                                 folder_item_read_cache(item);
1583                         msgcache_remove_msg(item->cache, msginfo->msgnum);
1584
1585                         if (MSG_IS_NEW(msginfo->flags))
1586                                 msginfo->folder->new--;
1587                         if (MSG_IS_UNREAD(msginfo->flags))
1588                                 msginfo->folder->unread--;
1589                         msginfo->folder->total--;
1590                 }
1591
1592                 l2 = g_slist_next(l2);
1593         }
1594
1595
1596         if (folder->finished_copy)
1597                 folder->finished_copy(folder, dest);
1598
1599         g_slist_free(newmsgnums);
1600         return dest->last_num;
1601 }
1602
1603 /*
1604 gint folder_item_copy_msg(FolderItem *dest, MsgInfo *msginfo)
1605 {
1606         Folder *folder;
1607         gint num;
1608
1609         g_return_val_if_fail(dest != NULL, -1);
1610         g_return_val_if_fail(msginfo != NULL, -1);
1611
1612         folder = dest->folder;
1613         if (dest->last_num < 0) folder->scan(folder, dest);
1614
1615         num = folder->copy_msg(folder, dest, msginfo);
1616         if (num > 0) dest->last_num = num;
1617
1618         return num;
1619 }
1620 */
1621
1622 gint folder_item_copy_msg(FolderItem *dest, MsgInfo *msginfo)
1623 {
1624         Folder *folder;
1625         gint num;
1626
1627         g_return_val_if_fail(dest != NULL, -1);
1628         g_return_val_if_fail(msginfo != NULL, -1);
1629
1630         folder = dest->folder;
1631
1632         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1633
1634         if (!dest->cache) folder_item_read_cache(dest);
1635
1636         num = folder->copy_msg(folder, dest, msginfo);
1637         if (num != -1) {
1638                 MsgInfo *newmsginfo;
1639
1640                 if (NULL != (newmsginfo = folder->fetch_msginfo(folder, dest, num))) {
1641                         newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1642                         if (dest->stype == F_OUTBOX ||
1643                             dest->stype == F_QUEUE  ||
1644                             dest->stype == F_DRAFT  ||
1645                             dest->stype == F_TRASH)
1646                                 MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1647                                                      MSG_NEW|MSG_UNREAD|MSG_DELETED);
1648                         msgcache_add_msg(dest->cache, newmsginfo);
1649
1650                         if (MSG_IS_NEW(newmsginfo->flags))
1651                                 dest->new++;
1652                         if (MSG_IS_UNREAD(newmsginfo->flags))
1653                                 dest->unread++;
1654                         dest->total++;
1655
1656                         procmsg_msginfo_free(newmsginfo);
1657                 }
1658         }
1659
1660         if (folder->finished_copy)
1661                 folder->finished_copy(folder, dest);
1662
1663         return num;
1664 }
1665
1666 /*
1667 gint folder_item_copy_msgs_with_dest(FolderItem *dest, GSList *msglist)
1668 {
1669         Folder *folder;
1670         gint num;
1671
1672         g_return_val_if_fail(dest != NULL, -1);
1673         g_return_val_if_fail(msglist != NULL, -1);
1674
1675         folder = dest->folder;
1676         if (dest->last_num < 0) folder->scan(folder, dest);
1677
1678         num = folder->copy_msgs_with_dest(folder, dest, msglist);
1679         if (num > 0) dest->last_num = num;
1680         else dest->op_count = 0;
1681
1682         return num;
1683 }
1684 */
1685
1686 gint folder_item_copy_msgs_with_dest(FolderItem *dest, GSList *msglist)
1687 {
1688         Folder *folder;
1689         gint num;
1690         GSList *newmsgnums = NULL;
1691         GSList *l, *l2;
1692
1693         g_return_val_if_fail(dest != NULL, -1);
1694         g_return_val_if_fail(msglist != NULL, -1);
1695
1696         folder = dest->folder;
1697
1698         g_return_val_if_fail(folder->copy_msg != NULL, -1);
1699
1700         /*
1701          * Copy messages to destination folder and
1702          * store new message numbers in newmsgnums
1703          */
1704         for (l = msglist ; l != NULL ; l = g_slist_next(l)) {
1705                 MsgInfo * msginfo = (MsgInfo *) l->data;
1706
1707                 num = folder->copy_msg(folder, dest, msginfo);
1708                 newmsgnums = g_slist_append(newmsgnums, GINT_TO_POINTER(num));
1709         }
1710
1711         /* Read cache for dest folder */
1712         if (!dest->cache) folder_item_read_cache(dest);
1713
1714         /*
1715          * Fetch new MsgInfos for new messages in dest folder,
1716          * add them to the msgcache and update folder message counts
1717          */
1718         l2 = newmsgnums;
1719         for (l = msglist; l != NULL; l = g_slist_next(l)) {
1720                 MsgInfo *msginfo = (MsgInfo *) l->data;
1721
1722                 num = GPOINTER_TO_INT(l2->data);
1723
1724                 if (num != -1) {
1725                         MsgInfo *newmsginfo;
1726
1727                         newmsginfo = folder->fetch_msginfo(folder, dest, num);
1728                         if (newmsginfo) {
1729                                 newmsginfo->flags.perm_flags = msginfo->flags.perm_flags;
1730                                 if (dest->stype == F_OUTBOX ||
1731                                     dest->stype == F_QUEUE  ||
1732                                     dest->stype == F_DRAFT  ||
1733                                     dest->stype == F_TRASH)
1734                                         MSG_UNSET_PERM_FLAGS(newmsginfo->flags,
1735                                                              MSG_NEW|MSG_UNREAD|MSG_DELETED);
1736                                 msgcache_add_msg(dest->cache, newmsginfo);
1737
1738                                 if (MSG_IS_NEW(newmsginfo->flags))
1739                                         dest->new++;
1740                                 if (MSG_IS_UNREAD(newmsginfo->flags))
1741                                         dest->unread++;
1742                                 dest->total++;
1743
1744                                 procmsg_msginfo_free(newmsginfo);
1745                         }
1746                 }
1747                 l2 = g_slist_next(l2);
1748         }
1749
1750         if (folder->finished_copy)
1751                 folder->finished_copy(folder, dest);
1752
1753         g_slist_free(newmsgnums);
1754         return dest->last_num;
1755 }
1756
1757 gint folder_item_remove_msg(FolderItem *item, gint num)
1758 {
1759         Folder *folder;
1760         gint ret;
1761         MsgInfo *msginfo;
1762
1763         g_return_val_if_fail(item != NULL, -1);
1764
1765         folder = item->folder;
1766         if (!item->cache) folder_item_read_cache(item);
1767
1768         ret = folder->remove_msg(folder, item, num);
1769
1770         msginfo = msgcache_get_msg(item->cache, num);
1771         if (msginfo != NULL) {
1772                 if (MSG_IS_NEW(msginfo->flags))
1773                         item->new--;
1774                 if (MSG_IS_UNREAD(msginfo->flags))
1775                         item->unread--;
1776                 procmsg_msginfo_free(msginfo);
1777                 msgcache_remove_msg(item->cache, num);
1778         }
1779         item->total--;
1780
1781         return ret;
1782 }
1783
1784 gint folder_item_remove_msgs(FolderItem *item, GSList *msglist)
1785 {
1786         gint ret = 0;
1787
1788         g_return_val_if_fail(item != NULL, -1);
1789
1790         if (!item->cache) folder_item_read_cache(item);
1791
1792         while (msglist != NULL) {
1793                 MsgInfo *msginfo = (MsgInfo *)msglist->data;
1794
1795                 ret = folder_item_remove_msg(item, msginfo->msgnum);
1796                 if (ret != 0) break;
1797                 msgcache_remove_msg(item->cache, msginfo->msgnum);
1798                 msglist = msglist->next;
1799         }
1800
1801         return ret;
1802 }
1803
1804 gint folder_item_remove_all_msg(FolderItem *item)
1805 {
1806         Folder *folder;
1807         gint result;
1808
1809         g_return_val_if_fail(item != NULL, -1);
1810
1811         folder = item->folder;
1812
1813         g_return_val_if_fail(folder->remove_all_msg != NULL, -1);
1814
1815         result = folder->remove_all_msg(folder, item);
1816
1817         if (result == 0) {
1818                 if (folder->finished_remove)
1819                         folder->finished_remove(folder, item);
1820
1821                 folder_item_free_cache(item);
1822                 item->cache = msgcache_new();
1823
1824                 item->new = 0;
1825                 item->unread = 0;
1826                 item->total = 0;
1827         }
1828
1829         return result;
1830 }
1831
1832 gboolean folder_item_is_msg_changed(FolderItem *item, MsgInfo *msginfo)
1833 {
1834         Folder *folder;
1835
1836         g_return_val_if_fail(item != NULL, FALSE);
1837
1838         folder = item->folder;
1839
1840         g_return_val_if_fail(folder->is_msg_changed != NULL, -1);
1841
1842         return folder->is_msg_changed(folder, item, msginfo);
1843 }
1844
1845 gchar *folder_item_get_cache_file(FolderItem *item)
1846 {
1847         gchar *path;
1848         gchar *file;
1849
1850         g_return_val_if_fail(item != NULL, NULL);
1851         g_return_val_if_fail(item->path != NULL, NULL);
1852
1853         path = folder_item_get_path(item);
1854         g_return_val_if_fail(path != NULL, NULL);
1855         if (!is_dir_exist(path))
1856                 make_dir_hier(path);
1857         file = g_strconcat(path, G_DIR_SEPARATOR_S, CACHE_FILE, NULL);
1858         g_free(path);
1859
1860         return file;
1861 }
1862
1863 gchar *folder_item_get_mark_file(FolderItem *item)
1864 {
1865         gchar *path;
1866         gchar *file;
1867
1868         g_return_val_if_fail(item != NULL, NULL);
1869         g_return_val_if_fail(item->path != NULL, NULL);
1870
1871         path = folder_item_get_path(item);
1872         g_return_val_if_fail(path != NULL, NULL);
1873         if (!is_dir_exist(path))
1874                 make_dir_hier(path);
1875         file = g_strconcat(path, G_DIR_SEPARATOR_S, MARK_FILE, NULL);
1876         g_free(path);
1877
1878         return file;
1879 }
1880
1881 static gboolean folder_build_tree(GNode *node, gpointer data)
1882 {
1883         Folder *folder = FOLDER(data);
1884         FolderItem *item;
1885         XMLNode *xmlnode;
1886         GList *list;
1887         SpecialFolderItemType stype = F_NORMAL;
1888         const gchar *name = NULL;
1889         const gchar *path = NULL;
1890         PrefsAccount *account = NULL;
1891         gboolean no_sub = FALSE, no_select = FALSE, collapsed = FALSE,
1892                  threaded = TRUE, ret_rcpt = FALSE, hidereadmsgs = FALSE;
1893         FolderSortKey sort_key = SORT_BY_NONE;
1894         FolderSortType sort_type = SORT_ASCENDING;
1895         gint new = 0, unread = 0, total = 0;
1896         time_t mtime = 0;
1897
1898         g_return_val_if_fail(node->data != NULL, FALSE);
1899         if (!node->parent) return FALSE;
1900
1901         xmlnode = node->data;
1902         if (strcmp2(xmlnode->tag->tag, "folderitem") != 0) {
1903                 g_warning("tag name != \"folderitem\"\n");
1904                 return FALSE;
1905         }
1906
1907         list = xmlnode->tag->attr;
1908         for (; list != NULL; list = list->next) {
1909                 XMLAttr *attr = list->data;
1910
1911                 if (!attr || !attr->name || !attr->value) continue;
1912                 if (!strcmp(attr->name, "type")) {
1913                         if (!strcasecmp(attr->value, "normal"))
1914                                 stype = F_NORMAL;
1915                         else if (!strcasecmp(attr->value, "inbox"))
1916                                 stype = F_INBOX;
1917                         else if (!strcasecmp(attr->value, "outbox"))
1918                                 stype = F_OUTBOX;
1919                         else if (!strcasecmp(attr->value, "draft"))
1920                                 stype = F_DRAFT;
1921                         else if (!strcasecmp(attr->value, "queue"))
1922                                 stype = F_QUEUE;
1923                         else if (!strcasecmp(attr->value, "trash"))
1924                                 stype = F_TRASH;
1925                 } else if (!strcmp(attr->name, "name"))
1926                         name = attr->value;
1927                 else if (!strcmp(attr->name, "path"))
1928                         path = attr->value;
1929                 else if (!strcmp(attr->name, "account_id")) {
1930                         account = account_find_from_id(atoi(attr->value));
1931                         if (!account) g_warning("account_id: %s not found\n",
1932                                                 attr->value);
1933                 } else if (!strcmp(attr->name, "mtime"))
1934                         mtime = strtoul(attr->value, NULL, 10);
1935                 else if (!strcmp(attr->name, "new"))
1936                         new = atoi(attr->value);
1937                 else if (!strcmp(attr->name, "unread"))
1938                         unread = atoi(attr->value);
1939                 else if (!strcmp(attr->name, "total"))
1940                         total = atoi(attr->value);
1941                 else if (!strcmp(attr->name, "no_sub"))
1942                         no_sub = *attr->value == '1' ? TRUE : FALSE;
1943                 else if (!strcmp(attr->name, "no_select"))
1944                         no_select = *attr->value == '1' ? TRUE : FALSE;
1945                 else if (!strcmp(attr->name, "collapsed"))
1946                         collapsed = *attr->value == '1' ? TRUE : FALSE;
1947                 else if (!strcmp(attr->name, "threaded"))
1948                         threaded =  *attr->value == '1' ? TRUE : FALSE;
1949                 else if (!strcmp(attr->name, "hidereadmsgs"))
1950                         hidereadmsgs =  *attr->value == '1' ? TRUE : FALSE;
1951                 else if (!strcmp(attr->name, "reqretrcpt"))
1952                         ret_rcpt =  *attr->value == '1' ? TRUE : FALSE;
1953                 else if (!strcmp(attr->name, "sort_key")) {
1954                         if (!strcmp(attr->value, "none"))
1955                                 sort_key = SORT_BY_NONE;
1956                         else if (!strcmp(attr->value, "number"))
1957                                 sort_key = SORT_BY_NUMBER;
1958                         else if (!strcmp(attr->value, "size"))
1959                                 sort_key = SORT_BY_SIZE;
1960                         else if (!strcmp(attr->value, "date"))
1961                                 sort_key = SORT_BY_DATE;
1962                         else if (!strcmp(attr->value, "from"))
1963                                 sort_key = SORT_BY_FROM;
1964                         else if (!strcmp(attr->value, "subject"))
1965                                 sort_key = SORT_BY_SUBJECT;
1966                         else if (!strcmp(attr->value, "score"))
1967                                 sort_key = SORT_BY_SCORE;
1968                         else if (!strcmp(attr->value, "label"))
1969                                 sort_key = SORT_BY_LABEL;
1970                         else if (!strcmp(attr->value, "mark"))
1971                                 sort_key = SORT_BY_MARK;
1972                         else if (!strcmp(attr->value, "unread"))
1973                                 sort_key = SORT_BY_UNREAD;
1974                         else if (!strcmp(attr->value, "mime"))
1975                                 sort_key = SORT_BY_MIME;
1976                         else if (!strcmp(attr->value, "locked"))
1977                                 sort_key = SORT_BY_LOCKED;
1978                 } else if (!strcmp(attr->name, "sort_type")) {
1979                         if (!strcmp(attr->value, "ascending"))
1980                                 sort_type = SORT_ASCENDING;
1981                         else
1982                                 sort_type = SORT_DESCENDING;
1983                 }
1984         }
1985
1986         item = folder_item_new(folder, name, path);
1987         item->stype = stype;
1988         item->account = account;
1989         item->mtime = mtime;
1990         item->new = new;
1991         item->unread = unread;
1992         item->total = total;
1993         item->no_sub = no_sub;
1994         item->no_select = no_select;
1995         item->collapsed = collapsed;
1996         item->threaded  = threaded;
1997         item->hide_read_msgs  = hidereadmsgs;
1998         item->ret_rcpt  = ret_rcpt;
1999         item->sort_key  = sort_key;
2000         item->sort_type = sort_type;
2001         item->parent = FOLDER_ITEM(node->parent->data);
2002         item->folder = folder;
2003         switch (stype) {
2004         case F_INBOX:  folder->inbox  = item; break;
2005         case F_OUTBOX: folder->outbox = item; break;
2006         case F_DRAFT:  folder->draft  = item; break;
2007         case F_QUEUE:  folder->queue  = item; break;
2008         case F_TRASH:  folder->trash  = item; break;
2009         default:       break;
2010         }
2011
2012         prefs_folder_item_read_config(item);
2013
2014         node->data = item;
2015         xml_free_node(xmlnode);
2016
2017         return FALSE;
2018 }
2019
2020 static gboolean folder_read_folder_func(GNode *node, gpointer data)
2021 {
2022         Folder *folder;
2023         XMLNode *xmlnode;
2024         GList *list;
2025         FolderType type = F_UNKNOWN;
2026         const gchar *name = NULL;
2027         const gchar *path = NULL;
2028         PrefsAccount *account = NULL;
2029         gboolean collapsed = FALSE, threaded = TRUE, ret_rcpt = FALSE;
2030
2031         if (g_node_depth(node) != 2) return FALSE;
2032         g_return_val_if_fail(node->data != NULL, FALSE);
2033
2034         xmlnode = node->data;
2035         if (strcmp2(xmlnode->tag->tag, "folder") != 0) {
2036                 g_warning("tag name != \"folder\"\n");
2037                 return TRUE;
2038         }
2039         g_node_unlink(node);
2040         list = xmlnode->tag->attr;
2041         for (; list != NULL; list = list->next) {
2042                 XMLAttr *attr = list->data;
2043
2044                 if (!attr || !attr->name || !attr->value) continue;
2045                 if (!strcmp(attr->name, "type")) {
2046                         if (!strcasecmp(attr->value, "mh"))
2047                                 type = F_MH;
2048                         else if (!strcasecmp(attr->value, "mbox"))
2049                                 type = F_MBOX;
2050                         else if (!strcasecmp(attr->value, "maildir"))
2051                                 type = F_MAILDIR;
2052                         else if (!strcasecmp(attr->value, "imap"))
2053                                 type = F_IMAP;
2054                         else if (!strcasecmp(attr->value, "news"))
2055                                 type = F_NEWS;
2056                 } else if (!strcmp(attr->name, "name"))
2057                         name = attr->value;
2058                 else if (!strcmp(attr->name, "path"))
2059                         path = attr->value;
2060                 else if (!strcmp(attr->name, "account_id")) {
2061                         account = account_find_from_id(atoi(attr->value));
2062                         if (!account) g_warning("account_id: %s not found\n",
2063                                                 attr->value);
2064                 } else if (!strcmp(attr->name, "collapsed"))
2065                         collapsed = *attr->value == '1' ? TRUE : FALSE;
2066                 else if (!strcmp(attr->name, "threaded"))
2067                         threaded = *attr->value == '1' ? TRUE : FALSE;
2068                 else if (!strcmp(attr->name, "reqretrcpt"))
2069                         ret_rcpt = *attr->value == '1' ? TRUE : FALSE;
2070         }
2071
2072         folder = folder_new(type, name, path);
2073         g_return_val_if_fail(folder != NULL, FALSE);
2074         folder->account = account;
2075         if (account && (type == F_IMAP || type == F_NEWS))
2076                 account->folder = REMOTE_FOLDER(folder);
2077         node->data = folder->node->data;
2078         g_node_destroy(folder->node);
2079         folder->node = node;
2080         folder_add(folder);
2081         FOLDER_ITEM(node->data)->collapsed = collapsed;
2082         FOLDER_ITEM(node->data)->threaded  = threaded;
2083         FOLDER_ITEM(node->data)->ret_rcpt  = ret_rcpt;
2084
2085         g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
2086                         folder_build_tree, folder);
2087
2088         return FALSE;
2089 }
2090
2091 static gchar *folder_get_list_path(void)
2092 {
2093         static gchar *filename = NULL;
2094
2095         if (!filename)
2096                 filename =  g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
2097                                         FOLDER_LIST, NULL);
2098
2099         return filename;
2100 }
2101
2102 static void folder_write_list_recursive(GNode *node, gpointer data)
2103 {
2104         FILE *fp = (FILE *)data;
2105         FolderItem *item;
2106         gint i, depth;
2107         static gchar *folder_type_str[] = {"mh", "mbox", "maildir", "imap",
2108                                            "news", "unknown"};
2109         static gchar *folder_item_stype_str[] = {"normal", "inbox", "outbox",
2110                                                  "draft", "queue", "trash"};
2111         static gchar *sort_key_str[] = {"none", "number", "size", "date",
2112                                         "from", "subject", "score", "label",
2113                                         "mark", "unread", "mime", "locked" };
2114         g_return_if_fail(node != NULL);
2115         g_return_if_fail(fp != NULL);
2116
2117         item = FOLDER_ITEM(node->data);
2118         g_return_if_fail(item != NULL);
2119
2120         depth = g_node_depth(node);
2121         for (i = 0; i < depth; i++)
2122                 fputs("    ", fp);
2123         if (depth == 1) {
2124                 Folder *folder = item->folder;
2125
2126                 fprintf(fp, "<folder type=\"%s\"", folder_type_str[folder->type]);
2127                 if (folder->name) {
2128                         fputs(" name=\"", fp);
2129                         xml_file_put_escape_str(fp, folder->name);
2130                         fputs("\"", fp);
2131                 }
2132                 if ((folder->type == F_MH) || (folder->type == F_MBOX)) {
2133                         fputs(" path=\"", fp);
2134                         xml_file_put_escape_str
2135                                 (fp, LOCAL_FOLDER(folder)->rootpath);
2136                         fputs("\"", fp);
2137                 }
2138                 if (folder->account)
2139                         fprintf(fp, " account_id=\"%d\"",
2140                                 folder->account->account_id);
2141                 if (item->collapsed && node->children)
2142                         fputs(" collapsed=\"1\"", fp);
2143                 if (item->ret_rcpt)
2144                         fputs(" reqretrcpt=\"1\"", fp);
2145         } else {
2146                 fprintf(fp, "<folderitem type=\"%s\"",
2147                         folder_item_stype_str[item->stype]);
2148                 if (item->name) {
2149                         fputs(" name=\"", fp);
2150                         xml_file_put_escape_str(fp, item->name);
2151                         fputs("\"", fp);
2152                 }
2153                 if (item->path) {
2154                         fputs(" path=\"", fp);
2155                         xml_file_put_escape_str(fp, item->path);
2156                         fputs("\"", fp);
2157                 }
2158                 if (item->account)
2159                         fprintf(fp, " account_id=\"%d\"",
2160                                 item->account->account_id);
2161                 if (item->no_sub)
2162                         fputs(" no_sub=\"1\"", fp);
2163                 if (item->no_select)
2164                         fputs(" no_select=\"1\"", fp);
2165                 if (item->collapsed && node->children)
2166                         fputs(" collapsed=\"1\"", fp);
2167                 if (item->threaded)
2168                         fputs(" threaded=\"1\"", fp);
2169                 else
2170                         fputs(" threaded=\"0\"", fp);
2171                 if (item->hide_read_msgs)
2172                         fputs(" hidereadmsgs=\"1\"", fp);
2173                 else
2174                         fputs(" hidereadmsgs=\"0\"", fp);
2175                 if (item->ret_rcpt)
2176                         fputs(" reqretrcpt=\"1\"", fp);
2177
2178                 if (item->sort_key != SORT_BY_NONE) {
2179                         fprintf(fp, " sort_key=\"%s\"",
2180                                 sort_key_str[item->sort_key]);
2181                         if (item->sort_type == SORT_ASCENDING)
2182                                 fprintf(fp, " sort_type=\"ascending\"");
2183                         else
2184                                 fprintf(fp, " sort_type=\"descending\"");
2185                 }
2186
2187                 fprintf(fp,
2188                         " mtime=\"%lu\" new=\"%d\" unread=\"%d\" total=\"%d\"",
2189                         item->mtime, item->new, item->unread, item->total);
2190         }
2191
2192         if (node->children) {
2193                 GNode *child;
2194                 fputs(">\n", fp);
2195
2196                 child = node->children;
2197                 while (child) {
2198                         GNode *cur;
2199
2200                         cur = child;
2201                         child = cur->next;
2202                         folder_write_list_recursive(cur, data);
2203                 }
2204
2205                 for (i = 0; i < depth; i++)
2206                         fputs("    ", fp);
2207                 fprintf(fp, "</%s>\n", depth == 1 ? "folder" : "folderitem");
2208         } else
2209                 fputs(" />\n", fp);
2210 }
2211
2212 static void folder_update_op_count_rec(GNode *node) {
2213         FolderItem *fitem = FOLDER_ITEM(node->data);
2214
2215         if (g_node_depth(node) > 0) {
2216                 if (fitem->op_count > 0) {
2217                         fitem->op_count = 0;
2218                         folderview_update_item(fitem, 0);
2219                 }
2220                 if (node->children) {
2221                         GNode *child;
2222
2223                         child = node->children;
2224                         while (child) {
2225                                 GNode *cur;
2226
2227                                 cur = child;
2228                                 child = cur->next;
2229                                 folder_update_op_count_rec(cur);
2230                         }
2231                 }
2232         }
2233 }
2234
2235 void folder_update_op_count() {
2236         GList *cur;
2237         Folder *folder;
2238
2239         for (cur = folder_list; cur != NULL; cur = cur->next) {
2240                 folder = cur->data;
2241                 folder_update_op_count_rec(folder->node);
2242         }
2243 }
2244
2245 typedef struct _type_str {
2246         gchar * str;
2247         gint type;
2248 } type_str;
2249
2250
2251 /*
2252 static gchar * folder_item_get_tree_identifier(FolderItem * item)
2253 {
2254         if (item->parent != NULL) {
2255                 gchar * path;
2256                 gchar * id;
2257
2258                 path = folder_item_get_tree_identifier(item->parent);
2259                 if (path == NULL)
2260                         return NULL;
2261
2262                 id = g_strconcat(path, "/", item->name, NULL);
2263                 g_free(path);
2264
2265                 return id;
2266         }
2267         else {
2268                 return g_strconcat("/", item->name, NULL);
2269         }
2270 }
2271 */
2272
2273 /* CLAWS: temporary local folder for filtering */
2274 static Folder *processing_folder;
2275 static FolderItem *processing_folder_item;
2276
2277 static void folder_create_processing_folder(void)
2278 {
2279 #define PROCESSING_FOLDER ".processing"
2280         Folder     *tmpparent;
2281         gchar      *tmpname;
2282
2283         tmpparent = folder_get_default_folder();
2284         g_assert(tmpparent);
2285         debug_print("tmpparentroot %s\n", LOCAL_FOLDER(tmpparent)->rootpath);
2286         if (LOCAL_FOLDER(tmpparent)->rootpath[0] == '/')
2287                 tmpname = g_strconcat(LOCAL_FOLDER(tmpparent)->rootpath,
2288                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER,
2289                                       NULL);
2290         else
2291                 tmpname = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
2292                                       LOCAL_FOLDER(tmpparent)->rootpath,
2293                                       G_DIR_SEPARATOR_S, PROCESSING_FOLDER,
2294                                       NULL);
2295
2296         processing_folder = folder_new(F_MH, "PROCESSING", LOCAL_FOLDER(tmpparent)->rootpath);
2297         g_assert(processing_folder);
2298
2299         if (!is_dir_exist(tmpname)) {
2300                 debug_print("*TMP* creating %s\n", tmpname);
2301                 processing_folder_item = processing_folder->create_folder(processing_folder,
2302                                                                           processing_folder->node->data,
2303                                                                           PROCESSING_FOLDER);
2304                 g_assert(processing_folder_item);
2305         }
2306         else {
2307                 debug_print("*TMP* already created\n");
2308                 processing_folder_item = folder_item_new(processing_folder, ".processing", ".processing");
2309                 g_assert(processing_folder_item);
2310                 folder_item_append(processing_folder->node->data, processing_folder_item);
2311         }
2312         g_free(tmpname);
2313 }
2314
2315 FolderItem *folder_get_default_processing(void)
2316 {
2317         if (!processing_folder_item) {
2318                 folder_create_processing_folder();
2319         }
2320         return processing_folder_item;
2321 }
2322
2323 /* folder_persist_prefs_new() - return hash table with persistent
2324  * settings (and folder name as key).
2325  * (note that in claws other options are in the PREFS_FOLDER_ITEM_RC
2326  * file, so those don't need to be included in PersistPref yet)
2327  */
2328 GHashTable *folder_persist_prefs_new(Folder *folder)
2329 {
2330         GHashTable *pptable;
2331
2332         g_return_val_if_fail(folder, NULL);
2333         pptable = g_hash_table_new(g_str_hash, g_str_equal);
2334         folder_get_persist_prefs_recursive(folder->node, pptable);
2335         return pptable;
2336 }
2337
2338 void folder_persist_prefs_free(GHashTable *pptable)
2339 {
2340         g_return_if_fail(pptable);
2341         g_hash_table_foreach_remove(pptable, persist_prefs_free, NULL);
2342         g_hash_table_destroy(pptable);
2343 }
2344
2345 const PersistPrefs *folder_get_persist_prefs(GHashTable *pptable, const char *name)
2346 {
2347         if (pptable == NULL || name == NULL) return NULL;
2348         return g_hash_table_lookup(pptable, name);
2349 }
2350
2351 void folder_item_restore_persist_prefs(FolderItem *item, GHashTable *pptable)
2352 {
2353         const PersistPrefs *pp;
2354         gchar *id = folder_item_get_identifier(item);
2355
2356         pp = folder_get_persist_prefs(pptable, id);
2357         g_free(id);
2358
2359         if (!pp) return;
2360
2361         /* CLAWS: since not all folder properties have been migrated to
2362          * folderlist.xml, we need to call the old stuff first before
2363          * setting things that apply both to Main and Claws. */
2364         prefs_folder_item_read_config(item);
2365
2366         item->collapsed = pp->collapsed;
2367         item->threaded  = pp->threaded;
2368         item->ret_rcpt  = pp->ret_rcpt;
2369         item->hide_read_msgs = pp->hide_read_msgs;
2370         item->sort_key  = pp->sort_key;
2371         item->sort_type = pp->sort_type;
2372 }
2373
2374 static void folder_get_persist_prefs_recursive(GNode *node, GHashTable *pptable)
2375 {
2376         FolderItem *item = FOLDER_ITEM(node->data);
2377         PersistPrefs *pp;
2378         GNode *child, *cur;
2379         gchar *id;
2380
2381         g_return_if_fail(node != NULL);
2382         g_return_if_fail(item != NULL);
2383
2384         /* NOTE: item->path == NULL means top level folder; not interesting
2385          * to store preferences of that one.  */
2386         if (item->path) {
2387                 id = folder_item_get_identifier(item);
2388                 pp = g_new0(PersistPrefs, 1);
2389                 g_return_if_fail(pp != NULL);
2390                 pp->collapsed = item->collapsed;
2391                 pp->threaded  = item->threaded;
2392                 pp->ret_rcpt  = item->ret_rcpt;
2393                 pp->hide_read_msgs = item->hide_read_msgs;
2394                 pp->sort_key  = item->sort_key;
2395                 pp->sort_type = item->sort_type;
2396                 g_hash_table_insert(pptable, id, pp);
2397         }
2398
2399         if (node->children) {
2400                 child = node->children;
2401                 while (child) {
2402                         cur = child;
2403                         child = cur->next;
2404                         folder_get_persist_prefs_recursive(cur, pptable);
2405                 }
2406         }
2407 }
2408
2409 static gboolean persist_prefs_free(gpointer key, gpointer val, gpointer data)
2410 {
2411         if (key)
2412                 g_free(key);
2413         if (val)
2414                 g_free(val);
2415         return TRUE;
2416 }
2417
2418 void folder_item_apply_processing(FolderItem *item)
2419 {
2420         GSList *processing_list;
2421         GSList *mlist, *cur;
2422         GHashTable *folder_table;
2423
2424         g_return_if_fail(item != NULL);
2425
2426         processing_list = item->prefs->processing;
2427         if (processing_list == NULL)
2428                 return;
2429         folder_table = g_hash_table_new(NULL, NULL);
2430
2431         mlist = folder_item_get_msg_list(item);
2432
2433         for (cur = mlist ; cur != NULL ; cur = cur->next) {
2434                 MsgInfo * msginfo;
2435
2436                 msginfo = (MsgInfo *) cur->data;
2437                 filter_message_by_msginfo(processing_list, msginfo,
2438                                           folder_table);
2439                 procmsg_msginfo_free(msginfo);
2440         }
2441
2442         /* folder_item_scan_foreach(summaryview->folder_table); */
2443         folderview_update_item_foreach(folder_table, FALSE);
2444
2445         g_slist_free(mlist);
2446
2447         g_hash_table_destroy(folder_table);
2448 }