-/*
- * Copyright (C) 1995-2008, Index Data ApS
+/* This file is part of the YAZ toolkit.
+ * Copyright (C) 1995-2013 Index Data
* See the file LICENSE for details.
- *
- * $Id: cclptree.c,v 1.11 2008-01-09 21:32:27 adam Exp $
*/
-/**
+/**
* \file cclptree.c
* \brief Implements CCL parse tree printing
*
* This source file implements functions to parse and print
* a CCL node tree (as a result of parsing).
*/
+#if HAVE_CONFIG_H
+#include <config.h>
+#endif
#include <stdio.h>
#include <string.h>
-#include <ctype.h>
+#include <yaz/querytowrbuf.h>
+#include <yaz/yaz-iconv.h>
#include <yaz/ccl.h>
static void ccl_pquery_indent(WRBUF w, struct ccl_rpn_node *p, int indent);
const char *cp = p->u.p[2]->u.t.term;
/* exlusion distance ordered relation which-code unit-code */
if (*cp == '!')
- {
+ {
/* word order specified */
- if (isdigit(((const unsigned char *) cp)[1]))
+ if (yaz_isdigit(cp[1]))
wrbuf_printf(w, "@prox 0 %s 1 2 k 2", cp+1);
else
wrbuf_printf(w, "@prox 0 1 1 2 k 2");
- }
+ }
else if (*cp == '%')
{
/* word order not specified */
- if (isdigit(((const unsigned char *) cp)[1]))
+ if (yaz_isdigit(cp[1]))
wrbuf_printf(w, "@prox 0 %s 0 2 k 2", cp+1);
else
wrbuf_printf(w, "@prox 0 1 0 2 k 2");
static void ccl_prterm(WRBUF w, const char *term)
{
- if (!*term)
- wrbuf_puts(w, "\"\"");
- else
- {
- const char *cp = term;
- for (; *cp; cp++)
- {
- if (*cp == ' ' || *cp == '\\')
- wrbuf_putc(w, '\\');
- wrbuf_putc(w, *cp);
- }
- }
- wrbuf_puts(w, " ");
+ yaz_encode_pqf_term(w, term, strlen(term));
}
static void ccl_pquery_indent(WRBUF w, struct ccl_rpn_node *p, int indent)
WRBUF w = wrbuf_alloc();
ccl_pquery_indent(w, rpn, 0);
-
+
fputs(wrbuf_cstr(w), fd_out);
wrbuf_destroy(w);
}
/*
* Local variables:
* c-basic-offset: 4
+ * c-file-style: "Stroustrup"
* indent-tabs-mode: nil
* End:
* vim: shiftwidth=4 tabstop=8 expandtab