summaryrefslogtreecommitdiff
path: root/saedit/xml.c
diff options
context:
space:
mode:
Diffstat (limited to 'saedit/xml.c')
-rw-r--r--saedit/xml.c385
1 files changed, 385 insertions, 0 deletions
diff --git a/saedit/xml.c b/saedit/xml.c
new file mode 100644
index 0000000..90c4d76
--- /dev/null
+++ b/saedit/xml.c
@@ -0,0 +1,385 @@
+#include "xml.h"
+#include <string.h>
+
+gchar **
+xml_attr_new (
+ const gchar *name,
+ const gchar *value
+) {
+ gchar **attr = g_new0(gchar*, 2);
+ attr[0] = g_strdup(name);
+ attr[1] = g_strdup(value);
+ return attr;
+}
+
+gchar *
+xml_node_get_attr_value (
+ const XMLNode *node,
+ const gchar *attr_name
+) {
+ gchar **attr = node->attributes;
+ guint i;
+ for (i = 0; i < g_strv_length(attr); i += 2)
+ if (g_str_equal(attr[i], attr_name))
+ return g_strdup (attr[i + 1]);
+ return NULL;
+}
+
+gint
+xml_node_get_int_attr_value (
+ const XMLNode *node,
+ const gchar *attr_name,
+ gint retval
+) {
+ gchar *val = xml_node_get_attr_value (node, attr_name);
+
+ if (val != NULL) {
+ try_strtoint (val, &retval);
+ g_free (val);
+ }
+
+ return retval;
+}
+
+gint
+xml_node_get_int_attr_value_limited (
+ const XMLNode *node,
+ const gchar *attr_name,
+ gint retval,
+ gint lower,
+ gint upper
+) {
+ g_assert (lower <= upper);
+
+ retval = xml_node_get_int_attr_value (
+ node, attr_name, retval
+ );
+
+ if (retval < lower)
+ retval = lower;
+
+ if (retval > upper)
+ retval = upper;
+ return retval;
+}
+
+gint
+xml_node_compare_with_name_func (
+ gconstpointer a,
+ gconstpointer b
+) {
+ return g_strcmp0((gchar *) b, ((XMLNode *) a)->name);
+}
+
+gint
+xml_node_compare_with_action_node_by_imageset_name_func (
+ gconstpointer a,
+ gconstpointer b
+) {
+ return g_strcmp0("action", ((XMLNode *) a)->name) ||
+ g_strcmp0((gchar *) b, xml_node_get_attr_value((XMLNode *) a, "imageset"));
+}
+
+gint
+xml_node_compare_with_attr_func (
+ const XMLNode *node,
+ const gchar **attr
+) {
+ return g_strcmp0(attr[1],
+ xml_node_get_attr_value(node, attr[0]));
+}
+
+static GMarkupParser parser;
+
+void _xml_free_g_func (XMLNode *node, gpointer user_data) {
+ xml_free (node);
+}
+
+void xml_free (XMLNode *node) {
+ g_free (node->name);
+
+ g_free (node->text);
+
+ g_strfreev (node->attributes);
+
+ g_list_foreach (node->sub_nodes, (GFunc) _xml_free_g_func, NULL);
+ g_list_free (node->sub_nodes);
+
+ g_slice_free (XMLNode, node);
+}
+
+static void _start_root_element_cb ( GMarkupParseContext *context,
+ const gchar *element_name,
+ const gchar **attribute_names,
+ const gchar **attribute_values,
+ gpointer user_data,
+ GError **error
+) {
+ XMLNode **node = (XMLNode **) user_data;
+ XMLNode *p;
+ GArray *attributes;
+
+ g_assert (node != NULL);
+
+ p = g_slice_new0 (XMLNode);
+ p->name = g_strdup (element_name);
+
+ attributes = g_array_new (TRUE, TRUE, sizeof (gchar *));
+ while (*attribute_names != NULL && *attribute_values != NULL) {
+ gchar *p2;
+ p2 = g_strdup (*attribute_names++);
+ g_array_append_val (attributes, p2);
+ p2 = g_strdup (*attribute_values++);
+ g_array_append_val (attributes, p2);
+ }
+
+ p->attributes = (gchar **) g_array_free (attributes, FALSE);
+
+ g_markup_parse_context_push (context, &parser, p);
+ *node = p;
+}
+
+
+static void _start_element_cb (
+ GMarkupParseContext *context,
+ const gchar *element_name,
+ const gchar **attribute_names,
+ const gchar **attribute_values,
+ gpointer user_data,
+ GError **error
+) {
+ XMLNode *p, *node = (XMLNode *) user_data;
+ GArray *attributes;
+ gint char_n, line_n;
+
+ if (node->text) {
+ g_set_error (error, G_MARKUP_ERROR, G_MARKUP_ERROR_INVALID_CONTENT, " ");
+ return;
+ }
+
+ p = g_slice_new0 (XMLNode);
+
+ node->sub_nodes = g_list_append (node->sub_nodes, p);
+ g_markup_parse_context_push (context, &parser, p);
+
+ p->name = g_strdup (element_name);
+
+ attributes = g_array_new (TRUE, TRUE, sizeof (gchar *));
+ while (*attribute_names != NULL && *attribute_values != NULL) {
+ gchar *p2;
+ p2 = g_strdup (*attribute_names++);
+ g_array_append_val (attributes, p2);
+ p2 = g_strdup (*attribute_values++);
+ g_array_append_val (attributes, p2);
+ }
+
+ p->attributes = (gchar **)g_array_free (attributes, FALSE);
+
+ g_markup_parse_context_get_position(context, &line_n, &char_n);
+ p->line_no = line_n - (char_n <= 1 ? 1 : 0);
+}
+
+static void
+_end_element_cb (
+ GMarkupParseContext *context,
+ const gchar *element_name,
+ gpointer user_data,
+ GError **error
+) {
+ XMLNode *p = (XMLNode *) g_markup_parse_context_pop (context);
+
+ if (p->text && p->sub_nodes) {
+ g_warning ("Error");
+ }
+
+ if (p->text == NULL && p->sub_nodes == NULL) {
+ p->text = g_strdup ("");
+ }
+}
+
+static gboolean
+_is_space (
+ const gchar *text,
+ gsize text_len
+) {
+ gsize i = 0;
+
+ for (i = 0; text[i] != '\0' && i < text_len; i++) {
+ switch (text[i]) {
+ case '\t':
+ case ' ':
+ case '\n':
+ case '\r':
+ continue;
+ default:
+ return FALSE;
+ }
+ }
+
+ return TRUE;
+}
+
+static void
+_text_cb (
+ GMarkupParseContext *context,
+ const gchar *text,
+ gsize text_len,
+ gpointer user_data,
+ GError **error
+) {
+ XMLNode *p = (XMLNode *)user_data;
+
+ if (_is_space (text, text_len)) {
+ return;
+ }
+
+ if (p->sub_nodes || p->text) {
+ g_set_error (error, G_MARKUP_ERROR, G_MARKUP_ERROR_INVALID_CONTENT, " ");
+ return;
+ }
+
+ p->text = g_strndup (text, text_len);
+}
+
+static GMarkupParser parser = {
+ _start_element_cb,
+ _end_element_cb,
+ _text_cb,
+ 0,
+ 0,
+};
+
+XMLNode *
+xml_parse_file (const gchar *filename) {
+ gboolean retval = FALSE;
+ GError *error = NULL;
+ GMarkupParseContext *context;
+ XMLNode *node;
+
+ static const GMarkupParser root_parser = {
+ _start_root_element_cb,
+ _end_element_cb,
+ _text_cb,
+ 0,
+ 0,
+ };
+
+ FILE *pf = fopen (filename, "r");
+
+ if (pf == NULL) {
+ return NULL;
+ }
+
+ do {
+ context = g_markup_parse_context_new (&root_parser, 0, &node, 0);
+
+ while (!feof (pf)) {
+ gchar buf[1024];
+ gssize len = 0;
+
+ len = fread (buf, 1, sizeof (buf), pf);
+ retval = g_markup_parse_context_parse (context, buf, len, &error);
+
+ if (!retval)
+ break;
+ }
+ fclose (pf);
+
+ if (!retval)
+ break;
+
+ retval = g_markup_parse_context_end_parse (context, &error);
+ if (!retval)
+ break;
+
+ g_markup_parse_context_free (context);
+
+ return node;
+ } while (0);
+
+ g_warning ("Parse %s failed: %s", filename, error->message);
+ g_error_free (error);
+ g_markup_parse_context_free (context);
+ return NULL;
+}
+
+XMLNode *
+xml_parse_buffer (const gchar *buffer, GError **error) {
+ gboolean retval;
+
+ GMarkupParseContext *context;
+ XMLNode *node;
+
+ static const GMarkupParser root_parser = {
+ _start_root_element_cb,
+ _end_element_cb,
+ _text_cb,
+ 0,
+ 0,
+ };
+
+ context = g_markup_parse_context_new (&root_parser, 0, &node, 0);
+
+ do {
+ retval = g_markup_parse_context_parse (context, buffer, strlen (buffer), error);
+ if (!retval)
+ break;
+
+ retval = g_markup_parse_context_end_parse (context, error);
+ if (!retval)
+ break;
+ g_markup_parse_context_free (context);
+ return node;
+ } while (0);
+
+ g_markup_parse_context_free (context);
+ return NULL;
+}
+
+
+static void output_indent (int level, GString *output) {
+ gint i;
+ for (i = 0; i < level; i++) {
+ g_string_append (output, " ");
+ }
+}
+
+static void xml_output_indent (
+ const XMLNode *node,
+ int level,
+ GString *output
+) {
+ gchar **attrs;
+
+ output_indent (level, output);
+ g_string_append_printf (output, "<%s", node->name);
+
+ attrs = node->attributes;
+
+ while (attrs != NULL && *attrs != NULL) {
+ g_string_append_printf (output, " %s", *(attrs++));
+ g_string_append_printf (output, "=\"%s\"", *(attrs++));
+ }
+
+ if (node->sub_nodes != NULL) {
+ GList *sub_node;
+ g_string_append (output, ">\n");
+
+ for (sub_node = node->sub_nodes; sub_node != NULL; sub_node = sub_node->next) {
+ xml_output_indent (sub_node->data, level + 1, output);
+ }
+ output_indent (level, output);
+ g_string_append_printf (output, "</%s>\n",node->name);
+ } else if (node->text != NULL) {
+ gchar *text = g_markup_escape_text (node->text, -1);
+ g_string_append_printf (output, ">%s</%s>\n", text, node->name);
+ g_free (text);
+ } else {
+ g_string_append (output, "/>\n");
+ }
+}
+
+void xml_output (const XMLNode *node, GString *output) {
+ xml_output_indent (node, 0, output);
+}
+
generated by cgit v1.2.3-60-g2f50 (git 2.42.0) at 2024-06-02 04:10:47 +0000