aboutsummaryrefslogblamecommitdiffstats
path: root/mail/mail-preferences.c
blob: 51c6bbb500b89fb14cc02b6ac5f8f8c9ad24f876 (plain) (tree)





















































































































































































































































































































































































                                                                                                                           
/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
 *  Authors: Jeffrey Stedfast <fejj@ximian.com>
 *
 *  Copyright 2002 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 Street #330, Boston, MA 02111-1307, USA.
 *
 */


#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include "mail-preferences.h"

#include <gtkhtml/gtkhtml-properties.h>
#include "widgets/misc/e-charset-picker.h"

#include <bonobo/bonobo-generic-factory.h>

#include <camel/camel-pgp-context.h>

#include "mail-config.h"


static void mail_preferences_class_init (MailPreferencesClass *class);
static void mail_preferences_init       (MailPreferences *dialog);
static void mail_preferences_finalise   (GtkObject *obj);

static GtkVBoxClass *parent_class = NULL;


GtkType
mail_preferences_get_type (void)
{
    static GtkType type = 0;
    
    if (!type) {
        GtkTypeInfo type_info = {
            "MailPreferences",
            sizeof (MailPreferences),
            sizeof (MailPreferencesClass),
            (GtkClassInitFunc) mail_preferences_class_init,
            (GtkObjectInitFunc) mail_preferences_init,
            (GtkArgSetFunc) NULL,
            (GtkArgGetFunc) NULL
        };
        
        type = gtk_type_unique (gtk_vbox_get_type (), &type_info);
    }
    
    return type;
}

static void
mail_preferences_class_init (MailPreferencesClass *klass)
{
    GtkObjectClass *object_class;
    
    object_class = (GtkObjectClass *) klass;
    parent_class = gtk_type_class (gtk_vbox_get_type ());
    
    object_class->finalize = mail_preferences_finalise;
    /* override methods */
    
}

static void
mail_preferences_init (MailPreferences *preferences)
{
    preferences->gconf = gconf_client_get_default ();
}

static void
mail_preferences_finalise (GtkObject *obj)
{
    MailPreferences *prefs = (MailPreferences *) obj;
    
    gtk_object_unref (GTK_OBJECT (prefs->gui));
    gtk_object_unref (GTK_OBJECT (prefs->gconf));
    
        ((GtkObjectClass *)(parent_class))->finalize (obj);
}


static void
colorpicker_set_color (GnomeColorPicker *color, guint32 rgb)
{
    gnome_color_picker_set_i8 (color, (rgb & 0xff0000) >> 16, (rgb & 0xff00) >> 8, rgb & 0xff, 0xff);
}

static guint32
colorpicker_get_color (GnomeColorPicker *color)
{
    guint8 r, g, b, a;
    guint32 rgb = 0;
    
    gnome_color_picker_get_i8 (color, &r, &g, &b, &a);
    
    rgb   = r >> 8;
    rgb <<= 8;
    rgb  |= g >> 8;
    rgb <<= 8;
    rgb  |= b >> 8;
    
    return rgb;
}

static void
toggle_button_toggled (GtkWidget *widget, gpointer user_data)
{
    MailPreferences *prefs = (MailPreferences *) user_data;
    
    if (prefs->control)
        evolution_config_control_changed (prefs->control);
}

static void
entry_changed (GtkWidget *widget, gpointer user_data)
{
    MailPreferences *prefs = (MailPreferences *) user_data;
    
    if (prefs->control)
        evolution_config_control_changed (prefs->control);
}

static void
color_set (GtkWidget *widget, guint r, guint g, guint b, guint a, gpointer user_data)
{
    MailPreferences *prefs = (MailPreferences *) user_data;
    
    if (prefs->control)
        evolution_config_control_changed (prefs->control);
}

static void
menu_changed (GtkWidget *widget, gpointer user_data)
{
    MailPreferences *prefs = (MailPreferences *) user_data;
    
    if (prefs->control)
        evolution_config_control_changed (prefs->control);
}

static void
mail_preferences_construct (MailPreferences *prefs)
{
    GtkWidget *toplevel, *menu;
    const char *text;
    GladeXML *gui;
    
    gui = glade_xml_new (EVOLUTION_GLADEDIR "/mail-config.glade", "preferences_tab");
    prefs->gui = gui;
    
    /* get our toplevel widget */
    toplevel = glade_xml_get_widget (gui, "toplevel");
    
    /* reparent */
    gtk_widget_ref (toplevel);
    gtk_widget_unparent (toplevel);
    gtk_widget_set_parent (toplevel, GTK_WIDGET (prefs));
    gtk_widget_unref (toplevel);
    
    /* General tab */
    
    /* Message Display */
    prefs->timeout_toggle = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "chkMarkTimeout"));
    gtk_toggle_button_set_active (prefs->timeout_toggle, mail_config_get_do_seen_timeout ());
    gtk_signal_connect (GTK_OBJECT (prefs->timeout_toggle), "toggled",
                toggle_button_toggled, prefs);
    
    prefs->timeout = GTK_SPIN_BUTTON (glade_xml_get_widget (gui, "spinMarkTimeout"));
    gtk_spin_button_set_value (prefs->timeout, (1.0 * mail_config_get_mark_as_seen_timeout ()) / 1000.0);
    gtk_signal_connect (GTK_OBJECT (prefs->timeout), "changed",
                entry_changed, prefs);
    
    prefs->charset = GTK_OPTION_MENU (glade_xml_get_widget (gui, "omenuCharset"));
    menu = e_charset_picker_new (mail_config_get_default_charset ());
    gtk_option_menu_set_menu (prefs->charset, GTK_WIDGET (menu));
    gtk_signal_connect (GTK_OBJECT (prefs->charset), "clicked",
                menu_changed, prefs);
    
    prefs->citation_highlight = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "chkHighlightCitations"));
    gtk_toggle_button_set_active (prefs->citation_highlight, mail_config_get_citation_highlight ());
    gtk_signal_connect (GTK_OBJECT (prefs->citation_highlight), "toggled",
                toggle_button_toggled, prefs);
    
    prefs->citation_color = GNOME_COLOR_PICKER (glade_xml_get_widget (gui, "colorpickerHighlightCitations"));
    colorpicker_set_color (prefs->citation_color, mail_config_get_citation_color ());
    gtk_signal_connect (GTK_OBJECT (prefs->citation_color), "color-set",
                color_set, prefs);
    
    /* Deleting Mail */
    prefs->empty_trash = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "chkEmptyTrashOnExit"));
    gtk_toggle_button_set_active (prefs->empty_trash, mail_config_get_empty_trash_on_exit ());
    gtk_signal_connect (GTK_OBJECT (prefs->empty_trash), "toggled",
                toggle_button_toggled, prefs);
    
    prefs->confirm_expunge = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "chkConfirmExpunge"));
    gtk_toggle_button_set_active (prefs->confirm_expunge, mail_config_get_confirm_expunge ());
    gtk_signal_connect (GTK_OBJECT (prefs->confirm_expunge), "toggled",
                toggle_button_toggled, prefs);
    
    /* New Mail Notification */
    prefs->notify_not = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "radNotifyNot"));
    gtk_toggle_button_set_active (prefs->notify_not, mail_config_get_new_mail_notify () == MAIL_CONFIG_NOTIFY_NOT);
    gtk_signal_connect (GTK_OBJECT (prefs->notify_not), "toggled",
                toggle_button_toggled, prefs);
    
    prefs->notify_beep = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "radNotifyBeep"));
    gtk_toggle_button_set_active (prefs->notify_beep, mail_config_get_new_mail_notify () == MAIL_CONFIG_NOTIFY_BEEP);
    gtk_signal_connect (GTK_OBJECT (prefs->notify_beep), "toggled",
                toggle_button_toggled, prefs);
    
    prefs->notify_play_sound = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "radNotifyPlaySound"));
    gtk_toggle_button_set_active (prefs->notify_play_sound,
                      mail_config_get_new_mail_notify () == MAIL_CONFIG_NOTIFY_PLAY_SOUND);
    gtk_signal_connect (GTK_OBJECT (prefs->notify_play_sound), "toggled",
                toggle_button_toggled, prefs);
    
    prefs->notify_sound_file = GNOME_FILE_ENTRY (glade_xml_get_widget (gui, "fileNotifyPlaySound"));
    text = mail_config_get_new_mail_notify_sound_file ();
    gtk_entry_set_text (GTK_ENTRY (gnome_file_entry_gtk_entry (prefs->notify_sound_file)),
                text ? text : "");
    gtk_signal_connect (GTK_OBJECT (gnome_file_entry_gtk_entry (prefs->notify_sound_file)), "changed",
                entry_changed, prefs);
    
    /* HTML Mail tab */
    
    /* Loading Images */
    prefs->images_never = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "radImagesNever"));
    gtk_toggle_button_set_active (prefs->images_never, mail_config_get_http_mode () == MAIL_CONFIG_HTTP_NEVER);
    gtk_signal_connect (GTK_OBJECT (prefs->images_never), "toggled",
                toggle_button_toggled, prefs);
    
    prefs->images_sometimes = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "radImagesSometimes"));
    gtk_toggle_button_set_active (prefs->images_sometimes, mail_config_get_http_mode () == MAIL_CONFIG_HTTP_SOMETIMES);
    gtk_signal_connect (GTK_OBJECT (prefs->images_sometimes), "toggled",
                toggle_button_toggled, prefs);
    
    prefs->images_always = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "radImagesAlways"));
    gtk_toggle_button_set_active (prefs->images_always, mail_config_get_http_mode () == MAIL_CONFIG_HTTP_ALWAYS);
    gtk_signal_connect (GTK_OBJECT (prefs->images_always), "toggled",
                toggle_button_toggled, prefs);
    
    /* ... */
    /* FIXME: use the gtkhtml interfaces for these settings when lewing gets around to adding them */
    prefs->show_animated = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "chkShowAnimatedImages"));
    gtk_toggle_button_set_active (prefs->show_animated,
                      gconf_client_get_bool (prefs->gconf, GTK_HTML_GCONF_DIR "/animations", NULL));
    gtk_signal_connect (GTK_OBJECT (prefs->show_animated), "toggled",
                toggle_button_toggled, prefs);
    
    prefs->autodetect_links = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "chkAutoDetectLinks"));
    gtk_toggle_button_set_active (prefs->autodetect_links,
                      gconf_client_get_bool (prefs->gconf, GTK_HTML_GCONF_DIR "/magic_links", NULL));
    gtk_signal_connect (GTK_OBJECT (prefs->autodetect_links), "toggled",
                toggle_button_toggled, prefs);
    
    prefs->prompt_unwanted_html = GTK_TOGGLE_BUTTON (glade_xml_get_widget (gui, "chkPromptWantHTML"));
    gtk_toggle_button_set_active (prefs->prompt_unwanted_html, mail_config_get_confirm_unwanted_html ());
    gtk_signal_connect (GTK_OBJECT (prefs->prompt_unwanted_html), "toggled",
                toggle_button_toggled, prefs);
    
    /* Security tab */
    
    /* Pretty Good Privacy */
    prefs->pgp_path = GNOME_FILE_ENTRY (glade_xml_get_widget (gui, "filePgpPath"));
    text = mail_config_get_pgp_path ();
    gtk_entry_set_text (GTK_ENTRY (gnome_file_entry_gtk_entry (prefs->pgp_path)), text ? text : "");
    gnome_file_entry_set_default_path (prefs->pgp_path, mail_config_get_pgp_path ());
    gtk_signal_connect (GTK_OBJECT (gnome_file_entry_gtk_entry (prefs->pgp_path)), "changed",
                entry_changed, prefs);
    
    /* FIXME: what about a label colour tab? */
}


GtkWidget *
mail_preferences_new (void)
{
    MailPreferences *new;
    
    new = (MailPreferences *) gtk_type_new (mail_preferences_get_type ());
    mail_preferences_construct (new);
    
    return (GtkWidget *) new;
}


void
mail_preferences_apply (MailPreferences *prefs)
{
    GtkWidget *entry, *menu;
    CamelPgpType type;
    char *string;
    guint32 rgb;
    int val;
    
    /* General tab */
    
    /* Message Display */
    mail_config_set_do_seen_timeout (gtk_toggle_button_get_active (prefs->timeout_toggle));
    
    val = (int) (gtk_spin_button_get_value_as_float (prefs->timeout) * 1000);
    mail_config_set_mark_as_seen_timeout (val);
    
    menu = gtk_option_menu_get_menu (prefs->charset);
    string = e_charset_picker_get_charset (menu);
    if (string) {
        mail_config_set_default_charset (string);
        g_free (string);
    }
    
    mail_config_set_citation_highlight (gtk_toggle_button_get_active (prefs->citation_highlight));
    
    rgb = colorpicker_get_color (prefs->citation_color);
    mail_config_set_citation_color (rgb);
    
    /* Deleting Mail */
    mail_config_set_empty_trash_on_exit (gtk_toggle_button_get_active (prefs->empty_trash));
    
    mail_config_set_confirm_expunge (gtk_toggle_button_get_active (prefs->confirm_expunge));
    
    /* New Mail Notification */
    if (gtk_toggle_button_get_active (prefs->notify_not))
        mail_config_set_new_mail_notify (MAIL_CONFIG_NOTIFY_NOT);
    else if (gtk_toggle_button_get_active (prefs->notify_beep))
        mail_config_set_new_mail_notify (MAIL_CONFIG_NOTIFY_BEEP);
    else
        mail_config_set_new_mail_notify (MAIL_CONFIG_NOTIFY_PLAY_SOUND);
    
    entry = gnome_file_entry_gtk_entry (GNOME_FILE_ENTRY (prefs->notify_sound_file));
    string = gtk_entry_get_text (GTK_ENTRY (entry));
    mail_config_set_new_mail_notify_sound_file (string);
    
    /* HTML Mail */
    if (gtk_toggle_button_get_active (prefs->images_always))
        mail_config_set_http_mode (MAIL_CONFIG_HTTP_ALWAYS);
    else if (gtk_toggle_button_get_active (prefs->images_sometimes))
        mail_config_set_http_mode (MAIL_CONFIG_HTTP_SOMETIMES);
    else
        mail_config_set_http_mode (MAIL_CONFIG_HTTP_NEVER);
    
    gconf_client_set_bool (prefs->gconf, GTK_HTML_GCONF_DIR "/animations",
                   gtk_toggle_button_get_active (prefs->show_animated), NULL);
    
    gconf_client_set_bool (prefs->gconf, GTK_HTML_GCONF_DIR "/magic_links",
                   gtk_toggle_button_get_active (prefs->autodetect_links), NULL);
    
    mail_config_set_confirm_unwanted_html (gtk_toggle_button_get_active (prefs->prompt_unwanted_html));
    
    /* Security */
    entry = gnome_file_entry_gtk_entry (GNOME_FILE_ENTRY (prefs->notify_sound_file));
    string = gtk_entry_get_text (GTK_ENTRY (entry));
    
    type = string && *string ? mail_config_pgp_type_detect_from_path (string) : CAMEL_PGP_TYPE_NONE;
    mail_config_set_pgp_path (string && *string ? string : NULL);
    mail_config_set_pgp_type (type);
}