2008-09-17 [colin] 3.5.0cvs111
[claws.git] / src / prefs_spelling.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 2002-2007 Hiroyuki Yamamoto & the Claws Mail 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 3 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, see <http://www.gnu.org/licenses/>.
17  * 
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #  include "config.h"
22 #endif
23
24 #if USE_ENCHANT
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 #include "gtk/combobox.h"
44
45 typedef struct _SpellingPage
46 {
47         PrefsPage page;
48
49         GtkWidget *window;              /* do not modify */
50
51         GtkWidget *automatic_frame;
52         GtkWidget *dictionary_frame;
53         
54         GtkWidget *enable_aspell_checkbtn;
55         GtkWidget *recheck_when_changing_dict_checkbtn;
56         GtkWidget *check_while_typing_checkbtn;
57         GtkWidget *use_alternate_checkbtn;
58
59         GtkWidget *default_dict_label;
60         GtkWidget *default_dict_combo;
61
62         GtkWidget *default_alt_dict_label;
63         GtkWidget *default_alt_dict_combo;
64
65         GtkWidget *both_dict_check;
66
67         GtkWidget *misspelled_label;
68         GtkWidget *misspelled_colorbtn;
69         GtkWidget *misspelled_useblack_label;
70
71         gint       misspell_col;
72 } SpellingPage;
73
74 static void prefs_spelling_colorsel(GtkWidget *widget,
75                                     gpointer data)
76 {
77         SpellingPage *spelling = (SpellingPage *) data;
78         gint rgbcolor;
79
80         rgbcolor = colorsel_select_color_rgb(_("Pick color for misspelled word"), 
81                                              spelling->misspell_col);
82         gtkut_set_widget_bgcolor_rgb(spelling->misspelled_colorbtn, rgbcolor);
83         spelling->misspell_col = rgbcolor;
84 }
85
86 #define SAFE_STRING(str) \
87         (str) ? (str) : ""
88
89 static void prefs_spelling_create_widget(PrefsPage *_page, GtkWindow *window, gpointer data)
90 {
91         SpellingPage *prefs_spelling = (SpellingPage *) _page;
92
93         GtkWidget *vbox1, *vbox2;
94
95         GtkWidget *enable_aspell_checkbtn;
96         GtkWidget *check_while_typing_checkbtn;
97         GtkWidget *recheck_when_changing_dict_checkbtn;
98         GtkWidget *use_alternate_checkbtn;
99
100         GtkWidget *automatic_frame;
101         GtkWidget *dictionary_frame;
102
103         GtkWidget *table;
104
105         GtkWidget *default_dict_label;
106         GtkWidget *default_dict_combo;
107
108         GtkWidget *default_alt_dict_label;
109         GtkWidget *default_alt_dict_combo;
110
111         GtkWidget *both_dict_check;
112         GtkWidget *misspelled_label;
113         GtkWidget *misspelled_hbox;
114         GtkWidget *misspelled_colorbtn;
115         CLAWS_TIP_DECL();
116
117         vbox1 = gtk_vbox_new (FALSE, VSPACING);
118         gtk_widget_show (vbox1);
119         gtk_container_set_border_width (GTK_CONTAINER (vbox1), VBOX_BORDER);
120
121         vbox2 = gtk_vbox_new (FALSE, 0);
122         gtk_widget_show (vbox2);
123         gtk_box_pack_start (GTK_BOX (vbox1), vbox2, FALSE, FALSE, 0);
124
125         enable_aspell_checkbtn = gtk_check_button_new_with_label(
126                         _("Enable spell checker"));
127         gtk_widget_show(enable_aspell_checkbtn);
128         gtk_box_pack_start(GTK_BOX(vbox2), enable_aspell_checkbtn, TRUE, TRUE, 0);
129
130         use_alternate_checkbtn = gtk_check_button_new_with_label(
131                         _("Enable alternate dictionary"));
132         gtk_widget_show(use_alternate_checkbtn);
133         gtk_box_pack_start(GTK_BOX(vbox2), use_alternate_checkbtn, TRUE, TRUE, 0);
134
135         CLAWS_SET_TIP(use_alternate_checkbtn, 
136                         _("Faster switching with last used dictionary"));
137
138         vbox2 = gtkut_get_options_frame(vbox1, &automatic_frame, _("Automatic spell checking"));
139         
140         check_while_typing_checkbtn = gtk_check_button_new_with_label(
141                         _("Check while typing"));
142         gtk_widget_show(check_while_typing_checkbtn);
143         gtk_box_pack_start(GTK_BOX(vbox2), check_while_typing_checkbtn, TRUE, TRUE, 0);
144
145         recheck_when_changing_dict_checkbtn = gtk_check_button_new_with_label(
146                         _("Re-check message when changing dictionary"));
147         gtk_widget_show(recheck_when_changing_dict_checkbtn);
148         gtk_box_pack_start(GTK_BOX(vbox2), recheck_when_changing_dict_checkbtn, TRUE, TRUE, 0);
149         
150         vbox2 = gtkut_get_options_frame(vbox1, &dictionary_frame, _("Dictionary"));
151         
152         table = gtk_table_new(6, 4, FALSE);
153         gtk_widget_show(table);
154         gtk_container_set_border_width(GTK_CONTAINER(table), 8);
155         gtk_table_set_row_spacings(GTK_TABLE(table), 4);
156         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
157
158         gtk_box_pack_start(GTK_BOX(vbox2), table, TRUE, TRUE, 0);
159
160         default_dict_label = gtk_label_new(_("Default dictionary"));
161         gtk_widget_show(default_dict_label);
162         gtk_table_attach(GTK_TABLE (table), default_dict_label, 0, 1, 0, 1,
163                          (GtkAttachOptions) (GTK_FILL),
164                          (GtkAttachOptions) (0), 0, 2);
165         gtk_label_set_justify(GTK_LABEL(default_dict_label), GTK_JUSTIFY_RIGHT);
166         gtk_misc_set_alignment(GTK_MISC(default_dict_label), 1, 0.5);
167         
168         default_dict_combo = gtkaspell_dictionary_combo_new(TRUE);
169         gtk_widget_set_size_request(default_dict_combo, 180, -1);
170         gtk_table_attach (GTK_TABLE (table), default_dict_combo, 1, 2, 0, 1,
171                           GTK_SHRINK, 0, 0, 0);
172
173         default_alt_dict_label = gtk_label_new(_("Default alternate dictionary"));
174         gtk_widget_show(default_alt_dict_label);
175         gtk_table_attach(GTK_TABLE (table), default_alt_dict_label, 0, 1, 1, 2,
176                          (GtkAttachOptions) (GTK_FILL),
177                          (GtkAttachOptions) (0), 0, 2);
178         gtk_label_set_justify(GTK_LABEL(default_alt_dict_label), GTK_JUSTIFY_RIGHT);
179         gtk_misc_set_alignment(GTK_MISC(default_alt_dict_label), 1, 0.5);
180         
181         default_alt_dict_combo = gtkaspell_dictionary_combo_new(FALSE);
182         gtk_widget_set_size_request(default_alt_dict_combo, 180, -1);
183         gtk_table_attach (GTK_TABLE (table), default_alt_dict_combo, 1, 2, 1, 2,
184                           GTK_SHRINK, 0, 0, 0);
185
186         both_dict_check = gtk_check_button_new_with_label(
187                                 _("Check with both dictionaries"));
188         gtk_widget_show(both_dict_check);
189         gtk_table_attach (GTK_TABLE (table), both_dict_check, 1, 2, 2, 3,
190                           GTK_SHRINK, 0, 0, 0);
191
192         misspelled_hbox = gtk_hbox_new(FALSE, 10);
193         gtk_widget_show(misspelled_hbox);
194         gtk_box_pack_start(GTK_BOX(vbox1), misspelled_hbox, FALSE, FALSE, 0);
195                 
196         misspelled_label = gtk_label_new(_("Misspelled word color"));
197         gtk_widget_show(misspelled_label);
198         gtk_box_pack_start(GTK_BOX(misspelled_hbox), misspelled_label,
199                 FALSE, FALSE, 0);
200         gtk_label_set_justify(GTK_LABEL(misspelled_label), GTK_JUSTIFY_RIGHT);
201         gtk_misc_set_alignment(GTK_MISC(misspelled_label), 1, 0.5);
202
203         misspelled_colorbtn = gtk_button_new_with_label("");
204         gtk_widget_show(misspelled_colorbtn);
205         gtk_box_pack_start(GTK_BOX(misspelled_hbox), misspelled_colorbtn,
206                 FALSE, FALSE, 0);
207         gtk_widget_set_size_request(misspelled_colorbtn, 30, 20);
208         CLAWS_SET_TIP(misspelled_colorbtn,
209                              _("Pick color for misspelled word. "
210                                "Use black to underline"));
211
212         SET_TOGGLE_SENSITIVITY(enable_aspell_checkbtn, automatic_frame);
213         SET_TOGGLE_SENSITIVITY(enable_aspell_checkbtn, dictionary_frame);
214         SET_TOGGLE_SENSITIVITY(enable_aspell_checkbtn, misspelled_label);
215         SET_TOGGLE_SENSITIVITY(enable_aspell_checkbtn, misspelled_colorbtn);
216         SET_TOGGLE_SENSITIVITY(enable_aspell_checkbtn, use_alternate_checkbtn);
217         SET_TOGGLE_SENSITIVITY(use_alternate_checkbtn, default_alt_dict_label);
218         SET_TOGGLE_SENSITIVITY(use_alternate_checkbtn, default_alt_dict_combo);
219         SET_TOGGLE_SENSITIVITY(use_alternate_checkbtn, both_dict_check);
220
221         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(enable_aspell_checkbtn),
222                         prefs_common.enable_aspell);
223         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(both_dict_check),
224                         prefs_common.use_both_dicts);
225         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(check_while_typing_checkbtn),
226                         prefs_common.check_while_typing);
227         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(recheck_when_changing_dict_checkbtn),
228                         prefs_common.recheck_when_changing_dict);
229         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(use_alternate_checkbtn),
230                         prefs_common.use_alternate);
231         if (strrchr(prefs_common.dictionary, '/')) {
232                 gchar *tmp = g_strdup(strrchr(prefs_common.dictionary, '/')+1);
233                 g_free(prefs_common.dictionary);
234                 prefs_common.dictionary = tmp;
235         }
236         if (strrchr(prefs_common.alt_dictionary, '/')) {
237                 gchar *tmp = g_strdup(strrchr(prefs_common.alt_dictionary, '/')+1);
238                 g_free(prefs_common.alt_dictionary);
239                 prefs_common.alt_dictionary = tmp;
240         }
241         if (strchr(prefs_common.dictionary, '-')) {
242                 *(strchr(prefs_common.dictionary, '-')) = '\0';
243         }
244         if (strchr(prefs_common.alt_dictionary, '-')) {
245                 *(strchr(prefs_common.alt_dictionary, '-')) = '\0';
246         }
247         gtkaspell_set_dictionary_menu_active_item(GTK_COMBO_BOX(default_dict_combo),
248                                                 prefs_common.dictionary);
249
250         gtkaspell_set_dictionary_menu_active_item(GTK_COMBO_BOX(default_alt_dict_combo),
251                                                 prefs_common.alt_dictionary);
252
253         g_signal_connect(G_OBJECT(misspelled_colorbtn), "clicked",
254                          G_CALLBACK(prefs_spelling_colorsel), prefs_spelling);
255
256         prefs_spelling->misspell_col = prefs_common.misspelled_col;
257         gtkut_set_widget_bgcolor_rgb(misspelled_colorbtn, prefs_spelling->misspell_col);
258
259         prefs_spelling->window                  = GTK_WIDGET(window);
260         prefs_spelling->automatic_frame =       automatic_frame;
261         prefs_spelling->dictionary_frame =      dictionary_frame;
262         prefs_spelling->enable_aspell_checkbtn  = enable_aspell_checkbtn;
263         prefs_spelling->check_while_typing_checkbtn
264                 = check_while_typing_checkbtn;
265         prefs_spelling->recheck_when_changing_dict_checkbtn
266                 = recheck_when_changing_dict_checkbtn;
267         prefs_spelling->use_alternate_checkbtn  = use_alternate_checkbtn;
268         prefs_spelling->default_dict_label      = default_dict_label;
269         prefs_spelling->default_dict_combo      = default_dict_combo;
270         prefs_spelling->default_alt_dict_label  = default_alt_dict_label;
271         prefs_spelling->default_alt_dict_combo  = default_alt_dict_combo;
272         prefs_spelling->misspelled_label        = misspelled_label;
273         prefs_spelling->misspelled_colorbtn     = misspelled_colorbtn;
274         prefs_spelling->both_dict_check = both_dict_check;
275
276         prefs_spelling->page.widget = vbox1;
277 }
278
279 static void prefs_spelling_save(PrefsPage *_page)
280 {
281         SpellingPage *spelling = (SpellingPage *) _page;
282
283         prefs_common.enable_aspell =
284                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(spelling->enable_aspell_checkbtn));
285         prefs_common.check_while_typing =
286                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(spelling->check_while_typing_checkbtn));
287         prefs_common.recheck_when_changing_dict =
288                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(spelling->recheck_when_changing_dict_checkbtn));
289         prefs_common.use_alternate =
290                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(spelling->use_alternate_checkbtn));
291         prefs_common.use_both_dicts =
292                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(spelling->both_dict_check));
293
294         g_free(prefs_common.dictionary);
295         prefs_common.dictionary = 
296                 gtkaspell_get_dictionary_menu_active_item(
297                                 GTK_COMBO_BOX(spelling->default_dict_combo));
298
299         g_free(prefs_common.alt_dictionary);
300         prefs_common.alt_dictionary = 
301                 gtkaspell_get_dictionary_menu_active_item(
302                                 GTK_COMBO_BOX(spelling->default_alt_dict_combo));
303
304         prefs_common.misspelled_col = spelling->misspell_col;
305 }
306
307 static void prefs_spelling_destroy_widget(PrefsPage *_page)
308 {
309         /* SpellingPage *spelling = (SpellingPage *) _page; */
310
311 }
312
313 SpellingPage *prefs_spelling;
314
315 void prefs_spelling_init(void)
316 {
317         SpellingPage *page;
318         static gchar *path[3];
319         const gchar* language = NULL;
320         
321         path[0] = _("Compose");
322         path[1] = _("Spell Checking");
323         path[2] = NULL;
324
325         page = g_new0(SpellingPage, 1);
326         page->page.path = path;
327         page->page.create_widget = prefs_spelling_create_widget;
328         page->page.destroy_widget = prefs_spelling_destroy_widget;
329         page->page.save_page = prefs_spelling_save;
330         page->page.weight = 180.0;
331
332         prefs_gtk_register_page((PrefsPage *) page);
333         prefs_spelling = page;
334         
335         language = g_getenv("LANG");
336         if (language == NULL)
337                 language = "en";
338         else if (!strcmp(language, "POSIX") || !strcmp(language, "C"))
339                 language = "en";
340         
341         if (!prefs_common.dictionary)
342                 prefs_common.dictionary = g_strdup_printf("%s",
343                                                 language);
344         if (!strlen(prefs_common.dictionary)
345         ||  !strcmp(prefs_common.dictionary,"(None"))
346                 prefs_common.dictionary = g_strdup_printf("%s",
347                                                 language);
348         if (strcasestr(prefs_common.dictionary,".utf"))
349                 *(strcasestr(prefs_common.dictionary,".utf")) = '\0';
350         if (strstr(prefs_common.dictionary,"@"))
351                 *(strstr(prefs_common.dictionary,"@")) = '\0';
352 }
353
354 void prefs_spelling_done(void)
355 {
356         prefs_gtk_unregister_page((PrefsPage *) prefs_spelling);
357         g_free(prefs_spelling);
358 }
359
360 #endif /* USE_ENCHANT */