index set -> context set
[yaz-moved-to-github.git] / src / yaz-ccl.c
1 /*
2  * Copyright (c) 1996-2003, Index Data.
3  * See the file LICENSE for details.
4  *
5  * $Id: yaz-ccl.c,v 1.1 2003-10-27 12:21:36 adam Exp $
6  */
7
8 #include <stdio.h>
9 #include <stdlib.h>
10 #include <string.h>
11 #include <ctype.h>
12
13 #include <yaz/yaz-ccl.h>
14 #include <yaz/pquery.h>
15
16 Z_RPNQuery *ccl_rpn_query (ODR o, struct ccl_rpn_node *p)
17 {
18     YAZ_PQF_Parser parser = yaz_pqf_create();
19     WRBUF wr = wrbuf_alloc();
20     Z_RPNQuery *q;
21
22     ccl_pquery(wr, p);
23
24     q = yaz_pqf_parse(parser, o, wrbuf_buf(wr));
25
26     wrbuf_free(wr, 1);
27     yaz_pqf_destroy(parser);
28     return q;
29 }
30
31 Z_AttributesPlusTerm *ccl_scan_query (ODR o, struct ccl_rpn_node *p)
32 {
33     YAZ_PQF_Parser parser = yaz_pqf_create();
34     WRBUF wr = wrbuf_alloc();
35     Z_AttributesPlusTerm *q;
36     Odr_oid *setp;
37
38     ccl_pquery(wr, p);
39
40     q = yaz_pqf_scan(parser, o, &setp, wrbuf_buf(wr));
41
42     wrbuf_free(wr, 1);
43     yaz_pqf_destroy(parser);
44     return q;
45 }
46