X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=test%2Ftest_ccl.c;h=fc244b6036da75a1d5a8654401c521ca9f9da31d;hp=ae413eafc4a641f985809b96507e0ed5afb30b6d;hb=b1df5f9013d82510f6250d93623a0126ec19265f;hpb=1f3fef356c699a9d7c68902cd6d3e33b08c3cc4e diff --git a/test/test_ccl.c b/test/test_ccl.c index ae413ea..fc244b6 100644 --- a/test/test_ccl.c +++ b/test/test_ccl.c @@ -1,5 +1,5 @@ /* This file is part of the YAZ toolkit. - * Copyright (C) 1995-2011 Index Data + * Copyright (C) Index Data * See the file LICENSE for details. */ #if HAVE_CONFIG_H @@ -22,14 +22,14 @@ static int tst_ccl_query(CCL_bibset bibset, 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; @@ -43,7 +43,7 @@ static int tst_ccl_query(CCL_bibset bibset, ccl_rpn_delete(rpn); wrbuf_destroy(wrbuf); } - else + else { if (result) { @@ -77,13 +77,16 @@ void tst1(int pass) switch(pass) { case 0: + ccl_qual_fitem(bibset, "term dc.title", "comb"); ccl_qual_fitem(bibset, "u=4 s=pw t=l,r", "ti"); ccl_qual_fitem(bibset, "1=1016 s=al,pw t=r", "term"); - ccl_qual_fitem(bibset, "1=/my/title", "dc.title"); - ccl_qual_fitem(bibset, "r=r", "date"); + ccl_qual_fitem(bibset, "t=x", "reg"); + ccl_qual_fitem(bibset, "t=z", "z"); + ccl_qual_fitem(bibset, "1=/my/title", "dc.title"); + ccl_qual_fitem(bibset, "r=r,omiteq", "date"); ccl_qual_fitem(bibset, "r=o", "x"); ccl_qual_fitem(bibset, "dc.title", "title"); - ccl_qual_fitem(bibset, "term dc.title", "comb"); + ccl_qual_fitem(bibset, "s=ag", "ag"); break; case 1: strcpy(tstline, "ti u=4 s=pw t=l,r"); @@ -92,10 +95,16 @@ void tst1(int pass) strcpy(tstline, "term 1=1016 s=al,pw t=r # default term"); ccl_qual_line(bibset, tstline); + strcpy(tstline, "reg t=x"); + ccl_qual_line(bibset, tstline); + + strcpy(tstline, "z t=z"); + ccl_qual_line(bibset, tstline); + strcpy(tstline, "dc.title 1=/my/title"); ccl_qual_line(bibset, tstline); - strcpy(tstline, "date r=r # ordered relation"); + strcpy(tstline, "date r=r,omiteq # ordered relation"); ccl_qual_line(bibset, tstline); strcpy(tstline, "x r=o # ordered relation"); @@ -106,16 +115,22 @@ void tst1(int pass) strcpy(tstline, "comb term dc.title # combination"); ccl_qual_line(bibset, tstline); + + strcpy(tstline, "ag s=ag"); + ccl_qual_line(bibset, tstline); break; case 2: ccl_qual_buf(bibset, "ti u=4 s=pw t=l,r\n" "term 1=1016 s=al,pw t=r\r\n" "\n" + "reg t=x\r\n" + "z t=z\r\n" "dc.title 1=/my/title\n" - "date r=r\n" + "date r=r,omiteq\n" "x r=o\n" "title dc.title\n" "comb term dc.title\n" + "ag s=ag\n" ); break; case 3: @@ -125,7 +140,7 @@ void tst1(int pass) xmlDocPtr doc; int r; const char *addinfo = 0; - const char *xml_str = + const char *xml_str = "\n" " \n" " \n" @@ -137,11 +152,17 @@ void tst1(int pass) " \n" " \n" " \n" + " \n" + " \n" + " \n" + " \n" + " \n" + " \n" " \n" " \n" " \n" " \n" - " \n" + " \n" " \n" " \n" " \n" @@ -153,8 +174,11 @@ void tst1(int pass) " \n" " \n" " \n" + " \n" + " \n" + " \n" "\n"; - + doc = xmlParseMemory(xml_str, strlen(xml_str)); YAZ_CHECK(doc); @@ -171,7 +195,7 @@ void tst1(int pass) YAZ_CHECK(0); return; } - + YAZ_CHECK(tst_ccl_query(bibset, "x1", "@attr 4=2 @attr 1=1016 x1 ")); YAZ_CHECK(tst_ccl_query(bibset, "k\xc3\xb8" "benhavn", "@attr 4=2 @attr 1=1016 k\xc3\xb8" "benhavn ")); @@ -185,79 +209,312 @@ void tst1(int pass) "@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, "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)); - YAZ_CHECK(tst_ccl_query(bibset, "a%b", + 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", + 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)%(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 ")); + + 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%2b", + YAZ_CHECK(tst_ccl_query(bibset, "(a)%2(b)", "@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", + 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", + 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", + 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", + 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\" ")); - - YAZ_CHECK(tst_ccl_query(bibset, "a?", "@attr 5=1 @attr 4=2 @attr 1=1016 a ")); - YAZ_CHECK(tst_ccl_query(bibset, "a b", + YAZ_CHECK(tst_ccl_query(bibset, "a% (b or dc.title=c)", + "@prox 0 1 0 2 k 2 " + "@attr 4=2 @attr 1=1016 a " + "@or @attr 4=2 @attr 1=1016 b " +#if YAZ_781 + "@or @attr 4=2 @attr 1=/my/title c " + "@attr 4=2 @attr 1=1016 c " +#else + "@attr 4=2 @attr 1=1016 @attr 1=/my/title c " +#endif + )); + + YAZ_CHECK(tst_ccl_query(bibset, "(a b) % (c)", + "@prox 0 1 0 2 k 2 @and " + "@attr 4=2 @attr 1=1016 a @attr 4=2 @attr 1=1016 b " + "@attr 4=2 @attr 1=1016 c " )); + + YAZ_CHECK(tst_ccl_query(bibset, "date=1980", + "1980 ")); + YAZ_CHECK(tst_ccl_query(bibset, "(date=1980)", + "1980 ")); + YAZ_CHECK(tst_ccl_query(bibset, "date>1980", + "@attr 2=5 1980 ")); + YAZ_CHECK(tst_ccl_query(bibset, "date>=1980", + "@attr 2=4 1980 ")); + YAZ_CHECK(tst_ccl_query(bibset, "date<1980", + "@attr 2=1 1980 ")); + YAZ_CHECK(tst_ccl_query(bibset, "date<=1980", + "@attr 2=2 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\" ")); + + YAZ_CHECK(tst_ccl_query(bibset, "a?", + "@attr 5=1 @attr 4=2 @attr 1=1016 a ")); + YAZ_CHECK(tst_ccl_query(bibset, "a b", "@and @attr 4=2 @attr 1=1016 a " "@attr 4=2 @attr 1=1016 b ")); - YAZ_CHECK(tst_ccl_query(bibset, "a b?", + YAZ_CHECK(tst_ccl_query(bibset, "a b?", "@and @attr 4=2 @attr 1=1016 a " "@attr 5=1 @attr 4=2 @attr 1=1016 b ")); - YAZ_CHECK(tst_ccl_query(bibset, "title=a", + YAZ_CHECK(tst_ccl_query(bibset, "title=a", "@attr 1=/my/title a ")); - YAZ_CHECK(tst_ccl_query(bibset, "comb=a", + YAZ_CHECK(tst_ccl_query(bibset, "reg=a?b#\"c?\"", + "@attr 5=102 a.*b.c\\\\? ")); + YAZ_CHECK(tst_ccl_query(bibset, "z=a?b#\"c?\"", + "@attr 5=104 a?b#c\\\\? ")); + + YAZ_CHECK(tst_ccl_query(bibset, "reg=\\(", + "( ")); + YAZ_CHECK(tst_ccl_query(bibset, "z=\\(", + "( ")); + + YAZ_CHECK(tst_ccl_query(bibset, "z=a b#", + "@attr 5=104 \"a b#\" ")); + + YAZ_CHECK(tst_ccl_query(bibset, "reg=\\\"", + "\"\\\"\" ")); + YAZ_CHECK(tst_ccl_query(bibset, "z=\\\"", + "\"\\\"\" ")); + + YAZ_CHECK(tst_ccl_query(bibset, "reg=.", + ". ")); + YAZ_CHECK(tst_ccl_query(bibset, "z=.", + ". ")); + + YAZ_CHECK(tst_ccl_query(bibset, "reg=\".\"", + ". ")); + YAZ_CHECK(tst_ccl_query(bibset, "z=\".\"", + ". ")); + + YAZ_CHECK(tst_ccl_query(bibset, "reg=?\\?", + "@attr 5=102 .*\\\\? ")); + YAZ_CHECK(tst_ccl_query(bibset, "z=?\\?", + "@attr 5=104 ?\\\\? ")); + + YAZ_CHECK(tst_ccl_query(bibset, "reg=\"?\\?\"", + "?? ")); + YAZ_CHECK(tst_ccl_query(bibset, "z=\"?\\?\"", + "?? ")); + + YAZ_CHECK(tst_ccl_query(bibset, "reg=\\\\", + "\\\\ ")); + YAZ_CHECK(tst_ccl_query(bibset, "z=\\\\", + "\\\\ ")); + + YAZ_CHECK(tst_ccl_query(bibset, "\\\\", + "@attr 4=2 @attr 1=1016 \\\\ ")); + + YAZ_CHECK(tst_ccl_query(bibset, "comb=a", "@or @attr 4=2 @attr 1=1016 a " "@attr 1=/my/title a ")); - YAZ_CHECK(tst_ccl_query(bibset, "a? b?", - /* correct */ + YAZ_CHECK(tst_ccl_query(bibset, "a? b?", "@and @attr 5=1 @attr 4=2 @attr 1=1016 a " "@attr 5=1 @attr 4=2 @attr 1=1016 b ")); + + YAZ_CHECK(tst_ccl_query(bibset, "\"a\"? \"b?\"", + "@and @attr 5=1 @attr 4=2 @attr 1=1016 a " + "@attr 4=2 @attr 1=1016 b? ")); + + YAZ_CHECK(tst_ccl_query(bibset, "@and", + "@attr 4=2 @attr 1=1016 \\@and ")); + + YAZ_CHECK(tst_ccl_query(bibset, "a@and", + "@attr 4=2 @attr 1=1016 a@and ")); + + YAZ_CHECK(tst_ccl_query(bibset, "}", + "@attr 4=2 @attr 1=1016 } ")); + + YAZ_CHECK(tst_ccl_query(bibset, "{", + "@attr 4=2 @attr 1=1016 \"{\" ")); + + YAZ_CHECK(tst_ccl_query(bibset, "\"a b c\"", + "@attr 4=1 @attr 1=1016 \"a b c\" ")); + + YAZ_CHECK(tst_ccl_query(bibset, "\"a b c \"", + "@attr 4=1 @attr 1=1016 \"a b c \" ")); + + YAZ_CHECK(tst_ccl_query(bibset, "ag=a", + "@attr 4=2 a ")); + + YAZ_CHECK(tst_ccl_query(bibset, "ag=a b", + "@attr 4=2 \"a b\" ")); + + YAZ_CHECK(tst_ccl_query(bibset, "ag=a b \"c d\"", + "@and @attr 4=2 \"a b\" @attr 4=1 \"c d\" ")); + + YAZ_CHECK(tst_ccl_query(bibset, "ag=a b \"c\"", + "@attr 4=2 \"a b c\" ")); + + YAZ_CHECK(tst_ccl_query(bibset, "ag=a b \"\"", + "@attr 4=2 \"a b \" ")); + + YAZ_CHECK(tst_ccl_query(bibset, "ag=a \"b c\" d", + "@and @and " + "@attr 4=2 a @attr 4=1 \"b c\" @attr 4=2 d ")); + + YAZ_CHECK(tst_ccl_query(bibset, "ag=\"a b c\"", + "@attr 4=1 \"a b c\" ")); + + YAZ_CHECK(tst_ccl_query(bibset, "ag=\"a b c\" \"d e\"", + "@and @attr 4=1 \"a b c\" @attr 4=1 \"d e\" ")); + ccl_qual_rm(&bibset); +} + +void tst2(void) +{ + CCL_bibset bibset = ccl_qual_mk(); + + YAZ_CHECK(bibset); + if (!bibset) + return; + + ccl_qual_fitem(bibset, "u=4 s=pw t=l,r", "ti"); + ccl_qual_fitem(bibset, "1=1016 s=al,pw t=z", "term"); + + YAZ_CHECK(tst_ccl_query(bibset, "a?#", + "@attr 5=104 @attr 4=2 @attr 1=1016 a?# ")); + + YAZ_CHECK(tst_ccl_query(bibset, "a b?#", + "@and @attr 4=2 @attr 1=1016 a @attr 5=104 @attr 4=2 @attr 1=1016 b?# ")); + + YAZ_CHECK(tst_ccl_query(bibset, "a*", + "@attr 4=2 @attr 1=1016 a* ")); + + YAZ_CHECK(tst_ccl_query(bibset, "a?", + "@attr 5=104 @attr 4=2 @attr 1=1016 a? ")); + + ccl_qual_fitem(bibset, "*", "@truncation"); + YAZ_CHECK(tst_ccl_query(bibset, "a*", + "@attr 5=104 @attr 4=2 @attr 1=1016 a? ")); + + YAZ_CHECK(tst_ccl_query(bibset, "a?", + "@attr 4=2 @attr 1=1016 a? ")); + + ccl_qual_fitem(bibset, "?", "@mask"); + YAZ_CHECK(tst_ccl_query(bibset, "a?", + "@attr 5=104 @attr 4=2 @attr 1=1016 a# ")); + + + ccl_qual_fitem(bibset, "", "@mask"); + ccl_qual_fitem(bibset, "", "@truncation"); + YAZ_CHECK(tst_ccl_query(bibset, "a?#", + "@attr 4=2 @attr 1=1016 a?# ")); + + ccl_qual_fitem(bibset, "og", "@and"); + ccl_qual_fitem(bibset, "eller", "@or"); + ccl_qual_fitem(bibset, "ikke", "@not"); + + YAZ_CHECK(tst_ccl_query(bibset, "a og b eller c ikke d", + "@not @or @and @attr 4=2 @attr 1=1016 a " + "@attr 4=2 @attr 1=1016 b " + "@attr 4=2 @attr 1=1016 c " + "@attr 4=2 @attr 1=1016 d ")); + ccl_qual_rm(&bibset); +} + + +void tst_addinfo(void) +{ + const char *addinfo; + int r; + CCL_bibset bibset = ccl_qual_mk(); + + r = ccl_qual_fitem2(bibset, "u=4 s=pw t=l,r", "ti", &addinfo); + YAZ_CHECK(r == 0 && addinfo == 0); + + r = ccl_qual_fitem2(bibset, "1=1016 s=al,pw t=z", "term", &addinfo); + YAZ_CHECK(r == 0 && addinfo == 0); + + r = ccl_qual_fitem2(bibset, "x=", "term", &addinfo); + YAZ_CHECK(r != 0 && addinfo != 0); + + r = ccl_qual_fitem2(bibset, "12=3", "term", &addinfo); + YAZ_CHECK(r == 0 && addinfo == 0); + + r = ccl_qual_fitem2(bibset, "ab=3", "term", &addinfo); + YAZ_CHECK(r != 0 && addinfo != 0); + + r = ccl_qual_fitem2(bibset, "x=ab", "term", &addinfo); + YAZ_CHECK(r != 0 && addinfo != 0); + + r = ccl_qual_fitem2(bibset, "s=ab", "term", &addinfo); + YAZ_CHECK(r == 0 && addinfo == 0); + ccl_qual_rm(&bibset); } @@ -269,6 +526,8 @@ int main(int argc, char **argv) tst1(1); tst1(2); tst1(3); + tst2(); + tst_addinfo(); YAZ_CHECK_TERM; } /*