Source restructure. yaz-marcdump part of installation

[yaz-moved-to-github.git] / cql / xcqlutil.c

diff --git a/cql/xcqlutil.c b/cql/xcqlutil.c
deleted file mode 100644 (file)
index 60c486b..0000000
--- a/cql/xcqlutil.c
+++ /dev/null
@@ -1,210 +0,0 @@
-/* $Id: xcqlutil.c,v 1.2 2003-02-14 18:49:23 adam Exp $
-   Copyright (C) 2002-2003
-   Index Data Aps
-
-This file is part of the YAZ toolkit.
-
-See the file LICENSE.
-*/
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-
-#include <yaz/cql.h>
-
-static void pr_n(const char *buf, 
-                void (*pr)(const char *buf, void *client_data),
-                void *client_data, int n)
-{
-    int i;
-    for (i = 0; i<n; i++)
-        (*pr)(" ", client_data);
-    (*pr)(buf, client_data);
-}
-
-static void pr_cdata(const char *buf,
-                     void (*pr)(const char *buf, void *client_data),
-                     void *client_data)
-{
-    const char *src = buf;
-    char bf[2];
-    while (*src)
-    {
-        switch(*src)
-        {
-        case '&':
-            (*pr)("&amp;", client_data);
-            break;
-        case '<':
-            (*pr)("&lt;", client_data);
-            break;
-        case '>':
-            (*pr)("&gt;", client_data);
-            break;
-        default:
-            bf[0] = *src;
-            bf[1] = 0;
-            (*pr)(bf, client_data);
-        }
-        src++;
-    }
-}
-                    
-static void prefixes(struct cql_node *cn,
-                     void (*pr)(const char *buf, void *client_data),
-                     void *client_data, int level)
-{
-    if (cn)
-    {
-        pr_n("<prefixes>\n", pr, client_data, level);
-        for (; cn; cn = cn->u.mod.next)
-        {
-            pr_n("<prefix>\n", pr, client_data, level+2);
-            if (cn->u.mod.name)
-            {
-                pr_n("<name>", pr, client_data, level+4);
-                pr_cdata(cn->u.mod.name, pr, client_data);
-                pr_n("</name>\n", pr, client_data, 0);
-            }
-            if (cn->u.mod.value)
-            {
-                pr_n("<identifier>", pr, client_data, level+4);
-                pr_cdata(cn->u.mod.value, pr, client_data);
-                pr_n("</identifier>\n", pr, client_data, 0);
-            }
-            pr_n("</prefix>\n", pr, client_data, level+2);
-        }
-        pr_n("</prefixes>\n", pr, client_data, level);
-    }
-}
-                     
-static void cql_to_xml_r(struct cql_node *cn,
-                         void (*pr)(const char *buf, void *client_data),
-                         void *client_data, int level)
-{
-    if (!cn)
-        return;
-    switch (cn->which)
-    {
-    case CQL_NODE_ST:
-        pr_n("<searchClause>\n", pr, client_data, level);
-        prefixes(cn->u.st.prefixes, pr, client_data, level+2);
-        if (cn->u.st.index)
-        {
-            pr_n("<index>", pr, client_data, level+2);
-            pr_cdata(cn->u.st.index, pr, client_data);
-            pr_n("</index>\n", pr, client_data, 0);
-        }
-        if (cn->u.st.relation)
-        {
-            struct cql_node *m = cn->u.st.modifiers;
-            pr_n("<relation>\n", pr, client_data, level+2);
-            pr_n("<value>", pr, client_data, level+4);
-            pr_cdata(cn->u.st.relation, pr, client_data);
-            pr_n("</value>\n", pr, client_data, 0);
-            if (m)
-            {
-                pr_n("<modifiers>\n", pr, client_data, level+4);
-                for (; m; m = m->u.mod.next)
-                {
-                    pr_n("<modifier><value>", pr, client_data, level+6);
-                    pr_cdata(m->u.mod.value, pr, client_data);
-                    pr_n("</value></modifier>\n", pr, client_data, 0);
-                }
-                pr_n("</modifiers>\n", pr, client_data, level+4);
-            }
-            pr_n("</relation>\n", pr, client_data, level+2);
-        }
-        if (cn->u.st.term)
-        {
-            pr_n("<term>", pr, client_data, level+2);
-            pr_cdata(cn->u.st.term, pr, client_data);
-            pr_n("</term>\n", pr, client_data, 0);
-        }
-        pr_n("</searchClause>\n", pr, client_data, level);
-        break;
-    case CQL_NODE_BOOL:
-        pr_n("<triple>\n", pr, client_data, level);
-        prefixes(cn->u.st.prefixes, pr, client_data, level+2);
-        if (cn->u.boolean.value)
-        {
-            struct cql_node *m = cn->u.boolean.modifiers;
-            pr_n("<boolean>\n", pr, client_data, level+2);
-
-            pr_n("<value>", pr, client_data, level+4);
-            pr_cdata(cn->u.boolean.value, pr, client_data);
-            pr_n("</value>\n", pr, client_data, 0);
-
-            if (m)
-            {
-                pr_n("<modifiers>\n", pr, client_data, level+4);
-                for (; m; m = m->u.mod.next)
-                {
-                    pr_n("<modifier><type>", pr, client_data, level+6);
-                    pr_cdata(m->u.mod.name, pr, client_data);
-                    pr_n("</type>", pr, client_data, 0);
-                    if (m->u.mod.value)
-                    {
-                        pr_n("<value>", pr, client_data, 0);
-                        pr_cdata(m->u.mod.value, pr, client_data);
-                        pr_n("</value>", pr, client_data, 0);
-                    }
-                    pr_n("</modifier>\n", pr, client_data, 0);
-                }
-                pr_n("</modifiers>\n", pr, client_data, level+4);
-            }
-            pr_n("</boolean>\n", pr, client_data, level+2);
-        }
-        if (cn->u.boolean.left)
-        {
-            printf ("%*s<leftOperand>\n", level+2, "");
-            cql_to_xml_r(cn->u.boolean.left, pr, client_data, level+4);
-            printf ("%*s</leftOperand>\n", level+2, "");
-        }
-        if (cn->u.boolean.right)
-        {
-            printf ("%*s<rightOperand>\n", level+2, "");
-            cql_to_xml_r(cn->u.boolean.right, pr, client_data, level+4);
-            printf ("%*s</rightOperand>\n", level+2, "");
-        }
-        pr_n("</triple>\n", pr, client_data, level);
-    }
-}
-
-void cql_to_xml(struct cql_node *cn, 
-                void (*pr)(const char *buf, void *client_data),
-                void *client_data)
-{
-    cql_to_xml_r(cn, pr, client_data, 0);
-}
-
-void cql_to_xml_stdio(struct cql_node *cn, FILE *f)
-{
-    cql_to_xml(cn, cql_fputs, f);
-}
-
-void cql_buf_write_handler (const char *b, void *client_data)
-{
-    struct cql_buf_write_info *info = (struct cql_buf_write_info *)client_data;
-    int l = strlen(b);
-    if (info->off < 0 || (info->off + l >= info->max))
-    {
-        info->off = -1;
-        return;
-    }
-    memcpy (info->buf + info->off, b, l);
-    info->off += l;
-}
-
-int cql_to_xml_buf(struct cql_node *cn, char *out, int max)
-{
-    struct cql_buf_write_info info;
-    info.off = 0;
-    info.max = max;
-    info.buf = out;
-    cql_to_xml(cn, cql_buf_write_handler, &info);
-    if (info.off >= 0)
-        info.buf[info.off] = '\0';
-    return info.off;
-}
-