X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=src%2Fcqlutil.c;h=43e499b2f3cf8a88cbe8f480cfa1e590412c85c1;hp=9fa3ae6c79593bc46b30bb5c8076d518acc4bd9a;hb=7dfff1f7b79d8a3cf5f5ed62c71f6e4c2a616072;hpb=fb6d99a0c7e07d9cc4a315c447deaf6564a85505

diff --git a/src/cqlutil.c b/src/cqlutil.c
index 9fa3ae6..43e499b 100644
--- a/src/cqlutil.c
+++ b/src/cqlutil.c
@@ -1,16 +1,14 @@
-/* $Id: cqlutil.c,v 1.8 2005-06-25 15:46:04 adam Exp $
-   Copyright (C) 1995-2005, Index Data ApS
-   Index Data Aps
-
-This file is part of the YAZ toolkit.
-
-See the file LICENSE for details.
-*/
-
+/* This file is part of the YAZ toolkit.
+ * Copyright (C) 1995-2011 Index Data
+ * See the file LICENSE for details.
+ */
 /**
  * \file cqlutil.c
  * \brief Implements CQL tree node utilities.
  */
+#if HAVE_CONFIG_H
+#include <config.h>
+#endif
 
 #include <stdlib.h>
 #include <string.h>
@@ -23,7 +21,7 @@ void cql_fputs(const char *buf, void *client_data)
     fputs(buf, f);
 }
 
-struct cql_node *cql_node_dup (NMEM nmem, struct cql_node *cp)
+struct cql_node *cql_node_dup(NMEM nmem, struct cql_node *cp)
 {
     struct cql_node *cn = 0;
 
@@ -45,6 +43,11 @@ struct cql_node *cql_node_dup (NMEM nmem, struct cql_node *cp)
         cn = cql_node_mk_boolean(nmem, cp->u.boolean.value);
         cn->u.boolean.left = cql_node_dup(nmem, cp->u.boolean.left);
         cn->u.boolean.right = cql_node_dup(nmem, cp->u.boolean.right);
+        break;
+    case CQL_NODE_SORT:
+        cn = cql_node_mk_sort(nmem, cp->u.sort.index, cp->u.sort.modifiers);
+        cn->u.sort.next = cql_node_dup(nmem, cp->u.sort.next);
+        cn->u.sort.search = cql_node_dup(nmem, cp->u.sort.search);
     }
     return cn;
 }
@@ -68,6 +71,7 @@ struct cql_node *cql_node_mk_sc(NMEM nmem,
         p->u.st.relation = nmem_strdup(nmem, relation);
     p->u.st.relation_uri = 0;
     p->u.st.modifiers = 0;
+    p->u.st.extra_terms = 0;
     return p;
 }
 
@@ -84,9 +88,22 @@ struct cql_node *cql_node_mk_boolean(NMEM nmem, const char *op)
     return p;
 }
 
-const char *cql_uri()
+struct cql_node *cql_node_mk_sort(NMEM nmem, const char *index,
+    struct cql_node *modifiers)
 {
-    return "info:srw/cql-context-set/1/cql-v1.1";
+    struct cql_node *p = (struct cql_node *) nmem_malloc(nmem, sizeof(*p));
+    p->which = CQL_NODE_SORT;
+    p->u.sort.index = 0;
+    if (index)
+        p->u.sort.index = nmem_strdup(nmem, index);
+    p->u.sort.modifiers = modifiers;
+    p->u.sort.next = 0;
+    return p;
+}
+
+const char *cql_uri(void)
+{
+    return "info:srw/cql-context-set/1/cql-v1.2";
 }
 
 struct cql_node *cql_apply_prefix(NMEM nmem,
@@ -100,7 +117,7 @@ struct cql_node *cql_apply_prefix(NMEM nmem,
             const char *cp = strchr(n->u.st.index, '.');
             if (prefix && cp && 
                 strlen(prefix) == (size_t) (cp - n->u.st.index) &&
-                !memcmp(n->u.st.index, prefix, strlen(prefix)))
+                !cql_strncmp(n->u.st.index, prefix, strlen(prefix)))
             {
                 char *nval = nmem_strdup(nmem, cp+1);
                 n->u.st.index_uri = nmem_strdup(nmem, uri);
@@ -116,7 +133,7 @@ struct cql_node *cql_apply_prefix(NMEM nmem,
             const char *cp = strchr(n->u.st.relation, '.');
             if (prefix && cp &&
                 strlen(prefix) == (size_t)(cp - n->u.st.relation) &&
-                !memcmp(n->u.st.relation, prefix, strlen(prefix)))
+                !cql_strncmp(n->u.st.relation, prefix, strlen(prefix)))
             {
                 char *nval = nmem_strdup(nmem, cp+1);
                 n->u.st.relation_uri = nmem_strdup(nmem, uri);
@@ -129,6 +146,10 @@ struct cql_node *cql_apply_prefix(NMEM nmem,
         cql_apply_prefix(nmem, n->u.boolean.left, prefix, uri);
         cql_apply_prefix(nmem, n->u.boolean.right, prefix, uri);
     }
+    else if (n->which == CQL_NODE_SORT)
+    {
+        cql_apply_prefix(nmem, n->u.sort.search, prefix, uri);
+    }
     return n;
 }
 
@@ -145,11 +166,53 @@ void cql_node_destroy(struct cql_node *cn)
         cql_node_destroy(cn->u.boolean.left);
         cql_node_destroy(cn->u.boolean.right);
         cql_node_destroy(cn->u.boolean.modifiers);
+        break;
+    case CQL_NODE_SORT:
+        cql_node_destroy(cn->u.sort.search);
+        cql_node_destroy(cn->u.sort.next);
+        cql_node_destroy(cn->u.sort.modifiers);
     }
 }
+
+int cql_strcmp(const char *s1, const char *s2)
+{
+    while (*s1 && *s2)
+    {
+	int c1 = *s1++;
+	int c2 = *s2++;
+	if (c1 >= 'A' && c1 <= 'Z')
+	    c1 = c1 + ('a' - 'A');
+	if (c2 >= 'A' && c2 <= 'Z')
+	    c2 = c2 + ('a' - 'A');
+	if (c1 != c2)
+	    return c1 - c2;
+    }
+    return *s1 - *s2;
+}
+
+int cql_strncmp(const char *s1, const char *s2, size_t n)
+{
+    while (*s1 && *s2 && n)
+    {
+	int c1 = *s1++;
+	int c2 = *s2++;
+	if (c1 >= 'A' && c1 <= 'Z')
+	    c1 = c1 + ('a' - 'A');
+	if (c2 >= 'A' && c2 <= 'Z')
+	    c2 = c2 + ('a' - 'A');
+	if (c1 != c2)
+	    return c1 - c2;
+        --n;
+    }
+    if (!n)
+        return 0;
+    return *s1 - *s2;
+}
+
 /*
  * Local variables:
  * c-basic-offset: 4
+ * c-file-style: "Stroustrup"
  * indent-tabs-mode: nil
  * End:
  * vim: shiftwidth=4 tabstop=8 expandtab