/*
code for handling local mail boxes
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <bonobo.h>
#include <gnome.h>
#include <glade/glade.h>
#include "Evolution.h"
#include "evolution-storage.h"
#include "evolution-shell-component.h"
#include "folder-browser.h"
#include "camel/camel.h"
#include "filter/vfolder-context.h"
#include "filter/vfolder-rule.h"
#include "filter/vfolder-editor.h"
#include "mail.h"
#include "mail-local.h"
#define d(x)
struct _local_meta {
char *path; /* path of metainfo file */
char *format; /* format of mailbox */
char *name; /* name of mbox itself */
};
static struct _local_meta *
load_metainfo(const char *path)
{
xmlDocPtr doc;
xmlNodePtr node;
struct _local_meta *meta;
meta = g_malloc0(sizeof(*meta));
meta->path = g_strdup(path);
printf("Loading folder metainfo from : %s\n", meta->path);
doc = xmlParseFile(meta->path);
if (doc == NULL) {
goto dodefault;
}
node = doc->root;
if (strcmp(node->name, "folderinfo")) {
goto dodefault;
}
node = node->childs;
while (node) {
if (!strcmp(node->name, "folder")) {
meta->format = xmlGetProp(node, "type");
meta->name = xmlGetProp(node, "name");
}
node = node->next;
}
xmlFreeDoc(doc);
return meta;
dodefault:
meta->format = g_strdup("mbox"); /* defaults */
meta->name = g_strdup("mbox");
if (doc)
xmlFreeDoc(doc);
return meta;
}
static void
free_metainfo(struct _local_meta *meta)
{
g_free(meta->path);
g_free(meta->format);
g_free(meta->name);
g_free(meta);
}
static int
save_metainfo(struct _local_meta *meta)
{
xmlDocPtr doc;
xmlNodePtr root, node;
int ret;
printf("Saving folder metainfo to : %s\n", meta->path);
doc = xmlNewDoc("1.0");
root = xmlNewDocNode(doc, NULL, "folderinfo", NULL);
xmlDocSetRootElement(doc, root);
node = xmlNewChild(root, NULL, "folder", NULL);
xmlSetProp(node, "type", meta->format);
xmlSetProp(node, "name", meta->name);
ret = xmlSaveFile(meta->path, doc);
xmlFreeDoc(doc);
return ret;
}
CamelFolder *
local_uri_to_folder(const char *uri, CamelException *ex)
{
CamelURL *url;
char *metapath;
char *storename;
CamelStore *store;
CamelFolder *folder = NULL;
struct _local_meta *meta;
if (strncmp(uri, "file:", 5)) {
return NULL;
}
printf("opening local folder %s\n", uri);
/* get the actual location of the mailbox */
url = camel_url_new(uri, ex);
if (camel_exception_is_set(ex)) {
return NULL;
}
metapath = g_strdup_printf("%s/local-metadata.xml", url->path);
meta = load_metainfo(metapath);
g_free(metapath);
/* change file: to format: */
camel_url_set_protocol(url, meta->format);
storename = camel_url_to_string(url, TRUE);
printf("store name is %s\n", storename);
store = camel_session_get_store(session, storename, ex);
g_free(storename);
if (store) {
folder = camel_store_get_folder(store, meta->name, FALSE, ex);
gtk_object_unref((GtkObject *)store);
}
camel_url_free(url);
free_metainfo(meta);
return folder;
}
/*
open new
copy old->new
close old
rename old oldsave
rename new old
open oldsave
delete oldsave
close old
rename oldtmp
open new
open oldtmp
copy oldtmp new
close oldtmp
close oldnew
*/
static void update_progress(GtkProgress *progress, char *fmt, float percent)
{
if (fmt)
gtk_progress_set_format_string(progress, fmt);
gtk_progress_set_percentage(progress, percent);
while( gtk_events_pending() )
gtk_main_iteration();
}
static void
do_local_reconfigure_folder(FolderBrowser *fb, char *newtype, GtkProgress *progress, CamelException *ex)
{
CamelStore *fromstore, *tostore;
char *fromurl, *tourl, *uri;
CamelFolder *fromfolder, *tofolder;
GPtrArray *uids;
int i;
char *metapath;
char *tmpname;
CamelURL *url;
struct _local_meta *meta;
printf("reconfiguring folder: %s to type %s\n", fb->uri, newtype);
/* get the actual location of the mailbox */
url = camel_url_new(fb->uri, ex);
if (url == NULL || camel_exception_is_set(ex)) {
camel_exception_free(ex);
g_warning("%s is not a workable url!", fb->uri);
return;
}
metapath = g_strdup_printf("%s/local-metadata.xml", url->path);
meta = load_metainfo(metapath);
g_free(metapath);
/* first, 'close' the old folder */
if (fb->folder != NULL) {
update_progress(progress, "Closing current folder", 0.0);
printf("Closing old folder ...\n");
camel_folder_sync(fb->folder, FALSE, ex);
gtk_object_unref (GTK_OBJECT (fb->folder));
fb->folder = NULL;
}
camel_url_set_protocol(url, meta->format);
fromurl = camel_url_to_string(url, TRUE);
camel_url_set_protocol(url, newtype);
tourl = camel_url_to_string(url, TRUE);
printf("opening stores %s and %s\n", fromurl, tourl);
fromstore = camel_session_get_store(session, fromurl, ex);
if (camel_exception_is_set(ex)) {
return;
}
tostore = camel_session_get_store(session, tourl, ex);
if (camel_exception_is_set(ex)) {
return;
}
/* rename the old mbox and open it again */
tmpname = g_strdup_printf("%s_reconfig", meta->name);
printf("renaming mbox to mboxtmp, and opening it\n");
update_progress(progress, "Renaming old folder and opening", 0.0);
camel_store_rename_folder(fromstore, meta->name, tmpname, ex);
if (camel_exception_is_set(ex)) {
return;
}
fromfolder = camel_store_get_folder(fromstore, tmpname, TRUE, ex);
if (fromfolder == NULL || camel_exception_is_set(ex)) {
/* try and recover ... */
camel_store_rename_folder(fromstore, tmpname, meta->name, ex);
return;
}
/* create a new mbox */
printf("Creating the destination mbox\n");
update_progress(progress, "Creating new folder", 0.0);
tofolder = camel_store_get_folder(tostore, meta->name, TRUE, ex);
if (tofolder == NULL || camel_exception_is_set(ex)) {
printf("cannot open destination folder\n");
/* try and recover ... */
camel_store_rename_folder(fromstore, tmpname, meta->name, ex);
return;
}
/* copy the messages across */
uids = camel_folder_get_uids (fromfolder);
printf("got %d messages in source\n", uids->len);
update_progress(progress, "Copying messages", 0.0);
for (i = 0; i < uids->len; i++) {
CamelMimeMessage *msg;
char *uid = uids->pdata[i];
const CamelMessageInfo *info;
update_progress(progress, NULL, i/uids->len);
printf("copying message %s\n", uid);
msg = camel_folder_get_message(fromfolder, uid, ex);
if (camel_exception_is_set(ex)) {
/* we're fucked a bit ... */
/* need to: delete new folder
rename old back again */
g_warning("cannot get message");
return;
}
info = camel_folder_get_message_info(fromfolder, uid);
camel_folder_append_message(tofolder, msg, info, ex);
if (camel_exception_is_set(ex)) {
/* we're fucked a bit ... */
/* need to: delete new folder
rename old back again */
g_warning("cannot append message");
return;
}
gtk_object_unref((GtkObject *)msg);
}
update_progress(progress, "Synchronising", 0.0);
/* sync while we're doing i/o, just to make sure */
camel_folder_sync(tofolder, FALSE, ex);
if (camel_exception_is_set(ex)) {
/* same again */
}
/* delete everything in the old mailbox */
printf("deleting old mbox contents\n");
for (i = 0; i < uids->len; i++) {
char *uid = uids->pdata[i];
camel_folder_delete_message(fromfolder, uid);
}
camel_folder_sync(fromfolder, TRUE, ex);
gtk_object_unref((GtkObject *)fromfolder);
printf("and old mbox ...\n");
camel_store_delete_folder(fromstore, tmpname, ex);
/* switch format */
g_free(meta->format);
meta->format = g_strdup(newtype);
if (save_metainfo(meta) == -1) {
g_warning("Cannot save folder metainfo, you'll probably find you can't\n"
"open this folder anymore: %s", tourl);
}
free_metainfo(meta);
/* force a reload of the newly formatted folder */
printf("opening new source\n");
uri = g_strdup(fb->uri);
folder_browser_set_uri(fb, uri);
g_free(uri);
/* and unref our copy of the new folder ... */
gtk_object_unref((GtkObject *)tofolder);
g_free(fromurl);
g_free(tourl);
}
struct _reconfig_data {
FolderBrowser *fb;
GtkProgress *progress;
GtkWidget *frame;
GtkWidget *apply;
GtkWidget *cancel;
GtkOptionMenu *optionlist;
};
static void
reconfigure_clicked(GnomeDialog *d, int button, struct _reconfig_data *data)
{
if (button == 0) {
GtkMenu *menu;
int type;
char *types[] = { "mh", "mbox" };
CamelException *ex;
ex = camel_exception_new();
menu = (GtkMenu *)gtk_option_menu_get_menu(data->optionlist);
type = g_list_index(GTK_MENU_SHELL(menu)->children, gtk_menu_get_active(menu));
if (type < 0 || type > 1)
type = 1;
gtk_progress_set_percentage(data->progress, 0.0);
gtk_widget_set_sensitive(data->frame, FALSE);
gtk_widget_set_sensitive(data->apply, FALSE);
gtk_widget_set_sensitive(data->cancel, FALSE);
do_local_reconfigure_folder(data->fb, types[type], data->progress, ex);
if (camel_exception_is_set(ex)) {
GtkWidget *win = gtk_widget_get_ancestor((GtkWidget *)d, GTK_TYPE_WINDOW);
char *error;
error = g_strdup_printf("A failure occured:\n %s\n\n"
"If you can no longer open this mailbox, then\n"
"you may need to repair it manually.",
camel_exception_get_description(ex));
gnome_error_dialog_parented(error, GTK_WINDOW (win));
g_free(error);
}
camel_exception_free(ex);
}
if (button != -1) {
gnome_dialog_close(d);
}
}
void
local_reconfigure_folder(FolderBrowser *fb)
{
CamelStore *store;
GladeXML *gui;
GnomeDialog *gd;
struct _reconfig_data *data;
if (fb->folder == NULL) {
g_warning("Trying to reconfigure nonexistant folder");
return;
}
data = g_malloc0(sizeof(*data));
store = camel_folder_get_parent_store(fb->folder);
gui = glade_xml_new(EVOLUTION_GLADEDIR "/local-config.glade", "dialog_format");
gd = (GnomeDialog *)glade_xml_get_widget (gui, "dialog_format");
data->progress = (GtkProgress *)glade_xml_get_widget (gui, "progress_format");
gtk_progress_set_show_text(data->progress, TRUE);
data->frame = glade_xml_get_widget (gui, "frame_format");
data->apply = glade_xml_get_widget (gui, "apply_format");
data->cancel = glade_xml_get_widget (gui, "cancel_format");
data->optionlist = (GtkOptionMenu *)glade_xml_get_widget (gui, "option_format");
data->fb = fb;
gtk_label_set_text((GtkLabel *)glade_xml_get_widget (gui, "label_format"),
((CamelService *)store)->url->protocol);
gtk_signal_connect((GtkObject *)gd, "clicked", reconfigure_clicked, data);
gtk_object_set_data_full((GtkObject *)gd, "data", data, g_free);
gtk_widget_show((GtkWidget *)gd);
gtk_object_unref((GtkObject *)gui);
}
