/* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-

   tree.c for ObConf, the configuration tool for Openbox
   Copyright (c) 2003        Ben 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 "tree.h"
#include "main.h"
#include "openbox/parse.h"

#include <sys/types.h>
#include <signal.h>

xmlNodePtr tree_get_node(const gchar *path, const gchar *def)
{
    xmlNodePtr n, c;
    gchar **nodes;
    gchar **it, **next;

    n = root;

    nodes = g_strsplit(path, "/", 0);
    for (it = nodes; *it; it = next) {
        next = it + 1;
        c = parse_find_node(*it, n->children);
        if (!c)
            c = xmlNewTextChild(n, NULL, *it, *next ? NULL : def);
        n = c;
    }

    g_strfreev(nodes);

    return n;
}

void tree_apply()
{
    gchar *p;
    gboolean err;

    p = g_build_filename(parse_xdg_config_home_path(), "openbox", NULL);
    parse_mkdir_path(p, 0700);
    g_free(p);

    p = g_build_filename(parse_xdg_config_home_path(), "openbox",
                         "rc.xml", NULL);
    err = xmlSaveFormatFile(p, doc, 1) == -1;
    if (err) {
        gchar *s;
        s = g_strdup_printf("An error occured while saving the "
                            "config file '%s'", p);
        obconf_error(s);
        g_free(s);
    }
    g_free(p);

    if (!err) {
        GdkAtom type;
        gint format;
        gint length;
        guint *pid;

        if (gdk_property_get
            (gdk_screen_get_root_window(gdk_screen_get_default()),
             gdk_atom_intern("_OPENBOX_PID", FALSE),
             gdk_atom_intern("CARDINAL", FALSE),
             0, 4, FALSE, &type, &format, &length, (guchar**)&pid)) {
            kill(*pid, SIGUSR2);
            g_free(pid);
        }
    }
}

void tree_set_string(const gchar *node, const gchar *value)
{
    xmlNodePtr n;

    n = tree_get_node(node, NULL);
    xmlNodeSetContent(n, (const xmlChar*) value);

    tree_apply();
}

void tree_set_int(const gchar *node, const gint value)
{
    xmlNodePtr n;
    gchar *s;

    n = tree_get_node(node, NULL);
    s = g_strdup_printf("%d", value);
    xmlNodeSetContent(n, (const xmlChar*) s);
    g_free(s);

    tree_apply();
}

void tree_set_bool(const gchar *node, const gboolean value)
{
    xmlNodePtr n;

    n = tree_get_node(node, NULL);
    xmlNodeSetContent(n, (const xmlChar*) (value ? "yes" : "no"));

    tree_apply();
}

gchar* tree_get_string(const gchar *node, const gchar *def)
{
    xmlNodePtr n;

    n = tree_get_node(node, def);
    return parse_string(doc, n);
}

gint tree_get_int(const gchar *node, gint def)
{
    xmlNodePtr n;
    gchar *d;

    d = g_strdup_printf("%d", def);
    n = tree_get_node(node, d);
    g_free(d);
    return parse_int(doc, n);
}

gboolean tree_get_bool(const gchar *node, gboolean def)
{
    xmlNodePtr n;

    n = tree_get_node(node, (def ? "yes" : "no"));
    return parse_bool(doc, n);
}