add the themetoxml tool ! yay

1 files changed, 535 insertions, 0 deletions

diff --git a/tools/themetoxml/themetoxml.c b/tools/themetoxml/themetoxml.c
new file mode 100644
index 00000000..fa98a158
--- /dev/null
+++ b/tools/themetoxml/themetoxml.c
@@ -0,0 +1,535 @@
+/* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
+
+   themetoxml.c for the Openbox window manager
+   Copyright (c) 2007        Dana Jansens
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 2 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   See the COPYING file for a copy of the GNU General Public License.
+*/
+
+#include "rgb.h"
+
+#include <X11/Xlib.h>
+#include <X11/Xresource.h>
+#include <glib.h>
+#include <libxml/parser.h>
+#include <unistd.h>
+#include <ctype.h>
+#include <string.h>
+
+static gboolean read_int(XrmDatabase db, gchar *rname, gint *value);
+static gboolean read_string(XrmDatabase db, gchar *rname, gchar **value);
+static gboolean read_color(XrmDatabase db, gchar *rname,
+                           gint *r, gint *g, gint *b);
+
+static int parse_inline_number(char *p)
+{
+    int neg = 1;
+    int res = 0;
+    if (*p == '-') {
+        neg = -1;
+        ++p;
+    }
+    for (; isdigit(*p); ++p)
+        res = res * 10 + *p - '0';
+    res *= neg;
+    return res;
+}
+
+static gchar *create_class_name(gchar *rname)
+{
+    gchar *rclass = g_strdup(rname);
+    gchar *p = rclass;
+
+    while (TRUE) {
+        *p = toupper(*p);
+        p = strchr(p+1, '.');
+        if (p == NULL) break;
+        ++p;
+        if (*p == '\0') break;
+    }
+    return rclass;
+}
+
+static gboolean read_int(XrmDatabase db, gchar *rname, gint *value)
+{
+    gboolean ret = FALSE;
+    gchar *rclass = create_class_name(rname);
+    gchar *rettype, *end;
+    XrmValue retvalue;
+  
+    if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
+        retvalue.addr != NULL) {
+        *value = (gint)strtol(retvalue.addr, &end, 10);
+        if (end != retvalue.addr)
+            ret = TRUE;
+    }
+
+    g_free(rclass);
+    return ret;
+}
+
+static gboolean read_string(XrmDatabase db, gchar *rname, gchar **value)
+{
+    gboolean ret = FALSE;
+    gchar *rclass = create_class_name(rname);
+    gchar *rettype;
+    XrmValue retvalue;
+  
+    if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
+        retvalue.addr != NULL) {
+        *value = retvalue.addr;
+        g_strstrip(*value);
+        ret = TRUE;
+    }
+
+    g_free(rclass);
+    return ret;
+}
+
+static gchar hextodec(gchar h)
+{
+    if (h >= '0' && h <= '9') return h - '0';
+    else if (h >= 'a' && h <= 'f') return h - 'a' + 9;
+    else if (h >= 'A' && h <= 'F') return h - 'A' + 9;
+    return -1;
+}
+
+static gboolean parse_color(gchar *c, gint *r, gint *g, gint *b)
+{
+    int dig1, dig2, i, color[3];
+    int len = strlen(c);
+
+    if (c[0] == '#' && (len != 4 && len != 7)) return FALSE;
+
+    if (c[0] != '#') {
+        int i;
+
+        for (i = 0; colornames[i].name != NULL; ++i) {
+            if (!strcmp(colornames[i].name, c)) {
+                *r = colornames[i].r;
+                *g = colornames[i].g;
+                *b = colornames[i].b;
+                return TRUE;
+            }
+        }
+        return FALSE;
+    }
+
+    c++;
+    for (i = 0; i < 3; ++i, c += (len == 4 ? 1 : 2)) {
+        dig2 = hextodec(c[1]);
+        if (len == 4) dig1 = dig2;
+        else dig1 = hextodec(c[0]);
+
+        if (dig1 < 0 || dig2 < 0) return FALSE;
+
+        color[i] = dig1*16 + dig2;
+    }
+    *r = color[0]; *g = color[1]; *b = color[2];
+    return TRUE;
+}
+
+static gboolean read_color(XrmDatabase db, gchar *rname,
+                           gint *r, gint *g, gint *b)
+{
+    gboolean ret = FALSE;
+    gchar *rclass = create_class_name(rname);
+    gchar *rettype;
+    XrmValue retvalue;
+  
+    if (XrmGetResource(db, rname, rclass, &rettype, &retvalue) &&
+        retvalue.addr != NULL) {
+        ret = parse_color(retvalue.addr, r, g, b);
+    }
+
+    g_free(rclass);
+    return ret;
+}
+
+xmlNodePtr go(xmlNodePtr node, const char *s)
+{
+    xmlNodePtr p;
+
+    for (p = node->children; p; p = p->next) {
+        if (!xmlStrcasecmp(p->name, (const xmlChar*) s))
+            return p;
+    }
+    return xmlAddChild(node, xmlNewNode(NULL, (const xmlChar*) s));
+}
+
+static gchar number[20];
+static inline gchar* NUM(int i) {
+    g_snprintf(number, 20, "%d", i); return number;
+}
+static xmlDocPtr doc;
+static xmlNodePtr root;
+
+#define GO1(a) (go(root, a))
+#define GO2(a,b) (go(GO1(a), b))
+#define GO3(a,b,c) (go(GO2(a, b), c))
+#define GO4(a,b,c,d) (go(GO3(a, b, c), d))
+#define GO5(a,b,c,d,e) (go(GO4(a, b, c, d), e))
+#define GO6(a,b,c,d,e,f) (go(GO5(a, b, c, d, e), f))
+#define GO7(a,b,c,d,e,f,g) (go(GO6(a, b, c, d, e, f), g))
+
+#define CONT1(a,cont) (xmlNodeSetContent(GO1(a), (const xmlChar*)cont))
+#define CONT2(a,b,cont) (xmlNodeSetContent(GO2(a,b), (const xmlChar*)cont))
+#define CONT3(a,b,c,cont) (xmlNodeSetContent(GO3(a,b,c), (const xmlChar*)cont))
+#define CONT4(a,b,c,d,cont) (xmlNodeSetContent(GO4(a,b,c,d), (const xmlChar*)cont))
+#define CONT5(a,b,c,d,e,cont) (xmlNodeSetContent(GO5(a,b,c,d,e), (const xmlChar*)cont))
+#define CONT6(a,b,c,d,e,f,cont) (xmlNodeSetContent(GO6(a,b,c,d,e,f), (const xmlChar*)cont))
+
+#define ATTR1(a,name,cont) (xmlSetProp(GO1(a), (const xmlChar*)name, (const xmlChar*)cont))
+#define ATTR2(a,b,name,cont) (xmlSetProp(GO2(a,b), (const xmlChar*)name, (const xmlChar*)cont))
+#define ATTR3(a,b,c,name,cont) (xmlSetProp(GO3(a,b,c), (const xmlChar*)name, (const xmlChar*)cont))
+#define ATTR4(a,b,c,d,name,cont) (xmlSetProp(GO4(a,b,c,d), (const xmlChar*)name, (const xmlChar*)cont))
+#define ATTR5(a,b,c,d,e,name,cont) (xmlSetProp(GO5(a,b,c,d,e), (const xmlChar*)name, (const xmlChar*)cont))
+#define ATTR6(a,b,c,d,e,f,name,cont) (xmlSetProp(GO6(a,b,c,d,e,f), (const xmlChar*)name, (const xmlChar*)cont))
+#define ATTR7(a,b,c,d,e,f,g,name,cont) (xmlSetProp(GO7(a,b,c,d,e,f,g), (const xmlChar*)name, (const xmlChar*)cont))
+
+#define APPCONT1(a,cont) (CONT2("appearance",a,cont))
+#define APPCONT2(a,b,cont) (CONT3("appearance",a,b,cont))
+#define APPCONT3(a,b,c,cont) (CONT4("appearance",a,b,c,cont))
+#define APPCONT4(a,b,c,d,cont) (CONT5("appearance",a,b,c,d,cont))
+#define APPCONT5(a,b,c,d,e,cont) (CONT6("appearance",a,b,c,d,e,cont))
+
+#define APPATTR1(a,name,cont) (ATTR2("appearance",a,name,cont))
+#define APPATTR2(a,b,name,cont) (ATTR3("appearance",a,b,name,cont))
+#define APPATTR3(a,b,c,name,cont) (ATTR4("appearance",a,b,c,name,cont))
+#define APPATTR4(a,b,c,d,name,cont) (ATTR5("appearance",a,b,c,d,name,cont))
+#define APPATTR5(a,b,c,d,e,name,cont) (ATTR6("appearance",a,b,c,d,e,name,cont))
+#define APPATTR6(a,b,c,d,e,f,name,cont) (ATTR7("appearance",a,b,c,d,e,f,name,cont))
+
+#define COLOR1(a,R,G,B,A) (APPATTR1(a,"r",NUM(R)), \
+                           APPATTR1(a,"g",NUM(G)), \
+                           APPATTR1(a,"b",NUM(B)), \
+                           APPATTR1(a,"a",NUM(A)))
+#define COLOR2(a,b,R,G,B,A) (APPATTR2(a,b,"r",NUM(R)), \
+                             APPATTR2(a,b,"g",NUM(G)), \
+                             APPATTR2(a,b,"b",NUM(B)), \
+                             APPATTR2(a,b,"a",NUM(A)))
+#define COLOR3(a,b,c,R,G,B,A) (APPATTR3(a,b,c,"r",NUM(R)), \
+                               APPATTR3(a,b,c,"g",NUM(G)), \
+                               APPATTR3(a,b,c,"b",NUM(B)), \
+                               APPATTR3(a,b,c,"a",NUM(A)))
+#define COLOR4(a,b,c,d,R,G,B,A) (APPATTR4(a,b,c,d,"r",NUM(R)), \
+                                 APPATTR4(a,b,c,d,"g",NUM(G)), \
+                                 APPATTR4(a,b,c,d,"b",NUM(B)), \
+                                 APPATTR4(a,b,c,d,"a",NUM(A)))
+#define COLOR5(a,b,c,d,e,R,G,B,A) (APPATTR5(a,b,c,d,e,"r",NUM(R)), \
+                                   APPATTR5(a,b,c,d,e,"g",NUM(G)), \
+                                   APPATTR5(a,b,c,d,e,"b",NUM(B)), \
+                                   APPATTR5(a,b,c,d,e,"a",NUM(A)))
+#define COLOR6(a,b,c,d,e,f,R,G,B,A) (APPATTR6(a,b,c,d,e,f,"r",NUM(R)), \
+                                     APPATTR6(a,b,c,d,e,f,"g",NUM(G)), \
+                                     APPATTR6(a,b,c,d,e,f,"b",NUM(B)), \
+                                     APPATTR6(a,b,c,d,e,f,"a",NUM(A)))
+
+#define APPEARANCE2(res,a,b) \
+{ \
+    if (read_string(db, res, &s)) \
+        APPCONT3(a, b, "style", s); \
+    if (read_color(db, res".color", &i, &j, &k)) \
+        COLOR3(a, b, "primary", i, j, k, 255); \
+    if (read_color(db, res".colorTo", &i, &j, &k)) \
+        COLOR3(a, b, "secondary", i, j, k, 255); \
+    if (read_color(db, res".border.color", &i, &j, &k)) \
+        COLOR3(a, b, "border", i, j, k, 255); \
+    if (read_color(db, res".interlace.color", &i, &j, &k)) \
+        COLOR3(a, b, "interlace", i, j, k, 255); \
+}
+
+#define APPEARANCE3(res,a,b,c) \
+{ \
+    if (read_string(db, res, &s)) \
+        APPCONT4(a, b, c, "style", s); \
+    if (read_color(db, res".color", &i, &j, &k)) \
+        COLOR4(a, b, c, "primary", i, j, k, 255); \
+    if (read_color(db, res".colorTo", &i, &j, &k)) \
+        COLOR4(a, b, c, "secondary", i, j, k, 255); \
+    if (read_color(db, res".border.color", &i, &j, &k)) \
+        COLOR4(a, b, c, "border", i, j, k, 255); \
+    if (read_color(db, res".interlace.color", &i, &j, &k)) \
+        COLOR4(a, b, c, "interlace", i, j, k, 255); \
+}
+
+#define APPEARANCE4(res,a,b,c,d) \
+{ \
+    if (read_string(db, res, &s)) \
+        APPCONT5(a, b, c, d, "style", s); \
+    if (read_color(db, res".color", &i, &j, &k)) \
+        COLOR5(a, b, c, d, "primary", i, j, k, 255); \
+    if (read_color(db, res".colorTo", &i, &j, &k)) \
+        COLOR5(a, b, c, d, "secondary", i, j, k, 255); \
+    if (read_color(db, res".border.color", &i, &j, &k)) \
+        COLOR5(a, b, c, d, "border", i, j, k, 255); \
+    if (read_color(db, res".interlace.color", &i, &j, &k)) \
+        COLOR5(a, b, c, d, "interlace", i, j, k, 255); \
+}
+
+int main(int argc, char **argv)
+{
+    XrmDatabase db;
+    int i,j,k;
+    gchar *s;
+    int ret = 0;
+
+    if (argc < 2) {
+        printf("Please specify an Openbox3 themerc file\n");
+        return 1;
+    }
+
+    if ((db = XrmGetFileDatabase(argv[1])) == NULL) {
+        printf("Unable to open the database from stdin\n");
+        return 1;
+    }
+
+    doc = xmlNewDoc((const xmlChar*) "1.0");
+    xmlDocSetRootElement
+        (doc,(root = xmlNewNode(NULL, (const xmlChar*)"openbox_theme")));
+
+    if (read_int(db, "window.handle.width", &i))
+        CONT2("dimensions", "handle", NUM(i));
+
+    if (read_int(db, "padding.width", &i)) {
+        ATTR2("dimensions", "padding", "horizontal", NUM(i));
+        ATTR2("dimensions", "padding", "vertical", NUM(i));
+    }
+    
+    if (read_int(db, "border.width", &i)) {
+        APPCONT3("window", "border", "width", NUM(i));
+        APPCONT3("menu", "border", "width", NUM(i));
+    }
+
+    if (read_color(db, "border.color", &i, &j, &k)) {
+        COLOR3("window", "border", "primary", i, j, k, 255);
+        COLOR3("menu", "border", "primary", i, j, k, 255);
+    }
+
+    if (read_int(db, "window.client.padding.width", &i))
+        APPCONT3("window", "clientborder", "width", NUM(i));
+
+    if (read_string(db, "window.label.text.justify", &s)) {
+        if (!g_ascii_strcasecmp(s, "right")) s = "right";
+        else if (!g_ascii_strcasecmp(s, "center")) s = "center";
+        else s = "left";
+        APPCONT5("window", "inactive", "label", "text", "justify", s);
+    }
+
+    if (read_string(db, "menu.title.text.justify", &s)) {
+        if (!g_ascii_strcasecmp(s, "right")) s = "right";
+        else if (!g_ascii_strcasecmp(s, "center")) s = "center";
+        else s = "left";
+        APPCONT4("menu", "title", "text", "justify", s);
+    }
+
+    if (read_int(db, "menu.overlap", &i))
+        APPCONT2("menu", "overlap", NUM(i));
+
+    if (read_color(db, "window.active.client.color", &i, &j, &k))
+        COLOR4("window","active","clientborder","primary",i,j,k,255);
+    
+    if (read_color(db, "window.inactive.client.color", &i, &j, &k))
+        COLOR4("window","inactive","clientborder","primary",i,j,k,255);
+
+    if (read_color(db, "window.active.label.text.color", &i, &j, &k))
+        COLOR5("window","active","label","text","primary",i,j,k,255);
+
+    if (read_color(db, "window.inactive.label.text.color", &i, &j, &k))
+        COLOR5("window","inactive","label","text","primary",i,j,k,255);
+
+    if (read_color(db, "window.active.button.unpressed.image.color",
+                   &i, &j, &k))
+        COLOR5("window","active","buttons","unpressed","image",i,j,k,255);
+
+    if (read_color(db, "window.inactive.button.unpressed.image.color",
+                   &i, &j, &k))
+        COLOR5("window","inactive","buttons","unpressed","image",i,j,k,255);
+
+    if (read_color(db, "window.active.button.pressed.image.color",
+                   &i, &j, &k))
+        COLOR5("window","active","buttons","pressed","image",i,j,k,255);
+
+    if (read_color(db, "window.inactive.button.pressed.image.color",
+                   &i, &j, &k))
+        COLOR5("window","inactive","buttons","pressed","image",i,j,k,255);
+
+    if (read_color(db, "window.active.button.disabled.image.color",
+                   &i, &j, &k))
+        COLOR5("window","active","buttons","disabled","image",i,j,k,255);
+
+    if (read_color(db, "window.inactive.button.disabled.image.color",
+                   &i, &j, &k))
+        COLOR5("window","inactive","buttons","disabled","image",i,j,k,255);
+
+    if (read_color(db, "window.active.button.hover.image.color",
+                   &i, &j, &k))
+        COLOR5("window","active","buttons","hover","image",i,j,k,255);
+
+    if (read_color(db, "window.inactive.button.hover.image.color",
+                   &i, &j, &k))
+        COLOR5("window","inactive","buttons","hover","image",i,j,k,255);
+
+    if (read_color(db, "window.active.button.toggled.image.color",
+                   &i, &j, &k))
+        COLOR5("window","active","buttons","toggled","image",i,j,k,255);
+
+    if (read_color(db, "window.inactive.button.toggled.image.color",
+                   &i, &j, &k))
+        COLOR5("window","inactive","buttons","toggled","image",i,j,k,255);
+
+    if (read_color(db, "menu.title.text.color",
+                   &i, &j, &k))
+        COLOR4("menu","title","text","primary",i,j,k,255);
+
+    if (read_color(db, "menu.items.text.color",
+                   &i, &j, &k))
+        COLOR4("menu","inactive","text","primary",i,j,k,255);
+
+    if (read_color(db, "menu.items.disabled.text.color",
+                   &i, &j, &k))
+        COLOR3("menu","disabled","primary",i,j,k,255);
+
+    if (read_color(db, "menu.items.active.text.color",
+                   &i, &j, &k))
+        COLOR4("menu","active","text","primary",i,j,k,255);
+
+    APPEARANCE3("window.active.title.bg", "window", "active", "titlebar");
+    APPEARANCE3("window.inactive.title.bg", "window", "inactive", "titlebar");
+    APPEARANCE3("window.active.label.bg", "window", "active", "label");
+    APPEARANCE3("window.inactive.label.bg", "window", "inactive", "label");
+    APPEARANCE3("window.active.handle.bg", "window", "active", "handle");
+    APPEARANCE3("window.inactive.handle.bg", "window", "inactive", "handle");
+    APPEARANCE3("window.active.grip.bg", "window", "active", "grip");
+    APPEARANCE3("window.inactive.grip.bg", "window", "inactive", "grip");
+    APPEARANCE2("menu.items.bg", "menu", "inactive");
+    APPEARANCE2("menu.items.active.bg", "menu", "active");
+    APPEARANCE2("menu.title.bg", "menu", "title");
+
+    APPEARANCE4("window.active.button.disabled.bg",
+                "window", "active", "buttons", "disabled");
+    APPEARANCE4("window.inactive.button.disabled.bg",
+                "window", "inactive", "buttons", "disabled");
+    APPEARANCE4("window.active.button.pressed.bg",
+                "window", "active", "buttons", "pressed");
+    APPEARANCE4("window.inactive.button.pressed.bg",
+                "window", "inactive", "buttons", "pressed");
+    APPEARANCE4("window.active.button.toggled.bg",
+                "window", "active", "buttons", "toggled");
+    APPEARANCE4("window.inactive.button.toggled.bg",
+                "window", "inactive", "buttons", "toggled");
+    APPEARANCE4("window.active.button.unpressed.bg",
+                "window", "active", "buttons", "unpressed");
+    APPEARANCE4("window.inactive.button.unpressed.bg",
+                "window", "inactive", "buttons", "unpressed");
+    APPEARANCE4("window.active.button.hover.bg",
+                "window", "active", "buttons", "hover");
+    APPEARANCE4("window.inactive.button.hover.bg",
+                "window", "inactive", "buttons", "hover");
+
+    if (read_string(db, "window.active.label.text.font", &s)) {
+        char *p;
+        if (strstr(s, "shadow=y")) {
+            if ((p = strstr(s, "shadowoffset=")))
+                i = parse_inline_number(p + strlen("shadowoffset="));
+            else
+                i = 1;
+            APPATTR6("window","active","label","text","shadow","offset",
+                     "x",NUM(i));
+            APPATTR6("window","active","label","text","shadow","offset",
+                     "y",NUM(i));
+        }
+        if ((p = strstr(s, "shadowtint=")))
+        {
+            i = parse_inline_number(p + strlen("shadowtint="));
+            j = (i > 0 ? 0 : 255);
+            i = ABS(i);
+            COLOR6("window","active","label","text","shadow","primary",
+                   j,j,j,i);
+        }
+    }
+
+    if (read_string(db, "window.inactive.label.text.font", &s)) {
+        char *p;
+        if (strstr(s, "shadow=y")) {
+            if ((p = strstr(s, "shadowoffset=")))
+                i = parse_inline_number(p + strlen("shadowoffset="));
+            else
+                i = 1;
+            APPATTR6("window","inactive","label","text","shadow","offset",
+                     "x",NUM(i));
+            APPATTR6("window","inactive","label","text","shadow","offset",
+                     "y",NUM(i));
+        }
+        if ((p = strstr(s, "shadowtint=")))
+        {
+            i = parse_inline_number(p + strlen("shadowtint="));
+            j = (i > 0 ? 0 : 255);
+            i = ABS(i);
+            COLOR6("window","inactive","label","text","shadow","primary",
+                   j,j,j,i);
+        }
+    }
+
+    if (read_string(db, "menu.title.text.font", &s)) {
+        char *p;
+        if (strstr(s, "shadow=y")) {
+            if ((p = strstr(s, "shadowoffset=")))
+                i = parse_inline_number(p + strlen("shadowoffset="));
+            else
+                i = 1;
+            APPATTR5("menu","title","text","shadow","offset","x",NUM(i));
+            APPATTR5("menu","title","text","shadow","offset","y",NUM(i));
+        }
+        if ((p = strstr(s, "shadowtint=")))
+        {
+            i = parse_inline_number(p + strlen("shadowtint="));
+            j = (i > 0 ? 0 : 255);
+            i = ABS(i);
+            COLOR5("menu","title","text","shadow","primary",j,j,j,i);
+        }
+    }
+
+    if (read_string(db, "menu.items.text.font", &s)) {
+        char *p;
+        if (strstr(s, "shadow=y")) {
+            if ((p = strstr(s, "shadowoffset=")))
+                i = parse_inline_number(p + strlen("shadowoffset="));
+            else
+                i = 1;
+            APPATTR5("menu","inactive","text","shadow","offset","x",NUM(i));
+            APPATTR5("menu","inactive","text","shadow","offset","y",NUM(i));
+            APPATTR5("menu","active","text","shadow","offset","x",NUM(i));
+            APPATTR5("menu","active","text","shadow","offset","y",NUM(i));
+            APPATTR5("menu","disabled","text","shadow","offset","x",NUM(i));
+            APPATTR5("menu","disabled","text","shadow","offset","y",NUM(i));
+        }
+        if ((p = strstr(s, "shadowtint=")))
+        {
+            i = parse_inline_number(p + strlen("shadowtint="));
+            j = (i > 0 ? 0 : 255);
+            i = ABS(i);
+            COLOR5("menu","inactive","text","shadow","primary",j,j,j,i);
+            COLOR5("menu","active","text","shadow","primary",j,j,j,i);
+            COLOR5("menu","disabled","text","shadow","primary",j,j,j,i);
+        }
+    }
+
+    if (xmlSaveFormatFile("-", doc, 1) < 0) {
+        printf("Error writing the xml tree\n");
+        ret = 1;
+    }
+
+    xmlFreeDoc(doc);
+    return ret;
+}