1 /* $Id: testlib.c,v 1.7 2004-12-02 14:05:04 adam Exp $
2 Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002,2003,2004
5 This file is part of the Zebra server.
7 Zebra is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 2, or (at your option) any later
12 Zebra is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
17 You should have received a copy of the GNU General Public License
18 along with Zebra; see the file LICENSE.zebra. If not, write to the
19 Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
23 /** testlib - utilities for the api tests */
26 #include <yaz/pquery.h>
27 #include <idzebra/api.h>
30 /** start_log: open a log file */
31 /* FIXME - parse command line arguments to set log levels etc */
32 int log_level=0; /* not static, t*.c may use it */
34 void start_log(int argc, char **argv)
41 sprintf(logname, "%s.log", argv[0]);
42 yaz_log_init_file(logname);
43 log_level = yaz_log_mask_str_x(argv[0],0);
44 yaz_log_init_level(YLOG_DEFAULT_LEVEL | log_level);
45 yaz_log(log_level,"starting %s",argv[0]);
49 * start_up : do common start things, and a zebra_start
51 * - build the name of logfile from argv[0], and open it
52 * if no argv passed, do not open a log
53 * - read zebra.cfg from env var srcdir if it exists; otherwise current dir
54 * default to zebra.cfg, if no name is given
56 ZebraService start_up(char *cfgname, int argc, char **argv)
59 start_log(argc, argv);
60 return start_service(cfgname);
64 * get_srcdir: return env srcdir or . (if does does not exist)
66 const char *get_srcdir()
68 const char *srcdir = getenv("srcdir");
69 if (!srcdir || ! *srcdir)
74 /** start_service - do a zebra_start with a decent config name */
75 ZebraService start_service(char *cfgname)
78 const char *srcdir = get_srcdir();
80 if (!cfgname || ! *cfgname )
83 sprintf(cfg, "%.200s/%.50s", srcdir, cfgname);
87 printf("zebra_start failed, probably because missing config file \n"
95 /** close_down closes down the zebra, logfile, nmem, xmalloc etc. logs an OK */
96 int close_down(ZebraHandle zh, ZebraService zs, int retcode)
104 yaz_log(log_level,"========= Exiting with return code %d", retcode);
106 yaz_log(log_level,"========= All tests OK");
112 /** inits the database and inserts test data */
114 void init_data(ZebraHandle zh, const char **recs)
119 zebra_select_database(zh, "Default");
120 yaz_log(log_level, "going to call init");
122 yaz_log(log_level, "init returned %d",i);
125 printf("init failed with %d\n",i);
126 zebra_result(zh, &i, &addinfo);
127 printf(" Error %d %s\n",i,addinfo);
132 zebra_begin_trans (zh, 1);
133 for (i = 0; recs[i]; i++)
134 zebra_add_record (zh, recs[i], strlen(recs[i]));
135 zebra_end_trans (zh);
141 int do_query(int lineno, ZebraHandle zh, char *query, int exphits)
144 YAZ_PQF_Parser parser;
146 const char *setname="rsetname";
151 yaz_log(log_level,"======================================");
152 yaz_log(log_level,"qry[%d]: %s", lineno, query);
153 odr=odr_createmem (ODR_DECODE);
155 parser = yaz_pqf_create();
156 rpn = yaz_pqf_parse(parser, odr, query);
158 printf("Error: Parse failed \n%s\n",query);
161 rc = zebra_search_RPN (zh, odr, rpn, setname, &hits);
163 printf("Error: search returned %d \n%s\n",rc,query);
167 if (hits != exphits) {
168 printf("Error: search returned %d hits instead of %d\n",
172 yaz_pqf_destroy(parser);
179 * makes a query, checks number of hits, and for the first hit, that
180 * it contains the given string, and that it gets the right score
182 void ranking_query(int lineno, ZebraHandle zh, char *query,
183 int exphits, char *firstrec, int firstscore )
185 ZebraRetrievalRecord retrievalRecord[10];
186 ODR odr_output = odr_createmem (ODR_ENCODE);
187 const char *setname="rsetname";
192 hits = do_query(lineno, zh, query, exphits);
194 for (i = 0; i<10; i++)
195 retrievalRecord[i].position = i+1;
197 rc = zebra_records_retrieve (zh, odr_output, setname, 0,
198 VAL_TEXT_XML, hits, retrievalRecord);
202 printf("Error: retrieve returned %d \n%s\n",rc,query);
206 if (!strstr(retrievalRecord[0].buf, firstrec))
208 printf("Error: Got the wrong record first\n");
209 printf("Expected '%s' but got \n",firstrec);
210 printf("%.*s\n",retrievalRecord[0].len,retrievalRecord[0].buf);
214 if (retrievalRecord[0].score != firstscore)
216 printf("Error: first rec got score %d instead of %d\n",
217 retrievalRecord[0].score, firstscore);
220 odr_destroy (odr_output);
223 void meta_query(int lineno, ZebraHandle zh, char *query, int exphits,
226 ZebraMetaRecord *meta;
227 ODR odr_output = odr_createmem (ODR_ENCODE);
228 const char *setname="rsetname";
229 zint *positions = (zint *) malloc(1 + (exphits * sizeof(zint)));
234 hits = do_query(lineno, zh, query, exphits);
236 for (i = 0; i<exphits; i++)
239 meta = zebra_meta_records_create (zh, setname, exphits, positions);
243 printf("Error: retrieve returned %d \n%s\n",rc,query);
247 for (i = 0; i<exphits; i++)
249 if (meta[i].sysno != ids[i])
251 printf("Expected id=" ZINT_FORMAT " but got id=" ZINT_FORMAT,
252 ids[i], meta[i].sysno);
256 zebra_meta_records_destroy(zh, meta, exphits);
257 odr_destroy (odr_output);