2 * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3 * Copyright (C) 1999-2004 Hiroyuki Yamamoto
4 * This file (C) 2004 Colin Leroy
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
23 #include <glib/gi18n.h>
24 #include <gdk/gdkkeysyms.h>
25 #include <gtk/gtkwidget.h>
26 #include <gtk/gtkvbox.h>
27 #include <gtk/gtkbox.h>
28 #include <gtk/gtktable.h>
29 #include <gtk/gtkentry.h>
30 #include <gtk/gtklabel.h>
31 #include <gtk/gtknotebook.h>
32 #include <gtk/gtktogglebutton.h>
33 #include <gtk/gtkcheckbutton.h>
48 #include "prefs_account.h"
49 #include "mainwindow.h"
50 #include "stock_pixmap.h"
74 GtkWidget *organization;
76 GtkWidget *mailbox_name;
78 GtkWidget *smtp_server;
81 GtkWidget *recv_server;
82 GtkWidget *recv_username;
83 GtkWidget *recv_password;
86 GtkWidget *smtp_use_ssl;
87 GtkWidget *recv_use_ssl;
90 gboolean create_mailbox;
96 static void wizard_write_config(WizardWindow *wizard)
98 gboolean mailbox_ok = FALSE;
99 PrefsAccount *prefs_account = prefs_account_new();
100 GList *account_list = NULL;
101 GtkWidget *menu, *menuitem;
103 if (wizard->create_mailbox) {
104 mailbox_ok = setup_write_mailbox_path(wizard->mainwin,
105 gtk_entry_get_text(GTK_ENTRY(wizard->mailbox_name)));
108 prefs_account->account_name = g_strdup_printf("%s@%s",
109 gtk_entry_get_text(GTK_ENTRY(wizard->recv_username)),
110 gtk_entry_get_text(GTK_ENTRY(wizard->recv_server)));
111 prefs_account->name = g_strdup(
112 gtk_entry_get_text(GTK_ENTRY(wizard->full_name)));
113 prefs_account->address = g_strdup(
114 gtk_entry_get_text(GTK_ENTRY(wizard->email)));
115 prefs_account->organization = g_strdup(
116 gtk_entry_get_text(GTK_ENTRY(wizard->organization)));
117 prefs_account->smtp_server = g_strdup(
118 gtk_entry_get_text(GTK_ENTRY(wizard->smtp_server)));
119 prefs_account->recv_server = g_strdup(
120 gtk_entry_get_text(GTK_ENTRY(wizard->recv_server)));
121 prefs_account->userid = g_strdup(
122 gtk_entry_get_text(GTK_ENTRY(wizard->recv_username)));
123 prefs_account->passwd = g_strdup(
124 gtk_entry_get_text(GTK_ENTRY(wizard->recv_password)));
126 menu = gtk_option_menu_get_menu(GTK_OPTION_MENU(wizard->recv_type));
127 menuitem = gtk_menu_get_active(GTK_MENU(menu));
128 prefs_account->protocol = GPOINTER_TO_INT
129 (g_object_get_data(G_OBJECT(menuitem), MENU_VAL_ID));
132 if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(wizard->smtp_use_ssl)))
133 prefs_account->ssl_smtp = SSL_TUNNEL;
134 if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(wizard->recv_use_ssl))) {
135 if (prefs_account->protocol == A_IMAP4)
136 prefs_account->ssl_imap = SSL_TUNNEL;
138 prefs_account->ssl_pop = SSL_TUNNEL;
142 account_list = g_list_append(account_list, prefs_account);
143 prefs_account_write_config_all(account_list);
144 prefs_account_free(prefs_account);
145 account_read_config_all();
148 static GtkWidget* create_page (WizardWindow *wizard, const char * title)
156 vbox = gtk_vbox_new (FALSE, 6);
157 gtk_container_set_border_width (GTK_CONTAINER(vbox), 10);
159 /* create the titlebar */
160 hbox = gtk_hbox_new (FALSE, 12);
161 image = stock_pixmap_widget(wizard->window,
162 STOCK_PIXMAP_SYLPHEED_ICON);
163 gtk_box_pack_start (GTK_BOX(hbox), image, FALSE, FALSE, 0);
164 title_string = g_strconcat ("<span size=\"xx-large\" weight=\"ultrabold\">", title ? title : "", "</span>", NULL);
165 w = gtk_label_new (title_string);
166 gtk_label_set_use_markup (GTK_LABEL(w), TRUE);
167 g_free (title_string);
168 gtk_box_pack_start (GTK_BOX(hbox), w, FALSE, FALSE, 0);
170 /* pack the titlebar */
171 gtk_box_pack_start (GTK_BOX(vbox), hbox, FALSE, FALSE, 0);
173 /* pack the separator */
174 gtk_box_pack_start (GTK_BOX(vbox), gtk_hseparator_new(), FALSE, FALSE, 0);
177 w = gtk_alignment_new (0, 0, 0, 0);
178 gtk_widget_set_size_request (w, 0, 6);
179 gtk_box_pack_start (GTK_BOX(vbox), w, FALSE, FALSE, 0);
184 #define GTK_TABLE_ADD_ROW_AT(table,text,entry,i) { \
185 GtkWidget *label = gtk_label_new(text); \
186 gtk_table_attach(GTK_TABLE(table), label, \
187 0,1,i,i+1, GTK_EXPAND|GTK_FILL, 0, 0, 0); \
188 if (GTK_IS_MISC(label)) \
189 gtk_misc_set_alignment(GTK_MISC(label), 1, 0.5); \
190 gtk_table_attach(GTK_TABLE(table), entry, \
191 1,2,i,i+1, GTK_EXPAND|GTK_FILL, 0, 0, 0); \
194 static gchar *get_default_email_addr(void)
196 gchar *domain_name = g_strdup(get_domain_name());
198 if (strchr(domain_name, '.') != strrchr(domain_name, '.')
199 && strlen(strchr(domain_name, '.')) > 6) {
200 gchar *tmp = g_strdup(strchr(domain_name, '.')+1);
204 result = g_strdup_printf("%s@%s",
211 static gchar *get_default_server(WizardWindow * wizard, const gchar *type)
213 gchar *domain_name = g_strdup(get_domain_name());
216 if (strchr(domain_name, '.') != strrchr(domain_name, '.')
217 && strlen(strchr(domain_name, '.')) > 6) {
218 gchar *tmp = g_strdup(strchr(domain_name, '.')+1);
221 } else if (strchr(domain_name, '.') == NULL) {
222 /* only hostname found, use email suffix */
224 mail = gtk_editable_get_chars(GTK_EDITABLE(wizard->email), 0, -1);
226 if (strlen (mail) && strstr(mail, "@")) {
228 domain_name = g_strdup(strstr(mail, "@")+1);
232 result = g_strdup_printf("%s.%s",
238 static void wizard_email_changed(GtkWidget *widget, gpointer data)
240 WizardWindow *wizard = (WizardWindow *)data;
241 RecvProtocol protocol;
243 protocol = GPOINTER_TO_INT
244 (g_object_get_data(G_OBJECT(wizard->recv_type), MENU_VAL_ID));
246 text = get_default_server(wizard, "smtp");
247 gtk_entry_set_text(GTK_ENTRY(wizard->smtp_server), text);
250 if (protocol == A_POP3) {
251 text = get_default_server(wizard, "pop");
252 gtk_entry_set_text(GTK_ENTRY(wizard->recv_server), text);
255 text = get_default_server(wizard, "imap");
256 gtk_entry_set_text(GTK_ENTRY(wizard->recv_server), text);
261 static GtkWidget* user_page (WizardWindow * wizard)
263 GtkWidget *table = gtk_table_new(3,2, FALSE);
267 gtk_table_set_row_spacings(GTK_TABLE(table), 4);
268 gtk_table_set_col_spacings(GTK_TABLE(table), 8);
270 wizard->full_name = gtk_entry_new();
271 gtk_entry_set_text(GTK_ENTRY(wizard->full_name), g_get_real_name());
272 GTK_TABLE_ADD_ROW_AT(table, _("Your name:"),
273 wizard->full_name, i); i++;
275 wizard->email = gtk_entry_new();
276 text = get_default_email_addr();
277 gtk_entry_set_text(GTK_ENTRY(wizard->email), text);
279 GTK_TABLE_ADD_ROW_AT(table, _("Your email address:"),
280 wizard->email, i); i++;
282 wizard->organization = gtk_entry_new();
283 GTK_TABLE_ADD_ROW_AT(table, _("Your organization:"),
284 wizard->organization, i); i++;
286 g_signal_connect(G_OBJECT(wizard->email), "changed",
287 G_CALLBACK(wizard_email_changed),
292 static GtkWidget* mailbox_page (WizardWindow * wizard)
294 GtkWidget *table = gtk_table_new(1,2, FALSE);
297 gtk_table_set_row_spacings(GTK_TABLE(table), 4);
298 gtk_table_set_col_spacings(GTK_TABLE(table), 8);
300 wizard->mailbox_name = gtk_entry_new();
301 gtk_entry_set_text(GTK_ENTRY(wizard->mailbox_name), "Mail");
302 GTK_TABLE_ADD_ROW_AT(table, _("Mailbox name:"),
303 wizard->mailbox_name, i); i++;
308 static GtkWidget* smtp_page (WizardWindow * wizard)
310 GtkWidget *table = gtk_table_new(1,2, FALSE);
314 gtk_table_set_row_spacings(GTK_TABLE(table), 4);
315 gtk_table_set_col_spacings(GTK_TABLE(table), 8);
317 wizard->smtp_server = gtk_entry_new();
318 text = get_default_server(wizard, "smtp");
319 gtk_entry_set_text(GTK_ENTRY(wizard->smtp_server), text);
321 GTK_TABLE_ADD_ROW_AT(table, _("SMTP server address:"),
322 wizard->smtp_server, i); i++;
326 static void wizard_protocol_changed(GtkMenuItem *menuitem, gpointer data)
328 WizardWindow *wizard = (WizardWindow *)data;
329 RecvProtocol protocol;
331 protocol = GPOINTER_TO_INT
332 (g_object_get_data(G_OBJECT(menuitem), MENU_VAL_ID));
334 if (protocol == A_POP3) {
335 text = get_default_server(wizard, "pop");
336 gtk_entry_set_text(GTK_ENTRY(wizard->recv_server), text);
339 text = get_default_server(wizard, "imap");
340 gtk_entry_set_text(GTK_ENTRY(wizard->recv_server), text);
345 static GtkWidget* recv_page (WizardWindow * wizard)
347 GtkWidget *table = gtk_table_new(5,2, FALSE);
348 GtkWidget *menu = gtk_menu_new();
353 gtk_table_set_row_spacings(GTK_TABLE(table), 4);
354 gtk_table_set_col_spacings(GTK_TABLE(table), 8);
356 wizard->recv_type = gtk_option_menu_new();
358 MENUITEM_ADD (menu, menuitem, _("POP3"), A_POP3);
359 g_signal_connect(G_OBJECT(menuitem), "activate",
360 G_CALLBACK(wizard_protocol_changed),
362 MENUITEM_ADD (menu, menuitem, _("IMAP"), A_IMAP4);
363 g_signal_connect(G_OBJECT(menuitem), "activate",
364 G_CALLBACK(wizard_protocol_changed),
366 gtk_option_menu_set_menu (GTK_OPTION_MENU (wizard->recv_type), menu);
367 GTK_TABLE_ADD_ROW_AT(table, _("Server type:"),
368 wizard->recv_type, i); i++;
370 wizard->recv_server = gtk_entry_new();
371 text = get_default_server(wizard, "pop");
372 gtk_entry_set_text(GTK_ENTRY(wizard->recv_server), text);
374 GTK_TABLE_ADD_ROW_AT(table, _("Server address:"),
375 wizard->recv_server, i); i++;
377 wizard->recv_username = gtk_entry_new();
378 gtk_entry_set_text(GTK_ENTRY(wizard->recv_username), g_get_user_name());
379 GTK_TABLE_ADD_ROW_AT(table, _("Username:"),
380 wizard->recv_username, i); i++;
382 wizard->recv_password = gtk_entry_new();
383 gtk_entry_set_visibility(GTK_ENTRY(wizard->recv_password), FALSE);
384 GTK_TABLE_ADD_ROW_AT(table, _("Password:"),
385 wizard->recv_password, i); i++;
391 static GtkWidget* ssl_page (WizardWindow * wizard)
393 GtkWidget *table = gtk_table_new(2,2, FALSE);
396 gtk_table_set_row_spacings(GTK_TABLE(table), 4);
397 gtk_table_set_col_spacings(GTK_TABLE(table), 8);
399 wizard->smtp_use_ssl = gtk_check_button_new_with_label(
400 _("Use SSL to connect to SMTP server"));
401 gtk_table_attach(GTK_TABLE(table), wizard->smtp_use_ssl,
402 0,1,i,i+1, GTK_EXPAND|GTK_FILL, 0, 0, 0); i++;
404 wizard->recv_use_ssl = gtk_check_button_new_with_label(
405 _("Use SSL to connect to receiving server"));
406 gtk_table_attach(GTK_TABLE(table), wizard->recv_use_ssl,
407 0,1,i,i+1, GTK_EXPAND|GTK_FILL, 0, 0, 0);
414 wizard_response_cb (GtkDialog * dialog, int response, gpointer data)
416 WizardWindow * wizard = (WizardWindow *)data;
417 int current_page, num_pages;
419 num_pages = g_slist_length(wizard->pages);
420 current_page = gtk_notebook_get_current_page (
421 GTK_NOTEBOOK(wizard->notebook));
422 if (response == CANCEL)
424 wizard->finished = TRUE;
425 wizard->result = FALSE;
426 gtk_widget_destroy (GTK_WIDGET(dialog));
428 else if (response == FINISHED)
430 wizard_write_config(wizard);
431 wizard->finished = TRUE;
432 wizard->result = TRUE;
433 gtk_widget_destroy (GTK_WIDGET(dialog));
437 if (response == GO_BACK)
439 if (current_page > 0)
440 gtk_notebook_set_current_page (
441 GTK_NOTEBOOK(wizard->notebook),
444 else if (response == GO_FORWARD)
446 if (current_page < (num_pages-1))
447 gtk_notebook_set_current_page (
448 GTK_NOTEBOOK(wizard->notebook),
452 gtk_dialog_set_response_sensitive (dialog, GO_BACK,
454 gtk_dialog_set_response_sensitive (dialog, GO_FORWARD,
455 current_page < (num_pages - 1));
456 gtk_dialog_set_response_sensitive (dialog, FINISHED,
457 current_page == (num_pages - 1));
462 gboolean run_wizard(MainWindow *mainwin, gboolean create_mailbox) {
463 WizardWindow *wizard = g_new0(WizardWindow, 1);
470 wizard->mainwin = mainwin;
471 wizard->create_mailbox = create_mailbox;
473 gtk_widget_hide(mainwin->window);
475 wizard->window = gtk_dialog_new_with_buttons (_("New User"),
477 GTK_STOCK_GO_BACK, GO_BACK,
478 GTK_STOCK_GO_FORWARD, GO_FORWARD,
479 GTK_STOCK_SAVE, FINISHED,
480 GTK_STOCK_QUIT, CANCEL,
483 g_signal_connect(wizard->window, "response",
484 G_CALLBACK(wizard_response_cb), wizard);
485 gtk_widget_realize(wizard->window);
486 gtk_dialog_set_default_response(GTK_DIALOG(wizard->window),
488 gtk_dialog_set_response_sensitive(GTK_DIALOG(wizard->window),
490 gtk_dialog_set_response_sensitive(GTK_DIALOG(wizard->window),
492 gtk_dialog_set_response_sensitive(GTK_DIALOG(wizard->window),
494 gtk_dialog_set_response_sensitive(GTK_DIALOG(wizard->window),
497 wizard->notebook = gtk_notebook_new();
498 gtk_notebook_set_show_tabs(GTK_NOTEBOOK(wizard->notebook), FALSE);
499 gtk_notebook_set_show_border(GTK_NOTEBOOK(wizard->notebook), FALSE);
500 gtk_box_pack_start(GTK_BOX(GTK_DIALOG(wizard->window)->vbox),
501 wizard->notebook, TRUE, TRUE, 0);
503 wizard->pages = NULL;
506 page = create_page(wizard, _("Welcome to Sylpheed-Claws."));
508 wizard->pages = g_slist_append(wizard->pages, page);
509 widget = stock_pixmap_widget(wizard->window,
510 STOCK_PIXMAP_SYLPHEED_LOGO);
512 gtk_box_pack_start (GTK_BOX(page), widget, FALSE, FALSE, 0);
514 text = g_strdup(_("Welcome to Sylpheed-Claws.\n\n"
515 "It looks like it's the first time you use \n"
516 "Sylpheed-Claws. So, we'll now define some basic\n"
517 "information about yourself and your most common\n"
518 "mail parameters; so that you can begin to use\n"
519 "Sylpheed-Claws in less than five minutes."));
520 widget = gtk_label_new(text);
521 gtk_box_pack_start (GTK_BOX(page), widget, FALSE, FALSE, 0);
525 widget = create_page (wizard, _("About You"));
526 gtk_box_pack_start (GTK_BOX(widget), user_page(wizard), FALSE, FALSE, 0);
527 wizard->pages = g_slist_append(wizard->pages, widget);
530 if (create_mailbox) {
531 widget = create_page (wizard, _("Saving mail on disk"));
532 gtk_box_pack_start (GTK_BOX(widget), mailbox_page(wizard), FALSE, FALSE, 0);
533 wizard->pages = g_slist_append(wizard->pages, widget);
536 widget = create_page (wizard, _("Sending mail"));
537 gtk_box_pack_start (GTK_BOX(widget), smtp_page(wizard), FALSE, FALSE, 0);
538 wizard->pages = g_slist_append(wizard->pages, widget);
541 widget = create_page (wizard, _("Receiving mail"));
542 gtk_box_pack_start (GTK_BOX(widget), recv_page(wizard), FALSE, FALSE, 0);
543 wizard->pages = g_slist_append(wizard->pages, widget);
547 widget = create_page (wizard, _("Security"));
548 gtk_box_pack_start (GTK_BOX(widget), ssl_page(wizard), FALSE, FALSE, 0);
549 wizard->pages = g_slist_append(wizard->pages, widget);
552 for (cur = wizard->pages; cur && cur->data; cur = cur->next) {
553 gtk_notebook_append_page (GTK_NOTEBOOK(wizard->notebook),
554 GTK_WIDGET(cur->data), NULL);
557 gtk_widget_show_all (wizard->window);
559 while (!wizard->finished)
560 gtk_main_iteration();
562 result = wizard->result;
566 gtk_widget_show(mainwin->window);