src/yaz-cql2rpn.cpp

   1 /*
   2  * Copyright (c) 1998-2003, Index Data.
   3  * See the file LICENSE for details.
   4  *
   5  * $Id: yaz-cql2rpn.cpp,v 1.1 2003-12-16 14:17:01 adam Exp $
   6  */
   7
   8 #include <yaz/log.h>
   9 #include <yaz/pquery.h>
  10 #include <yaz++/proxy.h>
  11
  12 Yaz_cql2rpn::Yaz_cql2rpn()
  13 {
  14     m_transform = 0;
  15 }
  16
  17 Yaz_cql2rpn::~Yaz_cql2rpn()
  18 {
  19     if (m_transform)
  20         cql_transform_close(m_transform);
  21 }
  22
  23 void Yaz_cql2rpn::set_pqf_file(const char *fname)
  24 {
  25     if (!m_transform)
  26         m_transform = cql_transform_open_fname(fname);
  27 }
  28
  29 int Yaz_cql2rpn::query_transform(const char *cql_query,
  30                                  Z_RPNQuery **rpnquery, ODR o)
  31 {
  32     if (!m_transform)
  33         return -3;
  34     CQL_parser cp = cql_parser_create();
  35
  36     int r = cql_parser_string(cp, cql_query);
  37     if (r)
  38     {
  39         yaz_log(LOG_LOG, "CQL Parse Error");
  40         return r;
  41     }
  42     else
  43     {
  44         char rpn_buf[1024];
  45         r = cql_transform_buf(m_transform, cql_parser_result(cp),
  46                               rpn_buf, sizeof(rpn_buf)-1);
  47         if (!r)
  48         {
  49             YAZ_PQF_Parser pp = yaz_pqf_create();
  50
  51             *rpnquery = yaz_pqf_parse(pp, o, rpn_buf);
  52             if (!*rpnquery)
  53             {
  54                 size_t off;
  55                 const char *pqf_msg;
  56                 int code = yaz_pqf_error(pp, &pqf_msg, &off);
  57                 yaz_log(LOG_WARN, "PQF Parser Error %s (code %d)",
  58                         pqf_msg, code);
  59                 yaz_pqf_destroy(pp);
  60                 return -1;
  61             }
  62             yaz_pqf_destroy(pp);
  63         }
  64         else
  65         {
  66             const char *addinfo;
  67             cql_transform_error(m_transform, &addinfo);
  68             yaz_log(LOG_LOG, "CQL Transform Error %d %s", r,
  69                     addinfo ? addinfo : "");
  70             return -2;
  71         }
  72     }
  73     return 0;
  74 }