X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=test%2Ftstccl.c;h=daf2fb65038005b3d927ee737000f373da50284b;hp=0142bc640fca49640c58f29866e7ca7ab4ae28c0;hb=ee6ab2ee3a9ee1a8c65d7272ec7fba1d886f5af0;hpb=6bc4a3e8b7e73275e8b37e6de40e4c596302bd51 diff --git a/test/tstccl.c b/test/tstccl.c index 0142bc6..daf2fb6 100644 --- a/test/tstccl.c +++ b/test/tstccl.c @@ -1,52 +1,62 @@ -/* - * Copyright (C) 1995-2005, Index Data ApS +/* This file is part of the YAZ toolkit. + * Copyright (C) 1995-2008 Index Data * See the file LICENSE for details. - * - * $Id: tstccl.c,v 1.6 2005-02-01 17:23:36 adam Exp $ */ /* CCL test */ -#include #include -#include - -struct ccl_tst { - char *query; - char *result; -}; - -static struct ccl_tst query_str[] = { - { "x1", "@attr 4=2 @attr 1=1016 x1 "}, - { "(((((x1)))))", "@attr 4=2 @attr 1=1016 x1 "}, - {"x1 and x2", "@and @attr 4=2 @attr 1=1016 x1 @attr 4=2 @attr 1=1016 x2 "}, - { "ti=x3", "@attr 4=2 @attr 1=4 x3 "}, - { "dc.title=x4", "@attr 1=/my/title x4 "}, - { "x1 and", 0}, - { "tix=x5", 0}, - { "spid%æserne", "@prox 0 1 0 2 k 2 @attr 4=2 @attr 1=1016 spid @attr 4=2 @attr 1=1016 æserne "}, - { "date=1980", "@attr 2=3 1980 "}, - { "date=234-1990", "@and @attr 2=4 234 @attr 2=2 1990 "}, - { "date=234- 1990", "@and @attr 2=4 234 @attr 2=2 1990 "}, - { "date=234 -1990", "@and @attr 2=4 234 @attr 2=2 1990 "}, - { "date=234 - 1990", "@and @attr 2=4 234 @attr 2=2 1990 "}, - { "date=-1980", "@attr 2=2 1980 "}, - { "date=- 1980", "@attr 2=2 1980 "}, - { "x=-1980", "@attr 2=3 -1980 "}, - { "x=- 1980", "@attr 2=2 1980 "}, - { "x= -1980", "@attr 2=3 -1980 "}, - { "x=234-1990", "@attr 2=3 234-1990 "}, - { "x=234 - 1990", "@and @attr 2=4 234 @attr 2=2 1990 "}, - {0, 0} -}; - -void tst1(int pass, int *number_of_errors) +#include +#include + + +static int tst_ccl_query(CCL_bibset bibset, + const char *query, + const char *result) +{ + CCL_parser parser = ccl_parser_create(bibset); + int ret = 0; + + if (parser && bibset) + { + struct ccl_rpn_node *rpn; + + rpn = ccl_parser_find_str(parser, query); + if (rpn) + { + /* parse ok. check that result is there and match */ + WRBUF wrbuf = wrbuf_alloc(); + ccl_pquery(wrbuf, rpn); + + /* check expect a result and that it matches */ + if (result && !strcmp(wrbuf_cstr(wrbuf), result)) + ret = 1; + else + ret = 0; + ccl_rpn_delete(rpn); + wrbuf_destroy(wrbuf); + } + else + { + if (result) + ret = 0; + else + ret = 1; + } + } + ccl_parser_destroy (parser); + return ret; +} + +void tst1(int pass) { - CCL_parser parser = ccl_parser_create (); CCL_bibset bibset = ccl_qual_mk(); - int i; char tstline[128]; + YAZ_CHECK(bibset); + if (!bibset) + return; + switch(pass) { case 0: @@ -55,9 +65,9 @@ void tst1(int pass, int *number_of_errors) ccl_qual_fitem(bibset, "1=/my/title", "dc.title"); ccl_qual_fitem(bibset, "r=r", "date"); ccl_qual_fitem(bibset, "r=o", "x"); - break; + break; case 1: - strcpy(tstline, "ti u=4 s=pw t=l,r"); + strcpy(tstline, "ti u=4 s=pw t=l,r"); ccl_qual_line(bibset, tstline); strcpy(tstline, "term 1=1016 s=al,pw # default term"); @@ -71,73 +81,140 @@ void tst1(int pass, int *number_of_errors) strcpy(tstline, "x r=o # ordered relation"); ccl_qual_line(bibset, tstline); - break; + break; case 2: ccl_qual_buf(bibset, "ti u=4 s=pw t=l,r\n" - "term 1=1016 s=al,pw\r\n" - "\n" - "dc.title 1=/my/title\n" - "date r=r\n" - "x r=o\n" - ); - break; + "term 1=1016 s=al,pw\r\n" + "\n" + "dc.title 1=/my/title\n" + "date r=r\n" + "x r=o\n" + ); + break; + case 3: +#if YAZ_HAVE_XML2 + if (1) + { + xmlDocPtr doc; + int r; + const char *addinfo = 0; + const char *xml_str = + "\n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + "\n"; + + doc = xmlParseMemory(xml_str, strlen(xml_str)); + YAZ_CHECK(doc); + + r = ccl_xml_config(bibset, xmlDocGetRootElement(doc), &addinfo); + YAZ_CHECK_EQ(r, 0); + + xmlFreeDoc(doc); + } + break; +#else + return; +#endif default: - exit(23); + YAZ_CHECK(0); + return; } + + YAZ_CHECK(tst_ccl_query(bibset, "x1", "@attr 4=2 @attr 1=1016 x1 ")); + YAZ_CHECK(tst_ccl_query(bibset, "(((((x1)))))", "@attr 4=2 @attr 1=1016 x1 ")); + YAZ_CHECK(tst_ccl_query(bibset, "x1 and x2", + "@and " + "@attr 4=2 @attr 1=1016 x1 " + "@attr 4=2 @attr 1=1016 x2 ")); + YAZ_CHECK(tst_ccl_query(bibset, "ti=x3", "@attr 4=2 @attr 1=4 x3 ")); + YAZ_CHECK(tst_ccl_query(bibset, "dc.title=x4", "@attr 1=/my/title x4 ")); + YAZ_CHECK(tst_ccl_query(bibset, "x1 and", 0)); + YAZ_CHECK(tst_ccl_query(bibset, "tix=x5", 0)); - parser->bibset = bibset; + YAZ_CHECK(tst_ccl_query(bibset, "a%b", + "@prox 0 1 0 2 k 2 " + "@attr 4=2 @attr 1=1016 a " + "@attr 4=2 @attr 1=1016 b ")); + YAZ_CHECK(tst_ccl_query(bibset, "a%1b", + "@prox 0 1 0 2 k 2 " + "@attr 4=2 @attr 1=1016 a " + "@attr 4=2 @attr 1=1016 b ")); - for (i = 0; query_str[i].query; i++) - { - struct ccl_token *token_list = - ccl_parser_tokenize(parser, query_str[i].query); - struct ccl_rpn_node *rpn = ccl_parser_find(parser, token_list); - ccl_token_del (token_list); - if (rpn) - { - WRBUF wrbuf = wrbuf_alloc(); - ccl_pquery(wrbuf, rpn); - - if (!query_str[i].result) - { - printf ("Failed %s\n", query_str[i].query); - printf (" got:%s:\n", wrbuf_buf(wrbuf)); - printf (" expected failure\n"); - (*number_of_errors)++; - } - else if (strcmp(wrbuf_buf(wrbuf), query_str[i].result)) - { - printf ("Failed %s\n", query_str[i].query); - printf (" got:%s:\n", wrbuf_buf(wrbuf)); - printf (" expected:%s:\n", query_str[i].result); - (*number_of_errors)++; - } - ccl_rpn_delete(rpn); - wrbuf_free(wrbuf, 1); - } - else if (query_str[i].result) - { - printf ("Failed %s\n", query_str[i].query); - printf (" got failure\n"); - printf (" expected:%s:\n", query_str[i].result); - (*number_of_errors)++; - } - } - ccl_parser_destroy (parser); + YAZ_CHECK(tst_ccl_query(bibset, "a%2b", + "@prox 0 2 0 2 k 2 " + "@attr 4=2 @attr 1=1016 a " + "@attr 4=2 @attr 1=1016 b ")); + + YAZ_CHECK(tst_ccl_query(bibset, "a%19b", + "@prox 0 19 0 2 k 2 " + "@attr 4=2 @attr 1=1016 a " + "@attr 4=2 @attr 1=1016 b ")); + + YAZ_CHECK(tst_ccl_query(bibset, "spid%æserne", + "@prox 0 1 0 2 k 2 " + "@attr 4=2 @attr 1=1016 spid " + "@attr 4=2 @attr 1=1016 æserne ")); + + YAZ_CHECK(tst_ccl_query(bibset, "a!b", + "@prox 0 1 1 2 k 2 " + "@attr 4=2 @attr 1=1016 a " + "@attr 4=2 @attr 1=1016 b ")); + YAZ_CHECK(tst_ccl_query(bibset, "a!2b", + "@prox 0 2 1 2 k 2 " + "@attr 4=2 @attr 1=1016 a " + "@attr 4=2 @attr 1=1016 b ")); + + YAZ_CHECK(tst_ccl_query(bibset, "date=1980", "@attr 2=3 1980 ")); + YAZ_CHECK(tst_ccl_query(bibset, "date=234-1990", "@and @attr 2=4 234 @attr 2=2 1990 ")); + YAZ_CHECK(tst_ccl_query(bibset, "date=234- 1990", "@and @attr 2=4 234 @attr 2=2 1990 ")); + YAZ_CHECK(tst_ccl_query(bibset, "date=234 -1990", "@and @attr 2=4 234 @attr 2=2 1990 ")); + YAZ_CHECK(tst_ccl_query(bibset, "date=234 - 1990", "@and @attr 2=4 234 @attr 2=2 1990 ")); + YAZ_CHECK(tst_ccl_query(bibset, "date=-1980", "@attr 2=2 1980 ")); + YAZ_CHECK(tst_ccl_query(bibset, "date=- 1980", "@attr 2=2 1980 ")); + YAZ_CHECK(tst_ccl_query(bibset, "x=-1980", "@attr 2=3 -1980 ")); + YAZ_CHECK(tst_ccl_query(bibset, "x=- 1980", "@attr 2=2 1980 ")); + YAZ_CHECK(tst_ccl_query(bibset, "x= -1980", "@attr 2=3 -1980 ")); + YAZ_CHECK(tst_ccl_query(bibset, "x=234-1990", "@attr 2=3 234-1990 ")); + YAZ_CHECK(tst_ccl_query(bibset, "x=234 - 1990", "@and @attr 2=4 234 @attr 2=2 1990 ")); + YAZ_CHECK(tst_ccl_query(bibset, "ti=a,b", "@attr 4=1 @attr 1=4 a,b ")); + YAZ_CHECK(tst_ccl_query(bibset, "ti=a, b", "@attr 4=1 @attr 1=4 a,\\ b ")); + YAZ_CHECK(tst_ccl_query(bibset, "ti=a-b", "@attr 4=2 @attr 1=4 a-b ")); + YAZ_CHECK(tst_ccl_query(bibset, "ti=a - b", "@attr 4=1 @attr 1=4 a\\ -\\ b ")); ccl_qual_rm(&bibset); } int main(int argc, char **argv) { - int number_of_errors = 0; - tst1(0, &number_of_errors); - if (number_of_errors) - exit(1); - tst1(1, &number_of_errors); - if (number_of_errors) - exit(1); - tst1(2, &number_of_errors); - if (number_of_errors) - exit(1); - exit(0); + YAZ_CHECK_INIT(argc, argv); + YAZ_CHECK_LOG(); + tst1(0); + tst1(1); + tst1(2); + tst1(3); + YAZ_CHECK_TERM; } +/* + * Local variables: + * c-basic-offset: 4 + * indent-tabs-mode: nil + * End: + * vim: shiftwidth=4 tabstop=8 expandtab + */ +