Dogcows Code - chaz/openbox/blob - engines/openbox/theme.c

   1 #include "openbox.h"
   2 #include "../../kernel/themerc.h"
   3
   4 #include <glib.h>
   5 #include <X11/Xlib.h>
   6 #include <X11/Xresource.h>
   7 #ifdef HAVE_STDLIB_H
   8 #  include <stdlib.h>
   9 #endif
  10 #ifdef HAVE_CTYPE_H
  11 #  include <ctype.h>
  12 #endif
  13 #ifdef HAVE_STRING_H
  14 #  include <string.h>
  15 #endif
  16
  17 static XrmDatabase loaddb(char *theme)
  18 {
  19     XrmDatabase db;
  20
  21     db = XrmGetFileDatabase(theme);
  22     if (db == NULL) {
  23         char *s = g_build_filename(g_get_home_dir(), ".openbox", "themes",
  24                                    "openbox", theme, NULL);
  25         db = XrmGetFileDatabase(s);
  26         g_free(s);
  27     }
  28     if (db == NULL) {
  29         char *s = g_build_filename(THEMEDIR, theme, NULL);
  30         db = XrmGetFileDatabase(s);
  31         g_free(s);
  32     }
  33     return db;
  34 }
  35
  36 static char *create_class_name(char *rname)
  37 {
  38     char *rclass = g_strdup(rname);
  39     char *p = rclass;
  40
  41     while (TRUE) {
  42         *p = toupper(*p);
  43         p = strchr(p+1, '.');
  44         if (p == NULL) break;
  45         ++p;
  46         if (*p == '\0') break;
  47     }
  48     return rclass;
  49 }
  50
  51 gboolean read_bool(XrmDatabase db, char *rname, gboolean *value)
  52 {
  53     gboolean ret = FALSE;
  54     char *rclass = create_class_name(rname);
  55     char *rettype;
  56     XrmValue retvalue;
  57
  58     if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
  59         retvalue.addr != NULL) {
  60         if (!g_ascii_strcasecmp(retvalue.addr, "true"))
  61             *value = TRUE;
  62         else
  63             *value = FALSE;
  64         ret = TRUE;
  65     }
  66
  67     g_free(rclass);
  68     return ret;
  69 }
  70
  71 gboolean read_int(XrmDatabase db, char *rname, int *value)
  72 {
  73     gboolean ret = FALSE;
  74     char *rclass = create_class_name(rname);
  75     char *rettype, *end;
  76     XrmValue retvalue;
  77
  78     if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
  79         retvalue.addr != NULL) {
  80         *value = (int)strtol(retvalue.addr, &end, 10);
  81         if (end != retvalue.addr)
  82             ret = TRUE;
  83     }
  84
  85     g_free(rclass);
  86     return ret;
  87 }
  88
  89 gboolean read_string(XrmDatabase db, char *rname, char **value)
  90 {
  91     gboolean ret = FALSE;
  92     char *rclass = create_class_name(rname);
  93     char *rettype;
  94     XrmValue retvalue;
  95
  96     if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
  97         retvalue.addr != NULL) {
  98         *value = retvalue.addr;
  99         ret = TRUE;
 100     }
 101
 102     g_free(rclass);
 103     return ret;
 104 }
 105
 106 gboolean read_color(XrmDatabase db, char *rname, color_rgb **value)
 107 {
 108     gboolean ret = FALSE;
 109     char *rclass = create_class_name(rname);
 110     char *rettype;
 111     XrmValue retvalue;
 112
 113     if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
 114         retvalue.addr != NULL) {
 115         color_rgb *c = color_parse(retvalue.addr);
 116         if (c != NULL) {
 117             *value = c;
 118             ret = TRUE;
 119         }
 120     }
 121
 122     g_free(rclass);
 123     return ret;
 124 }
 125
 126 static void parse_appearance(char *tex, SurfaceColorType *grad,
 127                           ReliefType *relief, BevelType *bevel,
 128                           gboolean *interlaced, gboolean *border)
 129 {
 130     char *t;
 131
 132     /* convert to all lowercase */
 133     for (t = tex; *t != '\0'; ++t)
 134         *t = g_ascii_tolower(*t);
 135
 136     if (strstr(tex, "parentrelative") != NULL) {
 137         *grad = Background_ParentRelative;
 138     } else {
 139         if (strstr(tex, "gradient") != NULL) {
 140             if (strstr(tex, "crossdiagonal") != NULL)
 141                 *grad = Background_CrossDiagonal;
 142             else if (strstr(tex, "rectangle") != NULL)
 143                 *grad = Background_Rectangle;
 144             else if (strstr(tex, "pyramid") != NULL)
 145                 *grad = Background_Pyramid;
 146             else if (strstr(tex, "pipecross") != NULL)
 147                 *grad = Background_PipeCross;
 148             else if (strstr(tex, "elliptic") != NULL)
 149                 *grad = Background_Elliptic;
 150             else if (strstr(tex, "horizontal") != NULL)
 151                 *grad = Background_Horizontal;
 152             else if (strstr(tex, "vertical") != NULL)
 153                 *grad = Background_Vertical;
 154             else
 155                 *grad = Background_Diagonal;
 156         } else {
 157             *grad = Background_Solid;
 158         }
 159
 160         if (strstr(tex, "sunken") != NULL)
 161             *relief = Sunken;
 162         else if (strstr(tex, "flat") != NULL)
 163             *relief = Flat;
 164         else
 165             *relief = Raised;
 166
 167         *border = FALSE;
 168         if (*relief == Flat) {
 169             if (strstr(tex, "border") != NULL)
 170                 *border = TRUE;
 171         } else {
 172             if (strstr(tex, "bevel2") != NULL)
 173                 *bevel = Bevel2;
 174             else
 175                 *bevel = Bevel1;
 176         }
 177
 178         if (strstr(tex, "interlaced") != NULL)
 179             *interlaced = TRUE;
 180         else
 181             *interlaced = FALSE;
 182     }
 183 }
 184
 185
 186 gboolean read_appearance(XrmDatabase db, char *rname, Appearance *value)
 187 {
 188     gboolean ret = FALSE;
 189     char *rclass = create_class_name(rname), *cname, *ctoname, *bcname;
 190     char *rettype;
 191     XrmValue retvalue;
 192
 193     cname = g_strconcat(rname, ".color", NULL);
 194     ctoname = g_strconcat(rname, ".colorTo", NULL);
 195     bcname = g_strconcat(rname, ".borderColor", NULL);
 196
 197     if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
 198         retvalue.addr != NULL) {
 199         parse_appearance(retvalue.addr,
 200                          &value->surface.data.planar.grad,
 201                          &value->surface.data.planar.relief,
 202                          &value->surface.data.planar.bevel,
 203                          &value->surface.data.planar.interlaced,
 204                          &value->surface.data.planar.border);
 205         if (!read_color(db, cname, &value->surface.data.planar.primary))
 206             value->surface.data.planar.primary = color_new(0, 0, 0);
 207         if (!read_color(db, ctoname, &value->surface.data.planar.secondary))
 208             value->surface.data.planar.secondary = color_new(0, 0, 0);
 209         if (value->surface.data.planar.border)
 210             if (!read_color(db, bcname,
 211                             &value->surface.data.planar.border_color))
 212                 value->surface.data.planar.border_color = color_new(0, 0, 0);
 213         ret = TRUE;
 214     }
 215
 216     g_free(bcname);
 217     g_free(ctoname);
 218     g_free(cname);
 219     g_free(rclass);
 220     return ret;
 221 }
 222
 223 void set_default_appearance(Appearance *a)
 224 {
 225     a->surface.data.planar.grad = Background_Solid;
 226     a->surface.data.planar.relief = Flat;
 227     a->surface.data.planar.bevel = Bevel1;
 228     a->surface.data.planar.interlaced = FALSE;
 229     a->surface.data.planar.border = FALSE;
 230     a->surface.data.planar.primary = color_new(0, 0, 0);
 231     a->surface.data.planar.secondary = color_new(0, 0, 0);
 232 }
 233
 234 gboolean load()
 235 {
 236     XrmDatabase db = NULL;
 237
 238     if (themerc_theme != NULL) {
 239         db = loaddb(themerc_theme);
 240         if (db == NULL) {
 241             g_warning("Failed to load the theme '%s'", themerc_theme);
 242             g_message("Falling back to the default: '%s'", DEFAULT_THEME);
 243         }
 244     }
 245     if (db == NULL) {
 246         db = loaddb(DEFAULT_THEME);
 247         if (db == NULL) {
 248             g_warning("Failed to load the theme '%s'.", DEFAULT_THEME);
 249             return FALSE;
 250         }
 251     }
 252
 253     /* XXX load the font, not from the theme file tho, its in themerc_font */
 254     s_font_height = 10;
 255
 256     if (!read_int(db, "handleWidth", &s_handle_height) ||
 257         s_handle_height < 0 || s_handle_height > 100) s_handle_height = 6;
 258     if (!read_int(db, "bevelWidth", &s_bevel) ||
 259         s_bevel <= 0 || s_bevel > 100) s_bevel = 3;
 260     if (!read_int(db, "borderWidth", &s_bwidth) ||
 261         s_bwidth < 0 || s_bwidth > 100) s_bwidth = 1;
 262     if (!read_int(db, "frameWidth", &s_cbwidth) ||
 263         s_cbwidth < 0 || s_cbwidth > 100) s_cbwidth = s_bevel;
 264
 265     if (!read_color(db, "borderColor", &s_b_color))
 266         s_b_color = color_new(0, 0, 0);
 267     if (!read_color(db, "window.frame.focusColor", &s_cb_focused_color))
 268         s_cb_focused_color = color_new(0xff, 0xff, 0xff);
 269     if (!read_color(db, "window.frame.unfocusColor", &s_cb_unfocused_color))
 270         s_cb_unfocused_color = color_new(0xff, 0xff, 0xff);
 271
 272     if (!read_appearance(db, "window.title.focus", a_focused_title))
 273         set_default_appearance(a_focused_title);
 274     if (!read_appearance(db, "window.title.unfocus", a_unfocused_title))
 275         set_default_appearance(a_unfocused_title);
 276     if (!read_appearance(db, "window.label.focus", a_focused_label))
 277         set_default_appearance(a_focused_label);
 278     if (!read_appearance(db, "window.label.unfocus", a_unfocused_label))
 279         set_default_appearance(a_unfocused_label);
 280     if (!read_appearance(db, "window.handle.focus", a_focused_handle))
 281         set_default_appearance(a_focused_handle);
 282     if (!read_appearance(db, "window.handle.unfocus", a_unfocused_handle))
 283         set_default_appearance(a_unfocused_handle);
 284     if (!read_appearance(db, "window.grip.focus", a_focused_grip))
 285         set_default_appearance(a_focused_grip);
 286     if (!read_appearance(db, "window.grip.unfocus", a_unfocused_grip))
 287         set_default_appearance(a_unfocused_grip);
 288
 289     if (!read_appearance(db, "window.button.pressed.focus",
 290                          a_focused_pressed_max))
 291         if (!read_appearance(db, "window.button.pressed",
 292                              a_focused_pressed_max))
 293             set_default_appearance(a_focused_pressed_max);
 294     if (!read_appearance(db, "window.button.pressed.unfocus",
 295                          a_unfocused_pressed_max))
 296         if (!read_appearance(db, "window.button.pressed",
 297                              a_unfocused_pressed_max))
 298             set_default_appearance(a_unfocused_pressed_max);
 299     if (!read_appearance(db, "window.button.focus",
 300                          a_focused_unpressed_max))
 301             set_default_appearance(a_focused_unpressed_max);
 302     if (!read_appearance(db, "window.button.unfocus",
 303                          a_unfocused_unpressed_max))
 304             set_default_appearance(a_unfocused_unpressed_max);
 305
 306     a_unfocused_unpressed_close = appearance_copy(a_unfocused_unpressed_max);
 307     a_unfocused_pressed_close = appearance_copy(a_unfocused_pressed_max);
 308     a_focused_unpressed_close = appearance_copy(a_focused_unpressed_max);
 309     a_focused_pressed_close = appearance_copy(a_focused_pressed_max);
 310     a_unfocused_unpressed_desk = appearance_copy(a_unfocused_unpressed_max);
 311     a_unfocused_pressed_desk = appearance_copy(a_unfocused_pressed_max);
 312     a_focused_unpressed_desk = appearance_copy(a_focused_unpressed_max);
 313     a_focused_pressed_desk = appearance_copy(a_focused_pressed_max);
 314     a_unfocused_unpressed_iconify = appearance_copy(a_unfocused_unpressed_max);
 315     a_unfocused_pressed_iconify = appearance_copy(a_unfocused_pressed_max);
 316     a_focused_unpressed_iconify = appearance_copy(a_focused_unpressed_max);
 317     a_focused_pressed_iconify = appearance_copy(a_focused_pressed_max);
 318
 319     a_icon->surface.data.planar.grad = Background_ParentRelative;
 320
 321     /* XXX load the button masks */
 322
 323     XrmDestroyDatabase(db);
 324     return TRUE;
 325 }
 326
 327