X-Git-Url: http://sru.miketaylor.org.uk/?a=blobdiff_plain;f=src%2Fyaz-cql2rpn.cpp;h=d61d34c397072f553c3b8bb4faf00619e9702f2d;hb=3c714ed0d987533fedde0747836ac0f30fdd0b11;hp=711d49d1963e8ba10bc309021faa51772158f582;hpb=4cdabec84822b8b4f52907b6c69b3aedd199bf5a;p=yazpp-moved-to-github.git

diff --git a/src/yaz-cql2rpn.cpp b/src/yaz-cql2rpn.cpp
index 711d49d..d61d34c 100644
--- a/src/yaz-cql2rpn.cpp
+++ b/src/yaz-cql2rpn.cpp
@@ -1,5 +1,5 @@
 /* This file is part of the yazpp toolkit.
- * Copyright (C) 1998-2013 Index Data and Mike Taylor
+ * Copyright (C) Index Data 
  * See the file LICENSE for details.
  */
 
@@ -9,7 +9,9 @@
 #include <yaz/log.h>
 #include <yaz/diagsrw.h>
 #include <yaz/pquery.h>
+#include <yaz/sortspec.h>
 #include <yazpp/cql2rpn.h>
+#include <yaz/rpn2cql.h>
 
 using namespace yazpp_1;
 
@@ -39,6 +41,20 @@ bool Yaz_cql2rpn::parse_spec_file(const char *fname, int *error)
     return m_transform ? true : false;
 }
 
+int Yaz_cql2rpn::rpn2cql_transform(Z_RPNQuery *q, WRBUF cql, ODR o,
+                                   char **addinfop)
+{
+    int r = cql_transform_rpn2cql_wrbuf(m_transform, cql, q);
+    *addinfop = 0;
+    if (r)
+    {
+        const char *addinfo = 0;
+        r = cql_transform_error(m_transform, &addinfo);
+        *addinfop = odr_strdup_null(o, addinfo);
+    }
+    return r;
+}
+
 int Yaz_cql2rpn::query_transform(const char *cql_query,
                                  Z_RPNQuery **rpnquery, ODR o,
                                  char **addinfop)
@@ -55,13 +71,32 @@ int Yaz_cql2rpn::query_transform(const char *cql_query,
     }
     else
     {
-        WRBUF w = wrbuf_alloc();
-        r = cql_transform(m_transform, cql_parser_result(cp), wrbuf_vp_puts, w);
+        WRBUF pqf = wrbuf_alloc();
+        r = cql_transform(m_transform, cql_parser_result(cp),
+                          wrbuf_vp_puts, pqf);
         if (!r)
         {
+            WRBUF sortkeys = wrbuf_alloc();
+            WRBUF sortspec = wrbuf_alloc();
+            if (cql_sortby_to_sortkeys(cql_parser_result(cp),
+                                       wrbuf_vp_puts, sortkeys))
+            {
+                r = YAZ_SRW_UNSUPP_SORT_TYPE;
+            }
+            else
+            {
+                yaz_srw_sortkeys_to_sort_spec(wrbuf_cstr(sortkeys), sortspec);
+                Z_SortKeySpecList *sksl =
+                    yaz_sort_spec(o, wrbuf_cstr(sortspec));
+                if (sksl)
+                    yaz_sort_spec_to_type7(sksl, pqf);
+            }
+            wrbuf_destroy(sortspec);
+            wrbuf_destroy(sortkeys);
+
             YAZ_PQF_Parser pp = yaz_pqf_create();
 
-            *rpnquery = yaz_pqf_parse(pp, o, wrbuf_cstr(w));
+            *rpnquery = yaz_pqf_parse(pp, o, wrbuf_cstr(pqf));
             if (!*rpnquery)
             {
                 size_t off;
@@ -75,7 +110,7 @@ int Yaz_cql2rpn::query_transform(const char *cql_query,
         {
             r = cql_transform_error(m_transform, &addinfo);
         }
-        wrbuf_destroy(w);
+        wrbuf_destroy(pqf);
     }
     cql_parser_destroy(cp);
     *addinfop = odr_strdup_null(o, addinfo);