diff options
author | Dan Winship <danw@src.gnome.org> | 2000-05-07 06:57:38 +0800 |
---|---|---|
committer | Dan Winship <danw@src.gnome.org> | 2000-05-07 06:57:38 +0800 |
commit | 8fbd4ab4bd5fdbaa7f126b3f1d733e8dc9e8a958 (patch) | |
tree | aee7fe5eea00383df187b373023c4ad62aa4c2e3 /mail/mail-config.c | |
parent | d1694fef3e63cb4e3e4bf5133222b02e940ff883 (diff) | |
download | gsoc2013-evolution-8fbd4ab4bd5fdbaa7f126b3f1d733e8dc9e8a958.tar gsoc2013-evolution-8fbd4ab4bd5fdbaa7f126b3f1d733e8dc9e8a958.tar.gz gsoc2013-evolution-8fbd4ab4bd5fdbaa7f126b3f1d733e8dc9e8a958.tar.bz2 gsoc2013-evolution-8fbd4ab4bd5fdbaa7f126b3f1d733e8dc9e8a958.tar.lz gsoc2013-evolution-8fbd4ab4bd5fdbaa7f126b3f1d733e8dc9e8a958.tar.xz gsoc2013-evolution-8fbd4ab4bd5fdbaa7f126b3f1d733e8dc9e8a958.tar.zst gsoc2013-evolution-8fbd4ab4bd5fdbaa7f126b3f1d733e8dc9e8a958.zip |
New code to configure identity, mail source, and mail transport.
* mail-config.c: New code to configure identity, mail source, and
mail transport.
(mail_config_druid): A druid using the config widgets. (Only
allows configuration of a single identity, source, and transport.)
* mail-ops.c (check_configured): New function to make sure the
user has configured stuff, and call the druid if not.
(fetch_mail, send_msg, send_to_url, reply, forward_msg): Call
check_configured
(composer_send_cb): Make this pass the message to a CamelTransport
rather than just printing it to stdout.
* folder-browser-factory.c (development_warning): Add a warning
about sending mail, since you can do that now.
svn path=/trunk/; revision=2842
Diffstat (limited to 'mail/mail-config.c')
-rw-r--r-- | mail/mail-config.c | 1010 |
1 files changed, 1010 insertions, 0 deletions
diff --git a/mail/mail-config.c b/mail/mail-config.c new file mode 100644 index 0000000000..869ed58ee4 --- /dev/null +++ b/mail/mail-config.c @@ -0,0 +1,1010 @@ +/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */ +/* mail-config.c: Mail configuration dialogs/wizard. */ + +/* + * Author: + * Dan Winship <danw@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 <pwd.h> + +#include <gnome.h> +#include <gtkhtml/gtkhtml.h> + +#include "mail.h" +#include "e-util/e-html-utils.h" +#include "e-util/e-setup.h" + +struct service_type { + CamelProvider *provider; + CamelService *service; + GList *authtypes; +}; + +struct identity_record { + char *name, *address, *organization, *sigfile; +}; + +static char *username = NULL; + + +/* HTML Helpers */ + +static void +html_size_req (GtkWidget *widget, GtkRequisition *requisition) +{ + requisition->height = GTK_LAYOUT (widget)->height; +} + +/* Returns a GtkHTML which is already inside a GtkScrolledWindow. If + * @white is TRUE, the GtkScrolledWindow will be inside a GtkFrame. + */ +static GtkWidget * +html_new (gboolean white) +{ + GtkWidget *html, *scrolled, *frame; + GtkStyle *style; + + html = gtk_html_new (); + GTK_LAYOUT (html)->height = 0; + gtk_signal_connect (GTK_OBJECT (html), "size_request", + GTK_SIGNAL_FUNC (html_size_req), NULL); + gtk_html_set_editable (GTK_HTML (html), FALSE); + style = gtk_rc_get_style (html); + gtk_html_set_default_background_color (GTK_HTML (html), + white ? &style->white : + &style->bg[0]); + gtk_widget_set_sensitive (html, FALSE); + scrolled = gtk_scrolled_window_new (NULL, NULL); + gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled), + GTK_POLICY_NEVER, + GTK_POLICY_NEVER); + gtk_container_add (GTK_CONTAINER (scrolled), html); + + if (white) { + frame = gtk_frame_new (NULL); + gtk_frame_set_shadow_type (GTK_FRAME (frame), + GTK_SHADOW_ETCHED_IN); + gtk_container_add (GTK_CONTAINER (frame), scrolled); + gtk_widget_show_all (frame); + } else + gtk_widget_show_all (scrolled); + + return html; +} + +static void +put_html (GtkHTML *html, char *text) +{ + GtkHTMLStreamHandle *handle; + + text = e_text_to_html (text, E_TEXT_TO_HTML_CONVERT_NL); + handle = gtk_html_begin (html, ""); + gtk_html_write (html, handle, "<HTML><BODY>", 12); + gtk_html_write (html, handle, text, strlen (text)); + gtk_html_write (html, handle, "</BODY></HTML>", 14); + g_free (text); + gtk_html_end (html, handle, GTK_HTML_STREAM_OK); +} + + +/* Identity page */ + +static void +identity_note_doneness (GtkObject *page, gpointer user_data) +{ + GtkWidget *exit_button; + GtkEntry *entry; + char *data; + + exit_button = gtk_object_get_data (page, "exit_button"); + + entry = gtk_object_get_data (page, "name"); + data = gtk_entry_get_text (entry); + if (data && *data) { + entry = gtk_object_get_data (page, "addr"); + data = gtk_entry_get_text (entry); + } + + gtk_widget_set_sensitive (exit_button, data && *data); +} + +static void +prepare_identity (GnomeDruidPage *page, gpointer arg1, gpointer user_data) +{ + identity_note_doneness (user_data, NULL); +} + +static gboolean +identity_next (GnomeDruidPage *page, gpointer arg1, gpointer user_data) +{ + GtkObject *box = user_data; + GtkEntry *addr = gtk_object_get_data (box, "addr"); + char *data, *at; + + /* FIXME: we need more sanity checking than this. */ + + data = gtk_entry_get_text (addr); + at = strchr (data, '@'); + if (!at || !strchr (at + 1, '.')) { + GtkWidget *parent = + gtk_widget_get_ancestor (GTK_WIDGET (page), + GTK_TYPE_WINDOW); + gnome_error_dialog_parented ("Email address must be of the " + "form \"user@domain\".", + GTK_WINDOW (parent)); + return TRUE; + } + + g_free (username); + username = g_strndup (data, at - data); + + return FALSE; +} + +static void +destroy_identity (GtkObject *table, gpointer idrecp) +{ + struct identity_record *idrec = idrecp; + GtkEditable *editable; + + editable = gtk_object_get_data (table, "name"); + idrec->name = gtk_editable_get_chars (editable, 0, -1); + editable = gtk_object_get_data (table, "addr"); + idrec->address = gtk_editable_get_chars (editable, 0, -1); + editable = gtk_object_get_data (table, "org"); + idrec->organization = gtk_editable_get_chars (editable, 0, -1); + editable = gtk_object_get_data (table, "sig"); + idrec->sigfile = gtk_editable_get_chars (editable, 0, -1); +} + +static void +create_identity_page (GtkWidget *vbox, struct identity_record *idrec) +{ + GtkWidget *html, *table; + GtkWidget *name, *addr, *org, *sig; + GtkWidget *name_entry, *addr_entry, *org_entry, *sig_entry; + GtkWidget *hsep; + char *user; + struct passwd *pw; + + html = html_new (FALSE); + put_html (GTK_HTML (html), + _("Enter your name and email address to be used in " + "outgoing mail. You may also, optionally, enter the " + "name of your organization, and the name of a file " + "to read your signature from.")); + gtk_box_pack_start (GTK_BOX (vbox), html->parent, FALSE, TRUE, 0); + + table = gtk_table_new (5, 2, FALSE); + gtk_table_set_row_spacings (GTK_TABLE (table), 10); + gtk_table_set_col_spacings (GTK_TABLE (table), 6); + gtk_container_set_border_width (GTK_CONTAINER (table), 8); + gtk_box_pack_start (GTK_BOX (vbox), table, TRUE, TRUE, 0); + gtk_signal_connect (GTK_OBJECT (vbox), "destroy", + GTK_SIGNAL_FUNC (destroy_identity), idrec); + + name = gtk_label_new (_("Full name:")); + gtk_table_attach (GTK_TABLE (table), name, 0, 1, 0, 1, + GTK_FILL, 0, 0, 0); + gtk_misc_set_alignment (GTK_MISC (name), 1, 0.5); + + name_entry = gtk_entry_new (); + gtk_table_attach (GTK_TABLE (table), name_entry, 1, 2, 0, 1, + GTK_EXPAND | GTK_FILL, 0, 0, 0); + gtk_object_set_data (GTK_OBJECT (vbox), "name", name_entry); + + user = getenv ("USER"); + if (user) + pw = getpwnam (user); + else + pw = getpwuid (getuid ()); + if (pw && pw->pw_gecos && *pw->pw_gecos) { + char *name; + int pos = 0; + + name = g_strndup (pw->pw_gecos, strcspn (pw->pw_gecos, ",")); + gtk_editable_insert_text (GTK_EDITABLE (name_entry), + name, strlen (name), &pos); + } + + addr = gtk_label_new (_("Email address:")); + gtk_table_attach (GTK_TABLE (table), addr, 0, 1, 1, 2, + GTK_FILL, 0, 0, 0); + gtk_misc_set_alignment (GTK_MISC (addr), 1, 0.5); + + addr_entry = gtk_entry_new (); + gtk_table_attach (GTK_TABLE (table), addr_entry, 1, 2, 1, 2, + GTK_EXPAND | GTK_FILL, 0, 0, 0); + gtk_object_set_data (GTK_OBJECT (vbox), "addr", addr_entry); + + gtk_signal_connect_object (GTK_OBJECT (name_entry), "changed", + GTK_SIGNAL_FUNC (identity_note_doneness), + GTK_OBJECT (vbox)); + gtk_signal_connect_object (GTK_OBJECT (addr_entry), "changed", + GTK_SIGNAL_FUNC (identity_note_doneness), + GTK_OBJECT (vbox)); + + hsep = gtk_hseparator_new (); + gtk_table_attach (GTK_TABLE (table), hsep, 0, 2, 2, 3, + GTK_FILL, 0, 0, 8); + + org = gtk_label_new (_("Organization:")); + gtk_table_attach (GTK_TABLE (table), org, 0, 1, 3, 4, + GTK_FILL, 0, 0, 0); + gtk_misc_set_alignment (GTK_MISC (org), 1, 0.5); + + org_entry = gtk_entry_new (); + gtk_table_attach (GTK_TABLE (table), org_entry, 1, 2, 3, 4, + GTK_EXPAND | GTK_FILL, 0, 0, 0); + gtk_object_set_data (GTK_OBJECT (vbox), "org", org_entry); + + sig = gtk_label_new (_("Signature file:")); + gtk_table_attach (GTK_TABLE (table), sig, 0, 1, 4, 5, + GTK_FILL, GTK_FILL, 0, 0); + gtk_misc_set_alignment (GTK_MISC (sig), 1, 0); + + sig_entry = gnome_file_entry_new (NULL, _("Signature File")); + gtk_table_attach (GTK_TABLE (table), sig_entry, 1, 2, 4, 5, + GTK_FILL, 0, 0, 0); + gnome_file_entry_set_default_path (GNOME_FILE_ENTRY (sig_entry), + g_get_home_dir ()); + gtk_object_set_data (GTK_OBJECT (vbox), "sig", + gnome_file_entry_gtk_entry (GNOME_FILE_ENTRY (sig_entry))); + + gtk_widget_show_all (table); +} + + +/* Source/Transport pages */ + +static void +service_note_doneness (GtkObject *page, gpointer user_data) +{ + GtkObject *box; + GtkWidget *button; + GtkEntry *entry; + char *data; + gboolean sensitive = TRUE; + + entry = gtk_object_get_data (page, "server_entry"); + if (entry) { + data = gtk_entry_get_text (entry); + if (!data || !*data) + sensitive = FALSE; + } + + if (sensitive) { + entry = gtk_object_get_data (page, "user_entry"); + if (entry) { + data = gtk_entry_get_text (entry); + if (!data || !*data) + sensitive = FALSE; + } + } + + if (sensitive) { + entry = gtk_object_get_data (page, "path_entry"); + if (entry) { + data = gtk_entry_get_text (entry); + if (!data || !*data) + sensitive = FALSE; + } + } + + button = gtk_object_get_data (page, "autodetect"); + if (button) + gtk_widget_set_sensitive (button, sensitive); + + box = gtk_object_get_data (page, "box"); + button = gtk_object_get_data (box, "exit_button"); + if (button) + gtk_widget_set_sensitive (button, sensitive); +} + +static void +prepare_service (GnomeDruidPage *page, gpointer arg1, gpointer user_data) +{ + GtkObject *box = user_data; + GtkNotebook *notebook = gtk_object_get_data (box, "notebook"); + GtkWidget *table; + GtkEntry *entry; + + table = gtk_notebook_get_nth_page ( + notebook, gtk_notebook_get_current_page (notebook)); + + if (username) { + char *data = NULL; + + entry = gtk_object_get_data (GTK_OBJECT (table), "user_entry"); + if (entry) { + data = gtk_entry_get_text (entry); + if (!data || !*data) + gtk_entry_set_text (entry, username); + } + } + + service_note_doneness (GTK_OBJECT (table), NULL); +} + +static void +auth_menuitem_activate (GtkObject *menuitem, GtkHTML *html) +{ + CamelServiceAuthType *authtype; + + authtype = gtk_object_get_data (menuitem, "authtype"); + put_html (html, authtype->description); +} + +static void +fill_auth_menu (GtkOptionMenu *optionmenu, GtkHTML *html, GList *authtypes) +{ + CamelServiceAuthType *authtype; + GtkWidget *menu, *item, *firstitem = NULL; + + menu = gtk_menu_new (); + gtk_option_menu_set_menu (optionmenu, menu); + for (; authtypes; authtypes = authtypes->next) { + authtype = authtypes->data; + item = gtk_menu_item_new_with_label (_(authtype->name)); + if (!firstitem) + firstitem = item; + gtk_menu_append (GTK_MENU (menu), item); + gtk_object_set_data (GTK_OBJECT (item), "authtype", authtype); + gtk_signal_connect (GTK_OBJECT (item), "activate", + GTK_SIGNAL_FUNC (auth_menuitem_activate), + html); + } + gtk_widget_show_all (menu); + gtk_option_menu_set_history (optionmenu, 0); + if (firstitem) + auth_menuitem_activate (GTK_OBJECT (firstitem), html); +} + +static char * +get_service_url (GtkObject *table) +{ + CamelURL *url; + GtkEditable *editable; + GtkOptionMenu *auth_optionmenu; + char *url_str; + + url = g_new0 (CamelURL, 1); + url->protocol = g_strdup (gtk_object_get_data (table, "protocol")); + editable = gtk_object_get_data (table, "user_entry"); + if (editable) + url->user = gtk_editable_get_chars (editable, 0, -1); + editable = gtk_object_get_data (table, "server_entry"); + if (editable) + url->host = gtk_editable_get_chars (editable, 0, -1); + editable = gtk_object_get_data (table, "path_entry"); + if (editable) + url->path = gtk_editable_get_chars (editable, 0, -1); + + auth_optionmenu = gtk_object_get_data (table, "auth_optionmenu"); + if (auth_optionmenu) { + GtkWidget *menu, *item; + CamelServiceAuthType *authtype; + + menu = gtk_option_menu_get_menu (auth_optionmenu); + if (menu) { + item = gtk_menu_get_active (GTK_MENU (menu)); + authtype = gtk_object_get_data (GTK_OBJECT (item), + "authtype"); + if (*authtype->authproto) + url->authmech = g_strdup (authtype->authproto); + } + } + + url_str = camel_url_to_string (url, FALSE); + camel_url_free (url); + return url_str; +} + +static void +autodetect_cb (GtkWidget *button, GtkObject *table) +{ + char *url, *err; + CamelException *ex; + CamelService *service; + GList *authtypes; + GtkHTML *html; + GtkOptionMenu *optionmenu; + GtkWidget *parent; + int type; + + type = GPOINTER_TO_UINT (gtk_object_get_data (table, "service_type")); + url = get_service_url (table); + + ex = camel_exception_new (); + service = camel_session_get_service (default_session->session, + url, type, ex); + g_free (url); + if (camel_exception_get_id (ex) != CAMEL_EXCEPTION_NONE) + goto error; + + authtypes = camel_service_query_auth_types (service, ex); + if (camel_exception_get_id (ex) != CAMEL_EXCEPTION_NONE) + goto error; + + html = gtk_object_get_data (table, "auth_html"); + optionmenu = gtk_object_get_data (table, "auth_optionmenu"); + fill_auth_menu (optionmenu, html, authtypes); + return; + + error: + err = g_strdup_printf ("Could not detect supported " + "authentication types:\n%s", + camel_exception_get_description (ex)); + camel_exception_free (ex); + parent = gtk_widget_get_ancestor (button, GTK_TYPE_WINDOW); + gnome_error_dialog_parented (err, GTK_WINDOW (parent)); + g_free (err); +} + +static void +destroy_service (GtkObject *notebook, gpointer urlp) +{ + char **url = urlp; + GtkWidget *table; + int page; + + page = gtk_notebook_get_current_page (GTK_NOTEBOOK (notebook)); + table = gtk_notebook_get_nth_page (GTK_NOTEBOOK (notebook), page); + *url = get_service_url (GTK_OBJECT (table)); +} + +static void +add_row (GtkWidget *table, int row, const char *label_text, + const char *tag, int flag) +{ + GtkWidget *label, *entry; + + label = gtk_label_new (label_text); + gtk_table_attach (GTK_TABLE (table), label, 0, 1, row, row + 1, + GTK_FILL, 0, 0, 0); + gtk_misc_set_alignment (GTK_MISC (label), 1, 0.5); + + entry = gtk_entry_new (); + gtk_table_attach (GTK_TABLE (table), entry, 1, 3, row, row + 1, + GTK_EXPAND | GTK_FILL, 0, 0, 0); + gtk_signal_connect_object (GTK_OBJECT (entry), "changed", + GTK_SIGNAL_FUNC (service_note_doneness), + GTK_OBJECT (table)); + gtk_object_set_data (GTK_OBJECT (table), tag, entry); +} + +static GtkWidget * +create_source (struct service_type *st) +{ + GtkWidget *table; + GtkWidget *auth, *auth_optionmenu, *auth_html; + GtkWidget *autodetect; + int row, service_flags; + + table = gtk_table_new (5, 3, FALSE); + gtk_table_set_row_spacings (GTK_TABLE (table), 2); + gtk_table_set_col_spacings (GTK_TABLE (table), 10); + gtk_container_set_border_width (GTK_CONTAINER (table), 8); + gtk_object_set_data (GTK_OBJECT (table), "protocol", + st->provider->protocol); + gtk_object_set_data (GTK_OBJECT (table), "service_type", + GUINT_TO_POINTER (CAMEL_PROVIDER_STORE)); + + row = 0; + service_flags = st->service->url_flags & + ~CAMEL_SERVICE_URL_NEED_AUTH; + + if (service_flags & CAMEL_SERVICE_URL_NEED_HOST) { + add_row (table, row, _("Server:"), "server_entry", + CAMEL_SERVICE_URL_NEED_HOST); + row++; + } + + if (service_flags & CAMEL_SERVICE_URL_NEED_USER) { + add_row (table, row, _("Username:"), "user_entry", + CAMEL_SERVICE_URL_NEED_USER); + row++; + } + + if (service_flags & CAMEL_SERVICE_URL_NEED_PATH) { + add_row (table, row, _("Path:"), "path_entry", + CAMEL_SERVICE_URL_NEED_PATH); + row++; + } + + if (st->authtypes) { + auth = gtk_label_new (_("Authentication:")); + gtk_table_attach (GTK_TABLE (table), auth, 0, 1, + row, row + 1, GTK_FILL, 0, 0, 0); + gtk_misc_set_alignment (GTK_MISC (auth), 1, 0.5); + + auth_optionmenu = gtk_option_menu_new (); + gtk_table_attach (GTK_TABLE (table), auth_optionmenu, 1, 2, + row, row + 1, GTK_FILL | GTK_EXPAND, + 0, 0, 0); + gtk_object_set_data (GTK_OBJECT (table), "auth_optionmenu", + auth_optionmenu); + + autodetect = gtk_button_new_with_label (_("Detect supported types...")); + gtk_table_attach (GTK_TABLE (table), autodetect, 2, 3, + row, row + 1, 0, 0, 0, 0); + gtk_widget_set_sensitive (autodetect, FALSE); + gtk_signal_connect (GTK_OBJECT (autodetect), "clicked", + GTK_SIGNAL_FUNC (autodetect_cb), table); + gtk_object_set_data (GTK_OBJECT (table), "autodetect", + autodetect); + + auth_html = html_new (TRUE); + gtk_table_attach (GTK_TABLE (table), auth_html->parent->parent, + 0, 3, row + 1, row + 2, + GTK_FILL, GTK_EXPAND | GTK_FILL, 0, 0); + gtk_object_set_data (GTK_OBJECT (table), "auth_html", + auth_html); + + fill_auth_menu (GTK_OPTION_MENU (auth_optionmenu), + GTK_HTML (auth_html), st->authtypes); + + row += 2; + } + + if (row != 0) { + GtkWidget *check; + + check = gtk_check_button_new_with_label ( + _("Test these values before continuing")); + gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (check), TRUE); + gtk_table_attach (GTK_TABLE (table), check, 0, 3, + row, row + 1, GTK_FILL, GTK_FILL, 0, 0); + gtk_object_set_data (GTK_OBJECT (table), "check", check); + row += 1; + } + + gtk_table_resize (GTK_TABLE (table), row, 3); + gtk_widget_show_all (table); + + return table; +} + +static GtkWidget * +create_transport (struct service_type *st) +{ + GtkWidget *table; + GtkWidget *auth, *auth_optionmenu, *auth_html; + GtkWidget *autodetect; + int row, service_flags; + + table = gtk_table_new (5, 3, FALSE); + gtk_table_set_row_spacings (GTK_TABLE (table), 2); + gtk_table_set_col_spacings (GTK_TABLE (table), 10); + gtk_container_set_border_width (GTK_CONTAINER (table), 8); + gtk_object_set_data (GTK_OBJECT (table), "protocol", + st->provider->protocol); + gtk_object_set_data (GTK_OBJECT (table), "service_type", + GUINT_TO_POINTER (CAMEL_PROVIDER_TRANSPORT)); + + row = 0; + service_flags = st->service->url_flags & + ~CAMEL_SERVICE_URL_NEED_AUTH; + + if (service_flags & CAMEL_SERVICE_URL_NEED_HOST) { + add_row (table, row, _("Server:"), "server_entry", + CAMEL_SERVICE_URL_NEED_HOST); + row++; + } + + if (st->authtypes) { + auth = gtk_label_new (_("Authentication:")); + gtk_table_attach (GTK_TABLE (table), auth, 0, 1, + row, row + 1, GTK_FILL, 0, 0, 0); + gtk_misc_set_alignment (GTK_MISC (auth), 1, 0.5); + + auth_optionmenu = gtk_option_menu_new (); + gtk_table_attach (GTK_TABLE (table), auth_optionmenu, 1, 2, + row, row + 1, GTK_FILL | GTK_EXPAND, + 0, 0, 0); + gtk_object_set_data (GTK_OBJECT (table), "auth_optionmenu", + auth_optionmenu); + + autodetect = gtk_button_new_with_label (_("Detect supported types...")); + gtk_table_attach (GTK_TABLE (table), autodetect, 2, 3, + row, row + 1, 0, 0, 0, 0); + gtk_widget_set_sensitive (autodetect, FALSE); + gtk_object_set_data (GTK_OBJECT (table), "autodetect", + autodetect); + + auth_html = html_new (TRUE); + gtk_table_attach (GTK_TABLE (table), auth_html->parent->parent, + 0, 3, row + 1, row + 2, + GTK_FILL, GTK_EXPAND | GTK_FILL, 0, 0); + + fill_auth_menu (GTK_OPTION_MENU (auth_optionmenu), + GTK_HTML (auth_html), st->authtypes); + + row += 2; + } + + if (row != 0) { + GtkWidget *check; + + check = gtk_check_button_new_with_label ( + _("Test these values before continuing")); + gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (check), TRUE); + gtk_table_attach (GTK_TABLE (table), check, 0, 3, + row, row + 1, GTK_FILL | GTK_EXPAND, + GTK_FILL, 0, 0); + gtk_object_set_data (GTK_OBJECT (table), "check", check); + row += 1; + } + + gtk_table_resize (GTK_TABLE (table), row, 3); + gtk_widget_show_all (table); + + return table; +} + +static void +stype_menuitem_activate (GtkObject *menuitem, GtkObject *table) +{ + GtkHTML *html; + char *text; + int page; + GtkNotebook *notebook; + + text = gtk_object_get_data (menuitem, "description"); + html = gtk_object_get_data (table, "html"); + put_html (html, text); + + page = GPOINTER_TO_UINT (gtk_object_get_data (menuitem, "page")); + notebook = gtk_object_get_data (table, "notebook"); + gtk_notebook_set_page (notebook, page); + service_note_doneness (GTK_OBJECT (gtk_notebook_get_nth_page (notebook, + page)), + NULL); +} + +/* Create the mail source/transport page. */ +static void +create_service_page (GtkWidget *vbox, const char *label_text, GList *services, + GtkWidget *(*create_service)(struct service_type *), + char **urlp) +{ + GtkWidget *hbox, *stype, *stype_optionmenu, *stype_menu; + GtkWidget *menuitem, *first_menuitem = NULL; + GtkWidget *stype_html, *notebook, *service; + int page; + GList *s; + + hbox = gtk_hbox_new (FALSE, 8); + gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, TRUE, 0); + + stype = gtk_label_new (label_text); + gtk_box_pack_start (GTK_BOX (hbox), stype, FALSE, FALSE, 0); + gtk_misc_set_alignment (GTK_MISC (stype), 1, 0.5); + + stype_optionmenu = gtk_option_menu_new (); + gtk_box_pack_start (GTK_BOX (hbox), stype_optionmenu, TRUE, TRUE, 0); + stype_menu = gtk_menu_new (); + gtk_option_menu_set_menu (GTK_OPTION_MENU (stype_optionmenu), + stype_menu); + + stype_html = html_new (TRUE); + gtk_object_set_data (GTK_OBJECT (vbox), "html", stype_html); + gtk_box_pack_start (GTK_BOX (vbox), stype_html->parent->parent, + TRUE, TRUE, 0); + + notebook = gtk_notebook_new (); + gtk_notebook_set_show_tabs (GTK_NOTEBOOK (notebook), FALSE); + gtk_box_pack_start (GTK_BOX (vbox), notebook, TRUE, TRUE, 0); + gtk_object_set_data (GTK_OBJECT (vbox), "notebook", notebook); + gtk_signal_connect (GTK_OBJECT (notebook), "destroy", + GTK_SIGNAL_FUNC (destroy_service), urlp); + + for (s = services, page = 0; s; s = s->next, page++) { + struct service_type *st = s->data; + + menuitem = gtk_menu_item_new_with_label (_(st->provider->name)); + if (!first_menuitem) + first_menuitem = menuitem; + gtk_signal_connect (GTK_OBJECT (menuitem), "activate", + GTK_SIGNAL_FUNC (stype_menuitem_activate), + vbox); + gtk_menu_append (GTK_MENU (stype_menu), menuitem); + + service = (*create_service) (st); + gtk_notebook_append_page (GTK_NOTEBOOK (notebook), service, + NULL); + gtk_object_set_data (GTK_OBJECT (service), "box", vbox); + + gtk_object_set_data (GTK_OBJECT (menuitem), "page", + GUINT_TO_POINTER (page)); + gtk_object_set_data (GTK_OBJECT (menuitem), "description", + st->provider->description); + } + + stype_menuitem_activate (GTK_OBJECT (first_menuitem), + GTK_OBJECT (vbox)); + gtk_option_menu_set_history (GTK_OPTION_MENU (stype_optionmenu), 0); + + gtk_widget_show_all (vbox); +} + +static void +create_source_page (GtkWidget *vbox, GList *sources, char **urlp) +{ + GtkWidget *html; + + html = html_new (FALSE); + put_html (GTK_HTML (html), + _("Select the kind of mail server you have, and enter " + "the relevant information about it.\n\nIf the server " + "requires authentication, you can click the " + "\"Detect supported types...\" button after entering " + "the other information.")); + gtk_box_pack_start (GTK_BOX (vbox), html->parent, FALSE, TRUE, 0); + + create_service_page (vbox, "Mail source type:", sources, + create_source, urlp); +} + +static void +create_transport_page (GtkWidget *vbox, GList *transports, char **urlp) +{ + GtkWidget *html; + + html = html_new (FALSE); + put_html (GTK_HTML (html), + _("Select the method you would like to use to deliver " + "your mail.")); + gtk_box_pack_start (GTK_BOX (vbox), html->parent, FALSE, TRUE, 0); + + create_service_page (vbox, "Mail transport type:", transports, + create_transport, urlp); +} + + +/* Generic stuff */ + +static GList * +add_service (GList *services, CamelProviderType type, CamelProvider *prov) +{ + CamelService *service; + CamelException *ex; + char *url; + struct service_type *st; + + ex = camel_exception_new (); + + url = g_strdup_printf ("%s:", prov->protocol); + service = camel_session_get_service (default_session->session, + url, type, ex); + g_free (url); + if (!service) { + camel_exception_free (ex); + return services; + } + + st = g_new (struct service_type, 1); + st->provider = prov; + st->service = service; + st->authtypes = camel_service_query_auth_types (st->service, ex); + camel_exception_free (ex); + + return g_list_append (services, st); +} + +static GdkImlibImage * +load_image (const char *name) +{ + char *path; + GdkImlibImage *image; + + path = g_strdup_printf ("/usr/local/share/images/evolution/%s", name); + image = gdk_imlib_load_image (path); + g_free (path); + + return image; +} + +static void +prepare_first (GnomeDruidPage *page, GnomeDruid *druid, gpointer user_data) +{ + gnome_druid_set_buttons_sensitive (druid, TRUE, TRUE, TRUE); +} + +static struct identity_record idrec; +static char *source, *transport; + +static void +cancel (GnomeDruid *druid, gpointer window) +{ + gtk_window_set_modal (window, FALSE); + gtk_widget_destroy (window); + gtk_main_quit (); +} + +static void +finish (GnomeDruidPage *page, gpointer arg1, gpointer window) +{ + char *path; + + cancel (arg1, window); + + /* According to the API docs, there's an easier way to do this, + * except that it doesn't work. Anyway, this will be replaced + * by GConf eventually. FIXME. + */ + + path = g_strdup_printf ("=%s/config=/mail/configured", evolution_dir); + gnome_config_set_bool (path, TRUE); + g_free (path); + + path = g_strdup_printf ("=%s/config=/mail/id_name", evolution_dir); + gnome_config_set_string (path, idrec.name); + g_free (path); + + path = g_strdup_printf ("=%s/config=/mail/id_addr", evolution_dir); + gnome_config_set_string (path, idrec.address); + g_free (path); + + path = g_strdup_printf ("=%s/config=/mail/id_org", evolution_dir); + gnome_config_set_string (path, idrec.organization); + g_free (path); + + path = g_strdup_printf ("=%s/config=/mail/id_sig", evolution_dir); + gnome_config_set_string (path, idrec.sigfile); + g_free (path); + + path = g_strdup_printf ("=%s/config=/mail/source", evolution_dir); + gnome_config_set_string (path, source); + g_free (path); + + path = g_strdup_printf ("=%s/config=/mail/transport", evolution_dir); + gnome_config_set_string (path, transport); + g_free (path); +} + +void +mail_config_druid (void) +{ + GnomeDruid *druid; + GtkWidget *page, *window; + GnomeDruidPageStandard *dpage; + GList *providers, *p, *sources, *transports; + GdkImlibImage *mail_logo, *identity_logo; + GdkImlibImage *source_logo, *transport_logo; + + /* Fetch list of all providers. */ + providers = camel_session_list_providers (default_session->session, + TRUE); + sources = transports = NULL; + for (p = providers; p; p = p->next) { + CamelProvider *prov = p->data; + + if (prov->object_types[CAMEL_PROVIDER_STORE]) { + sources = add_service (sources, + CAMEL_PROVIDER_STORE, + prov); + } else if (prov->object_types[CAMEL_PROVIDER_TRANSPORT]) { + transports = add_service (transports, + CAMEL_PROVIDER_TRANSPORT, + prov); + } + } + + mail_logo = load_image ("evolution-inbox.png"); + identity_logo = load_image ("malehead.png"); + source_logo = mail_logo; + transport_logo = load_image ("envelope.png"); + + window = gtk_window_new (GTK_WINDOW_DIALOG); + druid = GNOME_DRUID (gnome_druid_new ()); + gtk_signal_connect (GTK_OBJECT (druid), "cancel", + GTK_SIGNAL_FUNC (cancel), window); + + /* Start page */ + page = gnome_druid_page_start_new_with_vals (_("Mail Configuration"), + "blah blah blah", + mail_logo, NULL); + gnome_druid_page_start_set_logo_bg_color ( + GNOME_DRUID_PAGE_START (page), + &GNOME_DRUID_PAGE_START (page)->background_color); + gnome_druid_append_page (druid, GNOME_DRUID_PAGE (page)); + gtk_signal_connect (GTK_OBJECT (page), "prepare", + GTK_SIGNAL_FUNC (prepare_first), NULL); + gtk_widget_show_all (page); + + + /* Identity page */ + page = gnome_druid_page_standard_new_with_vals (_("Identity"), + identity_logo); + dpage = GNOME_DRUID_PAGE_STANDARD (page); + gnome_druid_page_standard_set_logo_bg_color (dpage, + &dpage->background_color); + gtk_container_set_border_width (GTK_CONTAINER (dpage->vbox), 8); + gtk_box_set_spacing (GTK_BOX (dpage->vbox), 5); + create_identity_page (dpage->vbox, &idrec); + gtk_object_set_data (GTK_OBJECT (dpage->vbox), "exit_button", + druid->next); + gnome_druid_append_page (druid, GNOME_DRUID_PAGE (page)); + gtk_signal_connect (GTK_OBJECT (page), "prepare", + GTK_SIGNAL_FUNC (prepare_identity), dpage->vbox); + gtk_signal_connect (GTK_OBJECT (page), "next", + GTK_SIGNAL_FUNC (identity_next), dpage->vbox); + gtk_widget_show (page); + + + /* Source page */ + page = gnome_druid_page_standard_new_with_vals (_("Mail Source"), + source_logo); + dpage = GNOME_DRUID_PAGE_STANDARD (page); + gnome_druid_page_standard_set_logo_bg_color (dpage, + &dpage->background_color); + gtk_container_set_border_width (GTK_CONTAINER (dpage->vbox), 8); + gtk_box_set_spacing (GTK_BOX (dpage->vbox), 5); + create_source_page (dpage->vbox, sources, &source); + gtk_object_set_data (GTK_OBJECT (dpage->vbox), "exit_button", + druid->next); + gnome_druid_append_page (druid, GNOME_DRUID_PAGE (page)); + gtk_signal_connect (GTK_OBJECT (page), "prepare", + GTK_SIGNAL_FUNC (prepare_service), dpage->vbox); + gtk_widget_show (page); + + + /* Transport page */ + page = gnome_druid_page_standard_new_with_vals (_("Mail Transport"), + transport_logo); + dpage = GNOME_DRUID_PAGE_STANDARD (page); + gnome_druid_page_standard_set_logo_bg_color (dpage, + &dpage->background_color); + gtk_container_set_border_width (GTK_CONTAINER (dpage->vbox), 8); + gtk_box_set_spacing (GTK_BOX (dpage->vbox), 5); + create_transport_page (dpage->vbox, transports, &transport); + gtk_object_set_data (GTK_OBJECT (dpage->vbox), "exit_button", + druid->next); + gnome_druid_append_page (druid, GNOME_DRUID_PAGE (page)); + gtk_signal_connect (GTK_OBJECT (page), "prepare", + GTK_SIGNAL_FUNC (prepare_service), dpage->vbox); + gtk_widget_show (page); + + + /* Finish page */ + page = gnome_druid_page_finish_new_with_vals (_("Mail Configuration"), + "blah blah blah done", + mail_logo, NULL); + gnome_druid_page_finish_set_logo_bg_color ( + GNOME_DRUID_PAGE_FINISH (page), + &GNOME_DRUID_PAGE_FINISH (page)->background_color); + gnome_druid_append_page (druid, GNOME_DRUID_PAGE (page)); + gtk_signal_connect (GTK_OBJECT (page), "finish", + GTK_SIGNAL_FUNC (finish), window); + gtk_widget_show_all (page); + + gtk_container_add (GTK_CONTAINER (window), GTK_WIDGET (druid)); + + gtk_widget_show (GTK_WIDGET (druid)); + gtk_widget_show (window); + gtk_widget_queue_resize (window); + gnome_druid_set_buttons_sensitive (druid, FALSE, TRUE, TRUE); + + gtk_window_set_modal (GTK_WINDOW (window), TRUE); + gtk_main (); +} |