path: root/mail/mail-callbacks.c

/* -*- 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@helixcode.com>
 *  Peter Williams <peterw@helixcode.com>
 *  Jeffrey Stedfast <fejj@helixcode.com>
 *
 * Copyright 2000 Helix Code, Inc. (http://www.helixcode.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
 */

#include <config.h>
#include <errno.h>
#include <gnome.h>
#include <libgnomeprint/gnome-print-master.h>
#include <libgnomeprint/gnome-print-master-preview.h>
#include "mail.h"
#include "mail-config.h"
#include "mail-threads.h"
#include "mail-tools.h"
#include "mail-ops.h"
#include "mail-local.h"
#include "folder-browser.h"
#include "subscribe-control.h"
#include "filter/filter-editor.h"
#include "filter/filter-driver.h"
#include <gal/e-table/e-table.h>

/* FIXME: is there another way to do this? */
#include "Evolution.h"
#include "evolution-storage.h"

#include "evolution-shell-client.h"

#ifndef HAVE_MKSTEMP
#include <fcntl.h>
#include <sys/stat.h>
#endif

struct post_send_data {
    CamelFolder *folder;
    gchar *uid;
    guint32 flags;
};

static gboolean
check_configured (FolderBrowser *fb)
{
    if (mail_config_is_configured ())
        return TRUE;
    
    if (fb) {
        GtkWidget *dialog;
        
        dialog = gnome_message_box_new (_("You have not configured the mail client.\n"
                          "You need to do this before you can send,\n"
                          "receive or compose mail.\n"
                          "Would you like to configure it now?"),
                        GNOME_MESSAGE_BOX_QUESTION,
                        GNOME_STOCK_BUTTON_YES,
                        GNOME_STOCK_BUTTON_NO, NULL);
        gnome_dialog_set_parent (GNOME_DIALOG (dialog),
                     GTK_WINDOW (gtk_widget_get_ancestor (GTK_WIDGET(fb), GTK_TYPE_WINDOW)));
        
        switch (gnome_dialog_run_and_close (GNOME_DIALOG (dialog))) {
        case 0:
            mail_config_druid (fb->shell);
            break;
        case 1:
        default:
            break;
        }
        
        return mail_config_is_configured ();
    } else
        return FALSE;
}

static gboolean
check_send_configuration (FolderBrowser *fb)
{
    MailConfigService *xport = NULL;
    
    /* Check general */
    
    if (!check_configured (fb)) {
        return FALSE;
    }
    
    /* Check for an identity */
    
    if (!mail_config_get_default_identity ()) {
        GtkWidget *message;
        
        message = gnome_warning_dialog_parented (_("You need to configure an identity\n"
                               "before you can compose mail."),
                             GTK_WINDOW (gtk_widget_get_ancestor (GTK_WIDGET (fb),
                                                  GTK_TYPE_WINDOW)));
        gnome_dialog_run_and_close (GNOME_DIALOG (message));
        return FALSE;
    }
    
    /* Check for a transport */
    
    xport = mail_config_get_transport ();
    if (!xport || !xport->url) {
        GtkWidget *message;
        
        message = gnome_warning_dialog_parented (_("You need to configure a mail transport\n"
                               "before you can compose mail."),
                             GTK_WINDOW (gtk_widget_get_ancestor (GTK_WIDGET (fb),
                                                  GTK_TYPE_WINDOW)));
        gnome_dialog_run_and_close (GNOME_DIALOG (message));
        return FALSE;
    }
    
    return TRUE;
}

static void
main_select_first_unread (CamelObject *object, gpointer event_data, gpointer data)
{
    FolderBrowser *fb = FOLDER_BROWSER (data);
    /*ETable *table = E_TABLE_SCROLLED (fb->message_list->etable)->table;*/
    
    message_list_select (fb->message_list, -1, MESSAGE_LIST_SELECT_NEXT,
                 0, CAMEL_MESSAGE_SEEN);
}

static void
select_first_unread (CamelObject *object, gpointer event_data, gpointer data)
{
    mail_op_forward_event (main_select_first_unread, object, event_data, data);
}

void
fetch_mail (GtkWidget *widget, gpointer user_data)
{
    GSList *sources;
    
    if (!check_configured (FOLDER_BROWSER (user_data))) {
        GtkWidget *win = gtk_widget_get_ancestor (GTK_WIDGET (user_data),
                              GTK_TYPE_WINDOW);
        
        gnome_error_dialog_parented ("You have no mail sources "
                         "configured", GTK_WINDOW (win));
        return;
    }
    
    sources = mail_config_get_sources ();
    
    if (!sources || !sources->data) {
        GtkWidget *win = gtk_widget_get_ancestor (GTK_WIDGET (user_data),
                              GTK_TYPE_WINDOW);
        
        gnome_error_dialog_parented ("You have no mail sources "
                         "configured", GTK_WINDOW (win));
        return;
    }
    
    while (sources) {
        MailConfigService *source;
        
        source = (MailConfigService *) sources->data;
        sources = sources->next;
        
        if (!source || !source->url) {
            g_warning ("Bad source in fetch_mail??");
            continue;
        }
        
        mail_do_fetch_mail (source->url, source->keep_on_server, 
                    NULL, select_first_unread, user_data);
    }
}

void
send_queued_mail (GtkWidget *widget, gpointer user_data)
{
    extern CamelFolder *outbox_folder;
    MailConfigService *transport;
    
    if (!mail_config_is_configured ()) {
        return;
    }
    
    transport = mail_config_get_transport ();
    if (!transport) {
        GtkWidget *win = gtk_widget_get_ancestor (GTK_WIDGET (user_data),
                              GTK_TYPE_WINDOW);
        
        gnome_error_dialog_parented ("You have not set a transport method",
                         GTK_WINDOW (win));
        return;
    }
    
    if (!outbox_folder) {
        GtkWidget *win = gtk_widget_get_ancestor (GTK_WIDGET (user_data),
                              GTK_TYPE_WINDOW);
        
        gnome_error_dialog_parented ("You have no Outbox configured",
                         GTK_WINDOW (win));
        return;
    }
    
    mail_do_send_queue (outbox_folder, transport->url);
    
    mail_do_expunge_folder (outbox_folder);
}

void
send_receieve_mail (GtkWidget *widget, gpointer user_data)
{
    send_queued_mail (widget, user_data);
    fetch_mail (widget, user_data);
}

static gboolean
ask_confirm_for_empty_subject (EMsgComposer *composer)
{
    GtkWidget *message_box;
    int button;
    
    message_box = gnome_message_box_new (_("This message has no subject.\nReally send?"),
                         GNOME_MESSAGE_BOX_QUESTION,
                         GNOME_STOCK_BUTTON_YES, GNOME_STOCK_BUTTON_NO,
                         NULL);
    
    button = gnome_dialog_run_and_close (GNOME_DIALOG (message_box));
    
    if (button == 0)
        return TRUE;
    else
        return FALSE;
}

static void
free_psd (GtkWidget *composer, gpointer user_data)
{
    struct post_send_data *psd = user_data;
    
    if (psd->folder)
        camel_object_unref (CAMEL_OBJECT (psd->folder));
    if (psd->uid)
        g_free (psd->uid);
    g_free (psd);
}

void
composer_send_cb (EMsgComposer *composer, gpointer data)
{
    MailConfigService *xport = NULL;
    CamelMimeMessage *message;
    const char *subject;
    struct post_send_data *psd = data;
    
    /* Config info */
    xport = mail_config_get_transport ();
    
    /* Get the message */
    message = e_msg_composer_get_message (composer);
    
    /* Check for no subject */
    subject = camel_mime_message_get_subject (message);
    if (subject == NULL || subject[0] == '\0') {
        if (!ask_confirm_for_empty_subject (composer)) {
            camel_object_unref (CAMEL_OBJECT (message));
            return;
        }
    }
    
    if (psd) {
        mail_do_send_mail (xport->url, message, 
                   psd->folder, psd->uid, psd->flags, 
                   GTK_WIDGET (composer));
    } else {
        mail_do_send_mail (xport->url, message, NULL, NULL, 0,
                   GTK_WIDGET (composer));
    }
}

void
composer_postpone_cb (EMsgComposer *composer, gpointer data)
{
    /* FIXME: do we want to use post_send_data to set flags and stuff? */
    extern CamelFolder *outbox_folder;
    CamelMimeMessage *message;
    struct post_send_data *psd = data;
    const char *subject;
    
    /* Get the message */
    message = e_msg_composer_get_message (composer);
    
    /* Check for no subject */
    subject = camel_mime_message_get_subject (message);
    if (subject == NULL || subject[0] == '\0') {
        if (!ask_confirm_for_empty_subject (composer)) {
            camel_object_unref (CAMEL_OBJECT (message));
            return;
        }
    }
    
    /* Save the message in Outbox */
    mail_do_append_mail (outbox_folder, message, NULL);
    
    if (psd) {
        guint32 set;
        
        set = camel_folder_get_message_flags (psd->folder, psd->uid);
        camel_folder_set_message_flags (psd->folder, psd->uid,
                        psd->flags, psd->flags);
    }
    
    gtk_widget_destroy (GTK_WIDGET (composer));
}

static GtkWidget *
create_msg_composer (const char *url)
{
       MailConfigIdentity *id;
       gboolean send_html;
       gchar *sig_file = NULL;
       EMsgComposer *composer;
       
       id = mail_config_get_default_identity ();
       send_html = mail_config_send_html ();
       
       if (id)
               sig_file = id->sig;
       
       if (url != NULL)
               composer = e_msg_composer_new_from_url (url);
       else
               composer = e_msg_composer_new_with_sig_file (sig_file);
       if (composer)
           e_msg_composer_set_send_html (composer, send_html);
       
       return (GtkWidget *)composer;
}

void
compose_msg (GtkWidget *widget, gpointer user_data)
{
    GtkWidget *composer;
    
    if (!check_send_configuration (FOLDER_BROWSER (user_data)))
        return;
    
    composer = create_msg_composer (NULL);
    if (!composer)
        return;
    
    gtk_signal_connect (GTK_OBJECT (composer), "send",
                GTK_SIGNAL_FUNC (composer_send_cb), NULL);
    gtk_signal_connect (GTK_OBJECT (composer), "postpone",
                GTK_SIGNAL_FUNC (composer_postpone_cb), NULL);
    
    gtk_widget_show (composer);
}

/* Send according to a mailto (RFC 2368) URL. */
void
send_to_url (const char *url)
{
    GtkWidget *composer;
    
    /* FIXME: no way to get folder browser? Not without
     * big pain in the ass, as far as I can tell */
    if (!check_send_configuration (NULL))
        return;
    
    composer = create_msg_composer (url);
    if (!composer)
        return;
    
    gtk_signal_connect (GTK_OBJECT (composer), "send",
                GTK_SIGNAL_FUNC (composer_send_cb), NULL);
    gtk_signal_connect (GTK_OBJECT (composer), "postpone",
                GTK_SIGNAL_FUNC (composer_postpone_cb), NULL);
    
    gtk_widget_show (composer);
}   

void
mail_reply (CamelFolder *folder, CamelMimeMessage *msg, const char *uid, gboolean to_all)
{
    EMsgComposer *composer;
    struct post_send_data *psd;
    
    /* FIXME: I just don't feel like implementing the folder-browser-passing
     * garbage. */
    if (!check_send_configuration (NULL) || !folder ||
        !msg || !uid)
        return;
    
    psd = g_new (struct post_send_data, 1);
    psd->folder = folder;
    camel_object_ref (CAMEL_OBJECT (psd->folder));
    psd->uid = g_strdup (uid);
    psd->flags = CAMEL_MESSAGE_ANSWERED;
    
    composer = mail_generate_reply (msg, to_all);
    if (!composer)
        return;
    
    gtk_signal_connect (GTK_OBJECT (composer), "send",
                GTK_SIGNAL_FUNC (composer_send_cb), psd);
    gtk_signal_connect (GTK_OBJECT (composer), "postpone",
                GTK_SIGNAL_FUNC (composer_postpone_cb), psd);
    gtk_signal_connect (GTK_OBJECT (composer), "destroy",
                GTK_SIGNAL_FUNC (free_psd), psd);
    
    gtk_widget_show (GTK_WIDGET (composer));    
}

void
reply_to_sender (GtkWidget *widget, gpointer user_data)
{
    FolderBrowser *fb = FOLDER_BROWSER (user_data);
    
    mail_reply (fb->folder, fb->mail_display->current_message, 
           fb->message_list->cursor_uid, FALSE);
}

void
reply_to_all (GtkWidget *widget, gpointer user_data)
{
    FolderBrowser *fb = FOLDER_BROWSER (user_data);
    
    mail_reply (fb->folder, fb->mail_display->current_message, 
           fb->message_list->cursor_uid, TRUE);
}

static void
enumerate_msg (MessageList *ml, const char *uid, gpointer data)
{
    g_ptr_array_add ((GPtrArray *) data, g_strdup (uid));
}


void
forward_msg (GtkWidget *widget, gpointer user_data)
{
    FolderBrowser *fb = FOLDER_BROWSER (user_data);
    EMsgComposer *composer;
    CamelMimeMessage *cursor_msg;
    GPtrArray *uids;
    
    cursor_msg = fb->mail_display->current_message;
    if (!check_send_configuration (fb) || !cursor_msg)
        return;
    
    composer = e_msg_composer_new ();
    if (!composer)
        return;
    
    uids = g_ptr_array_new();
    message_list_foreach (fb->message_list, enumerate_msg, uids);
    
    gtk_signal_connect (GTK_OBJECT (composer), "send",
                GTK_SIGNAL_FUNC (composer_send_cb), NULL);
    gtk_signal_connect (GTK_OBJECT (composer), "postpone",
                GTK_SIGNAL_FUNC (composer_postpone_cb), NULL);
    
    mail_do_forward_message (cursor_msg,
                 fb->message_list->folder,
                 uids,
                 composer);
}

static void
transfer_msg (GtkWidget *widget, gpointer user_data, gboolean delete_from_source)
{
    FolderBrowser *fb = user_data;
    MessageList *ml = fb->message_list;
    GPtrArray *uids;
    char *uri, *physical, *path;
    char *desc;
    const char *allowed_types[] = { "mail", NULL };
    extern EvolutionShellClient *global_shell_client;
    static char *last = NULL;
    
    if (last == NULL)
        last = g_strdup ("");
    
    if (delete_from_source)
        desc = _("Move message(s) to");
    else
        desc = _("Copy message(s) to");
    
    evolution_shell_client_user_select_folder  (global_shell_client,
                            desc,
                            last, allowed_types, &uri, &physical);
    if (!uri)
        return;
    
    path = strchr (uri, '/');
    if (path && strcmp (last, path) != 0) {
        g_free (last);
        last = g_strdup (path);
    }
    g_free (uri);
    
    uids = g_ptr_array_new ();
    message_list_foreach (ml, enumerate_msg, uids);
    mail_do_transfer_messages (ml->folder, uids, delete_from_source, physical);
}

void
move_msg (GtkWidget *widget, gpointer user_data)
{
    transfer_msg (widget, user_data, TRUE);
}

void
copy_msg (GtkWidget *widget, gpointer user_data)
{
    transfer_msg (widget, user_data, FALSE);
}

void
select_all (BonoboUIHandler *uih, void *user_data, const char *path)
{
    FolderBrowser *fb = FOLDER_BROWSER (user_data);
        MessageList *ml = fb->message_list;
    
    if (ml->folder == NULL)
        return;
    
    message_list_select (ml, -1, MESSAGE_LIST_SELECT_NEXT, 0, 0);
    /* FIXME: when clahey codes select all for e-table, finish this */
    /* e_table_select_all (); */
}

void
unselect_all (BonoboUIHandler *uih, void *user_data, const char *path)
{
    FolderBrowser *fb = FOLDER_BROWSER (user_data);
        MessageList *ml = fb->message_list;
    
    if (ml->folder == NULL)
        return;
    
    /* FIXME: when clahey codes select all for e-table, finish this */
    /* e_table_unselect_all (); */
}

void
mark_as_seen (BonoboUIHandler *uih, void *user_data, const char *path)
{
        FolderBrowser *fb = FOLDER_BROWSER(user_data);
        MessageList *ml = fb->message_list;
    GPtrArray *uids;
    
    if (ml->folder == NULL)
        return;
    
    uids = g_ptr_array_new ();
    message_list_foreach (ml, enumerate_msg, uids);
    mail_do_flag_messages (ml->folder, uids, FALSE,
                   CAMEL_MESSAGE_SEEN, CAMEL_MESSAGE_SEEN);
}

void
mark_as_unseen (BonoboUIHandler *uih, void *user_data, const char *path)
{
        FolderBrowser *fb = FOLDER_BROWSER(user_data);
        MessageList *ml = fb->message_list;
    GPtrArray *uids;
    
    if (ml->folder == NULL)
        return;
    
    uids = g_ptr_array_new ();
    message_list_foreach (ml, enumerate_msg, uids);
    mail_do_flag_messages (ml->folder, uids, FALSE,
                   CAMEL_MESSAGE_SEEN, 0);
}
                   
void
edit_msg (GtkWidget *widget, gpointer user_data)
{
    FolderBrowser *fb = FOLDER_BROWSER (user_data);
    GPtrArray *uids;
    extern CamelFolder *drafts_folder;
    
    if (fb->folder != drafts_folder) {
        GtkWidget *message;
        
        message = gnome_warning_dialog (_("You may only edit messages saved\n"
                          "in the Drafts folder."));
        gnome_dialog_run_and_close (GNOME_DIALOG (message));
        return;
    }
    
    if (!check_send_configuration (fb))
        return;
    
    uids = g_ptr_array_new();
    message_list_foreach (fb->message_list, enumerate_msg, uids);
    
    /* FIXME: do we need to pass the postpone callback too? */
    mail_do_edit_messages (fb->folder, uids, (GtkSignalFunc) composer_send_cb);
}

void
delete_msg (GtkWidget *button, gpointer user_data)
{
    FolderBrowser *fb = user_data;
    MessageList *ml = fb->message_list;
    GPtrArray *uids;
    
    uids = g_ptr_array_new ();
    message_list_foreach (ml, enumerate_msg, uids);
    if (uids->len == 1) {
        guint32 flags;
        char *uid = uids->pdata[0];
        
        mail_tool_camel_lock_up ();
        flags = camel_folder_get_message_flags (ml->folder, uid);
        camel_folder_set_message_flags (ml->folder, uid,
                        CAMEL_MESSAGE_DELETED,
                        ~flags);
        mail_tool_camel_lock_down ();
    } else {
        mail_do_flag_messages (ml->folder, uids, TRUE,
                       CAMEL_MESSAGE_DELETED,
                       CAMEL_MESSAGE_DELETED);
    }
}

void
expunge_folder (BonoboUIHandler *uih, void *user_data, const char *path)
{
    FolderBrowser *fb = FOLDER_BROWSER(user_data);
    
    e_table_model_pre_change (fb->message_list->table_model);
    
    if (fb->message_list->folder)
        mail_do_expunge_folder (fb->message_list->folder);
}

static void
filter_druid_clicked (GtkWidget *w, int button, FolderBrowser *fb)
{
    FilterContext *fc;
    
    if (button == 0) {
        char *user;
        
        fc = gtk_object_get_data (GTK_OBJECT (w), "context");
        user = g_strdup_printf ("%s/filters.xml", evolution_dir);
        rule_context_save ((RuleContext *)fc, user);
        g_free (user);
    }
    
    if (button != -1) {
        gnome_dialog_close (GNOME_DIALOG (w));
    }
}

void
filter_edit (BonoboUIHandler *uih, void *user_data, const char *path)
{
    FolderBrowser *fb = FOLDER_BROWSER (user_data);
    FilterContext *fc;
    char *user, *system;
    GtkWidget *w;
    
    fc = filter_context_new();
    user = g_strdup_printf ("%s/filters.xml", evolution_dir);
    system = g_strdup_printf ("%s/evolution/filtertypes.xml", EVOLUTION_DATADIR);
    rule_context_load ((RuleContext *)fc, system, user, NULL, NULL);
    g_free (user);
    g_free (system);
    
    if (((RuleContext *)fc)->error) {
        GtkWidget *dialog;
        gchar *err;
        
        err = g_strdup_printf (_("Error loading filter information:\n"
                     "%s"), ((RuleContext *)fc)->error);
        dialog = gnome_warning_dialog (err);
        g_free (err);
        
        gnome_dialog_run_and_close (GNOME_DIALOG (dialog));
        return;
    }
    
    w = filter_editor_construct (fc);
    gtk_object_set_data_full (GTK_OBJECT (w), "context", fc, (GtkDestroyNotify)gtk_object_unref);
    gtk_signal_connect (GTK_OBJECT (w), "clicked", filter_druid_clicked, fb);
    gtk_widget_show (GTK_WIDGET (w));
}

void
vfolder_edit_vfolders (BonoboUIHandler *uih, void *user_data, const char *path)
{
        void vfolder_edit(void);
    
        vfolder_edit();
}

void
providers_config (BonoboUIHandler *uih, void *user_data, const char *path)
{
    mail_config ((FOLDER_BROWSER (user_data))->shell);
}

void
manage_subscriptions (BonoboUIHandler *uih, void *user_data, const char *path)
{
    /* XXX pass in the selected storage */
    GtkWidget *subscribe = subscribe_control_new ();

    gtk_widget_show (subscribe);
}

void
mail_print_msg (MailDisplay *md)
{
    GnomePrintMaster *print_master;
    GnomePrintContext *print_context;
    GtkWidget *preview;
    
    print_master = gnome_print_master_new ();
    
    print_context = gnome_print_master_get_context (print_master);
    gtk_html_print (md->html, print_context);
    
    preview = GTK_WIDGET (gnome_print_master_preview_new (
        print_master, "Mail Print Preview"));
    gtk_widget_show (preview);
    
    gtk_object_unref (GTK_OBJECT (print_master));
}

void
print_msg (GtkWidget *button, gpointer user_data)
{
    FolderBrowser *fb = user_data;
    
    mail_print_msg (fb->mail_display);
}

void
configure_folder(BonoboUIHandler *uih, void *user_data, const char *path)
{
    FolderBrowser *fb = FOLDER_BROWSER(user_data);
    
    local_reconfigure_folder(fb);
}

void
view_msg (GtkWidget *widget, gpointer user_data)
{
    FolderBrowser *fb = user_data;
    GPtrArray *uids;
    
    if (!fb->folder)
        return;
    
    uids = g_ptr_array_new ();
    message_list_foreach (fb->message_list, enumerate_msg, uids);
    mail_do_view_messages (fb->folder, uids, fb);
}

void
view_message (BonoboUIHandler *uih, void *user_data, const char *path)
{
        view_msg (NULL, user_data);
}

void
edit_message (BonoboUIHandler *uih, void *user_data, const char *path)
{
        edit_msg (NULL, user_data);
}

void
run_filter_ondemand (BonoboUIHandler *uih, gpointer user_data, const char *path)
{
    struct fb_ondemand_closure *oc = (struct fb_ondemand_closure *) user_data;
    
    if (oc->fb->folder == NULL)
        return;
    
    mail_do_filter_ondemand (oc->fb->filter_context, oc->fb->folder, oc->fb->folder);
}