2007-04-18 Murray Cumming <murrayc@murrayc.com>
[modest] / src / maemo / easysetup / modest-easysetup-wizard.c
1 /* Copyright (c) 2007, Nokia Corporation
2  * All rights reserved.
3  *
4  */
5
6
7 #include "modest-easysetup-wizard.h"
8 #include <glib/gi18n.h>
9 #include <gtk/gtknotebook.h>
10 #include <gtk/gtkvbox.h>
11 #include <gtk/gtklabel.h>
12 #include <gtk/gtkcombobox.h>
13 #include <gtk/gtkentry.h>
14 #include <gtk/gtkbutton.h>
15 #include <gtk/gtkcheckbutton.h>
16 #include <gtk/gtkmessagedialog.h>
17 #include <hildon-widgets/hildon-caption.h>
18 #include "maemo/easysetup/modest-easysetup-country-combo-box.h"
19 #include "maemo/easysetup/modest-easysetup-provider-combo-box.h"
20 #include "maemo/easysetup/modest-easysetup-servertype-combo-box.h"
21 #include "maemo/easysetup/modest-easysetup-serversecurity-combo-box.h"
22 #include "maemo/easysetup/modest-easysetup-secureauth-combo-box.h"
23 #include "maemo/easysetup/modest-validating-entry.h"
24 #include "modest-text-utils.h"
25 #include "modest-account-mgr.h"
26 #include "modest-runtime.h" /* For modest_runtime_get_account_mgr(). */
27 #include "maemo/modest-connection-specific-smtp-window.h"
28 #include <gconf/gconf-client.h>
29 #include <string.h> /* For strlen(). */
30
31 /* Include config.h so that _() works: */
32 #ifdef HAVE_CONFIG_H
33 #include <config.h>
34 #endif
35
36 #define EXAMPLE_EMAIL_ADDRESS "first.last@provider.com"
37
38 G_DEFINE_TYPE (ModestEasysetupWizardDialog, modest_easysetup_wizard_dialog, MODEST_TYPE_WIZARD_DIALOG);
39
40 #define WIZARD_DIALOG_GET_PRIVATE(o) \
41         (G_TYPE_INSTANCE_GET_PRIVATE ((o), MODEST_TYPE_EASYSETUP_WIZARD_DIALOG, ModestEasysetupWizardDialogPrivate))
42
43 typedef struct _ModestEasysetupWizardDialogPrivate ModestEasysetupWizardDialogPrivate;
44
45 struct _ModestEasysetupWizardDialogPrivate
46 {
47         ModestPresets *presets;
48 };
49
50 static void
51 modest_easysetup_wizard_dialog_get_property (GObject *object, guint property_id,
52                                                                                                                         GValue *value, GParamSpec *pspec)
53 {
54         switch (property_id) {
55         default:
56                 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
57         }
58 }
59
60 static void
61 modest_easysetup_wizard_dialog_set_property (GObject *object, guint property_id,
62                                                                                                                         const GValue *value, GParamSpec *pspec)
63 {
64         switch (property_id) {
65         default:
66                 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
67         }
68 }
69
70 static void
71 modest_easysetup_wizard_dialog_dispose (GObject *object)
72 {
73         if (G_OBJECT_CLASS (modest_easysetup_wizard_dialog_parent_class)->dispose)
74                 G_OBJECT_CLASS (modest_easysetup_wizard_dialog_parent_class)->dispose (object);
75 }
76
77 static void
78 modest_easysetup_wizard_dialog_finalize (GObject *object)
79 {
80         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (object);
81         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
82         
83         if (self->account_manager)
84                 g_object_unref (G_OBJECT (self->account_manager));
85                 
86         if (priv->presets)
87                 modest_presets_destroy (priv->presets);
88         
89         G_OBJECT_CLASS (modest_easysetup_wizard_dialog_parent_class)->finalize (object);
90 }
91
92 static void
93 show_error (GtkWindow *parent_window, const gchar* text);
94
95 static gboolean
96 create_account (ModestEasysetupWizardDialog *self);
97
98 static void
99 create_subsequent_easysetup_pages (ModestEasysetupWizardDialog *self);
100
101 static void
102 set_default_custom_servernames(ModestEasysetupWizardDialog *dialog);
103
104 static void on_combo_servertype_changed(GtkComboBox *combobox, gpointer user_data);
105
106 static gchar*
107 util_increment_name (const gchar* text);
108
109 static void
110 invoke_enable_buttons_vfunc (ModestEasysetupWizardDialog *wizard_dialog)
111 {
112         ModestWizardDialogClass *klass = MODEST_WIZARD_DIALOG_GET_CLASS (wizard_dialog);
113         
114         /* Call the vfunc, which may be overridden by derived classes: */
115         if (klass->enable_buttons) {
116                 GtkNotebook *notebook = NULL;
117                 g_object_get (wizard_dialog, "wizard-notebook", &notebook, NULL);
118                 
119                 const gint current_page_num = gtk_notebook_get_current_page (notebook);
120                 if (current_page_num == -1)
121                         return;
122                         
123                 GtkWidget* current_page_widget = gtk_notebook_get_nth_page (notebook, current_page_num);
124                 (*(klass->enable_buttons))(MODEST_WIZARD_DIALOG (wizard_dialog), current_page_widget);
125         }
126 }
127
128 static void
129 on_caption_entry_changed (GtkEditable *editable, gpointer user_data)
130 {
131         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
132         g_assert(self);
133         invoke_enable_buttons_vfunc(self);
134 }
135
136 static void
137 on_caption_combobox_changed (GtkComboBox *widget, gpointer user_data)
138 {
139         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
140         g_assert(self);
141         invoke_enable_buttons_vfunc(self);
142 }
143
144 /** This is a convenience function to create a caption containing a mandatory widget.
145  * When the widget is edited, the enable_buttons() vfunc will be called.
146  */
147 static GtkWidget* create_caption_new_with_asterix(ModestEasysetupWizardDialog *self,
148         GtkSizeGroup *group,
149         const gchar *value,
150         GtkWidget *control,
151         GtkWidget *icon,
152         HildonCaptionStatus flag)
153 {
154   GtkWidget *caption = hildon_caption_new (group, value, control, icon, flag);
155   
156 /* The translated strings seem to already contain the *,
157  * but this code can be used if that is not true in future.
158  */
159 #if 0
160         /* Add a * character to indicate mandatory fields,
161          * as specified in our "Email UI Specification": */
162         if (flag == HILDON_CAPTION_MANDATORY) {
163                 gchar* title = g_strdup_printf("%s*", value);
164                 caption = hildon_caption_new (group, title, control, icon, flag);       
165                 g_free(title);
166         }       
167         else
168                 caption = hildon_caption_new (group, value, control, icon, flag);
169 #endif
170
171         /* Connect to the appropriate changed signal for the widget, 
172          * so we can ask for the prev/next buttons to be enabled/disabled appropriately:
173          */
174         if (GTK_IS_ENTRY (control)) {
175                 g_signal_connect (G_OBJECT (control), "changed",
176                 G_CALLBACK (on_caption_entry_changed), self);
177                 
178         }
179         else if (GTK_IS_COMBO_BOX (control)) {
180                 g_signal_connect (G_OBJECT (control), "changed",
181                 G_CALLBACK (on_caption_combobox_changed), self);
182         }
183          
184         return caption;
185 }
186            
187 static GtkWidget*
188 create_page_welcome (ModestEasysetupWizardDialog *self)
189 {
190         GtkWidget *box = gtk_vbox_new (FALSE, 2);
191         GtkWidget *label = gtk_label_new(_("mcen_ia_emailsetup_intro"));
192         gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
193         gtk_widget_show (label);
194         gtk_widget_show (GTK_WIDGET (box));
195         return GTK_WIDGET (box);
196 }
197
198 static void
199 on_combo_account_country (GtkComboBox *widget, gpointer user_data)
200 {
201         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
202         g_assert(self);
203         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
204         
205         /* Fill the providers combo, based on the selected country: */
206         gint mcc_id = easysetup_country_combo_box_get_active_country_id (
207                 EASYSETUP_COUNTRY_COMBO_BOX (self->combo_account_country));
208         easysetup_provider_combo_box_fill (
209                 EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider), priv->presets, mcc_id);
210 }
211
212 static void
213 on_combo_account_serviceprovider (GtkComboBox *widget, gpointer user_data)
214 {
215         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
216         g_assert(self);
217         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
218         
219         /* Fill the providers combo, based on the selected country: */
220         gchar* provider_id = easysetup_provider_combo_box_get_active_provider_id (
221                 EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider));
222         
223         gchar* domain_name = NULL;
224         if(provider_id)
225           domain_name = modest_presets_get_domain (priv->presets, provider_id);
226         
227         if(!domain_name)
228                 domain_name = g_strdup (EXAMPLE_EMAIL_ADDRESS);
229                 
230         if (self->entry_user_email)
231                 gtk_entry_set_text (GTK_ENTRY (self->entry_user_email), domain_name);
232                 
233     g_free (domain_name);
234         
235         g_free (provider_id);
236 }
237
238
239 static GtkWidget*
240 create_page_account_details (ModestEasysetupWizardDialog *self)
241 {
242         GtkWidget *box = gtk_vbox_new (FALSE, 2);
243         GtkWidget *label = gtk_label_new(_("mcen_ia_accountdetails"));
244         gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 2);
245         gtk_widget_show (label);
246         
247         /* Create a size group to be used by all captions.
248          * Note that HildonCaption does not create a default size group if we do not specify one.
249          * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
250         GtkSizeGroup* sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
251
252         /* The country widgets: */
253         self->combo_account_country = GTK_WIDGET (easysetup_country_combo_box_new ());
254         GtkWidget *caption = create_caption_new_with_asterix (self, sizegroup, _("mcen_fi_country"), 
255                 self->combo_account_country, NULL, HILDON_CAPTION_OPTIONAL);
256         gtk_widget_show (self->combo_account_country);
257         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
258         gtk_widget_show (caption);
259         
260         /* connect to country combo's changed signal, so we can fill the provider combo: */
261     g_signal_connect (G_OBJECT (self->combo_account_country), "changed",
262             G_CALLBACK (on_combo_account_country), self);
263             
264         
265         /* The service provider widgets: */     
266         self->combo_account_serviceprovider = GTK_WIDGET (easysetup_provider_combo_box_new ());
267         
268         caption = create_caption_new_with_asterix (self, sizegroup, _("mcen_fi_serviceprovider"), 
269                 self->combo_account_serviceprovider, NULL, HILDON_CAPTION_OPTIONAL);
270         gtk_widget_show (self->combo_account_serviceprovider);
271         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
272         gtk_widget_show (caption);
273         
274         /* connect to providers combo's changed signal, so we can fill the email address: */
275     g_signal_connect (G_OBJECT (self->combo_account_serviceprovider), "changed",
276             G_CALLBACK (on_combo_account_serviceprovider), self);
277         
278         /* TODO: Default to the current country somehow.
279          * But I don't know how to get the information that is specified in the 
280          * "Language and region" control panel. It does not seem be anywhere in gconf. murrayc.
281          *
282          * This is probably not the best choice of gconf key:
283          * This is the  "mcc used in the last pairing", ie. the last connection you made.
284      * set by the osso-operator-wizard package, suggested by Dirk-Jan Binnema.
285      *
286          */
287         GConfClient *client = gconf_client_get_default ();
288         GError *error = NULL;
289         const gchar* key = "/apps/osso/operator-wizard/last_mcc";
290         gint mcc_id = gconf_client_get_int(client, key, &error);
291         
292         if(mcc_id < 0)
293         mcc_id = 0;
294      
295     if (error) {
296         g_warning ("Error getting gconf key %s:\n%s", key, error->message);
297         g_error_free (error);
298         error = NULL;
299         
300         mcc_id = 0;
301     }
302     
303     /* Note that gconf_client_get_int() seems to return 0 without an error if the key is not there
304      * This might just be a Maemo bug.
305      */
306     if (mcc_id == 0) 
307     {
308         /* For now, we default to Finland when there is nothing better: */
309         mcc_id = 244;
310     }
311    
312         easysetup_country_combo_box_set_active_country_id (
313                 EASYSETUP_COUNTRY_COMBO_BOX (self->combo_account_country), mcc_id);
314                 
315         
316         /* The description widgets: */  
317         self->entry_account_title = GTK_WIDGET (easysetup_validating_entry_new ());
318         
319         /* Set a default account title, choosing one that does not already exist: */
320         /* Note that this is irrelevant to the non-user visible name, which we will create later. */
321         gchar* default_acount_name = g_strdup (_("mcen_ia_emailsetup_defaultname"));
322         while (modest_account_mgr_account_with_display_name_exists (self->account_manager, 
323                 default_acount_name)) {
324                         
325                 gchar * default_account_name2 = util_increment_name (default_acount_name);
326                 g_free (default_acount_name);
327                 default_acount_name = default_account_name2;
328         }
329         
330         gtk_entry_set_text( GTK_ENTRY (self->entry_account_title), default_acount_name);
331         g_free (default_acount_name);
332         default_acount_name = NULL;
333
334         caption = create_caption_new_with_asterix (self, sizegroup, _("mcen_fi_account_title"), 
335                 self->entry_account_title, NULL, HILDON_CAPTION_MANDATORY);
336         gtk_widget_show (self->entry_account_title);
337         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
338         gtk_widget_show (caption);
339         
340         /* Prevent the use of some characters in the account title, 
341          * as required by our UI specification: */
342         GList *list_prevent = NULL;
343         list_prevent = g_list_append (list_prevent, "\\");
344         list_prevent = g_list_append (list_prevent, "/");
345         list_prevent = g_list_append (list_prevent, ":");
346         list_prevent = g_list_append (list_prevent, "*");
347         list_prevent = g_list_append (list_prevent, "?");
348         list_prevent = g_list_append (list_prevent, "\""); /* The UI spec mentions â€œ, but maybe means ", maybe both. */
349         list_prevent = g_list_append (list_prevent, "“");
350         list_prevent = g_list_append (list_prevent, "<"); 
351         list_prevent = g_list_append (list_prevent, ">"); 
352         list_prevent = g_list_append (list_prevent, "|");
353         list_prevent = g_list_append (list_prevent, "^");       
354         easysetup_validating_entry_set_unallowed_characters (
355                 EASYSETUP_VALIDATING_ENTRY (self->entry_account_title), list_prevent);
356         g_list_free (list_prevent);
357         
358         /* Set max length as in the UI spec:
359          * TODO: The UI spec seems to want us to show a dialog if we hit the maximum. */
360         gtk_entry_set_max_length (GTK_ENTRY (self->entry_account_title), 64);
361         
362         gtk_widget_show (GTK_WIDGET (box));
363         
364         return GTK_WIDGET (box);
365 }
366
367 static GtkWidget*
368 create_page_user_details (ModestEasysetupWizardDialog *self)
369 {
370         GtkWidget *box = gtk_vbox_new (FALSE, 2);
371         
372         /* Create a size group to be used by all captions.
373          * Note that HildonCaption does not create a default size group if we do not specify one.
374          * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
375         GtkSizeGroup* sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
376          
377         /* The name widgets: */
378         self->entry_user_name = GTK_WIDGET (easysetup_validating_entry_new ());
379         /* Set max length as in the UI spec:
380          * TODO: The UI spec seems to want us to show a dialog if we hit the maximum. */
381         gtk_entry_set_max_length (GTK_ENTRY (self->entry_user_name), 64);
382         GtkWidget *caption = create_caption_new_with_asterix (self, sizegroup, 
383                 _("mcen_li_emailsetup_name"), self->entry_user_name, NULL, HILDON_CAPTION_OPTIONAL);
384         gtk_widget_show (self->entry_user_name);
385         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
386         gtk_widget_show (caption);
387         
388         /* Prevent the use of some characters in the name, 
389          * as required by our UI specification: */
390         GList *list_prevent = NULL;
391         list_prevent = g_list_append (list_prevent, "<");
392         list_prevent = g_list_append (list_prevent, ">");
393         easysetup_validating_entry_set_unallowed_characters (
394                 EASYSETUP_VALIDATING_ENTRY (self->entry_user_name), list_prevent);
395         g_list_free (list_prevent);
396         
397         /* The username widgets: */     
398         self->entry_user_username = GTK_WIDGET (easysetup_validating_entry_new ());
399         caption = create_caption_new_with_asterix (self, sizegroup, _("mail_fi_username"), 
400                 self->entry_user_username, NULL, HILDON_CAPTION_MANDATORY);
401         gtk_widget_show (self->entry_user_username);
402         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
403         gtk_widget_show (caption);
404         
405         /* Prevent the use of some characters in the username, 
406          * as required by our UI specification: */
407         easysetup_validating_entry_set_unallowed_characters_whitespace (
408                 EASYSETUP_VALIDATING_ENTRY (self->entry_user_username));
409         
410         /* Set max length as in the UI spec:
411          * TODO: The UI spec seems to want us to show a dialog if we hit the maximum. */
412         gtk_entry_set_max_length (GTK_ENTRY (self->entry_user_username), 64);
413         
414         /* The password widgets: */     
415         self->entry_user_password = gtk_entry_new ();
416         gtk_entry_set_visibility (GTK_ENTRY (self->entry_user_password), FALSE);
417         /* gtk_entry_set_invisible_char (GTK_ENTRY (self->entry_user_password), '*'); */
418         caption = create_caption_new_with_asterix (self, sizegroup, 
419                 _("mail_fi_password"), self->entry_user_password, NULL, HILDON_CAPTION_OPTIONAL);
420         gtk_widget_show (self->entry_user_password);
421         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
422         gtk_widget_show (caption);
423         
424         /* The email address widgets: */        
425         self->entry_user_email = GTK_WIDGET (easysetup_validating_entry_new ());
426         caption = create_caption_new_with_asterix (self, sizegroup, 
427                 _("mcen_li_emailsetup_email_address"), self->entry_user_email, NULL, HILDON_CAPTION_MANDATORY);
428         gtk_entry_set_text (GTK_ENTRY (self->entry_user_email), EXAMPLE_EMAIL_ADDRESS); /* Default text. */
429         gtk_widget_show (self->entry_user_email);
430         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
431         gtk_widget_show (caption);
432         
433         /* Set max length as in the UI spec:
434          * TODO: The UI spec seems to want us to show a dialog if we hit the maximum. */
435         gtk_entry_set_max_length (GTK_ENTRY (self->entry_user_email), 64);
436         
437         
438         gtk_widget_show (GTK_WIDGET (box));
439         
440         return GTK_WIDGET (box);
441 }
442
443 static GtkWidget* create_page_complete_easysetup (ModestEasysetupWizardDialog *self)
444 {
445         GtkWidget *box = gtk_vbox_new (FALSE, 2);
446         GtkWidget *label = gtk_label_new(_("mcen_ia_emailsetup_setup_complete"));
447         gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
448         gtk_widget_show (label);
449         gtk_widget_show (GTK_WIDGET (box));
450         return GTK_WIDGET (box);
451 }
452
453 /** Change the caption title for the incoming server, 
454  * as specified in the UI spec:
455  */
456 static void update_incoming_server_title (ModestEasysetupWizardDialog *self)
457 {
458         ModestProtocol protocol = easysetup_servertype_combo_box_get_active_servertype (
459                 EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype));
460         const gchar* type = 
461                 (protocol == MODEST_PROTOCOL_STORE_POP ? 
462                         _("mail_fi_emailtype_pop3") : 
463                         _("mail_fi_emailtype_imap") );
464                         
465                 
466         /* Note that this produces a compiler warning, 
467          * because the compiler does not know that the translated string will have a %s in it.
468          * I do not see a way to avoid the warning while still using these Logical IDs. murrayc. */
469         gchar* incomingserver_title = g_strdup_printf(_("mcen_li_emailsetup_servertype"), type);
470         g_object_set (G_OBJECT (self->caption_incoming), "label", incomingserver_title, NULL);
471         g_free(incomingserver_title);
472 }
473
474 /** Change the caption title for the incoming server, 
475  * as specified in the UI spec:
476  */
477 static void update_incoming_server_security_choices (ModestEasysetupWizardDialog *self)
478 {
479         ModestProtocol protocol = easysetup_servertype_combo_box_get_active_servertype (
480                 EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype));
481         
482         /* Fill the combo with appropriately titled choices for POP or IMAP. */
483         /* The choices are the same, but the titles are different, as in the UI spec. */
484         easysetup_serversecurity_combo_box_fill (
485                 EASYSETUP_SERVERSECURITY_COMBO_BOX (self->combo_incoming_security), protocol);
486 }
487
488 static void on_combo_servertype_changed(GtkComboBox *combobox, gpointer user_data)
489 {
490         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
491         update_incoming_server_title (self);
492         update_incoming_server_security_choices (self);
493 }
494            
495 static GtkWidget* create_page_custom_incoming (ModestEasysetupWizardDialog *self)
496 {
497         GtkWidget *box = gtk_vbox_new (FALSE, 2);
498         
499         /* Create a size group to be used by all captions.
500          * Note that HildonCaption does not create a default size group if we do not specify one.
501          * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
502         GtkSizeGroup *sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
503          
504         /* The incoming server widgets: */
505         if (!self->combo_incoming_servertype)
506                 self->combo_incoming_servertype = GTK_WIDGET (easysetup_servertype_combo_box_new ());
507         easysetup_servertype_combo_box_set_active_servertype (
508                 EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype), MODEST_PROTOCOL_STORE_POP);
509         GtkWidget *caption = create_caption_new_with_asterix (self, sizegroup, 
510                 _("mcen_li_emailsetup_type"), self->combo_incoming_servertype, NULL, HILDON_CAPTION_MANDATORY);
511         gtk_widget_show (self->combo_incoming_servertype);
512         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
513         gtk_widget_show (caption);
514         
515         if(!self->entry_incomingserver)
516                 self->entry_incomingserver = gtk_entry_new ();
517         set_default_custom_servernames (self);
518
519         if (self->caption_incoming)
520           gtk_widget_destroy (self->caption_incoming);
521            
522         /* The caption title will be updated in update_incoming_server_title().
523          * so this default text will never be seen: */
524         /* (Note: Changing the title seems pointless. murrayc) */
525         self->caption_incoming = create_caption_new_with_asterix (self, sizegroup, 
526                 "Incoming Server", self->entry_incomingserver, NULL, HILDON_CAPTION_MANDATORY);
527         update_incoming_server_title (self);
528         gtk_widget_show (self->entry_incomingserver);
529         gtk_box_pack_start (GTK_BOX (box), self->caption_incoming, FALSE, FALSE, 2);
530         gtk_widget_show (self->caption_incoming);
531         
532         /* Change the caption title when the servertype changes, 
533          * as in the UI spec: */
534          g_signal_connect (G_OBJECT (self->combo_incoming_servertype), "changed",
535                 G_CALLBACK (on_combo_servertype_changed), self);
536         
537         /* The secure connection widgets: */    
538         if (!self->combo_incoming_security)
539                 self->combo_incoming_security = GTK_WIDGET (easysetup_serversecurity_combo_box_new ());
540         update_incoming_server_security_choices (self);
541         easysetup_serversecurity_combo_box_set_active_serversecurity (
542                 EASYSETUP_SERVERSECURITY_COMBO_BOX (self->combo_incoming_security), MODEST_PROTOCOL_SECURITY_NONE);
543         caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_connection"), 
544                 self->combo_incoming_security, NULL, HILDON_CAPTION_OPTIONAL);
545         gtk_widget_show (self->combo_incoming_security);
546         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
547         gtk_widget_show (caption);
548         
549         if(!self->checkbox_incoming_auth)
550                 self->checkbox_incoming_auth = 
551                         gtk_check_button_new_with_label (_("mcen_li_emailsetup_secure_authentication"));
552         gtk_box_pack_start (GTK_BOX (box), self->checkbox_incoming_auth, FALSE, FALSE, 2);
553         gtk_widget_show (self->checkbox_incoming_auth);
554         
555         gtk_widget_show (GTK_WIDGET (box));
556         
557         return GTK_WIDGET (box);
558 }
559
560 static void
561 on_toggle_button_changed (GtkToggleButton *togglebutton, gpointer user_data)
562 {
563         GtkWidget *widget = GTK_WIDGET (user_data);
564         
565         /* Enable the widget only if the toggle button is active: */
566         const gboolean enable = gtk_toggle_button_get_active (togglebutton);
567         gtk_widget_set_sensitive (widget, enable);
568 }
569
570 /* Make the sensitivity of a widget depend on a toggle button.
571  */
572 static void
573 enable_widget_for_togglebutton (GtkWidget *widget, GtkToggleButton* button)
574 {
575         g_signal_connect (G_OBJECT (button), "toggled",
576                 G_CALLBACK (on_toggle_button_changed), widget);
577         
578         /* Set the starting sensitivity: */
579         on_toggle_button_changed (button, widget);
580 }
581         
582 static void
583 on_smtp_servers_window_hide (GtkWindow *window, gpointer user_data)
584 {
585         /* Destroy the window when it is closed: */
586         gtk_widget_destroy (GTK_WIDGET (window));
587 }
588
589 static void
590 on_button_outgoing_smtp_servers (GtkButton *button, gpointer user_data)
591 {
592         ModestEasysetupWizardDialog * self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
593         
594         /* Show the window: */
595         /* TODO: Retrieve the chosen settings,
596          * so we can supply them when creating the connection somehow.
597          */
598         GtkWidget *window = GTK_WIDGET (modest_connection_specific_smtp_window_new ());
599
600         gtk_window_set_transient_for (GTK_WINDOW (window), GTK_WINDOW (self));
601         g_signal_connect (G_OBJECT (window), "hide",
602                 G_CALLBACK (on_smtp_servers_window_hide), self);
603         gtk_widget_show (window);
604 }
605
606 static GtkWidget* create_page_custom_outgoing (ModestEasysetupWizardDialog *self)
607 {
608         GtkWidget *box = gtk_vbox_new (FALSE, 2);
609         
610         /* Create a size group to be used by all captions.
611          * Note that HildonCaption does not create a default size group if we do not specify one.
612          * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
613         GtkSizeGroup *sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
614          
615         /* The outgoing server widgets: */
616         if (!self->entry_outgoingserver)
617                 self->entry_outgoingserver = gtk_entry_new ();
618         GtkWidget *caption = create_caption_new_with_asterix (self, sizegroup, 
619                 _("mcen_li_emailsetup_smtp"), self->entry_outgoingserver, NULL, HILDON_CAPTION_OPTIONAL);
620         gtk_widget_show (self->entry_outgoingserver);
621         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
622         gtk_widget_show (caption);
623         set_default_custom_servernames (self);
624         
625         /* The secure connection widgets: */    
626         if (!self->combo_outgoing_security)
627                 self->combo_outgoing_security = GTK_WIDGET (easysetup_serversecurity_combo_box_new ());
628         easysetup_serversecurity_combo_box_fill (
629                 EASYSETUP_SERVERSECURITY_COMBO_BOX (self->combo_outgoing_security), MODEST_PROTOCOL_TRANSPORT_SMTP);
630         easysetup_serversecurity_combo_box_set_active_serversecurity (
631                 EASYSETUP_SERVERSECURITY_COMBO_BOX (self->combo_outgoing_security), MODEST_PROTOCOL_SECURITY_NONE);
632         caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_connection"), 
633                 self->combo_outgoing_security, NULL, HILDON_CAPTION_OPTIONAL);
634         gtk_widget_show (self->combo_outgoing_security);
635         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
636         gtk_widget_show (caption);
637         
638         /* The secure authentication widgets: */
639         if (!self->combo_outgoing_auth)
640                 self->combo_outgoing_auth = GTK_WIDGET (easysetup_secureauth_combo_box_new ());
641         caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_authentication"), 
642                 self->combo_outgoing_auth, NULL, HILDON_CAPTION_OPTIONAL);
643         gtk_widget_show (self->combo_outgoing_auth);
644         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
645         gtk_widget_show (caption);
646         
647         /* connection-specific checkbox: */
648         if (!self->checkbox_outgoing_smtp_specific) {
649                 self->checkbox_outgoing_smtp_specific = gtk_check_button_new_with_label (_("mcen_fi_advsetup_connection_smtp"));
650                 gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (self->checkbox_outgoing_smtp_specific), 
651                         FALSE);
652         }
653         gtk_box_pack_start (GTK_BOX (box), self->checkbox_outgoing_smtp_specific, FALSE, FALSE, 2);
654         gtk_widget_show (self->checkbox_outgoing_smtp_specific);
655         
656         /* Connection-specific SMTP-Severs Edit button: */
657         if (!self->button_outgoing_smtp_servers)
658                 self->button_outgoing_smtp_servers = gtk_button_new_with_label (_("mcen_bd_emailsetup_edit"));
659         caption = hildon_caption_new (sizegroup, _("mcen_fi_advsetup_optional_smtp"), 
660                 self->button_outgoing_smtp_servers, NULL, HILDON_CAPTION_OPTIONAL);
661         gtk_widget_show (self->button_outgoing_smtp_servers);
662         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
663         gtk_widget_show (caption);
664         
665         /* Only enable the button when the checkbox is checked: */
666         enable_widget_for_togglebutton (self->button_outgoing_smtp_servers, 
667                 GTK_TOGGLE_BUTTON (self->checkbox_outgoing_smtp_specific));
668                 
669         g_signal_connect (G_OBJECT (self->button_outgoing_smtp_servers), "clicked",
670                 G_CALLBACK (on_button_outgoing_smtp_servers), self);
671         
672         
673         gtk_widget_show (GTK_WIDGET (box));
674         
675         return GTK_WIDGET (box);
676 }
677
678 static GtkWidget* create_page_complete_custom (ModestEasysetupWizardDialog *self)
679 {
680         GtkWidget *box = gtk_vbox_new (FALSE, 2);
681         GtkWidget *label = gtk_label_new(_("mcen_ia_emailsetup_setup_complete"));
682         gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
683         gtk_widget_show (label);
684         
685         if (!self->button_edit)
686                 self->button_edit = gtk_button_new_with_label (_("mcen_bd_emailsetup_edit"));
687         GtkWidget *caption = hildon_caption_new (NULL, _("mcen_fi_advanced_settings"), 
688                 self->button_edit, NULL, HILDON_CAPTION_OPTIONAL);
689         gtk_widget_show (self->button_edit);
690         gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, 2);
691         gtk_widget_show (caption);
692         
693         gtk_widget_show (GTK_WIDGET (box));
694         return GTK_WIDGET (box);
695 }
696
697
698 /*
699  */
700 static void 
701 on_response (ModestWizardDialog *wizard_dialog,
702         gint response_id,
703         gpointer user_data)
704 {
705         ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (wizard_dialog);
706         invoke_enable_buttons_vfunc (self);
707 }
708
709 static void
710 modest_easysetup_wizard_dialog_init (ModestEasysetupWizardDialog *self)
711 {
712         /* Create the notebook to be used by the ModestWizardDialog base class:
713          * Each page of the notebook will be a page of the wizard: */
714         GtkNotebook *notebook = GTK_NOTEBOOK (gtk_notebook_new());
715         
716     /* Set the notebook used by the ModestWizardDialog base class: */
717     g_object_set (G_OBJECT(self), "wizard-notebook", notebook, NULL);
718     
719     /* Set the wizard title:
720      * The actual window title will be a combination of this and the page's tab label title. */
721     g_object_set (G_OBJECT(self), "wizard-name", _("mcen_ti_emailsetup"), NULL);
722
723         /* Read in the information about known service providers: */
724         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
725         
726         const gchar* filepath = MODEST_PROVIDERS_DATA_PATH; /* Defined in config.h */
727         priv->presets = modest_presets_new (filepath);
728         if (!(priv->presets)) {
729                 g_warning ("Could not locate the official provider data keyfile from %s", filepath);
730         }
731         
732         g_assert(priv->presets);
733         
734         
735         /* Get the account manager object, 
736          * so we can check for existing accounts,
737          * and create new accounts: */
738         self->account_manager = modest_runtime_get_account_mgr ();
739         g_assert (self->account_manager);
740         g_object_ref (self->account_manager);
741         
742     /* Create the common pages, 
743      */
744     self->page_welcome = create_page_welcome (self);
745         self->page_account_details = create_page_account_details (self);
746         self->page_user_details = create_page_user_details (self);
747         
748         /* Add the common pages: */
749         gtk_notebook_append_page (notebook, self->page_welcome, 
750                 gtk_label_new (_("mcen_ti_emailsetup_welcome")));
751         gtk_notebook_append_page (notebook, self->page_account_details, 
752                 gtk_label_new (_("mcen_ti_accountdetails")));
753         gtk_notebook_append_page (notebook, self->page_user_details, 
754                 gtk_label_new (_("mcen_ti_emailsetup_userdetails")));
755                 
756         /* Create and add the easysetup-specific pages,
757          * because we need _some_ final page to enable the Next and Finish buttons: */
758         create_subsequent_easysetup_pages (self);
759
760             
761     /* Connect to the dialog's response signal so we can enable/disable buttons 
762      * for the newly-selected page, because the prev/next buttons cause response to be emitted.
763      * Note that we use g_signal_connect_after() instead of g_signal_connect()
764      * so that we can be enable/disable after ModestWizardDialog has done its own 
765      * enabling/disabling of buttons.
766      * 
767      * HOWEVER, this doesn't work because ModestWizardDialog's response signal handler 
768      * does g_signal_stop_emission_by_name(), stopping our signal handler from running.
769      * 
770      * It's not enough to connect to the notebook's switch-page signal, because 
771      * ModestWizardDialog's "response" signal handler enables the buttons itself, 
772      * _after_ switching the page (understandably).
773      * (Note that if we had, if we used g_signal_connect() instead of g_signal_connect_after()
774      * then gtk_notebook_get_current_page() would return an incorrect value.)
775      */
776     g_signal_connect_after (G_OBJECT (self), "response",
777             G_CALLBACK (on_response), self);       
778 }
779
780 ModestEasysetupWizardDialog*
781 modest_easysetup_wizard_dialog_new (void)
782 {
783         return g_object_new (MODEST_TYPE_EASYSETUP_WIZARD_DIALOG, NULL);
784 }
785
786 static void create_subsequent_customsetup_pages (ModestEasysetupWizardDialog *self)
787 {
788         GtkNotebook *notebook = NULL;
789         g_object_get (self, "wizard-notebook", &notebook, NULL);
790         g_assert(notebook);
791         
792         /* Create the custom pages: */
793         if(!(self->page_custom_incoming)) {
794                 self->page_custom_incoming = create_page_custom_incoming (self);
795         }
796                 
797         if(!(self->page_custom_outgoing)) {
798                 self->page_custom_outgoing = create_page_custom_outgoing (self);
799         }
800         
801         if(!(self->page_complete_customsetup)) {
802                 self->page_complete_customsetup = create_page_complete_custom (self);
803         }
804         
805         if (!gtk_widget_get_parent (GTK_WIDGET (self->page_custom_incoming)))
806                 gtk_notebook_append_page (notebook, self->page_custom_incoming,
807                         gtk_label_new (_("mcen_ti_emailsetup_incomingdetails")));
808         
809         if (!gtk_widget_get_parent (GTK_WIDGET (self->page_custom_outgoing)))           
810                 gtk_notebook_append_page (notebook, self->page_custom_outgoing,
811                         gtk_label_new (_("mcen_ti_emailsetup_outgoingdetails")));
812                 
813         if (!gtk_widget_get_parent (GTK_WIDGET (self->page_complete_customsetup)))
814                 gtk_notebook_append_page (notebook, self->page_complete_customsetup,
815                         gtk_label_new (_("mcen_ti_emailsetup_complete")));
816 }
817         
818 static void create_subsequent_easysetup_pages (ModestEasysetupWizardDialog *self)
819 {
820         GtkNotebook *notebook = NULL;
821         g_object_get (self, "wizard-notebook", &notebook, NULL);
822         g_assert(notebook);
823         
824         /* Create the easysetup-specific pages: */
825         if(!self->page_complete_easysetup)
826                 self->page_complete_easysetup = create_page_complete_easysetup (self);
827
828         if (!gtk_widget_get_parent (GTK_WIDGET (self->page_complete_easysetup)))
829                 gtk_notebook_append_page (notebook, self->page_complete_easysetup, 
830                         gtk_label_new (_("mcen_ti_emailsetup_complete")));
831                         
832 }
833 /* After the user details page,
834  * the following pages depend on whether "Other" was chosen 
835  * in the provider combobox on the account page
836  */
837 static void create_subsequent_pages (ModestEasysetupWizardDialog *self)
838 {
839         if (easysetup_provider_combo_box_get_active_provider_id (
840                 EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider)) == 0) {
841                 /* "Other..." was selected: */
842                 
843                 /* Make sure that the easysetup pages do not exist: */
844                 if(self->page_complete_easysetup) {
845                         gtk_widget_destroy (self->page_complete_easysetup);
846                         self->page_complete_easysetup = NULL;
847                 }
848                 
849                 create_subsequent_customsetup_pages (self);
850         }       
851         else {
852                 /* A specific provider was selected: */
853                 {
854                         /* Make sure that the custom pages do not exist:
855                          * Because they will be used if they exist, when creating the account. */
856                         if(self->page_custom_incoming) {
857                                 gtk_widget_destroy (self->page_custom_incoming);
858                                 self->page_custom_incoming = NULL;
859                         }
860                         
861                         if(self->page_custom_outgoing) {
862                                 gtk_widget_destroy (self->page_custom_outgoing);
863                                 self->page_custom_outgoing = NULL;
864                         }
865                         
866                         if(self->page_complete_customsetup) {
867                                 gtk_widget_destroy (self->page_complete_customsetup);
868                                 self->page_complete_customsetup = NULL;
869                         }
870                 }
871                 
872                 /* Create the easysetup pages: */
873                 create_subsequent_easysetup_pages (self);
874         }
875 }
876
877 static gchar*
878 util_get_default_servername_from_email_address (const gchar* email_address, ModestProtocol servertype)
879 {
880         if (!email_address)
881                 return NULL;
882         
883         gchar* at = g_utf8_strchr (email_address, -1, '@');
884         if (!at || (g_utf8_strlen (at, -1) < 2))
885                 return NULL;
886                 
887         gchar* domain = g_utf8_next_char (at);
888         if(!domain)
889                 return NULL;
890                 
891         const gchar* hostname = NULL;
892         if (servertype == MODEST_PROTOCOL_STORE_POP)
893                 hostname = "pop";
894         else if (servertype == MODEST_PROTOCOL_STORE_IMAP)
895                 hostname = "imap";
896         else if (servertype == MODEST_PROTOCOL_TRANSPORT_SMTP)
897                 hostname = "smtp";
898         
899         if (!hostname)
900                 return NULL;
901                 
902         return g_strdup_printf ("%s.%s", hostname, domain);
903 }
904
905 /* Add a number to the end of the text, or increment a number that is already there.
906  */
907 static gchar*
908 util_increment_name (const gchar* text)
909 {
910         /* Get the end character,
911          * also doing a UTF-8 validation which is required for using g_utf8_prev_char().
912          */
913         const gchar* end = NULL;
914         if (!g_utf8_validate (text, -1, &end))
915                 return NULL;
916   
917         if (!end)
918                 return NULL;
919                 
920         --end; /* Go to before the null-termination. */
921                 
922         /* Look at each UTF-8 characer, starting at the end: */
923         const gchar* p = end;
924         const gchar* alpha_end = NULL;
925         while (p)
926         {       
927                 /* Stop when we reach the first character that is not a numeric digit: */
928                 const gunichar ch = g_utf8_get_char (p);
929                 if (!g_unichar_isdigit (ch)) {
930                         alpha_end = p;
931                         break;
932                 }
933                 
934                 p = g_utf8_prev_char (p);       
935         }
936         
937         if(!alpha_end) {
938                 /* The text must consist completely of numeric digits. */
939                 alpha_end = text;
940         }
941         else
942                 ++alpha_end;
943         
944         /* Intepret and increment the number, if any: */
945         gint num = atol (alpha_end);
946         ++num;
947         
948         /* Get the name part: */
949         gint name_len = alpha_end - text;
950         gchar *name_without_number = g_malloc(name_len + 1);
951         memcpy (name_without_number, text, name_len);
952         name_without_number[name_len] = 0;\
953         
954     /* Concatenate the text part and the new number: */ 
955         gchar *result = g_strdup_printf("%s%d", name_without_number, num);
956         g_free (name_without_number);
957         
958         return result;  
959 }
960         
961 static void set_default_custom_servernames (ModestEasysetupWizardDialog *account_wizard)
962 {
963         if (!account_wizard->entry_incomingserver)
964                 return;
965                 
966         /* Set a default domain for the server, based on the email address,
967          * if no server name was already specified.
968          */
969         const gchar* incoming_existing = gtk_entry_get_text (GTK_ENTRY (account_wizard->entry_incomingserver));
970         if ((!incoming_existing || (strlen(incoming_existing) == 0)) 
971                 && account_wizard->entry_user_email) {
972                 const ModestProtocol protocol = easysetup_servertype_combo_box_get_active_servertype (
973                         EASYSETUP_SERVERTYPE_COMBO_BOX (account_wizard->combo_incoming_servertype));
974                 const gchar* email_address = gtk_entry_get_text (GTK_ENTRY(account_wizard->entry_user_email));
975                 
976                 gchar* servername = util_get_default_servername_from_email_address (email_address, protocol);
977                 gtk_entry_set_text (GTK_ENTRY (account_wizard->entry_incomingserver), servername);
978                 g_free (servername);
979         }
980         
981         /* Set a default domain for the server, based on the email address,
982          * if no server name was already specified.
983          */
984         const gchar* outgoing_existing = gtk_entry_get_text (GTK_ENTRY (account_wizard->entry_outgoingserver));
985         if ((!outgoing_existing || (strlen(outgoing_existing) == 0)) 
986                 && account_wizard->entry_user_email) {
987                 const gchar* email_address = gtk_entry_get_text (GTK_ENTRY(account_wizard->entry_user_email));
988                 
989                 gchar* servername = util_get_default_servername_from_email_address (email_address, MODEST_PROTOCOL_TRANSPORT_SMTP);
990                 gtk_entry_set_text (GTK_ENTRY (account_wizard->entry_outgoingserver), servername);
991                 g_free (servername);
992         }
993 }
994
995 static gboolean
996 on_before_next (ModestWizardDialog *dialog, GtkWidget *current_page, GtkWidget *next_page)
997 {
998         ModestEasysetupWizardDialog *account_wizard = MODEST_EASYSETUP_WIZARD_DIALOG (dialog);
999         
1000         /* Do extra validation that couldn't be done for every key press,
1001          * either because it was too slow,
1002          * or because it requires interaction:
1003          */
1004         if (current_page == account_wizard->page_account_details) {     
1005                 /* Check that the title is not already in use: */
1006                 const gchar* account_name = gtk_entry_get_text (GTK_ENTRY (account_wizard->entry_account_title));
1007                 if ((!account_name) || (strlen(account_name) == 0))
1008                         return FALSE;
1009                         
1010                 /* Aavoid a clash with an existing display name: */
1011                 const gboolean name_in_use = modest_account_mgr_account_with_display_name_exists (
1012                         account_wizard->account_manager, account_name);
1013
1014                 if (name_in_use) {
1015                         /* Warn the user via a dialog: */
1016                         show_error (GTK_WINDOW (account_wizard), _("mail_ib_account_name_already_existing"));
1017             
1018                         return FALSE;
1019                 }
1020         }
1021         else if (current_page == account_wizard->page_user_details) {
1022                 /* Check that the email address is valud: */
1023                 const gchar* email_address = gtk_entry_get_text (GTK_ENTRY (account_wizard->entry_user_email));
1024                 if ((!email_address) || (strlen(email_address) == 0))
1025                         return FALSE;
1026                         
1027                 if (!modest_text_utils_validate_email_address (email_address)) {
1028                         /* Warn the user via a dialog: */
1029                         show_error (GTK_WINDOW (account_wizard), _("mcen_ib_invalid_email"));
1030                                              
1031             /* Return focus to the email address entry: */
1032             gtk_widget_grab_focus (account_wizard->entry_user_email);
1033             
1034                         return FALSE;
1035                 }
1036                 
1037                 /* Make sure that the subsequent pages are appropriate for the provider choice. */
1038                 create_subsequent_pages (account_wizard);
1039         }
1040         
1041         /* TODO: The UI Spec wants us to check that the servernames are valid, 
1042          * but does not specify how.
1043          */
1044           
1045         if(next_page == account_wizard->page_custom_incoming) {
1046                 set_default_custom_servernames (account_wizard);
1047         }
1048         else if (next_page == account_wizard->page_custom_outgoing) {
1049                 set_default_custom_servernames (account_wizard);
1050         }
1051         
1052         /* If this is the last page, and this is a click on Finish, 
1053          * then attempt to create the dialog.
1054          */
1055         if(!next_page) /* This is NULL when this is a click on Finish. */
1056         {
1057                 create_account (account_wizard);
1058         }
1059         
1060         
1061         return TRUE;
1062 }
1063
1064 static gboolean entry_is_empty (GtkWidget *entry)
1065 {
1066         if (!entry)
1067                 return FALSE;
1068                 
1069         const gchar* text = gtk_entry_get_text (GTK_ENTRY (entry));
1070         if ((!text) || (strlen(text) == 0))
1071                 return TRUE;
1072         else
1073                 return FALSE;
1074 }
1075
1076 static void
1077 on_enable_buttons (ModestWizardDialog *dialog, GtkWidget *current_page)
1078 {
1079         ModestEasysetupWizardDialog *account_wizard = MODEST_EASYSETUP_WIZARD_DIALOG (dialog);
1080         
1081         gboolean enable_next = TRUE;
1082         if (current_page == account_wizard->page_welcome) {
1083                 enable_next = TRUE;
1084         }
1085         else if (current_page == account_wizard->page_account_details) {
1086                 /* The account details title is mandatory: */
1087                 if (entry_is_empty(account_wizard->entry_account_title))
1088                         enable_next = FALSE;
1089         }
1090         else if (current_page == account_wizard->page_user_details) {   
1091                 /* The user details username is mandatory: */
1092                 if (entry_is_empty(account_wizard->entry_user_username))
1093                         enable_next = FALSE;
1094                         
1095                 /* The user details email address is mandatory: */
1096                 if (enable_next && entry_is_empty (account_wizard->entry_user_email))
1097                         enable_next = FALSE;
1098         }
1099         else if (current_page == account_wizard->page_custom_incoming) {
1100                 /* The custom incoming server is mandatory: */
1101                 if (entry_is_empty(account_wizard->entry_incomingserver))
1102                         enable_next = FALSE;
1103         }
1104                         
1105         /* Enable the buttons, 
1106          * identifying them via their associated response codes:
1107          */
1108         GtkDialog *dialog_base = GTK_DIALOG (dialog);
1109     gtk_dialog_set_response_sensitive (dialog_base,
1110                                        MODEST_WIZARD_DIALOG_NEXT,
1111                                        enable_next);
1112                                        
1113     /* Disable the Finish button until we are on the last page,
1114      * because HildonWizardDialog enables this for all but the first page: */
1115     GtkNotebook *notebook = NULL;
1116         g_object_get (dialog_base, "wizard-notebook", &notebook, NULL);
1117         
1118     gint current = gtk_notebook_get_current_page (notebook);
1119     gint last = gtk_notebook_get_n_pages (notebook) - 1;
1120     gboolean is_last = (current == last);
1121     
1122     if(!is_last) {
1123         gtk_dialog_set_response_sensitive (dialog_base,
1124                                        MODEST_WIZARD_DIALOG_FINISH,
1125                                        FALSE);
1126     }
1127 }
1128
1129 static void
1130 modest_easysetup_wizard_dialog_class_init (ModestEasysetupWizardDialogClass *klass)
1131 {
1132         GObjectClass *object_class = G_OBJECT_CLASS (klass);
1133         g_type_class_add_private (klass, sizeof (ModestEasysetupWizardDialogPrivate));
1134
1135
1136         object_class->get_property = modest_easysetup_wizard_dialog_get_property;
1137         object_class->set_property = modest_easysetup_wizard_dialog_set_property;
1138         object_class->dispose = modest_easysetup_wizard_dialog_dispose;
1139         object_class->finalize = modest_easysetup_wizard_dialog_finalize;
1140         
1141         /* Provide a vfunc implementation so we can decide 
1142          * when to enable/disable the prev/next buttons.
1143          */
1144         ModestWizardDialogClass *base_klass = (ModestWizardDialogClass*)(klass);
1145         base_klass->before_next = on_before_next;
1146         base_klass->enable_buttons = on_enable_buttons;
1147 }
1148  
1149 static void
1150 show_error (GtkWindow *parent_window, const gchar* text)
1151 {
1152         GtkDialog *dialog = GTK_DIALOG (gtk_message_dialog_new (parent_window,
1153                 (GtkDialogFlags)0,
1154                  GTK_MESSAGE_ERROR,
1155                  GTK_BUTTONS_OK,
1156                  text ));
1157                  
1158                  gtk_dialog_run (dialog);
1159                  gtk_widget_destroy (GTK_WIDGET (dialog));
1160 }
1161
1162 /** Attempt to create the account from the information that the user has entered.
1163  * @result: TRUE if the account was successfully created.
1164  */
1165 gboolean
1166 create_account (ModestEasysetupWizardDialog *self)
1167 {
1168         ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
1169         
1170         const gchar* display_name = gtk_entry_get_text (GTK_ENTRY (self->entry_account_title));
1171
1172         /* Some checks: */
1173         if (!display_name)
1174                 return FALSE;
1175                 
1176         /* We should have checked for this already, 
1177          * and changed that name accordingly, 
1178          * but let's check again just in case:
1179          */
1180         if (modest_account_mgr_account_with_display_name_exists (self->account_manager, display_name)) 
1181                 return FALSE;
1182
1183         /* Increment the non-user visible name if necessary, 
1184          * based on the display name: */
1185         gchar *account_name = g_strdup_printf ("%sID", display_name);
1186         while (modest_account_mgr_account_exists (self->account_manager, 
1187                 account_name, FALSE /*  server_account */)) {
1188                         
1189                 gchar * account_name2 = util_increment_name (account_name);
1190                 g_free (account_name);
1191                 account_name = account_name2;
1192         }
1193                 
1194         /* username and password (for both incoming and outgoing): */
1195         const gchar* username = gtk_entry_get_text (GTK_ENTRY (self->entry_user_username));
1196         const gchar* password = gtk_entry_get_text (GTK_ENTRY (self->entry_user_password));
1197         
1198         /* Incoming server: */
1199         /* Note: We need something as default for the ModestProtocol values, 
1200          * or modest_account_mgr_add_server_account will fail. */
1201         gchar* servername_incoming = NULL;
1202         ModestProtocol protocol_incoming = MODEST_PROTOCOL_STORE_POP;
1203         ModestProtocol protocol_security_incoming = MODEST_PROTOCOL_SECURITY_NONE;
1204         ModestProtocol protocol_authentication_incoming = MODEST_PROTOCOL_AUTH_NONE;
1205         
1206         /* Get details from the specified presets: */
1207         gchar* provider_id = easysetup_provider_combo_box_get_active_provider_id (
1208                 EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider));
1209         if(provider_id) {
1210                 /* Use presets: */
1211                 
1212                 servername_incoming = modest_presets_get_server (priv->presets, provider_id, 
1213                         TRUE /* incoming */);
1214                 
1215                 ModestPresetsServerType servertype_incoming = modest_presets_get_info_server_type (priv->presets, provider_id, 
1216                         TRUE /* incoming */);
1217                 
1218         
1219                 /* We don't check for SMTP here as that is impossible for an incoming server. */
1220                 if (servertype_incoming == MODEST_PRESETS_SERVER_TYPE_IMAP)
1221                         protocol_incoming = MODEST_PROTOCOL_STORE_IMAP;
1222                 else if (servertype_incoming == MODEST_PRESETS_SERVER_TYPE_POP)
1223                         protocol_incoming = MODEST_PROTOCOL_STORE_POP;
1224                                 
1225                 ModestPresetsSecurity security_incoming = modest_presets_get_info_server_security (priv->presets, provider_id, 
1226                         TRUE /* incoming */);
1227                         
1228                 
1229                 if (security_incoming & MODEST_PRESETS_SECURITY_SECURE_INCOMING)
1230                         protocol_security_incoming = MODEST_PROTOCOL_SECURITY_SSL; /* TODO: Is this what we want? */
1231                 
1232                 if (security_incoming & MODEST_PRESETS_SECURITY_APOP)
1233                         protocol_authentication_incoming = MODEST_PROTOCOL_AUTH_PASSWORD; /* TODO: Is this what we want? */
1234         }
1235         else {
1236                 /* Use custom pages because no preset was specified: */
1237                 servername_incoming = g_strdup (gtk_entry_get_text (GTK_ENTRY (self->entry_incomingserver) ));
1238                 
1239                 protocol_incoming = easysetup_servertype_combo_box_get_active_servertype (
1240                 EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype));
1241                 
1242                 protocol_security_incoming = easysetup_serversecurity_combo_box_get_active_serversecurity (
1243                 EASYSETUP_SERVERSECURITY_COMBO_BOX (self->combo_incoming_security));
1244                 
1245                 protocol_authentication_incoming = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (self->checkbox_incoming_auth)) 
1246                         ? MODEST_PROTOCOL_AUTH_PASSWORD
1247                         : MODEST_PROTOCOL_AUTH_NONE;
1248                 
1249         }
1250         
1251         /* First we add the 2 server accounts, and then we add the account that uses them.
1252          * If we don't do it in this order then we will experience a crash. */
1253          
1254         /* Add a (incoming) server account, to be used by the account: */
1255         gchar *store_name = g_strconcat (account_name, "_store", NULL);
1256         gboolean created = modest_account_mgr_add_server_account (self->account_manager,
1257                 store_name,
1258                 servername_incoming,
1259                 username, password,
1260                 protocol_incoming,
1261                 protocol_security_incoming,
1262                 protocol_authentication_incoming);              
1263                 
1264         g_free (servername_incoming);
1265         
1266         if (!created) {
1267                 /* TODO: Provide a Logical ID for the text: */
1268                 show_error (GTK_WINDOW (self), _("An error occurred while creating the incoming account."));
1269                 return FALSE;   
1270         }
1271         
1272         /* Sanity check: */
1273         /* There must be at least one account now: */
1274         GSList *account_names = modest_account_mgr_account_names (self->account_manager);
1275         if(!account_names)
1276         {
1277                 g_warning ("modest_account_mgr_account_names() returned NULL after adding an account.");
1278         }
1279         g_slist_free (account_names);
1280         
1281         
1282         /* Outgoing server: */
1283         gchar* servername_outgoing = NULL;
1284         ModestProtocol protocol_outgoing = MODEST_PROTOCOL_STORE_POP;
1285         ModestProtocol protocol_security_outgoing = MODEST_PROTOCOL_SECURITY_NONE;
1286         ModestProtocol protocol_authentication_outgoing = MODEST_PROTOCOL_AUTH_NONE;
1287         
1288         if(provider_id) {
1289                 /* Use presets: */
1290                 servername_outgoing = modest_presets_get_server (priv->presets, provider_id, 
1291                         FALSE /* incoming */);
1292                         
1293                 ModestPresetsServerType servertype_outgoing = modest_presets_get_info_server_type (priv->presets, provider_id, 
1294                         FALSE /* incoming */);
1295                 
1296                 /* Note: We need something as default, or modest_account_mgr_add_server_account will fail. */
1297                 protocol_outgoing = MODEST_PROTOCOL_TRANSPORT_SENDMAIL; 
1298                 if (servertype_outgoing == MODEST_PRESETS_SERVER_TYPE_SMTP)
1299                         protocol_outgoing = MODEST_PROTOCOL_TRANSPORT_SMTP; /* TODO: Is this what we want? */
1300                 
1301                 ModestPresetsSecurity security_outgoing = 
1302                         modest_presets_get_info_server_security (priv->presets, provider_id, 
1303                                 FALSE /* incoming */);
1304                         
1305                 protocol_security_outgoing = MODEST_PROTOCOL_SECURITY_NONE;
1306                 if (security_outgoing & MODEST_PRESETS_SECURITY_SECURE_SMTP)
1307                         protocol_security_outgoing = MODEST_PROTOCOL_SECURITY_SSL; /* TODO: Is this what we want? */
1308                 
1309                 protocol_authentication_outgoing = MODEST_PROTOCOL_AUTH_NONE;
1310                 /* TODO: There is no SMTP authentication enum for presets. */
1311         }
1312         else {
1313                 /* Use custom pages because no preset was specified: */
1314                 servername_outgoing = g_strdup (gtk_entry_get_text (GTK_ENTRY (self->entry_outgoingserver) ));
1315                 
1316                 protocol_outgoing = MODEST_PROTOCOL_TRANSPORT_SMTP; /* It's always SMTP for outgoing. */
1317
1318                 protocol_security_outgoing = easysetup_serversecurity_combo_box_get_active_serversecurity (
1319                         EASYSETUP_SERVERSECURITY_COMBO_BOX (self->combo_outgoing_security));
1320                 
1321                 protocol_authentication_outgoing = easysetup_secureauth_combo_box_get_active_secureauth (
1322                         EASYSETUP_SECUREAUTH_COMBO_BOX (self->combo_outgoing_auth));
1323                 
1324                 /* TODO: 
1325                 gboolean specific = gtk_toggle_button_get_active (
1326                         GTK_TOGGLE_BUTTON (self->checkbox_outgoing_smtp_specific));
1327                 */
1328                 
1329         }
1330             
1331         /* Add a (outgoing) server account to be used by the account: */
1332         gchar *transport_name = g_strconcat (account_name, "_transport", NULL); /* What is this good for? */
1333         created = modest_account_mgr_add_server_account (self->account_manager,
1334                 transport_name,
1335                 servername_outgoing,
1336                 username, password,
1337                 protocol_outgoing,
1338                 protocol_security_outgoing,
1339                 protocol_authentication_outgoing);
1340                 
1341         g_free (servername_outgoing);
1342                 
1343         if (!created) {
1344                 /* TODO: Provide a Logical ID for the text: */
1345                 show_error (GTK_WINDOW (self), _("An error occurred while creating the outgoing account."));
1346                 return FALSE;   
1347         }
1348         
1349         
1350         /* Create the account, which will contain the two "server accounts": */
1351         created = modest_account_mgr_add_account (self->account_manager, account_name, 
1352                 store_name, /* The name of our POP/IMAP server account. */
1353                 transport_name /* The name of our SMTP server account. */);
1354         g_free (store_name);
1355         g_free (transport_name);
1356         
1357         if (!created) {
1358                 /* TODO: Provide a Logical ID for the text: */
1359                 show_error (GTK_WINDOW (self), _("An error occurred while creating the account."));
1360                 return FALSE;   
1361         }
1362         
1363         /* The user name and email address must be set additionally: */
1364         const gchar* user_name = gtk_entry_get_text (GTK_ENTRY (self->entry_user_name));
1365         modest_account_mgr_set_string (self->account_manager, account_name,
1366                 MODEST_ACCOUNT_FULLNAME, user_name, FALSE /* not server account */);
1367
1368         const gchar* emailaddress = gtk_entry_get_text (GTK_ENTRY (self->entry_user_email));
1369         modest_account_mgr_set_string (self->account_manager, account_name,
1370                 MODEST_ACCOUNT_EMAIL, emailaddress, FALSE /* not server account */);
1371
1372         /* Set the display name: */
1373         modest_account_mgr_set_string (self->account_manager, account_name,
1374                 MODEST_ACCOUNT_DISPLAY_NAME, display_name, FALSE /* not server account */);
1375
1376         g_free (account_name);
1377
1378         return FALSE;
1379 }
1380
1381