e141afd46c9d94ba4119828efdd1becef577fa66
[claws.git] / src / prefs_gtk.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2012 Hiroyuki Yamamoto and 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 #include "claws-features.h"
23 #endif
24
25 #define _GNU_SOURCE
26 #include <stdio.h>
27
28 #include <glib.h>
29 #include <glib/gi18n.h>
30 #include <gtk/gtk.h>
31 #include <stdlib.h>
32 #include <string.h>
33 #include <unistd.h>
34 #include <errno.h>
35
36 #include "defs.h"
37 #include "main.h"
38 #include "prefs.h"
39 #include "prefs_gtk.h"
40 #include "prefs_common.h"
41 #include "utils.h"
42 #include "gtkutils.h"
43 #include "passcrypt.h"
44 #include "codeconv.h"
45
46 #define CL(x)   (((gulong) (x) >> (gulong) 8) & 0xFFUL)
47 #define RGB_FROM_GDK_COLOR(c) \
48         ((CL(c.red)   << (gulong) 16) | \
49          (CL(c.green) << (gulong)  8) | \
50          (CL(c.blue)))
51
52 #ifdef HAVE_FGETS_UNLOCKED
53 #define SC_FGETS fgets_unlocked
54 #else
55 #define SC_FGETS fgets
56 #endif
57
58 typedef enum
59 {
60         DUMMY_PARAM
61 } DummyEnum;
62
63 static GHashTable *whole_cache = NULL;
64
65 static gboolean prefs_read_config_from_cache(PrefParam *param, const gchar *label,
66                                const gchar *rcfile);
67
68 static void prefs_config_parse_one_line(PrefParam       *param,
69                                          const gchar    *buf);
70
71 void prefs_read_config(PrefParam *param, const gchar *label,
72                        const gchar *rcfile, const gchar *encoding)
73 {
74         FILE *fp;
75         gchar buf[PREFSBUFSIZE];
76         gchar *block_label;
77
78         cm_return_if_fail(param != NULL);
79         cm_return_if_fail(label != NULL);
80         cm_return_if_fail(rcfile != NULL);
81
82         if (encoding != NULL)
83                 g_warning("Encoding is ignored\n");
84
85         debug_print("Reading configuration...\n");
86
87         prefs_set_default(param);
88
89         if (whole_cache != NULL) {
90                 if (prefs_read_config_from_cache(param, label, rcfile) == TRUE)
91                         return;
92         }
93
94         if ((fp = g_fopen(rcfile, "rb")) == NULL) {
95                 if (ENOENT != errno) FILE_OP_ERROR(rcfile, "fopen");
96                 return;
97         }
98
99         block_label = g_strdup_printf("[%s]", label);
100
101 #ifdef HAVE_FGETS_UNLOCKED
102         flockfile(fp);
103 #endif
104
105         /* search aiming block */
106         while (SC_FGETS(buf, sizeof(buf), fp) != NULL) {
107                 gint val;
108
109                 if (encoding) {
110                         gchar *conv_str;
111
112                         conv_str = conv_codeset_strdup
113                                 (buf, encoding, CS_INTERNAL);
114                         if (!conv_str)
115                                 conv_str = g_strdup(buf);
116                         val = strncmp
117                                 (conv_str, block_label, strlen(block_label));
118                         g_free(conv_str);
119                 } else
120                         val = strncmp(buf, block_label, strlen(block_label));
121                 if (val == 0) {
122                         debug_print("Found %s\n", block_label);
123                         break;
124                 }
125         }
126         g_free(block_label);
127
128         while (SC_FGETS(buf, sizeof(buf), fp) != NULL) {
129                 strretchomp(buf);
130                 /* reached next block */
131                 if (buf[0] == '[') break;
132                 if (buf[0] == '#') continue;
133
134                 if (encoding) {
135                         gchar *conv_str;
136
137                         conv_str = conv_codeset_strdup
138                                 (buf, encoding, CS_INTERNAL);
139                         if (!conv_str)
140                                 conv_str = g_strdup(buf);
141                         prefs_config_parse_one_line(param, conv_str);
142                         g_free(conv_str);
143                 } else
144                         prefs_config_parse_one_line(param, buf);
145         }
146
147         debug_print("Finished reading configuration.\n");
148 #ifdef HAVE_FGETS_UNLOCKED
149         funlockfile(fp);
150 #endif
151         fclose(fp);
152 }
153
154 static void prefs_config_parse_one_line(PrefParam *param, const gchar *buf)
155 {
156         gint i;
157         gint name_len;
158         const gchar *value;
159         GdkColor color;
160
161         for (i = 0; param[i].name != NULL; i++) {
162                 name_len = strlen(param[i].name);
163                 if (g_ascii_strncasecmp(buf, param[i].name, name_len))
164                         continue;
165                 if (buf[name_len] != '=')
166                         continue;
167                 value = buf + name_len + 1;
168                 /* debug_print("%s = %s\n", param[i].name, value); */
169
170                 switch (param[i].type) {
171                 case P_STRING:
172                 {
173                         gchar *tmp = NULL;
174
175                         if (*value) {
176                                 if (g_utf8_validate(value, -1, NULL))
177                                         tmp = g_strdup(value);
178                                 else {
179                                         tmp = conv_codeset_strdup(value,
180                                                     conv_get_locale_charset_str_no_utf8(),
181                                                     CS_INTERNAL);
182                                 }
183                         } else {
184                                 tmp = g_strdup("");
185                         }
186                         if (!tmp) {
187                                 g_warning("Failed to convert character set.");
188                                 tmp = g_strdup(value);
189                         }
190                         g_free(*((gchar **)param[i].data));
191                         *((gchar **)param[i].data) = tmp;
192                         break;
193                 }
194                 case P_INT:
195                         *((gint *)param[i].data) =
196                                 (gint)atoi(value);
197                         break;
198                 case P_BOOL:
199                         *((gboolean *)param[i].data) =
200                                 (*value == '0' || *value == '\0')
201                                         ? FALSE : TRUE;
202                         break;
203                 case P_ENUM:
204                         *((DummyEnum *)param[i].data) =
205                                 (DummyEnum)atoi(value);
206                         break;
207                 case P_USHORT:
208                         *((gushort *)param[i].data) =
209                                 (gushort)atoi(value);
210                         break;
211                 case P_COLOR:
212                         if (gdk_color_parse(value, &color)) {
213                                 *((gulong *)param[i].data) = RGB_FROM_GDK_COLOR(color); 
214                         }
215                         else 
216                                 /* be compatible and accept ints */
217                                 *((gulong *)param[i].data) = strtoul(value, 0, 10); 
218                         break;
219                 case P_PASSWORD:
220                         g_free(*((gchar **)param[i].data));
221                         if (value[0] == '!') {
222                                 gchar *tmp, buf[1024];
223                                 gsize len;
224
225                                 tmp = g_base64_decode(&value[1], &len);
226                                 g_strlcat(buf, tmp, 1024);
227                                 g_free(tmp);
228                                 buf[len] = '\0';
229                                 passcrypt_decrypt(buf, len);
230                                 *((gchar **)param[i].data) =
231                                         *buf ? g_strdup(buf) : NULL;
232                         } else {
233                                 *((gchar **)param[i].data) =
234                                         *value ? g_strdup(value) : NULL;
235                         }
236                         break;
237                 default:
238                         break;
239                 }
240         }
241 }
242
243 #define TRY(func) \
244 if (!(func)) \
245 { \
246         g_warning("Failed to write configuration to file\n"); \
247         if (orig_fp) fclose(orig_fp); \
248         prefs_file_close_revert(pfile); \
249         g_free(rcpath); \
250         g_free(block_label); \
251         return; \
252 } \
253
254 void prefs_write_config(PrefParam *param, const gchar *label,
255                         const gchar *rcfile)
256 {
257         FILE *orig_fp;
258         PrefFile *pfile;
259         gchar *rcpath;
260         gchar buf[PREFSBUFSIZE];
261         gchar *block_label = NULL;
262         gboolean block_matched = FALSE;
263
264         cm_return_if_fail(param != NULL);
265         cm_return_if_fail(label != NULL);
266         cm_return_if_fail(rcfile != NULL);
267
268         rcpath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, rcfile, NULL);
269         if ((orig_fp = g_fopen(rcpath, "rb")) == NULL) {
270                 if (ENOENT != errno) FILE_OP_ERROR(rcpath, "fopen");
271         }
272
273         if ((pfile = prefs_write_open(rcpath)) == NULL) {
274                 g_warning("Failed to write configuration to file\n");
275                 if (orig_fp) fclose(orig_fp);
276                 g_free(rcpath);
277                 return;
278         }
279
280         block_label = g_strdup_printf("[%s]", label);
281
282         /* search aiming block */
283         if (orig_fp) {
284                 while (fgets(buf, sizeof(buf), orig_fp) != NULL) {
285                         gint val;
286
287                         val = strncmp(buf, block_label, strlen(block_label));
288                         if (val == 0) {
289                                 debug_print("Found %s\n", block_label);
290                                 block_matched = TRUE;
291                                 break;
292                         } else
293                                 TRY(fputs(buf, pfile->fp) != EOF);
294                 }
295         }
296
297         TRY(fprintf(pfile->fp, "%s\n", block_label) > 0);
298
299         /* write all param data to file */
300         TRY(prefs_write_param(param, pfile->fp) == 0);
301
302         if (block_matched) {
303                 gboolean in_dup_block = FALSE;
304                 while (fgets(buf, sizeof(buf), orig_fp) != NULL) {
305                         /* next block */
306                         if (buf[0] == '[') {
307                                 TRY(fputc('\n', pfile->fp) != EOF &&
308                                     fputs(buf, pfile->fp)  != EOF);
309                                 break;
310                         }
311                 }
312                 while (fgets(buf, sizeof(buf), orig_fp) != NULL) {
313                         if (buf[0] == '[') {
314                                 if (!strncmp(buf, block_label,
315                                                 strlen(block_label)))
316                                         in_dup_block = TRUE;
317                                 else
318                                         in_dup_block = FALSE;
319                         }
320                         if (!in_dup_block)
321                                 TRY(fputs(buf, pfile->fp) != EOF);
322                 }
323         }
324
325         g_free(block_label);
326         block_label = NULL;
327
328         if (orig_fp) fclose(orig_fp);
329         if (prefs_file_close(pfile) < 0)
330                 g_warning("Failed to write configuration to file\n");
331         g_free(rcpath);
332
333         debug_print("Configuration is saved.\n");
334 }
335
336 gint prefs_write_param(PrefParam *param, FILE *fp)
337 {
338         gint i;
339         gchar buf[PREFSBUFSIZE];
340
341         for (i = 0; param[i].name != NULL; i++) {
342                 switch (param[i].type) {
343                 case P_STRING:
344                 {
345                         gchar *tmp = NULL;
346
347                         if (*((gchar **)param[i].data)) {
348                                 if (g_utf8_validate(*((gchar **)param[i].data), -1, NULL))
349                                         tmp = g_strdup(*((gchar **)param[i].data));
350                                 else {
351                                         tmp = conv_codeset_strdup(*((gchar **)param[i].data),
352                                                 conv_get_locale_charset_str_no_utf8(),
353                                                 CS_INTERNAL);
354                                         if (!tmp)
355                                                 tmp = g_strdup(*((gchar **)param[i].data));
356                                 }
357                         }
358
359                         g_snprintf(buf, sizeof(buf), "%s=%s\n", param[i].name,
360                                    tmp ? tmp : "");
361
362                         g_free(tmp);
363                         break;
364                 }
365                 case P_INT:
366                         g_snprintf(buf, sizeof(buf), "%s=%d\n", param[i].name,
367                                    *((gint *)param[i].data));
368                         break;
369                 case P_BOOL:
370                         g_snprintf(buf, sizeof(buf), "%s=%d\n", param[i].name,
371                                    *((gboolean *)param[i].data));
372                         break;
373                 case P_ENUM:
374                         g_snprintf(buf, sizeof(buf), "%s=%d\n", param[i].name,
375                                    *((DummyEnum *)param[i].data));
376                         break;
377                 case P_USHORT:
378                         g_snprintf(buf, sizeof(buf), "%s=%d\n", param[i].name,
379                                    *((gushort *)param[i].data));
380                         break;
381                 case P_COLOR:
382                         g_snprintf(buf, sizeof buf,  "%s=#%6.6lx\n", param[i].name,
383                                    *((gulong *) param[i].data));
384                         break;
385                 case P_PASSWORD:
386                         {
387                                 gchar *tmp = NULL, *tmp2 = NULL;
388
389                                 tmp = *((gchar **)param[i].data);
390                                 if (tmp) {
391                                         gint len;
392
393                                         tmp = g_strdup(tmp);
394                                         len = strlen(tmp);
395                                         passcrypt_encrypt(tmp, len);
396                                         tmp2 = g_base64_encode(tmp, len);
397                                         g_free(tmp);
398                                         tmp = tmp2;
399                                 }
400                                 g_snprintf(buf, sizeof(buf), "%s=!%s\n", param[i].name,
401                                            tmp ?
402                                            tmp : "");
403                         }
404                         break;
405                 default:
406                         /* unrecognized, fail */
407                         debug_print("Unrecognized parameter type\n");
408                         return -1;
409                 }
410
411                 if (buf[0] != '\0') {
412                         if (fputs(buf, fp) == EOF) {
413                                 perror("fputs");
414                                 return -1;
415                         }
416                 }
417         }
418
419         return 0;
420 }
421
422 void prefs_set_default(PrefParam *param)
423 {
424         gint i;
425         GdkColor color;
426
427         cm_return_if_fail(param != NULL);
428
429         for (i = 0; param[i].name != NULL; i++) {
430                 if (!param[i].data) continue;
431
432                 switch (param[i].type) {
433                 case P_STRING:
434                         g_free(*((gchar **)param[i].data));
435                         if (param[i].defval != NULL) {
436                                 if (!strncasecmp(param[i].defval, "ENV_", 4)) {
437                                         const gchar *envstr;
438                                         gchar *tmp;
439
440                                         envstr = g_getenv(param[i].defval + 4);
441                                         tmp = envstr && *envstr ?
442                                                 conv_codeset_strdup(envstr,
443                                                                     conv_get_locale_charset_str(),
444                                                                     CS_INTERNAL)
445                                                 : g_strdup("");
446                                         if (!tmp) {
447                                                 g_warning("Failed to convert character set.");
448                                                 tmp = g_strdup(envstr);
449                                         }
450                                         *((gchar **)param[i].data) = tmp;
451                                 } else if (param[i].defval[0] == '~')
452                                         *((gchar **)param[i].data) =
453                                                 g_strconcat(get_home_dir(),
454                                                             param[i].defval + 1,
455                                                             NULL);
456                                 else 
457                                         *((gchar **)param[i].data) =
458                                                 g_strdup(param[i].defval);
459                         } else
460                                 *((gchar **)param[i].data) = NULL;
461                         break;
462                 case P_PASSWORD:
463                         g_free(*((gchar **)param[i].data));
464                         if (param[i].defval != NULL) {
465                                 if (param[i].defval[0] != '\0')
466                                         *((gchar **)param[i].data) =
467                                                 g_strdup(param[i].defval);
468                                 else
469                                         *((gchar **)param[i].data) = NULL;
470                         } else
471                                 *((gchar **)param[i].data) = NULL;
472                         break;
473                 case P_INT:
474                         if (param[i].defval != NULL)
475                                 *((gint *)param[i].data) =
476                                         (gint)atoi(param[i].defval);
477                         else
478                                 *((gint *)param[i].data) = 0;
479                         break;
480                 case P_BOOL:
481                         if (param[i].defval != NULL) {
482                                 if (!g_ascii_strcasecmp(param[i].defval, "TRUE"))
483                                         *((gboolean *)param[i].data) = TRUE;
484                                 else
485                                         *((gboolean *)param[i].data) =
486                                                 atoi(param[i].defval) ? TRUE : FALSE;
487                         } else
488                                 *((gboolean *)param[i].data) = FALSE;
489                         break;
490                 case P_ENUM:
491                         if (param[i].defval != NULL)
492                                 *((DummyEnum*)param[i].data) =
493                                         (DummyEnum)atoi(param[i].defval);
494                         else
495                                 *((DummyEnum *)param[i].data) = 0;
496                         break;
497                 case P_USHORT:
498                         if (param[i].defval != NULL)
499                                 *((gushort *)param[i].data) =
500                                         (gushort)atoi(param[i].defval);
501                         else
502                                 *((gushort *)param[i].data) = 0;
503                         break;
504                 case P_COLOR:
505                         if (param[i].defval != NULL && gdk_color_parse(param[i].defval, &color))
506                                 *((gulong *)param[i].data) =
507                                         RGB_FROM_GDK_COLOR(color);
508                         else if (param[i].defval)
509                                 /* be compatible and accept ints */
510                                 *((gulong *)param[i].data) = strtoul(param[i].defval, 0, 10); 
511                         else
512                                 *((gulong *)param[i].data) = 0; 
513                         break;
514                 default:
515                         break;
516                 }
517         }
518 }
519
520 void prefs_free(PrefParam *param)
521 {
522         gint i;
523
524         cm_return_if_fail(param != NULL);
525
526         for (i = 0; param[i].name != NULL; i++) {
527                 if (!param[i].data) continue;
528
529                 switch (param[i].type) {
530                 case P_STRING:
531                 case P_PASSWORD:
532                         g_free(*((gchar **)param[i].data));
533                         break;
534                 default:
535                         break;
536                 }
537         }
538 }
539
540 void prefs_button_toggled(GtkToggleButton *toggle_btn, GtkWidget *widget)
541 {
542         gboolean is_active;
543
544         is_active = gtk_toggle_button_get_active(toggle_btn);
545         gtk_widget_set_sensitive(widget, is_active);
546 }
547
548 void prefs_button_toggled_reverse(GtkToggleButton *toggle_btn, GtkWidget *widget)
549 {
550         gboolean is_active;
551
552         is_active = gtk_toggle_button_get_active(toggle_btn);
553         gtk_widget_set_sensitive(widget, !is_active);
554 }
555
556 void prefs_set_dialog(PrefParam *param)
557 {
558         gint i;
559
560         for (i = 0; param[i].name != NULL; i++) {
561                 if (param[i].widget_set_func)
562                         param[i].widget_set_func(&param[i]);
563         }
564 }
565
566 void prefs_set_data_from_dialog(PrefParam *param)
567 {
568         gint i;
569
570         for (i = 0; param[i].name != NULL; i++) {
571                 if (param[i].data_set_func)
572                         param[i].data_set_func(&param[i]);
573         }
574 }
575
576 void prefs_set_dialog_to_default(PrefParam *param)
577 {
578         gint       i;
579         PrefParam  tmpparam;
580         gchar     *str_data = NULL;
581         gint       int_data;
582         gushort    ushort_data;
583         gboolean   bool_data;
584         DummyEnum  enum_data;
585
586         for (i = 0; param[i].name != NULL; i++) {
587                 if (!param[i].widget_set_func) continue;
588
589                 tmpparam = param[i];
590
591                 switch (tmpparam.type) {
592                 case P_STRING:
593                         if (tmpparam.defval) {
594                                 if (!g_ascii_strncasecmp(tmpparam.defval, "ENV_", 4)) {
595                                         str_data = g_strdup(g_getenv(param[i].defval + 4));
596                                         tmpparam.data = &str_data;
597                                         break;
598                                 } else if (tmpparam.defval[0] == '~') {
599                                         str_data =
600                                                 g_strconcat(get_home_dir(),
601                                                             param[i].defval + 1,
602                                                             NULL);
603                                         tmpparam.data = &str_data;
604                                         break;
605                                 }
606                         }
607                         tmpparam.data = &tmpparam.defval;
608                         break;
609                 case P_PASSWORD:
610                         tmpparam.data = &tmpparam.defval;
611                         break;
612                 case P_INT:
613                         if (tmpparam.defval)
614                                 int_data = atoi(tmpparam.defval);
615                         else
616                                 int_data = 0;
617                         tmpparam.data = &int_data;
618                         break;
619                 case P_USHORT:
620                         if (tmpparam.defval)
621                                 ushort_data = atoi(tmpparam.defval);
622                         else
623                                 ushort_data = 0;
624                         tmpparam.data = &ushort_data;
625                         break;
626                 case P_BOOL:
627                         if (tmpparam.defval) {
628                                 if (!g_ascii_strcasecmp(tmpparam.defval, "TRUE"))
629                                         bool_data = TRUE;
630                                 else
631                                         bool_data = atoi(tmpparam.defval)
632                                                 ? TRUE : FALSE;
633                         } else
634                                 bool_data = FALSE;
635                         tmpparam.data = &bool_data;
636                         break;
637                 case P_ENUM:
638                         if (tmpparam.defval)
639                                 enum_data = (DummyEnum)atoi(tmpparam.defval);
640                         else
641                                 enum_data = 0;
642                         tmpparam.data = &enum_data;
643                         break;
644                 case P_OTHER:
645                 default:
646                         break;
647                 }
648                 tmpparam.widget_set_func(&tmpparam);
649                 g_free(str_data);
650                 str_data = NULL;
651         }
652 }
653
654 void prefs_set_data_from_entry(PrefParam *pparam)
655 {
656         gchar **str;
657         const gchar *entry_str;
658
659         cm_return_if_fail(*pparam->widget != NULL);
660
661         entry_str = gtk_entry_get_text(GTK_ENTRY(*pparam->widget));
662
663         switch (pparam->type) {
664         case P_STRING:
665         case P_PASSWORD:
666                 str = (gchar **)pparam->data;
667                 g_free(*str);
668                 *str = entry_str[0] ? g_strdup(entry_str) : NULL;
669                 break;
670         case P_USHORT:
671                 *((gushort *)pparam->data) = atoi(entry_str);
672                 break;
673         case P_INT:
674                 *((gint *)pparam->data) = atoi(entry_str);
675                 break;
676         default:
677                 g_warning("Invalid PrefType for GtkEntry widget: %d\n",
678                           pparam->type);
679         }
680 }
681
682 void prefs_set_escaped_data_from_entry(PrefParam *pparam)
683 {
684         gchar **str;
685
686         cm_return_if_fail(*pparam->widget != NULL);
687
688         switch (pparam->type) {
689         case P_STRING:
690                 str = (gchar **)pparam->data;
691                 g_free(*str);
692                 *str = pref_get_pref_from_entry(GTK_ENTRY(*pparam->widget));
693                 break;
694         default:
695                 g_warning("Invalid escaped PrefType for GtkEntry widget: %d\n",
696                           pparam->type);
697         }
698 }
699
700 void prefs_set_entry(PrefParam *pparam)
701 {
702         gchar **str;
703
704         cm_return_if_fail(*pparam->widget != NULL);
705
706         switch (pparam->type) {
707         case P_STRING:
708         case P_PASSWORD:
709                 str = (gchar **)pparam->data;
710                 gtk_entry_set_text(GTK_ENTRY(*pparam->widget),
711                                    *str ? *str : "");
712                 break;
713         case P_INT:
714                 gtk_entry_set_text(GTK_ENTRY(*pparam->widget),
715                                    itos(*((gint *)pparam->data)));
716                 break;
717         case P_USHORT:
718                 gtk_entry_set_text(GTK_ENTRY(*pparam->widget),
719                                    itos(*((gushort *)pparam->data)));
720                 break;
721         default:
722                 g_warning("Invalid PrefType for GtkEntry widget: %d\n",
723                           pparam->type);
724         }
725 }
726
727 void prefs_set_entry_from_escaped(PrefParam *pparam)
728 {
729         gchar **str;
730
731         cm_return_if_fail(*pparam->widget != NULL);
732
733         switch (pparam->type) {
734         case P_STRING:
735                 str = (gchar **)pparam->data;
736                 pref_set_entry_from_pref(GTK_ENTRY(*pparam->widget),
737                                    *str ? *str : "");
738                 break;
739         default:
740                 g_warning("Invalid escaped PrefType for GtkEntry widget: %d\n",
741                           pparam->type);
742         }
743 }
744
745 void prefs_set_data_from_text(PrefParam *pparam)
746 {
747         gchar **str;
748         gchar *text = NULL, *tp = NULL;
749         gchar *tmp, *tmpp;
750
751         cm_return_if_fail(*pparam->widget != NULL);
752
753         switch (pparam->type) {
754         case P_STRING:
755         case P_PASSWORD:
756                 str = (gchar **)pparam->data;
757                 g_free(*str);
758                 if (GTK_IS_EDITABLE(*pparam->widget)) {   /* need? */
759                         tp = text = gtk_editable_get_chars
760                                         (GTK_EDITABLE(*pparam->widget), 0, -1);
761                 } else if (GTK_IS_TEXT_VIEW(*pparam->widget)) {
762                         GtkTextView *textview = GTK_TEXT_VIEW(*pparam->widget);
763                         GtkTextBuffer *buffer = gtk_text_view_get_buffer(textview);
764                         GtkTextIter start, end;
765                         gtk_text_buffer_get_start_iter(buffer, &start);
766                         gtk_text_buffer_get_iter_at_offset(buffer, &end, -1);
767                         tp = text = gtk_text_buffer_get_text(buffer, &start, &end, FALSE);
768                 }
769
770                 cm_return_if_fail (tp && text);
771
772                 if (text[0] == '\0') {
773                         *str = NULL;
774                         g_free(text);
775                         break;
776                 }
777
778                 Xalloca(tmpp = tmp, strlen(text) * 2 + 1,
779                         { *str = NULL; break; });
780                 while (*tp) {
781                         if (*tp == '\n') {
782                                 *tmpp++ = '\\';
783                                 *tmpp++ = 'n';
784                                 tp++;
785                         } else
786                                 *tmpp++ = *tp++;
787                 }
788                 *tmpp = '\0';
789                 *str = g_strdup(tmp);
790                 g_free(text);
791                 break;
792         default:
793                 g_warning("Invalid PrefType for GtkText widget: %d\n",
794                           pparam->type);
795         }
796 }
797
798 void prefs_set_escaped_data_from_text(PrefParam *pparam)
799 {
800         gchar **str;
801
802         cm_return_if_fail(*pparam->widget != NULL);
803
804         switch (pparam->type) {
805         case P_STRING:
806                 str = (gchar **)pparam->data;
807                 g_free(*str);
808                 *str = pref_get_pref_from_textview(GTK_TEXT_VIEW(*pparam->widget));
809                 break;
810         default:
811                 g_warning("Invalid escaped PrefType for GtkText widget: %d\n",
812                           pparam->type);
813         }
814 }
815
816 void prefs_set_text(PrefParam *pparam)
817 {
818         gchar *buf, *sp, *bufp;
819         gchar **str;
820         GtkTextView *text;
821         GtkTextBuffer *buffer;
822         GtkTextIter iter;
823
824         cm_return_if_fail(*pparam->widget != NULL);
825
826         switch (pparam->type) {
827         case P_STRING:
828         case P_PASSWORD:
829                 str = (gchar **)pparam->data;
830                 if (*str) {
831                         bufp = buf = alloca(strlen(*str) + 1);
832                         if (!buf) buf = "";
833                         else {
834                                 sp = *str;
835                                 while (*sp) {
836                                         if (*sp == '\\' && *(sp + 1) == 'n') {
837                                                 *bufp++ = '\n';
838                                                 sp += 2;
839                                         } else
840                                                 *bufp++ = *sp++;
841                                 }
842                                 *bufp = '\0';
843                         }
844                 } else
845                         buf = "";
846
847                 text = GTK_TEXT_VIEW(*pparam->widget);
848                 buffer = gtk_text_view_get_buffer(text);
849                 gtk_text_buffer_set_text(buffer, "", -1);
850                 gtk_text_buffer_get_start_iter(buffer, &iter);
851                 gtk_text_buffer_insert(buffer, &iter, buf, -1);
852                 break;
853         default:
854                 g_warning("Invalid PrefType for GtkTextView widget: %d\n",
855                           pparam->type);
856         }
857 }
858
859 void prefs_set_text_from_escaped(PrefParam *pparam)
860 {
861         gchar **str;
862
863         cm_return_if_fail(*pparam->widget != NULL);
864
865         switch (pparam->type) {
866         case P_STRING:
867                 str = (gchar **)pparam->data;
868                 pref_set_textview_from_pref(GTK_TEXT_VIEW(*pparam->widget),
869                                  *str ? *str : "");
870                 break;
871         default:
872                 g_warning("Invalid escaped PrefType for GtkTextView widget: %d\n",
873                           pparam->type);
874         }
875 }
876
877 void prefs_set_data_from_toggle(PrefParam *pparam)
878 {
879         cm_return_if_fail(pparam->type == P_BOOL);
880         cm_return_if_fail(*pparam->widget != NULL);
881         
882         *((gboolean *)pparam->data) =
883                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(*pparam->widget));
884 }
885
886 void prefs_set_toggle(PrefParam *pparam)
887 {
888         cm_return_if_fail(pparam->type == P_BOOL);
889         cm_return_if_fail(*pparam->widget != NULL);
890
891         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(*pparam->widget),
892                                      *((gboolean *)pparam->data));
893 }
894
895 void prefs_set_data_from_spinbtn(PrefParam *pparam)
896 {
897         cm_return_if_fail(*pparam->widget != NULL);
898
899         switch (pparam->type) {
900         case P_INT:
901                 *((gint *)pparam->data) =
902                         gtk_spin_button_get_value_as_int
903                         (GTK_SPIN_BUTTON(*pparam->widget));
904                 break;
905         case P_USHORT:
906                 *((gushort *)pparam->data) =
907                         (gushort)gtk_spin_button_get_value_as_int
908                         (GTK_SPIN_BUTTON(*pparam->widget));
909                 break;
910         default:
911                 g_warning("Invalid PrefType for GtkSpinButton widget: %d\n",
912                           pparam->type);
913         }
914 }
915
916 void prefs_set_spinbtn(PrefParam *pparam)
917 {
918         cm_return_if_fail(*pparam->widget != NULL);
919
920         switch (pparam->type) {
921         case P_INT:
922                 gtk_spin_button_set_value(GTK_SPIN_BUTTON(*pparam->widget),
923                                           (gfloat)*((gint *)pparam->data));
924                 break;
925         case P_USHORT:
926                 gtk_spin_button_set_value(GTK_SPIN_BUTTON(*pparam->widget),
927                                           (gfloat)*((gushort *)pparam->data));
928                 break;
929         default:
930                 g_warning("Invalid PrefType for GtkSpinButton widget: %d\n",
931                           pparam->type);
932         }
933 }
934
935 static GSList *prefs_pages = NULL;
936
937 void prefs_gtk_open(void)
938 {
939         prefswindow_open(_("Preferences"), prefs_pages, NULL,
940                         &prefs_common.prefswin_width, &prefs_common.prefswin_height,
941                         NULL, NULL);
942 }
943
944 void prefs_gtk_register_page(PrefsPage *page)
945 {
946         prefs_pages = g_slist_append(prefs_pages, page);
947 }
948
949 void prefs_gtk_unregister_page(PrefsPage *page)
950 {
951         prefs_pages = g_slist_remove(prefs_pages, page);
952 }
953
954 static void prefs_destroy_whole_cache(gpointer to_free)
955 {       
956         GHashTable *table = (GHashTable *)to_free;
957         g_hash_table_destroy(table);
958 }
959
960 static void prefs_destroy_file_cache(gpointer to_free)
961 {       
962         GHashTable *table = (GHashTable *)to_free;
963         g_hash_table_destroy(table);
964 }
965
966 static int prefs_cache_sections(GHashTable *file_cache, const gchar *rcfile)
967 {
968         FILE *fp = NULL;
969         gchar buf[PREFSBUFSIZE];
970         GHashTable *section_cache = NULL;
971
972         if (rcfile)
973                 fp = g_fopen(rcfile, "rb");
974         if (!fp) {
975                 debug_print("cache: %s: %s\n", rcfile?rcfile:"(null)", strerror(errno));
976                 return -1;
977         }
978         
979 #ifdef HAVE_FGETS_UNLOCKED
980         flockfile(fp);
981 #endif
982         
983         while (SC_FGETS(buf, sizeof(buf), fp) != NULL) {
984                 strretchomp(buf);
985                 if (buf[0] == '\0')
986                         continue;
987                 if (buf[0] == '#')
988                         continue; /* comment */
989                 if (buf[0] == '[') { /* new section */
990                         gchar *blockname = g_strdup(buf+1);
991
992                         if (strrchr(blockname, ']'))
993                                 *strrchr(blockname, ']') = '\0';
994
995                         if ((section_cache = g_hash_table_lookup(file_cache, blockname)) == NULL) {
996                                 debug_print("new section '%s'\n", blockname);
997                                 section_cache = g_hash_table_new_full(g_str_hash, g_str_equal,
998                                                 g_free, NULL);
999                                 g_hash_table_insert(file_cache, 
1000                                         blockname, section_cache);
1001                         } else {
1002                                 debug_print("section '%s' already done\n", blockname);
1003                                 g_free(blockname);
1004                                 section_cache = NULL;
1005                                 continue;
1006                         }
1007                 } else {
1008                         if (!section_cache) {
1009                                 debug_print("skipping stuff %s with no section\n", buf);
1010                                 continue;
1011                         } else {
1012                                 gchar *pref;
1013                                 
1014                                 if (!strchr(buf, '=')) {
1015                                         /* plugins do differently */
1016                                         continue;
1017                                 }
1018                                 pref = g_strdup(buf);
1019                                 
1020                                 //debug_print("new pref '%s'\n", pref);
1021                                 g_hash_table_insert(section_cache, pref, GINT_TO_POINTER(1));
1022                         }
1023                 }
1024         }
1025 #ifdef HAVE_FGETS_UNLOCKED
1026         funlockfile(fp);
1027 #endif
1028         fclose(fp);
1029         return 0;
1030 }
1031
1032 static int prefs_cache(const gchar *rcfile)
1033 {
1034         GHashTable *file_cache = g_hash_table_new_full(g_str_hash, g_str_equal, 
1035                                         g_free, prefs_destroy_file_cache);
1036         
1037         debug_print("new file '%s'\n", rcfile?rcfile:"(null)");
1038         g_hash_table_insert(whole_cache, g_strdup(rcfile), file_cache);
1039         
1040         return prefs_cache_sections(file_cache, rcfile);
1041 }
1042
1043 void prefs_prepare_cache(void)
1044 {
1045         gchar *clawsrc = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, COMMON_RC, NULL);
1046         gchar *folderitemrc = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, FOLDERITEM_RC, NULL);
1047         gchar *accountrc = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, ACCOUNT_RC, NULL);
1048         
1049         if (whole_cache == NULL) {
1050                 whole_cache = g_hash_table_new_full(g_str_hash, g_str_equal,
1051                                 g_free, prefs_destroy_whole_cache);
1052         } else {
1053                 debug_print("already cached\n");
1054                 g_free(clawsrc);
1055                 g_free(folderitemrc);
1056                 g_free(accountrc);
1057                 return;
1058         }
1059         if (prefs_cache(clawsrc) < 0 ||
1060             prefs_cache(folderitemrc) < 0 ||
1061             prefs_cache(accountrc) < 0)
1062                 prefs_destroy_cache();
1063
1064         g_free(clawsrc);
1065         g_free(folderitemrc);
1066         g_free(accountrc);
1067 }
1068
1069 void prefs_destroy_cache(void)
1070 {
1071         if (!whole_cache) {
1072                 debug_print("no cache\n");
1073                 return;
1074         }
1075         debug_print("destroying cache\n");
1076         g_hash_table_destroy(whole_cache);
1077         whole_cache = NULL;
1078         return;
1079 }
1080
1081 static void prefs_parse_cache(gpointer key, gpointer value, gpointer user_data)
1082 {
1083         gchar *pref = (gchar *)key;
1084
1085         PrefParam *param = (PrefParam *)user_data;
1086         
1087         prefs_config_parse_one_line(param, pref);
1088 }
1089
1090 static gboolean prefs_read_config_from_cache(PrefParam *param, const gchar *label,
1091                                const gchar *rcfile) 
1092 {
1093         GHashTable *sections_table = NULL;
1094         GHashTable *values_table = NULL;
1095         sections_table = g_hash_table_lookup(whole_cache, rcfile);
1096         
1097         if (sections_table == NULL) {
1098                 g_warning("Can't find %s in the whole cache\n", rcfile?rcfile:"(null)");
1099                 return FALSE;
1100         }
1101         values_table = g_hash_table_lookup(sections_table, label);
1102         
1103         if (values_table == NULL) {
1104                 debug_print("no '%s' section in '%s' cache\n", label?label:"(null)", rcfile?rcfile:"(null)");
1105                 return TRUE;
1106         }
1107         g_hash_table_foreach(values_table, prefs_parse_cache, param);
1108         return TRUE;
1109 }