2007-06-21 Armin Burgmeier <armin@openismus.com>
[modest] / src / maemo / easysetup / modest-easysetup-wizard.c
1 /* Copyright (c) 2006, Nokia Corporation
2  * All rights reserved.
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions are
6  * met:
7  *
8  * * Redistributions of source code must retain the above copyright
9  *   notice, this list of conditions and the following disclaimer.
10  * * Redistributions in binary form must reproduce the above copyright
11  *   notice, this list of conditions and the following disclaimer in the
12  *   documentation and/or other materials provided with the distribution.
13  * * Neither the name of the Nokia Corporation nor the names of its
14  *   contributors may be used to endorse or promote products derived from
15  *   this software without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
18  * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
19  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
20  * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
21  * OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
22  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
23  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
24  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
25  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
26  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
27  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29  
30
31 #include "modest-easysetup-wizard.h"
32 #include <glib/gi18n.h>
33 #include <gtk/gtknotebook.h>
34 #include <gtk/gtkvbox.h>
35 #include <gtk/gtklabel.h>
36 #include <gtk/gtkcombobox.h>
37 #include <gtk/gtkentry.h>
38 #include <gtk/gtkbutton.h>
39 #include <gtk/gtkcheckbutton.h>
40 #include <gtk/gtkmessagedialog.h>
41 #include <gtk/gtkseparator.h>
42 #include "maemo/easysetup/modest-easysetup-country-combo-box.h"
43 #include "maemo/easysetup/modest-easysetup-provider-combo-box.h"
44 #include "maemo/easysetup/modest-easysetup-servertype-combo-box.h"
45 #include "widgets/modest-serversecurity-combo-box.h"
46 #include "widgets/modest-secureauth-combo-box.h"
47 #include "widgets/modest-validating-entry.h"
48 #include "modest-text-utils.h"
49 #include "modest-account-mgr.h"
50 #include "modest-account-mgr-helpers.h"
51 #include "modest-runtime.h" /* For modest_runtime_get_account_mgr(). */
52 #include "maemo/modest-connection-specific-smtp-window.h"
53 #include "widgets/modest-ui-constants.h"
54 #include "maemo/modest-account-settings-dialog.h"
55 #include "maemo/modest-maemo-utils.h"
56 #include <gconf/gconf-client.h>
57 #include <string.h> /* For strlen(). */
58
59 /* Include config.h so that _() works: */
60 #ifdef HAVE_CONFIG_H
61 #include <config.h>
62 #endif
63
64 #define EXAMPLE_EMAIL_ADDRESS "first.last@provider.com"
65
66 G_DEFINE_TYPE (ModestEasysetupWizardDialog, modest_easysetup_wizard_dialog, MODEST_TYPE_WIZARD_DIALOG);
67
68 #define WIZARD_DIALOG_GET_PRIVATE(o)                                    \
69         (G_TYPE_INSTANCE_GET_PRIVATE ((o), MODEST_TYPE_EASYSETUP_WIZARD_DIALOG, ModestEasysetupWizardDialogPrivate))
70
71 typedef struct _ModestEasysetupWizardDialogPrivate ModestEasysetupWizardDialogPrivate;
72
73 typedef enum {
74         MODEST_EASYSETUP_WIZARD_DIALOG_INCOMING_CHANGED = 0x01,
75         MODEST_EASYSETUP_WIZARD_DIALOG_OUTGOING_CHANGED = 0x02
76 } ModestEasysetupWizardDialogServerChanges;
77
78 struct _ModestEasysetupWizardDialogPrivate
79 {
80         ModestPresets *presets;
81
82         /* Remember what fields the user edited manually to not prefill them
83          * again. */
84         ModestEasysetupWizardDialogServerChanges server_changes;
85 };
86
87 static void
88 modest_easysetup_wizard_dialog_get_property (GObject *object, guint property_id,
89                                              GValue *value, GParamSpec *pspec)
90 {
91         switch (property_id) {
92         default:
93                 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
94         }
95 }
96
97 static void
98 modest_easysetup_wizard_dialog_set_property (GObject *object, guint property_id,
99                                              const GValue *value, GParamSpec *pspec)
100 {
101         switch (property_id) {
102         default:
103                 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
104         }
105 }
106
107 static void
108 modest_easysetup_wizard_dialog_dispose (GObject *object)
109 {
110         if (G_OBJECT_CLASS (modest_easysetup_wizard_dialog_parent_class)->dispose)
111                 G_OBJECT_CLASS (modest_easysetup_wizard_dialog_parent_class)->dispose (object);
112 }
113
114 static void
115 modest_easysetup_wizard_dialog_finalize (GObject *object)
116 {
117         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (object);
118         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
119         
120         if (self->account_manager)
121                 g_object_unref (G_OBJECT (self->account_manager));
122                 
123         if (priv->presets)
124                 modest_presets_destroy (priv->presets);
125                 
126         if (self->specific_window)
127                 gtk_widget_destroy (self->specific_window);
128                 
129         g_free (self->saved_account_name);
130         
131         G_OBJECT_CLASS (modest_easysetup_wizard_dialog_parent_class)->finalize (object);
132 }
133
134 static void
135 show_error (GtkWindow *parent_window, const gchar* text);
136
137 static gboolean
138 create_account (ModestEasysetupWizardDialog *self, gboolean enabled);
139
140 static void
141 create_subsequent_easysetup_pages (ModestEasysetupWizardDialog *self);
142
143 static void
144 set_default_custom_servernames(ModestEasysetupWizardDialog *dialog);
145
146 static void on_combo_servertype_changed(GtkComboBox *combobox, gpointer user_data);
147
148 static gint get_serverport_incoming(ModestPresetsServerType servertype_incoming,
149                                                                                                                                                 ModestPresetsSecurity security_incoming)
150 {
151         int serverport_incoming = 0;
152                 /* We don't check for SMTP here as that is impossible for an incoming server. */
153                 if (servertype_incoming == MODEST_PRESETS_SERVER_TYPE_IMAP) {
154                         serverport_incoming =
155                                 (security_incoming & MODEST_PRESETS_SECURITY_SECURE_INCOMING_ALTERNATE_PORT) ? 993 : 143; 
156                 } else if (servertype_incoming == MODEST_PRESETS_SERVER_TYPE_POP) {
157                         serverport_incoming =
158                                 (security_incoming & MODEST_PRESETS_SECURITY_SECURE_INCOMING_ALTERNATE_PORT) ? 995 : 110; 
159                 }
160         return serverport_incoming;
161 }
162
163 static GList* check_for_supported_auth_methods(ModestEasysetupWizardDialog* account_wizard)
164 {
165                 const ModestTransportStoreProtocol protocol = 
166           easysetup_servertype_combo_box_get_active_servertype (
167                                                                 EASYSETUP_SERVERTYPE_COMBO_BOX (account_wizard->combo_incoming_servertype));
168     const gchar* hostname = gtk_entry_get_text(GTK_ENTRY(account_wizard->entry_incomingserver));
169     const gchar* username = gtk_entry_get_text(GTK_ENTRY(account_wizard->entry_user_username));
170           const ModestConnectionProtocol protocol_security_incoming = 
171                                         modest_serversecurity_combo_box_get_active_serversecurity (
172                                                                                                                                                                                                                                                                                  MODEST_SERVERSECURITY_COMBO_BOX (
173                                                                                                                                                                                                                                                                                                                                                                                                                         account_wizard->combo_incoming_security));
174      int port_num = get_serverport_incoming(protocol, protocol_security_incoming); 
175      GList *list_auth_methods = 
176           modest_maemo_utils_get_supported_secure_authentication_methods (
177                                                                       protocol, 
178                                                                       hostname, port_num, username, GTK_WINDOW (account_wizard));       
179      if (list_auth_methods) {
180           /* TODO: Select the correct method */
181                           GList* list = NULL;
182                           GList* method;
183                           for (method = list_auth_methods; method != NULL; method = g_list_next(method)) {
184                                   ModestAuthProtocol auth = (ModestAuthProtocol) (GPOINTER_TO_INT(method->data));
185                                   if (modest_protocol_info_auth_is_secure(auth)) {
186                                          list = g_list_append(list, GINT_TO_POINTER(auth));
187                                  }
188                          }
189                          g_list_free(list_auth_methods);
190                          if (list)
191                                  return list;
192                  }
193                  /* no secure methods supported */
194      GtkWidget* error_dialog = gtk_message_dialog_new(GTK_WINDOW(account_wizard),
195                                                      GTK_DIALOG_MODAL, GTK_MESSAGE_ERROR,
196                                                      GTK_BUTTONS_OK, _("Server does not support secure authentication!"));
197      gtk_dialog_run(GTK_DIALOG(error_dialog));
198      gtk_widget_destroy(error_dialog);
199      return NULL;
200 }
201
202 static void
203 invoke_enable_buttons_vfunc (ModestEasysetupWizardDialog *wizard_dialog)
204 {
205         ModestWizardDialogClass *klass = MODEST_WIZARD_DIALOG_GET_CLASS (wizard_dialog);
206         
207         /* Call the vfunc, which may be overridden by derived classes: */
208         if (klass->enable_buttons) {
209                 GtkNotebook *notebook = NULL;
210                 g_object_get (wizard_dialog, "wizard-notebook", &notebook, NULL);
211                 
212                 const gint current_page_num = gtk_notebook_get_current_page (notebook);
213                 if (current_page_num == -1)
214                         return;
215                         
216                 GtkWidget* current_page_widget = gtk_notebook_get_nth_page (notebook, current_page_num);
217                 (*(klass->enable_buttons))(MODEST_WIZARD_DIALOG (wizard_dialog), current_page_widget);
218         }
219 }
220
221 static void
222 on_caption_entry_changed (GtkEditable *editable, gpointer user_data)
223 {
224         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
225         g_assert(self);
226         invoke_enable_buttons_vfunc(self);
227 }
228
229 static void
230 on_caption_combobox_changed (GtkComboBox *widget, gpointer user_data)
231 {
232         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
233         g_assert(self);
234         invoke_enable_buttons_vfunc(self);
235 }
236
237 /** This is a convenience function to create a caption containing a mandatory widget.
238  * When the widget is edited, the enable_buttons() vfunc will be called.
239  */
240 static GtkWidget* create_caption_new_with_asterisk(ModestEasysetupWizardDialog *self,
241                                                   GtkSizeGroup *group,
242                                                   const gchar *value,
243                                                   GtkWidget *control,
244                                                   GtkWidget *icon,
245                                                   HildonCaptionStatus flag)
246 {
247         GtkWidget *caption = NULL;
248   
249         /* Note: Previously, the translated strings already contained the "*",
250          * Comment out this code if they do again.
251          */
252         /* Add a * character to indicate mandatory fields,
253          * as specified in our "Email UI Specification": */
254         if (flag == HILDON_CAPTION_MANDATORY) {
255                 gchar* title = g_strdup_printf("%s*", value);
256                 caption = hildon_caption_new (group, title, control, icon, flag);       
257                 g_free(title);
258         }       
259         else
260                 caption = hildon_caption_new (group, value, control, icon, flag);
261
262         /* Connect to the appropriate changed signal for the widget, 
263          * so we can ask for the prev/next buttons to be enabled/disabled appropriately:
264          */
265         if (GTK_IS_ENTRY (control)) {
266                 g_signal_connect (G_OBJECT (control), "changed",
267                                   G_CALLBACK (on_caption_entry_changed), self);
268                 
269         }
270         else if (GTK_IS_COMBO_BOX (control)) {
271                 g_signal_connect (G_OBJECT (control), "changed",
272                                   G_CALLBACK (on_caption_combobox_changed), self);
273         }
274          
275         return caption;
276 }
277            
278 static GtkWidget*
279 create_page_welcome (ModestEasysetupWizardDialog *self)
280 {
281         GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
282         GtkWidget *label = gtk_label_new(_("mcen_ia_emailsetup_intro"));
283         gtk_label_set_line_wrap (GTK_LABEL (label), TRUE);
284         /* So that it is not truncated: */
285         gtk_label_set_max_width_chars (GTK_LABEL (label), 40);
286         gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
287         gtk_widget_show (label);
288         gtk_widget_show (GTK_WIDGET (box));
289         return GTK_WIDGET (box);
290 }
291
292 static void
293 on_combo_account_country (GtkComboBox *widget, gpointer user_data)
294 {
295         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
296         g_assert(self);
297         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
298         
299         /* Fill the providers combo, based on the selected country: */
300         GSList *list_mcc_ids = easysetup_country_combo_box_get_active_country_ids (
301                 EASYSETUP_COUNTRY_COMBO_BOX (self->combo_account_country));
302         easysetup_provider_combo_box_fill (
303                 EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider), priv->presets, list_mcc_ids);
304 }
305
306 static void
307 on_combo_account_serviceprovider (GtkComboBox *widget, gpointer user_data)
308 {
309         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
310         g_assert(self);
311         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
312         
313         /* Fill the providers combo, based on the selected country: */
314         gchar* provider_id = easysetup_provider_combo_box_get_active_provider_id (
315                 EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider));
316         
317         gchar* domain_name = NULL;
318         if(provider_id)
319                 domain_name = modest_presets_get_domain (priv->presets, provider_id);
320         
321         if(!domain_name)
322                 domain_name = g_strdup (EXAMPLE_EMAIL_ADDRESS);
323                 
324         if (self->entry_user_email)
325                 gtk_entry_set_text (GTK_ENTRY (self->entry_user_email), domain_name);
326                 
327         g_free (domain_name);
328         
329         g_free (provider_id);
330 }
331
332 static void
333 on_entry_max (ModestValidatingEntry *self, gpointer user_data)
334 {
335         ModestEasysetupWizardDialog *dialog = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
336         show_error (GTK_WINDOW (dialog), _("ckdg_ib_maximum_characters_reached"));
337 }
338
339 static GtkWidget*
340 create_page_account_details (ModestEasysetupWizardDialog *self)
341 {
342         GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
343         GtkWidget *label = gtk_label_new(_("mcen_ia_accountdetails"));
344         gtk_label_set_line_wrap (GTK_LABEL (label), TRUE);
345         gtk_label_set_max_width_chars (GTK_LABEL (label), 40);
346         gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, MODEST_MARGIN_HALF);
347         gtk_widget_show (label);
348         
349         /* Create a size group to be used by all captions.
350          * Note that HildonCaption does not create a default size group if we do not specify one.
351          * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
352         GtkSizeGroup* sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
353
354         /* The country widgets: */
355         self->combo_account_country = GTK_WIDGET (easysetup_country_combo_box_new ());
356         GtkWidget *caption = create_caption_new_with_asterisk (self, sizegroup, _("mcen_fi_country"), 
357                                                               self->combo_account_country, NULL, HILDON_CAPTION_OPTIONAL);
358         gtk_widget_show (self->combo_account_country);
359         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
360         gtk_widget_show (caption);
361         
362         /* connect to country combo's changed signal, so we can fill the provider combo: */
363         g_signal_connect (G_OBJECT (self->combo_account_country), "changed",
364                           G_CALLBACK (on_combo_account_country), self);
365             
366         GtkWidget *separator = gtk_hseparator_new ();
367         gtk_box_pack_start (GTK_BOX (box), separator, FALSE, FALSE, MODEST_MARGIN_HALF);
368         gtk_widget_show (separator);
369             
370         /* The service provider widgets: */     
371         self->combo_account_serviceprovider = GTK_WIDGET (easysetup_provider_combo_box_new ());
372         
373         caption = create_caption_new_with_asterisk (self, sizegroup, _("mcen_fi_serviceprovider"), 
374                                                    self->combo_account_serviceprovider, NULL, HILDON_CAPTION_OPTIONAL);
375         gtk_widget_show (self->combo_account_serviceprovider);
376         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
377         gtk_widget_show (caption);
378         
379         /* connect to providers combo's changed signal, so we can fill the email address: */
380         g_signal_connect (G_OBJECT (self->combo_account_serviceprovider), "changed",
381                           G_CALLBACK (on_combo_account_serviceprovider), self);
382         
383         /* TODO: Default to the current country somehow.
384          * But I don't know how to get the information that is specified in the 
385          * "Language and region" control panel. It does not seem be anywhere in gconf. murrayc.
386          *
387          * This is probably not the best choice of gconf key:
388          * This is the  "mcc used in the last pairing", ie. the last connection you made.
389          * set by the osso-operator-wizard package, suggested by Dirk-Jan Binnema.
390          *
391          */
392         GConfClient *client = gconf_client_get_default ();
393         GError *error = NULL;
394         const gchar* key = "/apps/osso/operator-wizard/last_mcc";
395         gint mcc_id = gconf_client_get_int(client, key, &error);
396         
397         if(mcc_id < 0)
398                 mcc_id = 0;
399      
400         if (error) {
401                 g_warning ("Error getting gconf key %s:\n%s", key, error->message);
402                 g_error_free (error);
403                 error = NULL;
404         
405                 mcc_id = 0;
406         }
407     
408         /* Note that gconf_client_get_int() seems to return 0 without an error if the key is not there
409          * This might just be a Maemo bug.
410          */
411         if (mcc_id == 0) 
412         {
413                 /* For now, we default to Finland when there is nothing better: */
414                 mcc_id = 244;
415         }
416    
417         easysetup_country_combo_box_set_active_country_id (
418                 EASYSETUP_COUNTRY_COMBO_BOX (self->combo_account_country), mcc_id);
419                 
420         
421         /* The description widgets: */  
422         self->entry_account_title = GTK_WIDGET (modest_validating_entry_new ());
423         /* Do use auto-capitalization: */
424         hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_account_title), 
425                                          HILDON_GTK_INPUT_MODE_FULL | HILDON_GTK_INPUT_MODE_AUTOCAP);
426         
427         /* Set a default account title, choosing one that does not already exist: */
428         /* Note that this is irrelevant to the non-user visible name, which we will create later. */
429         gchar* default_account_name_start = g_strdup (_("mcen_ia_emailsetup_defaultname"));
430         gchar* default_account_name = modest_account_mgr_get_unused_account_display_name (
431                 self->account_manager, default_account_name_start);
432         g_free (default_account_name_start);
433         default_account_name_start = NULL;
434         
435         gtk_entry_set_text( GTK_ENTRY (self->entry_account_title), default_account_name);
436         g_free (default_account_name);
437         default_account_name = NULL;
438
439         caption = create_caption_new_with_asterisk (self, sizegroup, _("mcen_fi_account_title"), 
440                                                    self->entry_account_title, NULL, HILDON_CAPTION_MANDATORY);
441         gtk_widget_show (self->entry_account_title);
442         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
443         gtk_widget_show (caption);
444         
445         /* Prevent the use of some characters in the account title, 
446          * as required by our UI specification: */
447         GList *list_prevent = NULL;
448         list_prevent = g_list_append (list_prevent, "\\");
449         list_prevent = g_list_append (list_prevent, "/");
450         list_prevent = g_list_append (list_prevent, ":");
451         list_prevent = g_list_append (list_prevent, "*");
452         list_prevent = g_list_append (list_prevent, "?");
453         list_prevent = g_list_append (list_prevent, "\""); /* The UI spec mentions â€œ, but maybe means ", maybe both. */
454         list_prevent = g_list_append (list_prevent, "“");
455         list_prevent = g_list_append (list_prevent, "<"); 
456         list_prevent = g_list_append (list_prevent, ">"); 
457         list_prevent = g_list_append (list_prevent, "|");
458         list_prevent = g_list_append (list_prevent, "^");       
459         modest_validating_entry_set_unallowed_characters (
460                 MODEST_VALIDATING_ENTRY (self->entry_account_title), list_prevent);
461         g_list_free (list_prevent);
462         
463         /* Set max length as in the UI spec:
464          * The UI spec seems to want us to show a dialog if we hit the maximum. */
465         gtk_entry_set_max_length (GTK_ENTRY (self->entry_account_title), 64);
466         modest_validating_entry_set_max_func (MODEST_VALIDATING_ENTRY (self->entry_account_title), 
467                                               on_entry_max, self);
468         
469         gtk_widget_show (GTK_WIDGET (box));
470         
471         return GTK_WIDGET (box);
472 }
473
474 static GtkWidget*
475 create_page_user_details (ModestEasysetupWizardDialog *self)
476 {
477         GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
478         
479         /* Create a size group to be used by all captions.
480          * Note that HildonCaption does not create a default size group if we do not specify one.
481          * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
482         GtkSizeGroup* sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
483          
484         /* The name widgets: */
485         self->entry_user_name = GTK_WIDGET (modest_validating_entry_new ());
486         /* Auto-capitalization is the default, so let's turn it off: */
487         hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_user_name), HILDON_GTK_INPUT_MODE_FULL);
488         /* Set max length as in the UI spec:
489          * The UI spec seems to want us to show a dialog if we hit the maximum. */
490         gtk_entry_set_max_length (GTK_ENTRY (self->entry_user_name), 64);
491         modest_validating_entry_set_max_func (MODEST_VALIDATING_ENTRY (self->entry_user_name), 
492                                               on_entry_max, self);
493         GtkWidget *caption = create_caption_new_with_asterisk (self, sizegroup, 
494                                                               _("mcen_li_emailsetup_name"), self->entry_user_name, NULL, HILDON_CAPTION_OPTIONAL);
495         gtk_widget_show (self->entry_user_name);
496         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
497         gtk_widget_show (caption);
498         
499         /* Prevent the use of some characters in the name, 
500          * as required by our UI specification: */
501         GList *list_prevent = NULL;
502         list_prevent = g_list_append (list_prevent, "<");
503         list_prevent = g_list_append (list_prevent, ">");
504         modest_validating_entry_set_unallowed_characters (
505                 MODEST_VALIDATING_ENTRY (self->entry_user_name), list_prevent);
506         g_list_free (list_prevent);
507         
508         /* The username widgets: */     
509         self->entry_user_username = GTK_WIDGET (modest_validating_entry_new ());
510         /* Auto-capitalization is the default, so let's turn it off: */
511         hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_user_username), HILDON_GTK_INPUT_MODE_FULL);
512         caption = create_caption_new_with_asterisk (self, sizegroup, _("mail_fi_username"), 
513                                                    self->entry_user_username, NULL, HILDON_CAPTION_MANDATORY);
514         gtk_widget_show (self->entry_user_username);
515         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
516         gtk_widget_show (caption);
517         
518         /* Prevent the use of some characters in the username, 
519          * as required by our UI specification: */
520         modest_validating_entry_set_unallowed_characters_whitespace (
521                 MODEST_VALIDATING_ENTRY (self->entry_user_username));
522         
523         /* Set max length as in the UI spec:
524          * The UI spec seems to want us to show a dialog if we hit the maximum. */
525         gtk_entry_set_max_length (GTK_ENTRY (self->entry_user_username), 64);
526         modest_validating_entry_set_max_func (MODEST_VALIDATING_ENTRY (self->entry_user_username), 
527                                               on_entry_max, self);
528         
529         /* The password widgets: */     
530         self->entry_user_password = gtk_entry_new ();
531         /* Auto-capitalization is the default, so let's turn it off: */
532         hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_user_password), 
533                                          HILDON_GTK_INPUT_MODE_FULL | HILDON_GTK_INPUT_MODE_INVISIBLE);
534         gtk_entry_set_visibility (GTK_ENTRY (self->entry_user_password), FALSE);
535         /* gtk_entry_set_invisible_char (GTK_ENTRY (self->entry_user_password), '*'); */
536         caption = create_caption_new_with_asterisk (self, sizegroup, 
537                                                    _("mail_fi_password"), self->entry_user_password, NULL, HILDON_CAPTION_OPTIONAL);
538         gtk_widget_show (self->entry_user_password);
539         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
540         gtk_widget_show (caption);
541         
542         /* The email address widgets: */        
543         self->entry_user_email = GTK_WIDGET (modest_validating_entry_new ());
544         /* Auto-capitalization is the default, so let's turn it off: */
545         hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_user_email), HILDON_GTK_INPUT_MODE_FULL);
546         caption = create_caption_new_with_asterisk (self, sizegroup, 
547                                                    _("mcen_li_emailsetup_email_address"), self->entry_user_email, NULL, HILDON_CAPTION_MANDATORY);
548         gtk_entry_set_text (GTK_ENTRY (self->entry_user_email), EXAMPLE_EMAIL_ADDRESS); /* Default text. */
549         gtk_widget_show (self->entry_user_email);
550         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
551         gtk_widget_show (caption);
552         
553         /* Set max length as in the UI spec:
554          * The UI spec seems to want us to show a dialog if we hit the maximum. */
555         gtk_entry_set_max_length (GTK_ENTRY (self->entry_user_email), 64);
556         modest_validating_entry_set_max_func (MODEST_VALIDATING_ENTRY (self->entry_user_email), 
557                                               on_entry_max, self);
558         
559         
560         gtk_widget_show (GTK_WIDGET (box));
561         
562         return GTK_WIDGET (box);
563 }
564
565 static GtkWidget* create_page_complete_easysetup (ModestEasysetupWizardDialog *self)
566 {
567         GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
568         
569         GtkWidget *label = gtk_label_new(_("mcen_ia_emailsetup_setup_complete"));
570         gtk_label_set_line_wrap (GTK_LABEL (label), TRUE);
571         gtk_label_set_max_width_chars (GTK_LABEL (label), 40);
572         gtk_misc_set_alignment (GTK_MISC (label), 0, 0.5);
573         gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
574         gtk_widget_show (label);
575         
576         label = gtk_label_new (_("mcen_ia_easysetup_complete"));
577         gtk_label_set_line_wrap (GTK_LABEL (label), TRUE);
578         gtk_label_set_max_width_chars (GTK_LABEL (label), 40);
579         gtk_misc_set_alignment (GTK_MISC (label), 0, 0.5);
580         gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
581         gtk_widget_show (label);
582         
583         gtk_widget_show (GTK_WIDGET (box));
584         return GTK_WIDGET (box);
585 }
586
587 /** Change the caption title for the incoming server, 
588  * as specified in the UI spec:
589  */
590 static void update_incoming_server_title (ModestEasysetupWizardDialog *self)
591 {
592         const ModestTransportStoreProtocol protocol = easysetup_servertype_combo_box_get_active_servertype (
593                 EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype));
594         const gchar* type = 
595                 (protocol == MODEST_PROTOCOL_STORE_POP ? 
596                  _("mail_fi_emailtype_pop3") : 
597                  _("mail_fi_emailtype_imap") );
598                         
599                 
600         /* Note that this produces a compiler warning, 
601          * because the compiler does not know that the translated string will have a %s in it.
602          * I do not see a way to avoid the warning while still using these Logical IDs. murrayc. */
603         gchar* incomingserver_title = g_strdup_printf(_("mcen_li_emailsetup_servertype"), type);
604         g_object_set (G_OBJECT (self->caption_incoming), "label", incomingserver_title, NULL);
605         g_free(incomingserver_title);
606 }
607
608 /** Change the caption title for the incoming server, 
609  * as specified in the UI spec:
610  */
611 static void update_incoming_server_security_choices (ModestEasysetupWizardDialog *self)
612 {
613         const ModestTransportStoreProtocol protocol = easysetup_servertype_combo_box_get_active_servertype (
614                 EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype));
615         
616         /* Fill the combo with appropriately titled choices for POP or IMAP. */
617         /* The choices are the same, but the titles are different, as in the UI spec. */
618         modest_serversecurity_combo_box_fill (
619                 MODEST_SERVERSECURITY_COMBO_BOX (self->combo_incoming_security), protocol);
620 }
621
622 static void on_combo_servertype_changed(GtkComboBox *combobox, gpointer user_data)
623 {
624         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
625         update_incoming_server_title (self);
626         update_incoming_server_security_choices (self);
627
628         set_default_custom_servernames (self);
629 }
630
631 static void on_entry_incoming_servername_changed(GtkEntry *entry, gpointer user_data)
632 {
633         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
634         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
635         priv->server_changes |= MODEST_EASYSETUP_WIZARD_DIALOG_INCOMING_CHANGED;
636 }
637
638 static GtkWidget* create_page_custom_incoming (ModestEasysetupWizardDialog *self)
639 {
640         GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
641
642         /* Show note that account type cannot be changed in future: */
643         GtkWidget *label = gtk_label_new (_("mcen_ia_emailsetup_account_type"));
644         gtk_label_set_line_wrap (GTK_LABEL (label), TRUE);
645         gtk_label_set_max_width_chars (GTK_LABEL (label), 40);
646         gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
647         gtk_widget_show (label);
648         
649         /* Create a size group to be used by all captions.
650          * Note that HildonCaption does not create a default size group if we do not specify one.
651          * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
652         GtkSizeGroup *sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
653          
654         /* The incoming server widgets: */
655         if (!self->combo_incoming_servertype)
656                 self->combo_incoming_servertype = GTK_WIDGET (easysetup_servertype_combo_box_new ());
657         easysetup_servertype_combo_box_set_active_servertype (
658                 EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype), MODEST_PROTOCOL_STORE_POP);
659         GtkWidget *caption = create_caption_new_with_asterisk (self, sizegroup, 
660                                                               _("mcen_li_emailsetup_type"), self->combo_incoming_servertype, NULL, HILDON_CAPTION_MANDATORY);
661         gtk_widget_show (self->combo_incoming_servertype);
662         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
663         gtk_widget_show (caption);
664         
665         if(!self->entry_incomingserver)
666                 self->entry_incomingserver = gtk_entry_new ();
667         /* Auto-capitalization is the default, so let's turn it off: */
668         hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_incomingserver), HILDON_GTK_INPUT_MODE_FULL);
669         set_default_custom_servernames (self);
670
671         if (self->caption_incoming)
672                 gtk_widget_destroy (self->caption_incoming);
673            
674         /* The caption title will be updated in update_incoming_server_title().
675          * so this default text will never be seen: */
676         /* (Note: Changing the title seems pointless. murrayc) */
677         self->caption_incoming = create_caption_new_with_asterisk (self, sizegroup, 
678                                                                   "Incoming Server", self->entry_incomingserver, NULL, HILDON_CAPTION_MANDATORY);
679         update_incoming_server_title (self);
680         gtk_widget_show (self->entry_incomingserver);
681         gtk_box_pack_start (GTK_BOX (box), self->caption_incoming, FALSE, FALSE, MODEST_MARGIN_HALF);
682         gtk_widget_show (self->caption_incoming);
683         
684         /* Change the caption title when the servertype changes, 
685          * as in the UI spec: */
686         g_signal_connect (G_OBJECT (self->combo_incoming_servertype), "changed",
687                           G_CALLBACK (on_combo_servertype_changed), self);
688
689         /* Remember when the servername was changed manually: */
690         g_signal_connect (G_OBJECT (self->entry_incomingserver), "changed",
691                           G_CALLBACK (on_entry_incoming_servername_changed), self);
692
693         /* The secure connection widgets: */    
694         if (!self->combo_incoming_security)
695                 self->combo_incoming_security = GTK_WIDGET (modest_serversecurity_combo_box_new ());
696         update_incoming_server_security_choices (self);
697         modest_serversecurity_combo_box_set_active_serversecurity (
698                 MODEST_SERVERSECURITY_COMBO_BOX (self->combo_incoming_security), MODEST_PROTOCOL_CONNECTION_NORMAL);
699         caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_connection"), 
700                                       self->combo_incoming_security, NULL, HILDON_CAPTION_OPTIONAL);
701         gtk_widget_show (self->combo_incoming_security);
702         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
703         gtk_widget_show (caption);
704         
705         if(!self->checkbox_incoming_auth)
706                 self->checkbox_incoming_auth = gtk_check_button_new ();
707         caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_authentication"), 
708                                       self->checkbox_incoming_auth, NULL, HILDON_CAPTION_OPTIONAL);
709         gtk_widget_show (self->checkbox_incoming_auth);
710         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
711         gtk_widget_show (caption);
712         
713         gtk_widget_show (GTK_WIDGET (box));
714         
715         return GTK_WIDGET (box);
716 }
717
718 static void
719 on_toggle_button_changed (GtkToggleButton *togglebutton, gpointer user_data)
720 {
721         GtkWidget *widget = GTK_WIDGET (user_data);
722         
723         /* Enable the widget only if the toggle button is active: */
724         const gboolean enable = gtk_toggle_button_get_active (togglebutton);
725         gtk_widget_set_sensitive (widget, enable);
726 }
727
728 /* Make the sensitivity of a widget depend on a toggle button.
729  */
730 static void
731 enable_widget_for_togglebutton (GtkWidget *widget, GtkToggleButton* button)
732 {
733         g_signal_connect (G_OBJECT (button), "toggled",
734                           G_CALLBACK (on_toggle_button_changed), widget);
735         
736         /* Set the starting sensitivity: */
737         on_toggle_button_changed (button, widget);
738 }
739
740 static void
741 on_button_outgoing_smtp_servers (GtkButton *button, gpointer user_data)
742 {
743         ModestEasysetupWizardDialog * self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
744         
745         /* Create the window, if necessary: */
746         if (!(self->specific_window)) {
747                 self->specific_window = GTK_WIDGET (modest_connection_specific_smtp_window_new ());
748                 modest_connection_specific_smtp_window_fill_with_connections (
749                         MODEST_CONNECTION_SPECIFIC_SMTP_WINDOW (self->specific_window), self->account_manager, 
750                         NULL /* account_name, not known yet. */);
751         }
752
753         /* Show the window: */
754         gtk_window_set_transient_for (GTK_WINDOW (self->specific_window), GTK_WINDOW (self));
755         gtk_widget_show (self->specific_window);
756 }
757
758 static void on_entry_outgoing_servername_changed (GtkEntry *entry, gpointer user_data)
759 {
760         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
761         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
762         priv->server_changes |= MODEST_EASYSETUP_WIZARD_DIALOG_OUTGOING_CHANGED;
763 }
764
765 static GtkWidget* create_page_custom_outgoing (ModestEasysetupWizardDialog *self)
766 {
767         GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
768         
769         /* Create a size group to be used by all captions.
770          * Note that HildonCaption does not create a default size group if we do not specify one.
771          * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
772         GtkSizeGroup *sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
773          
774         /* The outgoing server widgets: */
775         if (!self->entry_outgoingserver)
776                 self->entry_outgoingserver = gtk_entry_new ();
777         /* Auto-capitalization is the default, so let's turn it off: */
778         hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_outgoingserver), HILDON_GTK_INPUT_MODE_FULL);
779         GtkWidget *caption = create_caption_new_with_asterisk (self, sizegroup, 
780                                                               _("mcen_li_emailsetup_smtp"), self->entry_outgoingserver, NULL, HILDON_CAPTION_OPTIONAL);
781         gtk_widget_show (self->entry_outgoingserver);
782         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
783         gtk_widget_show (caption);
784         set_default_custom_servernames (self);
785         
786         /* The secure connection widgets: */    
787         if (!self->combo_outgoing_security)
788                 self->combo_outgoing_security = GTK_WIDGET (modest_serversecurity_combo_box_new ());
789         modest_serversecurity_combo_box_fill (
790                 MODEST_SERVERSECURITY_COMBO_BOX (self->combo_outgoing_security), MODEST_PROTOCOL_TRANSPORT_SMTP);
791         modest_serversecurity_combo_box_set_active_serversecurity (
792                 MODEST_SERVERSECURITY_COMBO_BOX (self->combo_outgoing_security), MODEST_PROTOCOL_CONNECTION_NORMAL);
793         caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_connection"), 
794                                       self->combo_outgoing_security, NULL, HILDON_CAPTION_OPTIONAL);
795         gtk_widget_show (self->combo_outgoing_security);
796         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
797         gtk_widget_show (caption);
798         
799         /* The secure authentication widgets: */
800         if (!self->combo_outgoing_auth)
801                 self->combo_outgoing_auth = GTK_WIDGET (modest_secureauth_combo_box_new ());
802         caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_authentication"), 
803                                       self->combo_outgoing_auth, NULL, HILDON_CAPTION_OPTIONAL);
804         gtk_widget_show (self->combo_outgoing_auth);
805         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
806         gtk_widget_show (caption);
807         
808         GtkWidget *separator = gtk_hseparator_new ();
809         gtk_box_pack_start (GTK_BOX (box), separator, FALSE, FALSE, MODEST_MARGIN_HALF);
810         gtk_widget_show (separator);
811         
812         /* connection-specific checkbox: */
813         if (!self->checkbox_outgoing_smtp_specific) {
814                 self->checkbox_outgoing_smtp_specific = gtk_check_button_new ();
815                 gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (self->checkbox_outgoing_smtp_specific), 
816                                               FALSE);
817         }
818         caption = hildon_caption_new (sizegroup, _("mcen_fi_advsetup_connection_smtp"), 
819                                       self->checkbox_outgoing_smtp_specific, NULL, HILDON_CAPTION_OPTIONAL);
820         gtk_widget_show (self->checkbox_outgoing_smtp_specific);
821         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
822         gtk_widget_show (caption);
823         
824         /* Connection-specific SMTP-Severs Edit button: */
825         if (!self->button_outgoing_smtp_servers)
826                 self->button_outgoing_smtp_servers = gtk_button_new_with_label (_("mcen_bd_edit"));
827         caption = hildon_caption_new (sizegroup, _("mcen_fi_advsetup_optional_smtp"), 
828                                       self->button_outgoing_smtp_servers, NULL, HILDON_CAPTION_OPTIONAL);
829         hildon_caption_set_child_expand (HILDON_CAPTION (caption), FALSE);
830         gtk_widget_show (self->button_outgoing_smtp_servers);
831         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
832         gtk_widget_show (caption);
833         
834         /* Only enable the button when the checkbox is checked: */
835         enable_widget_for_togglebutton (self->button_outgoing_smtp_servers, 
836                                         GTK_TOGGLE_BUTTON (self->checkbox_outgoing_smtp_specific));
837                 
838         g_signal_connect (G_OBJECT (self->button_outgoing_smtp_servers), "clicked",
839                           G_CALLBACK (on_button_outgoing_smtp_servers), self);
840
841         g_signal_connect (G_OBJECT (self->entry_outgoingserver), "changed",
842                           G_CALLBACK (on_entry_outgoing_servername_changed), self);
843         
844         
845         gtk_widget_show (GTK_WIDGET (box));
846         
847         return GTK_WIDGET (box);
848 }
849
850 static gboolean
851 show_advanced_edit(gpointer user_data)
852 {
853         ModestEasysetupWizardDialog * self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
854         
855         if (!(self->saved_account_name))
856                 return FALSE;
857         
858         /* Show the Account Settings window: */
859         ModestAccountSettingsDialog *dialog = modest_account_settings_dialog_new ();
860         modest_account_settings_dialog_set_account_name (dialog, self->saved_account_name);
861         
862         gtk_window_set_transient_for (GTK_WINDOW (dialog), GTK_WINDOW (self));
863         
864         gtk_dialog_run (GTK_DIALOG (dialog));
865
866         gtk_widget_destroy (GTK_WIDGET (dialog));
867         
868         return FALSE; /* Do not call this timeout callback again. */
869 }
870
871 static void
872 on_button_edit_advanced_settings (GtkButton *button, gpointer user_data)
873 {
874         ModestEasysetupWizardDialog * self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
875         
876         /* Save the new account, so we can edit it with ModestAccountSettingsDialog, 
877          * without recoding it to use non-gconf information.
878          * This account will be deleted if Finish is never actually clicked. */
879
880         gboolean saved = TRUE;
881         if (!(self->saved_account_name)) {
882                 saved = create_account (self, FALSE);
883         }
884                 
885         if (!saved)
886                 return;
887                 
888         if (!(self->saved_account_name))
889                 return;
890         
891         /* Show the Account Settings window: */
892         show_advanced_edit(self);
893 }
894 static GtkWidget* create_page_complete_custom (ModestEasysetupWizardDialog *self)
895 {
896         GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
897         GtkWidget *label = gtk_label_new(_("mcen_ia_emailsetup_setup_complete"));
898         gtk_misc_set_alignment (GTK_MISC (label), 0, 0.5);
899         gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
900         gtk_widget_show (label);
901         
902         label = gtk_label_new (_("mcen_ia_customsetup_complete"));
903         gtk_misc_set_alignment (GTK_MISC (label), 0, 0.5);
904         gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
905         gtk_widget_show (label);
906         
907         if (!self->button_edit)
908                 self->button_edit = gtk_button_new_with_label (_("mcen_bd_edit"));
909         GtkWidget *caption = hildon_caption_new (NULL, _("mcen_fi_advanced_settings"), 
910                                                  self->button_edit, NULL, HILDON_CAPTION_OPTIONAL);
911         hildon_caption_set_child_expand (HILDON_CAPTION (caption), FALSE);
912         gtk_widget_show (self->button_edit);
913         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
914         gtk_widget_show (caption);
915         
916         g_signal_connect (G_OBJECT (self->button_edit), "clicked", 
917                           G_CALLBACK (on_button_edit_advanced_settings), self);
918         
919         gtk_widget_show (GTK_WIDGET (box));
920         return GTK_WIDGET (box);
921 }
922
923
924 /*
925  */
926 static void 
927 on_response (ModestWizardDialog *wizard_dialog,
928              gint response_id,
929              gpointer user_data)
930 {
931         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (wizard_dialog);
932         
933         if (response_id == GTK_RESPONSE_CANCEL) {
934                 /* Remove any temporarily-saved account that will not actually be needed: */
935                 if (self->saved_account_name) {
936                         modest_account_mgr_remove_account (self->account_manager,
937                                                            self->saved_account_name, FALSE);
938                 }       
939         }
940         
941         invoke_enable_buttons_vfunc (self);
942 }
943
944 static void
945 modest_easysetup_wizard_dialog_init (ModestEasysetupWizardDialog *self)
946 {
947         gtk_container_set_border_width (GTK_CONTAINER (self), MODEST_MARGIN_HALF);
948         
949         /* Create the notebook to be used by the ModestWizardDialog base class:
950          * Each page of the notebook will be a page of the wizard: */
951         GtkNotebook *notebook = GTK_NOTEBOOK (gtk_notebook_new());
952         
953         /* Set the notebook used by the ModestWizardDialog base class: */
954         g_object_set (G_OBJECT(self), "wizard-notebook", notebook, NULL);
955     
956         /* Set the wizard title:
957          * The actual window title will be a combination of this and the page's tab label title. */
958         g_object_set (G_OBJECT(self), "wizard-name", _("mcen_ti_emailsetup"), NULL);
959
960         /* Read in the information about known service providers: */
961         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
962         
963         const gchar* filepath = MODEST_PROVIDERS_DATA_PATH; /* Defined in config.h */
964         priv->presets = modest_presets_new (filepath);
965         if (!(priv->presets)) {
966                 g_warning ("Could not locate the official provider data keyfile from %s", filepath);
967         }
968         
969         g_assert(priv->presets);
970
971         /* The server fields did not have been manually changed yet */
972         priv->server_changes = 0;
973
974         /* Get the account manager object, 
975          * so we can check for existing accounts,
976          * and create new accounts: */
977         self->account_manager = modest_runtime_get_account_mgr ();
978         g_assert (self->account_manager);
979         g_object_ref (self->account_manager);
980         
981         /* Create the common pages, 
982          */
983         self->page_welcome = create_page_welcome (self);
984         self->page_account_details = create_page_account_details (self);
985         self->page_user_details = create_page_user_details (self);
986         
987         /* Add the common pages: */
988         gtk_notebook_append_page (notebook, self->page_welcome, 
989                                   gtk_label_new (_("mcen_ti_emailsetup_welcome")));
990         gtk_notebook_append_page (notebook, self->page_account_details, 
991                                   gtk_label_new (_("mcen_ti_accountdetails")));
992         gtk_notebook_append_page (notebook, self->page_user_details, 
993                                   gtk_label_new (_("mcen_ti_emailsetup_userdetails")));
994                 
995         /* Create and add the easysetup-specific pages,
996          * because we need _some_ final page to enable the Next and Finish buttons: */
997         create_subsequent_easysetup_pages (self);
998
999         /* Connect to the dialog's response signal so we can enable/disable buttons 
1000          * for the newly-selected page, because the prev/next buttons cause response to be emitted.
1001          * Note that we use g_signal_connect_after() instead of g_signal_connect()
1002          * so that we can be enable/disable after ModestWizardDialog has done its own 
1003          * enabling/disabling of buttons.
1004          * 
1005          * HOWEVER, this doesn't work because ModestWizardDialog's response signal handler 
1006          * does g_signal_stop_emission_by_name(), stopping our signal handler from running.
1007          * 
1008          * It's not enough to connect to the notebook's switch-page signal, because 
1009          * ModestWizardDialog's "response" signal handler enables the buttons itself, 
1010          * _after_ switching the page (understandably).
1011          * (Note that if we had, if we used g_signal_connect() instead of g_signal_connect_after()
1012          * then gtk_notebook_get_current_page() would return an incorrect value.)
1013          */
1014         g_signal_connect_after (G_OBJECT (self), "response",
1015                                 G_CALLBACK (on_response), self);
1016
1017         /* When this window is shown, hibernation should not be possible, 
1018          * because there is no sensible way to save the state: */
1019         modest_window_mgr_prevent_hibernation_while_window_is_shown (
1020                 modest_runtime_get_window_mgr (), GTK_WINDOW (self)); 
1021 }
1022
1023 ModestEasysetupWizardDialog*
1024 modest_easysetup_wizard_dialog_new (void)
1025 {
1026         return g_object_new (MODEST_TYPE_EASYSETUP_WIZARD_DIALOG, NULL);
1027 }
1028
1029 static void create_subsequent_customsetup_pages (ModestEasysetupWizardDialog *self)
1030 {
1031         GtkNotebook *notebook = NULL;
1032         g_object_get (self, "wizard-notebook", &notebook, NULL);
1033         g_assert(notebook);
1034         
1035         /* Create the custom pages: */
1036         if(!(self->page_custom_incoming)) {
1037                 self->page_custom_incoming = create_page_custom_incoming (self);
1038         }
1039                 
1040         if(!(self->page_custom_outgoing)) {
1041                 self->page_custom_outgoing = create_page_custom_outgoing (self);
1042         }
1043         
1044         if(!(self->page_complete_customsetup)) {
1045                 self->page_complete_customsetup = create_page_complete_custom (self);
1046         }
1047         
1048         if (!gtk_widget_get_parent (GTK_WIDGET (self->page_custom_incoming)))
1049                 gtk_notebook_append_page (notebook, self->page_custom_incoming,
1050                                           gtk_label_new (_("mcen_ti_emailsetup_incomingdetails")));
1051         
1052         if (!gtk_widget_get_parent (GTK_WIDGET (self->page_custom_outgoing)))           
1053                 gtk_notebook_append_page (notebook, self->page_custom_outgoing,
1054                                           gtk_label_new (_("mcen_ti_emailsetup_outgoingdetails")));
1055                 
1056         if (!gtk_widget_get_parent (GTK_WIDGET (self->page_complete_customsetup)))
1057                 gtk_notebook_append_page (notebook, self->page_complete_customsetup,
1058                                           gtk_label_new (_("mcen_ti_emailsetup_complete")));
1059                         
1060         /* This is unnecessary with GTK+ 2.10: */
1061         modest_wizard_dialog_force_title_update (MODEST_WIZARD_DIALOG(self));
1062 }
1063         
1064 static void create_subsequent_easysetup_pages (ModestEasysetupWizardDialog *self)
1065 {
1066         GtkNotebook *notebook = NULL;
1067         g_object_get (self, "wizard-notebook", &notebook, NULL);
1068         g_assert(notebook);
1069         
1070         /* Create the easysetup-specific pages: */
1071         if(!self->page_complete_easysetup)
1072                 self->page_complete_easysetup = create_page_complete_easysetup (self);
1073
1074         if (!gtk_widget_get_parent (GTK_WIDGET (self->page_complete_easysetup)))
1075                 gtk_notebook_append_page (notebook, self->page_complete_easysetup, 
1076                                           gtk_label_new (_("mcen_ti_emailsetup_complete")));
1077                         
1078         /* This is unnecessary with GTK+ 2.10: */
1079         modest_wizard_dialog_force_title_update (MODEST_WIZARD_DIALOG(self));
1080 }
1081 /* After the user details page,
1082  * the following pages depend on whether "Other" was chosen 
1083  * in the provider combobox on the account page
1084  */
1085 static void create_subsequent_pages (ModestEasysetupWizardDialog *self)
1086 {
1087         if (easysetup_provider_combo_box_get_active_provider_id (
1088                     EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider)) == 0) {
1089                 /* "Other..." was selected: */
1090                 
1091                 /* Make sure that the easysetup pages do not exist: */
1092                 if(self->page_complete_easysetup) {
1093                         gtk_widget_destroy (self->page_complete_easysetup);
1094                         self->page_complete_easysetup = NULL;
1095                 }
1096                 
1097                 create_subsequent_customsetup_pages (self);
1098         }       
1099         else {
1100                 /* A specific provider was selected: */
1101                 {
1102                         /* Make sure that the custom pages do not exist:
1103                          * Because they will be used if they exist, when creating the account. */
1104                         if(self->page_custom_incoming) {
1105                                 gtk_widget_destroy (self->page_custom_incoming);
1106                                 self->page_custom_incoming = NULL;
1107                         }
1108                         
1109                         if(self->page_custom_outgoing) {
1110                                 gtk_widget_destroy (self->page_custom_outgoing);
1111                                 self->page_custom_outgoing = NULL;
1112                         }
1113                         
1114                         if(self->page_complete_customsetup) {
1115                                 gtk_widget_destroy (self->page_complete_customsetup);
1116                                 self->page_complete_customsetup = NULL;
1117                         }
1118                 }
1119                 
1120                 /* Create the easysetup pages: */
1121                 create_subsequent_easysetup_pages (self);
1122         }
1123 }
1124
1125
1126 static gchar*
1127 util_get_default_servername_from_email_address (const gchar* email_address, ModestTransportStoreProtocol servertype)
1128 {
1129         if (!email_address)
1130                 return NULL;
1131         
1132         gchar* at = g_utf8_strchr (email_address, -1, '@');
1133         if (!at || (g_utf8_strlen (at, -1) < 2))
1134                 return NULL;
1135                 
1136         gchar* domain = g_utf8_next_char (at);
1137         if(!domain)
1138                 return NULL;
1139                 
1140         const gchar* hostname = NULL;
1141         if (servertype == MODEST_PROTOCOL_STORE_POP)
1142                 hostname = "pop";
1143         else if (servertype == MODEST_PROTOCOL_STORE_IMAP)
1144                 hostname = "imap";
1145         else if (servertype == MODEST_PROTOCOL_TRANSPORT_SMTP)
1146                 hostname = "smtp";
1147         
1148         if (!hostname)
1149                 return NULL;
1150                 
1151         return g_strdup_printf ("%s.%s", hostname, domain);
1152 }
1153
1154 static void set_default_custom_servernames (ModestEasysetupWizardDialog *account_wizard)
1155 {
1156         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE(account_wizard);
1157
1158         if (!account_wizard->entry_incomingserver)
1159                 return;
1160                 
1161         /* Set a default domain for the server, based on the email address,
1162          * if no server name was already specified.
1163          */
1164         if (account_wizard->entry_user_email
1165             && ((priv->server_changes & MODEST_EASYSETUP_WIZARD_DIALOG_INCOMING_CHANGED) == 0)) {
1166                 const ModestTransportStoreProtocol protocol = easysetup_servertype_combo_box_get_active_servertype (
1167                         EASYSETUP_SERVERTYPE_COMBO_BOX (account_wizard->combo_incoming_servertype));
1168                 const gchar* email_address = gtk_entry_get_text (GTK_ENTRY(account_wizard->entry_user_email));
1169                 
1170                 gchar* servername = util_get_default_servername_from_email_address (email_address, protocol);
1171
1172                 /* Do not set the INCOMING_CHANGED flag because of this edit */
1173                 g_signal_handlers_block_by_func (G_OBJECT (account_wizard->entry_incomingserver), G_CALLBACK (on_entry_incoming_servername_changed), account_wizard);
1174                 gtk_entry_set_text (GTK_ENTRY (account_wizard->entry_incomingserver), servername);
1175                 g_signal_handlers_unblock_by_func (G_OBJECT (account_wizard->entry_incomingserver), G_CALLBACK (on_entry_incoming_servername_changed), account_wizard);
1176
1177                 g_free (servername);
1178         }
1179         
1180         /* Set a default domain for the server, based on the email address,
1181          * if no server name was already specified.
1182          */
1183         if (!account_wizard->entry_outgoingserver)
1184                 return;
1185                 
1186         if (account_wizard->entry_user_email
1187             && ((priv->server_changes & MODEST_EASYSETUP_WIZARD_DIALOG_OUTGOING_CHANGED) == 0)) {
1188                 const gchar* email_address = gtk_entry_get_text (GTK_ENTRY(account_wizard->entry_user_email));
1189                 
1190                 gchar* servername = util_get_default_servername_from_email_address (email_address, MODEST_PROTOCOL_TRANSPORT_SMTP);
1191
1192                 /* Do not set the OUTGOING_CHANGED flag because of this edit */
1193                 g_signal_handlers_block_by_func (G_OBJECT (account_wizard->entry_outgoingserver), G_CALLBACK (on_entry_outgoing_servername_changed), account_wizard);
1194                 gtk_entry_set_text (GTK_ENTRY (account_wizard->entry_outgoingserver), servername);
1195                 g_signal_handlers_unblock_by_func (G_OBJECT (account_wizard->entry_outgoingserver), G_CALLBACK (on_entry_outgoing_servername_changed), account_wizard);
1196
1197                 g_free (servername);
1198         }
1199 }
1200
1201 static gboolean
1202 on_before_next (ModestWizardDialog *dialog, GtkWidget *current_page, GtkWidget *next_page)
1203 {
1204         ModestEasysetupWizardDialog *account_wizard = MODEST_EASYSETUP_WIZARD_DIALOG (dialog);
1205         
1206         /* Do extra validation that couldn't be done for every key press,
1207          * either because it was too slow,
1208          * or because it requires interaction:
1209          */
1210         if (current_page == account_wizard->page_account_details) {     
1211                 /* Check that the title is not already in use: */
1212                 const gchar* account_title = gtk_entry_get_text (GTK_ENTRY (account_wizard->entry_account_title));
1213                 if ((!account_title) || (strlen(account_title) == 0))
1214                         return FALSE;
1215                         
1216                 /* Aavoid a clash with an existing display name: */
1217                 const gboolean name_in_use = modest_account_mgr_account_with_display_name_exists (
1218                         account_wizard->account_manager, account_title);
1219
1220                 if (name_in_use) {
1221                         /* Warn the user via a dialog: */
1222                         show_error (GTK_WINDOW (account_wizard), _("mail_ib_account_name_already_existing"));
1223             
1224                         return FALSE;
1225                 }
1226         }
1227         else if (current_page == account_wizard->page_user_details) {
1228                 /* Check that the email address is valud: */
1229                 const gchar* email_address = gtk_entry_get_text (GTK_ENTRY (account_wizard->entry_user_email));
1230                 if ((!email_address) || (strlen(email_address) == 0))
1231                         return FALSE;
1232                         
1233                 if (!modest_text_utils_validate_email_address (email_address)) {
1234                         /* Warn the user via a dialog: */
1235                         hildon_banner_show_information (NULL, NULL, _("mcen_ib_invalid_email"));
1236                                              
1237                         /* Return focus to the email address entry: */
1238                         gtk_widget_grab_focus (account_wizard->entry_user_email);
1239                         gtk_editable_select_region (GTK_EDITABLE (account_wizard->entry_user_email), 0, -1);
1240
1241                         return FALSE;
1242                 }
1243                 
1244                 /* Make sure that the subsequent pages are appropriate for the provider choice. */
1245                 create_subsequent_pages (account_wizard);
1246         }
1247         
1248         /* TODO: The UI Spec wants us to check that the servernames are valid, 
1249          * but does not specify how.
1250          */
1251           
1252         if(next_page == account_wizard->page_custom_incoming) {
1253                 set_default_custom_servernames (account_wizard);
1254         }
1255         else if (next_page == account_wizard->page_custom_outgoing) {
1256                 set_default_custom_servernames (account_wizard);
1257     /* Check if the server supports secure authentication */
1258                 const ModestConnectionProtocol security_incoming = 
1259                         modest_serversecurity_combo_box_get_active_serversecurity (
1260                                                                                                                                                                                                                                                                  MODEST_SERVERSECURITY_COMBO_BOX (
1261                                                                                                                                                                                                                                                                                                                                                                                                         account_wizard->combo_incoming_security));
1262                 if (gtk_toggle_button_get_active (
1263                         GTK_TOGGLE_BUTTON (account_wizard->checkbox_incoming_auth))
1264                                 && !modest_protocol_info_is_secure(security_incoming))
1265                 {
1266                                 GList* methods = check_for_supported_auth_methods(account_wizard);
1267                                 if (!methods)
1268                                 {
1269                                         g_list_free(methods);
1270                                         return FALSE;
1271                                 }
1272                                 g_list_free(methods);
1273                 }
1274         }
1275         
1276         /* If this is the last page, and this is a click on Finish, 
1277          * then attempt to create the dialog.
1278          */
1279         if(!next_page) /* This is NULL when this is a click on Finish. */
1280         {
1281                 if (account_wizard->saved_account_name) {
1282                         /* Just enable the already-saved account (temporarily created when 
1283                          * editing advanced settings): */
1284                         modest_account_mgr_set_enabled (account_wizard->account_manager, 
1285                                                         account_wizard->saved_account_name, TRUE);
1286                 } else {
1287                         create_account (account_wizard, TRUE /* enabled */);
1288                 }
1289         }
1290         
1291         
1292         return TRUE;
1293 }
1294
1295 static gboolean entry_is_empty (GtkWidget *entry)
1296 {
1297         if (!entry)
1298                 return FALSE;
1299                 
1300         const gchar* text = gtk_entry_get_text (GTK_ENTRY (entry));
1301         if ((!text) || (strlen(text) == 0))
1302                 return TRUE;
1303         else
1304                 return FALSE;
1305 }
1306
1307 static void
1308 on_enable_buttons (ModestWizardDialog *dialog, GtkWidget *current_page)
1309 {
1310         ModestEasysetupWizardDialog *account_wizard = MODEST_EASYSETUP_WIZARD_DIALOG (dialog);
1311         
1312         gboolean enable_next = TRUE;
1313         if (current_page == account_wizard->page_welcome) {
1314                 enable_next = TRUE;
1315         }
1316         else if (current_page == account_wizard->page_account_details) {
1317                 /* The account details title is mandatory: */
1318                 if (entry_is_empty(account_wizard->entry_account_title))
1319                         enable_next = FALSE;
1320         }
1321         else if (current_page == account_wizard->page_user_details) {   
1322                 /* The user details username is mandatory: */
1323                 if (entry_is_empty(account_wizard->entry_user_username))
1324                         enable_next = FALSE;
1325                         
1326                 /* The user details email address is mandatory: */
1327                 if (enable_next && entry_is_empty (account_wizard->entry_user_email))
1328                         enable_next = FALSE;
1329         }
1330         else if (current_page == account_wizard->page_custom_incoming) {
1331                 /* The custom incoming server is mandatory: */
1332                 if (entry_is_empty(account_wizard->entry_incomingserver))
1333                         enable_next = FALSE;
1334         }
1335                         
1336         /* Enable the buttons, 
1337          * identifying them via their associated response codes: */
1338                                    
1339         /* Disable the Finish button until we are on the last page,
1340          * because HildonWizardDialog enables this for all but the first page: */
1341         GtkNotebook *notebook = NULL;
1342         GtkDialog *dialog_base = GTK_DIALOG (dialog);
1343         g_object_get (dialog_base, "wizard-notebook", &notebook, NULL);
1344         
1345         gint current = gtk_notebook_get_current_page (notebook);
1346         gint last = gtk_notebook_get_n_pages (notebook) - 1;
1347         const gboolean is_last = (current == last);
1348     
1349         if(!is_last) {
1350                 gtk_dialog_set_response_sensitive (dialog_base,
1351                                                    MODEST_WIZARD_DIALOG_FINISH,
1352                                                    FALSE);
1353         } else
1354         {
1355                 /* Disable Next on the last page: */
1356                 enable_next = FALSE;
1357         }
1358         
1359         gtk_dialog_set_response_sensitive (dialog_base,
1360                                            MODEST_WIZARD_DIALOG_NEXT,
1361                                            enable_next);
1362 }
1363
1364 static void
1365 modest_easysetup_wizard_dialog_class_init (ModestEasysetupWizardDialogClass *klass)
1366 {
1367         GObjectClass *object_class = G_OBJECT_CLASS (klass);
1368         g_type_class_add_private (klass, sizeof (ModestEasysetupWizardDialogPrivate));
1369
1370
1371         object_class->get_property = modest_easysetup_wizard_dialog_get_property;
1372         object_class->set_property = modest_easysetup_wizard_dialog_set_property;
1373         object_class->dispose = modest_easysetup_wizard_dialog_dispose;
1374         object_class->finalize = modest_easysetup_wizard_dialog_finalize;
1375         
1376         /* Provide a vfunc implementation so we can decide 
1377          * when to enable/disable the prev/next buttons.
1378          */
1379         ModestWizardDialogClass *base_klass = (ModestWizardDialogClass*)(klass);
1380         base_klass->before_next = on_before_next;
1381         base_klass->enable_buttons = on_enable_buttons;
1382 }
1383  
1384 static void
1385 show_error (GtkWindow *parent_window, const gchar* text)
1386 {
1387         GtkDialog *dialog = GTK_DIALOG (hildon_note_new_information (parent_window, text));
1388         /*
1389           GtkDialog *dialog = GTK_DIALOG (gtk_message_dialog_new (parent_window,
1390           (GtkDialogFlags)0,
1391           GTK_MESSAGE_ERROR,
1392           GTK_BUTTONS_OK,
1393           text ));
1394         */
1395                  
1396         gtk_dialog_run (dialog);
1397         gtk_widget_destroy (GTK_WIDGET (dialog));
1398 }
1399
1400 /** Attempt to create the account from the information that the user has entered.
1401  * @result: TRUE if the account was successfully created.
1402  */
1403 gboolean
1404 create_account (ModestEasysetupWizardDialog *self, gboolean enabled)
1405 {
1406         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
1407         
1408         const gchar* display_name = gtk_entry_get_text (GTK_ENTRY (self->entry_account_title));
1409
1410         /* Some checks: */
1411         if (!display_name)
1412                 return FALSE;
1413                 
1414         /* We should have checked for this already, 
1415          * and changed that name accordingly, 
1416          * but let's check again just in case:
1417          */
1418         if (modest_account_mgr_account_with_display_name_exists (self->account_manager, display_name)) 
1419                 return FALSE;
1420
1421         /* Increment the non-user visible name if necessary, 
1422          * based on the display name: */
1423         gchar *account_name_start = g_strdup_printf ("%sID", display_name);
1424         gchar* account_name = modest_account_mgr_get_unused_account_name (self->account_manager,
1425                                                                           account_name_start, FALSE /* not a server account */);
1426         g_free (account_name_start);
1427                 
1428         /* username and password (for both incoming and outgoing): */
1429         const gchar* username = gtk_entry_get_text (GTK_ENTRY (self->entry_user_username));
1430         const gchar* password = gtk_entry_get_text (GTK_ENTRY (self->entry_user_password));
1431         /* Incoming server: */
1432         /* Note: We need something as default for the ModestTransportStoreProtocol* values, 
1433          * or modest_account_mgr_add_server_account will fail. */
1434         gchar* servername_incoming = NULL;
1435         guint serverport_incoming = 0;
1436         ModestTransportStoreProtocol protocol_incoming = MODEST_PROTOCOL_STORE_POP;
1437         ModestConnectionProtocol protocol_security_incoming = MODEST_PROTOCOL_CONNECTION_NORMAL;
1438         ModestAuthProtocol protocol_authentication_incoming = MODEST_PROTOCOL_AUTH_NONE;
1439
1440         /* Get details from the specified presets: */
1441         gchar* provider_id = easysetup_provider_combo_box_get_active_provider_id (
1442                 EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider));
1443         if (provider_id) {
1444                 /* Use presets: */
1445                 servername_incoming = modest_presets_get_server (priv->presets, provider_id, 
1446                                                                  TRUE /* incoming */);
1447                 
1448                 ModestPresetsServerType servertype_incoming = modest_presets_get_info_server_type (priv->presets,
1449                                                                                                    provider_id, 
1450                                                                                                    TRUE /* incoming */);
1451                 ModestPresetsSecurity security_incoming = modest_presets_get_info_server_security (priv->presets,
1452                                                                                                    provider_id, 
1453                                                                                                    TRUE /* incoming */);
1454
1455                 g_warning ("security incoming: %x", security_incoming);
1456                         
1457                 /* We don't check for SMTP here as that is impossible for an incoming server. */
1458                 if (servertype_incoming == MODEST_PRESETS_SERVER_TYPE_IMAP) {
1459                         protocol_incoming = MODEST_PROTOCOL_STORE_IMAP;
1460                 } else if (servertype_incoming == MODEST_PRESETS_SERVER_TYPE_POP) {
1461                         protocol_incoming = MODEST_PROTOCOL_STORE_POP; 
1462                 }
1463                 serverport_incoming = get_serverport_incoming(servertype_incoming, security_incoming);
1464                 
1465                 if (security_incoming & MODEST_PRESETS_SECURITY_SECURE_INCOMING)
1466                         protocol_security_incoming = MODEST_PROTOCOL_CONNECTION_SSL; /* TODO: Is this what we want? */
1467                 
1468                 if (security_incoming & MODEST_PRESETS_SECURITY_APOP)
1469                         protocol_authentication_incoming = MODEST_PROTOCOL_AUTH_PASSWORD; /* TODO: Is this what we want? */
1470         }
1471         else {
1472                 /* Use custom pages because no preset was specified: */
1473                 servername_incoming = g_strdup (gtk_entry_get_text (GTK_ENTRY (self->entry_incomingserver) ));
1474                 
1475                 protocol_incoming = easysetup_servertype_combo_box_get_active_servertype (
1476                         EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype));
1477                 
1478                 protocol_security_incoming = modest_serversecurity_combo_box_get_active_serversecurity (
1479                         MODEST_SERVERSECURITY_COMBO_BOX (self->combo_incoming_security));
1480                 
1481                 /* The UI spec says:
1482                  * If secure authentication is unchecked, allow sending username and password also as plain text.
1483                  * If secure authentication is checked, require one of the secure methods during connection: SSL, TLS, CRAM-MD5 etc. 
1484                  */
1485                 
1486                 if (gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (self->checkbox_incoming_auth)) &&
1487                                 !modest_protocol_info_is_secure(protocol_security_incoming))
1488                 {
1489                                 GList* methods = check_for_supported_auth_methods(self);
1490                                 if (!methods)
1491                                         return FALSE;
1492                                 else
1493                                   protocol_authentication_incoming = (ModestAuthProtocol) (GPOINTER_TO_INT(methods->data));
1494                 }
1495                 else
1496                         protocol_authentication_incoming = MODEST_PROTOCOL_AUTH_PASSWORD;
1497         }
1498         
1499         /* First we add the 2 server accounts, and then we add the account that uses them.
1500          * If we don't do it in this order then we will experience a crash. */
1501          
1502         /* Add a (incoming) server account, to be used by the account: */
1503         gchar *store_name_start = g_strconcat (account_name, "_store", NULL);
1504         gchar *store_name = modest_account_mgr_get_unused_account_name (self->account_manager, 
1505                                                                         store_name_start, TRUE /* server account */);
1506         g_free (store_name_start);
1507         gboolean created = modest_account_mgr_add_server_account (self->account_manager,
1508                                                                   store_name,
1509                                                                   servername_incoming,
1510                                                                   serverport_incoming,
1511                                                                   username, password,
1512                                                                   protocol_incoming,
1513                                                                   protocol_security_incoming,
1514                                                                   protocol_authentication_incoming);            
1515                 
1516         g_free (servername_incoming);
1517         
1518         if (!created) {
1519                 /* TODO: Provide a Logical ID for the text: */
1520                 show_error (GTK_WINDOW (self), _("An error occurred while creating the incoming account."));
1521                 return FALSE;   
1522         }
1523         
1524         /* Outgoing server: */
1525         gchar* servername_outgoing = NULL;
1526         ModestTransportStoreProtocol protocol_outgoing = MODEST_PROTOCOL_STORE_POP;
1527         ModestConnectionProtocol protocol_security_outgoing = MODEST_PROTOCOL_CONNECTION_NORMAL;
1528         ModestAuthProtocol protocol_authentication_outgoing = MODEST_PROTOCOL_AUTH_NONE;
1529         guint serverport_outgoing = 0;
1530         
1531         if (provider_id) {
1532                 /* Use presets: */
1533                 servername_outgoing = modest_presets_get_server (priv->presets, provider_id, 
1534                                                                  FALSE /* incoming */);
1535                         
1536                 ModestPresetsServerType servertype_outgoing = modest_presets_get_info_server_type (priv->presets,
1537                                                                                                    provider_id, 
1538                                                                                                    FALSE /* incoming */);
1539                 
1540                 /* Note: We need something as default, or modest_account_mgr_add_server_account will fail. */
1541                 protocol_outgoing = MODEST_PROTOCOL_TRANSPORT_SENDMAIL; 
1542                 if (servertype_outgoing == MODEST_PRESETS_SERVER_TYPE_SMTP)
1543                         protocol_outgoing = MODEST_PROTOCOL_TRANSPORT_SMTP;
1544                 
1545                 ModestPresetsSecurity security_outgoing = 
1546                         modest_presets_get_info_server_security (priv->presets, provider_id, 
1547                                                                  FALSE /* incoming */);
1548
1549                 /* TODO: There is no SMTP authentication enum for presets, 
1550                    so we should probably check what the server supports. */
1551                 protocol_security_outgoing = MODEST_PROTOCOL_CONNECTION_NORMAL;
1552                 if (security_outgoing & MODEST_PRESETS_SECURITY_SECURE_SMTP) {
1553                         /* printf("DEBUG: %s: using secure SMTP\n", __FUNCTION__); */
1554                         protocol_security_outgoing = MODEST_PROTOCOL_CONNECTION_SSL; /* TODO: Is this what we want? */
1555                         serverport_outgoing = 465;
1556                         protocol_authentication_outgoing = MODEST_PROTOCOL_AUTH_PASSWORD;
1557                 } else {
1558                         /* printf("DEBUG: %s: using non-secure SMTP\n", __FUNCTION__); */
1559                         protocol_authentication_outgoing = MODEST_PROTOCOL_AUTH_NONE;
1560                 }
1561         }
1562         else {
1563                 /* Use custom pages because no preset was specified: */
1564                 servername_outgoing = g_strdup (gtk_entry_get_text (GTK_ENTRY (self->entry_outgoingserver) ));
1565                 
1566                 protocol_outgoing = MODEST_PROTOCOL_TRANSPORT_SMTP; /* It's always SMTP for outgoing. */
1567
1568                 protocol_security_outgoing = modest_serversecurity_combo_box_get_active_serversecurity (
1569                         MODEST_SERVERSECURITY_COMBO_BOX (self->combo_outgoing_security));
1570                 
1571                 protocol_authentication_outgoing = modest_secureauth_combo_box_get_active_secureauth (
1572                         MODEST_SECUREAUTH_COMBO_BOX (self->combo_outgoing_auth));
1573         }
1574             
1575         /* Add a (outgoing) server account to be used by the account: */
1576         gchar *transport_name_start = g_strconcat (account_name, "_transport", NULL);
1577         gchar *transport_name = modest_account_mgr_get_unused_account_name (self->account_manager, 
1578                                                                             transport_name_start, TRUE /* server account */);
1579         g_free (transport_name_start);
1580         created = modest_account_mgr_add_server_account (self->account_manager,
1581                                                          transport_name,
1582                                                          servername_outgoing,
1583                                                          serverport_outgoing,
1584                                                          username, password,
1585                                                          protocol_outgoing,
1586                                                          protocol_security_outgoing,
1587                                                          protocol_authentication_outgoing);
1588                 
1589         g_free (servername_outgoing);
1590                 
1591         if (!created) {
1592                 /* TODO: Provide a Logical ID for the text: */
1593                 show_error (GTK_WINDOW (self), _("An error occurred while creating the outgoing account."));
1594                 return FALSE;   
1595         }
1596         
1597         
1598         /* Create the account, which will contain the two "server accounts": */
1599         created = modest_account_mgr_add_account (self->account_manager, account_name, 
1600                                                   store_name, /* The name of our POP/IMAP server account. */
1601                                                   transport_name, /* The name of our SMTP server account. */
1602                                                   enabled);
1603         g_free (store_name);
1604         g_free (transport_name);
1605         
1606         if (!created) {
1607                 /* TODO: Provide a Logical ID for the text: */
1608                 show_error (GTK_WINDOW (self), _("An error occurred while creating the account."));
1609                 return FALSE;   
1610         }
1611
1612         /* Sanity check: */
1613         /* There must be at least one account now: */
1614         /* Note, when this fails is is caused by a Maemo gconf bug that has been 
1615          * fixed in versions after 3.1. */
1616         if(!modest_account_mgr_has_accounts (self->account_manager, FALSE))
1617                 g_warning ("modest_account_mgr_account_names() returned NULL after adding an account.");
1618                 
1619         /* The user name and email address must be set additionally: */
1620         const gchar* user_name = gtk_entry_get_text (GTK_ENTRY (self->entry_user_name));
1621         modest_account_mgr_set_string (self->account_manager, account_name,
1622                                        MODEST_ACCOUNT_FULLNAME, user_name, FALSE /* not server account */);
1623
1624         const gchar* emailaddress = gtk_entry_get_text (GTK_ENTRY (self->entry_user_email));
1625         modest_account_mgr_set_string (self->account_manager, account_name,
1626                                        MODEST_ACCOUNT_EMAIL, emailaddress, FALSE /* not server account */);
1627
1628         /* Set the display name: */
1629         modest_account_mgr_set_string (self->account_manager, account_name,
1630                                        MODEST_ACCOUNT_DISPLAY_NAME, display_name, FALSE /* not server account */);
1631
1632         /* Set retrieve type */ 
1633         const gchar *retrieve = MODEST_ACCOUNT_RETRIEVE_VALUE_HEADERS_ONLY;
1634         modest_account_mgr_set_string (self->account_manager, account_name,
1635                 MODEST_ACCOUNT_RETRIEVE, retrieve, FALSE /* not server account */);
1636
1637         /* Save the connection-specific SMTP server accounts. */
1638         gboolean result = TRUE;
1639         if (self->specific_window)
1640                 result = modest_connection_specific_smtp_window_save_server_accounts (
1641                         MODEST_CONNECTION_SPECIFIC_SMTP_WINDOW (self->specific_window), account_name);
1642                         
1643         g_free (self->saved_account_name);
1644         self->saved_account_name = g_strdup (account_name);
1645         
1646         g_free (account_name);
1647
1648         return result;
1649 }