src/prefs_themes.c

   1 /*
   2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
   3  * Copyright (C) 2003-2004 Hiroyuki Yamamoto & the Sylpheed-Claws team
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18  */
  19
  20 #ifdef HAVE_CONFIG_H
  21 #  include <config.h>
  22 #endif
  23
  24 #include "defs.h"
  25
  26 #include <stdio.h>
  27 #include <stdlib.h>
  28 #include <string.h>
  29 #include <sys/stat.h>
  30
  31 #include <glib.h>
  32 #include <glib/gi18n.h>
  33 #include <gtk/gtk.h>
  34
  35 #include "utils.h"
  36 #include "codeconv.h"
  37 #include "prefs_common.h"
  38 #include "prefs_gtk.h"
  39
  40 #include "gtk/gtkutils.h"
  41 #include "gtk/prefswindow.h"
  42 #include "gtk/filesel.h"
  43
  44 #include "stock_pixmap.h"
  45 #include "mainwindow.h"
  46 #include "compose.h"
  47 #include "alertpanel.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_use;
  74         GtkWidget *btn_remove;
  75
  76         GdkPixmap *pixmaps[PREVIEW_ICONS];
  77         GdkBitmap *masks[PREVIEW_ICONS];
  78
  79         /* gchar     *theme_path; */
  80 } ThemesPage;
  81
  82 typedef struct _ThemeInfo
  83 {
  84         gchar *name;
  85         gchar *author;
  86         gchar *url;
  87         gchar *status;
  88 } ThemeInfo;
  89
  90 typedef struct _ThemeName
  91 {
  92         gchar *name;
  93         GList *item;
  94 } ThemeName;
  95
  96 typedef struct _ThemesData
  97 {
  98         GList      *themes;
  99         GList      *names;
 100         gchar      *displayed;
 101         ThemesPage *page;
 102 } ThemesData;
 103
 104 typedef void (*FileFunc) (const gchar *filename, gpointer data);
 105
 106 typedef struct _DirInfo {
 107         gint bytes;
 108         gint files;
 109         gint pixms;
 110 } DirInfo;
 111
 112 typedef struct _CopyInfo {
 113         gchar *dest;
 114         gchar *status;
 115 } CopyInfo;
 116
 117 static ThemesData *prefs_themes_data;
 118
 119 StockPixmap prefs_themes_icons[PREVIEW_ICONS] = {
 120         STOCK_PIXMAP_DIR_CLOSE,
 121         STOCK_PIXMAP_MAIL_SEND,
 122         STOCK_PIXMAP_MAIL_RECEIVE,
 123         STOCK_PIXMAP_MAIL_ATTACH,
 124         STOCK_PIXMAP_BOOK,
 125         STOCK_PIXMAP_MIME_TEXT_PLAIN,
 126         STOCK_PIXMAP_REPLIED
 127 };
 128
 129
 130
 131 static void prefs_themes_btn_use_clicked_cb     (GtkWidget *widget, gpointer data);
 132 static void prefs_themes_btn_remove_clicked_cb  (GtkWidget *widget, gpointer data);
 133 static void prefs_themes_btn_install_clicked_cb (GtkWidget *widget, gpointer data);
 134 static void prefs_themes_btn_more_clicked_cb    (GtkWidget *widget, gpointer data);
 135 static void prefs_themes_menu_item_activated_cb (GtkWidget *widget, gpointer data);
 136
 137 static void prefs_themes_update_buttons         (const ThemesData *tdata);
 138 static void prefs_themes_display_global_stats   (const ThemesData *tdata);
 139 static void prefs_themes_get_theme_info         (ThemesData *tdata);
 140 static void prefs_themes_display_theme_info     (ThemesData *tdata, const ThemeInfo *info);
 141 static void prefs_themes_get_themes_and_names   (ThemesData *tdata);
 142 static void prefs_themes_free_names             (ThemesData *tdata);
 143
 144 static void prefs_themes_set_themes_menu        (GtkOptionMenu *opmenu, const ThemesData *tdata);
 145
 146 static gchar *prefs_themes_get_theme_stats      (const gchar *dirname);
 147 static gboolean prefs_themes_is_system_theme    (const gchar *dirname);
 148
 149 static void prefs_themes_create_widget          (PrefsPage *page, GtkWindow *window, gpointer data);
 150 static void prefs_themes_destroy_widget         (PrefsPage *page);
 151 static void prefs_themes_save                   (PrefsPage *page);
 152
 153 static void prefs_themes_foreach_file           (const gchar *dirname, const FileFunc func, gpointer data);
 154 static void prefs_themes_file_stats             (const gchar *filename, gpointer data);
 155 static void prefs_themes_file_remove            (const gchar *filename, gpointer data);
 156 static void prefs_themes_file_install           (const gchar *filename, gpointer data);
 157
 158
 159
 160 static void prefs_themes_file_stats(const gchar *filename, gpointer data)
 161 {
 162         struct stat s;
 163         DirInfo    *di = (DirInfo *)data;
 164         gint        len;
 165
 166         if (0 == stat(filename, &s) && 0 != S_ISREG(s.st_mode)) {
 167                 di->bytes += s.st_size;
 168                 di->files++;
 169                 len = strlen(filename);
 170                 if (len > 4) {
 171                         if (filename[len - 1] == 'm' && filename[len - 2] == 'p' &&
 172                             filename[len - 3] == 'x' && filename[len - 4] == '.')
 173                                 di->pixms++;
 174                 }
 175         }
 176 }
 177
 178 static void prefs_themes_file_remove(const gchar *filename, gpointer data)
 179 {
 180         gchar **status = (gchar **)data;
 181         gchar *base;
 182
 183         if ((*status) != NULL)
 184                 return;
 185
 186         base = g_path_get_basename(filename);
 187         if (TRUE == is_dir_exist(filename)) {
 188                 if (!((base[0] == '.') || (base[0] == '.' && base[1] == '.')))
 189                         g_warning("prefs_themes_file_remove(): subdir in theme dir skipped.\n");
 190         }
 191         else if (0 != unlink(filename)) {
 192                 (*status) = g_strdup(filename);
 193         }
 194         g_free(base);
 195 }
 196
 197 static void prefs_themes_file_install(const gchar *filename, gpointer data)
 198 {
 199         CopyInfo *ci = (CopyInfo *)data;
 200         gchar *base;
 201
 202         if (ci->status != NULL)
 203                 return;
 204
 205         base = g_path_get_basename(filename);
 206         if (TRUE == is_dir_exist(filename)) {
 207                 if (!((base[0] == '.') || (base[0] == '.' && base[1] == '.')))
 208                         g_warning("prefs_themes_file_install(): subdir in theme dir skipped.\n");
 209         }
 210         else {
 211                 gchar *fulldest;
 212
 213                 fulldest = g_strconcat(ci->dest, G_DIR_SEPARATOR_S, base, NULL);
 214
 215                 if (0 != copy_file(filename, fulldest, FALSE)) {
 216                         ci->status = g_strdup(filename);
 217                 }
 218                 g_free(fulldest);
 219         }
 220         g_free(base);
 221 }
 222
 223 static void prefs_themes_foreach_file(const gchar *dirname, const FileFunc func, gpointer data)
 224 {
 225         struct dirent *d;
 226         DIR           *dp;
 227
 228         g_return_if_fail(dirname != NULL);
 229         g_return_if_fail(func != NULL);
 230
 231         if ((dp = opendir(dirname)) == NULL) {
 232                 debug_print("directory %s not found", dirname);
 233                 return;
 234         }
 235
 236         while ((d = readdir(dp)) != NULL) {
 237                 gchar *entry;
 238                 gchar *fullentry;
 239
 240                 entry     = d->d_name;
 241                 fullentry = g_strconcat(dirname, G_DIR_SEPARATOR_S, entry, NULL);
 242
 243                 (*func)(fullentry, data);
 244
 245                 g_free(fullentry);
 246         }
 247 }
 248
 249 static gboolean prefs_themes_is_system_theme(const gchar *dirname)
 250 {
 251         gint len;
 252
 253         g_return_val_if_fail(dirname != NULL, FALSE);
 254
 255         len = strlen(PACKAGE_DATA_DIR);
 256         if (strlen(dirname) > len && 0 == strncmp(dirname, PACKAGE_DATA_DIR, len))
 257                 return TRUE;
 258
 259         return FALSE;
 260 }
 261
 262 static void prefs_themes_set_themes_menu(GtkOptionMenu *opmenu, const ThemesData *tdata)
 263 {
 264         GList     *themes = tdata->names;
 265         GtkWidget *menu;
 266         GtkWidget *item;
 267         gint       i = 0, active = 0;
 268
 269         g_return_if_fail(opmenu != NULL);
 270
 271         gtk_option_menu_remove_menu(opmenu);
 272
 273         menu = gtk_menu_new ();
 274         while (themes != NULL) {
 275                 ThemeName *tname = (ThemeName *)(themes->data);
 276                 gchar     *tpath = (gchar *)(tname->item->data);
 277
 278                 item = gtk_menu_item_new_with_label(tname->name);
 279                 gtk_widget_show(item);
 280                 g_signal_connect(G_OBJECT(item), "activate",
 281                                  G_CALLBACK(prefs_themes_menu_item_activated_cb),
 282                                  tname->item->data);
 283                 gtk_menu_append(GTK_MENU(menu), item);
 284
 285                 if (tdata->displayed != NULL && tdata->displayed == tpath)
 286                         active = i;
 287
 288                 themes = g_list_next(themes);
 289                 ++i;
 290         }
 291
 292         gtk_menu_set_active(GTK_MENU(menu), active);
 293         gtk_option_menu_set_menu (opmenu, menu);
 294 }
 295
 296 static void prefs_themes_get_themes_and_names(ThemesData *tdata)
 297 {
 298         GList *tpaths;
 299
 300         g_return_if_fail(tdata != NULL);
 301
 302         if (tdata->themes != NULL)
 303                 stock_pixmap_themes_list_free(tdata->themes);
 304         if (tdata->names != NULL)
 305                 prefs_themes_free_names(tdata);
 306
 307         tdata->themes = stock_pixmap_themes_list_new();
 308
 309         tpaths = tdata->themes;
 310         while (tpaths != NULL) {
 311                 ThemeName *name = g_new0(ThemeName, 1);
 312                 gchar *sname = g_path_get_basename((const gchar *)(tpaths->data));
 313
 314                 if (IS_INTERNAL_THEME(sname))
 315                         name->name = g_strdup(_("Default internal theme"));
 316                 else
 317                         name->name = g_strdup(sname);
 318                 name->item = tpaths;
 319
 320                 tdata->names = g_list_append(tdata->names, name);
 321                 tpaths = g_list_next(tpaths);
 322                 g_free(sname);
 323         }
 324 }
 325
 326 void prefs_themes_init(void)
 327 {
 328         ThemesData   *tdata;
 329         ThemesPage   *page;
 330         GList        *tpaths;
 331         static gchar *path[3];
 332
 333         path[0] = _("Display");
 334         path[1] = _("Themes");
 335         path[2] = NULL;
 336
 337         debug_print("Creating prefereces for themes...\n");
 338
 339         tdata = g_new0(ThemesData, 1);
 340         prefs_themes_data = tdata;
 341
 342         prefs_themes_get_themes_and_names(tdata);
 343
 344         page = g_new0(ThemesPage, 1);
 345
 346         page->page.path = path;
 347         page->page.create_widget = prefs_themes_create_widget;
 348         page->page.destroy_widget = prefs_themes_destroy_widget;
 349         page->page.save_page = prefs_themes_save;
 350         page->page.weight = 15.0;
 351         prefs_gtk_register_page((PrefsPage *) page);
 352
 353         tdata->page = page;
 354
 355         tpaths = g_list_first(tdata->themes);
 356         tdata->displayed = (gchar *)(tpaths->data);
 357 }
 358
 359 static void prefs_themes_free_names(ThemesData *tdata)
 360 {
 361         GList *names;
 362
 363         names = tdata->names;
 364         while (names != NULL) {
 365                 ThemeName *tn = (ThemeName *)(names->data);
 366
 367                 tn->item = NULL;
 368                 g_free(tn->name);
 369                 g_free(tn);
 370
 371                 names = g_list_next(names);
 372         }
 373         g_list_free(names);
 374         tdata->names = NULL;
 375 }
 376
 377 void prefs_themes_done(void)
 378 {
 379         ThemesData *tdata = prefs_themes_data;
 380
 381         debug_print("Finished prefereces for themes.\n");
 382
 383         stock_pixmap_themes_list_free(tdata->themes);
 384         prefs_themes_free_names(tdata);
 385         g_free(tdata->page);
 386         g_free(tdata);
 387 }
 388
 389 static void prefs_themes_btn_use_clicked_cb(GtkWidget *widget, gpointer data)
 390 {
 391         ThemesData *tdata = prefs_themes_data;
 392         gchar      *theme_str;
 393
 394         theme_str = tdata->displayed;
 395
 396         if (prefs_common.pixmap_theme_path != NULL)
 397                 g_free(prefs_common.pixmap_theme_path);
 398
 399         prefs_common.pixmap_theme_path = g_strdup(theme_str);
 400
 401         main_window_reflect_prefs_all_real(TRUE);
 402         compose_reflect_prefs_pixmap_theme();
 403
 404         prefs_themes_update_buttons(tdata);
 405 }
 406
 407 static void prefs_themes_btn_remove_clicked_cb(GtkWidget *widget, gpointer data)
 408 {
 409         ThemesData *tdata = prefs_themes_data;
 410         gchar      *theme_str;
 411         gchar      *alert_title = NULL;
 412         AlertValue  val = 0;
 413         gchar      *tmp = NULL;
 414
 415         theme_str = tdata->displayed;
 416
 417         tmp = g_path_get_basename(theme_str);
 418
 419         if (IS_SYSTEM_THEME(theme_str)) {
 420                 if (getuid() != 0) {
 421                         alertpanel_error(_("Only root can remove system themes"));
 422                         return;
 423                 }
 424                 alert_title = g_strdup_printf(_("Remove system theme '%s'"), tmp);
 425         }
 426         if (NULL == alert_title) {
 427                 alert_title = g_strdup_printf(_("Remove theme '%s'"), tmp);
 428         }
 429
 430         g_free(tmp);
 431
 432         val = alertpanel(alert_title,
 433                          _("Are you sure you want to remove this theme?"),
 434                          _("No"), _("Yes"), _("Cancel"));
 435         g_free(alert_title);
 436         if (G_ALERTALTERNATE == val) {
 437                 gchar *status = NULL;
 438
 439                 prefs_themes_foreach_file(theme_str, prefs_themes_file_remove, &status);
 440                 if (0 != rmdir(theme_str)) {
 441                         if (status != NULL) {
 442                                 alertpanel_error(_("File %s failed\nwhile removing theme."), status);
 443                                 g_free(status);
 444                         }
 445                         else
 446                                 alertpanel_error(_("Removing theme directory failed."));
 447                 }
 448                 else {
 449                         alertpanel_notice(_("Theme removed succesfully"));
 450                         /* update interface back to first theme */
 451                         prefs_themes_get_themes_and_names(tdata);
 452                         prefs_themes_set_themes_menu(GTK_OPTION_MENU(tdata->page->op_menu), tdata);
 453                         prefs_themes_display_global_stats(tdata);
 454                         tdata->displayed = (gchar *)((g_list_first(tdata->themes))->data);
 455                         prefs_themes_get_theme_info(tdata);
 456                 }
 457         }
 458         g_free(theme_str);
 459 }
 460
 461 static void prefs_themes_btn_install_clicked_cb(GtkWidget *widget, gpointer data)
 462 {
 463         gchar      *filename, *source;
 464         gchar      *themeinfo, *themename;
 465         gchar      *alert_title = NULL;
 466         CopyInfo   *cinfo;
 467         AlertValue  val = 0;
 468         ThemesData *tdata = prefs_themes_data;
 469
 470         filename = filesel_select_file_open_folder(_("Select theme folder"), NULL);
 471         if (filename == NULL)
 472                 return;
 473
 474         cinfo = g_new0(CopyInfo, 1);
 475         source = g_path_get_dirname(filename);
 476         themename = g_path_get_basename(source);
 477         debug_print("Installing '%s' theme from %s\n", themename, filename);
 478
 479         themeinfo = g_strconcat(source, G_DIR_SEPARATOR_S, THEMEINFO_FILE, NULL);
 480         alert_title = g_strdup_printf(_("Install theme '%s'"), themename);
 481         if (file_exist(themeinfo, FALSE) == FALSE) {
 482                 val = alertpanel(alert_title,
 483                                  _("This folder doesn't seem to be a theme folder.\nInstall anyway?"),
 484                                  _("Yes"), _("No"), _("Cancel"));
 485                 if (G_ALERTDEFAULT != val)
 486                         goto end_inst;
 487         }
 488         if (getuid() == 0) {
 489                 val = alertpanel(alert_title,
 490                                  _("Do you want to install theme for all users?"),
 491                                  _("Yes"), _("No"), _("Cancel"));
 492                 switch (val) {
 493                 case G_ALERTDEFAULT:
 494                         cinfo->dest = g_strconcat(PACKAGE_DATA_DIR, G_DIR_SEPARATOR_S,
 495                                                   PIXMAP_THEME_DIR, G_DIR_SEPARATOR_S,
 496                                                   themename, NULL);
 497                         break;
 498                 case G_ALERTALTERNATE:
 499                         break;
 500                 default:
 501                         goto end_inst;
 502                 }
 503         }
 504         g_free(alert_title);
 505         if (cinfo->dest == NULL) {
 506                 cinfo->dest = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S, RC_DIR,
 507                                           G_DIR_SEPARATOR_S, PIXMAP_THEME_DIR, G_DIR_SEPARATOR_S,
 508                                           themename, NULL);
 509         }
 510         if (TRUE == is_dir_exist(cinfo->dest)) {
 511                 alertpanel_error(_("A theme with the same name is\nalready installed in this location"));
 512                 goto end_inst;
 513         }
 514         if (0 != make_dir_hier(cinfo->dest)) {
 515                 alertpanel_error(_("Couldn't create destination directory"));
 516                 goto end_inst;
 517         }
 518         prefs_themes_foreach_file(source, prefs_themes_file_install, cinfo);
 519         if (cinfo->status == NULL) {
 520                 GList *insted;
 521
 522                 /* update interface to show newly installed theme */
 523                 prefs_themes_get_themes_and_names(tdata);
 524                 insted = g_list_find_custom(tdata->themes,
 525                                             (gpointer)(cinfo->dest),
 526                                             (GCompareFunc)strcmp2);
 527                 if (NULL != insted) {
 528                         alertpanel_notice(_("Theme installed succesfully"));
 529                         tdata->displayed = (gchar *)(insted->data);
 530                         prefs_themes_set_themes_menu(GTK_OPTION_MENU(tdata->page->op_menu), tdata);
 531                         prefs_themes_display_global_stats(tdata);
 532                         prefs_themes_get_theme_info(tdata);
 533                 }
 534                 else
 535                         alertpanel_error(_("Failed installing theme"));
 536         }
 537         else
 538                 alertpanel_error(_("File %s failed\nwhile installing theme."), cinfo->status);
 539 end_inst:
 540         if (cinfo->dest != NULL) g_free(cinfo->dest);
 541         g_free(source);
 542         g_free(themeinfo);
 543         g_free(cinfo);
 544         g_free(themename);
 545 }
 546
 547 static void prefs_themes_btn_more_clicked_cb(GtkWidget *widget, gpointer data)
 548 {
 549         open_uri(CLAWS_THEMES_URI, prefs_common.uri_cmd);
 550 }
 551
 552 static void prefs_themes_menu_item_activated_cb(GtkWidget *widget, gpointer data)
 553 {
 554         ThemesData *tdata = prefs_themes_data;
 555         gchar      *path = (gchar *)data;
 556
 557         g_return_if_fail(path != NULL);
 558
 559         tdata->displayed = path;
 560         prefs_themes_get_theme_info(tdata);
 561 }
 562
 563 static void prefs_themes_update_buttons(const ThemesData *tdata)
 564 {
 565         ThemesPage *theme = tdata->page;
 566         gboolean    can_rem, can_use;
 567
 568         can_use = !IS_CURRENT_THEME(tdata->displayed);
 569         can_rem = can_use && !IS_INTERNAL_THEME(tdata->displayed);
 570
 571         if (theme->btn_use != NULL)
 572                 gtk_widget_set_sensitive(theme->btn_use, can_use);
 573         if (theme->btn_remove != NULL)
 574                 gtk_widget_set_sensitive(theme->btn_remove, can_rem);
 575 }
 576
 577 /* placeholders may already be utf8 (i18n) */
 578 #define SET_LABEL_TEXT_UTF8(label, text)                                \
 579 {                                                                       \
 580         gchar *tmpstr;                                                  \
 581                                                                         \
 582         if (!g_utf8_validate(text, -1, NULL))                           \
 583                 tmpstr = conv_codeset_strdup(text,                      \
 584                         conv_get_locale_charset_str(),  CS_UTF_8);      \
 585         else                                                            \
 586                 tmpstr = g_strdup(text);                                \
 587                                                                         \
 588         gtk_label_set_text(GTK_LABEL(label), tmpstr);                   \
 589         g_free(tmpstr);                                                 \
 590 }
 591 static void prefs_themes_display_theme_info(ThemesData *tdata, const ThemeInfo *info)
 592 {
 593         ThemesPage *theme = tdata->page;
 594         gchar *save_prefs_path;
 595         gint   i;
 596
 597         SET_LABEL_TEXT_UTF8(theme->name,        info->name);
 598         SET_LABEL_TEXT_UTF8(theme->author,      info->author);
 599         SET_LABEL_TEXT_UTF8(theme->url,         info->url);
 600         SET_LABEL_TEXT_UTF8(theme->status,      info->status);
 601
 602         save_prefs_path = prefs_common.pixmap_theme_path;
 603         prefs_common.pixmap_theme_path = tdata->displayed;
 604         for (i = 0; i < PREVIEW_ICONS; ++i) {
 605                 stock_pixmap_gdk(theme->window, prefs_themes_icons[i],
 606                                 &(theme->pixmaps[i]), &(theme->masks[i]));
 607                 gtk_image_set_from_pixmap(GTK_IMAGE(theme->icons[i]),
 608                                 theme->pixmaps[i], theme->masks[i]);
 609         }
 610         prefs_common.pixmap_theme_path = save_prefs_path;
 611
 612         prefs_themes_update_buttons(tdata);
 613 }
 614 #undef SET_LABEL_TEXT_UTF8
 615
 616 static void prefs_themes_display_global_stats(const ThemesData *tdata)
 617 {
 618         ThemesPage *theme = tdata->page;
 619         GList      *tnames = tdata->names;
 620         gchar      *gstats;
 621         gint        sys = 0;
 622         gint        usr = 0;
 623         gint        all = 0;
 624
 625         while (tnames != NULL) {
 626                 ThemeName *tname = (ThemeName *)(tnames->data);
 627                 gchar     *tpath = (gchar *)(tname->item->data);
 628
 629                 if (IS_SYSTEM_THEME(tpath))
 630                         ++sys;
 631                 else if (!IS_INTERNAL_THEME(tpath))
 632                         ++usr;
 633                 ++all;
 634                 tnames = g_list_next(tnames);
 635         }
 636
 637         gstats = g_strdup_printf(_("%d themes available (%d user, %d system, 1 internal)"),
 638                                  all, usr, sys);
 639         gtk_label_set_text(GTK_LABEL(theme->global), gstats);
 640         gtk_label_set_justify (GTK_LABEL (theme->global), GTK_JUSTIFY_LEFT);
 641         gtkut_widget_set_small_font_size (theme->global);
 642         g_free(gstats);
 643 }
 644
 645 #define INFOFILE_LINE_LEN 80
 646
 647 #define FGETS_INFOFILE_LINE() \
 648         line[0] = '\0'; \
 649         fgets(line, INFOFILE_LINE_LEN, finfo); \
 650         if ((len = strlen(line)) > 0) { \
 651                 if (line[len - 1] == '\n') line[len - 1] = '\0'; \
 652         } \
 653         else { \
 654                 strcpy(line, _("Unknown")); \
 655         }
 656
 657 static void prefs_themes_get_theme_info(ThemesData *tdata)
 658 {
 659         FILE  *finfo;
 660         gchar *sinfo;
 661         gchar *path;
 662         gchar  line[INFOFILE_LINE_LEN];
 663         gint   len;
 664         ThemeInfo *info;
 665         ThemesPage *theme = tdata->page;
 666
 667         g_return_if_fail(theme != NULL);
 668         path = tdata->displayed;
 669         g_return_if_fail(path != NULL);
 670
 671         debug_print("Getting theme info for %s\n", path);
 672
 673         info = g_new0(ThemeInfo, 1);
 674
 675         if (IS_INTERNAL_THEME(path)) {
 676                 info->name = g_strdup(_("Default internal theme"));
 677                 info->author = g_strdup(_("The Sylpheed Claws Team"));
 678                 info->url = g_strdup(HOMEPAGE_URI);
 679                 info->status = g_strdup_printf(_("Internal theme has %d icons"), N_STOCK_PIXMAPS);
 680         }
 681         else {
 682                 sinfo = g_strconcat(path, G_DIR_SEPARATOR_S, THEMEINFO_FILE, NULL);
 683                 finfo = fopen(sinfo, "r");
 684                 if (finfo == NULL) {
 685                         info->name = g_strdup(_("No info file available for this theme"));
 686                         info->author = g_strdup(_("Unknown"));
 687                         info->url = g_strdup(_("Unknown"));
 688                 }
 689                 else {
 690                         FGETS_INFOFILE_LINE()
 691                         info->name = g_strdup(line);
 692                         FGETS_INFOFILE_LINE()
 693                         info->author = g_strdup(line);
 694                         FGETS_INFOFILE_LINE()
 695                         info->url = g_strdup(line);
 696
 697                         fclose(finfo);
 698                 }
 699                 g_free(sinfo);
 700
 701                 info->status = prefs_themes_get_theme_stats(path);
 702                 if (info->status == NULL) {
 703                         info->status = g_strdup(_("Error: can't get theme status"));
 704                 }
 705         }
 706
 707         prefs_themes_display_theme_info(tdata, info);
 708
 709         g_free(info->name);
 710         g_free(info->author);
 711         g_free(info->url);
 712         g_free(info->status);
 713
 714         g_free(info);
 715 }
 716
 717 #undef FGETS_INFOFILE_LINE
 718
 719 static gchar *prefs_themes_get_theme_stats(const gchar *dirname)
 720 {
 721         gchar   *stats;
 722         DirInfo *dinfo;
 723
 724         dinfo = g_new0(DirInfo, 1);
 725
 726         prefs_themes_foreach_file(dirname, prefs_themes_file_stats, dinfo);
 727         stats = g_strdup_printf(_("%d files (%d icons), size: %s"),
 728                                 dinfo->files, dinfo->pixms, to_human_readable(dinfo->bytes));
 729
 730         g_free(dinfo);
 731         return stats;
 732 }
 733
 734 /* BEGIN GLADE CODE */
 735 /* This is a dummy pixmap we use when a pixmap can't be found. */
 736 static char *dummy_pixmap_xpm[] = {
 737         /* columns rows colors chars-per-pixel */
 738         "1 1 1 1",
 739         "  c None",
 740         /* pixels */
 741         " "
 742 };
 743
 744 /* This is an internally used function to create pixmaps. */
 745 static GtkWidget* create_dummy_pixmap(GtkWidget *widget)
 746 {
 747         GdkColormap *colormap;
 748         GdkPixmap *gdkpixmap;
 749         GdkBitmap *mask;
 750         GtkWidget *pixmap;
 751
 752         colormap = gtk_widget_get_colormap (widget);
 753         gdkpixmap = gdk_pixmap_colormap_create_from_xpm_d (NULL, colormap, &mask,
 754                         NULL, dummy_pixmap_xpm);
 755         if (gdkpixmap == NULL)
 756                 g_error ("Couldn't create replacement pixmap.");
 757         pixmap = gtk_image_new_from_pixmap(gdkpixmap, mask);
 758         g_object_unref (gdkpixmap);
 759         g_object_unref (mask);
 760         return pixmap;
 761 }
 762 /* END GLADE CODE */
 763
 764 /* glade generates some calls to a create_pixmap support function
 765  * we don't really need. */
 766 #define create_pixmap(widget,filename) create_dummy_pixmap(widget)
 767
 768 static void prefs_themes_create_widget(PrefsPage *page, GtkWindow *window, gpointer data)
 769 {
 770         ThemesPage *prefs_themes = (ThemesPage *)page;
 771         ThemesData *tdata = prefs_themes_data;
 772         gchar *buf;
 773         gint   i;
 774         /* from gtk/about.c */
 775         GtkStyle *style;
 776         GdkColormap *cmap;
 777         GdkColor uri_color[2] = {{0, 0, 0, 0xffff}, {0, 0xffff, 0, 0}};
 778         gboolean success[2];
 779
 780         GtkWidget *vbox1;
 781         GtkWidget *frame1;
 782         GtkWidget *vbox2;
 783         GtkWidget *hbox3;
 784         GtkWidget *menu_themes;
 785         GtkWidget *menu_themes_menu;
 786         GtkWidget *glade_menuitem;
 787         GtkWidget *btn_install;
 788         GtkWidget *btn_more;
 789         GtkWidget *label_global_status;
 790         GtkWidget *frame_info;
 791         GtkWidget *table1;
 792         GtkWidget *label1;
 793         GtkWidget *label2;
 794         GtkWidget *label3;
 795         GtkWidget *label_name;
 796         GtkWidget *label_author;
 797         GtkWidget *label_url;
 798         GtkWidget *label4;
 799         GtkWidget *label_status;
 800         GtkWidget *frame_preview;
 801         GtkWidget *hbox1;
 802         GtkWidget *icon_1;
 803         GtkWidget *icon_2;
 804         GtkWidget *icon_3;
 805         GtkWidget *icon_4;
 806         GtkWidget *icon_5;
 807         GtkWidget *icon_6;
 808         GtkWidget *icon_7;
 809         GtkWidget *frame_buttons;
 810         GtkWidget *hbuttonbox1;
 811         GtkWidget *btn_use;
 812         GtkWidget *btn_remove;
 813
 814         vbox1 = gtk_vbox_new (FALSE, 0);
 815         gtk_widget_show (vbox1);
 816
 817         PACK_FRAME (vbox1, frame1, _("Selector"));
 818
 819         vbox2 = gtk_vbox_new (FALSE, 0);
 820         gtk_widget_show (vbox2);
 821         gtk_container_add (GTK_CONTAINER (frame1), vbox2);
 822
 823         hbox3 = gtk_hbox_new (FALSE, 0);
 824         gtk_widget_show (hbox3);
 825         gtk_box_pack_start (GTK_BOX (vbox2), hbox3, FALSE, FALSE, 0);
 826         gtk_container_set_border_width (GTK_CONTAINER (hbox3), 5);
 827
 828         menu_themes = gtk_option_menu_new ();
 829         gtk_widget_show (menu_themes);
 830         gtk_box_pack_start (GTK_BOX (hbox3), menu_themes, FALSE, FALSE, 0);
 831         menu_themes_menu = gtk_menu_new ();
 832         glade_menuitem = gtk_menu_item_new_with_label ("");
 833         gtk_widget_show (glade_menuitem);
 834         gtk_menu_append (GTK_MENU (menu_themes_menu), glade_menuitem);
 835         gtk_option_menu_set_menu (GTK_OPTION_MENU (menu_themes), menu_themes_menu);
 836
 837         btn_install = gtk_button_new_with_label (_("Install new..."));
 838         gtk_widget_show (btn_install);
 839         gtk_box_pack_start (GTK_BOX (hbox3), btn_install, FALSE, FALSE, 0);
 840         GTK_WIDGET_SET_FLAGS (btn_install, GTK_CAN_DEFAULT);
 841
 842         btn_more = gtk_button_new_with_label (_("Get more..."));
 843         gtk_widget_show (btn_more);
 844         gtk_box_pack_start (GTK_BOX (hbox3), btn_more, FALSE, FALSE, 0);
 845         GTK_WIDGET_SET_FLAGS (btn_more, GTK_CAN_DEFAULT);
 846         /* make it look like an uri */
 847         gtk_button_set_relief(GTK_BUTTON(btn_more), GTK_RELIEF_NONE);
 848         gtk_label_get(GTK_LABEL(GTK_BIN(btn_more)->child), &buf);
 849         buf = g_strdup(buf);
 850         for (i = 0; buf[i] != '\0'; buf[i++] = '_');
 851         gtk_label_set_pattern(GTK_LABEL(GTK_BIN(btn_more)->child), buf);
 852         g_free(buf);
 853         cmap = gdk_window_get_colormap((mainwindow_get_mainwindow())->window->window);
 854         gdk_colormap_alloc_colors(cmap, uri_color, 2, FALSE, TRUE, success);
 855         if (success[0] == TRUE && success[1] == TRUE) {
 856                 gtk_widget_ensure_style(GTK_BIN(btn_more)->child);
 857                 style = gtk_style_copy
 858                         (gtk_widget_get_style(GTK_BIN(btn_more)->child));
 859                 style->fg[GTK_STATE_NORMAL]   = uri_color[0];
 860                 style->fg[GTK_STATE_ACTIVE]   = uri_color[1];
 861                 style->fg[GTK_STATE_PRELIGHT] = uri_color[0];
 862                 gtk_widget_set_style(GTK_BIN(btn_more)->child, style);
 863         } else
 864                 g_warning("prefs_themes_create_widget(): color allocation failed.\n");
 865
 866
 867         label_global_status = gtk_label_new ("");
 868         gtk_widget_show (label_global_status);
 869         gtk_box_pack_start (GTK_BOX (vbox2), label_global_status, FALSE, FALSE, 0);
 870         gtk_label_set_justify (GTK_LABEL (label_global_status), GTK_JUSTIFY_LEFT);
 871         gtk_misc_set_alignment (GTK_MISC (label_global_status), 0, 0.5);
 872         gtk_misc_set_padding (GTK_MISC (label_global_status), 6, 0);
 873
 874         PACK_FRAME(vbox1, frame_info, _("Information"));
 875
 876         table1 = gtk_table_new (4, 2, FALSE);
 877         gtk_widget_show (table1);
 878         gtk_container_add (GTK_CONTAINER (frame_info), table1);
 879
 880         label1 = gtk_label_new (_("Name: "));
 881         gtk_widget_show (label1);
 882         gtk_table_attach (GTK_TABLE (table1), label1, 0, 1, 0, 1,
 883                         (GtkAttachOptions) (GTK_FILL),
 884                         (GtkAttachOptions) (0), 8, 2);
 885         gtk_label_set_justify (GTK_LABEL (label1), GTK_JUSTIFY_LEFT);
 886         gtk_misc_set_alignment (GTK_MISC (label1), 0, 0.5);
 887
 888         label2 = gtk_label_new (_("Author: "));
 889         gtk_widget_show (label2);
 890         gtk_table_attach (GTK_TABLE (table1), label2, 0, 1, 1, 2,
 891                         (GtkAttachOptions) (GTK_FILL),
 892                         (GtkAttachOptions) (0), 8, 2);
 893         gtk_label_set_justify (GTK_LABEL (label2), GTK_JUSTIFY_LEFT);
 894         gtk_misc_set_alignment (GTK_MISC (label2), 0, 0.5);
 895
 896         label3 = gtk_label_new (_("URL:"));
 897         gtk_widget_show (label3);
 898         gtk_table_attach (GTK_TABLE (table1), label3, 0, 1, 2, 3,
 899                         (GtkAttachOptions) (GTK_FILL),
 900                         (GtkAttachOptions) (0), 8, 2);
 901         gtk_misc_set_alignment (GTK_MISC (label3), 0, 0.5);
 902
 903         label_name = gtk_label_new ("");
 904         gtk_widget_show (label_name);
 905         gtk_table_attach (GTK_TABLE (table1), label_name, 1, 2, 0, 1,
 906                         (GtkAttachOptions) (GTK_EXPAND | GTK_FILL),
 907                         (GtkAttachOptions) (0), 0, 0);
 908         gtk_misc_set_alignment (GTK_MISC (label_name), 0, 0.5);
 909
 910         label_author = gtk_label_new ("");
 911         gtk_widget_show (label_author);
 912         gtk_table_attach (GTK_TABLE (table1), label_author, 1, 2, 1, 2,
 913                         (GtkAttachOptions) (GTK_FILL),
 914                         (GtkAttachOptions) (0), 0, 0);
 915         gtk_misc_set_alignment (GTK_MISC (label_author), 0, 0.5);
 916
 917         label_url = gtk_label_new ("");
 918         gtk_widget_show (label_url);
 919         gtk_table_attach (GTK_TABLE (table1), label_url, 1, 2, 2, 3,
 920                         (GtkAttachOptions) (GTK_FILL),
 921                         (GtkAttachOptions) (0), 0, 0);
 922         gtk_misc_set_alignment (GTK_MISC (label_url), 0, 0.5);
 923
 924         label4 = gtk_label_new (_("Status:"));
 925         gtk_widget_show (label4);
 926         gtk_table_attach (GTK_TABLE (table1), label4, 0, 1, 3, 4,
 927                         (GtkAttachOptions) (GTK_FILL),
 928                         (GtkAttachOptions) (0), 8, 2);
 929         gtk_misc_set_alignment (GTK_MISC (label4), 0, 0.5);
 930
 931         label_status = gtk_label_new ("");
 932         gtk_widget_show (label_status);
 933         gtk_table_attach (GTK_TABLE (table1), label_status, 1, 2, 3, 4,
 934                         (GtkAttachOptions) (GTK_FILL),
 935                         (GtkAttachOptions) (0), 0, 0);
 936         gtk_misc_set_alignment (GTK_MISC (label_status), 0, 0.5);
 937
 938         PACK_FRAME(vbox1, frame_preview, _("Preview"));
 939
 940         hbox1 = gtk_hbox_new (FALSE, 0);
 941         gtk_widget_show (hbox1);
 942         gtk_container_add (GTK_CONTAINER (frame_preview), hbox1);
 943
 944         icon_1 = create_pixmap (vbox1, NULL);
 945         gtk_widget_show (icon_1);
 946         gtk_box_pack_start (GTK_BOX (hbox1), icon_1, TRUE, TRUE, 2);
 947         gtk_misc_set_padding (GTK_MISC (icon_1), 0, 5);
 948
 949         icon_2 = create_pixmap (vbox1, NULL);
 950         gtk_widget_show (icon_2);
 951         gtk_box_pack_start (GTK_BOX (hbox1), icon_2, TRUE, TRUE, 2);
 952         gtk_misc_set_padding (GTK_MISC (icon_2), 0, 5);
 953
 954         icon_3 = create_pixmap (vbox1, NULL);
 955         gtk_widget_show (icon_3);
 956         gtk_box_pack_start (GTK_BOX (hbox1), icon_3, TRUE, TRUE, 2);
 957         gtk_misc_set_padding (GTK_MISC (icon_3), 0, 5);
 958
 959         icon_4 = create_pixmap (vbox1, NULL);
 960         gtk_widget_show (icon_4);
 961         gtk_box_pack_start (GTK_BOX (hbox1), icon_4, TRUE, TRUE, 2);
 962         gtk_misc_set_padding (GTK_MISC (icon_4), 0, 5);
 963
 964         icon_5 = create_pixmap (vbox1, NULL);
 965         gtk_widget_show (icon_5);
 966         gtk_box_pack_start (GTK_BOX (hbox1), icon_5, TRUE, TRUE, 2);
 967         gtk_misc_set_padding (GTK_MISC (icon_5), 0, 5);
 968
 969         icon_6 = create_pixmap (vbox1, NULL);
 970         gtk_widget_show (icon_6);
 971         gtk_box_pack_start (GTK_BOX (hbox1), icon_6, TRUE, TRUE, 0);
 972         gtk_misc_set_padding (GTK_MISC (icon_6), 0, 5);
 973
 974         icon_7 = create_pixmap (vbox1, NULL);
 975         gtk_widget_show (icon_7);
 976         gtk_box_pack_start (GTK_BOX (hbox1), icon_7, TRUE, TRUE, 0);
 977         gtk_misc_set_padding (GTK_MISC (icon_7), 0, 5);
 978
 979         PACK_FRAME(vbox1, frame_buttons, _("Actions"));
 980
 981         hbuttonbox1 = gtk_hbutton_box_new ();
 982         gtk_widget_show (hbuttonbox1);
 983         gtk_container_add (GTK_CONTAINER (frame_buttons), hbuttonbox1);
 984         gtk_container_set_border_width (GTK_CONTAINER (hbuttonbox1), 5);
 985         gtk_button_box_set_layout (GTK_BUTTON_BOX (hbuttonbox1), GTK_BUTTONBOX_START);
 986         gtk_button_box_set_spacing (GTK_BUTTON_BOX (hbuttonbox1), 5);
 987         gtk_button_box_set_child_ipadding (GTK_BUTTON_BOX (hbuttonbox1), 5, 0);
 988
 989         btn_use = gtk_button_new_with_label (_("Use this"));
 990         gtk_widget_show (btn_use);
 991         gtk_container_add (GTK_CONTAINER (hbuttonbox1), btn_use);
 992         GTK_WIDGET_SET_FLAGS (btn_use, GTK_CAN_DEFAULT);
 993
 994         btn_remove = gtk_button_new_with_label (_("Remove"));
 995         gtk_widget_show (btn_remove);
 996         gtk_container_add (GTK_CONTAINER (hbuttonbox1), btn_remove);
 997         GTK_WIDGET_SET_FLAGS (btn_remove, GTK_CAN_DEFAULT);
 998
 999         g_signal_connect(G_OBJECT(btn_use), "clicked",
1000                          G_CALLBACK(prefs_themes_btn_use_clicked_cb),
1001                          NULL);
1002         g_signal_connect(G_OBJECT(btn_remove), "clicked",
1003                          G_CALLBACK(prefs_themes_btn_remove_clicked_cb),
1004                          NULL);
1005         g_signal_connect(G_OBJECT(btn_install), "clicked",
1006                          G_CALLBACK(prefs_themes_btn_install_clicked_cb),
1007                          NULL);
1008         g_signal_connect(G_OBJECT(btn_more), "clicked",
1009                          G_CALLBACK(prefs_themes_btn_more_clicked_cb),
1010                          NULL);
1011
1012         gtk_widget_grab_default (btn_use);
1013
1014         prefs_themes->window = GTK_WIDGET(window);
1015
1016         prefs_themes->name   = label_name;
1017         prefs_themes->author = label_author;
1018         prefs_themes->url    = label_url;
1019         prefs_themes->status = label_status;
1020         prefs_themes->global = label_global_status;
1021
1022         prefs_themes->icons[0] = icon_1;
1023         prefs_themes->icons[1] = icon_2;
1024         prefs_themes->icons[2] = icon_3;
1025         prefs_themes->icons[3] = icon_4;
1026         prefs_themes->icons[4] = icon_5;
1027         prefs_themes->icons[5] = icon_6;
1028         prefs_themes->icons[6] = icon_7;
1029
1030         prefs_themes->btn_use     = btn_use;
1031         prefs_themes->btn_remove  = btn_remove;
1032         prefs_themes->btn_install = btn_install;
1033         prefs_themes->btn_more    = btn_more;
1034
1035         prefs_themes->op_menu     = menu_themes;
1036
1037         prefs_themes->page.widget = vbox1;
1038
1039         prefs_themes_set_themes_menu(GTK_OPTION_MENU(prefs_themes->op_menu), tdata);
1040
1041         prefs_themes_get_theme_info(tdata);
1042         prefs_themes_display_global_stats(tdata);
1043 }
1044
1045 static void prefs_themes_destroy_widget(PrefsPage *page)
1046 {
1047         /* ThemesPage *theme = (ThemesPage *)page; */
1048 }
1049
1050 static void prefs_themes_save(PrefsPage *page)
1051 {
1052         /* ThemesPage *theme = (ThemesPage *)page; */
1053 }
1054