merge the C branch into HEAD

1 files changed, 327 insertions, 0 deletions

diff --git a/engines/openbox/theme.c b/engines/openbox/theme.c
new file mode 100644
index 00000000..2c96224f
--- /dev/null
+++ b/engines/openbox/theme.c
@@ -0,0 +1,327 @@
+#include "openbox.h"
+#include "../../kernel/themerc.h"
+
+#include <glib.h>
+#include <X11/Xlib.h>
+#include <X11/Xresource.h>
+#ifdef HAVE_STDLIB_H
+#  include <stdlib.h>
+#endif
+#ifdef HAVE_CTYPE_H
+#  include <ctype.h>
+#endif
+#ifdef HAVE_STRING_H
+#  include <string.h>
+#endif
+
+static XrmDatabase loaddb(char *theme)
+{
+    XrmDatabase db;
+
+    db = XrmGetFileDatabase(theme);
+    if (db == NULL) {
+	char *s = g_build_filename(g_get_home_dir(), ".openbox", "themes",
+				   "openbox", theme, NULL);
+	db = XrmGetFileDatabase(s);
+	g_free(s);
+    }
+    if (db == NULL) {
+	char *s = g_build_filename(THEMEDIR, theme, NULL);
+	db = XrmGetFileDatabase(s);
+	g_free(s);
+    }
+    return db;
+}
+
+static char *create_class_name(char *rname)
+{
+    char *rclass = g_strdup(rname);
+    char *p = rclass;
+
+    while (TRUE) {
+	*p = toupper(*p);
+	p = strchr(p+1, '.');
+	if (p == NULL) break;
+	++p;
+	if (*p == '\0') break;
+    }
+    return rclass;
+}
+
+gboolean read_bool(XrmDatabase db, char *rname, gboolean *value)
+{
+    gboolean ret = FALSE;
+    char *rclass = create_class_name(rname);
+    char *rettype;
+    XrmValue retvalue;
+  
+    if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
+	retvalue.addr != NULL) {
+	if (!g_ascii_strcasecmp(retvalue.addr, "true"))
+	    *value = TRUE;
+	else
+	    *value = FALSE;
+	ret = TRUE;
+    }
+
+    g_free(rclass);
+    return ret;
+}
+
+gboolean read_int(XrmDatabase db, char *rname, int *value)
+{
+    gboolean ret = FALSE;
+    char *rclass = create_class_name(rname);
+    char *rettype, *end;
+    XrmValue retvalue;
+  
+    if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
+	retvalue.addr != NULL) {
+	*value = (int)strtol(retvalue.addr, &end, 10);
+	if (end != retvalue.addr)
+	    ret = TRUE;
+    }
+
+    g_free(rclass);
+    return ret;
+}
+
+gboolean read_string(XrmDatabase db, char *rname, char **value)
+{
+    gboolean ret = FALSE;
+    char *rclass = create_class_name(rname);
+    char *rettype;
+    XrmValue retvalue;
+  
+    if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
+	retvalue.addr != NULL) {
+	*value = retvalue.addr;
+	ret = TRUE;
+    }
+
+    g_free(rclass);
+    return ret;
+}
+
+gboolean read_color(XrmDatabase db, char *rname, color_rgb **value)
+{
+    gboolean ret = FALSE;
+    char *rclass = create_class_name(rname);
+    char *rettype;
+    XrmValue retvalue;
+  
+    if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
+	retvalue.addr != NULL) {
+	color_rgb *c = color_parse(retvalue.addr);
+	if (c != NULL) {
+	    *value = c;
+	    ret = TRUE;
+	}
+    }
+
+    g_free(rclass);
+    return ret;
+}
+
+static void parse_appearance(char *tex, SurfaceColorType *grad,
+			  ReliefType *relief, BevelType *bevel,
+			  gboolean *interlaced, gboolean *border)
+{
+    char *t;
+
+    /* convert to all lowercase */
+    for (t = tex; *t != '\0'; ++t)
+	*t = g_ascii_tolower(*t);
+
+    if (strstr(tex, "parentrelative") != NULL) {
+	*grad = Background_ParentRelative;
+    } else {
+	if (strstr(tex, "gradient") != NULL) {
+	    if (strstr(tex, "crossdiagonal") != NULL)
+		*grad = Background_CrossDiagonal;
+	    else if (strstr(tex, "rectangle") != NULL)
+		*grad = Background_Rectangle;
+	    else if (strstr(tex, "pyramid") != NULL)
+		*grad = Background_Pyramid;
+	    else if (strstr(tex, "pipecross") != NULL)
+		*grad = Background_PipeCross;
+	    else if (strstr(tex, "elliptic") != NULL)
+		*grad = Background_Elliptic;
+	    else if (strstr(tex, "horizontal") != NULL)
+		*grad = Background_Horizontal;
+	    else if (strstr(tex, "vertical") != NULL)
+		*grad = Background_Vertical;
+	    else
+		*grad = Background_Diagonal;
+	} else {
+	    *grad = Background_Solid;
+	}
+
+	if (strstr(tex, "sunken") != NULL)
+	    *relief = Sunken;
+	else if (strstr(tex, "flat") != NULL)
+	    *relief = Flat;
+	else
+	    *relief = Raised;
+	
+	*border = FALSE;
+	if (*relief == Flat) {
+	    if (strstr(tex, "border") != NULL)
+		*border = TRUE;
+	} else {
+	    if (strstr(tex, "bevel2") != NULL)
+		*bevel = Bevel2;
+	    else
+		*bevel = Bevel1;
+	}
+
+	if (strstr(tex, "interlaced") != NULL)
+	    *interlaced = TRUE;
+	else
+	    *interlaced = FALSE;
+    }
+}
+
+
+gboolean read_appearance(XrmDatabase db, char *rname, Appearance *value)
+{
+    gboolean ret = FALSE;
+    char *rclass = create_class_name(rname), *cname, *ctoname, *bcname;
+    char *rettype;
+    XrmValue retvalue;
+
+    cname = g_strconcat(rname, ".color", NULL);
+    ctoname = g_strconcat(rname, ".colorTo", NULL);
+    bcname = g_strconcat(rname, ".borderColor", NULL);
+
+    if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
+	retvalue.addr != NULL) {
+	parse_appearance(retvalue.addr,
+			 &value->surface.data.planar.grad,
+			 &value->surface.data.planar.relief,
+			 &value->surface.data.planar.bevel,
+			 &value->surface.data.planar.interlaced,
+			 &value->surface.data.planar.border);
+	if (!read_color(db, cname, &value->surface.data.planar.primary))
+	    value->surface.data.planar.primary = color_new(0, 0, 0);
+	if (!read_color(db, ctoname, &value->surface.data.planar.secondary))
+	    value->surface.data.planar.secondary = color_new(0, 0, 0);
+	if (value->surface.data.planar.border)
+	    if (!read_color(db, bcname,
+			    &value->surface.data.planar.border_color))
+		value->surface.data.planar.border_color = color_new(0, 0, 0);
+	ret = TRUE;
+    }
+
+    g_free(bcname);
+    g_free(ctoname);
+    g_free(cname);
+    g_free(rclass);
+    return ret;
+}
+
+void set_default_appearance(Appearance *a)
+{
+    a->surface.data.planar.grad = Background_Solid;
+    a->surface.data.planar.relief = Flat;
+    a->surface.data.planar.bevel = Bevel1;
+    a->surface.data.planar.interlaced = FALSE;
+    a->surface.data.planar.border = FALSE;
+    a->surface.data.planar.primary = color_new(0, 0, 0);
+    a->surface.data.planar.secondary = color_new(0, 0, 0);
+}
+
+gboolean load()
+{
+    XrmDatabase db = NULL;
+
+    if (themerc_theme != NULL) {
+	db = loaddb(themerc_theme);
+        if (db == NULL) {
+	    g_warning("Failed to load the theme '%s'", themerc_theme);
+	    g_message("Falling back to the default: '%s'", DEFAULT_THEME);
+	}
+    }
+    if (db == NULL) {
+	db = loaddb(DEFAULT_THEME);
+	if (db == NULL) {
+	    g_warning("Failed to load the theme '%s'.", DEFAULT_THEME);
+	    return FALSE;
+	}
+    }
+
+    /* XXX load the font, not from the theme file tho, its in themerc_font */
+    s_font_height = 10;
+
+    if (!read_int(db, "handleWidth", &s_handle_height) ||
+	s_handle_height < 0 || s_handle_height > 100) s_handle_height = 6;
+    if (!read_int(db, "bevelWidth", &s_bevel) ||
+	s_bevel <= 0 || s_bevel > 100) s_bevel = 3;
+    if (!read_int(db, "borderWidth", &s_bwidth) ||
+	s_bwidth < 0 || s_bwidth > 100) s_bwidth = 1;
+    if (!read_int(db, "frameWidth", &s_cbwidth) ||
+	s_cbwidth < 0 || s_cbwidth > 100) s_cbwidth = s_bevel;
+
+    if (!read_color(db, "borderColor", &s_b_color))
+	s_b_color = color_new(0, 0, 0);
+    if (!read_color(db, "window.frame.focusColor", &s_cb_focused_color))
+	s_cb_focused_color = color_new(0xff, 0xff, 0xff);
+    if (!read_color(db, "window.frame.unfocusColor", &s_cb_unfocused_color))
+	s_cb_unfocused_color = color_new(0xff, 0xff, 0xff);
+
+    if (!read_appearance(db, "window.title.focus", a_focused_title))
+	set_default_appearance(a_focused_title);
+    if (!read_appearance(db, "window.title.unfocus", a_unfocused_title))
+	set_default_appearance(a_unfocused_title);
+    if (!read_appearance(db, "window.label.focus", a_focused_label))
+	set_default_appearance(a_focused_label);
+    if (!read_appearance(db, "window.label.unfocus", a_unfocused_label))
+	set_default_appearance(a_unfocused_label);
+    if (!read_appearance(db, "window.handle.focus", a_focused_handle))
+	set_default_appearance(a_focused_handle);
+    if (!read_appearance(db, "window.handle.unfocus", a_unfocused_handle))
+	set_default_appearance(a_unfocused_handle);
+    if (!read_appearance(db, "window.grip.focus", a_focused_grip))
+	set_default_appearance(a_focused_grip);
+    if (!read_appearance(db, "window.grip.unfocus", a_unfocused_grip))
+	set_default_appearance(a_unfocused_grip);
+
+    if (!read_appearance(db, "window.button.pressed.focus",
+			 a_focused_pressed_max))
+	if (!read_appearance(db, "window.button.pressed",
+			     a_focused_pressed_max))
+	    set_default_appearance(a_focused_pressed_max);
+    if (!read_appearance(db, "window.button.pressed.unfocus",
+			 a_unfocused_pressed_max))
+	if (!read_appearance(db, "window.button.pressed",
+			     a_unfocused_pressed_max))
+	    set_default_appearance(a_unfocused_pressed_max);
+    if (!read_appearance(db, "window.button.focus",
+			 a_focused_unpressed_max))
+	    set_default_appearance(a_focused_unpressed_max);
+    if (!read_appearance(db, "window.button.unfocus",
+			 a_unfocused_unpressed_max))
+	    set_default_appearance(a_unfocused_unpressed_max);
+
+    a_unfocused_unpressed_close = appearance_copy(a_unfocused_unpressed_max);
+    a_unfocused_pressed_close = appearance_copy(a_unfocused_pressed_max);
+    a_focused_unpressed_close = appearance_copy(a_focused_unpressed_max);
+    a_focused_pressed_close = appearance_copy(a_focused_pressed_max);
+    a_unfocused_unpressed_desk = appearance_copy(a_unfocused_unpressed_max);
+    a_unfocused_pressed_desk = appearance_copy(a_unfocused_pressed_max);
+    a_focused_unpressed_desk = appearance_copy(a_focused_unpressed_max);
+    a_focused_pressed_desk = appearance_copy(a_focused_pressed_max);
+    a_unfocused_unpressed_iconify = appearance_copy(a_unfocused_unpressed_max);
+    a_unfocused_pressed_iconify = appearance_copy(a_unfocused_pressed_max);
+    a_focused_unpressed_iconify = appearance_copy(a_focused_unpressed_max);
+    a_focused_pressed_iconify = appearance_copy(a_focused_pressed_max);
+
+    a_icon->surface.data.planar.grad = Background_ParentRelative;
+
+    /* XXX load the button masks */
+
+    XrmDestroyDatabase(db);
+    return TRUE;
+}
+
+