1 /* Copyright (c) 2006, Nokia Corporation
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions are
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.
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.
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(). */
59 /* Include config.h so that _() works: */
64 #define EXAMPLE_EMAIL_ADDRESS "first.last@provider.com"
66 G_DEFINE_TYPE (ModestEasysetupWizardDialog, modest_easysetup_wizard_dialog, MODEST_TYPE_WIZARD_DIALOG);
68 #define WIZARD_DIALOG_GET_PRIVATE(o) \
69 (G_TYPE_INSTANCE_GET_PRIVATE ((o), MODEST_TYPE_EASYSETUP_WIZARD_DIALOG, ModestEasysetupWizardDialogPrivate))
71 typedef struct _ModestEasysetupWizardDialogPrivate ModestEasysetupWizardDialogPrivate;
74 MODEST_EASYSETUP_WIZARD_DIALOG_INCOMING_CHANGED = 0x01,
75 MODEST_EASYSETUP_WIZARD_DIALOG_OUTGOING_CHANGED = 0x02
76 } ModestEasysetupWizardDialogServerChanges;
78 struct _ModestEasysetupWizardDialogPrivate
80 ModestPresets *presets;
82 /* Remember what fields the user edited manually to not prefill them
84 ModestEasysetupWizardDialogServerChanges server_changes;
88 modest_easysetup_wizard_dialog_get_property (GObject *object, guint property_id,
89 GValue *value, GParamSpec *pspec)
91 switch (property_id) {
93 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
98 modest_easysetup_wizard_dialog_set_property (GObject *object, guint property_id,
99 const GValue *value, GParamSpec *pspec)
101 switch (property_id) {
103 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
108 modest_easysetup_wizard_dialog_dispose (GObject *object)
110 if (G_OBJECT_CLASS (modest_easysetup_wizard_dialog_parent_class)->dispose)
111 G_OBJECT_CLASS (modest_easysetup_wizard_dialog_parent_class)->dispose (object);
115 modest_easysetup_wizard_dialog_finalize (GObject *object)
117 ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (object);
118 ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
120 if (self->account_manager)
121 g_object_unref (G_OBJECT (self->account_manager));
124 modest_presets_destroy (priv->presets);
126 if (self->specific_window)
127 gtk_widget_destroy (self->specific_window);
129 g_free (self->saved_account_name);
131 G_OBJECT_CLASS (modest_easysetup_wizard_dialog_parent_class)->finalize (object);
135 show_error (GtkWindow *parent_window, const gchar* text);
138 create_account (ModestEasysetupWizardDialog *self, gboolean enabled);
141 create_subsequent_easysetup_pages (ModestEasysetupWizardDialog *self);
144 set_default_custom_servernames(ModestEasysetupWizardDialog *dialog);
146 static void on_combo_servertype_changed(GtkComboBox *combobox, gpointer user_data);
148 static gint get_serverport_incoming(ModestPresetsServerType servertype_incoming,
149 ModestPresetsSecurity security_incoming)
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;
160 return serverport_incoming;
163 static GList* check_for_supported_auth_methods(ModestEasysetupWizardDialog* account_wizard)
165 GError *error = NULL;
166 const ModestTransportStoreProtocol protocol =
167 easysetup_servertype_combo_box_get_active_servertype (
168 EASYSETUP_SERVERTYPE_COMBO_BOX (account_wizard->combo_incoming_servertype));
169 const gchar* hostname = gtk_entry_get_text(GTK_ENTRY(account_wizard->entry_incomingserver));
170 const gchar* username = gtk_entry_get_text(GTK_ENTRY(account_wizard->entry_user_username));
171 const ModestConnectionProtocol protocol_security_incoming =
172 modest_serversecurity_combo_box_get_active_serversecurity (
173 MODEST_SERVERSECURITY_COMBO_BOX (
174 account_wizard->combo_incoming_security));
175 int port_num = get_serverport_incoming(protocol, protocol_security_incoming);
176 GList *list_auth_methods =
177 modest_maemo_utils_get_supported_secure_authentication_methods (
179 hostname, port_num, username, GTK_WINDOW (account_wizard), &error);
180 if (list_auth_methods) {
181 /* TODO: Select the correct method */
184 for (method = list_auth_methods; method != NULL; method = g_list_next(method)) {
185 ModestAuthProtocol auth = (ModestAuthProtocol) (GPOINTER_TO_INT(method->data));
186 if (modest_protocol_info_auth_is_secure(auth)) {
187 list = g_list_append(list, GINT_TO_POINTER(auth));
190 g_list_free(list_auth_methods);
195 if(error == NULL || error->domain != modest_maemo_utils_get_supported_secure_authentication_error_quark() ||
196 error->code != MODEST_MAEMO_UTILS_GET_SUPPORTED_SECURE_AUTHENTICATION_ERROR_CANCELED)
198 GtkWidget* error_dialog = gtk_message_dialog_new(GTK_WINDOW(account_wizard),
199 GTK_DIALOG_MODAL, GTK_MESSAGE_ERROR,
200 GTK_BUTTONS_OK, (error != NULL) ? error->message : _("Server does not support secure authentication!"));
201 gtk_dialog_run(GTK_DIALOG(error_dialog));
202 gtk_widget_destroy(error_dialog);
205 if(error != NULL) g_error_free(error);
210 invoke_enable_buttons_vfunc (ModestEasysetupWizardDialog *wizard_dialog)
212 ModestWizardDialogClass *klass = MODEST_WIZARD_DIALOG_GET_CLASS (wizard_dialog);
214 /* Call the vfunc, which may be overridden by derived classes: */
215 if (klass->enable_buttons) {
216 GtkNotebook *notebook = NULL;
217 g_object_get (wizard_dialog, "wizard-notebook", ¬ebook, NULL);
219 const gint current_page_num = gtk_notebook_get_current_page (notebook);
220 if (current_page_num == -1)
223 GtkWidget* current_page_widget = gtk_notebook_get_nth_page (notebook, current_page_num);
224 (*(klass->enable_buttons))(MODEST_WIZARD_DIALOG (wizard_dialog), current_page_widget);
229 on_caption_entry_changed (GtkEditable *editable, gpointer user_data)
231 ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
233 invoke_enable_buttons_vfunc(self);
237 on_caption_combobox_changed (GtkComboBox *widget, gpointer user_data)
239 ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
241 invoke_enable_buttons_vfunc(self);
244 /** This is a convenience function to create a caption containing a mandatory widget.
245 * When the widget is edited, the enable_buttons() vfunc will be called.
247 static GtkWidget* create_caption_new_with_asterisk(ModestEasysetupWizardDialog *self,
252 HildonCaptionStatus flag)
254 GtkWidget *caption = NULL;
256 /* Note: Previously, the translated strings already contained the "*",
257 * Comment out this code if they do again.
259 /* Add a * character to indicate mandatory fields,
260 * as specified in our "Email UI Specification": */
261 if (flag == HILDON_CAPTION_MANDATORY) {
262 gchar* title = g_strdup_printf("%s*", value);
263 caption = hildon_caption_new (group, title, control, icon, flag);
267 caption = hildon_caption_new (group, value, control, icon, flag);
269 /* Connect to the appropriate changed signal for the widget,
270 * so we can ask for the prev/next buttons to be enabled/disabled appropriately:
272 if (GTK_IS_ENTRY (control)) {
273 g_signal_connect (G_OBJECT (control), "changed",
274 G_CALLBACK (on_caption_entry_changed), self);
277 else if (GTK_IS_COMBO_BOX (control)) {
278 g_signal_connect (G_OBJECT (control), "changed",
279 G_CALLBACK (on_caption_combobox_changed), self);
286 create_page_welcome (ModestEasysetupWizardDialog *self)
288 GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
289 GtkWidget *label = gtk_label_new(_("mcen_ia_emailsetup_intro"));
290 gtk_label_set_line_wrap (GTK_LABEL (label), TRUE);
291 /* So that it is not truncated: */
292 gtk_label_set_max_width_chars (GTK_LABEL (label), 40);
293 gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
294 gtk_widget_show (label);
295 gtk_widget_show (GTK_WIDGET (box));
296 return GTK_WIDGET (box);
300 on_combo_account_country (GtkComboBox *widget, gpointer user_data)
302 ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
304 ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
306 /* Fill the providers combo, based on the selected country: */
307 GSList *list_mcc_ids = easysetup_country_combo_box_get_active_country_ids (
308 EASYSETUP_COUNTRY_COMBO_BOX (self->combo_account_country));
309 easysetup_provider_combo_box_fill (
310 EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider), priv->presets, list_mcc_ids);
314 on_combo_account_serviceprovider (GtkComboBox *widget, gpointer user_data)
316 ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
318 ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
320 /* Fill the providers combo, based on the selected country: */
321 gchar* provider_id = easysetup_provider_combo_box_get_active_provider_id (
322 EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider));
324 gchar* domain_name = NULL;
326 domain_name = modest_presets_get_domain (priv->presets, provider_id);
329 domain_name = g_strdup (EXAMPLE_EMAIL_ADDRESS);
331 if (self->entry_user_email)
332 gtk_entry_set_text (GTK_ENTRY (self->entry_user_email), domain_name);
334 g_free (domain_name);
336 g_free (provider_id);
340 on_entry_max (ModestValidatingEntry *self, gpointer user_data)
342 ModestEasysetupWizardDialog *dialog = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
343 show_error (GTK_WINDOW (dialog), _("ckdg_ib_maximum_characters_reached"));
347 create_page_account_details (ModestEasysetupWizardDialog *self)
349 GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
350 GtkWidget *label = gtk_label_new(_("mcen_ia_accountdetails"));
351 gtk_label_set_line_wrap (GTK_LABEL (label), TRUE);
352 gtk_label_set_max_width_chars (GTK_LABEL (label), 40);
353 gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, MODEST_MARGIN_HALF);
354 gtk_widget_show (label);
356 /* Create a size group to be used by all captions.
357 * Note that HildonCaption does not create a default size group if we do not specify one.
358 * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
359 GtkSizeGroup* sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
361 /* The country widgets: */
362 self->combo_account_country = GTK_WIDGET (easysetup_country_combo_box_new ());
363 GtkWidget *caption = create_caption_new_with_asterisk (self, sizegroup, _("mcen_fi_country"),
364 self->combo_account_country, NULL, HILDON_CAPTION_OPTIONAL);
365 gtk_widget_show (self->combo_account_country);
366 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
367 gtk_widget_show (caption);
369 /* connect to country combo's changed signal, so we can fill the provider combo: */
370 g_signal_connect (G_OBJECT (self->combo_account_country), "changed",
371 G_CALLBACK (on_combo_account_country), self);
373 GtkWidget *separator = gtk_hseparator_new ();
374 gtk_box_pack_start (GTK_BOX (box), separator, FALSE, FALSE, MODEST_MARGIN_HALF);
375 gtk_widget_show (separator);
377 /* The service provider widgets: */
378 self->combo_account_serviceprovider = GTK_WIDGET (easysetup_provider_combo_box_new ());
380 caption = create_caption_new_with_asterisk (self, sizegroup, _("mcen_fi_serviceprovider"),
381 self->combo_account_serviceprovider, NULL, HILDON_CAPTION_OPTIONAL);
382 gtk_widget_show (self->combo_account_serviceprovider);
383 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
384 gtk_widget_show (caption);
386 /* connect to providers combo's changed signal, so we can fill the email address: */
387 g_signal_connect (G_OBJECT (self->combo_account_serviceprovider), "changed",
388 G_CALLBACK (on_combo_account_serviceprovider), self);
390 /* TODO: Default to the current country somehow.
391 * But I don't know how to get the information that is specified in the
392 * "Language and region" control panel. It does not seem be anywhere in gconf. murrayc.
394 * This is probably not the best choice of gconf key:
395 * This is the "mcc used in the last pairing", ie. the last connection you made.
396 * set by the osso-operator-wizard package, suggested by Dirk-Jan Binnema.
399 GConfClient *client = gconf_client_get_default ();
400 GError *error = NULL;
401 const gchar* key = "/apps/osso/operator-wizard/last_mcc";
402 gint mcc_id = gconf_client_get_int(client, key, &error);
408 g_warning ("Error getting gconf key %s:\n%s", key, error->message);
409 g_error_free (error);
415 /* Note that gconf_client_get_int() seems to return 0 without an error if the key is not there
416 * This might just be a Maemo bug.
420 /* For now, we default to Finland when there is nothing better: */
424 easysetup_country_combo_box_set_active_country_id (
425 EASYSETUP_COUNTRY_COMBO_BOX (self->combo_account_country), mcc_id);
428 /* The description widgets: */
429 self->entry_account_title = GTK_WIDGET (modest_validating_entry_new ());
430 /* Do use auto-capitalization: */
431 hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_account_title),
432 HILDON_GTK_INPUT_MODE_FULL | HILDON_GTK_INPUT_MODE_AUTOCAP);
434 /* Set a default account title, choosing one that does not already exist: */
435 /* Note that this is irrelevant to the non-user visible name, which we will create later. */
436 gchar* default_account_name_start = g_strdup (_("mcen_ia_emailsetup_defaultname"));
437 gchar* default_account_name = modest_account_mgr_get_unused_account_display_name (
438 self->account_manager, default_account_name_start);
439 g_free (default_account_name_start);
440 default_account_name_start = NULL;
442 gtk_entry_set_text( GTK_ENTRY (self->entry_account_title), default_account_name);
443 g_free (default_account_name);
444 default_account_name = NULL;
446 caption = create_caption_new_with_asterisk (self, sizegroup, _("mcen_fi_account_title"),
447 self->entry_account_title, NULL, HILDON_CAPTION_MANDATORY);
448 gtk_widget_show (self->entry_account_title);
449 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
450 gtk_widget_show (caption);
452 /* Prevent the use of some characters in the account title,
453 * as required by our UI specification: */
454 GList *list_prevent = NULL;
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 list_prevent = g_list_append (list_prevent, "?");
460 list_prevent = g_list_append (list_prevent, "\""); /* The UI spec mentions “, but maybe means ", maybe both. */
461 list_prevent = g_list_append (list_prevent, "“");
462 list_prevent = g_list_append (list_prevent, "<");
463 list_prevent = g_list_append (list_prevent, ">");
464 list_prevent = g_list_append (list_prevent, "|");
465 list_prevent = g_list_append (list_prevent, "^");
466 modest_validating_entry_set_unallowed_characters (
467 MODEST_VALIDATING_ENTRY (self->entry_account_title), list_prevent);
468 g_list_free (list_prevent);
470 /* Set max length as in the UI spec:
471 * The UI spec seems to want us to show a dialog if we hit the maximum. */
472 gtk_entry_set_max_length (GTK_ENTRY (self->entry_account_title), 64);
473 modest_validating_entry_set_max_func (MODEST_VALIDATING_ENTRY (self->entry_account_title),
476 gtk_widget_show (GTK_WIDGET (box));
478 return GTK_WIDGET (box);
482 create_page_user_details (ModestEasysetupWizardDialog *self)
484 GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
486 /* Create a size group to be used by all captions.
487 * Note that HildonCaption does not create a default size group if we do not specify one.
488 * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
489 GtkSizeGroup* sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
491 /* The name widgets: */
492 self->entry_user_name = GTK_WIDGET (modest_validating_entry_new ());
493 /* Auto-capitalization is the default, so let's turn it off: */
494 hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_user_name), HILDON_GTK_INPUT_MODE_FULL);
495 /* Set max length as in the UI spec:
496 * The UI spec seems to want us to show a dialog if we hit the maximum. */
497 gtk_entry_set_max_length (GTK_ENTRY (self->entry_user_name), 64);
498 modest_validating_entry_set_max_func (MODEST_VALIDATING_ENTRY (self->entry_user_name),
500 GtkWidget *caption = create_caption_new_with_asterisk (self, sizegroup,
501 _("mcen_li_emailsetup_name"), self->entry_user_name, NULL, HILDON_CAPTION_OPTIONAL);
502 gtk_widget_show (self->entry_user_name);
503 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
504 gtk_widget_show (caption);
506 /* Prevent the use of some characters in the name,
507 * as required by our UI specification: */
508 GList *list_prevent = NULL;
509 list_prevent = g_list_append (list_prevent, "<");
510 list_prevent = g_list_append (list_prevent, ">");
511 modest_validating_entry_set_unallowed_characters (
512 MODEST_VALIDATING_ENTRY (self->entry_user_name), list_prevent);
513 g_list_free (list_prevent);
515 /* The username widgets: */
516 self->entry_user_username = GTK_WIDGET (modest_validating_entry_new ());
517 /* Auto-capitalization is the default, so let's turn it off: */
518 hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_user_username), HILDON_GTK_INPUT_MODE_FULL);
519 caption = create_caption_new_with_asterisk (self, sizegroup, _("mail_fi_username"),
520 self->entry_user_username, NULL, HILDON_CAPTION_MANDATORY);
521 gtk_widget_show (self->entry_user_username);
522 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
523 gtk_widget_show (caption);
525 /* Prevent the use of some characters in the username,
526 * as required by our UI specification: */
527 modest_validating_entry_set_unallowed_characters_whitespace (
528 MODEST_VALIDATING_ENTRY (self->entry_user_username));
530 /* Set max length as in the UI spec:
531 * The UI spec seems to want us to show a dialog if we hit the maximum. */
532 gtk_entry_set_max_length (GTK_ENTRY (self->entry_user_username), 64);
533 modest_validating_entry_set_max_func (MODEST_VALIDATING_ENTRY (self->entry_user_username),
536 /* The password widgets: */
537 self->entry_user_password = gtk_entry_new ();
538 /* Auto-capitalization is the default, so let's turn it off: */
539 hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_user_password),
540 HILDON_GTK_INPUT_MODE_FULL | HILDON_GTK_INPUT_MODE_INVISIBLE);
541 gtk_entry_set_visibility (GTK_ENTRY (self->entry_user_password), FALSE);
542 /* gtk_entry_set_invisible_char (GTK_ENTRY (self->entry_user_password), '*'); */
543 caption = create_caption_new_with_asterisk (self, sizegroup,
544 _("mail_fi_password"), self->entry_user_password, NULL, HILDON_CAPTION_OPTIONAL);
545 gtk_widget_show (self->entry_user_password);
546 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
547 gtk_widget_show (caption);
549 /* The email address widgets: */
550 self->entry_user_email = GTK_WIDGET (modest_validating_entry_new ());
551 /* Auto-capitalization is the default, so let's turn it off: */
552 hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_user_email), HILDON_GTK_INPUT_MODE_FULL);
553 caption = create_caption_new_with_asterisk (self, sizegroup,
554 _("mcen_li_emailsetup_email_address"), self->entry_user_email, NULL, HILDON_CAPTION_MANDATORY);
555 gtk_entry_set_text (GTK_ENTRY (self->entry_user_email), EXAMPLE_EMAIL_ADDRESS); /* Default text. */
556 gtk_widget_show (self->entry_user_email);
557 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
558 gtk_widget_show (caption);
560 /* Set max length as in the UI spec:
561 * The UI spec seems to want us to show a dialog if we hit the maximum. */
562 gtk_entry_set_max_length (GTK_ENTRY (self->entry_user_email), 64);
563 modest_validating_entry_set_max_func (MODEST_VALIDATING_ENTRY (self->entry_user_email),
567 gtk_widget_show (GTK_WIDGET (box));
569 return GTK_WIDGET (box);
572 static GtkWidget* create_page_complete_easysetup (ModestEasysetupWizardDialog *self)
574 GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
576 GtkWidget *label = gtk_label_new(_("mcen_ia_emailsetup_setup_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);
583 label = gtk_label_new (_("mcen_ia_easysetup_complete"));
584 gtk_label_set_line_wrap (GTK_LABEL (label), TRUE);
585 gtk_label_set_max_width_chars (GTK_LABEL (label), 40);
586 gtk_misc_set_alignment (GTK_MISC (label), 0, 0.5);
587 gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
588 gtk_widget_show (label);
590 gtk_widget_show (GTK_WIDGET (box));
591 return GTK_WIDGET (box);
594 /** Change the caption title for the incoming server,
595 * as specified in the UI spec:
597 static void update_incoming_server_title (ModestEasysetupWizardDialog *self)
599 const ModestTransportStoreProtocol protocol = easysetup_servertype_combo_box_get_active_servertype (
600 EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype));
602 (protocol == MODEST_PROTOCOL_STORE_POP ?
603 _("mail_fi_emailtype_pop3") :
604 _("mail_fi_emailtype_imap") );
607 /* Note that this produces a compiler warning,
608 * because the compiler does not know that the translated string will have a %s in it.
609 * I do not see a way to avoid the warning while still using these Logical IDs. murrayc. */
610 gchar* incomingserver_title = g_strdup_printf(_("mcen_li_emailsetup_servertype"), type);
611 g_object_set (G_OBJECT (self->caption_incoming), "label", incomingserver_title, NULL);
612 g_free(incomingserver_title);
615 /** Change the caption title for the incoming server,
616 * as specified in the UI spec:
618 static void update_incoming_server_security_choices (ModestEasysetupWizardDialog *self)
620 const ModestTransportStoreProtocol protocol = easysetup_servertype_combo_box_get_active_servertype (
621 EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype));
623 /* Fill the combo with appropriately titled choices for POP or IMAP. */
624 /* The choices are the same, but the titles are different, as in the UI spec. */
625 modest_serversecurity_combo_box_fill (
626 MODEST_SERVERSECURITY_COMBO_BOX (self->combo_incoming_security), protocol);
629 static void on_combo_servertype_changed(GtkComboBox *combobox, gpointer user_data)
631 ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
632 update_incoming_server_title (self);
633 update_incoming_server_security_choices (self);
635 set_default_custom_servernames (self);
638 static void on_entry_incoming_servername_changed(GtkEntry *entry, gpointer user_data)
640 ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
641 ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
642 priv->server_changes |= MODEST_EASYSETUP_WIZARD_DIALOG_INCOMING_CHANGED;
645 static GtkWidget* create_page_custom_incoming (ModestEasysetupWizardDialog *self)
647 GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
649 /* Show note that account type cannot be changed in future: */
650 GtkWidget *label = gtk_label_new (_("mcen_ia_emailsetup_account_type"));
651 gtk_label_set_line_wrap (GTK_LABEL (label), TRUE);
652 gtk_label_set_max_width_chars (GTK_LABEL (label), 40);
653 gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
654 gtk_widget_show (label);
656 /* Create a size group to be used by all captions.
657 * Note that HildonCaption does not create a default size group if we do not specify one.
658 * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
659 GtkSizeGroup *sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
661 /* The incoming server widgets: */
662 if (!self->combo_incoming_servertype)
663 self->combo_incoming_servertype = GTK_WIDGET (easysetup_servertype_combo_box_new ());
664 easysetup_servertype_combo_box_set_active_servertype (
665 EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype), MODEST_PROTOCOL_STORE_POP);
666 GtkWidget *caption = create_caption_new_with_asterisk (self, sizegroup,
667 _("mcen_li_emailsetup_type"), self->combo_incoming_servertype, NULL, HILDON_CAPTION_MANDATORY);
668 gtk_widget_show (self->combo_incoming_servertype);
669 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
670 gtk_widget_show (caption);
672 if(!self->entry_incomingserver)
673 self->entry_incomingserver = gtk_entry_new ();
674 /* Auto-capitalization is the default, so let's turn it off: */
675 hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_incomingserver), HILDON_GTK_INPUT_MODE_FULL);
676 set_default_custom_servernames (self);
678 if (self->caption_incoming)
679 gtk_widget_destroy (self->caption_incoming);
681 /* The caption title will be updated in update_incoming_server_title().
682 * so this default text will never be seen: */
683 /* (Note: Changing the title seems pointless. murrayc) */
684 self->caption_incoming = create_caption_new_with_asterisk (self, sizegroup,
685 "Incoming Server", self->entry_incomingserver, NULL, HILDON_CAPTION_MANDATORY);
686 update_incoming_server_title (self);
687 gtk_widget_show (self->entry_incomingserver);
688 gtk_box_pack_start (GTK_BOX (box), self->caption_incoming, FALSE, FALSE, MODEST_MARGIN_HALF);
689 gtk_widget_show (self->caption_incoming);
691 /* Change the caption title when the servertype changes,
692 * as in the UI spec: */
693 g_signal_connect (G_OBJECT (self->combo_incoming_servertype), "changed",
694 G_CALLBACK (on_combo_servertype_changed), self);
696 /* Remember when the servername was changed manually: */
697 g_signal_connect (G_OBJECT (self->entry_incomingserver), "changed",
698 G_CALLBACK (on_entry_incoming_servername_changed), self);
700 /* The secure connection widgets: */
701 if (!self->combo_incoming_security)
702 self->combo_incoming_security = GTK_WIDGET (modest_serversecurity_combo_box_new ());
703 update_incoming_server_security_choices (self);
704 modest_serversecurity_combo_box_set_active_serversecurity (
705 MODEST_SERVERSECURITY_COMBO_BOX (self->combo_incoming_security), MODEST_PROTOCOL_CONNECTION_NORMAL);
706 caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_connection"),
707 self->combo_incoming_security, NULL, HILDON_CAPTION_OPTIONAL);
708 gtk_widget_show (self->combo_incoming_security);
709 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
710 gtk_widget_show (caption);
712 if(!self->checkbox_incoming_auth)
713 self->checkbox_incoming_auth = gtk_check_button_new ();
714 caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_authentication"),
715 self->checkbox_incoming_auth, NULL, HILDON_CAPTION_OPTIONAL);
716 gtk_widget_show (self->checkbox_incoming_auth);
717 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
718 gtk_widget_show (caption);
720 gtk_widget_show (GTK_WIDGET (box));
722 return GTK_WIDGET (box);
726 on_toggle_button_changed (GtkToggleButton *togglebutton, gpointer user_data)
728 GtkWidget *widget = GTK_WIDGET (user_data);
730 /* Enable the widget only if the toggle button is active: */
731 const gboolean enable = gtk_toggle_button_get_active (togglebutton);
732 gtk_widget_set_sensitive (widget, enable);
735 /* Make the sensitivity of a widget depend on a toggle button.
738 enable_widget_for_togglebutton (GtkWidget *widget, GtkToggleButton* button)
740 g_signal_connect (G_OBJECT (button), "toggled",
741 G_CALLBACK (on_toggle_button_changed), widget);
743 /* Set the starting sensitivity: */
744 on_toggle_button_changed (button, widget);
748 on_button_outgoing_smtp_servers (GtkButton *button, gpointer user_data)
750 ModestEasysetupWizardDialog * self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
752 /* Create the window, if necessary: */
753 if (!(self->specific_window)) {
754 self->specific_window = GTK_WIDGET (modest_connection_specific_smtp_window_new ());
755 modest_connection_specific_smtp_window_fill_with_connections (
756 MODEST_CONNECTION_SPECIFIC_SMTP_WINDOW (self->specific_window), self->account_manager,
757 NULL /* account_name, not known yet. */);
760 /* Show the window: */
761 gtk_window_set_transient_for (GTK_WINDOW (self->specific_window), GTK_WINDOW (self));
762 gtk_widget_show (self->specific_window);
765 static void on_entry_outgoing_servername_changed (GtkEntry *entry, gpointer user_data)
767 ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
768 ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
769 priv->server_changes |= MODEST_EASYSETUP_WIZARD_DIALOG_OUTGOING_CHANGED;
772 static GtkWidget* create_page_custom_outgoing (ModestEasysetupWizardDialog *self)
774 GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
776 /* Create a size group to be used by all captions.
777 * Note that HildonCaption does not create a default size group if we do not specify one.
778 * We use GTK_SIZE_GROUP_HORIZONTAL, so that the widths are the same. */
779 GtkSizeGroup *sizegroup = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
781 /* The outgoing server widgets: */
782 if (!self->entry_outgoingserver)
783 self->entry_outgoingserver = gtk_entry_new ();
784 /* Auto-capitalization is the default, so let's turn it off: */
785 hildon_gtk_entry_set_input_mode (GTK_ENTRY (self->entry_outgoingserver), HILDON_GTK_INPUT_MODE_FULL);
786 GtkWidget *caption = create_caption_new_with_asterisk (self, sizegroup,
787 _("mcen_li_emailsetup_smtp"), self->entry_outgoingserver, NULL, HILDON_CAPTION_OPTIONAL);
788 gtk_widget_show (self->entry_outgoingserver);
789 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
790 gtk_widget_show (caption);
791 set_default_custom_servernames (self);
793 /* The secure connection widgets: */
794 if (!self->combo_outgoing_security)
795 self->combo_outgoing_security = GTK_WIDGET (modest_serversecurity_combo_box_new ());
796 modest_serversecurity_combo_box_fill (
797 MODEST_SERVERSECURITY_COMBO_BOX (self->combo_outgoing_security), MODEST_PROTOCOL_TRANSPORT_SMTP);
798 modest_serversecurity_combo_box_set_active_serversecurity (
799 MODEST_SERVERSECURITY_COMBO_BOX (self->combo_outgoing_security), MODEST_PROTOCOL_CONNECTION_NORMAL);
800 caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_connection"),
801 self->combo_outgoing_security, NULL, HILDON_CAPTION_OPTIONAL);
802 gtk_widget_show (self->combo_outgoing_security);
803 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
804 gtk_widget_show (caption);
806 /* The secure authentication widgets: */
807 if (!self->combo_outgoing_auth)
808 self->combo_outgoing_auth = GTK_WIDGET (modest_secureauth_combo_box_new ());
809 caption = hildon_caption_new (sizegroup, _("mcen_li_emailsetup_secure_authentication"),
810 self->combo_outgoing_auth, NULL, HILDON_CAPTION_OPTIONAL);
811 gtk_widget_show (self->combo_outgoing_auth);
812 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
813 gtk_widget_show (caption);
815 GtkWidget *separator = gtk_hseparator_new ();
816 gtk_box_pack_start (GTK_BOX (box), separator, FALSE, FALSE, MODEST_MARGIN_HALF);
817 gtk_widget_show (separator);
819 /* connection-specific checkbox: */
820 if (!self->checkbox_outgoing_smtp_specific) {
821 self->checkbox_outgoing_smtp_specific = gtk_check_button_new ();
822 gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (self->checkbox_outgoing_smtp_specific),
825 caption = hildon_caption_new (sizegroup, _("mcen_fi_advsetup_connection_smtp"),
826 self->checkbox_outgoing_smtp_specific, NULL, HILDON_CAPTION_OPTIONAL);
827 gtk_widget_show (self->checkbox_outgoing_smtp_specific);
828 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
829 gtk_widget_show (caption);
831 /* Connection-specific SMTP-Severs Edit button: */
832 if (!self->button_outgoing_smtp_servers)
833 self->button_outgoing_smtp_servers = gtk_button_new_with_label (_("mcen_bd_edit"));
834 caption = hildon_caption_new (sizegroup, _("mcen_fi_advsetup_optional_smtp"),
835 self->button_outgoing_smtp_servers, NULL, HILDON_CAPTION_OPTIONAL);
836 hildon_caption_set_child_expand (HILDON_CAPTION (caption), FALSE);
837 gtk_widget_show (self->button_outgoing_smtp_servers);
838 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
839 gtk_widget_show (caption);
841 /* Only enable the button when the checkbox is checked: */
842 enable_widget_for_togglebutton (self->button_outgoing_smtp_servers,
843 GTK_TOGGLE_BUTTON (self->checkbox_outgoing_smtp_specific));
845 g_signal_connect (G_OBJECT (self->button_outgoing_smtp_servers), "clicked",
846 G_CALLBACK (on_button_outgoing_smtp_servers), self);
848 g_signal_connect (G_OBJECT (self->entry_outgoingserver), "changed",
849 G_CALLBACK (on_entry_outgoing_servername_changed), self);
852 gtk_widget_show (GTK_WIDGET (box));
854 return GTK_WIDGET (box);
858 show_advanced_edit(gpointer user_data)
860 ModestEasysetupWizardDialog * self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
862 if (!(self->saved_account_name))
865 /* Show the Account Settings window: */
866 ModestAccountSettingsDialog *dialog = modest_account_settings_dialog_new ();
867 modest_account_settings_dialog_set_account_name (dialog, self->saved_account_name);
869 gtk_window_set_transient_for (GTK_WINDOW (dialog), GTK_WINDOW (self));
871 gtk_dialog_run (GTK_DIALOG (dialog));
873 gtk_widget_destroy (GTK_WIDGET (dialog));
875 return FALSE; /* Do not call this timeout callback again. */
879 on_button_edit_advanced_settings (GtkButton *button, gpointer user_data)
881 ModestEasysetupWizardDialog * self = MODEST_EASYSETUP_WIZARD_DIALOG (user_data);
883 /* Save the new account, so we can edit it with ModestAccountSettingsDialog,
884 * without recoding it to use non-gconf information.
885 * This account will be deleted if Finish is never actually clicked. */
887 gboolean saved = TRUE;
888 if (!(self->saved_account_name)) {
889 saved = create_account (self, FALSE);
895 if (!(self->saved_account_name))
898 /* Show the Account Settings window: */
899 show_advanced_edit(self);
901 static GtkWidget* create_page_complete_custom (ModestEasysetupWizardDialog *self)
903 GtkWidget *box = gtk_vbox_new (FALSE, MODEST_MARGIN_NONE);
904 GtkWidget *label = gtk_label_new(_("mcen_ia_emailsetup_setup_complete"));
905 gtk_misc_set_alignment (GTK_MISC (label), 0, 0.5);
906 gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
907 gtk_widget_show (label);
909 label = gtk_label_new (_("mcen_ia_customsetup_complete"));
910 gtk_misc_set_alignment (GTK_MISC (label), 0, 0.5);
911 gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 0);
912 gtk_widget_show (label);
914 if (!self->button_edit)
915 self->button_edit = gtk_button_new_with_label (_("mcen_bd_edit"));
916 GtkWidget *caption = hildon_caption_new (NULL, _("mcen_fi_advanced_settings"),
917 self->button_edit, NULL, HILDON_CAPTION_OPTIONAL);
918 hildon_caption_set_child_expand (HILDON_CAPTION (caption), FALSE);
919 gtk_widget_show (self->button_edit);
920 gtk_box_pack_start (GTK_BOX (box), caption, FALSE, FALSE, MODEST_MARGIN_HALF);
921 gtk_widget_show (caption);
923 g_signal_connect (G_OBJECT (self->button_edit), "clicked",
924 G_CALLBACK (on_button_edit_advanced_settings), self);
926 gtk_widget_show (GTK_WIDGET (box));
927 return GTK_WIDGET (box);
934 on_response (ModestWizardDialog *wizard_dialog,
938 ModestEasysetupWizardDialog *self = MODEST_EASYSETUP_WIZARD_DIALOG (wizard_dialog);
940 if (response_id == GTK_RESPONSE_CANCEL) {
941 /* Remove any temporarily-saved account that will not actually be needed: */
942 if (self->saved_account_name) {
943 modest_account_mgr_remove_account (self->account_manager,
944 self->saved_account_name, FALSE);
948 invoke_enable_buttons_vfunc (self);
952 modest_easysetup_wizard_dialog_init (ModestEasysetupWizardDialog *self)
954 gtk_container_set_border_width (GTK_CONTAINER (self), MODEST_MARGIN_HALF);
956 /* Create the notebook to be used by the ModestWizardDialog base class:
957 * Each page of the notebook will be a page of the wizard: */
958 GtkNotebook *notebook = GTK_NOTEBOOK (gtk_notebook_new());
960 /* Set the notebook used by the ModestWizardDialog base class: */
961 g_object_set (G_OBJECT(self), "wizard-notebook", notebook, NULL);
963 /* Set the wizard title:
964 * The actual window title will be a combination of this and the page's tab label title. */
965 g_object_set (G_OBJECT(self), "wizard-name", _("mcen_ti_emailsetup"), NULL);
967 /* Read in the information about known service providers: */
968 ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
970 const gchar* filepath = MODEST_PROVIDERS_DATA_PATH; /* Defined in config.h */
971 priv->presets = modest_presets_new (filepath);
972 if (!(priv->presets)) {
973 g_warning ("Could not locate the official provider data keyfile from %s", filepath);
976 g_assert(priv->presets);
978 /* The server fields did not have been manually changed yet */
979 priv->server_changes = 0;
981 /* Get the account manager object,
982 * so we can check for existing accounts,
983 * and create new accounts: */
984 self->account_manager = modest_runtime_get_account_mgr ();
985 g_assert (self->account_manager);
986 g_object_ref (self->account_manager);
988 /* Create the common pages,
990 self->page_welcome = create_page_welcome (self);
991 self->page_account_details = create_page_account_details (self);
992 self->page_user_details = create_page_user_details (self);
994 /* Add the common pages: */
995 gtk_notebook_append_page (notebook, self->page_welcome,
996 gtk_label_new (_("mcen_ti_emailsetup_welcome")));
997 gtk_notebook_append_page (notebook, self->page_account_details,
998 gtk_label_new (_("mcen_ti_accountdetails")));
999 gtk_notebook_append_page (notebook, self->page_user_details,
1000 gtk_label_new (_("mcen_ti_emailsetup_userdetails")));
1002 /* Create and add the easysetup-specific pages,
1003 * because we need _some_ final page to enable the Next and Finish buttons: */
1004 create_subsequent_easysetup_pages (self);
1006 /* Connect to the dialog's response signal so we can enable/disable buttons
1007 * for the newly-selected page, because the prev/next buttons cause response to be emitted.
1008 * Note that we use g_signal_connect_after() instead of g_signal_connect()
1009 * so that we can be enable/disable after ModestWizardDialog has done its own
1010 * enabling/disabling of buttons.
1012 * HOWEVER, this doesn't work because ModestWizardDialog's response signal handler
1013 * does g_signal_stop_emission_by_name(), stopping our signal handler from running.
1015 * It's not enough to connect to the notebook's switch-page signal, because
1016 * ModestWizardDialog's "response" signal handler enables the buttons itself,
1017 * _after_ switching the page (understandably).
1018 * (Note that if we had, if we used g_signal_connect() instead of g_signal_connect_after()
1019 * then gtk_notebook_get_current_page() would return an incorrect value.)
1021 g_signal_connect_after (G_OBJECT (self), "response",
1022 G_CALLBACK (on_response), self);
1024 /* When this window is shown, hibernation should not be possible,
1025 * because there is no sensible way to save the state: */
1026 modest_window_mgr_prevent_hibernation_while_window_is_shown (
1027 modest_runtime_get_window_mgr (), GTK_WINDOW (self));
1030 ModestEasysetupWizardDialog*
1031 modest_easysetup_wizard_dialog_new (void)
1033 return g_object_new (MODEST_TYPE_EASYSETUP_WIZARD_DIALOG, NULL);
1036 static void create_subsequent_customsetup_pages (ModestEasysetupWizardDialog *self)
1038 GtkNotebook *notebook = NULL;
1039 g_object_get (self, "wizard-notebook", ¬ebook, NULL);
1042 /* Create the custom pages: */
1043 if(!(self->page_custom_incoming)) {
1044 self->page_custom_incoming = create_page_custom_incoming (self);
1047 if(!(self->page_custom_outgoing)) {
1048 self->page_custom_outgoing = create_page_custom_outgoing (self);
1051 if(!(self->page_complete_customsetup)) {
1052 self->page_complete_customsetup = create_page_complete_custom (self);
1055 if (!gtk_widget_get_parent (GTK_WIDGET (self->page_custom_incoming)))
1056 gtk_notebook_append_page (notebook, self->page_custom_incoming,
1057 gtk_label_new (_("mcen_ti_emailsetup_incomingdetails")));
1059 if (!gtk_widget_get_parent (GTK_WIDGET (self->page_custom_outgoing)))
1060 gtk_notebook_append_page (notebook, self->page_custom_outgoing,
1061 gtk_label_new (_("mcen_ti_emailsetup_outgoingdetails")));
1063 if (!gtk_widget_get_parent (GTK_WIDGET (self->page_complete_customsetup)))
1064 gtk_notebook_append_page (notebook, self->page_complete_customsetup,
1065 gtk_label_new (_("mcen_ti_emailsetup_complete")));
1067 /* This is unnecessary with GTK+ 2.10: */
1068 modest_wizard_dialog_force_title_update (MODEST_WIZARD_DIALOG(self));
1071 static void create_subsequent_easysetup_pages (ModestEasysetupWizardDialog *self)
1073 GtkNotebook *notebook = NULL;
1074 g_object_get (self, "wizard-notebook", ¬ebook, NULL);
1077 /* Create the easysetup-specific pages: */
1078 if(!self->page_complete_easysetup)
1079 self->page_complete_easysetup = create_page_complete_easysetup (self);
1081 if (!gtk_widget_get_parent (GTK_WIDGET (self->page_complete_easysetup)))
1082 gtk_notebook_append_page (notebook, self->page_complete_easysetup,
1083 gtk_label_new (_("mcen_ti_emailsetup_complete")));
1085 /* This is unnecessary with GTK+ 2.10: */
1086 modest_wizard_dialog_force_title_update (MODEST_WIZARD_DIALOG(self));
1088 /* After the user details page,
1089 * the following pages depend on whether "Other" was chosen
1090 * in the provider combobox on the account page
1092 static void create_subsequent_pages (ModestEasysetupWizardDialog *self)
1094 if (easysetup_provider_combo_box_get_active_provider_id (
1095 EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider)) == 0) {
1096 /* "Other..." was selected: */
1098 /* Make sure that the easysetup pages do not exist: */
1099 if(self->page_complete_easysetup) {
1100 gtk_widget_destroy (self->page_complete_easysetup);
1101 self->page_complete_easysetup = NULL;
1104 create_subsequent_customsetup_pages (self);
1107 /* A specific provider was selected: */
1109 /* Make sure that the custom pages do not exist:
1110 * Because they will be used if they exist, when creating the account. */
1111 if(self->page_custom_incoming) {
1112 gtk_widget_destroy (self->page_custom_incoming);
1113 self->page_custom_incoming = NULL;
1116 if(self->page_custom_outgoing) {
1117 gtk_widget_destroy (self->page_custom_outgoing);
1118 self->page_custom_outgoing = NULL;
1121 if(self->page_complete_customsetup) {
1122 gtk_widget_destroy (self->page_complete_customsetup);
1123 self->page_complete_customsetup = NULL;
1127 /* Create the easysetup pages: */
1128 create_subsequent_easysetup_pages (self);
1134 util_get_default_servername_from_email_address (const gchar* email_address, ModestTransportStoreProtocol servertype)
1139 gchar* at = g_utf8_strchr (email_address, -1, '@');
1140 if (!at || (g_utf8_strlen (at, -1) < 2))
1143 gchar* domain = g_utf8_next_char (at);
1147 const gchar* hostname = NULL;
1148 if (servertype == MODEST_PROTOCOL_STORE_POP)
1150 else if (servertype == MODEST_PROTOCOL_STORE_IMAP)
1152 else if (servertype == MODEST_PROTOCOL_TRANSPORT_SMTP)
1158 return g_strdup_printf ("%s.%s", hostname, domain);
1161 static void set_default_custom_servernames (ModestEasysetupWizardDialog *account_wizard)
1163 ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE(account_wizard);
1165 if (!account_wizard->entry_incomingserver)
1168 /* Set a default domain for the server, based on the email address,
1169 * if no server name was already specified.
1171 if (account_wizard->entry_user_email
1172 && ((priv->server_changes & MODEST_EASYSETUP_WIZARD_DIALOG_INCOMING_CHANGED) == 0)) {
1173 const ModestTransportStoreProtocol protocol = easysetup_servertype_combo_box_get_active_servertype (
1174 EASYSETUP_SERVERTYPE_COMBO_BOX (account_wizard->combo_incoming_servertype));
1175 const gchar* email_address = gtk_entry_get_text (GTK_ENTRY(account_wizard->entry_user_email));
1177 gchar* servername = util_get_default_servername_from_email_address (email_address, protocol);
1179 /* Do not set the INCOMING_CHANGED flag because of this edit */
1180 g_signal_handlers_block_by_func (G_OBJECT (account_wizard->entry_incomingserver), G_CALLBACK (on_entry_incoming_servername_changed), account_wizard);
1181 gtk_entry_set_text (GTK_ENTRY (account_wizard->entry_incomingserver), servername);
1182 g_signal_handlers_unblock_by_func (G_OBJECT (account_wizard->entry_incomingserver), G_CALLBACK (on_entry_incoming_servername_changed), account_wizard);
1184 g_free (servername);
1187 /* Set a default domain for the server, based on the email address,
1188 * if no server name was already specified.
1190 if (!account_wizard->entry_outgoingserver)
1193 if (account_wizard->entry_user_email
1194 && ((priv->server_changes & MODEST_EASYSETUP_WIZARD_DIALOG_OUTGOING_CHANGED) == 0)) {
1195 const gchar* email_address = gtk_entry_get_text (GTK_ENTRY(account_wizard->entry_user_email));
1197 gchar* servername = util_get_default_servername_from_email_address (email_address, MODEST_PROTOCOL_TRANSPORT_SMTP);
1199 /* Do not set the OUTGOING_CHANGED flag because of this edit */
1200 g_signal_handlers_block_by_func (G_OBJECT (account_wizard->entry_outgoingserver), G_CALLBACK (on_entry_outgoing_servername_changed), account_wizard);
1201 gtk_entry_set_text (GTK_ENTRY (account_wizard->entry_outgoingserver), servername);
1202 g_signal_handlers_unblock_by_func (G_OBJECT (account_wizard->entry_outgoingserver), G_CALLBACK (on_entry_outgoing_servername_changed), account_wizard);
1204 g_free (servername);
1209 on_before_next (ModestWizardDialog *dialog, GtkWidget *current_page, GtkWidget *next_page)
1211 ModestEasysetupWizardDialog *account_wizard = MODEST_EASYSETUP_WIZARD_DIALOG (dialog);
1213 /* Do extra validation that couldn't be done for every key press,
1214 * either because it was too slow,
1215 * or because it requires interaction:
1217 if (current_page == account_wizard->page_account_details) {
1218 /* Check that the title is not already in use: */
1219 const gchar* account_title = gtk_entry_get_text (GTK_ENTRY (account_wizard->entry_account_title));
1220 if ((!account_title) || (strlen(account_title) == 0))
1223 /* Aavoid a clash with an existing display name: */
1224 const gboolean name_in_use = modest_account_mgr_account_with_display_name_exists (
1225 account_wizard->account_manager, account_title);
1228 /* Warn the user via a dialog: */
1229 hildon_banner_show_information(NULL, NULL, _("mail_ib_account_name_already_existing"));
1234 else if (current_page == account_wizard->page_user_details) {
1235 /* Check that the email address is valud: */
1236 const gchar* email_address = gtk_entry_get_text (GTK_ENTRY (account_wizard->entry_user_email));
1237 if ((!email_address) || (strlen(email_address) == 0))
1240 if (!modest_text_utils_validate_email_address (email_address)) {
1241 /* Warn the user via a dialog: */
1242 hildon_banner_show_information (NULL, NULL, _("mcen_ib_invalid_email"));
1244 /* Return focus to the email address entry: */
1245 gtk_widget_grab_focus (account_wizard->entry_user_email);
1246 gtk_editable_select_region (GTK_EDITABLE (account_wizard->entry_user_email), 0, -1);
1251 /* Make sure that the subsequent pages are appropriate for the provider choice. */
1252 create_subsequent_pages (account_wizard);
1255 /* TODO: The UI Spec wants us to check that the servernames are valid,
1256 * but does not specify how.
1259 if(next_page == account_wizard->page_custom_incoming) {
1260 set_default_custom_servernames (account_wizard);
1262 else if (next_page == account_wizard->page_custom_outgoing) {
1263 set_default_custom_servernames (account_wizard);
1264 /* Check if the server supports secure authentication */
1265 const ModestConnectionProtocol security_incoming =
1266 modest_serversecurity_combo_box_get_active_serversecurity (
1267 MODEST_SERVERSECURITY_COMBO_BOX (
1268 account_wizard->combo_incoming_security));
1269 if (gtk_toggle_button_get_active (
1270 GTK_TOGGLE_BUTTON (account_wizard->checkbox_incoming_auth))
1271 && !modest_protocol_info_is_secure(security_incoming))
1273 GList* methods = check_for_supported_auth_methods(account_wizard);
1276 g_list_free(methods);
1279 g_list_free(methods);
1283 /* If this is the last page, and this is a click on Finish,
1284 * then attempt to create the dialog.
1286 if(!next_page) /* This is NULL when this is a click on Finish. */
1288 if (account_wizard->saved_account_name) {
1289 /* Just enable the already-saved account (temporarily created when
1290 * editing advanced settings): */
1291 modest_account_mgr_set_enabled (account_wizard->account_manager,
1292 account_wizard->saved_account_name, TRUE);
1294 create_account (account_wizard, TRUE /* enabled */);
1302 static gboolean entry_is_empty (GtkWidget *entry)
1307 const gchar* text = gtk_entry_get_text (GTK_ENTRY (entry));
1308 if ((!text) || (strlen(text) == 0))
1315 on_enable_buttons (ModestWizardDialog *dialog, GtkWidget *current_page)
1317 ModestEasysetupWizardDialog *account_wizard = MODEST_EASYSETUP_WIZARD_DIALOG (dialog);
1319 gboolean enable_next = TRUE;
1320 if (current_page == account_wizard->page_welcome) {
1323 else if (current_page == account_wizard->page_account_details) {
1324 /* The account details title is mandatory: */
1325 if (entry_is_empty(account_wizard->entry_account_title))
1326 enable_next = FALSE;
1328 else if (current_page == account_wizard->page_user_details) {
1329 /* The user details username is mandatory: */
1330 if (entry_is_empty(account_wizard->entry_user_username))
1331 enable_next = FALSE;
1333 /* The user details email address is mandatory: */
1334 if (enable_next && entry_is_empty (account_wizard->entry_user_email))
1335 enable_next = FALSE;
1337 else if (current_page == account_wizard->page_custom_incoming) {
1338 /* The custom incoming server is mandatory: */
1339 if (entry_is_empty(account_wizard->entry_incomingserver))
1340 enable_next = FALSE;
1343 /* Enable the buttons,
1344 * identifying them via their associated response codes: */
1346 /* Disable the Finish button until we are on the last page,
1347 * because HildonWizardDialog enables this for all but the first page: */
1348 GtkNotebook *notebook = NULL;
1349 GtkDialog *dialog_base = GTK_DIALOG (dialog);
1350 g_object_get (dialog_base, "wizard-notebook", ¬ebook, NULL);
1352 gint current = gtk_notebook_get_current_page (notebook);
1353 gint last = gtk_notebook_get_n_pages (notebook) - 1;
1354 const gboolean is_last = (current == last);
1357 gtk_dialog_set_response_sensitive (dialog_base,
1358 MODEST_WIZARD_DIALOG_FINISH,
1362 /* Disable Next on the last page: */
1363 enable_next = FALSE;
1366 gtk_dialog_set_response_sensitive (dialog_base,
1367 MODEST_WIZARD_DIALOG_NEXT,
1372 modest_easysetup_wizard_dialog_class_init (ModestEasysetupWizardDialogClass *klass)
1374 GObjectClass *object_class = G_OBJECT_CLASS (klass);
1375 g_type_class_add_private (klass, sizeof (ModestEasysetupWizardDialogPrivate));
1378 object_class->get_property = modest_easysetup_wizard_dialog_get_property;
1379 object_class->set_property = modest_easysetup_wizard_dialog_set_property;
1380 object_class->dispose = modest_easysetup_wizard_dialog_dispose;
1381 object_class->finalize = modest_easysetup_wizard_dialog_finalize;
1383 /* Provide a vfunc implementation so we can decide
1384 * when to enable/disable the prev/next buttons.
1386 ModestWizardDialogClass *base_klass = (ModestWizardDialogClass*)(klass);
1387 base_klass->before_next = on_before_next;
1388 base_klass->enable_buttons = on_enable_buttons;
1392 show_error (GtkWindow *parent_window, const gchar* text)
1394 GtkDialog *dialog = GTK_DIALOG (hildon_note_new_information (parent_window, text));
1396 GtkDialog *dialog = GTK_DIALOG (gtk_message_dialog_new (parent_window,
1403 gtk_dialog_run (dialog);
1404 gtk_widget_destroy (GTK_WIDGET (dialog));
1407 /** Attempt to create the account from the information that the user has entered.
1408 * @result: TRUE if the account was successfully created.
1411 create_account (ModestEasysetupWizardDialog *self, gboolean enabled)
1413 ModestEasysetupWizardDialogPrivate *priv = WIZARD_DIALOG_GET_PRIVATE (self);
1415 const gchar* display_name = gtk_entry_get_text (GTK_ENTRY (self->entry_account_title));
1421 /* We should have checked for this already,
1422 * and changed that name accordingly,
1423 * but let's check again just in case:
1425 if (modest_account_mgr_account_with_display_name_exists (self->account_manager, display_name))
1428 /* Increment the non-user visible name if necessary,
1429 * based on the display name: */
1430 gchar *account_name_start = g_strdup_printf ("%sID", display_name);
1431 gchar* account_name = modest_account_mgr_get_unused_account_name (self->account_manager,
1432 account_name_start, FALSE /* not a server account */);
1433 g_free (account_name_start);
1435 /* username and password (for both incoming and outgoing): */
1436 const gchar* username = gtk_entry_get_text (GTK_ENTRY (self->entry_user_username));
1437 const gchar* password = gtk_entry_get_text (GTK_ENTRY (self->entry_user_password));
1438 /* Incoming server: */
1439 /* Note: We need something as default for the ModestTransportStoreProtocol* values,
1440 * or modest_account_mgr_add_server_account will fail. */
1441 gchar* servername_incoming = NULL;
1442 guint serverport_incoming = 0;
1443 ModestTransportStoreProtocol protocol_incoming = MODEST_PROTOCOL_STORE_POP;
1444 ModestConnectionProtocol protocol_security_incoming = MODEST_PROTOCOL_CONNECTION_NORMAL;
1445 ModestAuthProtocol protocol_authentication_incoming = MODEST_PROTOCOL_AUTH_NONE;
1447 /* Get details from the specified presets: */
1448 gchar* provider_id = easysetup_provider_combo_box_get_active_provider_id (
1449 EASYSETUP_PROVIDER_COMBO_BOX (self->combo_account_serviceprovider));
1452 servername_incoming = modest_presets_get_server (priv->presets, provider_id,
1453 TRUE /* incoming */);
1455 ModestPresetsServerType servertype_incoming = modest_presets_get_info_server_type (priv->presets,
1457 TRUE /* incoming */);
1458 ModestPresetsSecurity security_incoming = modest_presets_get_info_server_security (priv->presets,
1460 TRUE /* incoming */);
1462 g_warning ("security incoming: %x", security_incoming);
1464 /* We don't check for SMTP here as that is impossible for an incoming server. */
1465 if (servertype_incoming == MODEST_PRESETS_SERVER_TYPE_IMAP) {
1466 protocol_incoming = MODEST_PROTOCOL_STORE_IMAP;
1467 } else if (servertype_incoming == MODEST_PRESETS_SERVER_TYPE_POP) {
1468 protocol_incoming = MODEST_PROTOCOL_STORE_POP;
1470 serverport_incoming = get_serverport_incoming(servertype_incoming, security_incoming);
1472 if (security_incoming & MODEST_PRESETS_SECURITY_SECURE_INCOMING)
1473 protocol_security_incoming = MODEST_PROTOCOL_CONNECTION_SSL; /* TODO: Is this what we want? */
1475 if (security_incoming & MODEST_PRESETS_SECURITY_APOP)
1476 protocol_authentication_incoming = MODEST_PROTOCOL_AUTH_PASSWORD; /* TODO: Is this what we want? */
1479 /* Use custom pages because no preset was specified: */
1480 servername_incoming = g_strdup (gtk_entry_get_text (GTK_ENTRY (self->entry_incomingserver) ));
1482 protocol_incoming = easysetup_servertype_combo_box_get_active_servertype (
1483 EASYSETUP_SERVERTYPE_COMBO_BOX (self->combo_incoming_servertype));
1485 protocol_security_incoming = modest_serversecurity_combo_box_get_active_serversecurity (
1486 MODEST_SERVERSECURITY_COMBO_BOX (self->combo_incoming_security));
1488 /* The UI spec says:
1489 * If secure authentication is unchecked, allow sending username and password also as plain text.
1490 * If secure authentication is checked, require one of the secure methods during connection: SSL, TLS, CRAM-MD5 etc.
1493 if (gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (self->checkbox_incoming_auth)) &&
1494 !modest_protocol_info_is_secure(protocol_security_incoming))
1496 GList* methods = check_for_supported_auth_methods(self);
1500 protocol_authentication_incoming = (ModestAuthProtocol) (GPOINTER_TO_INT(methods->data));
1503 protocol_authentication_incoming = MODEST_PROTOCOL_AUTH_PASSWORD;
1506 /* First we add the 2 server accounts, and then we add the account that uses them.
1507 * If we don't do it in this order then we will experience a crash. */
1509 /* Add a (incoming) server account, to be used by the account: */
1510 gchar *store_name_start = g_strconcat (account_name, "_store", NULL);
1511 gchar *store_name = modest_account_mgr_get_unused_account_name (self->account_manager,
1512 store_name_start, TRUE /* server account */);
1513 g_free (store_name_start);
1514 gboolean created = modest_account_mgr_add_server_account (self->account_manager,
1516 servername_incoming,
1517 serverport_incoming,
1520 protocol_security_incoming,
1521 protocol_authentication_incoming);
1523 g_free (servername_incoming);
1526 /* TODO: Provide a Logical ID for the text: */
1527 show_error (GTK_WINDOW (self), _("An error occurred while creating the incoming account."));
1531 /* Outgoing server: */
1532 gchar* servername_outgoing = NULL;
1533 ModestTransportStoreProtocol protocol_outgoing = MODEST_PROTOCOL_STORE_POP;
1534 ModestConnectionProtocol protocol_security_outgoing = MODEST_PROTOCOL_CONNECTION_NORMAL;
1535 ModestAuthProtocol protocol_authentication_outgoing = MODEST_PROTOCOL_AUTH_NONE;
1536 guint serverport_outgoing = 0;
1540 servername_outgoing = modest_presets_get_server (priv->presets, provider_id,
1541 FALSE /* incoming */);
1543 ModestPresetsServerType servertype_outgoing = modest_presets_get_info_server_type (priv->presets,
1545 FALSE /* incoming */);
1547 /* Note: We need something as default, or modest_account_mgr_add_server_account will fail. */
1548 protocol_outgoing = MODEST_PROTOCOL_TRANSPORT_SENDMAIL;
1549 if (servertype_outgoing == MODEST_PRESETS_SERVER_TYPE_SMTP)
1550 protocol_outgoing = MODEST_PROTOCOL_TRANSPORT_SMTP;
1552 ModestPresetsSecurity security_outgoing =
1553 modest_presets_get_info_server_security (priv->presets, provider_id,
1554 FALSE /* incoming */);
1556 /* TODO: There is no SMTP authentication enum for presets,
1557 so we should probably check what the server supports. */
1558 protocol_security_outgoing = MODEST_PROTOCOL_CONNECTION_NORMAL;
1559 if (security_outgoing & MODEST_PRESETS_SECURITY_SECURE_SMTP) {
1560 /* printf("DEBUG: %s: using secure SMTP\n", __FUNCTION__); */
1561 protocol_security_outgoing = MODEST_PROTOCOL_CONNECTION_SSL; /* TODO: Is this what we want? */
1562 serverport_outgoing = 465;
1563 protocol_authentication_outgoing = MODEST_PROTOCOL_AUTH_PASSWORD;
1565 /* printf("DEBUG: %s: using non-secure SMTP\n", __FUNCTION__); */
1566 protocol_authentication_outgoing = MODEST_PROTOCOL_AUTH_NONE;
1570 /* Use custom pages because no preset was specified: */
1571 servername_outgoing = g_strdup (gtk_entry_get_text (GTK_ENTRY (self->entry_outgoingserver) ));
1573 protocol_outgoing = MODEST_PROTOCOL_TRANSPORT_SMTP; /* It's always SMTP for outgoing. */
1575 protocol_security_outgoing = modest_serversecurity_combo_box_get_active_serversecurity (
1576 MODEST_SERVERSECURITY_COMBO_BOX (self->combo_outgoing_security));
1578 protocol_authentication_outgoing = modest_secureauth_combo_box_get_active_secureauth (
1579 MODEST_SECUREAUTH_COMBO_BOX (self->combo_outgoing_auth));
1582 /* Add a (outgoing) server account to be used by the account: */
1583 gchar *transport_name_start = g_strconcat (account_name, "_transport", NULL);
1584 gchar *transport_name = modest_account_mgr_get_unused_account_name (self->account_manager,
1585 transport_name_start, TRUE /* server account */);
1586 g_free (transport_name_start);
1587 created = modest_account_mgr_add_server_account (self->account_manager,
1589 servername_outgoing,
1590 serverport_outgoing,
1593 protocol_security_outgoing,
1594 protocol_authentication_outgoing);
1596 g_free (servername_outgoing);
1599 /* TODO: Provide a Logical ID for the text: */
1600 show_error (GTK_WINDOW (self), _("An error occurred while creating the outgoing account."));
1605 /* Create the account, which will contain the two "server accounts": */
1606 created = modest_account_mgr_add_account (self->account_manager, account_name,
1607 store_name, /* The name of our POP/IMAP server account. */
1608 transport_name, /* The name of our SMTP server account. */
1610 g_free (store_name);
1611 g_free (transport_name);
1614 /* TODO: Provide a Logical ID for the text: */
1615 show_error (GTK_WINDOW (self), _("An error occurred while creating the account."));
1620 /* There must be at least one account now: */
1621 /* Note, when this fails is is caused by a Maemo gconf bug that has been
1622 * fixed in versions after 3.1. */
1623 if(!modest_account_mgr_has_accounts (self->account_manager, FALSE))
1624 g_warning ("modest_account_mgr_account_names() returned NULL after adding an account.");
1626 /* The user name and email address must be set additionally: */
1627 const gchar* user_name = gtk_entry_get_text (GTK_ENTRY (self->entry_user_name));
1628 modest_account_mgr_set_string (self->account_manager, account_name,
1629 MODEST_ACCOUNT_FULLNAME, user_name, FALSE /* not server account */);
1631 const gchar* emailaddress = gtk_entry_get_text (GTK_ENTRY (self->entry_user_email));
1632 modest_account_mgr_set_string (self->account_manager, account_name,
1633 MODEST_ACCOUNT_EMAIL, emailaddress, FALSE /* not server account */);
1635 /* Set the display name: */
1636 modest_account_mgr_set_string (self->account_manager, account_name,
1637 MODEST_ACCOUNT_DISPLAY_NAME, display_name, FALSE /* not server account */);
1639 /* Set retrieve type */
1640 const gchar *retrieve = MODEST_ACCOUNT_RETRIEVE_VALUE_HEADERS_ONLY;
1641 modest_account_mgr_set_string (self->account_manager, account_name,
1642 MODEST_ACCOUNT_RETRIEVE, retrieve, FALSE /* not server account */);
1644 /* Save the connection-specific SMTP server accounts. */
1645 gboolean result = TRUE;
1646 if (self->specific_window)
1647 result = modest_connection_specific_smtp_window_save_server_accounts (
1648 MODEST_CONNECTION_SPECIFIC_SMTP_WINDOW (self->specific_window), account_name);
1650 g_free (self->saved_account_name);
1651 self->saved_account_name = g_strdup (account_name);
1653 g_free (account_name);