"Master password" is now called "master passphrase".
[claws.git] / src / prefs_themes.c
1 /*
2  * Claws Mail -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 2003-2015 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 #ifdef HAVE_CONFIG_H
20 #  include <config.h>
21 #endif
22
23 #include "defs.h"
24
25 #include <stdio.h>
26 #include <stdlib.h>
27 #include <string.h>
28 #include <sys/stat.h>
29
30 #include <glib.h>
31 #include <glib/gi18n.h>
32 #include <gtk/gtk.h>
33
34 #include "utils.h"
35 #include "codeconv.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
43 #include "stock_pixmap.h"
44 #include "mainwindow.h"
45 #include "compose.h"
46 #include "alertpanel.h"
47 #include "addr_compl.h"
48
49 #define IS_CURRENT_THEME(path)  (strcmp(prefs_common.pixmap_theme_path, path) == 0)
50 #define IS_INTERNAL_THEME(path) (strcmp(DEFAULT_PIXMAP_THEME, path) == 0)
51 #define IS_SYSTEM_THEME(path)   (prefs_themes_is_system_theme(path))
52
53 #define PREVIEW_ICONS 7
54
55 typedef struct _ThemesPage
56 {
57         PrefsPage page;
58
59         GtkWidget *window;              /* do not modify */
60
61         GtkWidget *op_menu;
62         GtkWidget *btn_install;
63         GtkWidget *btn_more;
64         GtkWidget *global;
65
66         GtkWidget *name;
67         GtkWidget *author;
68         GtkWidget *url;
69         GtkWidget *status;
70
71         GtkWidget *icons[PREVIEW_ICONS];
72
73         GtkWidget *btn_remove;
74
75         GdkPixbuf *pixbufs[PREVIEW_ICONS];
76 } ThemesPage;
77
78 typedef struct _ThemeInfo
79 {
80         gchar *name;
81         gchar *author;
82         gchar *url;
83         gchar *status;
84 } ThemeInfo;
85
86 typedef struct _ThemeName
87 {
88         gchar *name;
89         GList *item;
90 } ThemeName;
91
92 typedef struct _ThemesData
93 {
94         GList      *themes;
95         GList      *names;
96         gchar      *displayed;
97         ThemesPage *page;
98 } ThemesData;
99
100 typedef void (*FileFunc) (const gchar *filename, gpointer data);
101
102 typedef struct _DirInfo {
103         gint bytes;
104         gint files;
105         gint pixms;
106 } DirInfo;
107
108 typedef struct _CopyInfo {
109         gchar *dest;
110         gchar *status;
111 } CopyInfo;
112
113 static ThemesData *prefs_themes_data;
114
115 StockPixmap prefs_themes_icons[PREVIEW_ICONS] = { 
116         STOCK_PIXMAP_DIR_CLOSE,
117         STOCK_PIXMAP_MAIL_SEND,
118         STOCK_PIXMAP_MAIL_RECEIVE, 
119         STOCK_PIXMAP_MAIL_ATTACH,
120         STOCK_PIXMAP_BOOK, 
121         STOCK_PIXMAP_MIME_TEXT_PLAIN, 
122         STOCK_PIXMAP_REPLIED
123 };
124
125
126
127 static void prefs_themes_btn_remove_clicked_cb  (GtkWidget *widget, gpointer data);
128 static void prefs_themes_btn_install_clicked_cb (GtkWidget *widget, gpointer data);
129 static void prefs_themes_menu_item_activated_cb (GtkWidget *widget, gpointer data);
130
131 static void prefs_themes_update_buttons         (const ThemesData *tdata);
132 static void prefs_themes_display_global_stats   (const ThemesData *tdata);
133 static void prefs_themes_get_theme_info         (ThemesData *tdata);
134 static void prefs_themes_display_theme_info     (ThemesData *tdata, const ThemeInfo *info);
135 static void prefs_themes_get_themes_and_names   (ThemesData *tdata);
136 static int prefs_themes_cmp_name(gconstpointer a, gconstpointer b);
137 static void prefs_themes_free_names             (ThemesData *tdata);
138
139 static void prefs_themes_set_themes_menu        (GtkComboBox *combo, const ThemesData *tdata);
140
141 static gchar *prefs_themes_get_theme_stats      (const gchar *dirname);
142 static gboolean prefs_themes_is_system_theme    (const gchar *dirname);
143
144 static void prefs_themes_create_widget          (PrefsPage *page, GtkWindow *window, gpointer data);
145 static void prefs_themes_destroy_widget         (PrefsPage *page);
146 static void prefs_themes_save                   (PrefsPage *page);
147
148 static void prefs_themes_foreach_file           (const gchar *dirname, const FileFunc func, gpointer data);
149 static void prefs_themes_file_stats             (const gchar *filename, gpointer data);
150 static void prefs_themes_file_remove            (const gchar *filename, gpointer data);
151 static void prefs_themes_file_install           (const gchar *filename, gpointer data);
152
153
154
155 static void prefs_themes_file_stats(const gchar *filename, gpointer data)
156 {
157         GStatBuf s;
158         DirInfo *di = (DirInfo *)data;
159         gint len;
160
161         if (0 == g_stat(filename, &s) && 0 != S_ISREG(s.st_mode)) {
162                 di->bytes += s.st_size;
163                 di->files++;
164                 len = strlen(filename);
165                 if (len > 4) {
166                         const gchar *extension = filename+(len-4);
167                         if (!strcmp(extension, ".xpm"))
168                                 di->pixms++;
169                         else if (!strcmp(extension, ".png"))
170                                 di->pixms++;
171                 }
172         }
173 }
174         
175 static void prefs_themes_file_remove(const gchar *filename, gpointer data)
176 {
177         gchar **status = (gchar **)data;
178         gchar *base;
179
180         if ((*status) != NULL)
181                 return;
182
183         base = g_path_get_basename(filename);
184         if (TRUE == is_dir_exist(filename)) {
185                 if (strcmp(base, ".") != 0 && strcmp(base, "..") != 0)
186                         g_warning("prefs_themes_file_remove(): subdir in theme dir skipped: '%s'.",
187                                                 base);
188         }
189         else if (0 != claws_unlink(filename)) {
190                 (*status) = g_strdup(filename);
191         }
192         g_free(base);
193 }
194
195 static void prefs_themes_file_install(const gchar *filename, gpointer data)
196 {
197         CopyInfo *ci = (CopyInfo *)data;
198         gchar *base;
199
200         if (ci->status != NULL)
201                 return;
202
203         base = g_path_get_basename(filename);
204         if (TRUE == is_dir_exist(filename)) {
205                 if (strcmp(base, ".") != 0 && strcmp(base, "..") !=0 )
206                         g_warning("prefs_themes_file_install(): subdir in theme dir skipped: '%s'.",
207                                                 base);
208         }
209         else {
210                 gchar *fulldest;
211
212                 fulldest = g_strconcat(ci->dest, G_DIR_SEPARATOR_S, base, NULL);
213
214                 if (0 != copy_file(filename, fulldest, FALSE)) {
215                         ci->status = g_strdup(filename);
216                 }
217                 g_free(fulldest);
218         }
219         g_free(base);
220 }
221
222 static void prefs_themes_foreach_file(const gchar *dirname, const FileFunc func, gpointer data)
223 {
224         const gchar *entry;
225         gchar *fullentry;
226         GDir *dp;
227         GError *error = NULL;
228
229         cm_return_if_fail(dirname != NULL);
230         cm_return_if_fail(func != NULL);
231
232         if ((dp = g_dir_open(dirname, 0, &error)) == NULL) {
233                 debug_print("couldn't open dir '%s': %s (%d)\n", dirname,
234                                 error->message, error->code);
235                 g_error_free(error);
236                 return;
237         }
238
239         while ((entry = g_dir_read_name(dp)) != NULL) {
240
241                 fullentry = g_strconcat(dirname, G_DIR_SEPARATOR_S, entry, NULL);
242
243                 (*func)(fullentry, data);
244
245                 g_free(fullentry);
246         }
247         g_dir_close(dp);
248 }
249
250 static gboolean prefs_themes_is_system_theme(const gchar *dirname)
251 {
252         gint len;
253         gchar *system_theme_dir;
254         gboolean is_sys = FALSE;
255
256         cm_return_val_if_fail(dirname != NULL, FALSE);
257
258         system_theme_dir = stock_pixmap_get_system_theme_dir_for_theme(NULL);
259         len = strlen(system_theme_dir);
260         if (strlen(dirname) > len && 0 == strncmp(dirname, system_theme_dir, len))
261                 is_sys = TRUE;
262
263         g_free(system_theme_dir);
264
265         return is_sys;
266 }
267
268 static void prefs_themes_set_themes_menu(GtkComboBox *combo, const ThemesData *tdata)
269 {
270         GtkListStore *store;
271         GtkTreeIter iter;
272         GList     *themes = tdata->names;
273         gint       i = 0, active = 0;
274         GList     *sorted_list = NULL;
275
276         cm_return_if_fail(combo != NULL);
277
278         /* sort theme data list by data name */
279         while (themes != NULL) {
280                 ThemeName *tname = (ThemeName *)(themes->data);
281
282                 sorted_list = g_list_insert_sorted(sorted_list, (gpointer)(tname),
283                                                    (GCompareFunc)prefs_themes_cmp_name);
284
285                 themes = g_list_next(themes);
286         }
287
288         store = gtk_list_store_new(2, G_TYPE_STRING, G_TYPE_POINTER);
289
290         /* feed gtk_menu w/ sorted themes names */
291         themes = sorted_list;
292         while (themes != NULL) {
293                 ThemeName *tname = (ThemeName *)(themes->data);
294                 gchar     *tpath = (gchar *)(tname->item->data);
295
296                 gtk_list_store_append(store, &iter);
297                 gtk_list_store_set(store, &iter,
298                                    0, tname->name,
299                                    1, tname->item->data, -1);
300
301                 if (tdata->displayed != NULL && !strcmp2(tdata->displayed,tpath))
302                         active = i;
303                 ++i;
304
305                 themes = g_list_next(themes);
306         }
307
308         g_list_free(sorted_list);
309
310         g_signal_connect(G_OBJECT(combo), "changed",
311                          G_CALLBACK(prefs_themes_menu_item_activated_cb),
312                          NULL);
313
314         gtk_combo_box_set_model(combo, GTK_TREE_MODEL(store));
315         gtk_combo_box_set_active(combo, active);
316 }
317
318 static int prefs_themes_cmp_name(gconstpointer a_p, gconstpointer b_p)
319 {
320         /* compare two ThemeData structures by their name attribute */
321         return strcmp2((gchar *)(((ThemeName*)a_p)->name),
322                                         (gchar *)(((ThemeName*)b_p)->name));
323 }
324
325 static void prefs_themes_get_themes_and_names(ThemesData *tdata)
326 {
327         GList *tpaths;
328
329         cm_return_if_fail(tdata != NULL);
330
331         if (tdata->themes != NULL)
332                 stock_pixmap_themes_list_free(tdata->themes);
333         if (tdata->names != NULL)
334                 prefs_themes_free_names(tdata);
335
336         tdata->themes = stock_pixmap_themes_list_new();
337
338         tpaths = tdata->themes;
339         while (tpaths != NULL) {
340                 ThemeName *name = g_new0(ThemeName, 1);
341                 gchar *sname = g_path_get_basename((const gchar *)(tpaths->data));
342
343                 if (IS_INTERNAL_THEME(sname))
344                         name->name = g_strdup(_("Default internal theme"));
345                 else
346                         name->name = g_strdup(sname);
347                 name->item = tpaths;
348
349                 tdata->names = g_list_append(tdata->names, name);
350                 if (!strcmp2(tpaths->data, prefs_common.pixmap_theme_path)) {
351                         tdata->displayed = (gchar *)tpaths->data;
352                 }
353                 tpaths = g_list_next(tpaths);
354                 g_free(sname);  
355         }
356 }
357
358 void prefs_themes_init(void)
359 {
360         ThemesData   *tdata;
361         ThemesPage   *page;
362         GList        *tpaths;
363         static gchar *path[3];
364
365         path[0] = _("Display");
366         path[1] = _("Themes");
367         path[2] = NULL;
368
369         debug_print("Creating preferences for themes...\n");
370
371         tdata = g_new0(ThemesData, 1);
372         prefs_themes_data = tdata;
373
374         prefs_themes_get_themes_and_names(tdata);
375
376         page = g_new0(ThemesPage, 1);
377
378         page->page.path = path;
379         page->page.create_widget = prefs_themes_create_widget;
380         page->page.destroy_widget = prefs_themes_destroy_widget;
381         page->page.save_page = prefs_themes_save;
382         page->page.weight = 130.0;
383         prefs_gtk_register_page((PrefsPage *) page);
384
385         tdata->page = page;
386
387         tpaths = g_list_first(tdata->themes);
388         if (tdata->displayed == NULL)
389                 tdata->displayed = (gchar *)(tpaths->data);
390 }
391
392 static void prefs_themes_free_names(ThemesData *tdata)
393 {
394         GList *names;
395
396         names = tdata->names;
397         while (names != NULL) {
398                 ThemeName *tn = (ThemeName *)(names->data);
399
400                 tn->item = NULL;
401                 g_free(tn->name);
402                 g_free(tn);
403
404                 names = g_list_next(names);
405         }
406         g_list_free(tdata->names);
407         tdata->names = NULL;
408 }
409
410 void prefs_themes_done(void)
411 {
412         ThemesData *tdata = prefs_themes_data;
413
414         debug_print("Finished preferences for themes.\n");
415
416         stock_pixmap_themes_list_free(tdata->themes);
417         prefs_themes_free_names(tdata); 
418         g_free(tdata->page);
419         g_free(tdata);
420 }
421
422 static void prefs_themes_btn_remove_clicked_cb(GtkWidget *widget, gpointer data)
423 {
424         ThemesData *tdata = prefs_themes_data;
425         gchar      *theme_str;
426         gchar      *alert_title = NULL;
427         AlertValue  val = 0;
428         gchar      *tmp = NULL;
429
430         theme_str = tdata->displayed;
431
432         tmp = g_path_get_basename(theme_str);
433
434         if (IS_SYSTEM_THEME(theme_str)) {
435                 if (!superuser_p()) {
436                         alertpanel_error(_("Only root can remove system themes"));
437                         return;
438                 }
439                 alert_title = g_strdup_printf(_("Remove system theme '%s'"), tmp);
440         }
441         if (NULL == alert_title) {
442                 alert_title = g_strdup_printf(_("Remove theme '%s'"), tmp);
443         }
444
445         g_free(tmp);
446
447         val = alertpanel(alert_title,
448                          _("Are you sure you want to remove this theme?"),
449                          GTK_STOCK_NO, GTK_STOCK_YES, NULL);
450         g_free(alert_title);
451
452         if (G_ALERTALTERNATE == val) {
453                 gchar *status = NULL;
454
455                 prefs_themes_foreach_file(theme_str, prefs_themes_file_remove, &status); 
456                 if (0 != rmdir(theme_str)) {
457                         if (status != NULL) {
458                                 alertpanel_error(_("File %s failed\nwhile removing theme."), status);
459                                 g_free(status);
460                         }
461                         else
462                                 alertpanel_error(_("Removing theme directory failed."));
463                 }
464                 else {  
465                         alertpanel_notice(_("Theme removed successfully"));
466                         /* update interface back to first theme */
467                         prefs_themes_get_themes_and_names(tdata);
468                         prefs_themes_set_themes_menu(GTK_COMBO_BOX(tdata->page->op_menu), tdata);
469                         prefs_themes_display_global_stats(tdata);
470                         tdata->displayed = (gchar *)((g_list_first(tdata->themes))->data);
471                         prefs_themes_get_theme_info(tdata);
472                 }
473         }
474 }
475
476 static void prefs_themes_btn_install_clicked_cb(GtkWidget *widget, gpointer data)
477 {
478         gchar      *filename, *source;
479         gchar      *themeinfo, *themename;
480         gchar      *alert_title = NULL;
481         CopyInfo   *cinfo;
482         AlertValue  val = 0;
483         ThemesData *tdata = prefs_themes_data;
484
485         filename = filesel_select_file_open_folder(_("Select theme folder"), NULL);
486         if (filename == NULL) 
487                 return;
488
489         if (filename[strlen(filename) - 1] != G_DIR_SEPARATOR)
490                 filename = g_strconcat(filename, G_DIR_SEPARATOR_S, NULL);
491         else
492                 filename = g_strdup(filename);
493
494         cinfo = g_new0(CopyInfo, 1);
495         source = g_path_get_dirname(filename);
496         themename = g_path_get_basename(source);
497         debug_print("Installing '%s' theme from %s\n", themename, filename);
498
499         themeinfo = g_strconcat(source, G_DIR_SEPARATOR_S, THEMEINFO_FILE, NULL);
500         alert_title = g_strdup_printf(_("Install theme '%s'"), themename);
501         if (file_exist(themeinfo, FALSE) == FALSE) {
502                 val = alertpanel(alert_title,
503                                  _("This folder doesn't seem to be a theme folder.\nInstall anyway?"),
504                                  GTK_STOCK_NO, GTK_STOCK_YES, NULL);
505                 if (G_ALERTALTERNATE != val)
506                         goto end_inst;
507         }
508         if (superuser_p ()) {
509                 val = alertpanel(alert_title,
510                                  _("Do you want to install theme for all users?"),
511                                  GTK_STOCK_NO, GTK_STOCK_YES, NULL);
512                 switch (val) {
513                 case G_ALERTALTERNATE:
514                         cinfo->dest = stock_pixmap_get_system_theme_dir_for_theme(
515                                                 themename);
516                         break;
517                 case G_ALERTDEFAULT:
518                         break;
519                 default:
520                         goto end_inst;
521                 }
522         }
523         g_free(alert_title);
524         if (cinfo->dest == NULL) {
525                 cinfo->dest = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
526                                           PIXMAP_THEME_DIR, G_DIR_SEPARATOR_S,
527                                           themename, NULL);
528         }
529         if (TRUE == is_dir_exist(cinfo->dest)) {
530                 AlertValue val = alertpanel_full(_("Theme exists"),
531                                 _("A theme with the same name is\nalready installed in this location.\n\n"
532                                   "Do you want to replace it?"),
533                                 GTK_STOCK_CANCEL, _("Overwrite"), NULL, FALSE,
534                                 NULL, ALERT_WARNING, G_ALERTDEFAULT);
535                 if (val == G_ALERTALTERNATE) {
536                         if (remove_dir_recursive(cinfo->dest) < 0) {
537                                 alertpanel_error(_("Couldn't delete the old theme in %s."), cinfo->dest);
538                                 goto end_inst;
539                         }
540                 } else {
541                         goto end_inst;
542                 }
543         }
544         if (0 != make_dir_hier(cinfo->dest)) {
545                 alertpanel_error(_("Couldn't create destination directory %s."), cinfo->dest);
546                 goto end_inst;
547         }
548         prefs_themes_foreach_file(source, prefs_themes_file_install, cinfo);
549         if (cinfo->status == NULL) {
550                 GList *insted;
551
552                 /* update interface to show newly installed theme */
553                 prefs_themes_get_themes_and_names(tdata);
554                 insted = g_list_find_custom(tdata->themes, 
555                                             (gpointer)(cinfo->dest), 
556                                             (GCompareFunc)strcmp2);
557                 if (NULL != insted) {
558                         alertpanel_notice(_("Theme installed successfully."));
559                         tdata->displayed = (gchar *)(insted->data);
560                         prefs_themes_set_themes_menu(GTK_COMBO_BOX(tdata->page->op_menu), tdata);
561                         prefs_themes_display_global_stats(tdata);
562                         prefs_themes_get_theme_info(tdata);
563                 }
564                 else
565                         alertpanel_error(_("Failed installing theme"));
566         }
567         else
568                 alertpanel_error(_("File %s failed\nwhile installing theme."), cinfo->status);
569 end_inst:
570         g_free(cinfo->dest);
571         g_free(filename);
572         g_free(source);
573         g_free(themeinfo);
574         g_free(cinfo);
575         g_free(themename);
576 }
577
578 static void prefs_themes_menu_item_activated_cb(GtkWidget *widget, gpointer data)
579 {
580         ThemesData *tdata = prefs_themes_data;
581         gchar      *path;
582         GtkTreeModel *model;
583         GtkTreeIter iter;
584
585         cm_return_if_fail(gtk_combo_box_get_active_iter(GTK_COMBO_BOX(widget), &iter));
586
587         model = gtk_combo_box_get_model(GTK_COMBO_BOX(widget));
588         gtk_tree_model_get(model, &iter, 1, &path, -1);
589
590         tdata->displayed = path;
591         prefs_themes_get_theme_info(tdata);
592 }
593
594 static void prefs_themes_update_buttons(const ThemesData *tdata)
595 {
596         ThemesPage *theme = tdata->page;
597         gboolean    can_rem, can_use;
598
599         can_use = !IS_CURRENT_THEME(tdata->displayed);
600         can_rem = can_use && !IS_INTERNAL_THEME(tdata->displayed);
601
602         if (theme->btn_remove != NULL)
603                 gtk_widget_set_sensitive(theme->btn_remove, can_rem);
604 }
605
606 /* placeholders may already be utf8 (i18n) */
607 #define SET_LABEL_TEXT_UTF8(label, text)                                \
608 {                                                                       \
609         gchar *tmpstr;                                                  \
610                                                                         \
611         if (!g_utf8_validate(text, -1, NULL))                           \
612                 tmpstr = conv_codeset_strdup(text,                      \
613                         conv_get_locale_charset_str(),  CS_UTF_8);      \
614         else                                                            \
615                 tmpstr = g_strdup(text);                                \
616                                                                         \
617         gtk_label_set_text(GTK_LABEL(label), tmpstr);                   \
618         gtk_label_set_selectable(GTK_LABEL(label), TRUE);               \
619         g_free(tmpstr);                                                 \
620 }
621 static void prefs_themes_display_theme_info(ThemesData *tdata, const ThemeInfo *info)
622 {
623         ThemesPage *theme = tdata->page;
624         gchar *save_prefs_path;
625         gint   i;
626
627         SET_LABEL_TEXT_UTF8(theme->name,        info->name);
628         SET_LABEL_TEXT_UTF8(theme->author,      info->author);
629         SET_LABEL_TEXT_UTF8(theme->url,         info->url);
630         SET_LABEL_TEXT_UTF8(theme->status,      info->status);
631
632         save_prefs_path = prefs_common.pixmap_theme_path;
633         prefs_common.pixmap_theme_path = tdata->displayed;
634         for (i = 0; i < PREVIEW_ICONS; ++i) {
635                 stock_pixbuf_gdk(theme->window, prefs_themes_icons[i], 
636                                 &(theme->pixbufs[i]));
637                 gtk_image_set_from_pixbuf(GTK_IMAGE(theme->icons[i]),
638                                 theme->pixbufs[i]);
639         }
640         prefs_common.pixmap_theme_path = save_prefs_path;
641
642         prefs_themes_update_buttons(tdata);
643 }
644 #undef SET_LABEL_TEXT_UTF8
645
646 static void prefs_themes_display_global_stats(const ThemesData *tdata)
647 {
648         ThemesPage *theme = tdata->page;
649         GList      *tnames = tdata->names;
650         gchar      *gstats;
651         gint        sys = 0;
652         gint        usr = 0;
653         gint        all = 0;
654
655         while (tnames != NULL) {
656                 ThemeName *tname = (ThemeName *)(tnames->data);
657                 gchar     *tpath = (gchar *)(tname->item->data);
658                 
659                 if (IS_SYSTEM_THEME(tpath)) 
660                         ++sys;
661                 else if (!IS_INTERNAL_THEME(tpath)) 
662                         ++usr;
663                 ++all;
664                 tnames = g_list_next(tnames);
665         }
666
667         gstats = g_strdup_printf(_("%d themes available (%d user, %d system, 1 internal)"),
668                                  all, usr, sys);
669         gtk_label_set_text(GTK_LABEL(theme->global), gstats);
670         gtk_label_set_justify (GTK_LABEL (theme->global), GTK_JUSTIFY_LEFT);
671         gtkut_widget_set_small_font_size (theme->global);
672         g_free(gstats);
673 }
674
675 #define INFOFILE_LINE_LEN 80
676
677 #define FGETS_INFOFILE_LINE() \
678         line[0] = '\0'; \
679         if (fgets(line, INFOFILE_LINE_LEN, finfo) != NULL && (len = strlen(line)) > 0) { \
680                 if (line[len - 1] == '\n') line[len - 1] = '\0'; \
681         } \
682         else { \
683                 g_strlcpy(line, _("Unknown"),sizeof(line)); \
684         }
685
686 static void prefs_themes_get_theme_info(ThemesData *tdata)
687 {
688         FILE  *finfo;
689         gchar *sinfo;
690         gchar *path;
691         gchar  line[INFOFILE_LINE_LEN];
692         gint   len;
693         ThemeInfo *info;
694         ThemesPage *theme = tdata->page;
695
696         cm_return_if_fail(theme != NULL);
697         path = tdata->displayed;
698         cm_return_if_fail(path != NULL);
699
700         debug_print("Getting theme info for %s\n", path);
701
702         info = g_new0(ThemeInfo, 1);
703
704         if (IS_INTERNAL_THEME(path)) {
705                 info->name = g_strdup(_("Default internal theme"));
706                 info->author = g_strdup(_("The Claws Mail Team"));
707                 info->url = g_strdup(HOMEPAGE_URI);
708                 info->status = g_strdup_printf(_("Internal theme has %d icons"), N_STOCK_PIXMAPS);
709         }
710         else {
711                 sinfo = g_strconcat(path, G_DIR_SEPARATOR_S, THEMEINFO_FILE, NULL);
712                 finfo = g_fopen(sinfo, "r");
713                 if (finfo == NULL) {
714                         info->name = g_strdup(_("No info file available for this theme"));
715                         info->author = g_strdup(_("Unknown"));
716                         info->url = g_strdup(_("Unknown"));
717                 }
718                 else {
719                         FGETS_INFOFILE_LINE()
720                         info->name = g_strdup(line);
721                         FGETS_INFOFILE_LINE()
722                         info->author = g_strdup(line);
723                         FGETS_INFOFILE_LINE()
724                         info->url = g_strdup(line);
725                 
726                         fclose(finfo);
727                 }
728                 g_free(sinfo);
729
730                 info->status = prefs_themes_get_theme_stats(path);
731                 if (info->status == NULL) {
732                         info->status = g_strdup(_("Error: couldn't get theme status"));
733                 }
734         }
735
736         prefs_themes_display_theme_info(tdata, info);
737
738         g_free(info->name);
739         g_free(info->author);
740         g_free(info->url);
741         g_free(info->status);
742
743         g_free(info);
744 }
745
746 #undef FGETS_INFOFILE_LINE
747
748 static gchar *prefs_themes_get_theme_stats(const gchar *dirname)
749 {
750         gchar   *stats;
751         DirInfo *dinfo;
752
753         dinfo = g_new0(DirInfo, 1);
754         
755         prefs_themes_foreach_file(dirname, prefs_themes_file_stats, dinfo);
756         stats = g_strdup_printf(_("%d files (%d icons), size: %s"), 
757                                 dinfo->files, dinfo->pixms, to_human_readable((goffset)dinfo->bytes));
758         
759         g_free(dinfo);
760         return stats;
761 }
762
763 static void prefs_themes_create_widget(PrefsPage *page, GtkWindow *window, gpointer data)
764 {
765         ThemesPage *prefs_themes = (ThemesPage *)page;
766         ThemesData *tdata = prefs_themes_data;
767
768         GtkWidget *vbox1;
769         GtkWidget *frame1;
770         GtkWidget *vbox2;
771         GtkWidget *hbox3;
772         GtkWidget *menu_themes;
773         GtkWidget *btn_install;
774         GtkWidget *btn_more;
775         GtkWidget *label_global_status;
776         GtkWidget *frame_info;
777         GtkWidget *table1;
778         GtkWidget *label1;
779         GtkWidget *label2;
780         GtkWidget *label3;
781         GtkWidget *label_name;
782         GtkWidget *label_author;
783         GtkWidget *label_url;
784         GtkWidget *label4;
785         GtkWidget *label_status;
786         GtkWidget *frame_preview;
787         GtkWidget *hbox1;
788         GtkWidget *icon_1;
789         GtkWidget *icon_2;
790         GtkWidget *icon_3;
791         GtkWidget *icon_4;
792         GtkWidget *icon_5;
793         GtkWidget *icon_6;
794         GtkWidget *icon_7;
795         GtkWidget *frame_buttons;
796         GtkWidget *hbuttonbox1;
797         GtkWidget *btn_remove;
798         GtkCellRenderer *renderer;
799
800         vbox1 = gtk_vbox_new (FALSE, VSPACING);
801         gtk_container_set_border_width (GTK_CONTAINER (vbox1), VBOX_BORDER);
802         gtk_widget_show (vbox1);
803
804         vbox2 = gtkut_get_options_frame(vbox1, &frame1, _("Selector"));
805
806         hbox3 = gtk_hbox_new (FALSE, 5);
807         gtk_widget_show (hbox3);
808         gtk_box_pack_start (GTK_BOX (vbox2), hbox3, FALSE, FALSE, 0);
809         gtk_container_set_border_width (GTK_CONTAINER (hbox3), 5);
810
811         menu_themes = gtk_combo_box_new();
812         gtk_widget_show (menu_themes);
813         gtk_box_pack_start (GTK_BOX (hbox3), menu_themes, FALSE, FALSE, 0);
814
815         btn_install = gtk_button_new_with_label (_("Install new..."));
816         gtk_widget_show (btn_install);
817         gtk_box_pack_start (GTK_BOX (hbox3), btn_install, FALSE, FALSE, 0);
818         gtkut_widget_set_can_default (btn_install, TRUE);
819
820         btn_more = gtkut_get_link_btn((GtkWidget *)window, THEMES_URI, _("Get more..."));
821         gtk_widget_show (btn_more);
822         gtk_box_pack_start (GTK_BOX (hbox3), btn_more, FALSE, FALSE, 0);
823
824         label_global_status = gtk_label_new ("");
825         gtk_widget_show (label_global_status);
826         gtk_box_pack_start (GTK_BOX (vbox2), label_global_status, FALSE, FALSE, 0);
827         gtk_label_set_justify (GTK_LABEL (label_global_status), GTK_JUSTIFY_LEFT);
828         gtk_misc_set_alignment (GTK_MISC (label_global_status), 0, 0.5);
829         gtk_misc_set_padding (GTK_MISC (label_global_status), 6, 0);
830
831         PACK_FRAME(vbox1, frame_info, _("Information"));
832
833         table1 = gtk_table_new (4, 2, FALSE);
834         gtk_widget_show (table1);
835         gtk_container_add (GTK_CONTAINER (frame_info), table1);
836
837         label1 = gtk_label_new (_("Name: "));
838         gtk_widget_show (label1);
839         gtk_table_attach (GTK_TABLE (table1), label1, 0, 1, 0, 1,
840                         (GtkAttachOptions) (GTK_FILL),
841                         (GtkAttachOptions) (0), 8, 2);
842         gtk_label_set_justify (GTK_LABEL (label1), GTK_JUSTIFY_LEFT);
843         gtk_misc_set_alignment (GTK_MISC (label1), 0, 0.5);
844
845         label2 = gtk_label_new (_("Author: "));
846         gtk_widget_show (label2);
847         gtk_table_attach (GTK_TABLE (table1), label2, 0, 1, 1, 2,
848                         (GtkAttachOptions) (GTK_FILL),
849                         (GtkAttachOptions) (0), 8, 2);
850         gtk_label_set_justify (GTK_LABEL (label2), GTK_JUSTIFY_LEFT);
851         gtk_misc_set_alignment (GTK_MISC (label2), 0, 0.5);
852
853         label3 = gtk_label_new (_("URL:"));
854         gtk_widget_show (label3);
855         gtk_table_attach (GTK_TABLE (table1), label3, 0, 1, 2, 3,
856                         (GtkAttachOptions) (GTK_FILL),
857                         (GtkAttachOptions) (0), 8, 2);
858         gtk_misc_set_alignment (GTK_MISC (label3), 0, 0.5);
859
860         label_name = gtk_label_new ("");
861         gtk_widget_show (label_name);
862         gtk_table_attach (GTK_TABLE (table1), label_name, 1, 2, 0, 1,
863                         (GtkAttachOptions) (GTK_EXPAND | GTK_FILL),
864                         (GtkAttachOptions) (0), 0, 0);
865         gtk_misc_set_alignment (GTK_MISC (label_name), 0, 0.5);
866
867         label_author = gtk_label_new ("");
868         gtk_widget_show (label_author);
869         gtk_table_attach (GTK_TABLE (table1), label_author, 1, 2, 1, 2,
870                         (GtkAttachOptions) (GTK_FILL),
871                         (GtkAttachOptions) (0), 0, 0);
872         gtk_misc_set_alignment (GTK_MISC (label_author), 0, 0.5);
873
874         label_url = gtk_label_new ("");
875         gtk_widget_show (label_url);
876         gtk_table_attach (GTK_TABLE (table1), label_url, 1, 2, 2, 3,
877                         (GtkAttachOptions) (GTK_FILL),
878                         (GtkAttachOptions) (0), 0, 0);
879         gtk_misc_set_alignment (GTK_MISC (label_url), 0, 0.5);
880
881         label4 = gtk_label_new (_("Status:"));
882         gtk_widget_show (label4);
883         gtk_table_attach (GTK_TABLE (table1), label4, 0, 1, 3, 4,
884                         (GtkAttachOptions) (GTK_FILL),
885                         (GtkAttachOptions) (0), 8, 2);
886         gtk_misc_set_alignment (GTK_MISC (label4), 0, 0.5);
887
888         label_status = gtk_label_new ("");
889         gtk_widget_show (label_status);
890         gtk_table_attach (GTK_TABLE (table1), label_status, 1, 2, 3, 4,
891                         (GtkAttachOptions) (GTK_FILL),
892                         (GtkAttachOptions) (0), 0, 0);
893         gtk_misc_set_alignment (GTK_MISC (label_status), 0, 0.5);
894
895         PACK_FRAME(vbox1, frame_preview, _("Preview"));
896
897         hbox1 = gtk_hbox_new (FALSE, 0);
898         gtk_widget_show (hbox1);
899         gtk_container_add (GTK_CONTAINER (frame_preview), hbox1);
900
901         icon_1 = gtk_image_new();
902         gtk_widget_show (icon_1);
903         gtk_box_pack_start (GTK_BOX (hbox1), icon_1, TRUE, TRUE, 2);
904         gtk_misc_set_padding (GTK_MISC (icon_1), 0, 5);
905
906         icon_2 = gtk_image_new();
907         gtk_widget_show (icon_2);
908         gtk_box_pack_start (GTK_BOX (hbox1), icon_2, TRUE, TRUE, 2);
909         gtk_misc_set_padding (GTK_MISC (icon_2), 0, 5);
910
911         icon_3 = gtk_image_new();
912         gtk_widget_show (icon_3);
913         gtk_box_pack_start (GTK_BOX (hbox1), icon_3, TRUE, TRUE, 2);
914         gtk_misc_set_padding (GTK_MISC (icon_3), 0, 5);
915
916         icon_4 = gtk_image_new();
917         gtk_widget_show (icon_4);
918         gtk_box_pack_start (GTK_BOX (hbox1), icon_4, TRUE, TRUE, 2);
919         gtk_misc_set_padding (GTK_MISC (icon_4), 0, 5);
920
921         icon_5 = gtk_image_new();
922         gtk_widget_show (icon_5);
923         gtk_box_pack_start (GTK_BOX (hbox1), icon_5, TRUE, TRUE, 2);
924         gtk_misc_set_padding (GTK_MISC (icon_5), 0, 5);
925
926         icon_6 = gtk_image_new();
927         gtk_widget_show (icon_6);
928         gtk_box_pack_start (GTK_BOX (hbox1), icon_6, TRUE, TRUE, 0);
929         gtk_misc_set_padding (GTK_MISC (icon_6), 0, 5);
930
931         icon_7 = gtk_image_new();
932         gtk_widget_show (icon_7);
933         gtk_box_pack_start (GTK_BOX (hbox1), icon_7, TRUE, TRUE, 0);
934         gtk_misc_set_padding (GTK_MISC (icon_7), 0, 5);
935
936         PACK_FRAME(vbox1, frame_buttons, _("Actions"));
937
938         hbuttonbox1 = gtk_hbutton_box_new ();
939         gtk_widget_show (hbuttonbox1);
940         gtk_container_add (GTK_CONTAINER (frame_buttons), hbuttonbox1);
941         gtk_container_set_border_width (GTK_CONTAINER (hbuttonbox1), 5);
942         gtk_button_box_set_layout (GTK_BUTTON_BOX (hbuttonbox1), GTK_BUTTONBOX_START);
943         gtk_box_set_spacing (GTK_BOX (hbuttonbox1), 5);
944
945         btn_remove = gtk_button_new_with_label (_("Remove"));
946         gtk_widget_show (btn_remove);
947         gtk_container_add (GTK_CONTAINER (hbuttonbox1), btn_remove);
948         gtkut_widget_set_can_default (btn_remove, TRUE);
949
950         g_signal_connect(G_OBJECT(btn_remove), "clicked",
951                          G_CALLBACK(prefs_themes_btn_remove_clicked_cb),
952                          NULL);
953         g_signal_connect(G_OBJECT(btn_install), "clicked",
954                          G_CALLBACK(prefs_themes_btn_install_clicked_cb),
955                          NULL);
956
957         prefs_themes->window = GTK_WIDGET(window);
958
959         prefs_themes->name   = label_name;
960         prefs_themes->author = label_author;
961         prefs_themes->url    = label_url;
962         prefs_themes->status = label_status;
963         prefs_themes->global = label_global_status;
964
965         prefs_themes->icons[0] = icon_1;
966         prefs_themes->icons[1] = icon_2;
967         prefs_themes->icons[2] = icon_3;
968         prefs_themes->icons[3] = icon_4;
969         prefs_themes->icons[4] = icon_5;
970         prefs_themes->icons[5] = icon_6;
971         prefs_themes->icons[6] = icon_7;
972
973         prefs_themes->btn_remove  = btn_remove;
974         prefs_themes->btn_install = btn_install;
975         prefs_themes->btn_more    = btn_more;
976
977         prefs_themes->op_menu     = menu_themes;
978
979         prefs_themes->page.widget = vbox1;
980         
981         prefs_themes_set_themes_menu(GTK_COMBO_BOX(menu_themes), tdata);
982         renderer = gtk_cell_renderer_text_new();
983         gtk_cell_layout_pack_start(GTK_CELL_LAYOUT(menu_themes), renderer, TRUE);
984         gtk_cell_layout_set_attributes(GTK_CELL_LAYOUT(menu_themes), renderer,
985                                         "text", 0, NULL);
986
987         prefs_themes_get_theme_info(tdata);
988         prefs_themes_display_global_stats(tdata);
989 }
990
991 static void prefs_themes_destroy_widget(PrefsPage *page)
992 {
993         /* ThemesPage *theme = (ThemesPage *)page; */
994 }
995
996 static void prefs_themes_save(PrefsPage *page)
997 {
998         ThemesData *tdata = prefs_themes_data;
999         gchar      *theme_str = tdata->displayed;
1000
1001         if (!IS_CURRENT_THEME(theme_str)) {
1002                 debug_print("Changing theme to %s\n", theme_str);
1003                 g_free(prefs_common.pixmap_theme_path);
1004
1005                 prefs_common.pixmap_theme_path = g_strdup(theme_str);
1006
1007                 main_window_reflect_prefs_all_real(TRUE);
1008                 compose_reflect_prefs_pixmap_theme();
1009                 addrcompl_reflect_prefs_pixmap_theme();
1010
1011                 prefs_themes_update_buttons(tdata);
1012         }
1013 }
1014