claws-mail/src/folder.c
Christoph Hohmann 7716bfe3fd 0.9.4claws66
* src/folder.c
        destroy folder's MsgCache if FolderItem is removed to make sure
        it is not saved when the FolderItem is destroyed
2003-09-06 18:52:29 +00:00

3041 lines
75 KiB
C

/*
* Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
* Copyright (C) 1999-2003 Hiroyuki Yamamoto
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
#include "defs.h"
#include <glib.h>
#include <stdio.h>
#include <string.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
#include <stdlib.h>
#include "intl.h"
#include "folder.h"
#include "session.h"
#include "imap.h"
#include "news.h"
#include "mh.h"
#include "mbox_folder.h"
#include "utils.h"
#include "xml.h"
#include "codeconv.h"
#include "prefs_gtk.h"
#include "account.h"
#include "filtering.h"
#include "scoring.h"
#include "procheader.h"
#include "hooks.h"
#include "log.h"
#include "folder_item_prefs.h"
/* Dependecies to be removed ?! */
#include "prefs_common.h"
#include "prefs_account.h"
static GList *folder_list = NULL;
static void folder_init (Folder *folder,
const gchar *name);
static gboolean folder_read_folder_func (GNode *node,
gpointer data);
static gchar *folder_get_list_path (void);
static void folder_write_list_recursive (GNode *node,
gpointer data);
static void folder_update_op_count_rec (GNode *node);
static void folder_get_persist_prefs_recursive
(GNode *node, GHashTable *pptable);
static gboolean persist_prefs_free (gpointer key, gpointer val, gpointer data);
void folder_item_read_cache (FolderItem *item);
void folder_item_free_cache (FolderItem *item);
gint folder_item_scan_full (FolderItem *item, gboolean filtering);
static GSList *classlist;
void folder_system_init(void)
{
folder_register_class(mh_get_class());
folder_register_class(imap_get_class());
folder_register_class(news_get_class());
folder_register_class(mbox_get_class());
}
GSList *folder_get_class_list(void)
{
return classlist;
}
void folder_register_class(FolderClass *klass)
{
debug_print("registering folder class %s\n", klass->idstr);
classlist = g_slist_append(classlist, klass);
}
Folder *folder_new(FolderClass *klass, const gchar *name, const gchar *path)
{
Folder *folder = NULL;
FolderItem *item;
g_return_val_if_fail(klass != NULL, NULL);
name = name ? name : path;
folder = klass->new_folder(name, path);
/* Create root folder item */
item = folder_item_new(folder, name, NULL);
item->folder = folder;
folder->node = item->node = g_node_new(item);
folder->data = NULL;
return folder;
}
static void folder_init(Folder *folder, const gchar *name)
{
g_return_if_fail(folder != NULL);
folder_set_name(folder, name);
/* Init folder data */
folder->account = NULL;
folder->inbox = NULL;
folder->outbox = NULL;
folder->draft = NULL;
folder->queue = NULL;
folder->trash = NULL;
}
void folder_local_folder_init(Folder *folder, const gchar *name,
const gchar *path)
{
folder_init(folder, name);
LOCAL_FOLDER(folder)->rootpath = g_strdup(path);
}
void folder_remote_folder_init(Folder *folder, const gchar *name,
const gchar *path)
{
folder_init(folder, name);
REMOTE_FOLDER(folder)->session = NULL;
}
void folder_destroy(Folder *folder)
{
g_return_if_fail(folder != NULL);
g_return_if_fail(folder->klass->destroy_folder != NULL);
folder_list = g_list_remove(folder_list, folder);
folder_tree_destroy(folder);
folder->klass->destroy_folder(folder);
g_free(folder->name);
g_free(folder);
}
void folder_local_folder_destroy(LocalFolder *lfolder)
{
g_return_if_fail(lfolder != NULL);
g_free(lfolder->rootpath);
}
void folder_remote_folder_destroy(RemoteFolder *rfolder)
{
g_return_if_fail(rfolder != NULL);
if (rfolder->session)
session_destroy(rfolder->session);
}
FolderItem *folder_item_new(Folder *folder, const gchar *name, const gchar *path)
{
FolderItem *item = NULL;
if (folder->klass->item_new) {
item = folder->klass->item_new(folder);
} else {
item = g_new0(FolderItem, 1);
}
g_return_val_if_fail(item != NULL, NULL);
item->stype = F_NORMAL;
item->name = g_strdup(name);
item->path = g_strdup(path);
item->mtime = 0;
item->new_msgs = 0;
item->unread_msgs = 0;
item->unreadmarked_msgs = 0;
item->total_msgs = 0;
item->last_num = -1;
item->cache = NULL;
item->no_sub = FALSE;
item->no_select = FALSE;
item->collapsed = FALSE;
item->thread_collapsed = FALSE;
item->threaded = TRUE;
item->ret_rcpt = FALSE;
item->opened = FALSE;
item->node = NULL;
item->parent = NULL;
item->folder = NULL;
item->account = NULL;
item->apply_sub = FALSE;
item->mark_queue = NULL;
item->data = NULL;
item->prefs = folder_item_prefs_new();
return item;
}
void folder_item_append(FolderItem *parent, FolderItem *item)
{
g_return_if_fail(parent != NULL);
g_return_if_fail(parent->folder != NULL);
g_return_if_fail(parent->node != NULL);
g_return_if_fail(item != NULL);
item->parent = parent;
item->folder = parent->folder;
item->node = g_node_append_data(parent->node, item);
}
static gboolean folder_item_remove_func(GNode *node, gpointer data)
{
FolderItem *item = FOLDER_ITEM(node->data);
if (item->cache != NULL) {
msgcache_destroy(item->cache);
item->cache = NULL;
}
folder_item_destroy(item);
return FALSE;
}
void folder_item_remove(FolderItem *item)
{
GNode *node;
g_return_if_fail(item != NULL);
g_return_if_fail(item->folder != NULL);
g_return_if_fail(item->node != NULL);
node = item->node;
if (item->folder->node == node)
item->folder->node = NULL;
g_node_traverse(node, G_POST_ORDER, G_TRAVERSE_ALL, -1,
folder_item_remove_func, NULL);
g_node_destroy(node);
}
void folder_item_remove_children(FolderItem *item)
{
GNode *node, *next;
g_return_if_fail(item != NULL);
g_return_if_fail(item->folder != NULL);
g_return_if_fail(item->node != NULL);
node = item->node->children;
while (node != NULL) {
next = node->next;
folder_item_remove(FOLDER_ITEM(node->data));
node = next;
}
}
void folder_item_destroy(FolderItem *item)
{
Folder *folder;
g_return_if_fail(item != NULL);
folder = item->folder;
if (folder) {
if (folder->inbox == item)
folder->inbox = NULL;
else if (folder->outbox == item)
folder->outbox = NULL;
else if (folder->draft == item)
folder->draft = NULL;
else if (folder->queue == item)
folder->queue = NULL;
else if (folder->trash == item)
folder->trash = NULL;
}
if (item->cache)
folder_item_free_cache(item);
g_free(item->name);
g_free(item->path);
if (item->folder != NULL) {
if(item->folder->klass->item_destroy) {
item->folder->klass->item_destroy(item->folder, item);
} else {
g_free(item);
}
}
}
void folder_set_ui_func(Folder *folder, FolderUIFunc func, gpointer data)
{
g_return_if_fail(folder != NULL);
folder->ui_func = func;
folder->ui_func_data = data;
}
void folder_set_name(Folder *folder, const gchar *name)
{
g_return_if_fail(folder != NULL);
g_free(folder->name);
folder->name = name ? g_strdup(name) : NULL;
if (folder->node && folder->node->data) {
FolderItem *item = (FolderItem *)folder->node->data;
g_free(item->name);
item->name = name ? g_strdup(name) : NULL;
}
}
gboolean folder_tree_destroy_func(GNode *node, gpointer data) {
FolderItem *item = (FolderItem *) node->data;
folder_item_destroy(item);
return FALSE;
}
void folder_tree_destroy(Folder *folder)
{
g_return_if_fail(folder != NULL);
prefs_scoring_clear_folder(folder);
prefs_filtering_clear_folder(folder);
if (folder->node)
folder_item_remove(FOLDER_ITEM(folder->node->data));
}
void folder_add(Folder *folder)
{
Folder *cur_folder;
GList *cur;
gint i;
g_return_if_fail(folder != NULL);
for (i = 0, cur = folder_list; cur != NULL; cur = cur->next, i++) {
cur_folder = FOLDER(cur->data);
if (FOLDER_TYPE(folder) == F_MH) {
if (FOLDER_TYPE(cur_folder) != F_MH) break;
} else if (FOLDER_TYPE(folder) == F_MBOX) {
if (FOLDER_TYPE(cur_folder) != F_MH &&
FOLDER_TYPE(cur_folder) != F_MBOX) break;
} else if (FOLDER_TYPE(folder) == F_IMAP) {
if (FOLDER_TYPE(cur_folder) != F_MH &&
FOLDER_TYPE(cur_folder) != F_MBOX &&
FOLDER_TYPE(cur_folder) != F_IMAP) break;
} else if (FOLDER_TYPE(folder) == F_NEWS) {
if (FOLDER_TYPE(cur_folder) != F_MH &&
FOLDER_TYPE(cur_folder) != F_MBOX &&
FOLDER_TYPE(cur_folder) != F_IMAP &&
FOLDER_TYPE(cur_folder) != F_NEWS) break;
}
}
folder_list = g_list_insert(folder_list, folder, i);
}
GList *folder_get_list(void)
{
return folder_list;
}
gint folder_read_list(void)
{
GNode *node;
XMLNode *xmlnode;
gchar *path;
path = folder_get_list_path();
if (!is_file_exist(path)) return -1;
node = xml_parse_file(path);
if (!node) return -1;
xmlnode = node->data;
if (strcmp2(xmlnode->tag->tag, "folderlist") != 0) {
g_warning("wrong folder list\n");
xml_free_tree(node);
return -1;
}
g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, 2,
folder_read_folder_func, NULL);
xml_free_tree(node);
if (folder_list)
return 0;
else
return -1;
}
void folder_write_list(void)
{
GList *list;
Folder *folder;
gchar *path;
PrefFile *pfile;
path = folder_get_list_path();
if ((pfile = prefs_write_open(path)) == NULL) return;
fprintf(pfile->fp, "<?xml version=\"1.0\" encoding=\"%s\"?>\n",
conv_get_current_charset_str());
fputs("\n<folderlist>\n", pfile->fp);
for (list = folder_list; list != NULL; list = list->next) {
folder = list->data;
folder_write_list_recursive(folder->node, pfile->fp);
}
fputs("</folderlist>\n", pfile->fp);
if (prefs_file_close(pfile) < 0)
g_warning("failed to write folder list.\n");
}
gboolean folder_scan_tree_func(GNode *node, gpointer data)
{
GHashTable *pptable = (GHashTable *)data;
FolderItem *item = (FolderItem *)node->data;
folder_item_restore_persist_prefs(item, pptable);
folder_item_scan_full(item, FALSE);
return FALSE;
}
void folder_scan_tree(Folder *folder)
{
GHashTable *pptable;
FolderUpdateData hookdata;
if (!folder->klass->scan_tree)
return;
pptable = folder_persist_prefs_new(folder);
/*
* should be changed and tree update should be done without
* destroying the tree first
*/
folder_tree_destroy(folder);
folder->klass->scan_tree(folder);
hookdata.folder = folder;
hookdata.update_flags = FOLDER_TREE_CHANGED;
hooks_invoke(FOLDER_UPDATE_HOOKLIST, &hookdata);
g_node_traverse(folder->node, G_POST_ORDER, G_TRAVERSE_ALL, -1, folder_scan_tree_func, pptable);
folder_persist_prefs_free(pptable);
prefs_matcher_read_config();
folder_write_list();
}
FolderItem *folder_create_folder(FolderItem *parent, const gchar *name)
{
FolderItem *new_item;
new_item = parent->folder->klass->create_folder(parent->folder, parent, name);
if (new_item)
new_item->cache = msgcache_new();
return new_item;
}
struct TotalMsgCount
{
guint new_msgs;
guint unread_msgs;
guint unreadmarked_msgs;
guint total_msgs;
};
struct FuncToAllFoldersData
{
FolderItemFunc function;
gpointer data;
};
static gboolean folder_func_to_all_folders_func(GNode *node, gpointer data)
{
FolderItem *item;
struct FuncToAllFoldersData *function_data = (struct FuncToAllFoldersData *) data;
g_return_val_if_fail(node->data != NULL, FALSE);
item = FOLDER_ITEM(node->data);
g_return_val_if_fail(item != NULL, FALSE);
function_data->function(item, function_data->data);
return FALSE;
}
void folder_func_to_all_folders(FolderItemFunc function, gpointer data)
{
GList *list;
Folder *folder;
struct FuncToAllFoldersData function_data;
function_data.function = function;
function_data.data = data;
for (list = folder_list; list != NULL; list = list->next) {
folder = FOLDER(list->data);
if (folder->node)
g_node_traverse(folder->node, G_PRE_ORDER,
G_TRAVERSE_ALL, -1,
folder_func_to_all_folders_func,
&function_data);
}
}
static void folder_count_total_msgs_func(FolderItem *item, gpointer data)
{
struct TotalMsgCount *count = (struct TotalMsgCount *)data;
count->new_msgs += item->new_msgs;
count->unread_msgs += item->unread_msgs;
count->unreadmarked_msgs += item->unreadmarked_msgs;
count->total_msgs += item->total_msgs;
}
struct TotalMsgStatus
{
guint new;
guint unread;
guint total;
GString *str;
};
static gboolean folder_get_status_full_all_func(GNode *node, gpointer data)
{
FolderItem *item;
struct TotalMsgStatus *status = (struct TotalMsgStatus *)data;
gchar *id;
g_return_val_if_fail(node->data != NULL, FALSE);
item = FOLDER_ITEM(node->data);
if (!item->path) return FALSE;
status->new += item->new_msgs;
status->unread += item->unread_msgs;
status->total += item->total_msgs;
if (status->str) {
id = folder_item_get_identifier(item);
g_string_sprintfa(status->str, "%5d %5d %5d %s\n",
item->new_msgs, item->unread_msgs,
item->total_msgs, id);
g_free(id);
}
return FALSE;
}
static void folder_get_status_full_all(GString *str, guint *new, guint *unread,
guint *total)
{
GList *list;
Folder *folder;
struct TotalMsgStatus status;
status.new = status.unread = status.total = 0;
status.str = str;
debug_print("Counting total number of messages...\n");
for (list = folder_list; list != NULL; list = list->next) {
folder = FOLDER(list->data);
if (folder->node)
g_node_traverse(folder->node, G_PRE_ORDER,
G_TRAVERSE_ALL, -1,
folder_get_status_full_all_func,
&status);
}
*new = status.new;
*unread = status.unread;
*total = status.total;
}
gchar *folder_get_status(GPtrArray *folders, gboolean full)
{
guint new, unread, total;
GString *str;
gint i;
gchar *ret;
new = unread = total = 0;
str = g_string_new(NULL);
if (folders) {
for (i = 0; i < folders->len; i++) {
FolderItem *item;
item = g_ptr_array_index(folders, i);
new += item->new_msgs;
unread += item->unread_msgs;
total += item->total_msgs;
if (full) {
gchar *id;
id = folder_item_get_identifier(item);
g_string_sprintfa(str, "%5d %5d %5d %s\n",
item->new_msgs, item->unread_msgs,
item->total_msgs, id);
g_free(id);
}
}
} else {
folder_get_status_full_all(full ? str : NULL,
&new, &unread, &total);
}
if (full)
g_string_sprintfa(str, "%5d %5d %5d\n", new, unread, total);
else
g_string_sprintfa(str, "%d %d %d\n", new, unread, total);
ret = str->str;
g_string_free(str, FALSE);
return ret;
}
void folder_count_total_msgs(guint *new_msgs, guint *unread_msgs, guint *unreadmarked_msgs, guint *total_msgs)
{
struct TotalMsgCount count;
count.new_msgs = count.unread_msgs = count.unreadmarked_msgs = count.total_msgs = 0;
debug_print("Counting total number of messages...\n");
folder_func_to_all_folders(folder_count_total_msgs_func, &count);
*new_msgs = count.new_msgs;
*unread_msgs = count.unread_msgs;
*unreadmarked_msgs = count.unreadmarked_msgs;
*total_msgs = count.total_msgs;
}
Folder *folder_find_from_path(const gchar *path)
{
GList *list;
Folder *folder;
for (list = folder_list; list != NULL; list = list->next) {
folder = list->data;
if ((FOLDER_TYPE(folder) == F_MH || FOLDER_TYPE(folder) == F_MBOX) &&
!path_cmp(LOCAL_FOLDER(folder)->rootpath, path))
return folder;
}
return NULL;
}
Folder *folder_find_from_name(const gchar *name, FolderClass *klass)
{
GList *list;
Folder *folder;
for (list = folder_list; list != NULL; list = list->next) {
folder = list->data;
if (folder->klass == klass && strcmp2(name, folder->name) == 0)
return folder;
}
return NULL;
}
static gboolean folder_item_find_func(GNode *node, gpointer data)
{
FolderItem *item = node->data;
gpointer *d = data;
const gchar *path = d[0];
if (path_cmp(path, item->path) != 0)
return FALSE;
d[1] = item;
return TRUE;
}
FolderItem *folder_find_item_from_path(const gchar *path)
{
Folder *folder;
gpointer d[2];
folder = folder_get_default_folder();
g_return_val_if_fail(folder != NULL, NULL);
d[0] = (gpointer)path;
d[1] = NULL;
g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
folder_item_find_func, d);
return d[1];
}
FolderClass *folder_get_class_from_string(const gchar *str)
{
GSList *classlist;
classlist = folder_get_class_list();
for (; classlist != NULL; classlist = g_slist_next(classlist)) {
FolderClass *class = (FolderClass *) classlist->data;
if (g_strcasecmp(class->idstr, str) == 0)
return class;
}
return NULL;
}
gchar *folder_get_identifier(Folder *folder)
{
gchar *type_str;
g_return_val_if_fail(folder != NULL, NULL);
type_str = folder->klass->idstr;
return g_strconcat("#", type_str, "/", folder->name, NULL);
}
gchar *folder_item_get_identifier(FolderItem *item)
{
gchar *id;
gchar *folder_id;
g_return_val_if_fail(item != NULL, NULL);
g_return_val_if_fail(item->path != NULL, NULL);
folder_id = folder_get_identifier(item->folder);
id = g_strconcat(folder_id, "/", item->path, NULL);
g_free(folder_id);
return id;
}
FolderItem *folder_find_item_from_identifier(const gchar *identifier)
{
Folder *folder;
gpointer d[2];
gchar *str;
gchar *p;
gchar *name;
gchar *path;
FolderClass *class;
g_return_val_if_fail(identifier != NULL, NULL);
if (*identifier != '#')
return folder_find_item_from_path(identifier);
Xstrdup_a(str, identifier, return NULL);
p = strchr(str, '/');
if (!p)
return folder_find_item_from_path(identifier);
*p = '\0';
p++;
class = folder_get_class_from_string(&str[1]);
if (class == NULL)
return folder_find_item_from_path(identifier);
name = p;
p = strchr(p, '/');
if (!p)
return folder_find_item_from_path(identifier);
*p = '\0';
p++;
folder = folder_find_from_name(name, class);
if (!folder)
return folder_find_item_from_path(identifier);
path = p;
d[0] = (gpointer)path;
d[1] = NULL;
g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
folder_item_find_func, d);
return d[1];
}
/**
* Get a displayable name for a FolderItem
*
* \param item FolderItem for that a name should be created
* \return Displayable name for item, returned string has to
* be freed
*/
gchar *folder_item_get_name(FolderItem *item)
{
gchar *name = NULL;
switch (item->stype) {
case F_INBOX:
name = g_strdup(!strcmp2(item->name, INBOX_DIR) ? _("Inbox") :
item->name);
break;
case F_OUTBOX:
name = g_strdup(!strcmp2(item->name, OUTBOX_DIR) ? _("Sent") :
item->name);
break;
case F_QUEUE:
name = g_strdup(!strcmp2(item->name, QUEUE_DIR) ? _("Queue") :
item->name);
break;
case F_TRASH:
name = g_strdup(!strcmp2(item->name, TRASH_DIR) ? _("Trash") :
item->name);
break;
case F_DRAFT:
name = g_strdup(!strcmp2(item->name, DRAFT_DIR) ? _("Drafts") :
item->name);
break;
default:
break;
}
if (name == NULL) {
/*
* should probably be done by a virtual function,
* the folder knows the ui string and how to abbrev
*/
if (!item->parent) {
name = g_strconcat(item->name, " (", item->folder->klass->uistr, ")", NULL);
} else {
if (FOLDER_CLASS(item->folder) == news_get_class() &&
item->path && !strcmp2(item->name, item->path))
name = get_abbrev_newsgroup_name
(item->path,
prefs_common.ng_abbrev_len);
else
name = g_strdup(item->name);
}
}
if (name == NULL)
name = g_strdup("");
return name;
}
Folder *folder_get_default_folder(void)
{
return folder_list ? FOLDER(folder_list->data) : NULL;
}
FolderItem *folder_get_default_inbox(void)
{
Folder *folder;
if (!folder_list) return NULL;
folder = FOLDER(folder_list->data);
g_return_val_if_fail(folder != NULL, NULL);
return folder->inbox;
}
FolderItem *folder_get_default_outbox(void)
{
Folder *folder;
if (!folder_list) return NULL;
folder = FOLDER(folder_list->data);
g_return_val_if_fail(folder != NULL, NULL);
return folder->outbox;
}
FolderItem *folder_get_default_draft(void)
{
Folder *folder;
if (!folder_list) return NULL;
folder = FOLDER(folder_list->data);
g_return_val_if_fail(folder != NULL, NULL);
return folder->draft;
}
FolderItem *folder_get_default_queue(void)
{
Folder *folder;
if (!folder_list) return NULL;
folder = FOLDER(folder_list->data);
g_return_val_if_fail(folder != NULL, NULL);
return folder->queue;
}
FolderItem *folder_get_default_trash(void)
{
Folder *folder;
if (!folder_list) return NULL;
folder = FOLDER(folder_list->data);
g_return_val_if_fail(folder != NULL, NULL);
return folder->trash;
}
#define CREATE_FOLDER_IF_NOT_EXIST(member, dir, type) \
{ \
if (!folder->member) { \
item = folder_item_new(folder, dir, dir); \
item->stype = type; \
folder_item_append(rootitem, item); \
folder->member = item; \
} \
}
void folder_set_missing_folders(void)
{
Folder *folder;
FolderItem *rootitem;
FolderItem *item;
GList *list;
for (list = folder_list; list != NULL; list = list->next) {
folder = list->data;
if (FOLDER_TYPE(folder) != F_MH) continue;
rootitem = FOLDER_ITEM(folder->node->data);
g_return_if_fail(rootitem != NULL);
if (folder->inbox && folder->outbox && folder->draft &&
folder->queue && folder->trash)
continue;
if (folder->klass->create_tree(folder) < 0) {
g_warning("%s: can't create the folder tree.\n",
LOCAL_FOLDER(folder)->rootpath);
continue;
}
CREATE_FOLDER_IF_NOT_EXIST(inbox, INBOX_DIR, F_INBOX);
CREATE_FOLDER_IF_NOT_EXIST(outbox, OUTBOX_DIR, F_OUTBOX);
CREATE_FOLDER_IF_NOT_EXIST(draft, DRAFT_DIR, F_DRAFT);
CREATE_FOLDER_IF_NOT_EXIST(queue, QUEUE_DIR, F_QUEUE);
CREATE_FOLDER_IF_NOT_EXIST(trash, TRASH_DIR, F_TRASH);
}
}
static gboolean folder_unref_account_func(GNode *node, gpointer data)
{
FolderItem *item = node->data;
PrefsAccount *account = data;
if (item->account == account)
item->account = NULL;
return FALSE;
}
void folder_unref_account_all(PrefsAccount *account)
{
Folder *folder;
GList *list;
if (!account) return;
for (list = folder_list; list != NULL; list = list->next) {
folder = list->data;
if (folder->account == account)
folder->account = NULL;
g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
folder_unref_account_func, account);
}
}
#undef CREATE_FOLDER_IF_NOT_EXIST
gchar *folder_item_get_path(FolderItem *item)
{
Folder *folder;
g_return_val_if_fail(item != NULL, NULL);
folder = item->folder;
g_return_val_if_fail(folder != NULL, NULL);
return folder->klass->item_get_path(folder, item);
}
void folder_item_set_default_flags(FolderItem *dest, MsgFlags *flags)
{
if (!(dest->stype == F_OUTBOX ||
dest->stype == F_QUEUE ||
dest->stype == F_DRAFT ||
dest->stype == F_TRASH)) {
flags->perm_flags = MSG_NEW|MSG_UNREAD;
} else {
flags->perm_flags = 0;
}
flags->tmp_flags = MSG_CACHED;
if (FOLDER_TYPE(dest->folder) == F_MH) {
if (dest->stype == F_QUEUE) {
MSG_SET_TMP_FLAGS(*flags, MSG_QUEUED);
} else if (dest->stype == F_DRAFT) {
MSG_SET_TMP_FLAGS(*flags, MSG_DRAFT);
}
}
}
static gint folder_sort_cache_list_by_msgnum(gconstpointer a, gconstpointer b)
{
MsgInfo *msginfo_a = (MsgInfo *) a;
MsgInfo *msginfo_b = (MsgInfo *) b;
return (msginfo_a->msgnum - msginfo_b->msgnum);
}
static gint folder_sort_folder_list(gconstpointer a, gconstpointer b)
{
guint gint_a = GPOINTER_TO_INT(a);
guint gint_b = GPOINTER_TO_INT(b);
return (gint_a - gint_b);
}
gint folder_item_open(FolderItem *item)
{
if((item->folder->klass->scan_required != NULL) && (item->folder->klass->scan_required(item->folder, item))) {
folder_item_scan_full(item, TRUE);
}
/* Processing */
if(item->prefs->processing != NULL) {
gchar *buf;
buf = g_strdup_printf(_("Processing (%s)...\n"), item->path);
debug_print("%s\n", buf);
g_free(buf);
folder_item_apply_processing(item);
debug_print("done.\n");
}
return 0;
}
gint folder_item_close(FolderItem *item)
{
GSList *mlist, *cur;
Folder *folder;
g_return_val_if_fail(item != NULL, -1);
if (item->new_msgs) {
folder_item_update_freeze();
mlist = folder_item_get_msg_list(item);
for (cur = mlist ; cur != NULL ; cur = cur->next) {
MsgInfo * msginfo;
msginfo = (MsgInfo *) cur->data;
if (MSG_IS_NEW(msginfo->flags))
procmsg_msginfo_unset_flags(msginfo, MSG_NEW, 0);
procmsg_msginfo_free(msginfo);
}
g_slist_free(mlist);
folder_item_update_thaw();
}
folder_item_write_cache(item);
folder_item_update(item, F_ITEM_UPDATE_MSGCNT);
item->opened = FALSE;
folder = item->folder;
if (folder->klass->close == NULL)
return 0;
return folder->klass->close(folder, item);
}
gint folder_item_scan_full(FolderItem *item, gboolean filtering)
{
Folder *folder;
GSList *folder_list = NULL, *cache_list = NULL;
GSList *folder_list_cur, *cache_list_cur, *new_list = NULL;
GSList *exists_list = NULL, *elem;
GSList *newmsg_list = NULL;
guint newcnt = 0, unreadcnt = 0, totalcnt = 0, unreadmarkedcnt = 0;
guint cache_max_num, folder_max_num, cache_cur_num, folder_cur_num;
gboolean update_flags = 0, old_uids_valid = FALSE;
g_return_val_if_fail(item != NULL, -1);
if (item->path == NULL) return -1;
folder = item->folder;
g_return_val_if_fail(folder != NULL, -1);
g_return_val_if_fail(folder->klass->get_num_list != NULL, -1);
debug_print("Scanning folder %s for cache changes.\n", item->path);
/* Get list of messages for folder and cache */
if (folder->klass->get_num_list(item->folder, item, &folder_list, &old_uids_valid) < 0) {
debug_print("Error fetching list of message numbers\n");
return(-1);
}
if (old_uids_valid) {
if (!item->cache)
folder_item_read_cache(item);
cache_list = msgcache_get_msg_list(item->cache);
} else {
if (item->cache)
msgcache_destroy(item->cache);
item->cache = msgcache_new();
cache_list = NULL;
}
/* Sort both lists */
cache_list = g_slist_sort(cache_list, folder_sort_cache_list_by_msgnum);
folder_list = g_slist_sort(folder_list, folder_sort_folder_list);
cache_list_cur = cache_list;
folder_list_cur = folder_list;
if (cache_list_cur != NULL) {
GSList *cache_list_last;
cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
cache_list_last = g_slist_last(cache_list);
cache_max_num = ((MsgInfo *)cache_list_last->data)->msgnum;
} else {
cache_cur_num = G_MAXINT;
cache_max_num = 0;
}
if (folder_list_cur != NULL) {
GSList *folder_list_last;
folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
folder_list_last = g_slist_last(folder_list);
folder_max_num = GPOINTER_TO_INT(folder_list_last->data);
} else {
folder_cur_num = G_MAXINT;
folder_max_num = 0;
}
while ((cache_cur_num != G_MAXINT) || (folder_cur_num != G_MAXINT)) {
/*
* Message only exists in the folder
* Remember message for fetching
*/
if (folder_cur_num < cache_cur_num) {
gboolean add = FALSE;
switch(FOLDER_TYPE(folder)) {
case F_NEWS:
if (folder_cur_num < cache_max_num)
break;
if (folder->account->max_articles == 0) {
add = TRUE;
}
if (folder_max_num <= folder->account->max_articles) {
add = TRUE;
} else if (folder_cur_num > (folder_max_num - folder->account->max_articles)) {
add = TRUE;
}
break;
default:
add = TRUE;
break;
}
if (add) {
new_list = g_slist_prepend(new_list, GINT_TO_POINTER(folder_cur_num));
debug_print("Remembered message %d for fetching\n", folder_cur_num);
}
/* Move to next folder number */
folder_list_cur = folder_list_cur->next;
if (folder_list_cur != NULL)
folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
else
folder_cur_num = G_MAXINT;
continue;
}
/*
* Message only exists in the cache
* Remove the message from the cache
*/
if (cache_cur_num < folder_cur_num) {
msgcache_remove_msg(item->cache, cache_cur_num);
debug_print("Removed message %d from cache.\n", cache_cur_num);
/* Move to next cache number */
cache_list_cur = cache_list_cur->next;
if (cache_list_cur != NULL)
cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
else
cache_cur_num = G_MAXINT;
update_flags |= F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT;
continue;
}
/*
* Message number exists in folder and cache!
* Check if the message has been modified
*/
if (cache_cur_num == folder_cur_num) {
MsgInfo *msginfo;
msginfo = msgcache_get_msg(item->cache, folder_cur_num);
if (folder->klass->is_msg_changed && folder->klass->is_msg_changed(folder, item, msginfo)) {
msgcache_remove_msg(item->cache, msginfo->msgnum);
new_list = g_slist_prepend(new_list, GINT_TO_POINTER(msginfo->msgnum));
procmsg_msginfo_free(msginfo);
debug_print("Remembering message %d to update...\n", folder_cur_num);
} else
exists_list = g_slist_prepend(exists_list, msginfo);
/* Move to next folder and cache number */
cache_list_cur = cache_list_cur->next;
folder_list_cur = folder_list_cur->next;
if (cache_list_cur != NULL)
cache_cur_num = ((MsgInfo *)cache_list_cur->data)->msgnum;
else
cache_cur_num = G_MAXINT;
if (folder_list_cur != NULL)
folder_cur_num = GPOINTER_TO_INT(folder_list_cur->data);
else
folder_cur_num = G_MAXINT;
continue;
}
}
for(cache_list_cur = cache_list; cache_list_cur != NULL; cache_list_cur = g_slist_next(cache_list_cur))
procmsg_msginfo_free((MsgInfo *) cache_list_cur->data);
g_slist_free(cache_list);
g_slist_free(folder_list);
if (new_list != NULL) {
if (folder->klass->get_msginfos) {
newmsg_list = folder->klass->get_msginfos(folder, item, new_list);
} else if (folder->klass->get_msginfo) {
GSList *elem;
for (elem = new_list; elem != NULL; elem = g_slist_next(elem)) {
MsgInfo *msginfo;
guint num;
num = GPOINTER_TO_INT(elem->data);
msginfo = folder->klass->get_msginfo(folder, item, num);
if (msginfo != NULL) {
newmsg_list = g_slist_prepend(newmsg_list, msginfo);
debug_print("Added newly found message %d to cache.\n", num);
}
}
}
g_slist_free(new_list);
}
folder_item_update_freeze();
if (newmsg_list != NULL) {
GSList *elem;
for (elem = newmsg_list; elem != NULL; elem = g_slist_next(elem)) {
MsgInfo *msginfo = (MsgInfo *) elem->data;
msgcache_add_msg(item->cache, msginfo);
if ((filtering == TRUE) &&
(item->stype == F_INBOX) &&
(item->folder->account != NULL) &&
(item->folder->account->filter_on_recv) &&
procmsg_msginfo_filter(msginfo))
procmsg_msginfo_free(msginfo);
else
exists_list = g_slist_prepend(exists_list, msginfo);
}
g_slist_free(newmsg_list);
update_flags |= F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT;
}
for (elem = exists_list; elem != NULL; elem = g_slist_next(elem)) {
MsgInfo *msginfo;
msginfo = elem->data;
if (MSG_IS_IGNORE_THREAD(msginfo->flags) && (MSG_IS_NEW(msginfo->flags) || MSG_IS_UNREAD(msginfo->flags)))
procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
if (!MSG_IS_IGNORE_THREAD(msginfo->flags) && procmsg_msg_has_flagged_parent(msginfo, MSG_IGNORE_THREAD)) {
procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
procmsg_msginfo_set_flags(msginfo, MSG_IGNORE_THREAD, 0);
}
if ((item->stype == F_OUTBOX ||
item->stype == F_QUEUE ||
item->stype == F_DRAFT ||
item->stype == F_TRASH) &&
(MSG_IS_NEW(msginfo->flags) || MSG_IS_UNREAD(msginfo->flags)))
procmsg_msginfo_unset_flags(msginfo, MSG_NEW | MSG_UNREAD, 0);
if (MSG_IS_NEW(msginfo->flags))
newcnt++;
if (MSG_IS_UNREAD(msginfo->flags))
unreadcnt++;
if (MSG_IS_UNREAD(msginfo->flags) && procmsg_msg_has_marked_parent(msginfo))
unreadmarkedcnt++;
totalcnt++;
procmsg_msginfo_free(msginfo);
}
g_slist_free(exists_list);
item->new_msgs = newcnt;
item->unread_msgs = unreadcnt;
item->total_msgs = totalcnt;
item->unreadmarked_msgs = unreadmarkedcnt;
update_flags |= F_ITEM_UPDATE_MSGCNT;
folder_item_update(item, update_flags);
folder_item_update_thaw();
return 0;
}
gint folder_item_scan(FolderItem *item)
{
return folder_item_scan_full(item, TRUE);
}
static gboolean folder_scan_all_items_func(GNode *node, gpointer data)
{
FolderItem *item = node->data;
folder_item_scan(item);
return FALSE;
}
void folder_scan_all_items(Folder * folder)
{
g_node_traverse(folder->node, G_PRE_ORDER,
G_TRAVERSE_ALL, -1, folder_scan_all_items_func, NULL);
}
static void folder_item_scan_foreach_func(gpointer key, gpointer val,
gpointer data)
{
folder_item_scan(FOLDER_ITEM(key));
}
void folder_item_scan_foreach(GHashTable *table)
{
g_hash_table_foreach(table, folder_item_scan_foreach_func, NULL);
}
void folder_count_total_cache_memusage(FolderItem *item, gpointer data)
{
gint *memusage = (gint *)data;
if (item->cache == NULL)
return;
*memusage += msgcache_get_memory_usage(item->cache);
}
gint folder_cache_time_compare_func(gconstpointer a, gconstpointer b)
{
FolderItem *fa = (FolderItem *)a;
FolderItem *fb = (FolderItem *)b;
return (gint) (msgcache_get_last_access_time(fa->cache) - msgcache_get_last_access_time(fb->cache));
}
void folder_find_expired_caches(FolderItem *item, gpointer data)
{
GSList **folder_item_list = (GSList **)data;
gint difftime, expiretime;
if (item->cache == NULL)
return;
if (item->opened > 0)
return;
difftime = (gint) (time(NULL) - msgcache_get_last_access_time(item->cache));
expiretime = prefs_common.cache_min_keep_time * 60;
debug_print("Cache unused time: %d (Expire time: %d)\n", difftime, expiretime);
if (difftime > expiretime) {
*folder_item_list = g_slist_insert_sorted(*folder_item_list, item, folder_cache_time_compare_func);
}
}
void folder_item_free_cache(FolderItem *item)
{
g_return_if_fail(item != NULL);
if (item->cache == NULL)
return;
if (item->opened > 0)
return;
folder_item_write_cache(item);
msgcache_destroy(item->cache);
item->cache = NULL;
}
void folder_clean_cache_memory(void)
{
gint memusage = 0;
folder_func_to_all_folders(folder_count_total_cache_memusage, &memusage);
debug_print("Total cache memory usage: %d\n", memusage);
if (memusage > (prefs_common.cache_max_mem_usage * 1024)) {
GSList *folder_item_list = NULL, *listitem;
debug_print("Trying to free cache memory\n");
folder_func_to_all_folders(folder_find_expired_caches, &folder_item_list);
listitem = folder_item_list;
while((listitem != NULL) && (memusage > (prefs_common.cache_max_mem_usage * 1024))) {
FolderItem *item = (FolderItem *)(listitem->data);
debug_print("Freeing cache memory for %s\n", item->path);
memusage -= msgcache_get_memory_usage(item->cache);
folder_item_free_cache(item);
listitem = listitem->next;
}
g_slist_free(folder_item_list);
}
}
void folder_item_read_cache(FolderItem *item)
{
gchar *cache_file, *mark_file;
g_return_if_fail(item != NULL);
cache_file = folder_item_get_cache_file(item);
mark_file = folder_item_get_mark_file(item);
item->cache = msgcache_read_cache(item, cache_file);
if (!item->cache) {
item->cache = msgcache_new();
folder_item_scan_full(item, TRUE);
}
msgcache_read_mark(item->cache, mark_file);
g_free(cache_file);
g_free(mark_file);
folder_clean_cache_memory();
}
void folder_item_write_cache(FolderItem *item)
{
gchar *cache_file, *mark_file;
FolderItemPrefs *prefs;
gint filemode = 0;
gchar *id;
if (!item || !item->path || !item->cache)
return;
id = folder_item_get_identifier(item);
debug_print("Save cache for folder %s\n", id);
g_free(id);
cache_file = folder_item_get_cache_file(item);
mark_file = folder_item_get_mark_file(item);
if (msgcache_write(cache_file, mark_file, item->cache) < 0) {
prefs = item->prefs;
if (prefs && prefs->enable_folder_chmod && prefs->folder_chmod) {
/* for cache file */
filemode = prefs->folder_chmod;
if (filemode & S_IRGRP) filemode |= S_IWGRP;
if (filemode & S_IROTH) filemode |= S_IWOTH;
chmod(cache_file, filemode);
}
}
g_free(cache_file);
g_free(mark_file);
}
MsgInfo *folder_item_get_msginfo(FolderItem *item, gint num)
{
Folder *folder;
MsgInfo *msginfo;
g_return_val_if_fail(item != NULL, NULL);
folder = item->folder;
if (!item->cache)
folder_item_read_cache(item);
if ((msginfo = msgcache_get_msg(item->cache, num)) != NULL)
return msginfo;
g_return_val_if_fail(folder->klass->get_msginfo, NULL);
if ((msginfo = folder->klass->get_msginfo(folder, item, num)) != NULL) {
msgcache_add_msg(item->cache, msginfo);
return msginfo;
}
return NULL;
}
MsgInfo *folder_item_get_msginfo_by_msgid(FolderItem *item, const gchar *msgid)
{
Folder *folder;
MsgInfo *msginfo;
g_return_val_if_fail(item != NULL, NULL);
folder = item->folder;
if (!item->cache)
folder_item_read_cache(item);
if ((msginfo = msgcache_get_msg_by_id(item->cache, msgid)) != NULL)
return msginfo;
return NULL;
}
GSList *folder_item_get_msg_list(FolderItem *item)
{
g_return_val_if_fail(item != NULL, NULL);
if (item->cache == 0)
folder_item_read_cache(item);
g_return_val_if_fail(item->cache != NULL, NULL);
return msgcache_get_msg_list(item->cache);
}
gchar *folder_item_fetch_msg(FolderItem *item, gint num)
{
Folder *folder;
g_return_val_if_fail(item != NULL, NULL);
folder = item->folder;
g_return_val_if_fail(folder->klass->fetch_msg != NULL, NULL);
return folder->klass->fetch_msg(folder, item, num);
}
static gint folder_item_get_msg_num_by_file(FolderItem *dest, const gchar *file)
{
static HeaderEntry hentry[] = {{"Message-ID:", NULL, TRUE},
{NULL, NULL, FALSE}};
FILE *fp;
MsgInfo *msginfo;
gint msgnum = 0;
gchar buf[BUFFSIZE];
if ((fp = fopen(file, "rb")) == NULL)
return 0;
if ((dest->stype == F_QUEUE) || (dest->stype == F_DRAFT))
while (fgets(buf, sizeof(buf), fp) != NULL)
if (buf[0] == '\r' || buf[0] == '\n') break;
procheader_get_header_fields(fp, hentry);
if (hentry[0].body) {
extract_parenthesis(hentry[0].body, '<', '>');
remove_space(hentry[0].body);
if ((msginfo = msgcache_get_msg_by_id(dest->cache, hentry[0].body)) != NULL) {
msgnum = msginfo->msgnum;
procmsg_msginfo_free(msginfo);
debug_print("found message as uid %d\n", msgnum);
}
}
g_free(hentry[0].body);
hentry[0].body = NULL;
fclose(fp);
return msgnum;
}
static void copy_msginfo_flags(MsgInfo *source, MsgInfo *dest)
{
MsgPermFlags perm_flags = 0;
MsgTmpFlags tmp_flags = 0;
/* create new flags */
if (source != NULL) {
/* copy original flags */
perm_flags = source->flags.perm_flags;
tmp_flags = source->flags.tmp_flags;
} else {
perm_flags = dest->flags.perm_flags;
tmp_flags = dest->flags.tmp_flags;
}
/* remove new, unread and deleted in special folders */
if (dest->folder->stype == F_OUTBOX ||
dest->folder->stype == F_QUEUE ||
dest->folder->stype == F_DRAFT ||
dest->folder->stype == F_TRASH)
perm_flags &= ~(MSG_NEW | MSG_UNREAD | MSG_DELETED);
/* set ignore flag of ignored parent exists */
if (procmsg_msg_has_flagged_parent(dest, MSG_IGNORE_THREAD))
perm_flags |= MSG_IGNORE_THREAD;
/* Unset tmp flags that should not be copied */
tmp_flags &= ~(MSG_MOVE | MSG_COPY);
/* unset flags that are set but should not */
procmsg_msginfo_unset_flags(dest,
dest->flags.perm_flags & ~perm_flags,
dest->flags.tmp_flags & ~tmp_flags);
/* set new flags */
procmsg_msginfo_set_flags(dest,
~dest->flags.perm_flags & perm_flags,
~dest->flags.tmp_flags & tmp_flags);
folder_item_update(dest->folder, F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT);
}
static void add_msginfo_to_cache(FolderItem *item, MsgInfo *newmsginfo, MsgInfo *flagsource)
{
/* update folder stats */
if (MSG_IS_NEW(newmsginfo->flags))
item->new_msgs++;
if (MSG_IS_UNREAD(newmsginfo->flags))
item->unread_msgs++;
if (MSG_IS_UNREAD(newmsginfo->flags) && procmsg_msg_has_marked_parent(newmsginfo))
item->unreadmarked_msgs++;
item->total_msgs++;
copy_msginfo_flags(flagsource, newmsginfo);
msgcache_add_msg(item->cache, newmsginfo);
}
static void remove_msginfo_from_cache(FolderItem *item, MsgInfo *msginfo)
{
MsgInfoUpdate msginfo_update;
if (!item->cache)
folder_item_read_cache(item);
if (MSG_IS_NEW(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
msginfo->folder->new_msgs--;
if (MSG_IS_UNREAD(msginfo->flags) && !MSG_IS_IGNORE_THREAD(msginfo->flags))
msginfo->folder->unread_msgs--;
if (MSG_IS_UNREAD(msginfo->flags) && procmsg_msg_has_marked_parent(msginfo))
msginfo->folder->unreadmarked_msgs--;
msginfo->folder->total_msgs--;
msginfo_update.msginfo = msginfo;
msginfo_update.flags = MSGINFO_UPDATE_DELETED;
hooks_invoke(MSGINFO_UPDATE_HOOKLIST, &msginfo_update);
msgcache_remove_msg(item->cache, msginfo->msgnum);
folder_item_update(msginfo->folder, F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT);
}
gint folder_item_add_msg(FolderItem *dest, const gchar *file,
MsgFlags *flags, gboolean remove_source)
{
GSList file_list;
MsgFileInfo fileinfo;
g_return_val_if_fail(dest != NULL, -1);
g_return_val_if_fail(file != NULL, -1);
fileinfo.msginfo = NULL;
fileinfo.file = (gchar *)file;
fileinfo.flags = flags;
file_list.data = &fileinfo;
file_list.next = NULL;
return folder_item_add_msgs(dest, &file_list, remove_source);
}
gint folder_item_add_msgs(FolderItem *dest, GSList *file_list,
gboolean remove_source)
{
Folder *folder;
gint ret, num, lastnum = -1;
GSList *file_cur;
GRelation *relation;
MsgFileInfo *fileinfo = NULL;
gboolean folderscan = FALSE;
g_return_val_if_fail(dest != NULL, -1);
g_return_val_if_fail(file_list != NULL, -1);
g_return_val_if_fail(dest->folder != NULL, -1);
folder = dest->folder;
relation = g_relation_new(2);
g_relation_index(relation, 0, g_direct_hash, g_direct_equal);
if (folder->klass->add_msgs != NULL) {
ret = folder->klass->add_msgs(folder, dest, file_list, relation);
if (ret < 0) {
g_relation_destroy(relation);
return ret;
}
} else {
for (file_cur = file_list; file_cur != NULL; file_cur = g_slist_next(file_cur)) {
fileinfo = (MsgFileInfo *) file_cur->data;
ret = folder->klass->add_msg(folder, dest, fileinfo->file, fileinfo->flags);
if (ret < 0) {
g_relation_destroy(relation);
return ret;
}
g_relation_insert(relation, fileinfo, GINT_TO_POINTER(ret));
}
}
for (file_cur = file_list; file_cur != NULL; file_cur = g_slist_next(file_cur)) {
GTuples *tuples;
fileinfo = (MsgFileInfo *) file_cur->data;
tuples = g_relation_select(relation, fileinfo, 0);
num = GPOINTER_TO_INT(g_tuples_index(tuples, 0, 1));
g_tuples_destroy(tuples);
if (num >= 0) {
MsgInfo *newmsginfo;
if (num == 0) {
if (!folderscan) {
folder_item_scan_full(dest, FALSE);
folderscan = TRUE;
}
num = folder_item_get_msg_num_by_file(dest, fileinfo->file);
}
if (num > lastnum)
lastnum = num;
if (num >= 0 && remove_source) {
if (unlink(fileinfo->file) < 0)
FILE_OP_ERROR(fileinfo->file, "unlink");
}
if (num == 0)
continue;
if (!folderscan &&
((newmsginfo = folder->klass->get_msginfo(folder, dest, num)) != NULL)) {
add_msginfo_to_cache(dest, newmsginfo, NULL);
procmsg_msginfo_free(newmsginfo);
} else if ((newmsginfo = msgcache_get_msg(dest->cache, num)) != NULL) {
/* TODO: set default flags */
procmsg_msginfo_free(newmsginfo);
}
}
}
g_relation_destroy(relation);
return lastnum;
}
/*
gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
{
Folder *folder;
gint num;
g_return_val_if_fail(dest != NULL, -1);
g_return_val_if_fail(msginfo != NULL, -1);
folder = dest->folder;
if (dest->last_num < 0) folder->scan(folder, dest);
num = folder->move_msg(folder, dest, msginfo);
if (num > 0) dest->last_num = num;
return num;
}
*/
FolderItem *folder_item_move_recursive (FolderItem *src, FolderItem *dest)
{
GSList *mlist;
FolderItem *new_item;
FolderItem *next_item;
GNode *srcnode;
gchar *old_id, *new_id;
mlist = folder_item_get_msg_list(src);
/* move messages */
debug_print("Moving %s to %s\n", src->path, dest->path);
new_item = folder_create_folder(dest, g_basename(src->path));
if (new_item == NULL) {
printf("Can't create folder\n");
return NULL;
}
if (new_item->folder == NULL)
new_item->folder = dest->folder;
/* move messages */
log_message(_("Moving %s to %s...\n"),
src->name, new_item->path);
folder_item_move_msgs(new_item, mlist);
/*copy prefs*/
folder_item_prefs_copy_prefs(src, new_item);
new_item->collapsed = src->collapsed;
new_item->thread_collapsed = src->thread_collapsed;
new_item->threaded = src->threaded;
new_item->ret_rcpt = src->ret_rcpt;
new_item->hide_read_msgs = src->hide_read_msgs;
new_item->sort_key = src->sort_key;
new_item->sort_type = src->sort_type;
prefs_matcher_write_config();
/* recurse */
srcnode = src->folder->node;
srcnode = g_node_find(srcnode, G_PRE_ORDER, G_TRAVERSE_ALL, src);
srcnode = srcnode->children;
while (srcnode != NULL) {
if (srcnode && srcnode->data) {
next_item = (FolderItem*) srcnode->data;
srcnode = srcnode->next;
if (folder_item_move_recursive(next_item, new_item) == NULL)
return NULL;
}
}
old_id = folder_item_get_identifier(src);
new_id = folder_item_get_identifier(new_item);
debug_print("updating rules : %s => %s\n", old_id, new_id);
src->folder->klass->remove_folder(src->folder, src);
folder_write_list();
if (old_id != NULL && new_id != NULL)
prefs_filtering_rename_path(old_id, new_id);
g_free(old_id);
g_free(new_id);
return new_item;
}
gint folder_item_move_to(FolderItem *src, FolderItem *dest, FolderItem **new_item)
{
FolderItem *tmp = dest->parent;
gchar * src_identifier, * dst_identifier;
gchar * phys_srcpath, * phys_dstpath;
GNode *src_node;
while (tmp) {
if (tmp == src) {
return F_MOVE_FAILED_DEST_IS_CHILD;
}
tmp = tmp->parent;
}
tmp = src->parent;
src_identifier = folder_item_get_identifier(src);
dst_identifier = folder_item_get_identifier(dest);
if(dst_identifier == NULL && dest->folder && dest->parent == NULL) {
/* dest can be a root folder */
dst_identifier = folder_get_identifier(dest->folder);
}
if (src_identifier == NULL || dst_identifier == NULL) {
debug_print("Can't get identifiers\n");
return F_MOVE_FAILED;
}
if (src->folder != dest->folder) {
return F_MOVE_FAILED_DEST_OUTSIDE_MAILBOX;
}
phys_srcpath = folder_item_get_path(src);
phys_dstpath = g_strconcat(folder_item_get_path(dest),G_DIR_SEPARATOR_S,g_basename(phys_srcpath),NULL);
if (src->parent == dest || src == dest) {
g_free(src_identifier);
g_free(dst_identifier);
g_free(phys_srcpath);
g_free(phys_dstpath);
return F_MOVE_FAILED_DEST_IS_PARENT;
}
debug_print("moving \"%s\" to \"%s\"\n", phys_srcpath, phys_dstpath);
if ((tmp = folder_item_move_recursive(src, dest)) == NULL) {
return F_MOVE_FAILED;
}
g_free(src_identifier);
g_free(dst_identifier);
g_free(phys_srcpath);
g_free(phys_dstpath);
*new_item = tmp;
return F_MOVE_OK;
}
gint folder_item_move_msg(FolderItem *dest, MsgInfo *msginfo)
{
GSList *list = NULL;
gint ret;
list = g_slist_append(list, msginfo);
ret = folder_item_move_msgs(dest, list);
g_slist_free(list);
return ret;
}
/*
gint folder_item_move_msgs_with_dest(FolderItem *dest, GSList *msglist)
{
Folder *folder;
gint num;
g_return_val_if_fail(dest != NULL, -1);
g_return_val_if_fail(msglist != NULL, -1);
folder = dest->folder;
if (dest->last_num < 0) folder->scan(folder, dest);
num = folder->move_msgs_with_dest(folder, dest, msglist);
if (num > 0) dest->last_num = num;
else dest->op_count = 0;
return num;
}
*/
/**
* Copy a list of messages to a new folder.
*
* \param dest Destination folder
* \param msglist List of messages
*/
gint folder_item_move_msgs(FolderItem *dest, GSList *msglist)
{
Folder *folder;
GSList *l;
gint num, lastnum = -1;
gboolean folderscan = FALSE;
GRelation *relation;
g_return_val_if_fail(dest != NULL, -1);
g_return_val_if_fail(msglist != NULL, -1);
folder = dest->folder;
g_return_val_if_fail(folder->klass->copy_msg != NULL, -1);
relation = g_relation_new(2);
g_relation_index(relation, 0, g_direct_hash, g_direct_equal);
/*
* Copy messages to destination folder and
* store new message numbers in newmsgnums
*/
if (folder->klass->copy_msgs != NULL) {
if (folder->klass->copy_msgs(folder, dest, msglist, relation) < 0) {
g_relation_destroy(relation);
return -1;
}
} else {
for (l = msglist ; l != NULL ; l = g_slist_next(l)) {
MsgInfo * msginfo = (MsgInfo *) l->data;
num = folder->klass->copy_msg(folder, dest, msginfo);
g_relation_insert(relation, msginfo, GINT_TO_POINTER(num));
}
}
/* Read cache for dest folder */
if (!dest->cache) folder_item_read_cache(dest);
/*
* Fetch new MsgInfos for new messages in dest folder,
* add them to the msgcache and update folder message counts
*/
for (l = msglist; l != NULL; l = g_slist_next(l)) {
MsgInfo *msginfo = (MsgInfo *) l->data;
GTuples *tuples;
tuples = g_relation_select(relation, msginfo, 0);
num = GPOINTER_TO_INT(g_tuples_index(tuples, 0, 1));
g_tuples_destroy(tuples);
if (num >= 0) {
MsgInfo *newmsginfo;
if (num == 0) {
gchar *file;
if (!folderscan) {
folder_item_scan_full(dest, FALSE);
folderscan = TRUE;
}
file = folder_item_fetch_msg(msginfo->folder, msginfo->msgnum);
num = folder_item_get_msg_num_by_file(dest, file);
g_free(file);
}
if (num > lastnum)
lastnum = num;
if (num == 0)
continue;
if (!folderscan &&
((newmsginfo = folder->klass->get_msginfo(folder, dest, num)) != NULL)) {
add_msginfo_to_cache(dest, newmsginfo, msginfo);
procmsg_msginfo_free(newmsginfo);
} else if ((newmsginfo = msgcache_get_msg(dest->cache, num)) != NULL) {
copy_msginfo_flags(msginfo, newmsginfo);
procmsg_msginfo_free(newmsginfo);
}
}
}
/*
* Remove source messages from their folders if
* copying was successfull and update folder
* message counts
*/
for (l = msglist; l != NULL; l = g_slist_next(l)) {
MsgInfo *msginfo = (MsgInfo *) l->data;
FolderItem *item = msginfo->folder;
GTuples *tuples;
tuples = g_relation_select(relation, msginfo, 0);
num = GPOINTER_TO_INT(g_tuples_index(tuples, 0, 1));
g_tuples_destroy(tuples);
if ((num >= 0) && (item->folder->klass->remove_msg != NULL)) {
item->folder->klass->remove_msg(item->folder,
msginfo->folder,
msginfo->msgnum);
remove_msginfo_from_cache(item, msginfo);
}
}
if (folder->klass->finished_copy)
folder->klass->finished_copy(folder, dest);
g_relation_destroy(relation);
return lastnum;
}
/*
gint folder_item_copy_msg(FolderItem *dest, MsgInfo *msginfo)
{
Folder *folder;
gint num;
g_return_val_if_fail(dest != NULL, -1);
g_return_val_if_fail(msginfo != NULL, -1);
folder = dest->folder;
if (dest->last_num < 0) folder->scan(folder, dest);
num = folder->copy_msg(folder, dest, msginfo);
if (num > 0) dest->last_num = num;
return num;
}
*/
gint folder_item_copy_msg(FolderItem *dest, MsgInfo *msginfo)
{
GSList msglist;
g_return_val_if_fail(dest != NULL, -1);
g_return_val_if_fail(msginfo != NULL, -1);
msglist.data = msginfo;
msglist.next = NULL;
return folder_item_copy_msgs(dest, &msglist);
}
/*
gint folder_item_copy_msgs_with_dest(FolderItem *dest, GSList *msglist)
{
Folder *folder;
gint num;
g_return_val_if_fail(dest != NULL, -1);
g_return_val_if_fail(msglist != NULL, -1);
folder = dest->folder;
if (dest->last_num < 0) folder->scan(folder, dest);
num = folder->copy_msgs_with_dest(folder, dest, msglist);
if (num > 0) dest->last_num = num;
else dest->op_count = 0;
return num;
}
*/
gint folder_item_copy_msgs(FolderItem *dest, GSList *msglist)
{
Folder *folder;
gint num, lastnum = -1;
GSList *l;
gboolean folderscan = FALSE;
GRelation *relation;
g_return_val_if_fail(dest != NULL, -1);
g_return_val_if_fail(msglist != NULL, -1);
folder = dest->folder;
g_return_val_if_fail(folder->klass->copy_msg != NULL, -1);
relation = g_relation_new(2);
g_relation_index(relation, 0, g_direct_hash, g_direct_equal);
/*
* Copy messages to destination folder and
* store new message numbers in newmsgnums
*/
if (folder->klass->copy_msgs != NULL) {
if (folder->klass->copy_msgs(folder, dest, msglist, relation) < 0) {
g_relation_destroy(relation);
return -1;
}
} else {
for (l = msglist ; l != NULL ; l = g_slist_next(l)) {
MsgInfo * msginfo = (MsgInfo *) l->data;
num = folder->klass->copy_msg(folder, dest, msginfo);
g_relation_insert(relation, msginfo, GINT_TO_POINTER(num));
}
}
/* Read cache for dest folder */
if (!dest->cache) folder_item_read_cache(dest);
/*
* Fetch new MsgInfos for new messages in dest folder,
* add them to the msgcache and update folder message counts
*/
for (l = msglist; l != NULL; l = g_slist_next(l)) {
MsgInfo *msginfo = (MsgInfo *) l->data;
GTuples *tuples;
tuples = g_relation_select(relation, msginfo, 0);
num = GPOINTER_TO_INT(g_tuples_index(tuples, 0, 1));
g_tuples_destroy(tuples);
if (num >= 0) {
MsgInfo *newmsginfo;
if (num == 0) {
gchar *file;
if (!folderscan) {
folder_item_scan_full(dest, FALSE);
folderscan = TRUE;
}
file = folder_item_fetch_msg(msginfo->folder, msginfo->msgnum);
num = folder_item_get_msg_num_by_file(dest, file);
g_free(file);
}
if (num > lastnum)
lastnum = num;
if (num == 0)
continue;
if (!folderscan &&
((newmsginfo = folder->klass->get_msginfo(folder, dest, num)) != NULL)) {
newmsginfo = folder->klass->get_msginfo(folder, dest, num);
add_msginfo_to_cache(dest, newmsginfo, msginfo);
procmsg_msginfo_free(newmsginfo);
} else if ((newmsginfo = msgcache_get_msg(dest->cache, num)) != NULL) {
copy_msginfo_flags(msginfo, newmsginfo);
procmsg_msginfo_free(newmsginfo);
}
}
}
if (folder->klass->finished_copy)
folder->klass->finished_copy(folder, dest);
g_relation_destroy(relation);
return lastnum;
}
gint folder_item_remove_msg(FolderItem *item, gint num)
{
Folder *folder;
gint ret;
MsgInfo *msginfo;
g_return_val_if_fail(item != NULL, -1);
folder = item->folder;
g_return_val_if_fail(folder->klass->remove_msg != NULL, -1);
if (!item->cache) folder_item_read_cache(item);
ret = folder->klass->remove_msg(folder, item, num);
msginfo = msgcache_get_msg(item->cache, num);
if (msginfo != NULL) {
remove_msginfo_from_cache(item, msginfo);
procmsg_msginfo_free(msginfo);
}
folder_item_update(item, F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT);
return ret;
}
gint folder_item_remove_msgs(FolderItem *item, GSList *msglist)
{
Folder *folder;
gint ret = 0;
g_return_val_if_fail(item != NULL, -1);
folder = item->folder;
g_return_val_if_fail(folder != NULL, -1);
if (!item->cache) folder_item_read_cache(item);
while (msglist != NULL) {
MsgInfo *msginfo = (MsgInfo *)msglist->data;
ret = folder_item_remove_msg(item, msginfo->msgnum);
if (ret != 0) break;
msgcache_remove_msg(item->cache, msginfo->msgnum);
msglist = msglist->next;
}
return ret;
}
gint folder_item_remove_all_msg(FolderItem *item)
{
Folder *folder;
gint result;
g_return_val_if_fail(item != NULL, -1);
folder = item->folder;
g_return_val_if_fail(folder->klass->remove_all_msg != NULL, -1);
result = folder->klass->remove_all_msg(folder, item);
if (result == 0) {
if (folder->klass->finished_remove)
folder->klass->finished_remove(folder, item);
folder_item_free_cache(item);
item->cache = msgcache_new();
item->new_msgs = 0;
item->unread_msgs = 0;
item->unreadmarked_msgs = 0;
item->total_msgs = 0;
folder_item_update(item, F_ITEM_UPDATE_MSGCNT | F_ITEM_UPDATE_CONTENT);
}
return result;
}
void folder_item_change_msg_flags(FolderItem *item, MsgInfo *msginfo, MsgPermFlags newflags)
{
g_return_if_fail(item != NULL);
g_return_if_fail(msginfo != NULL);
if (item->folder->klass->change_flags != NULL) {
item->folder->klass->change_flags(item->folder, item, msginfo, newflags);
} else {
msginfo->flags.perm_flags = newflags;
}
}
gboolean folder_item_is_msg_changed(FolderItem *item, MsgInfo *msginfo)
{
Folder *folder;
g_return_val_if_fail(item != NULL, FALSE);
folder = item->folder;
g_return_val_if_fail(folder->klass->is_msg_changed != NULL, -1);
return folder->klass->is_msg_changed(folder, item, msginfo);
}
gchar *folder_item_get_cache_file(FolderItem *item)
{
gchar *path;
gchar *file;
g_return_val_if_fail(item != NULL, NULL);
g_return_val_if_fail(item->path != NULL, NULL);
path = folder_item_get_path(item);
g_return_val_if_fail(path != NULL, NULL);
if (!is_dir_exist(path))
make_dir_hier(path);
file = g_strconcat(path, G_DIR_SEPARATOR_S, CACHE_FILE, NULL);
g_free(path);
return file;
}
gchar *folder_item_get_mark_file(FolderItem *item)
{
gchar *path;
gchar *file;
g_return_val_if_fail(item != NULL, NULL);
g_return_val_if_fail(item->path != NULL, NULL);
path = folder_item_get_path(item);
g_return_val_if_fail(path != NULL, NULL);
if (!is_dir_exist(path))
make_dir_hier(path);
file = g_strconcat(path, G_DIR_SEPARATOR_S, MARK_FILE, NULL);
g_free(path);
return file;
}
static gboolean folder_build_tree(GNode *node, gpointer data)
{
Folder *folder = FOLDER(data);
FolderItem *item;
XMLNode *xmlnode;
GList *list;
SpecialFolderItemType stype = F_NORMAL;
const gchar *name = NULL;
const gchar *path = NULL;
PrefsAccount *account = NULL;
gboolean no_sub = FALSE, no_select = FALSE, collapsed = FALSE,
threaded = TRUE, apply_sub = FALSE;
gboolean ret_rcpt = FALSE, hidereadmsgs = FALSE,
thread_collapsed = FALSE; /* CLAWS */
FolderSortKey sort_key = SORT_BY_NONE;
FolderSortType sort_type = SORT_ASCENDING;
gint new = 0, unread = 0, total = 0, unreadmarked = 0;
time_t mtime = 0;
g_return_val_if_fail(node->data != NULL, FALSE);
if (!node->parent) return FALSE;
xmlnode = node->data;
if (strcmp2(xmlnode->tag->tag, "folderitem") != 0) {
g_warning("tag name != \"folderitem\"\n");
return FALSE;
}
list = xmlnode->tag->attr;
for (; list != NULL; list = list->next) {
XMLAttr *attr = list->data;
if (!attr || !attr->name || !attr->value) continue;
if (!strcmp(attr->name, "type")) {
if (!strcasecmp(attr->value, "normal"))
stype = F_NORMAL;
else if (!strcasecmp(attr->value, "inbox"))
stype = F_INBOX;
else if (!strcasecmp(attr->value, "outbox"))
stype = F_OUTBOX;
else if (!strcasecmp(attr->value, "draft"))
stype = F_DRAFT;
else if (!strcasecmp(attr->value, "queue"))
stype = F_QUEUE;
else if (!strcasecmp(attr->value, "trash"))
stype = F_TRASH;
} else if (!strcmp(attr->name, "name"))
name = attr->value;
else if (!strcmp(attr->name, "path"))
path = attr->value;
else if (!strcmp(attr->name, "mtime"))
mtime = strtoul(attr->value, NULL, 10);
else if (!strcmp(attr->name, "new"))
new = atoi(attr->value);
else if (!strcmp(attr->name, "unread"))
unread = atoi(attr->value);
else if (!strcmp(attr->name, "unreadmarked"))
unreadmarked = atoi(attr->value);
else if (!strcmp(attr->name, "total"))
total = atoi(attr->value);
else if (!strcmp(attr->name, "no_sub"))
no_sub = *attr->value == '1' ? TRUE : FALSE;
else if (!strcmp(attr->name, "no_select"))
no_select = *attr->value == '1' ? TRUE : FALSE;
else if (!strcmp(attr->name, "collapsed"))
collapsed = *attr->value == '1' ? TRUE : FALSE;
else if (!strcmp(attr->name, "thread_collapsed"))
thread_collapsed = *attr->value == '1' ? TRUE : FALSE;
else if (!strcmp(attr->name, "threaded"))
threaded = *attr->value == '1' ? TRUE : FALSE;
else if (!strcmp(attr->name, "hidereadmsgs"))
hidereadmsgs = *attr->value == '1' ? TRUE : FALSE;
else if (!strcmp(attr->name, "reqretrcpt"))
ret_rcpt = *attr->value == '1' ? TRUE : FALSE;
else if (!strcmp(attr->name, "sort_key")) {
if (!strcmp(attr->value, "none"))
sort_key = SORT_BY_NONE;
else if (!strcmp(attr->value, "number"))
sort_key = SORT_BY_NUMBER;
else if (!strcmp(attr->value, "size"))
sort_key = SORT_BY_SIZE;
else if (!strcmp(attr->value, "date"))
sort_key = SORT_BY_DATE;
else if (!strcmp(attr->value, "from"))
sort_key = SORT_BY_FROM;
else if (!strcmp(attr->value, "subject"))
sort_key = SORT_BY_SUBJECT;
else if (!strcmp(attr->value, "score"))
sort_key = SORT_BY_SCORE;
else if (!strcmp(attr->value, "label"))
sort_key = SORT_BY_LABEL;
else if (!strcmp(attr->value, "mark"))
sort_key = SORT_BY_MARK;
else if (!strcmp(attr->value, "unread"))
sort_key = SORT_BY_STATUS;
else if (!strcmp(attr->value, "mime"))
sort_key = SORT_BY_MIME;
else if (!strcmp(attr->value, "to"))
sort_key = SORT_BY_TO;
else if (!strcmp(attr->value, "locked"))
sort_key = SORT_BY_LOCKED;
} else if (!strcmp(attr->name, "sort_type")) {
if (!strcmp(attr->value, "ascending"))
sort_type = SORT_ASCENDING;
else
sort_type = SORT_DESCENDING;
} else if (!strcmp(attr->name, "account_id")) {
account = account_find_from_id(atoi(attr->value));
if (!account) g_warning("account_id: %s not found\n",
attr->value);
} else if (!strcmp(attr->name, "apply_sub"))
apply_sub = *attr->value == '1' ? TRUE : FALSE;
}
item = folder_item_new(folder, name, path);
item->stype = stype;
item->mtime = mtime;
item->new_msgs = new;
item->unread_msgs = unread;
item->unreadmarked_msgs = unreadmarked;
item->total_msgs = total;
item->no_sub = no_sub;
item->no_select = no_select;
item->collapsed = collapsed;
item->thread_collapsed = thread_collapsed;
item->threaded = threaded;
item->hide_read_msgs = hidereadmsgs;
item->ret_rcpt = ret_rcpt;
item->sort_key = sort_key;
item->sort_type = sort_type;
item->node = node;
item->parent = FOLDER_ITEM(node->parent->data);
item->folder = folder;
switch (stype) {
case F_INBOX: folder->inbox = item; break;
case F_OUTBOX: folder->outbox = item; break;
case F_DRAFT: folder->draft = item; break;
case F_QUEUE: folder->queue = item; break;
case F_TRASH: folder->trash = item; break;
default: break;
}
item->account = account;
item->apply_sub = apply_sub;
folder_item_prefs_read_config(item);
node->data = item;
xml_free_node(xmlnode);
return FALSE;
}
static gboolean folder_read_folder_func(GNode *node, gpointer data)
{
Folder *folder;
FolderItem *item;
XMLNode *xmlnode;
GList *list;
FolderClass *class = NULL;
const gchar *name = NULL;
const gchar *path = NULL;
PrefsAccount *account = NULL;
gboolean collapsed = FALSE, threaded = TRUE, apply_sub = FALSE;
gboolean ret_rcpt = FALSE, thread_collapsed = FALSE; /* CLAWS */
if (g_node_depth(node) != 2) return FALSE;
g_return_val_if_fail(node->data != NULL, FALSE);
xmlnode = node->data;
if (strcmp2(xmlnode->tag->tag, "folder") != 0) {
g_warning("tag name != \"folder\"\n");
return TRUE;
}
g_node_unlink(node);
list = xmlnode->tag->attr;
for (; list != NULL; list = list->next) {
XMLAttr *attr = list->data;
if (!attr || !attr->name || !attr->value) continue;
if (!strcmp(attr->name, "type"))
class = folder_get_class_from_string(attr->value);
else if (!strcmp(attr->name, "name"))
name = attr->value;
else if (!strcmp(attr->name, "path"))
path = attr->value;
else if (!strcmp(attr->name, "collapsed"))
collapsed = *attr->value == '1' ? TRUE : FALSE;
else if (!strcmp(attr->name, "thread_collapsed"))
thread_collapsed = *attr->value == '1' ? TRUE : FALSE;
else if (!strcmp(attr->name, "threaded"))
threaded = *attr->value == '1' ? TRUE : FALSE;
else if (!strcmp(attr->name, "account_id")) {
account = account_find_from_id(atoi(attr->value));
if (!account) g_warning("account_id: %s not found\n",
attr->value);
} else if (!strcmp(attr->name, "apply_sub"))
apply_sub = *attr->value == '1' ? TRUE : FALSE;
else if (!strcmp(attr->name, "reqretrcpt"))
ret_rcpt = *attr->value == '1' ? TRUE : FALSE;
}
folder = folder_new(class, name, path);
g_return_val_if_fail(folder != NULL, FALSE);
folder->account = account;
if (account != NULL)
account->folder = REMOTE_FOLDER(folder);
item = FOLDER_ITEM(folder->node->data);
node->data = item;
item->node = node;
g_node_destroy(folder->node);
folder->node = node;
folder_add(folder);
item->collapsed = collapsed;
item->thread_collapsed = thread_collapsed;
item->threaded = threaded;
item->account = account;
item->apply_sub = apply_sub;
item->ret_rcpt = ret_rcpt;
g_node_traverse(node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
folder_build_tree, folder);
return FALSE;
}
static gchar *folder_get_list_path(void)
{
static gchar *filename = NULL;
if (!filename)
filename = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
FOLDER_LIST, NULL);
return filename;
}
#define PUT_ESCAPE_STR(fp, attr, str) \
{ \
fputs(" " attr "=\"", fp); \
xml_file_put_escape_str(fp, str); \
fputs("\"", fp); \
}
static void folder_write_list_recursive(GNode *node, gpointer data)
{
FILE *fp = (FILE *)data;
FolderItem *item;
gint i, depth;
static gchar *folder_item_stype_str[] = {"normal", "inbox", "outbox",
"draft", "queue", "trash"};
static gchar *sort_key_str[] = {"none", "number", "size", "date",
"from", "subject", "score", "label",
"mark", "unread", "mime", "to",
"locked"};
g_return_if_fail(node != NULL);
g_return_if_fail(fp != NULL);
item = FOLDER_ITEM(node->data);
g_return_if_fail(item != NULL);
depth = g_node_depth(node);
for (i = 0; i < depth; i++)
fputs(" ", fp);
if (depth == 1) {
Folder *folder = item->folder;
fprintf(fp, "<folder type=\"%s\"", folder->klass->idstr);
if (folder->name)
PUT_ESCAPE_STR(fp, "name", folder->name);
if (FOLDER_TYPE(folder) == F_MH || FOLDER_TYPE(folder) == F_MBOX || FOLDER_TYPE(folder) == F_MAILDIR)
PUT_ESCAPE_STR(fp, "path",
LOCAL_FOLDER(folder)->rootpath);
if (item->collapsed && node->children)
fputs(" collapsed=\"1\"", fp);
if (folder->account)
fprintf(fp, " account_id=\"%d\"",
folder->account->account_id);
if (item->apply_sub)
fputs(" apply_sub=\"1\"", fp);
if (item->ret_rcpt)
fputs(" reqretrcpt=\"1\"", fp);
} else {
fprintf(fp, "<folderitem type=\"%s\"",
folder_item_stype_str[item->stype]);
if (item->name)
PUT_ESCAPE_STR(fp, "name", item->name);
if (item->path)
PUT_ESCAPE_STR(fp, "path", item->path);
if (item->no_sub)
fputs(" no_sub=\"1\"", fp);
if (item->no_select)
fputs(" no_select=\"1\"", fp);
if (item->collapsed && node->children)
fputs(" collapsed=\"1\"", fp);
else
fputs(" collapsed=\"0\"", fp);
if (item->thread_collapsed)
fputs(" thread_collapsed=\"1\"", fp);
else
fputs(" thread_collapsed=\"0\"", fp);
if (item->threaded)
fputs(" threaded=\"1\"", fp);
else
fputs(" threaded=\"0\"", fp);
if (item->hide_read_msgs)
fputs(" hidereadmsgs=\"1\"", fp);
else
fputs(" hidereadmsgs=\"0\"", fp);
if (item->ret_rcpt)
fputs(" reqretrcpt=\"1\"", fp);
if (item->sort_key != SORT_BY_NONE) {
fprintf(fp, " sort_key=\"%s\"",
sort_key_str[item->sort_key]);
if (item->sort_type == SORT_ASCENDING)
fprintf(fp, " sort_type=\"ascending\"");
else
fprintf(fp, " sort_type=\"descending\"");
}
fprintf(fp,
" mtime=\"%lu\" new=\"%d\" unread=\"%d\" unreadmarked=\"%d\" total=\"%d\"",
item->mtime, item->new_msgs, item->unread_msgs, item->unreadmarked_msgs, item->total_msgs);
if (item->account)
fprintf(fp, " account_id=\"%d\"",
item->account->account_id);
if (item->apply_sub)
fputs(" apply_sub=\"1\"", fp);
}
if (node->children) {
GNode *child;
fputs(">\n", fp);
child = node->children;
while (child) {
GNode *cur;
cur = child;
child = cur->next;
folder_write_list_recursive(cur, data);
}
for (i = 0; i < depth; i++)
fputs(" ", fp);
fprintf(fp, "</%s>\n", depth == 1 ? "folder" : "folderitem");
} else
fputs(" />\n", fp);
}
static void folder_update_op_count_rec(GNode *node)
{
FolderItem *fitem = FOLDER_ITEM(node->data);
if (g_node_depth(node) > 0) {
if (fitem->op_count > 0) {
fitem->op_count = 0;
folder_item_update(fitem, F_ITEM_UPDATE_MSGCNT);
}
if (node->children) {
GNode *child;
child = node->children;
while (child) {
GNode *cur;
cur = child;
child = cur->next;
folder_update_op_count_rec(cur);
}
}
}
}
void folder_update_op_count(void)
{
GList *cur;
Folder *folder;
for (cur = folder_list; cur != NULL; cur = cur->next) {
folder = cur->data;
folder_update_op_count_rec(folder->node);
}
}
typedef struct _type_str {
gchar * str;
gint type;
} type_str;
/*
static gchar * folder_item_get_tree_identifier(FolderItem * item)
{
if (item->parent != NULL) {
gchar * path;
gchar * id;
path = folder_item_get_tree_identifier(item->parent);
if (path == NULL)
return NULL;
id = g_strconcat(path, "/", item->name, NULL);
g_free(path);
return id;
}
else {
return g_strconcat("/", item->name, NULL);
}
}
*/
/* CLAWS: temporary local folder for filtering */
#define TEMP_FOLDER "TEMP_FOLDER"
#define PROCESSING_FOLDER_ITEM "processing"
static FolderItem *processing_folder_item;
static void folder_create_processing_folder(void)
{
Folder *processing_folder;
gchar *tmpname;
if ((processing_folder = folder_find_from_name(TEMP_FOLDER, mh_get_class())) == NULL) {
gchar *tmppath;
tmppath =
g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
"tempfolder", NULL);
processing_folder =
folder_new(mh_get_class(), TEMP_FOLDER, tmppath);
g_free(tmppath);
}
g_assert(processing_folder != NULL);
debug_print("tmpparentroot %s\n", LOCAL_FOLDER(processing_folder)->rootpath);
if (LOCAL_FOLDER(processing_folder)->rootpath[0] == '/')
tmpname = g_strconcat(LOCAL_FOLDER(processing_folder)->rootpath,
G_DIR_SEPARATOR_S, PROCESSING_FOLDER_ITEM,
NULL);
else
tmpname = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
LOCAL_FOLDER(processing_folder)->rootpath,
G_DIR_SEPARATOR_S, PROCESSING_FOLDER_ITEM,
NULL);
if (!is_dir_exist(tmpname)) {
debug_print("*TMP* creating %s\n", tmpname);
processing_folder_item = processing_folder->klass->create_folder(processing_folder,
processing_folder->node->data,
PROCESSING_FOLDER_ITEM);
} else {
debug_print("*TMP* already created\n");
processing_folder_item = folder_item_new(processing_folder, PROCESSING_FOLDER_ITEM, PROCESSING_FOLDER_ITEM);
g_assert(processing_folder_item);
folder_item_append(processing_folder->node->data, processing_folder_item);
}
g_assert(processing_folder_item != NULL);
g_free(tmpname);
}
FolderItem *folder_get_default_processing(void)
{
if (!processing_folder_item) {
folder_create_processing_folder();
}
return processing_folder_item;
}
/* folder_persist_prefs_new() - return hash table with persistent
* settings (and folder name as key).
* (note that in claws other options are in the folder_item_prefs_RC
* file, so those don't need to be included in PersistPref yet)
*/
GHashTable *folder_persist_prefs_new(Folder *folder)
{
GHashTable *pptable;
g_return_val_if_fail(folder, NULL);
pptable = g_hash_table_new(g_str_hash, g_str_equal);
folder_get_persist_prefs_recursive(folder->node, pptable);
return pptable;
}
void folder_persist_prefs_free(GHashTable *pptable)
{
g_return_if_fail(pptable);
g_hash_table_foreach_remove(pptable, persist_prefs_free, NULL);
g_hash_table_destroy(pptable);
}
const PersistPrefs *folder_get_persist_prefs(GHashTable *pptable, const char *name)
{
if (pptable == NULL || name == NULL) return NULL;
return g_hash_table_lookup(pptable, name);
}
void folder_item_restore_persist_prefs(FolderItem *item, GHashTable *pptable)
{
const PersistPrefs *pp;
gchar *id = folder_item_get_identifier(item);
pp = folder_get_persist_prefs(pptable, id);
g_free(id);
if (!pp) return;
/* CLAWS: since not all folder properties have been migrated to
* folderlist.xml, we need to call the old stuff first before
* setting things that apply both to Main and Claws. */
folder_item_prefs_read_config(item);
item->collapsed = pp->collapsed;
item->thread_collapsed = pp->thread_collapsed;
item->threaded = pp->threaded;
item->ret_rcpt = pp->ret_rcpt;
item->hide_read_msgs = pp->hide_read_msgs;
item->sort_key = pp->sort_key;
item->sort_type = pp->sort_type;
}
static void folder_get_persist_prefs_recursive(GNode *node, GHashTable *pptable)
{
FolderItem *item = FOLDER_ITEM(node->data);
PersistPrefs *pp;
GNode *child, *cur;
gchar *id;
g_return_if_fail(node != NULL);
g_return_if_fail(item != NULL);
/* NOTE: item->path == NULL means top level folder; not interesting
* to store preferences of that one. */
if (item->path) {
id = folder_item_get_identifier(item);
pp = g_new0(PersistPrefs, 1);
g_return_if_fail(pp != NULL);
pp->collapsed = item->collapsed;
pp->thread_collapsed = item->thread_collapsed;
pp->threaded = item->threaded;
pp->ret_rcpt = item->ret_rcpt;
pp->hide_read_msgs = item->hide_read_msgs;
pp->sort_key = item->sort_key;
pp->sort_type = item->sort_type;
g_hash_table_insert(pptable, id, pp);
}
if (node->children) {
child = node->children;
while (child) {
cur = child;
child = cur->next;
folder_get_persist_prefs_recursive(cur, pptable);
}
}
}
static gboolean persist_prefs_free(gpointer key, gpointer val, gpointer data)
{
if (key)
g_free(key);
if (val)
g_free(val);
return TRUE;
}
void folder_item_apply_processing(FolderItem *item)
{
GSList *processing_list;
GSList *mlist, *cur;
g_return_if_fail(item != NULL);
processing_list = item->prefs->processing;
if (processing_list == NULL)
return;
folder_item_update_freeze();
mlist = folder_item_get_msg_list(item);
for (cur = mlist ; cur != NULL ; cur = cur->next) {
MsgInfo * msginfo;
msginfo = (MsgInfo *) cur->data;
filter_message_by_msginfo(processing_list, msginfo);
procmsg_msginfo_free(msginfo);
}
g_slist_free(mlist);
folder_item_update_thaw();
}
/*
* functions for handling FolderItem content changes
*/
static gint folder_item_update_freeze_cnt = 0;
/**
* Notify the folder system about changes to a folder. If the
* update system is not frozen the FOLDER_ITEM_UPDATE_HOOKLIST will
* be invoked, otherwise the changes will be remebered until
* the folder system is thawed.
*
* \param item The FolderItem that was changed
* \param update_flags Type of changed that was made
*/
void folder_item_update(FolderItem *item, FolderItemUpdateFlags update_flags)
{
if (folder_item_update_freeze_cnt == 0) {
FolderItemUpdateData source;
source.item = item;
source.update_flags = update_flags;
hooks_invoke(FOLDER_ITEM_UPDATE_HOOKLIST, &source);
} else {
item->update_flags |= update_flags;
}
}
void folder_item_update_recursive(FolderItem *item, FolderItemUpdateFlags update_flags)
{
GNode *node = item->folder->node;
node = g_node_find(node, G_PRE_ORDER, G_TRAVERSE_ALL, item);
node = node->children;
folder_item_update(item, update_flags);
while (node != NULL) {
if (node && node->data) {
FolderItem *next_item = (FolderItem*) node->data;
folder_item_update(next_item, update_flags);
}
node = node->next;
}
}
void folder_item_update_freeze(void)
{
folder_item_update_freeze_cnt++;
}
static void folder_item_update_func(FolderItem *item, gpointer data)
{
FolderItemUpdateData source;
if (item->update_flags) {
source.item = item;
source.update_flags = item->update_flags;
hooks_invoke(FOLDER_ITEM_UPDATE_HOOKLIST, &source);
item->update_flags = 0;
}
}
void folder_item_update_thaw(void)
{
if (folder_item_update_freeze_cnt > 0)
folder_item_update_freeze_cnt--;
if (folder_item_update_freeze_cnt == 0) {
/* Update all folders */
folder_func_to_all_folders(folder_item_update_func, NULL);
}
}
#undef PUT_ESCAPE_STR