path: root/lib/widgets/ephy-toolbars-group.c

/*
 *  Copyright (C) 2002 Marco Pesenti Gritti
 *
 *  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, 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.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */

#include "ephy-toolbars-group.h"
#include "ephy-debug.h"

#include <libgnome/gnome-i18n.h>
#include <string.h>

static void ephy_toolbars_group_class_init   (EphyToolbarsGroupClass *klass);
static void ephy_toolbars_group_init     (EphyToolbarsGroup *t);
static void ephy_toolbars_group_finalize     (GObject *object);

enum
{
    CHANGED,
    LAST_SIGNAL
};

static guint ephy_toolbars_group_signals[LAST_SIGNAL] = { 0 };

static GObjectClass *parent_class = NULL;

struct EphyToolbarsGroupPrivate
{
    GNode *available_actions;
    GNode *toolbars;
    char *defaults;
    char *user;
};

GType
ephy_toolbars_group_get_type (void)
{
        static GType ephy_toolbars_group_type = 0;

        if (ephy_toolbars_group_type == 0)
        {
                static const GTypeInfo our_info =
                {
                        sizeof (EphyToolbarsGroupClass),
                        NULL, /* base_init */
                        NULL, /* base_finalize */
                        (GClassInitFunc) ephy_toolbars_group_class_init,
                        NULL,
                        NULL, /* class_data */
                        sizeof (EphyToolbarsGroup),
                        0, /* n_preallocs */
                        (GInstanceInitFunc) ephy_toolbars_group_init
                };

                ephy_toolbars_group_type = g_type_register_static (G_TYPE_OBJECT,
                                           "EphyToolbarsGroup",
                                           &our_info, 0);
        }

        return ephy_toolbars_group_type;

}

static xmlDocPtr
ephy_toolbars_group_to_xml (EphyToolbarsGroup *t)
{
    GNode *l1, *l2, *tl;
    xmlDocPtr doc;

    g_return_val_if_fail (IS_EPHY_TOOLBARS_GROUP (t), NULL);

    tl = t->priv->toolbars;

    xmlIndentTreeOutput = TRUE;
    doc = xmlNewDoc ("1.0");
    doc->children = xmlNewDocNode (doc, NULL, "toolbars", NULL);

    for (l1 = tl->children; l1 != NULL; l1 = l1->next)
    {
        xmlNodePtr tnode;

        tnode = xmlNewChild (doc->children, NULL, "toolbar", NULL);

        for (l2 = l1->children; l2 != NULL; l2 = l2->next)
        {
            xmlNodePtr node;
            EphyToolbarsItem *item = l2->data;

            if (item->separator)
            {
                 node = xmlNewChild (tnode, NULL, "separator", NULL);
            }
            else
            {
                node = xmlNewChild (tnode, NULL, "toolitem", NULL);
                xmlSetProp (node, "verb", item->action);
            }
        }
    }

    return doc;
}

static void
toolbars_group_save (EphyToolbarsGroup *t)
{
    xmlDocPtr doc;

    g_return_if_fail (IS_EPHY_TOOLBARS_GROUP (t));

    doc = ephy_toolbars_group_to_xml (t);
    xmlSaveFormatFile (t->priv->user, doc, 1);
    xmlFreeDoc (doc);
}

static EphyToolbarsToolbar *
toolbars_toolbar_new (void)
{
    EphyToolbarsToolbar *toolbar;
    static int id = 0;

    toolbar = g_new0 (EphyToolbarsToolbar, 1);
    toolbar->id = g_strdup_printf ("Toolbar%d", id);

    id++;

    return toolbar;
}

static EphyToolbarsItem *
toolbars_item_new (const char *action, gboolean separator)
{
    EphyToolbarsItem *item;
    static int id = 0;

    g_return_val_if_fail (action != NULL, NULL);

    item = g_new0 (EphyToolbarsItem, 1);
    item->action = g_strdup (action);
    item->separator = separator;
    item->id = g_strdup_printf ("TI%d", id);

    id++;

    return item;
}

static void
free_toolbar_node (EphyToolbarsToolbar *toolbar)
{
    g_return_if_fail (toolbar != NULL);

    g_free (toolbar->id);
    g_free (toolbar);
}

static void
free_item_node (EphyToolbarsItem *item)
{
    g_return_if_fail (item != NULL);

    g_free (item->action);
    g_free (item->id);
    g_free (item);
}

static void
add_action (EphyToolbarsGroup *t,
        GNode *parent,
        int pos,
        const char *name)
{
    EphyToolbarsItem *item;
    GNode *node;
    gboolean separator;

    LOG ("Add action, name %s", name)

    separator = (strcmp (name, "separator") == 0);
    item = toolbars_item_new (name, separator);
    item->parent = parent->data;
    node = g_node_new (item);

    g_node_insert (parent, pos, node);
}

void
ephy_toolbars_group_add_item (EphyToolbarsGroup *t,
                  EphyToolbarsToolbar *parent,
                  int pos,
                  const char *name)
{
    GNode *parent_node;

    g_return_if_fail (IS_EPHY_TOOLBARS_GROUP (t));
    g_return_if_fail (parent != NULL);
    g_return_if_fail (name != NULL);

    parent_node = g_node_find (t->priv->toolbars, G_IN_ORDER, G_TRAVERSE_ALL, parent);

    add_action (t, parent_node, pos, name);

    toolbars_group_save (t);

    g_signal_emit (G_OBJECT (t), ephy_toolbars_group_signals[CHANGED], 0);
}

static void
parse_item_list (EphyToolbarsGroup *t,
         xmlNodePtr child,
         GNode *parent)
{
    while (child)
    {
        if (xmlStrEqual (child->name, "toolitem"))
        {
            xmlChar *verb;

            verb = xmlGetProp (child, "verb");
            add_action (t, parent, -1, verb);

            xmlFree (verb);
        }
        else if (xmlStrEqual (child->name, "separator"))
        {
            add_action (t, parent, -1, "separator");
        }

        child = child->next;
    }
}

static GNode *
add_toolbar (EphyToolbarsGroup *t)
{
    EphyToolbarsToolbar *toolbar;
    GNode *node;

    toolbar = toolbars_toolbar_new ();
    node = g_node_new (toolbar);
    g_node_append (t->priv->toolbars, node);

    return node;
}

EphyToolbarsToolbar *
ephy_toolbars_group_add_toolbar (EphyToolbarsGroup *t)
{
    GNode *node;

    g_return_val_if_fail (IS_EPHY_TOOLBARS_GROUP (t), NULL);

    node = add_toolbar (t);
    g_return_val_if_fail (node != NULL, NULL);

    toolbars_group_save (t);

    g_signal_emit (G_OBJECT (t), ephy_toolbars_group_signals[CHANGED], 0);

    return node->data;
}

static void
parse_toolbars (EphyToolbarsGroup *t,
        xmlNodePtr child)
{
    while (child)
    {
        if (xmlStrEqual (child->name, "toolbar"))
        {
            GNode *node;

            node = add_toolbar (t);
            parse_item_list (t, child->children, node);
        }

        child = child->next;
    }
}

static void
load_defaults (EphyToolbarsGroup *t)
{
    xmlDocPtr doc;
        xmlNodePtr child;
    xmlNodePtr root;
    const char *xml_filepath;

    g_return_if_fail (IS_EPHY_TOOLBARS_GROUP (t));

    LOG ("Load default toolbar info")

    xml_filepath = t->priv->defaults;

    doc = xmlParseFile (xml_filepath);
    root = xmlDocGetRootElement (doc);

    child = root->children;
    while (child)
    {
        if (xmlStrEqual (child->name, "available"))
        {
            t->priv->available_actions = g_node_new (NULL);
            parse_item_list (t, child->children,
                     t->priv->available_actions);
        }
        else if (xmlStrEqual (child->name, "default") &&
             t->priv->toolbars == NULL)
        {
            t->priv->toolbars = g_node_new (NULL);
            parse_toolbars (t, child->children);
        }

        child = child->next;
    }

    xmlFreeDoc (doc);
}

static void
load_toolbar (EphyToolbarsGroup *t)
{
    xmlDocPtr doc;
    xmlNodePtr root;
    const char *xml_filepath = t->priv->user;

    g_return_if_fail (IS_EPHY_TOOLBARS_GROUP (t));

    LOG ("Load custom toolbar")

    if (!g_file_test (xml_filepath, G_FILE_TEST_EXISTS)) return;

    doc = xmlParseFile (xml_filepath);
    root = xmlDocGetRootElement (doc);

    t->priv->toolbars = g_node_new (NULL);
    parse_toolbars (t, root->children);

    xmlFreeDoc (doc);
}

char *
ephy_toolbars_group_to_string (EphyToolbarsGroup *t)
{
    GString *s;
    GNode *l1, *l2, *tl;
    char *result;
    int k = 0;

    g_return_val_if_fail (IS_EPHY_TOOLBARS_GROUP (t), NULL);

    tl = t->priv->toolbars;

    g_return_val_if_fail (tl != NULL, NULL);

    s = g_string_new (NULL);
    g_string_append (s, "<Root>");
    for (l1 = tl->children; l1 != NULL; l1 = l1->next)
    {
        int i = 0;
        EphyToolbarsToolbar *toolbar = l1->data;

        g_string_append_printf
            (s, "<dockitem name=\"%s\">\n", toolbar->id);

        for (l2 = l1->children; l2 != NULL; l2 = l2->next)
        {
            EphyToolbarsItem *item = l2->data;

            if (item->separator)
            {
                g_string_append_printf
                    (s, "<placeholder name=\"PlaceHolder%d-%d\">"
                     "<separator name=\"%s\"/>"
                     "</placeholder>\n", i, k, item->id);
            }
            else
            {
                g_string_append_printf
                    (s, "<placeholder name=\"PlaceHolder%d-%d\">"
                     "<toolitem name=\"%s\" verb=\"%s\"/>"
                     "</placeholder>\n",
                     i, k, item->id, item->action);
            }
            i++;
        }

        g_string_append (s, "</dockitem>\n");

        k++;
    }
    g_string_append (s, "</Root>");

    result = g_string_free (s, FALSE);

    return result;
}

static void
ephy_toolbars_group_class_init (EphyToolbarsGroupClass *klass)
{
        GObjectClass *object_class = G_OBJECT_CLASS (klass);

        parent_class = g_type_class_peek_parent (klass);

        object_class->finalize = ephy_toolbars_group_finalize;

    ephy_toolbars_group_signals[CHANGED] =
        g_signal_new ("changed",
                  G_OBJECT_CLASS_TYPE (object_class),
                  G_SIGNAL_RUN_LAST,
                  G_STRUCT_OFFSET (EphyToolbarsGroupClass, changed),
                  NULL, NULL,
                  g_cclosure_marshal_VOID__VOID,
                  G_TYPE_NONE,
                  0);

}

static void
ephy_toolbars_group_init (EphyToolbarsGroup *t)
{
        t->priv = g_new0 (EphyToolbarsGroupPrivate, 1);

    t->priv->available_actions = NULL;
    t->priv->toolbars = NULL;
    t->priv->user = NULL;
    t->priv->defaults = NULL;
}

static void
ephy_toolbars_group_finalize (GObject *object)
{
    EphyToolbarsGroup *t = EPHY_TOOLBARS_GROUP (object);

        g_return_if_fail (object != NULL);
        g_return_if_fail (IS_EPHY_TOOLBARS_GROUP (object));

    g_node_children_foreach (t->priv->available_actions, G_IN_ORDER,
                 (GNodeForeachFunc)free_item_node, NULL);
    ephy_toolbars_group_foreach_toolbar
        (t, (EphyToolbarsGroupForeachToolbarFunc)free_toolbar_node, NULL);
    ephy_toolbars_group_foreach_item
        (t, (EphyToolbarsGroupForeachItemFunc)free_item_node, NULL);
    g_node_destroy (t->priv->available_actions);
    g_node_destroy (t->priv->toolbars);

    g_free (t->priv->user);
    g_free (t->priv->defaults);

        g_free (t->priv);

    LOG ("EphyToolbarsGroup finalized")

        G_OBJECT_CLASS (parent_class)->finalize (object);
}

EphyToolbarsGroup *
ephy_toolbars_group_new (void)
{
    EphyToolbarsGroup *t;

    t = EPHY_TOOLBARS_GROUP (g_object_new (EPHY_TOOLBARS_GROUP_TYPE,
                   NULL));

    g_return_val_if_fail (t->priv != NULL, NULL);

    return t;
}

void
ephy_toolbars_group_remove_toolbar (EphyToolbarsGroup *t,
                    EphyToolbarsToolbar *toolbar)
{
    GNode *node;

    g_return_if_fail (IS_EPHY_TOOLBARS_GROUP (t));
    g_return_if_fail (toolbar != NULL);

    node = g_node_find (t->priv->toolbars, G_IN_ORDER, G_TRAVERSE_ALL, toolbar);
    g_return_if_fail (node != NULL);
    free_toolbar_node (node->data);
    g_node_destroy (node);

    toolbars_group_save (t);

    g_signal_emit (G_OBJECT (t), ephy_toolbars_group_signals[CHANGED], 0);
}

void
ephy_toolbars_group_remove_item (EphyToolbarsGroup *t,
                 EphyToolbarsItem *item)
{
    GNode *node;
    GNode *toolbar;

    g_return_if_fail (IS_EPHY_TOOLBARS_GROUP (t));
    g_return_if_fail (item != NULL);

    node = g_node_find (t->priv->toolbars, G_IN_ORDER, G_TRAVERSE_ALL, item);
    g_return_if_fail (node != NULL);
    toolbar = node->parent;
    free_item_node (node->data);
    g_node_destroy (node);

    if (g_node_n_children (toolbar) == 0)
    {
        free_toolbar_node (toolbar->data);
        g_node_destroy (toolbar);
    }

    toolbars_group_save (t);

    g_signal_emit (G_OBJECT (t), ephy_toolbars_group_signals[CHANGED], 0);
}

void
ephy_toolbars_group_set_source (EphyToolbarsGroup *group,
                const char *defaults,
                const char *user)
{
    g_return_if_fail (IS_EPHY_TOOLBARS_GROUP (group));
    g_return_if_fail (defaults != NULL);
    g_return_if_fail (user != NULL);

    group->priv->defaults = g_strdup (defaults);
    group->priv->user = g_strdup (user);

    load_toolbar (group);
    load_defaults (group);
}

static gboolean
is_item_in_toolbars (EphyToolbarsGroup *group, const char *action)
{
    GNode *l1, *l2;

    g_return_val_if_fail (IS_EPHY_TOOLBARS_GROUP (group), FALSE);
    g_return_val_if_fail (action != NULL, FALSE);

    for (l1 = group->priv->toolbars->children; l1 != NULL; l1 = l1->next)
    {
        for (l2 = l1->children; l2 != NULL; l2 = l2->next)
        {
            EphyToolbarsItem *item;

            item = (EphyToolbarsItem *) l2->data;
            if (strcmp (action, item->action) == 0) return TRUE;
        }
    }

    return FALSE;
}

void
ephy_toolbars_group_foreach_available (EphyToolbarsGroup *group,
                       EphyToolbarsGroupForeachItemFunc func,
                       gpointer data)
{
    GNode *l1;

    g_return_if_fail (IS_EPHY_TOOLBARS_GROUP (group));

    for (l1 = group->priv->available_actions->children; l1 != NULL; l1 = l1->next)
    {
        EphyToolbarsItem *item;

        item = (EphyToolbarsItem *)l1->data;

        if (!is_item_in_toolbars (group, item->action))
        {
            func (item, data);
        }
    }
}

void
ephy_toolbars_group_foreach_toolbar (EphyToolbarsGroup *group,
                     EphyToolbarsGroupForeachToolbarFunc func,
                     gpointer data)
{
    GNode *l1;

    g_return_if_fail (IS_EPHY_TOOLBARS_GROUP (group));

    for (l1 = group->priv->toolbars->children; l1 != NULL; l1 = l1->next)
    {
        func (l1->data, data);
    }
}

void
ephy_toolbars_group_foreach_item (EphyToolbarsGroup *group,
                  EphyToolbarsGroupForeachItemFunc func,
                  gpointer data)
{
    GNode *l1, *l2;

    g_return_if_fail (IS_EPHY_TOOLBARS_GROUP (group));

    for (l1 = group->priv->toolbars->children; l1 != NULL; l1 = l1->next)
    {
        for (l2 = l1->children; l2 != NULL; l2 = l2->next)
        {
            func (l2->data, data);
        }
    }
}

char *
ephy_toolbars_group_get_path (EphyToolbarsGroup *t,
                  gpointer item)
{
    GNode *node;
    char *path = NULL;
    EphyToolbarsItem *titem;
    EphyToolbarsToolbar *toolbar;

    g_return_val_if_fail (IS_EPHY_TOOLBARS_GROUP (t), NULL);

    node = g_node_find (t->priv->toolbars, G_IN_ORDER, G_TRAVERSE_ALL, item);
    g_return_val_if_fail (node != NULL, NULL);
    titem = (EphyToolbarsItem *)node->data;
    toolbar = (EphyToolbarsToolbar *)node->data;

    switch (g_node_depth (node))
    {
        case 2:
            path = g_strdup_printf ("/%s", toolbar->id);
            break;
        case 3:
            path = g_strdup_printf
                ("/Toolbar%d/PlaceHolder%d-%d/%s",
                 g_node_child_position (node->parent->parent, node->parent),
                 g_node_child_position (node->parent, node),
                 g_node_child_position (node->parent->parent, node->parent),
                 titem->id);
            break;
        default:
            g_assert_not_reached ();
    }

    return path;
}