src/wizard.c

   1 /*
   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
   5  *
   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.
  10  *
  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.
  15  *
  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.
  19  */
  20 #include "defs.h"
  21
  22 #include <glib.h>
  23 #include <gdk/gdkkeysyms.h>
  24 #include <gtk/gtkwidget.h>
  25 #include <gtk/gtkvbox.h>
  26 #include <gtk/gtkbox.h>
  27 #include <gtk/gtktable.h>
  28 #include <gtk/gtkentry.h>
  29 #include <gtk/gtklabel.h>
  30 #include <gtk/gtknotebook.h>
  31 #include <gtk/gtktogglebutton.h>
  32 #include <gtk/gtkcheckbutton.h>
  33 #include <gtk/gtk.h>
  34
  35 #include <stdio.h>
  36 #include <stdlib.h>
  37 #include <string.h>
  38 #include <ctype.h>
  39
  40 #ifdef HAVE_CONFIG_H
  41 #  include "config.h"
  42 #endif
  43
  44 #include "intl.h"
  45 #include "utils.h"
  46 #include "gtk/menu.h"
  47 #include "account.h"
  48 #include "prefs_account.h"
  49 #include "mainwindow.h"
  50 #include "stock_pixmap.h"
  51 #include "setup.h"
  52 #include "folder.h"
  53 #ifdef USE_OPENSSL
  54 #include "ssl.h"
  55 #endif
  56 typedef enum
  57 {
  58         GO_BACK,
  59         GO_FORWARD,
  60         CANCEL,
  61         FINISHED
  62 } PageNavigation;
  63
  64 typedef struct
  65 {
  66         GtkWidget *window;
  67         GSList    *pages;
  68         GtkWidget *notebook;
  69
  70         MainWindow *mainwin;
  71
  72         GtkWidget *email;
  73         GtkWidget *full_name;
  74         GtkWidget *organization;
  75
  76         GtkWidget *mailbox_name;
  77
  78         GtkWidget *smtp_server;
  79
  80         GtkWidget *recv_type;
  81         GtkWidget *recv_server;
  82         GtkWidget *recv_username;
  83         GtkWidget *recv_password;
  84
  85 #ifdef USE_OPENSSL
  86         GtkWidget *smtp_use_ssl;
  87         GtkWidget *recv_use_ssl;
  88 #endif
  89
  90         gboolean create_mailbox;
  91         gboolean finished;
  92         gboolean result;
  93
  94 } WizardWindow;
  95
  96 static void wizard_write_config(WizardWindow *wizard)
  97 {
  98         gboolean mailbox_ok = FALSE;
  99         PrefsAccount *prefs_account = prefs_account_new();
 100         GList *account_list = NULL;
 101         GtkWidget *menu, *menuitem;
 102         int tmp;
 103
 104         if (wizard->create_mailbox) {
 105                 mailbox_ok = setup_write_mailbox_path(wizard->mainwin,
 106                                 gtk_entry_get_text(GTK_ENTRY(wizard->mailbox_name)));
 107         }
 108
 109         prefs_account->account_name = g_strdup_printf("%s@%s",
 110                                 gtk_entry_get_text(GTK_ENTRY(wizard->recv_username)),
 111                                 gtk_entry_get_text(GTK_ENTRY(wizard->recv_server)));
 112         prefs_account->name = g_strdup(
 113                                 gtk_entry_get_text(GTK_ENTRY(wizard->full_name)));
 114         prefs_account->address = g_strdup(
 115                                 gtk_entry_get_text(GTK_ENTRY(wizard->email)));
 116         prefs_account->organization = g_strdup(
 117                                 gtk_entry_get_text(GTK_ENTRY(wizard->organization)));
 118         prefs_account->smtp_server = g_strdup(
 119                                 gtk_entry_get_text(GTK_ENTRY(wizard->smtp_server)));
 120         prefs_account->recv_server = g_strdup(
 121                                 gtk_entry_get_text(GTK_ENTRY(wizard->recv_server)));
 122         prefs_account->userid = g_strdup(
 123                                 gtk_entry_get_text(GTK_ENTRY(wizard->recv_username)));
 124         prefs_account->passwd = g_strdup(
 125                                 gtk_entry_get_text(GTK_ENTRY(wizard->recv_password)));
 126
 127         menu = gtk_option_menu_get_menu(GTK_OPTION_MENU(wizard->recv_type));
 128         menuitem = gtk_menu_get_active(GTK_MENU(menu));
 129         prefs_account->protocol = GPOINTER_TO_INT
 130                         (g_object_get_data(G_OBJECT(menuitem), MENU_VAL_ID));
 131
 132 #ifdef USE_OPENSSL
 133         if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(wizard->smtp_use_ssl)))
 134                 prefs_account->ssl_smtp = SSL_TUNNEL;
 135         if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(wizard->smtp_use_ssl)))
 136                 if (prefs_account->protocol == A_IMAP4)
 137                         prefs_account->ssl_imap = SSL_TUNNEL;
 138                 else
 139                         prefs_account->ssl_pop = SSL_TUNNEL;
 140 #endif
 141
 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();
 146 }
 147
 148 static GtkWidget* create_page (WizardWindow *wizard, const char * title)
 149 {
 150         GtkWidget *w;
 151         GtkWidget *vbox;
 152         GtkWidget *hbox;
 153         GtkWidget *image;
 154         char *title_string;
 155
 156         vbox = gtk_vbox_new (FALSE, 6);
 157         gtk_container_set_border_width  (GTK_CONTAINER(vbox), 10);
 158
 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);
 169
 170         /* pack the titlebar */
 171         gtk_box_pack_start (GTK_BOX(vbox), hbox, FALSE, FALSE, 0);
 172
 173         /* pack the separator */
 174         gtk_box_pack_start (GTK_BOX(vbox), gtk_hseparator_new(), FALSE, FALSE, 0);
 175
 176         /* pack space */
 177         w = gtk_alignment_new (0, 0, 0, 0);
 178         gtk_widget_set_usize (w, 0, 6);
 179         gtk_box_pack_start (GTK_BOX(vbox), w, FALSE, FALSE, 0);
 180
 181         return vbox;
 182 }
 183
 184 static GtkWidget*
 185 create_page_with_text (WizardWindow *wizard, const char * title,
 186                         const char * text)
 187 {
 188         GtkWidget *label;
 189         GtkWidget *page;
 190
 191         page = create_page (wizard, title);
 192         label = gtk_label_new (text);
 193         gtk_box_pack_start (GTK_BOX(page), label, TRUE, TRUE, 0);
 194
 195         return page;
 196 }
 197
 198 #define GTK_TABLE_ADD_ROW_AT(table,text,entry,i) {                            \
 199         GtkWidget *label = gtk_label_new(text);                               \
 200         gtk_table_attach(GTK_TABLE(table), label,                             \
 201                          0,1,i,i+1, GTK_EXPAND|GTK_FILL, 0, 0, 0);            \
 202         gtk_misc_set_alignment(GTK_MISC(label), 1, 0.5);                      \
 203         gtk_table_attach(GTK_TABLE(table), entry,                             \
 204                          1,2,i,i+1, GTK_EXPAND|GTK_FILL, 0, 0, 0);            \
 205 }
 206
 207 static gchar *get_default_email_addr(void)
 208 {
 209         gchar *domain_name = g_strdup(get_domain_name());
 210         gchar *result;
 211         if (strchr(domain_name, '.') != strrchr(domain_name, '.')
 212         && strlen(strchr(domain_name, '.')) > 6) {
 213                 gchar *tmp = g_strdup(strchr(domain_name, '.')+1);
 214                 g_free(domain_name);
 215                 domain_name = tmp;
 216         }
 217         result = g_strdup_printf("%s@%s",
 218                                 g_get_user_name(),
 219                                 domain_name);
 220         g_free(domain_name);
 221         return result;
 222 }
 223
 224 static GtkWidget* user_page (WizardWindow * wizard)
 225 {
 226         GtkWidget *table = gtk_table_new(3,2, FALSE);
 227         gchar *text;
 228         gint i = 0;
 229
 230         gtk_table_set_row_spacings(GTK_TABLE(table), 4);
 231         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
 232
 233         wizard->full_name = gtk_entry_new();
 234         gtk_entry_set_text(GTK_ENTRY(wizard->full_name), g_get_real_name());
 235         GTK_TABLE_ADD_ROW_AT(table, _("Your name:"),
 236                              wizard->full_name, i); i++;
 237
 238         wizard->email = gtk_entry_new();
 239         text = get_default_email_addr();
 240         gtk_entry_set_text(GTK_ENTRY(wizard->email), text);
 241         g_free(text);
 242         GTK_TABLE_ADD_ROW_AT(table, _("Your email address:"),
 243                              wizard->email, i); i++;
 244
 245         wizard->organization = gtk_entry_new();
 246         GTK_TABLE_ADD_ROW_AT(table, _("Your organization:"),
 247                              wizard->organization, i); i++;
 248
 249         return table;
 250 }
 251
 252 static GtkWidget* mailbox_page (WizardWindow * wizard)
 253 {
 254         GtkWidget *table = gtk_table_new(1,2, FALSE);
 255         gchar *text;
 256         gint i = 0;
 257
 258         gtk_table_set_row_spacings(GTK_TABLE(table), 4);
 259         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
 260
 261         wizard->mailbox_name = gtk_entry_new();
 262         gtk_entry_set_text(GTK_ENTRY(wizard->mailbox_name), "Mail");
 263         GTK_TABLE_ADD_ROW_AT(table, _("Mailbox name:"),
 264                              wizard->mailbox_name, i); i++;
 265
 266         return table;
 267 }
 268
 269 static gchar *get_default_server(const gchar *type)
 270 {
 271         gchar *domain_name = g_strdup(get_domain_name());
 272         gchar *result;
 273         if (strchr(domain_name, '.') != strrchr(domain_name, '.')
 274         && strlen(strchr(domain_name, '.')) > 6) {
 275                 gchar *tmp = g_strdup(strchr(domain_name, '.')+1);
 276                 g_free(domain_name);
 277                 domain_name = tmp;
 278         }
 279         result = g_strdup_printf("%s.%s",
 280                                 type, domain_name);
 281         g_free(domain_name);
 282         return result;
 283 }
 284
 285 static GtkWidget* smtp_page (WizardWindow * wizard)
 286 {
 287         GtkWidget *table = gtk_table_new(1,2, FALSE);
 288         gchar *text;
 289         gint i = 0;
 290
 291         gtk_table_set_row_spacings(GTK_TABLE(table), 4);
 292         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
 293
 294         wizard->smtp_server = gtk_entry_new();
 295         text = get_default_server("smtp");
 296         gtk_entry_set_text(GTK_ENTRY(wizard->smtp_server), text);
 297         g_free(text);
 298         GTK_TABLE_ADD_ROW_AT(table, _("SMTP server address:"),
 299                              wizard->smtp_server, i); i++;
 300         return table;
 301 }
 302
 303 static void wizard_protocol_changed(GtkMenuItem *menuitem, gpointer data)
 304 {
 305         WizardWindow *wizard = (WizardWindow *)data;
 306         RecvProtocol protocol;
 307         gchar *text;
 308         protocol = GPOINTER_TO_INT
 309                 (g_object_get_data(G_OBJECT(menuitem), MENU_VAL_ID));
 310
 311         if (protocol == A_POP3) {
 312                 text = get_default_server("pop");
 313                 gtk_entry_set_text(GTK_ENTRY(wizard->recv_server), text);
 314                 g_free(text);
 315         } else {
 316                 text = get_default_server("imap");
 317                 gtk_entry_set_text(GTK_ENTRY(wizard->recv_server), text);
 318                 g_free(text);
 319         }
 320 }
 321
 322 static GtkWidget* recv_page (WizardWindow * wizard)
 323 {
 324         GtkWidget *table = gtk_table_new(5,2, FALSE);
 325         GtkWidget *menu = gtk_menu_new();
 326         GtkWidget *menuitem;
 327         gchar *text;
 328         gint i = 0;
 329
 330         gtk_table_set_row_spacings(GTK_TABLE(table), 4);
 331         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
 332
 333         wizard->recv_type = gtk_option_menu_new();
 334
 335         MENUITEM_ADD (menu, menuitem, _("POP3"), A_POP3);
 336         g_signal_connect(G_OBJECT(menuitem), "activate",
 337                          G_CALLBACK(wizard_protocol_changed),
 338                          wizard);
 339         MENUITEM_ADD (menu, menuitem, _("IMAP"), A_IMAP4);
 340         g_signal_connect(G_OBJECT(menuitem), "activate",
 341                          G_CALLBACK(wizard_protocol_changed),
 342                          wizard);
 343         gtk_option_menu_set_menu (GTK_OPTION_MENU (wizard->recv_type), menu);
 344         GTK_TABLE_ADD_ROW_AT(table, _("Server type:"),
 345                              wizard->recv_type, i); i++;
 346
 347         wizard->recv_server = gtk_entry_new();
 348         text = get_default_server("pop");
 349         gtk_entry_set_text(GTK_ENTRY(wizard->recv_server), text);
 350         g_free(text);
 351         GTK_TABLE_ADD_ROW_AT(table, _("Server address:"),
 352                              wizard->recv_server, i); i++;
 353
 354         wizard->recv_username = gtk_entry_new();
 355         gtk_entry_set_text(GTK_ENTRY(wizard->recv_username), g_get_user_name());
 356         GTK_TABLE_ADD_ROW_AT(table, _("Username:"),
 357                              wizard->recv_username, i); i++;
 358
 359         wizard->recv_password = gtk_entry_new();
 360         gtk_entry_set_visibility(GTK_ENTRY(wizard->recv_password), FALSE);
 361         GTK_TABLE_ADD_ROW_AT(table, _("Password:"),
 362                              wizard->recv_password, i); i++;
 363
 364         return table;
 365 }
 366
 367 #ifdef USE_OPENSSL
 368 static GtkWidget* ssl_page (WizardWindow * wizard)
 369 {
 370         GtkWidget *table = gtk_table_new(2,2, FALSE);
 371         gchar *text;
 372         gint i = 0;
 373
 374         gtk_table_set_row_spacings(GTK_TABLE(table), 4);
 375         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
 376
 377         wizard->smtp_use_ssl = gtk_check_button_new_with_label(
 378                                         _("Use SSL to connect to SMTP server"));
 379         gtk_table_attach(GTK_TABLE(table), wizard->smtp_use_ssl,
 380                          0,1,i,i+1, GTK_EXPAND|GTK_FILL, 0, 0, 0); i++;
 381         gtk_misc_set_alignment(GTK_MISC(wizard->smtp_use_ssl), 0, 0.5);
 382
 383         wizard->recv_use_ssl = gtk_check_button_new_with_label(
 384                                         _("Use SSL to connect to receiving server"));
 385         gtk_table_attach(GTK_TABLE(table), wizard->recv_use_ssl,
 386                          0,1,i,i+1, GTK_EXPAND|GTK_FILL, 0, 0, 0);
 387         gtk_misc_set_alignment(GTK_MISC(wizard->recv_use_ssl), 0, 0.5);
 388
 389         return table;
 390 }
 391 #endif
 392
 393 static void
 394 wizard_response_cb (GtkDialog * dialog, int response, gpointer data)
 395 {
 396         WizardWindow * wizard = (WizardWindow *)data;
 397         int current_page, num_pages;
 398
 399         num_pages = g_slist_length(wizard->pages);
 400         current_page = gtk_notebook_get_current_page (
 401                                 GTK_NOTEBOOK(wizard->notebook));
 402         if (response == CANCEL)
 403         {
 404                 wizard->finished = TRUE;
 405                 wizard->result = FALSE;
 406                 gtk_widget_destroy (GTK_WIDGET(dialog));
 407         }
 408         else if (response == FINISHED)
 409         {
 410                 wizard_write_config(wizard);
 411                 wizard->finished = TRUE;
 412                 wizard->result = TRUE;
 413                 gtk_widget_destroy (GTK_WIDGET(dialog));
 414         }
 415         else
 416         {
 417                 if (response == GO_BACK)
 418                 {
 419                         if (current_page > 0)
 420                                 gtk_notebook_set_current_page (
 421                                         GTK_NOTEBOOK(wizard->notebook),
 422                                         --current_page);
 423                 }
 424                 else if (response == GO_FORWARD)
 425                 {
 426                         if (current_page < (num_pages-1))
 427                                 gtk_notebook_set_current_page (
 428                                         GTK_NOTEBOOK(wizard->notebook),
 429                                         ++current_page);
 430                 }
 431
 432                 gtk_dialog_set_response_sensitive (dialog, GO_BACK,
 433                                 current_page > 0);
 434                 gtk_dialog_set_response_sensitive (dialog, GO_FORWARD,
 435                                 current_page < (num_pages - 1));
 436                 gtk_dialog_set_response_sensitive (dialog, FINISHED,
 437                                 current_page == (num_pages - 1));
 438         }
 439 }
 440
 441
 442 gboolean run_wizard(MainWindow *mainwin, gboolean create_mailbox) {
 443         WizardWindow *wizard = g_new0(WizardWindow, 1);
 444         GtkWidget *page;
 445         GtkWidget *widget;
 446         gchar     *text;
 447         GSList    *cur;
 448         gboolean   result;
 449
 450         wizard->mainwin = mainwin;
 451         wizard->create_mailbox = create_mailbox;
 452
 453         gtk_widget_hide(mainwin->window);
 454
 455         wizard->window = gtk_dialog_new_with_buttons (_("New User"),
 456                         NULL, 0,
 457                         GTK_STOCK_GO_BACK, GO_BACK,
 458                         GTK_STOCK_GO_FORWARD, GO_FORWARD,
 459                         GTK_STOCK_SAVE, FINISHED,
 460                         GTK_STOCK_QUIT, CANCEL,
 461                         NULL);
 462
 463         g_signal_connect(wizard->window, "response",
 464                           G_CALLBACK(wizard_response_cb), wizard);
 465         gtk_widget_realize(wizard->window);
 466         gtk_dialog_set_default_response(GTK_DIALOG(wizard->window),
 467                         GO_FORWARD);
 468         gtk_dialog_set_response_sensitive(GTK_DIALOG(wizard->window),
 469                         GO_BACK, FALSE);
 470         gtk_dialog_set_response_sensitive(GTK_DIALOG(wizard->window),
 471                         GO_FORWARD, TRUE);
 472         gtk_dialog_set_response_sensitive(GTK_DIALOG(wizard->window),
 473                         FINISHED, FALSE);
 474         gtk_dialog_set_response_sensitive(GTK_DIALOG(wizard->window),
 475                         CANCEL, TRUE);
 476
 477         wizard->notebook = gtk_notebook_new();
 478         gtk_notebook_set_show_tabs(GTK_NOTEBOOK(wizard->notebook), FALSE);
 479         gtk_notebook_set_show_border(GTK_NOTEBOOK(wizard->notebook), FALSE);
 480         gtk_box_pack_start(GTK_BOX(GTK_DIALOG(wizard->window)->vbox),
 481                             wizard->notebook, TRUE, TRUE, 0);
 482
 483         wizard->pages = NULL;
 484
 485 /*welcome page */
 486         page = create_page(wizard, _("Welcome to Sylpheed-Claws."));
 487
 488         wizard->pages = g_slist_append(wizard->pages, page);
 489         widget = stock_pixmap_widget(wizard->window,
 490                                 STOCK_PIXMAP_SYLPHEED_LOGO);
 491
 492         gtk_box_pack_start (GTK_BOX(page), widget, FALSE, FALSE, 0);
 493
 494         text = g_strdup(_("Welcome to Sylpheed-Claws.\n\n"
 495                           "It looks like it's the first time you use \n"
 496                           "Sylpheed-Claws. So, we'll now define some basic\n"
 497                           "information about yourself and your most common\n"
 498                           "mail parameters; so that you can begin to use\n"
 499                           "Sylpheed-Claws in less than five minutes."));
 500         widget = gtk_label_new(text);
 501         gtk_box_pack_start (GTK_BOX(page), widget, FALSE, FALSE, 0);
 502         g_free(text);
 503
 504 /* user page */
 505         widget = create_page (wizard, _("About You"));
 506         gtk_box_pack_start (GTK_BOX(widget), user_page(wizard), FALSE, FALSE, 0);
 507         wizard->pages = g_slist_append(wizard->pages, widget);
 508
 509 /* mailbox page */
 510         if (create_mailbox) {
 511                 widget = create_page (wizard, _("Saving mail on disk"));
 512                 gtk_box_pack_start (GTK_BOX(widget), mailbox_page(wizard), FALSE, FALSE, 0);
 513                 wizard->pages = g_slist_append(wizard->pages, widget);
 514         }
 515 /*smtp page */
 516         widget = create_page (wizard, _("Sending mail"));
 517         gtk_box_pack_start (GTK_BOX(widget), smtp_page(wizard), FALSE, FALSE, 0);
 518         wizard->pages = g_slist_append(wizard->pages, widget);
 519
 520 /* recv+auth page */
 521         widget = create_page (wizard, _("Receiving mail"));
 522         gtk_box_pack_start (GTK_BOX(widget), recv_page(wizard), FALSE, FALSE, 0);
 523         wizard->pages = g_slist_append(wizard->pages, widget);
 524
 525 /* ssl page */
 526 #ifdef USE_OPENSSL
 527         widget = create_page (wizard, _("Security"));
 528         gtk_box_pack_start (GTK_BOX(widget), ssl_page(wizard), FALSE, FALSE, 0);
 529         wizard->pages = g_slist_append(wizard->pages, widget);
 530 #endif
 531
 532         for (cur = wizard->pages; cur && cur->data; cur = cur->next) {
 533                 gtk_notebook_append_page (GTK_NOTEBOOK(wizard->notebook),
 534                                           GTK_WIDGET(cur->data), NULL);
 535         }
 536
 537         gtk_widget_show_all (wizard->window);
 538
 539         while (!wizard->finished)
 540                 gtk_main_iteration();
 541
 542         result = wizard->result;
 543
 544         GTK_EVENTS_FLUSH();
 545
 546         gtk_widget_show(mainwin->window);
 547         g_free(wizard);
 548
 549         return result;
 550 }