Back-button now works with paging too.

[pazpar2-moved-to-github.git] / src / config.c

diff --git a/src/config.c b/src/config.c
index ee5ad34..e02c670 100644 (file)
--- a/src/config.c
+++ b/src/config.c
@@ -1 +1,160 @@
-/* $Id: config.c,v 1.1 2006-12-27 02:14:27 quinn Exp $ */
+/* $Id: config.c,v 1.2 2006-12-27 21:11:10 quinn Exp $ */
+
+#include <string.h>
+
+#include <libxml/parser.h>
+#include <libxml/tree.h>
+
+#include <yaz/yaz-util.h>
+#include <yaz/nmem.h>
+
+#define CONFIG_NOEXTERNS
+#include "config.h"
+
+static NMEM nmem = 0;
+
+struct conf_config *config = 0;
+
+static struct conf_service *parse_service(xmlNode *node)
+{
+    xmlNode *n;
+    struct conf_service *r = nmem_malloc(nmem, sizeof(struct conf_service));
+
+    r->termlists = 0;
+
+    for (n = node->children; n; n = n->next)
+    {
+        if (n->type != XML_ELEMENT_NODE)
+            continue;
+        if (!strcmp(n->name, "termlist"))
+        {
+            struct conf_termlist *tl = nmem_malloc(nmem, sizeof(struct conf_termlist));
+            xmlChar *name = xmlGetProp(n, "name");
+            if (!name)
+            {
+                yaz_log(YLOG_WARN, "Missing name attribute in termlist");
+                continue;
+            }
+            tl->name = nmem_strdup(nmem, name);
+            tl->next = r->termlists;
+            r->termlists = tl;
+        }
+        else
+        {
+            yaz_log(YLOG_FATAL, "Bad element: %s", n->name);
+            return 0;
+        }
+    }
+    return r;
+}
+
+static struct conf_server *parse_server(xmlNode *node)
+{
+    xmlNode *n;
+    struct conf_server *r = nmem_malloc(nmem, sizeof(struct conf_server));
+
+    r->host = 0;
+    r->port = 0;
+    r->proxy_host = 0;
+    r->proxy_port = 0;
+    r->service = 0;
+    r->next = 0;
+
+    for (n = node->children; n; n = n->next)
+    {
+        if (n->type != XML_ELEMENT_NODE)
+            continue;
+        if (!strcmp(n->name, "listen"))
+        {
+            xmlChar *port = xmlGetProp(n, "port");
+            xmlChar *host = xmlGetProp(n, "host");
+            if (port)
+                r->port = atoi(port);
+            if (host)
+                r->host = nmem_strdup(nmem, host);
+        }
+        else if (!strcmp(n->name, "proxy"))
+        {
+            xmlChar *port = xmlGetProp(n, "port");
+            xmlChar *host = xmlGetProp(n, "host");
+            if (port)
+                r->proxy_port = atoi(port);
+            if (host)
+                r->proxy_host = nmem_strdup(nmem, host);
+        }
+        else if (!strcmp(n->name, "service"))
+        {
+            struct conf_service *s = parse_service(n);
+            if (!s)
+                return 0;
+            r->service = s;
+        }
+        else
+        {
+            yaz_log(YLOG_FATAL, "Bad element: %s", n->name);
+            return 0;
+        }
+    }
+    return r;
+}
+
+static struct conf_config *parse_config(xmlNode *root)
+{
+    xmlNode *n;
+    struct conf_config *r = nmem_malloc(nmem, sizeof(struct conf_config));
+
+    r->servers = 0;
+    r->queryprofiles = 0;
+    r->retrievalprofiles = 0;
+
+    for (n = root->children; n; n = n->next)
+    {
+        if (n->type != XML_ELEMENT_NODE)
+            continue;
+        if (!strcmp(n->name, "server"))
+        {
+            struct conf_server *tmp = parse_server(n);
+            if (!tmp)
+                return 0;
+            tmp->next = r->servers;
+            r->servers = tmp;
+        }
+        else if (!strcmp(n->name, "queryprofile"))
+        {
+        }
+        else if (!strcmp(n->name, "retrievalprofile"))
+        {
+        }
+        else
+        {
+            yaz_log(YLOG_FATAL, "Bad element: %s", n->name);
+            return 0;
+        }
+    }
+    return r;
+}
+
+int read_config(const char *fname)
+{
+    xmlDoc *doc = xmlReadFile(fname, NULL, 0);
+    if (!nmem)
+        nmem = nmem_create();
+    if (!doc)
+    {
+        yaz_log(YLOG_FATAL, "Failed to read %s", fname);
+        exit(1);
+    }
+    if ((config = parse_config(xmlDocGetRootElement(doc))))
+        return 1;
+    else
+        return 0;
+}
+
+
+/*
+ * Local variables:
+ * c-basic-offset: 4
+ * indent-tabs-mode: nil
+ * End:
+ * vim: shiftwidth=4 tabstop=8 expandtab
+ */