/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/* mail-ops.c: callbacks for the mail toolbar/menus */
/*
* Authors: Dan Winship <danw@ximian.com>
* Jeffrey Stedfast <fejj@ximian.com>
* Peter Williams <peterw@ximian.com>
* Michael Zucchi <notzed@ximian.com>
*
* Copyright 2000,2001 Ximian, Inc. (www.ximian.com)
*
* 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 <ctype.h> */
#include <errno.h>
#include <gal/util/e-util.h>
#include <gal/widgets/e-unicode.h>
#include <camel/camel-mime-filter-from.h>
#include <camel/camel-operation.h>
#include <camel/camel-vtrash-folder.h>
#include <camel/camel-vee-store.h>
#include "mail.h"
#include "mail-tools.h"
#include "mail-ops.h"
#include "mail-vfolder.h"
#include "composer/e-msg-composer.h"
#include "folder-browser.h"
#include "e-util/e-html-utils.h"
#include "e-util/e-unicode-i18n.h"
#include "filter/filter-filter.h"
#include "mail-mt.h"
#include "mail-folder-cache.h"
#define d(x) x
/* used for both just filtering a folder + uid's, and for filtering a whole folder */
/* used both for fetching mail, and for filtering mail */
struct _filter_mail_msg {
struct _mail_msg msg;
CamelFolder *source_folder; /* where they come from */
GPtrArray *source_uids; /* uids to copy, or NULL == copy all */
CamelUIDCache *cache; /* UID cache if we are to cache the uids, NULL otherwise */
CamelOperation *cancel;
CamelFilterDriver *driver;
int delete; /* delete messages after filtering them? */
CamelFolder *destination; /* default destination for any messages, NULL for none */
};
/* since fetching also filters, we subclass the data here */
struct _fetch_mail_msg {
struct _filter_mail_msg fmsg;
CamelOperation *cancel; /* we have our own cancellation struct, the other should be empty */
int keep; /* keep on server? */
char *source_uri;
void (*done)(char *source, void *data);
void *data;
};
static char *
filter_folder_describe (struct _mail_msg *mm, int complete)
{
return g_strdup (_("Filtering Folder"));
}
/* filter a folder, or a subset thereof, uses source_folder/source_uids */
/* this is shared with fetch_mail */
static void
filter_folder_filter (struct _mail_msg *mm)
{
struct _filter_mail_msg *m = (struct _filter_mail_msg *)mm;
CamelFolder *folder;
GPtrArray *uids, *folder_uids = NULL;
if (m->cancel)
camel_operation_register (m->cancel);
folder = m->source_folder;
if (folder == NULL || camel_folder_get_message_count (folder) == 0) {
if (m->cancel)
camel_operation_unregister (m->cancel);
return;
}
if (m->destination) {
camel_folder_freeze (m->destination);
camel_filter_driver_set_default_folder (m->driver, m->destination);
}
camel_folder_freeze (folder);
if (m->source_uids)
uids = m->source_uids;
else
folder_uids = uids = camel_folder_get_uids (folder);
camel_filter_driver_filter_folder (m->driver, folder, m->cache, uids, m->delete, &mm->ex);
if (folder_uids)
camel_folder_free_uids (folder, folder_uids);
/* sync and expunge */
if (!m->cache)
camel_folder_sync (folder, TRUE, camel_exception_is_set (&mm->ex) ? NULL : &mm->ex);
camel_folder_thaw (folder);
if (m->destination)
camel_folder_thaw (m->destination);
if (m->cancel)
camel_operation_unregister (m->cancel);
}
static void
filter_folder_filtered (struct _mail_msg *mm)
{
}
static void
filter_folder_free (struct _mail_msg *mm)
{
struct _filter_mail_msg *m = (struct _filter_mail_msg *)mm;
int i;
if (m->source_folder)
camel_object_unref (CAMEL_OBJECT (m->source_folder));
if (m->source_uids) {
for (i = 0; i < m->source_uids->len; i++)
g_free (m->source_uids->pdata[i]);
g_ptr_array_free (m->source_uids, TRUE);
}
if (m->cancel)
camel_operation_unref (m->cancel);
if (m->destination)
camel_object_unref (CAMEL_OBJECT (m->destination));
if (m->driver)
camel_object_unref (CAMEL_OBJECT (m->driver));
}
static struct _mail_msg_op filter_folder_op = {
filter_folder_describe, /* we do our own progress reporting? */
filter_folder_filter,
filter_folder_filtered,
filter_folder_free,
};
void
mail_filter_folder (CamelFolder *source_folder, GPtrArray *uids,
const char *type, CamelOperation *cancel)
{
struct _filter_mail_msg *m;
m = mail_msg_new (&filter_folder_op, NULL, sizeof (*m));
m->source_folder = source_folder;
camel_object_ref (CAMEL_OBJECT (source_folder));
m->source_uids = uids;
m->cache = NULL;
m->delete = FALSE;
if (cancel) {
m->cancel = cancel;
camel_operation_ref (cancel);
}
m->driver = camel_session_get_filter_driver (session, type, NULL);
e_thread_put (mail_thread_new, (EMsg *)m);
}
/* convenience function for it */
void
mail_filter_on_demand (CamelFolder *folder, GPtrArray *uids)
{
mail_filter_folder (folder, uids, FILTER_SOURCE_INCOMING, NULL);
}
/* ********************************************************************** */
/* Temporary workaround for various issues. Gone before 0.11 */
static char *
uid_cachename_hack (CamelStore *store)
{
CamelURL *url = CAMEL_SERVICE (store)->url;
char *encoded_url, *filename, *old_location;
struct stat st;
encoded_url = g_strdup_printf ("pop://%s%s%s@%s/", url->user,
url->authmech ? ";auth=" : "",
url->authmech ? url->authmech : "",
url->host);
e_filename_make_safe (encoded_url);
filename = g_strdup_printf ("%s/mail/pop3/cache-%s", evolution_dir, encoded_url);
/* lame hack, but we can't expect user's to actually migrate
their cache files - brain power requirements are too
high. */
if (stat (filename, &st) == -1) {
/* This is either the first time the user has checked
mail with this POP provider or else their cache
file is in the old location... */
old_location = g_strdup_printf ("%s/config/cache-%s", evolution_dir, encoded_url);
if (stat (old_location, &st) == -1) {
/* old location doesn't exist either so use the new location */
g_free (old_location);
} else {
/* old location exists, so I guess we use the old cache file location */
g_free (filename);
filename = old_location;
}
}
g_free (encoded_url);
return filename;
}
static char *
fetch_mail_describe (struct _mail_msg *mm, int complete)
{
return g_strdup (_("Fetching Mail"));
}
static void
fetch_mail_fetch (struct _mail_msg *mm)
{
struct _fetch_mail_msg *m = (struct _fetch_mail_msg *)mm;
struct _filter_mail_msg *fm = (struct _filter_mail_msg *)mm;
int i;
if (m->cancel)
camel_operation_register (m->cancel);
if ((fm->destination = mail_tool_get_local_inbox (&mm->ex)) == NULL) {
if (m->cancel)
camel_operation_unregister (m->cancel);
return;
}
/* FIXME: this should support keep_on_server too, which would then perform a spool
access thingy, right? problem is matching raw messages to uid's etc. */
if (!strncmp (m->source_uri, "mbox:", 5)) {
char *path = mail_tool_do_movemail (m->source_uri, &mm->ex);
if (path && !camel_exception_is_set (&mm->ex)) {
camel_folder_freeze (fm->destination);
camel_filter_driver_set_default_folder (fm->driver, fm->destination);
camel_filter_driver_filter_mbox (fm->driver, path, m->source_uri, &mm->ex);
camel_folder_thaw (fm->destination);
if (!camel_exception_is_set (&mm->ex))
unlink (path);
}
g_free (path);
} else {
CamelFolder *folder = fm->source_folder = mail_tool_get_inbox (m->source_uri, &mm->ex);
if (folder) {
/* this handles 'keep on server' stuff, if we have any new uid's to copy
across, we need to copy them to a new array 'cause of the way fetch_mail_free works */
CamelUIDCache *cache = NULL;
char *cachename;
cachename = uid_cachename_hack (folder->parent_store);
cache = camel_uid_cache_new (cachename);
g_free (cachename);
if (cache) {
GPtrArray *folder_uids, *cache_uids, *uids;
folder_uids = camel_folder_get_uids (folder);
cache_uids = camel_uid_cache_get_new_uids (cache, folder_uids);
if (cache_uids) {
/* need to copy this, sigh */
fm->source_uids = uids = g_ptr_array_new ();
g_ptr_array_set_size (uids, cache_uids->len);
for (i = 0; i < cache_uids->len; i++)
uids->pdata[i] = g_strdup (cache_uids->pdata[i]);
camel_uid_cache_free_uids (cache_uids);
fm->cache = cache;
filter_folder_filter (mm);
/* if we are not to delete the messages or there was an
* exception, save the UID cache */
if (!fm->delete || camel_exception_is_set (&mm->ex))
camel_uid_cache_save (cache);
/* if we are deleting off the server and no exception occured
* then iterate through the folder uids and mark them all
* for deletion. */
if (fm->delete && !camel_exception_is_set (&mm->ex)) {
camel_folder_freeze (folder);
for (i = 0; i < folder_uids->len; i++)
camel_folder_delete_message (folder, folder_uids->pdata[i]);
/* sync and expunge */
camel_folder_sync (folder, TRUE, &mm->ex);
camel_folder_thaw (folder);
}
}
camel_uid_cache_destroy (cache);
camel_folder_free_uids (folder, folder_uids);
} else {
filter_folder_filter (mm);
}
/* we unref the source folder here since we
may now block in finalize (we try to
disconnect cleanly) */
camel_object_unref (CAMEL_OBJECT (fm->source_folder));
fm->source_folder = NULL;
}
}
if (m->cancel)
camel_operation_unregister (m->cancel);
/* we unref this here as it may have more work to do (syncing
folders and whatnot) before we are really done */
/* should this be cancellable too? (i.e. above unregister above) */
camel_object_unref (CAMEL_OBJECT (fm->driver));
fm->driver = NULL;
}
static void
fetch_mail_fetched (struct _mail_msg *mm)
{
struct _fetch_mail_msg *m = (struct _fetch_mail_msg *)mm;
if (m->done)
m->done (m->source_uri, m->data);
}
static void
fetch_mail_free (struct _mail_msg *mm)
{
struct _fetch_mail_msg *m = (struct _fetch_mail_msg *)mm;
g_free (m->source_uri);
if (m->cancel)
camel_operation_unref (m->cancel);
filter_folder_free (mm);
}
static struct _mail_msg_op fetch_mail_op = {
fetch_mail_describe, /* we do our own progress reporting */
fetch_mail_fetch,
fetch_mail_fetched,
fetch_mail_free,
};
/* ouch, a 'do everything' interface ... */
void
mail_fetch_mail (const char *source, int keep, const char *type, CamelOperation *cancel,
CamelFilterGetFolderFunc get_folder, void *get_data,
CamelFilterStatusFunc *status, void *status_data,
void (*done)(char *source, void *data), void *data)
{
struct _fetch_mail_msg *m;
struct _filter_mail_msg *fm;
m = mail_msg_new (&fetch_mail_op, NULL, sizeof (*m));
fm = (struct _filter_mail_msg *)m;
m->source_uri = g_strdup (source);
fm->delete = !keep;
fm->cache = NULL;
if (cancel) {
m->cancel = cancel;
camel_operation_ref (cancel);
}
m->done = done;
m->data = data;
fm->driver = camel_session_get_filter_driver (session, type, NULL);
camel_filter_driver_set_folder_func (fm->driver, get_folder, get_data);
if (status)
camel_filter_driver_set_status_func (fm->driver, status, status_data);
e_thread_put (mail_thread_new, (EMsg *)m);
}
/* ********************************************************************** */
/* sending stuff */
/* ** SEND MAIL *********************************************************** */
extern CamelFolder *sent_folder;
/* send 1 message to a specific transport */
static void
mail_send_message(CamelMimeMessage *message, const char *destination, CamelFilterDriver *driver, CamelException *ex)
{
CamelMessageInfo *info;
CamelTransport *xport = NULL;
char *transport_url = NULL;
char *sent_folder_uri = NULL;
CamelFolder *folder;
const char *version;
XEvolution *xev;
if (SUB_VERSION[0] == '\0')
version = "Evolution/" VERSION " (Preview Release)";
else
version = "Evolution/" VERSION SUB_VERSION " (Preview Release)";
camel_medium_add_header (CAMEL_MEDIUM (message), "X-Mailer", version);
camel_mime_message_set_date (message, CAMEL_MESSAGE_DATE_CURRENT, 0);
xev = mail_tool_remove_xevolution_headers (message);
if (xev->transport) {
transport_url = g_strstrip (g_strdup (xev->transport));
} else if (xev->account) {
const MailConfigAccount *account;
char *name;
name = g_strstrip (g_strdup (xev->account));
account = mail_config_get_account_by_name (name);
g_free (name);
if (account && account->transport && account->transport->url)
transport_url = g_strdup (account->transport->url);
}
if (xev->fcc)
sent_folder_uri = g_strstrip (g_strdup (xev->fcc));
xport = camel_session_get_transport (session, transport_url ? transport_url : destination, ex);
g_free (transport_url);
if (!xport) {
mail_tool_restore_xevolution_headers (message, xev);
mail_tool_destroy_xevolution (xev);
g_free (sent_folder_uri);
return;
}
camel_transport_send (xport, CAMEL_MEDIUM (message), ex);
mail_tool_restore_xevolution_headers (message, xev);
mail_tool_destroy_xevolution (xev);
camel_object_unref (CAMEL_OBJECT (xport));
if (camel_exception_is_set (ex)) {
g_free (sent_folder_uri);
return;
}
/* post-process */
info = camel_message_info_new ();
info->flags = CAMEL_MESSAGE_SEEN;
if (driver) {
camel_filter_driver_filter_message (driver, message, info,
NULL, NULL, NULL, "", ex);
if (camel_exception_is_set (ex)) {
ExceptionId id;
id = camel_exception_get_id (ex);
camel_exception_setv (ex, id, "%s\n%s", camel_exception_get_description (ex),
_("However, the message was successfully sent."));
camel_message_info_free (info);
g_free (sent_folder_uri);
return;
}
}
if (sent_folder_uri) {
folder = mail_tool_uri_to_folder (sent_folder_uri, 0, NULL);
g_free (sent_folder_uri);
if (!folder) {
/* FIXME */
camel_object_ref (CAMEL_OBJECT (sent_folder));
folder = sent_folder;
}
} else {
camel_object_ref (CAMEL_OBJECT (sent_folder));
folder = sent_folder;
}
if (folder) {
camel_folder_append_message (folder, message, info, ex);
if (camel_exception_is_set (ex)) {
ExceptionId id;
id = camel_exception_get_id (ex);
camel_exception_setv (ex, id, "%s\n%s", camel_exception_get_description (ex),
_("However, the message was successfully sent."));
}
camel_folder_sync (folder, FALSE, NULL);
camel_object_unref (CAMEL_OBJECT (folder));
}
camel_message_info_free (info);
}
/* ********************************************************************** */
struct _send_mail_msg {
struct _mail_msg msg;
CamelFilterDriver *driver;
char *destination;
CamelMimeMessage *message;
void (*done)(char *uri, CamelMimeMessage *message, gboolean sent, void *data);
void *data;
};
static char *
send_mail_desc (struct _mail_msg *mm, int done)
{
struct _send_mail_msg *m = (struct _send_mail_msg *)mm;
char *subject;
const char *subject_utf8;
subject_utf8 = camel_mime_message_get_subject (m->message);
if (subject_utf8) {
char *desc;
subject = e_utf8_to_locale_string (subject_utf8);
desc = g_strdup_printf (_("Sending \"%s\""), subject);
g_free (subject);
return desc;
} else
return g_strdup (_("Sending message"));
}
static void
send_mail_send (struct _mail_msg *mm)
{
struct _send_mail_msg *m = (struct _send_mail_msg *)mm;
mail_send_message (m->message, m->destination, m->driver, &mm->ex);
}
static void
send_mail_sent (struct _mail_msg *mm)
{
struct _send_mail_msg *m = (struct _send_mail_msg *)mm;
if (m->done)
m->done (m->destination, m->message, !camel_exception_is_set (&mm->ex), m->data);
}
static void
send_mail_free (struct _mail_msg *mm)
{
struct _send_mail_msg *m = (struct _send_mail_msg *)mm;
camel_object_unref (CAMEL_OBJECT (m->message));
g_free (m->destination);
}
static struct _mail_msg_op send_mail_op = {
send_mail_desc,
send_mail_send,
send_mail_sent,
send_mail_free,
};
int
mail_send_mail (const char *uri, CamelMimeMessage *message,
void (*done) (char *uri, CamelMimeMessage *message, gboolean sent, void *data),
void *data)
{
struct _send_mail_msg *m;
int id;
m = mail_msg_new (&send_mail_op, NULL, sizeof (*m));
m->destination = g_strdup (uri);
m->message = message;
camel_object_ref (CAMEL_OBJECT (message));
m->data = data;
m->done = done;
id = m->msg.seq;
m->driver = camel_session_get_filter_driver (session, FILTER_SOURCE_OUTGOING, NULL);
e_thread_put (mail_thread_new, (EMsg *)m);
return id;
}
/* ** SEND MAIL QUEUE ***************************************************** */
struct _send_queue_msg {
struct _mail_msg msg;
CamelFolder *queue;
char *destination;
CamelFilterDriver *driver;
CamelOperation *cancel;
/* we use camelfilterstatusfunc, even though its not the filter doing it */
CamelFilterStatusFunc *status;
void *status_data;
void (*done)(char *destination, void *data);
void *data;
};
static void
report_status (struct _send_queue_msg *m, enum camel_filter_status_t status, int pc, const char *desc, ...)
{
va_list ap;
char *str;
if (m->status) {
va_start (ap, desc);
str = g_strdup_vprintf (desc, ap);
va_end (ap);
m->status (m->driver, status, pc, str, m->status_data);
g_free (str);
}
}
static void
send_queue_send(struct _mail_msg *mm)
{
struct _send_queue_msg *m = (struct _send_queue_msg *)mm;
extern CamelFolder *sent_folder; /* FIXME */
GPtrArray *uids;
int i;
d(printf("sending queue\n"));
uids = camel_folder_get_uids (m->queue);
if (uids == NULL || uids->len == 0)
return;
if (m->cancel)
camel_operation_register (m->cancel);
for (i = 0; i < uids->len; i++) {
CamelMimeMessage *message;
CamelMessageInfo *info;
int pc = (100 * i) / uids->len;
report_status (m, CAMEL_FILTER_STATUS_START, pc, _("Sending message %d of %d"), i+1, uids->len);
info = camel_folder_get_message_info (m->queue, uids->pdata[i]);
if (info && info->flags & CAMEL_MESSAGE_DELETED)
continue;
message = camel_folder_get_message (m->queue, uids->pdata[i], &mm->ex);
if (camel_exception_is_set (&mm->ex))
break;
mail_send_message (message, m->destination, m->driver, &mm->ex);
if (camel_exception_is_set (&mm->ex))
break;
camel_folder_set_message_flags (m->queue, uids->pdata[i], CAMEL_MESSAGE_DELETED, CAMEL_MESSAGE_DELETED);
}
if (camel_exception_is_set (&mm->ex))
report_status (m, CAMEL_FILTER_STATUS_END, 100, _("Failed on message %d of %d"), i+1, uids->len);
else
report_status (m, CAMEL_FILTER_STATUS_END, 100, _("Complete."));
if (m->driver) {
camel_object_unref((CamelObject *)m->driver);
m->driver = NULL;
}
camel_folder_free_uids (m->queue, uids);
if (!camel_exception_is_set (&mm->ex))
camel_folder_expunge (m->queue, &mm->ex);
if (sent_folder)
camel_folder_sync (sent_folder, FALSE, NULL);
if (m->cancel)
camel_operation_unregister (m->cancel);
}
static void
send_queue_sent(struct _mail_msg *mm)
{
struct _send_queue_msg *m = (struct _send_queue_msg *)mm;
if (m->done)
m->done(m->destination, m->data);
}
static void
send_queue_free(struct _mail_msg *mm)
{
struct _send_queue_msg *m = (struct _send_queue_msg *)mm;
if (m->driver)
camel_object_unref((CamelObject *)m->driver);
camel_object_unref((CamelObject *)m->queue);
g_free(m->destination);
if (m->cancel)
camel_operation_unref(m->cancel);
}
static struct _mail_msg_op send_queue_op = {
NULL, /* do our own reporting, as with fetch mail */
send_queue_send,
send_queue_sent,
send_queue_free,
};
/* same interface as fetch_mail, just 'cause i'm lazy today (and we need to run it from the same spot?) */
void
mail_send_queue(CamelFolder *queue, const char *destination,
const char *type, CamelOperation *cancel,
CamelFilterGetFolderFunc get_folder, void *get_data,
CamelFilterStatusFunc *status, void *status_data,
void (*done)(char *destination, void *data), void *data)
{
struct _send_queue_msg *m;
m = mail_msg_new(&send_queue_op, NULL, sizeof(*m));
m->queue = queue;
camel_object_ref((CamelObject *)queue);
m->destination = g_strdup(destination);
if (cancel) {
m->cancel = cancel;
camel_operation_ref(cancel);
}
m->status = status;
m->status_data = status_data;
m->done = done;
m->data = data;
m->driver = camel_session_get_filter_driver (session, type, NULL);
camel_filter_driver_set_folder_func (m->driver, get_folder, get_data);
e_thread_put(mail_thread_new, (EMsg *)m);
}
/* ** APPEND MESSAGE TO FOLDER ******************************************** */
struct _append_msg {
struct _mail_msg msg;
CamelFolder *folder;
CamelMimeMessage *message;
CamelMessageInfo *info;
void (*done)(CamelFolder *folder, CamelMimeMessage *msg, CamelMessageInfo *info, int ok, void *data);
void *data;
};
static char *
append_mail_desc (struct _mail_msg *mm, int done)
{
return g_strdup (_("Saving message to folder"));
}
static void
append_mail_append (struct _mail_msg *mm)
{
struct _append_msg *m = (struct _append_msg *)mm;
camel_mime_message_set_date(m->message, CAMEL_MESSAGE_DATE_CURRENT, 0);
camel_folder_append_message(m->folder, m->message, m->info, &mm->ex);
}
static void
append_mail_appended (struct _mail_msg *mm)
{
struct _append_msg *m = (struct _append_msg *)mm;
if (m->done)
m->done(m->folder, m->message, m->info, !camel_exception_is_set(&mm->ex), m->data);
}
static void
append_mail_free (struct _mail_msg *mm)
{
struct _append_msg *m = (struct _append_msg *)mm;
camel_object_unref((CamelObject *)m->message);
camel_object_unref((CamelObject *)m->folder);
}
static struct _mail_msg_op append_mail_op = {
append_mail_desc,
append_mail_append,
append_mail_appended,
append_mail_free
};
void
mail_append_mail (CamelFolder *folder, CamelMimeMessage *message, CamelMessageInfo *info,
void (*done)(CamelFolder *folder, CamelMimeMessage *msg, CamelMessageInfo *info, int ok, void *data),
void *data)
{
struct _append_msg *m;
g_assert(CAMEL_IS_FOLDER (folder));
g_assert(CAMEL_IS_MIME_MESSAGE (message));
m = mail_msg_new (&append_mail_op, NULL, sizeof (*m));
m->folder = folder;
camel_object_ref (CAMEL_OBJECT (folder));
m->message = message;
camel_object_ref (CAMEL_OBJECT (message));
m->info = info;
m->done = done;
m->data = data;
e_thread_put (mail_thread_new, (EMsg *)m);
}
/* ** TRANSFER MESSAGES **************************************************** */
struct _transfer_msg {
struct _mail_msg msg;
CamelFolder *source;
GPtrArray *uids;
gboolean delete;
char *dest_uri;
guint32 dest_flags;
void (*done)(gboolean ok, void *data);
void *data;
};
static char *
transfer_messages_desc (struct _mail_msg *mm, int done)
{
struct _transfer_msg *m = (struct _transfer_msg *)mm;
return g_strdup_printf(m->delete?_("Moving messages to %s"):_("Copying messages to %s"),
m->dest_uri);
}
static void
transfer_messages_transfer (struct _mail_msg *mm)
{
struct _transfer_msg *m = (struct _transfer_msg *)mm;
CamelFolder *dest;
char *desc;
void (*func) (CamelFolder *, GPtrArray *,
CamelFolder *,
CamelException *);
dest = mail_tool_uri_to_folder (m->dest_uri, m->dest_flags, &mm->ex);
if (camel_exception_is_set (&mm->ex))
return;
if (dest == m->source) {
camel_object_unref((CamelObject *)dest);
camel_exception_setv(&mm->ex, CAMEL_EXCEPTION_FOLDER_INVALID,
_("Cannot copy a folder `%s' to itself"),
m->dest_uri);
return;
}
if (m->delete) {
func = camel_folder_move_messages_to;
desc = _("Moving");
} else {
func = camel_folder_copy_messages_to;
desc = _("Copying");
}
camel_folder_freeze (m->source);
camel_folder_freeze (dest);
if (CAMEL_IS_VTRASH_FOLDER (dest)) {
if (m->delete) {
int i;
/* Just mark all the messages as deleted */
for (i = 0; i < m->uids->len; i++)
camel_folder_delete_message (m->source, m->uids->pdata[i]);
} else {
/* no-op - can't copy messages to*/
}
} else {
if (dest == m->source) {
int i;
/* Undelete the messages if they are marked as deleted */
for (i = 0; i < m->uids->len; i++)
camel_folder_set_message_flags (m->source, m->uids->pdata[i],
CAMEL_MESSAGE_DELETED, 0);
} else {
(func) (m->source, m->uids, dest, &mm->ex);
}
}
camel_folder_thaw (m->source);
camel_folder_thaw (dest);
camel_folder_sync (dest, FALSE, NULL);
camel_object_unref (CAMEL_OBJECT (dest));
}
static void
transfer_messages_transferred (struct _mail_msg *mm)
{
struct _transfer_msg *m = (struct _transfer_msg *)mm;
if (m->done)
m->done (!camel_exception_is_set (&mm->ex), m->data);
}
static void
transfer_messages_free (struct _mail_msg *mm)
{
struct _transfer_msg *m = (struct _transfer_msg *)mm;
int i;
camel_object_unref (CAMEL_OBJECT (m->source));
g_free (m->dest_uri);
for (i = 0; i < m->uids->len; i++)
g_free (m->uids->pdata[i]);
g_ptr_array_free (m->uids, TRUE);
}
static struct _mail_msg_op transfer_messages_op = {
transfer_messages_desc,
transfer_messages_transfer,
transfer_messages_transferred,
transfer_messages_free,
};
void
mail_transfer_messages (CamelFolder *source, GPtrArray *uids,
gboolean delete_from_source,
const char *dest_uri,
guint32 dest_flags,
void (*done) (gboolean ok, void *data),
void *data)
{
struct _transfer_msg *m;
g_assert(CAMEL_IS_FOLDER (source));
g_assert(uids != NULL);
g_assert(dest_uri != NULL);
m = mail_msg_new(&transfer_messages_op, NULL, sizeof(*m));
m->source = source;
camel_object_ref (CAMEL_OBJECT (source));
m->uids = uids;
m->delete = delete_from_source;
m->dest_uri = g_strdup (dest_uri);
m->dest_flags = dest_flags;
m->done = done;
m->data = data;
e_thread_put(mail_thread_queued, (EMsg *)m);
}
/* ** SCAN SUBFOLDERS ***************************************************** */
struct _get_folderinfo_msg {
struct _mail_msg msg;
CamelStore *store;
CamelFolderInfo *info;
void (*done)(CamelStore *store, CamelFolderInfo *info, void *data);
void *data;
};
static char *
get_folderinfo_desc (struct _mail_msg *mm, int done)
{
struct _get_folderinfo_msg *m = (struct _get_folderinfo_msg *)mm;
char *ret, *name;
name = camel_service_get_name((CamelService *)m->store, TRUE);
ret = g_strdup_printf(_("Scanning folders in \"%s\""), name);
g_free(name);
return ret;
}
static void
add_vtrash_info (CamelStore *store, CamelFolderInfo *info)
{
CamelFolderInfo *fi, *vtrash, *parent;
char *uri, *path;
CamelURL *url;
g_return_if_fail (info != NULL);
parent = NULL;
for (fi = info; fi; fi = fi->sibling) {
if (!strcmp (fi->name, CAMEL_VTRASH_NAME))
break;
parent = fi;
}
/* create our vTrash URL */
url = camel_url_new (info->url, NULL);
path = g_strdup_printf ("/%s", CAMEL_VTRASH_NAME);
if (url->fragment)
camel_url_set_fragment (url, path);
else
camel_url_set_path (url, path);
g_free (path);
uri = camel_url_to_string (url, CAMEL_URL_HIDE_ALL);
camel_url_free (url);
if (fi) {
/* We're going to replace the physical Trash folder with our vTrash folder */
vtrash = fi;
g_free (vtrash->full_name);
g_free (vtrash->name);
g_free (vtrash->url);
} else {
/* There wasn't a Trash folder so create a new folder entry */
vtrash = g_new0 (CamelFolderInfo, 1);
g_assert(parent != NULL);
/* link it into the right spot */
vtrash->sibling = parent->sibling;
parent->sibling = vtrash;
}
/* Fill in the new fields */
vtrash->full_name = g_strdup (U_("Trash"));
vtrash->name = g_strdup(vtrash->full_name);
vtrash->url = g_strdup_printf ("vtrash:%s", uri);
vtrash->unread_message_count = -1;
vtrash->path = g_strdup_printf("/%s", vtrash->name);
g_free (uri);
}
static void
add_unmatched_info(CamelFolderInfo *fi)
{
for (; fi; fi = fi->sibling) {
if (!strcmp(fi->full_name, CAMEL_UNMATCHED_NAME)) {
g_free(fi->name);
fi->name = g_strdup(U_("Unmatched"));
g_free(fi->path);
fi->path = g_strdup_printf("/%s", fi->name);
break;
}
}
}
static void
get_folderinfo_get (struct _mail_msg *mm)
{
struct _get_folderinfo_msg *m = (struct _get_folderinfo_msg *)mm;
guint32 flags = CAMEL_STORE_FOLDER_INFO_RECURSIVE;
if (camel_store_supports_subscriptions (m->store))
flags |= CAMEL_STORE_FOLDER_INFO_SUBSCRIBED;
m->info = camel_store_get_folder_info (m->store, NULL, flags, &mm->ex);
if (m->info) {
if (m->info->url && (m->store->flags & CAMEL_STORE_VTRASH))
add_vtrash_info(m->store, m->info);
if (CAMEL_IS_VEE_STORE(m->store))
add_unmatched_info(m->info);
}
}
static void
get_folderinfo_got (struct _mail_msg *mm)
{
struct _get_folderinfo_msg *m = (struct _get_folderinfo_msg *)mm;
if (camel_exception_is_set (&mm->ex)) {
char *url;
url = camel_service_get_url (CAMEL_SERVICE (m->store));
g_warning ("Error getting folder info from store at %s: %s",
url, camel_exception_get_description (&mm->ex));
g_free (url);
}
/* 'done' is probably guaranteed to fail, but... */
if (m->done)
m->done (m->store, m->info, m->data);
}
static void
get_folderinfo_free (struct _mail_msg *mm)
{
struct _get_folderinfo_msg *m = (struct _get_folderinfo_msg *)mm;
if (m->info)
camel_store_free_folder_info(m->store, m->info);
camel_object_unref((CamelObject *)m->store);
}
static struct _mail_msg_op get_folderinfo_op = {
get_folderinfo_desc,
get_folderinfo_get,
get_folderinfo_got,
get_folderinfo_free,
};
int
mail_get_folderinfo (CamelStore *store, void (*done)(CamelStore *store, CamelFolderInfo *info, void *data), void *data)
{
struct _get_folderinfo_msg *m;
int id;
m = mail_msg_new(&get_folderinfo_op, NULL, sizeof(*m));
m->store = store;
camel_object_ref((CamelObject *)store);
m->done = done;
m->data = data;
id = m->msg.seq;
e_thread_put(mail_thread_queued, (EMsg *)m);
return id;
}
/* ** ATTACH MESSAGES ****************************************************** */
struct _build_data {
void (*done)(CamelFolder *folder, GPtrArray *uids, CamelMimePart *part, char *subject, void *data);
void *data;
};
static void
do_build_attachment (CamelFolder *folder, GPtrArray *uids, GPtrArray *messages, void *data)
{
struct _build_data *d = data;
CamelMultipart *multipart;
CamelMimePart *part;
char *subject;
int i;
if (messages->len == 0) {
d->done(folder, messages, NULL, NULL, d->data);
g_free(d);
return;
}
if (messages->len == 1) {
part = mail_tool_make_message_attachment(messages->pdata[0]);
} else {
multipart = camel_multipart_new();
camel_data_wrapper_set_mime_type(CAMEL_DATA_WRAPPER (multipart), "multipart/digest");
camel_multipart_set_boundary(multipart, NULL);
for (i=0;i<messages->len;i++) {
part = mail_tool_make_message_attachment(messages->pdata[i]);
camel_multipart_add_part(multipart, part);
camel_object_unref((CamelObject *)part);
}
part = camel_mime_part_new();
camel_medium_set_content_object(CAMEL_MEDIUM (part), CAMEL_DATA_WRAPPER(multipart));
camel_object_unref((CamelObject *)multipart);
camel_mime_part_set_description(part, _("Forwarded messages"));
}
subject = mail_tool_generate_forward_subject(messages->pdata[0]);
d->done(folder, messages, part, subject, d->data);
g_free(subject);
camel_object_unref((CamelObject *)part);
g_free(d);
}
void
mail_build_attachment(CamelFolder *folder, GPtrArray *uids,
void (*done)(CamelFolder *folder, GPtrArray *messages, CamelMimePart *part, char *subject, void *data), void *data)
{
struct _build_data *d;
d = g_malloc(sizeof(*d));
d->done = done;
d->data = data;
mail_get_messages(folder, uids, do_build_attachment, d);
}
/* ** LOAD FOLDER ********************************************************* */
/* there hsould be some way to merge this and create folder, since both can
presumably create a folder ... */
struct _get_folder_msg {
struct _mail_msg msg;
char *uri;
guint32 flags;
CamelFolder *folder;
void (*done) (char *uri, CamelFolder *folder, void *data);
void *data;
};
static char *
get_folder_desc (struct _mail_msg *mm, int done)
{
struct _get_folder_msg *m = (struct _get_folder_msg *)mm;
return g_strdup_printf(_("Opening folder %s"), m->uri);
}
static void
get_folder_get (struct _mail_msg *mm)
{
struct _get_folder_msg *m = (struct _get_folder_msg *)mm;
m->folder = mail_tool_uri_to_folder (m->uri, m->flags, &mm->ex);
}
static void
get_folder_got (struct _mail_msg *mm)
{
struct _get_folder_msg *m = (struct _get_folder_msg *)mm;
if (m->done)
m->done (m->uri, m->folder, m->data);
}
static void
get_folder_free (struct _mail_msg *mm)
{
struct _get_folder_msg *m = (struct _get_folder_msg *)mm;
g_free (m->uri);
if (m->folder)
camel_object_unref (CAMEL_OBJECT (m->folder));
}
static struct _mail_msg_op get_folder_op = {
get_folder_desc,
get_folder_get,
get_folder_got,
get_folder_free,
};
int
mail_get_folder (const char *uri, guint32 flags,
void (*done)(char *uri, CamelFolder *folder, void *data),
void *data, EThread *thread)
{
struct _get_folder_msg *m;
int id;
m = mail_msg_new(&get_folder_op, NULL, sizeof(*m));
m->uri = g_strdup (uri);
m->flags = flags;
m->data = data;
m->done = done;
id = m->msg.seq;
e_thread_put(thread, (EMsg *)m);
return id;
}
/* ** GET STORE ******************************************************* */
struct _get_store_msg {
struct _mail_msg msg;
char *uri;
CamelStore *store;
void (*done) (char *uri, CamelStore *store, void *data);
void *data;
};
static char *
get_store_desc (struct _mail_msg *mm, int done)
{
struct _get_store_msg *m = (struct _get_store_msg *)mm;
return g_strdup_printf(_("Opening store %s"), m->uri);
}
static void
get_store_get (struct _mail_msg *mm)
{
struct _get_store_msg *m = (struct _get_store_msg *)mm;
m->store = camel_session_get_store (session, m->uri, &mm->ex);
}
static void
get_store_got (struct _mail_msg *mm)
{
struct _get_store_msg *m = (struct _get_store_msg *)mm;
if (m->done)
m->done (m->uri, m->store, m->data);
}
static void
get_store_free (struct _mail_msg *mm)
{
struct _get_store_msg *m = (struct _get_store_msg *)mm;
g_free (m->uri);
if (m->store)
camel_object_unref (CAMEL_OBJECT (m->store));
}
static struct _mail_msg_op get_store_op = {
get_store_desc,
get_store_get,
get_store_got,
get_store_free,
};
int
mail_get_store (const char *uri, void (*done) (char *uri, CamelStore *store, void *data), void *data)
{
struct _get_store_msg *m;
int id;
m = mail_msg_new (&get_store_op, NULL, sizeof (*m));
m->uri = g_strdup (uri);
m->data = data;
m->done = done;
id = m->msg.seq;
e_thread_put (mail_thread_new, (EMsg *)m);
return id;
}
/* ** REMOVE FOLDER ******************************************************* */
struct _remove_folder_msg {
struct _mail_msg msg;
char *uri;
gboolean removed;
void (*done) (char *uri, gboolean removed, void *data);
void *data;
};
static char *
remove_folder_desc (struct _mail_msg *mm, int done)
{
struct _remove_folder_msg *m = (struct _remove_folder_msg *)mm;
return g_strdup_printf (_("Removing folder %s"), m->uri);
}
static void
remove_folder_get (struct _mail_msg *mm)
{
struct _remove_folder_msg *m = (struct _remove_folder_msg *)mm;
CamelStore *store;
CamelFolder *folder;
GPtrArray *uids;
int i;
m->removed = FALSE;
folder = mail_tool_uri_to_folder (m->uri, 0, &mm->ex);
if (!folder)
return;
store = folder->parent_store;
/* Delete every message in this folder, then expunge it */
uids = camel_folder_get_uids (folder);
camel_folder_freeze(folder);
for (i = 0; i < uids->len; i++)
camel_folder_delete_message (folder, uids->pdata[i]);
camel_folder_sync (folder, TRUE, NULL);
camel_folder_thaw(folder);
camel_folder_free_uids (folder, uids);
/* if the store supports subscriptions, unsubscribe from this folder... */
if (camel_store_supports_subscriptions (store))
camel_store_unsubscribe_folder (store, folder->full_name, NULL);
/* Then delete the folder from the store */
camel_store_delete_folder (store, folder->full_name, &mm->ex);
m->removed = !camel_exception_is_set (&mm->ex);
camel_object_unref (CAMEL_OBJECT (folder));
}
static void
remove_folder_got (struct _mail_msg *mm)
{
struct _remove_folder_msg *m = (struct _remove_folder_msg *)mm;
if (m->removed) {
/* FIXME: Remove this folder from the folder cache ??? */
}
if (m->done)
m->done (m->uri, m->removed, m->data);
}
static void
remove_folder_free (struct _mail_msg *mm)
{
struct _remove_folder_msg *m = (struct _remove_folder_msg *)mm;
g_free (m->uri);
}
static struct _mail_msg_op remove_folder_op = {
remove_folder_desc,
remove_folder_get,
remove_folder_got,
remove_folder_free,
};
void
mail_remove_folder (const char *uri, void (*done) (char *uri, gboolean removed, void *data), void *data)
{
struct _remove_folder_msg *m;
m = mail_msg_new (&remove_folder_op, NULL, sizeof (*m));
m->uri = g_strdup (uri);
m->data = data;
m->done = done;
e_thread_put (mail_thread_new, (EMsg *)m);
}
/* ** SYNC FOLDER ********************************************************* */
struct _sync_folder_msg {
struct _mail_msg msg;
CamelFolder *folder;
void (*done) (CamelFolder *folder, void *data);
void *data;
};
static char *sync_folder_desc(struct _mail_msg *mm, int done)
{
struct _sync_folder_msg *m = (struct _sync_folder_msg *)mm;
return g_strdup_printf (_("Storing folder \'%s\'"),
camel_folder_get_full_name (m->folder));
}
static void sync_folder_sync(struct _mail_msg *mm)
{
struct _sync_folder_msg *m = (struct _sync_folder_msg *)mm;
camel_folder_sync(m->folder, FALSE, &mm->ex);
}
static void sync_folder_synced(struct _mail_msg *mm)
{
struct _sync_folder_msg *m = (struct _sync_folder_msg *)mm;
if (m->done)
m->done(m->folder, m->data);
}
static void sync_folder_free(struct _mail_msg *mm)
{
struct _sync_folder_msg *m = (struct _sync_folder_msg *)mm;
camel_object_unref((CamelObject *)m->folder);
}
static struct _mail_msg_op sync_folder_op = {
sync_folder_desc,
sync_folder_sync,
sync_folder_synced,
sync_folder_free,
};
void
mail_sync_folder(CamelFolder *folder, void (*done) (CamelFolder *folder, void *data), void *data)
{
struct _sync_folder_msg *m;
m = mail_msg_new(&sync_folder_op, NULL, sizeof(*m));
m->folder = folder;
camel_object_ref((CamelObject *)folder);
m->data = data;
m->done = done;
e_thread_put(mail_thread_queued, (EMsg *)m);
}
/* ******************************************************************************** */
static char *refresh_folder_desc(struct _mail_msg *mm, int done)
{
return g_strdup(_("Refreshing folder"));
}
static void refresh_folder_refresh(struct _mail_msg *mm)
{
struct _sync_folder_msg *m = (struct _sync_folder_msg *)mm;
camel_folder_refresh_info(m->folder, &mm->ex);
}
/* we just use the sync stuff where we can, since it would be the same */
static struct _mail_msg_op refresh_folder_op = {
refresh_folder_desc,
refresh_folder_refresh,
sync_folder_synced,
sync_folder_free,
};
void
mail_refresh_folder(CamelFolder *folder, void (*done) (CamelFolder *folder, void *data), void *data)
{
struct _sync_folder_msg *m;
m = mail_msg_new(&refresh_folder_op, NULL, sizeof(*m));
m->folder = folder;
camel_object_ref((CamelObject *)folder);
m->data = data;
m->done = done;
e_thread_put(mail_thread_new, (EMsg *)m);
}
/* ******************************************************************************** */
static char *expunge_folder_desc(struct _mail_msg *mm, int done)
{
return g_strdup(_("Expunging folder"));
}
static void expunge_folder_expunge(struct _mail_msg *mm)
{
struct _sync_folder_msg *m = (struct _sync_folder_msg *)mm;
camel_folder_expunge(m->folder, &mm->ex);
}
/* we just use the sync stuff where we can, since it would be the same */
static struct _mail_msg_op expunge_folder_op = {
expunge_folder_desc,
expunge_folder_expunge,
sync_folder_synced,
sync_folder_free,
};
void
mail_expunge_folder(CamelFolder *folder, void (*done) (CamelFolder *folder, void *data), void *data)
{
struct _sync_folder_msg *m;
m = mail_msg_new(&expunge_folder_op, NULL, sizeof(*m));
m->folder = folder;
camel_object_ref((CamelObject *)folder);
m->data = data;
m->done = done;
e_thread_put(mail_thread_new, (EMsg *)m);
}
/* ** GET MESSAGE(s) ***************************************************** */
struct _get_message_msg {
struct _mail_msg msg;
CamelFolder *folder;
char *uid;
void (*done) (CamelFolder *folder, char *uid, CamelMimeMessage *msg, void *data);
void *data;
CamelMimeMessage *message;
CamelOperation *cancel;
};
static char *get_message_desc(struct _mail_msg *mm, int done)
{
struct _get_message_msg *m = (struct _get_message_msg *)mm;
return g_strdup_printf(_("Retrieving message %s"), m->uid);
}
static void get_message_get(struct _mail_msg *mm)
{
struct _get_message_msg *m = (struct _get_message_msg *)mm;
m->message = camel_folder_get_message(m->folder, m->uid, &mm->ex);
}
static void get_message_got(struct _mail_msg *mm)
{
struct _get_message_msg *m = (struct _get_message_msg *)mm;
if (m->done)
m->done(m->folder, m->uid, m->message, m->data);
}
static void get_message_free(struct _mail_msg *mm)
{
struct _get_message_msg *m = (struct _get_message_msg *)mm;
g_free(m->uid);
camel_object_unref((CamelObject *)m->folder);
camel_operation_unref(m->cancel);
}
static struct _mail_msg_op get_message_op = {
get_message_desc,
get_message_get,
get_message_got,
get_message_free,
};
void
mail_get_message(CamelFolder *folder, const char *uid, void (*done) (CamelFolder *folder, char *uid, CamelMimeMessage *msg, void *data), void *data, EThread *thread)
{
struct _get_message_msg *m;
m = mail_msg_new(&get_message_op, NULL, sizeof(*m));
m->folder = folder;
camel_object_ref((CamelObject *)folder);
m->uid = g_strdup(uid);
m->data = data;
m->done = done;
m->cancel = camel_operation_new(NULL, NULL);
e_thread_put(thread, (EMsg *)m);
}
/* ********************************************************************** */
struct _get_messages_msg {
struct _mail_msg msg;
CamelFolder *folder;
GPtrArray *uids;
GPtrArray *messages;
void (*done) (CamelFolder *folder, GPtrArray *uids, GPtrArray *msgs, void *data);
void *data;
};
static char * get_messages_desc(struct _mail_msg *mm, int done)
{
struct _get_messages_msg *m = (struct _get_messages_msg *)mm;
return g_strdup_printf(_("Retrieving %d message(s)"), m->uids->len);
}
static void get_messages_get(struct _mail_msg *mm)
{
struct _get_messages_msg *m = (struct _get_messages_msg *)mm;
int i;
CamelMimeMessage *message;
for (i=0; i<m->uids->len; i++) {
int pc = ((i+1) * 100) / m->uids->len;
message = camel_folder_get_message(m->folder, m->uids->pdata[i], &mm->ex);
camel_operation_progress(mm->cancel, pc);
if (message == NULL)
break;
g_ptr_array_add(m->messages, message);
}
}
static void get_messages_got(struct _mail_msg *mm)
{
struct _get_messages_msg *m = (struct _get_messages_msg *)mm;
if (m->done)
m->done(m->folder, m->uids, m->messages, m->data);
}
static void get_messages_free(struct _mail_msg *mm)
{
struct _get_messages_msg *m = (struct _get_messages_msg *)mm;
int i;
for (i=0;i<m->uids->len;i++)
g_free(m->uids->pdata[i]);
g_ptr_array_free(m->uids, TRUE);
for (i=0;i<m->messages->len;i++) {
if (m->messages->pdata[i])
camel_object_unref((CamelObject *)m->messages->pdata[i]);
}
g_ptr_array_free(m->messages, TRUE);
camel_object_unref((CamelObject *)m->folder);
}
static struct _mail_msg_op get_messages_op = {
get_messages_desc,
get_messages_get,
get_messages_got,
get_messages_free,
};
void
mail_get_messages(CamelFolder *folder, GPtrArray *uids,
void (*done) (CamelFolder *folder, GPtrArray *uids, GPtrArray *msgs, void *data),
void *data)
{
struct _get_messages_msg *m;
m = mail_msg_new(&get_messages_op, NULL, sizeof(*m));
m->folder = folder;
camel_object_ref((CamelObject *)folder);
m->uids = uids;
m->messages = g_ptr_array_new();
m->data = data;
m->done = done;
e_thread_put(mail_thread_new, (EMsg *)m);
}
/* ** SAVE MESSAGES ******************************************************* */
struct _save_messages_msg {
struct _mail_msg msg;
CamelFolder *folder;
GPtrArray *uids;
char *path;
void (*done)(CamelFolder *folder, GPtrArray *uids, char *path, void *data);
void *data;
};
static char *save_messages_desc(struct _mail_msg *mm, int done)
{
struct _save_messages_msg *m = (struct _save_messages_msg *)mm;
return g_strdup_printf(_("Saving %d messsage(s)"), m->uids->len);
}
/* tries to build a From line, based on message headers */
/* this is a copy directly from camel-mbox-summary.c */
static char *tz_months[] = {
"Jan", "Feb", "Mar", "Apr", "May", "Jun",
"Jul", "Aug", "Sep", "Oct", "Nov", "Dec"
};
static char *tz_days[] = {
"Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"
};
static char *
build_from(struct _header_raw *header)
{
GString *out = g_string_new("From ");
char *ret;
const char *tmp;
time_t thetime;
int offset;
struct tm tm;
tmp = header_raw_find(&header, "Sender", NULL);
if (tmp == NULL)
tmp = header_raw_find(&header, "From", NULL);
if (tmp != NULL) {
struct _header_address *addr = header_address_decode(tmp);
tmp = NULL;
if (addr) {
if (addr->type == HEADER_ADDRESS_NAME) {
g_string_append(out, addr->v.addr);
tmp = "";
}
header_address_unref(addr);
}
}
if (tmp == NULL)
g_string_append(out, "unknown@nodomain.now.au");
/* try use the received header to get the date */
tmp = header_raw_find(&header, "Received", NULL);
if (tmp) {
tmp = strrchr(tmp, ';');
if (tmp)
tmp++;
}
/* if there isn't one, try the Date field */
if (tmp == NULL)
tmp = header_raw_find(&header, "Date", NULL);
thetime = header_decode_date(tmp, &offset);
thetime += ((offset / 100) * (60 * 60)) + (offset % 100) * 60;
gmtime_r(&thetime, &tm);
g_string_sprintfa(out, " %s %s %d %02d:%02d:%02d %4d\n",
tz_days[tm.tm_wday],
tz_months[tm.tm_mon], tm.tm_mday, tm.tm_hour, tm.tm_min, tm.tm_sec, tm.tm_year + 1900);
ret = out->str;
g_string_free(out, FALSE);
return ret;
}
static void
save_prepare_part (CamelMimePart *mime_part)
{
CamelDataWrapper *wrapper;
int parts, i;
wrapper = camel_medium_get_content_object (CAMEL_MEDIUM (mime_part));
if (!wrapper)
return;
if (CAMEL_IS_MULTIPART (wrapper)) {
parts = camel_multipart_get_number (CAMEL_MULTIPART (wrapper));
for (i = 0; i < parts; i++) {
CamelMimePart *part = camel_multipart_get_part (CAMEL_MULTIPART (wrapper), i);
save_prepare_part (part);
}
} else {
if (CAMEL_IS_MIME_MESSAGE (wrapper)) {
/* prepare the message parts' subparts */
save_prepare_part (CAMEL_MIME_PART (wrapper));
} else {
CamelContentType *type;
/* We want to save textual parts as 8bit instead of encoded */
type = camel_data_wrapper_get_mime_type_field (wrapper);
if (header_content_type_is (type, "text", "*"))
camel_mime_part_set_encoding (mime_part, CAMEL_MIME_PART_ENCODING_8BIT);
}
}
}
static void
save_messages_save (struct _mail_msg *mm)
{
struct _save_messages_msg *m = (struct _save_messages_msg *)mm;
CamelStreamFilter *filtered_stream;
CamelMimeFilterFrom *from_filter;
CamelStream *stream;
int fd, i;
char *from;
fd = open (m->path, O_WRONLY | O_CREAT | O_TRUNC, 0666);
if (fd == -1) {
camel_exception_setv(&mm->ex, CAMEL_EXCEPTION_SYSTEM,
_("Unable to create output file: %s\n %s"), m->path, strerror(errno));
return;
}
stream = camel_stream_fs_new_with_fd(fd);
from_filter = camel_mime_filter_from_new();
filtered_stream = camel_stream_filter_new_with_stream(stream);
camel_stream_filter_add(filtered_stream, (CamelMimeFilter *)from_filter);
camel_object_unref((CamelObject *)from_filter);
for (i=0; i<m->uids->len; i++) {
CamelMimeMessage *message;
int pc = ((i+1) * 100) / m->uids->len;
message = camel_folder_get_message(m->folder, m->uids->pdata[i], &mm->ex);
camel_operation_progress(mm->cancel, pc);
if (message == NULL)
break;
save_prepare_part (CAMEL_MIME_PART (message));
/* we need to flush after each stream write since we are writing to the same fd */
from = build_from(((CamelMimePart *)message)->headers);
if (camel_stream_write_string(stream, from) == -1
|| camel_stream_flush(stream) == -1
|| camel_data_wrapper_write_to_stream((CamelDataWrapper *)message, (CamelStream *)filtered_stream) == -1
|| camel_stream_flush((CamelStream *)filtered_stream) == -1) {
camel_exception_setv(&mm->ex, CAMEL_EXCEPTION_SYSTEM,
_("Error saving messages to: %s:\n %s"), m->path, strerror(errno));
g_free(from);
camel_object_unref((CamelObject *)message);
break;
}
g_free(from);
camel_object_unref((CamelObject *)message);
}
camel_object_unref((CamelObject *)filtered_stream);
camel_object_unref((CamelObject *)stream);
}
static void save_messages_saved(struct _mail_msg *mm)
{
struct _save_messages_msg *m = (struct _save_messages_msg *)mm;
if (m->done)
m->done(m->folder, m->uids, m->path, m->data);
}
static void save_messages_free(struct _mail_msg *mm)
{
struct _save_messages_msg *m = (struct _save_messages_msg *)mm;
int i;
for (i=0;i<m->uids->len;i++)
g_free(m->uids->pdata[i]);
g_ptr_array_free(m->uids, TRUE);
camel_object_unref((CamelObject *)m->folder);
g_free(m->path);
}
static struct _mail_msg_op save_messages_op = {
save_messages_desc,
save_messages_save,
save_messages_saved,
save_messages_free,
};
int
mail_save_messages(CamelFolder *folder, GPtrArray *uids, const char *path,
void (*done) (CamelFolder *folder, GPtrArray *uids, char *path, void *data), void *data)
{
struct _save_messages_msg *m;
int id;
m = mail_msg_new(&save_messages_op, NULL, sizeof(*m));
m->folder = folder;
camel_object_ref((CamelObject *)folder);
m->uids = uids;
m->path = g_strdup(path);
m->data = data;
m->done = done;
id = m->msg.seq;
e_thread_put(mail_thread_new, (EMsg *)m);
return id;
}
/* ** SAVE PART ******************************************************* */
struct _save_part_msg {
struct _mail_msg msg;
CamelMimePart *part;
char *path;
void (*done)(CamelMimePart *part, char *path, int saved, void *data);
void *data;
};
static char *save_part_desc(struct _mail_msg *mm, int done)
{
return g_strdup(_("Saving attachment"));
}
static void
save_part_save (struct _mail_msg *mm)
{
struct _save_part_msg *m = (struct _save_part_msg *)mm;
CamelMimeFilterCharset *charsetfilter;
CamelContentType *content_type;
CamelStreamFilter *filtered_stream;
CamelStream *stream_fs;
CamelDataWrapper *data;
const char *charset;
stream_fs = camel_stream_fs_new_with_name (m->path, O_WRONLY | O_CREAT | O_TRUNC, 0600);
if (stream_fs == NULL) {
camel_exception_setv (&mm->ex, 1, _("Cannot create output file: %s:\n %s"), m->path,
g_strerror (errno));
return;
}
/* we only convert text/ parts, and we only convert if we have to
null charset param == us-ascii == utf8 always, and utf8 == utf8 obviously */
/* this will also let "us-ascii that isn't really" parts pass out in
proper format, without us trying to treat it as what it isn't, which is
the same algorithm camel uses */
data = camel_medium_get_content_object (CAMEL_MEDIUM (m->part));
content_type = camel_mime_part_get_content_type (m->part);
if (header_content_type_is (content_type, "text", "*")
&& (charset = header_content_type_param (content_type, "charset"))
&& g_strcasecmp (charset, "utf-8") != 0) {
charsetfilter = camel_mime_filter_charset_new_convert ("utf-8", charset);
filtered_stream = camel_stream_filter_new_with_stream (stream_fs);
if (charsetfilter) {
camel_stream_filter_add (filtered_stream, CAMEL_MIME_FILTER (charsetfilter));
camel_object_unref (CAMEL_OBJECT (charsetfilter));
}
} else {
/* no we can't use a CAMEL_BLAH() cast here, since its not true, HOWEVER
we only treat it as a normal stream from here on, so it is OK */
filtered_stream = (CamelStreamFilter *)stream_fs;
camel_object_ref (CAMEL_OBJECT (stream_fs));
}
if (camel_data_wrapper_write_to_stream (data, CAMEL_STREAM (filtered_stream)) == -1
|| camel_stream_flush (CAMEL_STREAM (filtered_stream)) == -1)
camel_exception_setv (&mm->ex, 1, _("Could not write data: %s"), g_strerror (errno));
camel_object_unref (CAMEL_OBJECT (filtered_stream));
camel_object_unref (CAMEL_OBJECT (stream_fs));
}
static void
save_part_saved (struct _mail_msg *mm)
{
struct _save_part_msg *m = (struct _save_part_msg *)mm;
if (m->done)
m->done (m->part, m->path, !camel_exception_is_set (&mm->ex), m->data);
}
static void
save_part_free (struct _mail_msg *mm)
{
struct _save_part_msg *m = (struct _save_part_msg *)mm;
camel_object_unref (CAMEL_OBJECT (m->part));
g_free (m->path);
}
static struct _mail_msg_op save_part_op = {
save_part_desc,
save_part_save,
save_part_saved,
save_part_free,
};
int
mail_save_part (CamelMimePart *part, const char *path,
void (*done)(CamelMimePart *part, char *path, int saved, void *data), void *data)
{
struct _save_part_msg *m;
int id;
m = mail_msg_new (&save_part_op, NULL, sizeof (*m));
m->part = part;
camel_object_ref (CAMEL_OBJECT (part));
m->path = g_strdup (path);
m->data = data;
m->done = done;
id = m->msg.seq;
e_thread_put (mail_thread_queued, (EMsg *)m);
return id;
}
/* ** GO OFFLINE ***************************************************** */
struct _set_offline_msg {
struct _mail_msg msg;
CamelStore *store;
gboolean offline;
void (*done)(CamelStore *store, void *data);
void *data;
};
static char *set_offline_desc(struct _mail_msg *mm, int done)
{
struct _set_offline_msg *m = (struct _set_offline_msg *)mm;
char *service_name = camel_service_get_name (CAMEL_SERVICE (m->store), TRUE);
char *msg;
msg = g_strdup_printf (m->offline ? _("Disconnecting from %s") :
_("Reconnecting to %s"), service_name);
g_free (service_name);
return msg;
}
static void set_offline_do(struct _mail_msg *mm)
{
struct _set_offline_msg *m = (struct _set_offline_msg *)mm;
if (!CAMEL_IS_DISCO_STORE (m->store) ||
!camel_disco_store_can_work_offline (CAMEL_DISCO_STORE (m->store))) {
if (m->offline) {
camel_service_disconnect (CAMEL_SERVICE (m->store),
TRUE, &mm->ex);
}
return;
}
if (m->offline && camel_disco_store_status (CAMEL_DISCO_STORE (m->store)) == CAMEL_DISCO_STORE_ONLINE) {
CamelFolder *inbox;
/* FIXME. Something more generic here... (bug 10755) */
inbox = camel_store_get_inbox (m->store, NULL);
if (inbox) {
camel_disco_folder_prepare_for_offline (
CAMEL_DISCO_FOLDER (inbox),
"(match-all (not (system-flag \"Seen\")))",
&mm->ex);
camel_folder_sync (inbox, FALSE, NULL);
camel_object_unref (CAMEL_OBJECT (inbox));
if (camel_exception_is_set (&mm->ex))
return;
}
}
camel_disco_store_set_status (CAMEL_DISCO_STORE (m->store),
m->offline ? CAMEL_DISCO_STORE_OFFLINE :
CAMEL_DISCO_STORE_ONLINE, &mm->ex);
}
static void set_offline_done(struct _mail_msg *mm)
{
struct _set_offline_msg *m = (struct _set_offline_msg *)mm;
if (m->done)
m->done(m->store, m->data);
}
static void set_offline_free(struct _mail_msg *mm)
{
struct _set_offline_msg *m = (struct _set_offline_msg *)mm;
camel_object_unref((CamelObject *)m->store);
}
static struct _mail_msg_op set_offline_op = {
set_offline_desc,
set_offline_do,
set_offline_done,
set_offline_free,
};
void
mail_store_set_offline (CamelStore *store, gboolean offline,
void (*done)(CamelStore *, void *data),
void *data)
{
struct _set_offline_msg *m;
/* Cancel any pending connect first so the set_offline_op
* thread won't get queued behind a hung connect op.
*/
if (offline)
camel_service_cancel_connect (CAMEL_SERVICE (store));
m = mail_msg_new(&set_offline_op, NULL, sizeof(*m));
m->store = store;
camel_object_ref((CamelObject *)store);
m->offline = offline;
m->data = data;
m->done = done;
e_thread_put(mail_thread_queued, (EMsg *)m);
}