src/prefs_spelling.c

   1 /*
   2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
   3  * Copyright (C) 2002-2006 Hiroyuki Yamamoto & the Sylpheed-Claws team
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
  18  */
  19
  20 #ifdef HAVE_CONFIG_H
  21 #  include "config.h"
  22 #endif
  23
  24 #if USE_ASPELL
  25
  26 #include "defs.h"
  27
  28 #include <stdio.h>
  29 #include <stdlib.h>
  30
  31 #include <glib.h>
  32 #include <glib/gi18n.h>
  33 #include <gtk/gtk.h>
  34
  35 #include "utils.h"
  36 #include "prefs_common.h"
  37 #include "prefs_gtk.h"
  38
  39 #include "gtk/gtkutils.h"
  40 #include "gtk/prefswindow.h"
  41 #include "gtk/filesel.h"
  42 #include "gtk/colorsel.h"
  43
  44 typedef struct _SpellingPage
  45 {
  46         PrefsPage page;
  47
  48         GtkWidget *window;              /* do not modify */
  49
  50         GtkWidget *enable_aspell_checkbtn;
  51         GtkWidget *recheck_when_changing_dict_checkbtn;
  52         GtkWidget *check_while_typing_checkbtn;
  53         GtkWidget *use_alternate_checkbtn;
  54
  55         GtkWidget *table;
  56
  57         GtkWidget *aspell_path_label;
  58         GtkWidget *aspell_path_entry;
  59         GtkWidget *aspell_path_select;
  60
  61         GtkWidget *default_dict_label;
  62         GtkWidget *default_dict_optmenu;
  63         GtkWidget *default_dict_optmenu_menu;
  64
  65         GtkWidget *sugmode_label;
  66         GtkWidget *sugmode_optmenu;
  67         GtkWidget *sugmode_optmenu_menu;
  68
  69         GtkWidget *misspelled_label;
  70         GtkWidget *misspelled_colorbtn;
  71         GtkWidget *misspelled_useblack_label;
  72
  73         gint       misspell_col;
  74 } SpellingPage;
  75
  76 static void prefs_spelling_enable(SpellingPage *spelling, gboolean enable)
  77 {
  78         gtk_widget_set_sensitive(spelling->check_while_typing_checkbtn, enable);
  79         gtk_widget_set_sensitive(spelling->recheck_when_changing_dict_checkbtn, enable);
  80         gtk_widget_set_sensitive(spelling->use_alternate_checkbtn,      enable);
  81         gtk_widget_set_sensitive(spelling->table,                       enable);
  82 }
  83
  84 static void prefs_spelling_checkbtn_enable_aspell_toggle_cb
  85         (GtkWidget *widget,
  86          gpointer data)
  87 {
  88         SpellingPage *spelling = (SpellingPage *) data;
  89         gboolean toggled;
  90
  91         toggled = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(widget));
  92         prefs_spelling_enable(spelling, toggled);
  93 }
  94
  95 static void prefs_spelling_btn_aspell_path_clicked_cb(GtkWidget *widget,
  96                                                      gpointer data)
  97 {
  98         SpellingPage *spelling = (SpellingPage *) data;
  99         gchar *file_path;
 100         GtkWidget *new_menu;
 101
 102         file_path = filesel_select_file_open(_("Select dictionaries location"),
 103                                         prefs_common.aspell_path);
 104         if (file_path != NULL) {
 105                 gchar *tmp_path, *tmp;
 106
 107                 tmp_path = g_path_get_dirname(file_path);
 108                 tmp = g_strdup_printf("%s%s", tmp_path, G_DIR_SEPARATOR_S);
 109                 g_free(tmp_path);
 110
 111                 new_menu = gtkaspell_dictionary_option_menu_new(tmp);
 112                 gtk_option_menu_set_menu(GTK_OPTION_MENU(spelling->default_dict_optmenu),
 113                                          new_menu);
 114
 115                 gtk_entry_set_text(GTK_ENTRY(spelling->aspell_path_entry), tmp);
 116                 /* select first one */
 117                 gtk_option_menu_set_history(GTK_OPTION_MENU(
 118                                         spelling->default_dict_optmenu), 0);
 119
 120                 g_free(tmp);
 121
 122         }
 123 }
 124
 125 static void prefs_spelling_colorsel(GtkWidget *widget,
 126                                     gpointer data)
 127 {
 128         SpellingPage *spelling = (SpellingPage *) data;
 129         gint rgbcolor;
 130
 131         rgbcolor = colorsel_select_color_rgb(_("Pick color for misspelled word"),
 132                                              spelling->misspell_col);
 133         gtkut_set_widget_bgcolor_rgb(spelling->misspelled_colorbtn, rgbcolor);
 134         spelling->misspell_col = rgbcolor;
 135 }
 136
 137 #define SAFE_STRING(str) \
 138         (str) ? (str) : ""
 139
 140 void prefs_spelling_create_widget(PrefsPage *_page, GtkWindow *window, gpointer data)
 141 {
 142         SpellingPage *prefs_spelling = (SpellingPage *) _page;
 143
 144         GtkWidget *vbox1, *vbox2;
 145
 146         GtkWidget *enable_aspell_checkbtn;
 147         GtkWidget *check_while_typing_checkbtn;
 148         GtkWidget *recheck_when_changing_dict_checkbtn;
 149         GtkWidget *use_alternate_checkbtn;
 150
 151         GtkWidget *table;
 152
 153         GtkWidget *aspell_path_label;
 154         GtkWidget *aspell_path_hbox;
 155         GtkWidget *aspell_path_entry;
 156         GtkWidget *aspell_path_select;
 157
 158         GtkWidget *default_dict_label;
 159         GtkWidget *default_dict_optmenu;
 160         GtkWidget *default_dict_optmenu_menu;
 161
 162         GtkWidget *sugmode_label;
 163         GtkWidget *sugmode_optmenu;
 164         GtkWidget *sugmode_optmenu_menu;
 165
 166         GtkWidget *misspelled_label;
 167         GtkWidget *misspelled_hbox;
 168         GtkWidget *misspelled_colorbtn;
 169         GtkWidget *misspelled_useblack_label;
 170
 171         GtkTooltips *tooltips;
 172
 173         tooltips = gtk_tooltips_new ();
 174
 175         vbox1 = gtk_vbox_new (FALSE, VSPACING);
 176         gtk_widget_show (vbox1);
 177         gtk_container_set_border_width (GTK_CONTAINER (vbox1), VBOX_BORDER);
 178
 179         vbox2 = gtk_vbox_new (FALSE, 0);
 180         gtk_widget_show (vbox2);
 181         gtk_box_pack_start (GTK_BOX (vbox1), vbox2, FALSE, FALSE, 0);
 182
 183         enable_aspell_checkbtn = gtk_check_button_new_with_label(
 184                         _("Enable spell checker"));
 185         gtk_widget_show(enable_aspell_checkbtn);
 186         gtk_box_pack_start(GTK_BOX(vbox2), enable_aspell_checkbtn, TRUE, TRUE, 0);
 187
 188         check_while_typing_checkbtn = gtk_check_button_new_with_label(
 189                         _("Check while typing"));
 190         gtk_widget_show(check_while_typing_checkbtn);
 191         gtk_box_pack_start(GTK_BOX(vbox2), check_while_typing_checkbtn, TRUE, TRUE, 0);
 192
 193         recheck_when_changing_dict_checkbtn = gtk_check_button_new_with_label(
 194                         _("Re-check message when changing dictionary"));
 195         gtk_widget_show(recheck_when_changing_dict_checkbtn);
 196         gtk_box_pack_start(GTK_BOX(vbox2), recheck_when_changing_dict_checkbtn, TRUE, TRUE, 0);
 197
 198         use_alternate_checkbtn = gtk_check_button_new_with_label(
 199                         _("Enable alternate dictionary"));
 200         gtk_widget_show(use_alternate_checkbtn);
 201         gtk_box_pack_start(GTK_BOX(vbox2), use_alternate_checkbtn, TRUE, TRUE, 0);
 202
 203         gtk_tooltips_set_tip (tooltips, use_alternate_checkbtn,
 204                         _("Faster switching with last used dictionary"), NULL);
 205
 206
 207         table = gtk_table_new(4, 2, FALSE);
 208         gtk_widget_show(table);
 209         gtk_table_set_row_spacings(GTK_TABLE(table), 4);
 210         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
 211         gtk_box_pack_start(GTK_BOX(vbox2), table, TRUE, TRUE, 0);
 212
 213
 214         aspell_path_label = gtk_label_new(_("Dictionaries path:"));
 215         gtk_widget_show(aspell_path_label);
 216         gtk_table_attach(GTK_TABLE(table), aspell_path_label, 0, 1, 0, 1,
 217                         (GtkAttachOptions) (GTK_FILL),
 218                         (GtkAttachOptions) (0), 0, 0);
 219         gtk_label_set_justify(GTK_LABEL(aspell_path_label), GTK_JUSTIFY_RIGHT);
 220         gtk_misc_set_alignment(GTK_MISC(aspell_path_label), 1, 0.5);
 221
 222         aspell_path_hbox = gtk_hbox_new(FALSE, 8);
 223         gtk_widget_show(aspell_path_hbox);
 224         gtk_table_attach(GTK_TABLE(table), aspell_path_hbox, 1, 2, 0, 1,
 225                          (GtkAttachOptions) (GTK_EXPAND | GTK_FILL),
 226                          (GtkAttachOptions) (GTK_FILL), 0, 0);
 227
 228         aspell_path_entry = gtk_entry_new();
 229         gtk_widget_show(aspell_path_entry);
 230         gtk_box_pack_start(GTK_BOX(aspell_path_hbox), aspell_path_entry, TRUE, TRUE, 0);
 231         gtk_widget_set_size_request(aspell_path_entry, 30, 20);
 232
 233         aspell_path_select = gtkut_get_browse_directory_btn(_("_Browse"));
 234         gtk_widget_show(aspell_path_select);
 235         gtk_box_pack_start(GTK_BOX(aspell_path_hbox), aspell_path_select, FALSE, FALSE, 0);
 236
 237
 238         default_dict_label = gtk_label_new(_("Default dictionary:"));
 239         gtk_widget_show(default_dict_label);
 240         gtk_table_attach(GTK_TABLE(table), default_dict_label, 0, 1, 1, 2,
 241                         (GtkAttachOptions) (GTK_FILL),
 242                         (GtkAttachOptions) (0), 0, 0);
 243         gtk_label_set_justify(GTK_LABEL(default_dict_label), GTK_JUSTIFY_RIGHT);
 244         gtk_misc_set_alignment(GTK_MISC(default_dict_label), 1, 0.5);
 245
 246         default_dict_optmenu = gtk_option_menu_new();
 247         gtk_widget_show(default_dict_optmenu);
 248         gtk_table_attach(GTK_TABLE(table), default_dict_optmenu, 1, 2, 1, 2,
 249                         (GtkAttachOptions) (GTK_FILL),
 250                         (GtkAttachOptions) (0), 0, 0);
 251         default_dict_optmenu_menu = gtk_menu_new();
 252         gtk_option_menu_set_menu(GTK_OPTION_MENU(default_dict_optmenu),
 253                         default_dict_optmenu_menu);
 254
 255
 256         sugmode_label = gtk_label_new(_("Default suggestion mode:"));
 257         gtk_widget_show(sugmode_label);
 258         gtk_table_attach(GTK_TABLE(table), sugmode_label, 0, 1, 2, 3,
 259                         (GtkAttachOptions) (GTK_FILL),
 260                         (GtkAttachOptions) (0), 0, 0);
 261         gtk_label_set_justify(GTK_LABEL(sugmode_label), GTK_JUSTIFY_RIGHT);
 262         gtk_misc_set_alignment(GTK_MISC(sugmode_label), 1, 0.5);
 263
 264         sugmode_optmenu = gtk_option_menu_new();
 265         gtk_widget_show(sugmode_optmenu);
 266         gtk_table_attach(GTK_TABLE(table), sugmode_optmenu, 1, 2, 2, 3,
 267                         (GtkAttachOptions) (GTK_FILL),
 268                         (GtkAttachOptions) (0), 0, 0);
 269         sugmode_optmenu_menu = gtk_menu_new();
 270         gtk_option_menu_set_menu(GTK_OPTION_MENU(sugmode_optmenu),
 271                         sugmode_optmenu_menu);
 272
 273
 274         misspelled_label = gtk_label_new(_("Misspelled word color:"));
 275         gtk_widget_show(misspelled_label);
 276         gtk_table_attach(GTK_TABLE(table), misspelled_label, 0, 1, 3, 4,
 277                          (GtkAttachOptions) (GTK_FILL),
 278                          (GtkAttachOptions) (0), 0, 0);
 279         gtk_label_set_justify(GTK_LABEL(misspelled_label), GTK_JUSTIFY_RIGHT);
 280         gtk_misc_set_alignment(GTK_MISC(misspelled_label), 1, 0.5);
 281
 282         misspelled_hbox = gtk_hbox_new(FALSE, 0);
 283         gtk_widget_show(misspelled_hbox);
 284         gtk_table_attach(GTK_TABLE(table), misspelled_hbox, 1, 2, 3, 4,
 285                          (GtkAttachOptions) (GTK_FILL),
 286                          (GtkAttachOptions) (GTK_FILL), 0, 0);
 287
 288         misspelled_colorbtn = gtk_button_new_with_label("");
 289         gtk_widget_show(misspelled_colorbtn);
 290         gtk_box_pack_start(GTK_BOX(misspelled_hbox), misspelled_colorbtn, FALSE, FALSE, 0);
 291         gtk_widget_set_size_request(misspelled_colorbtn, 30, 20);
 292
 293         misspelled_useblack_label = gtk_label_new(_("Use black to underline"));
 294         gtkut_widget_set_small_font_size (misspelled_useblack_label);
 295         gtk_widget_show(misspelled_useblack_label);
 296         gtk_box_pack_start(GTK_BOX(misspelled_hbox), misspelled_useblack_label, TRUE, TRUE, 4);
 297         gtk_misc_set_alignment(GTK_MISC(misspelled_useblack_label), 0, 0.5);
 298         gtk_label_set_line_wrap(GTK_LABEL(misspelled_useblack_label), TRUE);
 299
 300
 301         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(enable_aspell_checkbtn),
 302                         prefs_common.enable_aspell);
 303         g_signal_connect(G_OBJECT(enable_aspell_checkbtn), "toggled",
 304                          G_CALLBACK(prefs_spelling_checkbtn_enable_aspell_toggle_cb),
 305                          prefs_spelling);
 306         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(check_while_typing_checkbtn),
 307                         prefs_common.check_while_typing);
 308         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(recheck_when_changing_dict_checkbtn),
 309                         prefs_common.recheck_when_changing_dict);
 310         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(use_alternate_checkbtn),
 311                         prefs_common.use_alternate);
 312         gtk_entry_set_text(GTK_ENTRY(aspell_path_entry),
 313                         SAFE_STRING(prefs_common.aspell_path));
 314         g_signal_connect(G_OBJECT(aspell_path_select), "clicked",
 315                          G_CALLBACK(prefs_spelling_btn_aspell_path_clicked_cb),
 316                          prefs_spelling);
 317         gtk_option_menu_set_menu(GTK_OPTION_MENU(default_dict_optmenu),
 318                                  gtkaspell_dictionary_option_menu_new(prefs_common.aspell_path));
 319         gtkaspell_set_dictionary_menu_active_item(default_dict_optmenu, prefs_common.dictionary);
 320         gtk_option_menu_set_menu(GTK_OPTION_MENU(sugmode_optmenu),
 321                                  gtkaspell_sugmode_option_menu_new(prefs_common.aspell_sugmode));
 322         gtkaspell_sugmode_option_menu_set(GTK_OPTION_MENU(sugmode_optmenu),
 323                                           prefs_common.aspell_sugmode);
 324         g_signal_connect(G_OBJECT(misspelled_colorbtn), "clicked",
 325                          G_CALLBACK(prefs_spelling_colorsel), prefs_spelling);
 326
 327         prefs_spelling->misspell_col = prefs_common.misspelled_col;
 328         gtkut_set_widget_bgcolor_rgb(misspelled_colorbtn, prefs_spelling->misspell_col);
 329
 330         prefs_spelling->window                  = GTK_WIDGET(window);
 331         prefs_spelling->enable_aspell_checkbtn  = enable_aspell_checkbtn;
 332         prefs_spelling->check_while_typing_checkbtn
 333                 = check_while_typing_checkbtn;
 334         prefs_spelling->recheck_when_changing_dict_checkbtn
 335                 = recheck_when_changing_dict_checkbtn;
 336         prefs_spelling->use_alternate_checkbtn  = use_alternate_checkbtn;
 337         prefs_spelling->table                   = table;
 338         prefs_spelling->aspell_path_label       = aspell_path_label;
 339         prefs_spelling->aspell_path_entry       = aspell_path_entry;
 340         prefs_spelling->aspell_path_select      = aspell_path_select;
 341         prefs_spelling->default_dict_label      = default_dict_label;
 342         prefs_spelling->default_dict_optmenu    = default_dict_optmenu;
 343         prefs_spelling->default_dict_optmenu_menu
 344                 = default_dict_optmenu_menu;
 345         prefs_spelling->sugmode_label           = sugmode_label;
 346         prefs_spelling->sugmode_optmenu         = sugmode_optmenu;
 347         prefs_spelling->sugmode_optmenu_menu    = sugmode_optmenu_menu;
 348         prefs_spelling->misspelled_label        = misspelled_label;
 349         prefs_spelling->misspelled_colorbtn     = misspelled_colorbtn;
 350         prefs_spelling->misspelled_useblack_label
 351                 = misspelled_useblack_label;
 352
 353         prefs_spelling->page.widget = vbox1;
 354
 355         prefs_spelling_enable(prefs_spelling, prefs_common.enable_aspell);
 356 }
 357
 358 void prefs_spelling_save(PrefsPage *_page)
 359 {
 360         SpellingPage *spelling = (SpellingPage *) _page;
 361
 362         prefs_common.enable_aspell =
 363                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(spelling->enable_aspell_checkbtn));
 364         prefs_common.check_while_typing =
 365                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(spelling->check_while_typing_checkbtn));
 366         prefs_common.recheck_when_changing_dict =
 367                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(spelling->recheck_when_changing_dict_checkbtn));
 368         prefs_common.use_alternate =
 369                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(spelling->use_alternate_checkbtn));
 370
 371         if (prefs_common.aspell_path)
 372                 g_free(prefs_common.aspell_path);
 373         prefs_common.aspell_path =
 374                 gtk_editable_get_chars(GTK_EDITABLE(spelling->aspell_path_entry), 0, -1);
 375
 376         if (prefs_common.dictionary != NULL)
 377                 g_free(prefs_common.dictionary);
 378         prefs_common.dictionary =
 379                 gtkaspell_get_dictionary_menu_active_item(
 380                         gtk_option_menu_get_menu(
 381                                 GTK_OPTION_MENU(
 382                                         spelling->default_dict_optmenu)));
 383
 384         prefs_common.aspell_sugmode =
 385                 gtkaspell_get_sugmode_from_option_menu(
 386                         GTK_OPTION_MENU(spelling->sugmode_optmenu));
 387
 388         prefs_common.misspelled_col = spelling->misspell_col;
 389 }
 390
 391 static void prefs_spelling_destroy_widget(PrefsPage *_page)
 392 {
 393         /* SpellingPage *spelling = (SpellingPage *) _page; */
 394
 395 }
 396
 397 SpellingPage *prefs_spelling;
 398
 399 void prefs_spelling_init(void)
 400 {
 401         SpellingPage *page;
 402         static gchar *path[3];
 403         const gchar* language = NULL;
 404
 405         path[0] = _("Compose");
 406         path[1] = _("Spell Checking");
 407         path[2] = NULL;
 408
 409         page = g_new0(SpellingPage, 1);
 410         page->page.path = path;
 411         page->page.create_widget = prefs_spelling_create_widget;
 412         page->page.destroy_widget = prefs_spelling_destroy_widget;
 413         page->page.save_page = prefs_spelling_save;
 414         page->page.weight = 180.0;
 415
 416         prefs_gtk_register_page((PrefsPage *) page);
 417         prefs_spelling = page;
 418
 419         language = g_getenv("LANG");
 420         if (language == NULL)
 421                 language = "en";
 422         else if (!strcmp(language, "POSIX") || !strcmp(language, "C"))
 423                 language = "en";
 424
 425         if (!prefs_common.dictionary)
 426                 prefs_common.dictionary = g_strdup_printf("%s%s",
 427                                                 prefs_common.aspell_path,
 428                                                 language);
 429         if (!strlen(prefs_common.dictionary)
 430         ||  !strcmp(prefs_common.dictionary,"(None"))
 431                 prefs_common.dictionary = g_strdup_printf("%s%s",
 432                                                 prefs_common.aspell_path,
 433                                                 language);
 434         if (strcasestr(prefs_common.dictionary,".utf"))
 435                 *(strcasestr(prefs_common.dictionary,".utf")) = '\0';
 436         if (strstr(prefs_common.dictionary,"@"))
 437                 *(strstr(prefs_common.dictionary,"@")) = '\0';
 438 }
 439
 440 void prefs_spelling_done(void)
 441 {
 442         prefs_gtk_unregister_page((PrefsPage *) prefs_spelling);
 443         g_free(prefs_spelling);
 444 }
 445
 446 #endif /* USE_ASPELL */