2007-04-20 Murray Cumming <murrayc@murrayc.com>
[modest] / src / maemo / modest-account-settings-dialog.c
index 9ec09ef..31ddbf6 100644 (file)
 #include "maemo/easysetup/modest-easysetup-country-combo-box.h"
 #include "maemo/easysetup/modest-easysetup-provider-combo-box.h"
 #include "maemo/easysetup/modest-easysetup-servertype-combo-box.h"
-#include "maemo/easysetup/modest-easysetup-serversecurity-combo-box.h"
-#include "maemo/easysetup/modest-easysetup-secureauth-combo-box.h"
-#include "maemo/easysetup/modest-validating-entry.h"
+#include "widgets/modest-easysetup-serversecurity-combo-box.h"
+#include "widgets/modest-easysetup-secureauth-combo-box.h"
+#include "widgets/modest-validating-entry.h"
+#include "widgets/modest-retrieve-combo-box.h"
+#include "widgets/modest-limit-retrieve-combo-box.h"
 #include "modest-text-utils.h"
 #include "modest-account-mgr.h"
 #include "modest-account-mgr-helpers.h" /* For modest_account_mgr_get_account_data(). */
@@ -51,7 +53,7 @@ struct _ModestAccountSettingsDialogPrivate
 static void
 enable_buttons (ModestAccountSettingsDialog *self);
 
-static void
+static gboolean
 save_configuration (ModestAccountSettingsDialog *dialog);
 
 static void
@@ -86,20 +88,71 @@ modest_account_settings_dialog_finalize (GObject *object)
 {
        ModestAccountSettingsDialog *self = MODEST_ACCOUNT_SETTINGS_DIALOG (object);
        
-       if (self->original_account_name)
-               g_free (self->original_account_name);
+       if (self->account_name)
+               g_free (self->account_name);
+               
+       if (self->original_account_title)
+               g_free (self->original_account_title);
                
        if (self->account_manager)
                g_object_unref (G_OBJECT (self->account_manager));
+               
+       if (self->specific_window)
+               gtk_widget_destroy (self->specific_window);
        
        G_OBJECT_CLASS (modest_account_settings_dialog_parent_class)->finalize (object);
 }
 
-#if 0
 static void
 show_error (GtkWindow *parent_window, const gchar* text);
-#endif
 
+static void
+show_ok (GtkWindow *parent_window, const gchar* text);
+
+static void
+on_combo_incoming_security_changed (GtkComboBox *widget, gpointer user_data);
+
+static void
+on_combo_outgoing_security_changed (GtkComboBox *widget, gpointer user_data);
+
+static void
+on_modified_combobox_changed (GtkComboBox *widget, gpointer user_data)
+{
+       ModestAccountSettingsDialog *self = MODEST_ACCOUNT_SETTINGS_DIALOG (user_data);
+       self->modified = TRUE;
+}
+
+static void
+on_modified_entry_changed (GtkEditable *editable, gpointer user_data)
+{
+       ModestAccountSettingsDialog *self = MODEST_ACCOUNT_SETTINGS_DIALOG (user_data);
+       self->modified = TRUE;
+}
+
+static void
+on_modified_checkbox_toggled (GtkToggleButton *togglebutton, gpointer user_data)
+{
+       ModestAccountSettingsDialog *self = MODEST_ACCOUNT_SETTINGS_DIALOG (user_data);
+       self->modified = TRUE;
+}
+
+/* Set a modified boolean whenever the widget is changed, 
+ * so we can check for it later.
+ */
+static void
+connect_for_modified (ModestAccountSettingsDialog *self, GtkWidget *widget)
+{
+       if (GTK_IS_ENTRY (widget)) {
+         g_signal_connect (G_OBJECT (widget), "changed",
+               G_CALLBACK (on_modified_entry_changed), self);  
+       } else if (GTK_IS_COMBO_BOX (widget)) {
+               g_signal_connect (G_OBJECT (widget), "changed",
+               G_CALLBACK (on_modified_combobox_changed), self);       
+       } else if (GTK_IS_TOGGLE_BUTTON (widget)) {
+               g_signal_connect (G_OBJECT (widget), "toggled",
+               G_CALLBACK (on_modified_checkbox_toggled), self);
+       }
+}
 
 static void
 on_caption_entry_changed (GtkEditable *editable, gpointer user_data)
@@ -178,6 +231,7 @@ create_page_account_details (ModestAccountSettingsDialog *self)
        GtkWidget *caption = create_caption_new_with_asterix (self, sizegroup, _("mcen_fi_account_title"), 
                self->entry_account_title, NULL, HILDON_CAPTION_MANDATORY);
        gtk_widget_show (self->entry_account_title);
+       connect_for_modified (self, self->entry_account_title);
        gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
        gtk_widget_show (caption);
        
@@ -203,15 +257,31 @@ create_page_account_details (ModestAccountSettingsDialog *self)
         * TODO: The UI spec seems to want us to show a dialog if we hit the maximum. */
        gtk_entry_set_max_length (GTK_ENTRY (self->entry_account_title), 64);
        
-       /* TODO: The Retrieve and Limit Retrieve combo boxes. */
+       /* The retrieve combobox: */
+       self->combo_retrieve = GTK_WIDGET (modest_retrieve_combo_box_new ());
+       caption = create_caption_new_with_asterix (self, sizegroup, _("mcen_fi_advsetup_retrievetype"), 
+               self->combo_retrieve, NULL, HILDON_CAPTION_MANDATORY);
+       gtk_widget_show (self->combo_retrieve);
+       connect_for_modified (self, self->combo_retrieve);
+       gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
+       gtk_widget_show (caption);
        
+       /* The limit-retrieve combobox: */
+       self->combo_limit_retrieve = GTK_WIDGET (modest_limit_retrieve_combo_box_new ());
+       caption = create_caption_new_with_asterix (self, sizegroup, _("mcen_fi_advsetup_limit_retrieve"), 
+               self->combo_limit_retrieve, NULL, HILDON_CAPTION_MANDATORY);
+       gtk_widget_show (self->combo_limit_retrieve);
+       connect_for_modified (self, self->combo_limit_retrieve);
+       gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
+       gtk_widget_show (caption);
+
        /* The leave-messages widgets: */
        if(!self->checkbox_leave_messages)
                self->checkbox_leave_messages = 
                        gtk_check_button_new_with_label (_("mcen_fi_advsetup_leave_on_server"));
        gtk_box_pack_start (GTK_BOX (box), self->checkbox_leave_messages, FALSE, FALSE, 2);
        gtk_widget_show (self->checkbox_leave_messages);
-       
+       connect_for_modified (self, self->checkbox_leave_messages);
        
        gtk_widget_show (GTK_WIDGET (box));
        
@@ -242,6 +312,7 @@ create_page_user_details (ModestAccountSettingsDialog *self)
        GtkWidget *caption = create_caption_new_with_asterix (self, sizegroup, 
                _("mcen_li_emailsetup_name"), self->entry_user_name, NULL, HILDON_CAPTION_OPTIONAL);
        gtk_widget_show (self->entry_user_name);
+       connect_for_modified (self, self->entry_user_name);
        gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
        gtk_widget_show (caption);
        
@@ -259,6 +330,7 @@ create_page_user_details (ModestAccountSettingsDialog *self)
        caption = create_caption_new_with_asterix (self, sizegroup, _("mail_fi_username"), 
                self->entry_user_username, NULL, HILDON_CAPTION_MANDATORY);
        gtk_widget_show (self->entry_user_username);
+       connect_for_modified (self, self->entry_user_username);
        gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
        gtk_widget_show (caption);
        
@@ -278,6 +350,7 @@ create_page_user_details (ModestAccountSettingsDialog *self)
        caption = create_caption_new_with_asterix (self, sizegroup, 
                _("mail_fi_password"), self->entry_user_password, NULL, HILDON_CAPTION_OPTIONAL);
        gtk_widget_show (self->entry_user_password);
+       connect_for_modified (self, self->entry_user_password);
        gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
        gtk_widget_show (caption);
        
@@ -287,6 +360,7 @@ create_page_user_details (ModestAccountSettingsDialog *self)
                _("mcen_li_emailsetup_email_address"), self->entry_user_email, NULL, HILDON_CAPTION_MANDATORY);
        gtk_entry_set_text (GTK_ENTRY (self->entry_user_email), EXAMPLE_EMAIL_ADDRESS); /* Default text. */
        gtk_widget_show (self->entry_user_email);
+       connect_for_modified (self, self->entry_user_email);
        gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
        gtk_widget_show (caption);
        
@@ -364,6 +438,7 @@ static GtkWidget* create_page_incoming (ModestAccountSettingsDialog *self)
        self->caption_incoming = create_caption_new_with_asterix (self, sizegroup, 
                "Incoming Server", self->entry_incomingserver, NULL, HILDON_CAPTION_MANDATORY);
        gtk_widget_show (self->entry_incomingserver);
+       connect_for_modified (self, self->entry_incomingserver);
        gtk_box_pack_start (GTK_BOX (box), self->caption_incoming, FALSE, FALSE, 2);
        gtk_widget_show (self->caption_incoming);
        
@@ -374,15 +449,22 @@ static GtkWidget* create_page_incoming (ModestAccountSettingsDialog *self)
        GtkWidget *caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_connection"), 
                self->combo_incoming_security, NULL, HILDON_CAPTION_OPTIONAL);
        gtk_widget_show (self->combo_incoming_security);
+       connect_for_modified (self, self->combo_incoming_security);
        gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
        gtk_widget_show (caption);
        
+       /* Show a default port number when the security method changes, as per the UI spec: */
+       g_signal_connect (G_OBJECT (self->combo_incoming_security), "changed", (GCallback)on_combo_incoming_security_changed, self);
+       
+       
        /* The port widgets: */
+       /* TODO: There are various rules about this in the UI spec. */
        if (!self->entry_incoming_port)
                self->entry_incoming_port = GTK_WIDGET (gtk_entry_new ());
        caption = hildon_caption_new (sizegroup, _("mcen_fi_emailsetup_port"), 
                self->entry_incoming_port, NULL, HILDON_CAPTION_OPTIONAL);
        gtk_widget_show (self->entry_incoming_port);
+       connect_for_modified (self, self->entry_incoming_port);
        gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
        gtk_widget_show (caption);
        
@@ -392,6 +474,7 @@ static GtkWidget* create_page_incoming (ModestAccountSettingsDialog *self)
                        gtk_check_button_new_with_label (_("mcen_li_emailsetup_secure_authentication"));
        gtk_box_pack_start (GTK_BOX (box), self->checkbox_incoming_auth, FALSE, FALSE, 2);
        gtk_widget_show (self->checkbox_incoming_auth);
+       connect_for_modified (self, self->checkbox_incoming_auth);
        
        gtk_widget_show (GTK_WIDGET (box));
        
@@ -419,29 +502,24 @@ enable_widget_for_togglebutton (GtkWidget *widget, GtkToggleButton* button)
        /* Set the starting sensitivity: */
        on_toggle_button_changed (button, widget);
 }
-       
-static void
-on_smtp_servers_window_hide (GtkWindow *window, gpointer user_data)
-{
-       /* Destroy the window when it is closed: */
-       gtk_widget_destroy (GTK_WIDGET (window));
-}
 
 static void
 on_button_outgoing_smtp_servers (GtkButton *button, gpointer user_data)
 {
-
        ModestAccountSettingsDialog * self = MODEST_ACCOUNT_SETTINGS_DIALOG (user_data);
        
-       /* Show the window: */
-       /* TODO: Retrieve the chosen settings,
-        * so we can supply them when creating the connection somehow.
-        */
-       GtkWidget *window = GTK_WIDGET (modest_connection_specific_smtp_window_new ());
-       gtk_window_set_transient_for (GTK_WINDOW (self), GTK_WINDOW (window));
-       g_signal_connect (G_OBJECT (window), "hide",
-               G_CALLBACK (on_smtp_servers_window_hide), self);
-    gtk_widget_show (window);
+       /* Create the window if necessary: */
+       if (!(self->specific_window)) {
+               self->specific_window = GTK_WIDGET (modest_connection_specific_smtp_window_new ());
+               modest_connection_specific_smtp_window_fill_with_connections (
+                       MODEST_CONNECTION_SPECIFIC_SMTP_WINDOW (self->specific_window), self->account_manager, 
+                       self->account_name);
+       }
+
+       /* Show the window: */  
+       gtk_window_set_transient_for (GTK_WINDOW (self->specific_window), GTK_WINDOW (self));
+       gtk_window_set_modal (GTK_WINDOW (self->specific_window), TRUE);
+    gtk_widget_show (self->specific_window);
 }
 
 static void
@@ -458,6 +536,39 @@ on_combo_outgoing_auth_changed (GtkComboBox *widget, gpointer user_data)
        gtk_widget_set_sensitive (self->caption_outgoing_password, secureauth_used);
 }
 
+static void
+on_combo_outgoing_security_changed (GtkComboBox *widget, gpointer user_data)
+{
+       ModestAccountSettingsDialog *self = MODEST_ACCOUNT_SETTINGS_DIALOG (user_data);
+       
+       const gint port_number = 
+               easysetup_serversecurity_combo_box_get_active_serversecurity_port (
+                       EASYSETUP_SERVERSECURITY_COMBO_BOX (self->combo_outgoing_security));
+
+       if(port_number != 0) {
+               gchar* str = g_strdup_printf ("%d", port_number);
+               gtk_entry_set_text (GTK_ENTRY (self->entry_outgoing_port), str);
+               g_free (str);   
+       }               
+}
+
+static void
+on_combo_incoming_security_changed (GtkComboBox *widget, gpointer user_data)
+{
+       ModestAccountSettingsDialog *self = MODEST_ACCOUNT_SETTINGS_DIALOG (user_data);
+       
+       const gint port_number = 
+               easysetup_serversecurity_combo_box_get_active_serversecurity_port (
+                       EASYSETUP_SERVERSECURITY_COMBO_BOX (self->combo_incoming_security));
+
+       if(port_number != 0) {
+               gchar* str = g_strdup_printf ("%d", port_number);
+               gtk_entry_set_text (GTK_ENTRY (self->entry_incoming_port), str);
+               g_free (str);   
+       }               
+}
+
+
 static GtkWidget* create_page_outgoing (ModestAccountSettingsDialog *self)
 {
        GtkWidget *box = gtk_vbox_new (FALSE, 2);
@@ -473,6 +584,7 @@ static GtkWidget* create_page_outgoing (ModestAccountSettingsDialog *self)
        GtkWidget *caption = create_caption_new_with_asterix (self, sizegroup, 
                _("mcen_li_emailsetup_smtp"), self->entry_outgoingserver, NULL, HILDON_CAPTION_OPTIONAL);
        gtk_widget_show (self->entry_outgoingserver);
+       connect_for_modified (self, self->entry_outgoingserver);
        gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
        gtk_widget_show (caption);
        
@@ -482,6 +594,7 @@ static GtkWidget* create_page_outgoing (ModestAccountSettingsDialog *self)
        caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_authentication"), 
                self->combo_outgoing_auth, NULL, HILDON_CAPTION_OPTIONAL);
        gtk_widget_show (self->combo_outgoing_auth);
+       connect_for_modified (self, self->combo_outgoing_auth);
        gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
        gtk_widget_show (caption);
        
@@ -493,6 +606,7 @@ static GtkWidget* create_page_outgoing (ModestAccountSettingsDialog *self)
        self->caption_outgoing_username = create_caption_new_with_asterix (self, sizegroup, _("mail_fi_username"), 
                self->entry_outgoing_username, NULL, HILDON_CAPTION_MANDATORY);
        gtk_widget_show (self->entry_outgoing_username);
+       connect_for_modified (self, self->entry_outgoing_username);
        gtk_box_pack_start (GTK_BOX (box), self->caption_outgoing_username, FALSE, FALSE, 2);
        gtk_widget_show (self->caption_outgoing_username);
        
@@ -512,6 +626,7 @@ static GtkWidget* create_page_outgoing (ModestAccountSettingsDialog *self)
        self->caption_outgoing_password = create_caption_new_with_asterix (self, sizegroup, 
                _("mail_fi_password"), self->entry_outgoing_password, NULL, HILDON_CAPTION_OPTIONAL);
        gtk_widget_show (self->entry_outgoing_password);
+       connect_for_modified (self, self->entry_outgoing_password);
        gtk_box_pack_start (GTK_BOX (box), self->caption_outgoing_password, FALSE, FALSE, 2);
        gtk_widget_show (self->caption_outgoing_password);
        
@@ -524,8 +639,12 @@ static GtkWidget* create_page_outgoing (ModestAccountSettingsDialog *self)
        caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_connection"), 
                self->combo_outgoing_security, NULL, HILDON_CAPTION_OPTIONAL);
        gtk_widget_show (self->combo_outgoing_security);
+       connect_for_modified (self, self->combo_outgoing_security);
        gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
-       gtk_widget_show (caption);      
+       gtk_widget_show (caption);
+       
+       /* Show a default port number when the security method changes, as per the UI spec: */
+       g_signal_connect (G_OBJECT (self->combo_outgoing_security), "changed", (GCallback)on_combo_outgoing_security_changed, self);
        
        /* The port widgets: */
        if (!self->entry_outgoing_port)
@@ -533,6 +652,7 @@ static GtkWidget* create_page_outgoing (ModestAccountSettingsDialog *self)
        caption = hildon_caption_new (sizegroup, _("mcen_fi_emailsetup_port"), 
                self->entry_outgoing_port, NULL, HILDON_CAPTION_OPTIONAL);
        gtk_widget_show (self->entry_outgoing_port);
+       connect_for_modified (self, self->entry_outgoing_port);
        gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
        gtk_widget_show (caption);
        
@@ -544,6 +664,7 @@ static GtkWidget* create_page_outgoing (ModestAccountSettingsDialog *self)
        }
        gtk_box_pack_start (GTK_BOX (box), self->checkbox_outgoing_smtp_specific, FALSE, FALSE, 2);
        gtk_widget_show (self->checkbox_outgoing_smtp_specific);
+       connect_for_modified (self, self->checkbox_outgoing_smtp_specific);
        
        /* Connection-specific SMTP-Severs Edit button: */
        if (!self->button_outgoing_smtp_servers)
@@ -567,6 +688,48 @@ static GtkWidget* create_page_outgoing (ModestAccountSettingsDialog *self)
        return GTK_WIDGET (box);
 }
 
+static gboolean
+check_data (ModestAccountSettingsDialog *self)
+{
+       /* Check that the title is not already in use: */
+       const gchar* account_title = gtk_entry_get_text (GTK_ENTRY (self->entry_account_title));
+       if ((!account_title) || (strlen(account_title) == 0))
+               return FALSE; /* Should be prevented already anyway. */
+               
+       if (strcmp(account_title, self->original_account_title) != 0) {
+               /* Check the changed title: */
+               const gboolean name_in_use  = modest_account_mgr_account_with_display_name_exists (self->account_manager,
+                       account_title);
+       
+               if (name_in_use) {
+                       /* Warn the user via a dialog: */
+                       show_error (GTK_WINDOW (self), _("mail_ib_account_name_already_existing"));
+               
+                       return FALSE;
+               }
+       }
+
+       /* Check that the email address is valud: */
+       const gchar* email_address = gtk_entry_get_text (GTK_ENTRY (self->entry_user_email));
+       if ((!email_address) || (strlen(email_address) == 0))
+               return FALSE;
+                       
+       if (!modest_text_utils_validate_email_address (email_address)) {
+               /* Warn the user via a dialog: */
+               show_error (GTK_WINDOW (self), _("mcen_ib_invalid_email"));
+                                         
+        /* Return focus to the email address entry: */
+        gtk_widget_grab_focus (self->entry_user_email);
+        
+               return FALSE;
+       }
+       
+       /* TODO: The UI Spec wants us to check that the servernames are valid, 
+        * but does not specify how.
+        */
+        
+       return TRUE;
+}
 /*
  */
 static void 
@@ -577,10 +740,43 @@ on_response (GtkDialog *wizard_dialog,
        ModestAccountSettingsDialog *self = MODEST_ACCOUNT_SETTINGS_DIALOG (wizard_dialog);
        enable_buttons (self);
        
-       /* TODO: Prevent the OK response if the data is invalid. */
+       gboolean prevent_response = FALSE;
        
-       if (response_id == GTK_RESPONSE_OK)
-         save_configuration (self);
+       /* Warn about unsaved changes: */
+       if (response_id == GTK_RESPONSE_CANCEL && self->modified) {
+               GtkDialog *dialog = GTK_DIALOG (gtk_message_dialog_new (GTK_WINDOW (self),
+               (GtkDialogFlags)0,
+                GTK_MESSAGE_INFO,
+                GTK_BUTTONS_OK_CANCEL, /* TODO: These button names are ambiguous, and not specified in the UI specification. */
+                _("imum_nc_wizard_confirm_lose_changes") ));
+                
+                const gint dialog_response = gtk_dialog_run (dialog);
+                gtk_widget_destroy (GTK_WIDGET (dialog));
+                
+               if (dialog_response != GTK_RESPONSE_OK)
+                       prevent_response = TRUE;
+       }
+       /* Check for invalid input: */
+       else if (!check_data (self)) {
+               prevent_response = TRUE;
+       }
+               
+       if (prevent_response) {
+               /* This is a nasty hack. murrayc. */
+               /* Don't let the dialog close */
+       g_signal_stop_emission_by_name (wizard_dialog, "response");
+               return; 
+       }
+               
+               
+       if (response_id == GTK_RESPONSE_OK) {
+               /* Try to save the changes: */  
+               const gboolean saved = save_configuration (self);
+               if (saved)
+                       show_ok (GTK_WINDOW (self), _("mcen_ib_advsetup_settings_saved"));
+               else
+                       show_error (GTK_WINDOW (self), _("mail_ib_setting_failed"));
+       }
 }
 
 static void
@@ -626,8 +822,14 @@ modest_account_settings_dialog_init (ModestAccountSettingsDialog *self)
     gtk_dialog_add_button (GTK_DIALOG(self), GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL);
     
     /* Connect to the dialog's response signal: */
-    g_signal_connect_after (G_OBJECT (self), "response",
-            G_CALLBACK (on_response), self);       
+    /* We use connect-before 
+     * so we can stop the signal emission, 
+     * to stop the default signal handler from closing the dialog.
+     */
+    g_signal_connect (G_OBJECT (self), "response",
+            G_CALLBACK (on_response), self); 
+            
+    self->modified = FALSE;      
 }
 
 ModestAccountSettingsDialog*
@@ -644,11 +846,12 @@ void modest_account_settings_dialog_set_account_name (ModestAccountSettingsDialo
        if (!account_name)
                return;
                
-       /* Save the account name so we can refer to it if the user changes it: */
-       if (dialog->original_account_name)
-               g_free (dialog->original_account_name);
-       dialog->original_account_name = g_strdup (account_name);
+       /* Save the account name so we can refer to it later: */
+       if (dialog->account_name)
+               g_free (dialog->account_name);
+       dialog->account_name = g_strdup (account_name);
        
+               
        /* Get the account data for this account name: */
        ModestAccountData *account_data = modest_account_mgr_get_account_data (dialog->account_manager, 
                account_name);
@@ -656,6 +859,12 @@ void modest_account_settings_dialog_set_account_name (ModestAccountSettingsDialo
                g_printerr ("modest: failed to get account data for %s\n", account_name);
                return;
        }
+       
+       /* Save the account title so we can refer to it if the user changes it: */
+       if (dialog->original_account_title)
+               g_free (dialog->original_account_title);
+       dialog->original_account_title = g_strdup (account_data->display_name);
+       
 
        if (!(account_data->store_account)) {
                g_printerr ("modest: account has no stores: %s\n", account_name);
@@ -663,19 +872,47 @@ void modest_account_settings_dialog_set_account_name (ModestAccountSettingsDialo
        }
                
        /* Show the account data in the widgets: */
+       
+       /* Note that we never show the non-display name in the UI.
+        * (Though the display name defaults to the non-display name at the start.) */
        gtk_entry_set_text( GTK_ENTRY (dialog->entry_account_title),
-               account_name ? account_name : "");
+               account_data->display_name ? account_data->display_name : "");
+               
        gtk_entry_set_text( GTK_ENTRY (dialog->entry_user_name), 
                account_data->fullname ? account_data->fullname : "");
        gtk_entry_set_text( GTK_ENTRY (dialog->entry_user_email), 
                account_data->email ? account_data->email : "");
                
+       ModestServerAccountData *incoming_account = account_data->store_account;
+               
+       if (incoming_account)
+               modest_retrieve_combo_box_fill (MODEST_RETRIEVE_COMBO_BOX (dialog->combo_retrieve), incoming_account->proto);
+       gchar *retrieve = modest_account_mgr_get_string (dialog->account_manager, account_name,
+               MODEST_ACCOUNT_RETRIEVE, FALSE /* not server account */);
+       if (!retrieve) {
+               /* Default to something, though no default is specified in the UI spec: */
+               retrieve = g_strdup (MODEST_ACCOUNT_RETRIEVE_VALUE_HEADERS_ONLY);
+       }
+       modest_retrieve_combo_box_set_active_retrieve_conf (MODEST_RETRIEVE_COMBO_BOX (dialog->combo_retrieve), retrieve);
+       g_free (retrieve);
+       
+       const gint limit_retrieve = modest_account_mgr_get_int (dialog->account_manager, account_name,
+               MODEST_ACCOUNT_LIMIT_RETRIEVE, FALSE /* not server account */);
+       modest_limit_retrieve_combo_box_set_active_limit_retrieve (MODEST_LIMIT_RETRIEVE_COMBO_BOX (dialog->combo_limit_retrieve), limit_retrieve);
+       
+       
        const gboolean leave_on_server = modest_account_mgr_get_bool (dialog->account_manager, account_name,
                MODEST_ACCOUNT_LEAVE_ON_SERVER, FALSE /* not server account */);
-       gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (dialog->checkbox_leave_messages), leave_on_server);
-               
+       gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (dialog->checkbox_leave_messages), leave_on_server);    
+       
+       /* Only show the leave-on-server checkbox for POP, 
+        * as per the UI spec: */
+       if (incoming_account->proto != MODEST_PROTOCOL_STORE_POP) {
+               gtk_widget_hide (dialog->checkbox_leave_messages);
+       } else {
+               gtk_widget_show (dialog->checkbox_leave_messages);
+       }
                
-       ModestServerAccountData *incoming_account = account_data->store_account;
        if (incoming_account) {
                gtk_entry_set_text( GTK_ENTRY (dialog->entry_user_username),
                        incoming_account->username ? incoming_account->username : "");
@@ -685,11 +922,25 @@ void modest_account_settings_dialog_set_account_name (ModestAccountSettingsDialo
                gtk_entry_set_text( GTK_ENTRY (dialog->entry_incomingserver), 
                        incoming_account->hostname ? incoming_account->hostname : "");
                        
-               easysetup_serversecurity_combo_box_set_active_serversecurity (
-                       EASYSETUP_SERVERSECURITY_COMBO_BOX (dialog->combo_incoming_security), incoming_account->proto);
+               const ModestProtocol secure_auth = modest_server_account_get_secure_auth(
+                       dialog->account_manager, incoming_account->account_name);
+               gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON (dialog->checkbox_incoming_auth), 
+                       secure_auth == MODEST_PROTOCOL_AUTH_PASSWORD);
+                       
                update_incoming_server_title (dialog, incoming_account->proto);
                update_incoming_server_security_choices (dialog, incoming_account->proto);
                
+               const ModestProtocol security = modest_server_account_get_security (
+                       dialog->account_manager, incoming_account->account_name);
+               easysetup_serversecurity_combo_box_set_active_serversecurity (
+                       EASYSETUP_SERVERSECURITY_COMBO_BOX (dialog->combo_incoming_security), security);
+               
+               const gint port_num = modest_account_mgr_get_int (dialog->account_manager, incoming_account->account_name,
+                       MODEST_ACCOUNT_PORT, TRUE /* server account */);
+               gchar *port_str = g_strdup_printf ("%d", port_num);
+               gtk_entry_set_text (GTK_ENTRY (dialog->entry_incoming_port), port_str);
+               g_free (port_str);
+       
                /* TODO:
        gchar            *uri;
        ModestProtocol    proto;
@@ -705,88 +956,123 @@ void modest_account_settings_dialog_set_account_name (ModestAccountSettingsDialo
                gtk_entry_set_text( GTK_ENTRY (dialog->entry_outgoingserver), 
                        outgoing_account->hostname ? outgoing_account->hostname : "");
                
-               /* TODO: Dim these if secure authentication is None, as per the UI spec: */
                gtk_entry_set_text( GTK_ENTRY (dialog->entry_outgoing_username), 
                        outgoing_account->username ? outgoing_account->username : "");
                gtk_entry_set_text( GTK_ENTRY (dialog->entry_outgoing_password), 
                        outgoing_account->password ? outgoing_account->password : "");
                
-               /* TODO: How do we get the auth setting from the server account struct?: */
-               /* This seems to be in ->options, with hard-coded option names.
-                * This will need new API in ModestAccountMgr. */
+               /* Get the secure-auth setting: */
+               const ModestProtocol secure_auth = modest_server_account_get_secure_auth(
+                       dialog->account_manager, outgoing_account->account_name);
                easysetup_secureauth_combo_box_set_active_secureauth (
-                       EASYSETUP_SECUREAUTH_COMBO_BOX (dialog->combo_outgoing_auth), MODEST_PROTOCOL_AUTH_NONE);
+                       EASYSETUP_SECUREAUTH_COMBO_BOX (dialog->combo_outgoing_auth), secure_auth);
                on_combo_outgoing_auth_changed (GTK_COMBO_BOX (dialog->combo_outgoing_auth), dialog);
                
                easysetup_serversecurity_combo_box_fill (
-               EASYSETUP_SERVERSECURITY_COMBO_BOX (dialog->combo_outgoing_security), outgoing_account->proto);
-               
+                       EASYSETUP_SERVERSECURITY_COMBO_BOX (dialog->combo_outgoing_security), outgoing_account->proto);
                
+               /* Get the security setting: */
+               const ModestProtocol security = modest_server_account_get_security (
+                       dialog->account_manager, outgoing_account->account_name);
+               easysetup_serversecurity_combo_box_set_active_serversecurity (
+                       EASYSETUP_SERVERSECURITY_COMBO_BOX (dialog->combo_outgoing_security), security);
                
-               /* TODO: set port. */
+               const gint port_num = modest_account_mgr_get_int (dialog->account_manager, outgoing_account->account_name,
+                       MODEST_ACCOUNT_PORT, TRUE /* server account */);
+               gchar *port_str = g_strdup_printf ("%d", port_num);
+               gtk_entry_set_text (GTK_ENTRY (dialog->entry_outgoing_port), port_str);
+               g_free (port_str);
        }
        
-       /* TODO: account_data->display_name */
        /* account_data->is_enabled,  */
        /*account_data->is_default,  */
 
        /* account_data->store_account->proto */
 
        modest_account_mgr_free_account_data (dialog->account_manager, account_data);
+       
+       /* Unset the modified flag so we can detect changes later: */
+       dialog->modified = FALSE;
 }
 
-static void
+static gboolean
 save_configuration (ModestAccountSettingsDialog *dialog)
 {
-       g_assert (dialog->original_account_name);
+       g_assert (dialog->account_name);
        
-       const gchar* account_name = dialog->original_account_name;
+       const gchar* account_name = dialog->account_name;
                
        /* Set the account data from the widgets: */
        const gchar* user_name = gtk_entry_get_text (GTK_ENTRY (dialog->entry_user_name));
-       modest_account_mgr_set_string (dialog->account_manager, account_name,
+       gboolean test = modest_account_mgr_set_string (dialog->account_manager, account_name,
                MODEST_ACCOUNT_FULLNAME, user_name, FALSE /* not server account */);
+       if (!test)
+               return FALSE;
                
        const gchar* emailaddress = gtk_entry_get_text (GTK_ENTRY (dialog->entry_user_email));
-       modest_account_mgr_set_string (dialog->account_manager, account_name,
+       test = modest_account_mgr_set_string (dialog->account_manager, account_name,
                MODEST_ACCOUNT_EMAIL, emailaddress, FALSE /* not server account */);
-               
-       /* TODO: Change name: */
-       /* Possibly the account name may never change, but that should be hidden, 
-        * and the display name may change, defaulting to the account name.
-        */
+       if (!test)
+               return FALSE;
+       
+       gchar *retrieve = modest_retrieve_combo_box_get_active_retrieve_conf (
+               MODEST_RETRIEVE_COMBO_BOX (dialog->combo_retrieve));
+       modest_account_mgr_set_string (dialog->account_manager, account_name,
+               MODEST_ACCOUNT_RETRIEVE, retrieve, FALSE /* not server account */);
+       g_free (retrieve);
+       
+       const gint limit_retrieve = modest_limit_retrieve_combo_box_get_active_limit_retrieve (
+               MODEST_LIMIT_RETRIEVE_COMBO_BOX (dialog->combo_limit_retrieve));
+       modest_account_mgr_set_int (dialog->account_manager, account_name,
+               MODEST_ACCOUNT_LIMIT_RETRIEVE, limit_retrieve, FALSE /* not server account */);
        
        const gboolean leave_on_server = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (dialog->checkbox_leave_messages));
-       modest_account_mgr_set_bool (dialog->account_manager, account_name,
+       test = modest_account_mgr_set_bool (dialog->account_manager, account_name,
                MODEST_ACCOUNT_LEAVE_ON_SERVER, leave_on_server, FALSE /* not server account */);
-       
+       if (!test)
+               return FALSE;
+                       
        /* Incoming: */
        gchar* incoming_account_name = modest_account_mgr_get_string (dialog->account_manager, account_name,
                MODEST_ACCOUNT_STORE_ACCOUNT, FALSE /* not server account */);
        g_assert (incoming_account_name);
        
        const gchar* hostname = gtk_entry_get_text (GTK_ENTRY (dialog->entry_incomingserver));
-       modest_account_mgr_set_string (dialog->account_manager, incoming_account_name,
+       test = modest_account_mgr_set_string (dialog->account_manager, incoming_account_name,
                MODEST_ACCOUNT_HOSTNAME, hostname, TRUE /* server account */);
-               
+       if (!test)
+               return FALSE;
+                               
        const gchar* username = gtk_entry_get_text (GTK_ENTRY (dialog->entry_user_username));
-       modest_account_mgr_set_string (dialog->account_manager, incoming_account_name,
+       test = modest_account_mgr_set_string (dialog->account_manager, incoming_account_name,
                MODEST_ACCOUNT_USERNAME, username, TRUE /* server account */);
-               
+       if (!test)
+               return FALSE;
+                               
        const gchar* password = gtk_entry_get_text (GTK_ENTRY (dialog->entry_user_password));
-       modest_account_mgr_set_string (dialog->account_manager, incoming_account_name,
+       test = modest_account_mgr_set_string (dialog->account_manager, incoming_account_name,
                MODEST_ACCOUNT_PASSWORD, password, TRUE /*  server account */);
-       
-       /* TODO: How can we set these in the server account?:   
-       ModestProtocol protocol_authentication_incoming = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (self->checkbox_incoming_auth)) 
+       if (!test)
+               return FALSE;
+                       
+       const ModestProtocol protocol_authentication_incoming = gtk_toggle_button_get_active 
+               (GTK_TOGGLE_BUTTON (dialog->checkbox_incoming_auth)) 
                        ? MODEST_PROTOCOL_AUTH_PASSWORD
                        : MODEST_PROTOCOL_AUTH_NONE;
+       modest_server_account_set_secure_auth (dialog->account_manager, incoming_account_name, protocol_authentication_incoming);
                        
-       ModestProtocol protocol_security_incoming = easysetup_serversecurity_combo_box_get_active_serversecurity (
-               EASYSETUP_SERVERSECURITY_COMBO_BOX (self->combo_incoming_security));
-       
-       */
-       
+       const ModestProtocol protocol_security_incoming = easysetup_serversecurity_combo_box_get_active_serversecurity (
+               EASYSETUP_SERVERSECURITY_COMBO_BOX (dialog->combo_incoming_security));
+       modest_server_account_set_security (dialog->account_manager, incoming_account_name, protocol_security_incoming);
+       
+       /* port: */
+       const gchar* port_str = gtk_entry_get_text (GTK_ENTRY (dialog->entry_incoming_port));
+       gint port_num = 0;
+       if (port_str)
+               port_num = atoi (port_str);
+       modest_account_mgr_set_int (dialog->account_manager, incoming_account_name,
+                       MODEST_ACCOUNT_PORT, port_num, TRUE /* server account */);
+               
        g_free (incoming_account_name);
        
        /* Outgoing: */
@@ -795,104 +1081,62 @@ save_configuration (ModestAccountSettingsDialog *dialog)
        g_assert (outgoing_account_name);
        
        hostname = gtk_entry_get_text (GTK_ENTRY (dialog->entry_outgoingserver));
-       modest_account_mgr_set_string (dialog->account_manager, outgoing_account_name,
+       test = modest_account_mgr_set_string (dialog->account_manager, outgoing_account_name,
                MODEST_ACCOUNT_HOSTNAME, hostname, TRUE /* server account */);
+       if (!test)
+               return FALSE;
                
        username = gtk_entry_get_text (GTK_ENTRY (dialog->entry_outgoing_username));
-       modest_account_mgr_set_string (dialog->account_manager, outgoing_account_name,
+       test = modest_account_mgr_set_string (dialog->account_manager, outgoing_account_name,
                MODEST_ACCOUNT_USERNAME, username, TRUE /* server account */);
+       if (!test)
+               return FALSE;
                
        password = gtk_entry_get_text (GTK_ENTRY (dialog->entry_outgoing_password));
-       modest_account_mgr_set_string (dialog->account_manager, outgoing_account_name,
-               MODEST_ACCOUNT_PASSWORD, password, TRUE /*  server account */);
-                       
-       password = gtk_entry_get_text (GTK_ENTRY (dialog->entry_outgoing_password));
-       modest_account_mgr_set_string (dialog->account_manager, outgoing_account_name,
+       test = modest_account_mgr_set_string (dialog->account_manager, outgoing_account_name,
                MODEST_ACCOUNT_PASSWORD, password, TRUE /*  server account */);
+       if (!test)
+               return FALSE;
        
-       /* TODO: How do we set these in the account data?:
-       ModestProtocol protocol_security_outgoing = easysetup_serversecurity_combo_box_get_active_serversecurity (
-               EASYSETUP_SERVERSECURITY_COMBO_BOX (self->combo_outgoing_security));
+       const ModestProtocol protocol_security_outgoing = easysetup_serversecurity_combo_box_get_active_serversecurity (
+               EASYSETUP_SERVERSECURITY_COMBO_BOX (dialog->combo_outgoing_security));
+       modest_server_account_set_security (dialog->account_manager, outgoing_account_name, protocol_security_outgoing);
        
-       ModestProtocol protocol_authentication_outgoing = easysetup_secureauth_combo_box_get_active_secureauth (
-               EASYSETUP_SECUREAUTH_COMBO_BOX (self->combo_outgoing_auth));
-        */
+       const ModestProtocol protocol_authentication_outgoing = easysetup_secureauth_combo_box_get_active_secureauth (
+               EASYSETUP_SECUREAUTH_COMBO_BOX (dialog->combo_outgoing_auth));
+       modest_server_account_set_secure_auth (dialog->account_manager, outgoing_account_name, protocol_authentication_outgoing);       
                
+       /* port: */
+       port_str = gtk_entry_get_text (GTK_ENTRY (dialog->entry_outgoing_port));
+       port_num = 0;
+       if (port_str)
+               port_num = atoi (port_str);
+       modest_account_mgr_set_int (dialog->account_manager, outgoing_account_name,
+                       MODEST_ACCOUNT_PORT, port_num, TRUE /* server account */);
+                       
        g_free (outgoing_account_name);
        
-}
-
        
-#if 0
-static gboolean
-on_before_next (GtkDialog *dialog, GtkWidget *current_page, GtkWidget *next_page)
-{
-       ModestAccountSettingsDialog *self = MODEST_ACCOUNT_SETTINGS_DIALOG (dialog);
-       
-       /* Do extra validation that couldn't be done for every key press,
-        * either because it was too slow,
-        * or because it requires interaction:
-        */
-       if (current_page == self->page_account_details) {       
-               /* Check that the title is not already in use: */
-               const gchar* account_name = gtk_entry_get_text (GTK_ENTRY (self->entry_account_title));
-               if ((!account_name) || (strlen(account_name) == 0))
-                       return FALSE;
-                       
-               gboolean name_in_use = FALSE;
-               name_in_use = modest_account_mgr_account_exists (self->account_manager,
-                       account_name, FALSE /*  server_account */);
+       /* Set the changed account title last, to simplify the previous code: */
+       const gchar* account_title = gtk_entry_get_text (GTK_ENTRY (dialog->entry_account_title));
+       if ((!account_title) || (strlen(account_title) == 0))
+               return FALSE; /* Should be prevented already anyway. */
                
-               if (name_in_use) {
-                       /* Warn the user via a dialog: */
-                       show_error (GTK_WINDOW (self), _("mail_ib_account_name_already_existing."));
-            
-                       return FALSE;
-               }
-       }
-       else if (current_page == self->page_user_details) {
-               /* Check that the email address is valud: */
-               const gchar* email_address = gtk_entry_get_text (GTK_ENTRY (self->entry_user_email));
-               if ((!email_address) || (strlen(email_address) == 0))
-                       return FALSE;
-                       
-               if (!modest_text_utils_validate_email_address (email_address)) {
-                       /* Warn the user via a dialog: */
-                       show_error (GTK_WINDOW (self), _("mcen_ib_invalid_email"));
-                                             
-            /* Return focus to the email address entry: */
-            gtk_widget_grab_focus (self->entry_user_email);
-            
+       if (strcmp(account_title, account_name) != 0) {
+               /* Change the title: */
+               gboolean test = modest_account_mgr_set_string (dialog->account_manager, account_name,
+               MODEST_ACCOUNT_DISPLAY_NAME, account_title, FALSE /* not server account */);
+               if (!test)
                        return FALSE;
-               }
-               
-               /* Make sure that the subsequent pages are appropriate for the provider choice. */
-               create_subsequent_pages (self);
-       }
-       
-       /* TODO: The UI Spec wants us to check that the servernames are valid, 
-        * but does not specify how.
-        */
-         
-       if(next_page == self->page_incoming) {
-               set_default_custom_servernames (self);
-       }
-       else if (next_page == self->page_outgoing) {
-               set_default_custom_servernames (self);
-       }
-       
-       /* If this is the last page, and this is a click on Finish, 
-        * then attempt to create the dialog.
-        */
-       if(!next_page) /* This is NULL when this is a click on Finish. */
-       {
-               create_account (self);
        }
        
-       
-       return TRUE;
+       /* Save connection-specific SMTP server accounts: */
+       if (dialog->specific_window)
+               return modest_connection_specific_smtp_window_save_server_accounts (
+                       MODEST_CONNECTION_SPECIFIC_SMTP_WINDOW (dialog->specific_window), account_name);
+       else
+               return TRUE;
 }
-#endif
 
 static gboolean entry_is_empty (GtkWidget *entry)
 {
@@ -949,7 +1193,6 @@ modest_account_settings_dialog_class_init (ModestAccountSettingsDialogClass *kla
        object_class->finalize = modest_account_settings_dialog_finalize;
 }
  
-#if 0
 static void
 show_error (GtkWindow *parent_window, const gchar* text)
 {
@@ -962,7 +1205,19 @@ show_error (GtkWindow *parent_window, const gchar* text)
                 gtk_dialog_run (dialog);
                 gtk_widget_destroy (GTK_WIDGET (dialog));
 }
-#endif
+
+static void
+show_ok (GtkWindow *parent_window, const gchar* text)
+{
+       GtkDialog *dialog = GTK_DIALOG (gtk_message_dialog_new (parent_window,
+               (GtkDialogFlags)0,
+                GTK_MESSAGE_INFO,
+                GTK_BUTTONS_OK,
+                text ));
+                
+                gtk_dialog_run (dialog);
+                gtk_widget_destroy (GTK_WIDGET (dialog));
+}