1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
3 parse.c for the Openbox window manager
4 Copyright (c) 2003-2007 Dana Jansens
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 See the COPYING file for a copy of the GNU General Public License.
24 #include <sys/types.h>
27 static gboolean xdg_start;
28 static gchar *xdg_config_home_path;
29 static gchar *xdg_data_home_path;
30 static GSList *xdg_config_dir_paths;
31 static GSList *xdg_data_dir_paths;
40 GHashTable *callbacks;
43 static void destfunc(struct Callback *c)
49 ObParseInst* parse_startup(void)
51 ObParseInst *i = g_new(ObParseInst, 1);
52 i->callbacks = g_hash_table_new_full(g_str_hash, g_str_equal, NULL,
53 (GDestroyNotify)destfunc);
57 void parse_shutdown(ObParseInst *i)
60 g_hash_table_destroy(i->callbacks);
65 void parse_register(ObParseInst *i, const gchar *tag,
66 ParseCallback func, gpointer data)
70 if ((c = g_hash_table_lookup(i->callbacks, tag))) {
71 g_error("Tag '%s' already registered", tag);
75 c = g_new(struct Callback, 1);
76 c->tag = g_strdup(tag);
79 g_hash_table_insert(i->callbacks, c->tag, c);
82 gboolean parse_load_rc(const gchar *file, xmlDocPtr *doc, xmlNodePtr *root)
87 if (file && parse_load(file, "openbox_config", doc, root))
90 for (it = xdg_config_dir_paths; !r && it; it = g_slist_next(it)) {
93 path = g_build_filename(it->data, "openbox", "rc.xml", NULL);
94 r = parse_load(path, "openbox_config", doc, root);
101 gboolean parse_load_theme(const gchar *name, xmlDocPtr *doc, xmlNodePtr *root,
109 /* backward compatibility.. */
110 path = g_build_filename(g_get_home_dir(), ".themes", name,
111 "openbox-3", "themerc.xml", NULL);
112 if (parse_load(path, "openbox_theme", doc, root) &&
113 parse_attr_string("engine", *root, &eng))
115 if (!strcmp(eng, "box")) {
116 *retpath = g_path_get_dirname(path);
124 for (it = xdg_data_dir_paths; !r && it; it = g_slist_next(it)) {
125 path = g_build_filename(it->data, "themes", name, "openbox-3",
126 "themerc.xml", NULL);
127 if (parse_load(path, "openbox_theme", doc, root) &&
128 parse_attr_string("engine", *root, &eng))
130 if (!strcmp(eng, "box")) {
131 *retpath = g_path_get_dirname(path);
142 gboolean parse_load_menu(const gchar *file, xmlDocPtr *doc, xmlNodePtr *root)
148 if (file[0] == '/') {
149 r = parse_load(file, "openbox_menu", doc, root);
151 for (it = xdg_config_dir_paths; !r && it; it = g_slist_next(it)) {
152 path = g_build_filename(it->data, "openbox", file, NULL);
153 r = parse_load(path, "openbox_menu", doc, root);
160 gboolean parse_load(const gchar *path, const gchar *rootname,
161 xmlDocPtr *doc, xmlNodePtr *root)
165 if (stat(path, &s) < 0)
168 /* XML_PARSE_BLANKS is needed apparently. When it loads a theme file,
169 without this option, the tree is weird and has extra nodes in it. */
170 if ((*doc = xmlReadFile(path, NULL,
171 XML_PARSE_NOBLANKS | XML_PARSE_RECOVER))) {
172 *root = xmlDocGetRootElement(*doc);
176 g_message("%s is an empty document", path);
178 if (xmlStrcmp((*root)->name, (const xmlChar*)rootname)) {
181 g_message("XML Document %s is of wrong type. Root "
182 "node is not '%s'", path, rootname);
191 gboolean parse_load_mem(gpointer data, guint len, const gchar *rootname,
192 xmlDocPtr *doc, xmlNodePtr *root)
194 if ((*doc = xmlParseMemory(data, len))) {
195 *root = xmlDocGetRootElement(*doc);
199 g_message("Given memory is an empty document");
201 if (xmlStrcmp((*root)->name, (const xmlChar*)rootname)) {
204 g_message("XML Document in given memory is of wrong "
205 "type. Root node is not '%s'\n", rootname);
214 void parse_close(xmlDocPtr doc)
219 void parse_tree(ObParseInst *i, xmlDocPtr doc, xmlNodePtr node)
222 struct Callback *c = g_hash_table_lookup(i->callbacks, node->name);
225 c->func(i, doc, node, c->data);
231 gchar *parse_string(xmlDocPtr doc, xmlNodePtr node)
233 xmlChar *c = xmlNodeListGetString(doc, node->children, TRUE);
234 gchar *s = g_strdup(c ? (gchar*)c : "");
239 gint parse_int(xmlDocPtr doc, xmlNodePtr node)
241 xmlChar *c = xmlNodeListGetString(doc, node->children, TRUE);
242 gint i = c ? atoi((gchar*)c) : 0;
247 gboolean parse_bool(xmlDocPtr doc, xmlNodePtr node)
249 xmlChar *c = xmlNodeListGetString(doc, node->children, TRUE);
251 if (c && !xmlStrcasecmp(c, (const xmlChar*) "true"))
253 else if (c && !xmlStrcasecmp(c, (const xmlChar*) "yes"))
255 else if (c && !xmlStrcasecmp(c, (const xmlChar*) "on"))
261 gboolean parse_contains(const gchar *val, xmlDocPtr doc, xmlNodePtr node)
263 xmlChar *c = xmlNodeListGetString(doc, node->children, TRUE);
265 r = !xmlStrcasecmp(c, (const xmlChar*) val);
270 xmlNodePtr parse_find_node(const gchar *tag, xmlNodePtr node)
273 if (!xmlStrcmp(node->name, (const xmlChar*) tag))
280 gboolean parse_attr_bool(const gchar *name, xmlNodePtr node, gboolean *value)
282 xmlChar *c = xmlGetProp(node, (const xmlChar*) name);
285 if (!xmlStrcasecmp(c, (const xmlChar*) "true"))
286 *value = TRUE, r = TRUE;
287 else if (!xmlStrcasecmp(c, (const xmlChar*) "yes"))
288 *value = TRUE, r = TRUE;
289 else if (!xmlStrcasecmp(c, (const xmlChar*) "on"))
290 *value = TRUE, r = TRUE;
291 else if (!xmlStrcasecmp(c, (const xmlChar*) "false"))
292 *value = FALSE, r = TRUE;
293 else if (!xmlStrcasecmp(c, (const xmlChar*) "no"))
294 *value = FALSE, r = TRUE;
295 else if (!xmlStrcasecmp(c, (const xmlChar*) "off"))
296 *value = FALSE, r = TRUE;
302 gboolean parse_attr_int(const gchar *name, xmlNodePtr node, gint *value)
304 xmlChar *c = xmlGetProp(node, (const xmlChar*) name);
307 *value = atoi((gchar*)c);
314 gboolean parse_attr_string(const gchar *name, xmlNodePtr node, gchar **value)
316 xmlChar *c = xmlGetProp(node, (const xmlChar*) name);
319 *value = g_strdup((gchar*)c);
326 gboolean parse_attr_contains(const gchar *val, xmlNodePtr node,
329 xmlChar *c = xmlGetProp(node, (const xmlChar*) name);
332 r = !xmlStrcasecmp(c, (const xmlChar*) val);
337 static gint slist_path_cmp(const gchar *a, const gchar *b)
342 typedef GSList* (*GSListFunc) (gpointer list, gconstpointer data);
344 static GSList* slist_path_add(GSList *list, gpointer data, GSListFunc func)
351 if (!g_slist_find_custom(list, data, (GCompareFunc) slist_path_cmp))
352 list = func(list, data);
359 static GSList* split_paths(const gchar *paths)
366 spl = g_strsplit(paths, ":", -1);
367 for (it = spl; *it; ++it)
368 list = slist_path_add(list, *it, (GSListFunc) g_slist_append);
373 void parse_paths_startup(void)
381 path = g_getenv("XDG_CONFIG_HOME");
382 if (path && path[0] != '\0') /* not unset or empty */
383 xdg_config_home_path = g_build_filename(path, NULL);
385 xdg_config_home_path = g_build_filename(g_get_home_dir(), ".config",
388 path = g_getenv("XDG_DATA_HOME");
389 if (path && path[0] != '\0') /* not unset or empty */
390 xdg_data_home_path = g_build_filename(path, NULL);
392 xdg_data_home_path = g_build_filename(g_get_home_dir(), ".local",
395 path = g_getenv("XDG_CONFIG_DIRS");
396 if (path && path[0] != '\0') /* not unset or empty */
397 xdg_config_dir_paths = split_paths(path);
399 xdg_config_dir_paths = slist_path_add(xdg_config_dir_paths,
401 (GSListFunc) g_slist_append);
402 xdg_config_dir_paths = slist_path_add(xdg_config_dir_paths,
406 (GSListFunc) g_slist_append);
408 xdg_config_dir_paths = slist_path_add(xdg_config_dir_paths,
409 g_strdup(xdg_config_home_path),
410 (GSListFunc) g_slist_prepend);
412 path = g_getenv("XDG_DATA_DIRS");
413 if (path && path[0] != '\0') /* not unset or empty */
414 xdg_data_dir_paths = split_paths(path);
416 xdg_data_dir_paths = slist_path_add(xdg_data_dir_paths,
418 (GSListFunc) g_slist_append);
419 xdg_data_dir_paths = slist_path_add(xdg_data_dir_paths,
422 "usr", "local", "share", NULL),
423 (GSListFunc) g_slist_append);
424 xdg_data_dir_paths = slist_path_add(xdg_data_dir_paths,
427 "usr", "share", NULL),
428 (GSListFunc) g_slist_append);
430 xdg_data_dir_paths = slist_path_add(xdg_data_dir_paths,
431 g_strdup(xdg_data_home_path),
432 (GSListFunc) g_slist_prepend);
435 void parse_paths_shutdown(void)
443 for (it = xdg_config_dir_paths; it; it = g_slist_next(it))
445 g_slist_free(xdg_config_dir_paths);
446 xdg_config_dir_paths = NULL;
447 for (it = xdg_data_dir_paths; it; it = g_slist_next(it))
449 g_slist_free(xdg_data_dir_paths);
450 xdg_data_dir_paths = NULL;
451 g_free(xdg_config_home_path);
452 xdg_config_home_path = NULL;
453 g_free(xdg_data_home_path);
454 xdg_data_home_path = NULL;
457 gchar *parse_expand_tilde(const gchar *f)
465 regex = g_regex_new("(?:^|(?<=[ \\t]))~(?=[/ \\t$])", G_REGEX_MULTILINE | G_REGEX_RAW, 0, NULL);
466 ret = g_regex_replace_literal(regex, f, -1, 0, g_get_home_dir(), 0, NULL);
467 g_regex_unref(regex);
472 gboolean parse_mkdir(const gchar *path, gint mode)
476 g_return_val_if_fail(path != NULL, FALSE);
477 g_return_val_if_fail(path[0] != '\0', FALSE);
479 if (!g_file_test(path, G_FILE_TEST_IS_DIR))
480 if (mkdir(path, mode) == -1)
486 gboolean parse_mkdir_path(const gchar *path, gint mode)
490 g_return_val_if_fail(path != NULL, FALSE);
491 g_return_val_if_fail(path[0] == '/', FALSE);
493 if (!g_file_test(path, G_FILE_TEST_IS_DIR)) {
498 while ((e = strchr(e + 1, '/'))) {
500 if (!(ret = parse_mkdir(c, mode)))
501 goto parse_mkdir_path_end;
504 ret = parse_mkdir(c, mode);
506 parse_mkdir_path_end:
513 const gchar* parse_xdg_config_home_path(void)
515 return xdg_config_home_path;
518 const gchar* parse_xdg_data_home_path(void)
520 return xdg_data_home_path;
523 GSList* parse_xdg_config_dir_paths(void)
525 return xdg_config_dir_paths;
528 GSList* parse_xdg_data_dir_paths(void)
530 return xdg_data_dir_paths;