-/* $Id: t2.c,v 1.3 2002-08-02 19:26:57 adam Exp $
- Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002
+/* $Id: t2.c,v 1.11 2004-07-28 08:15:47 adam Exp $
+ Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002,2003,2004
Index Data Aps
This file is part of the Zebra server.
02111-1307, USA.
*/
-
-
+#include <stdlib.h>
+#include <yaz/log.h>
#include <zebraapi.h>
+/* read zebra.cfg from env var srcdir if it exists; otherwise current dir */
+static ZebraService start_service()
+{
+ char cfg[256];
+ char *srcdir = getenv("srcdir");
+ sprintf(cfg, "%.200s%szebra.cfg", srcdir ? srcdir : "", srcdir ? "/" : "");
+ return zebra_start(cfg);
+}
+
int main(int argc, char **argv)
{
+ int exit_code = 0;
+ int hits;
ZebraService zs;
ZebraHandle zh;
const char *myrec =
"<gils>\n"
" <title>My title</title>\n"
"</gils>\n";
- ODR odr_input, odr_output;
+
+ yaz_log_init_file("t2.log");
nmem_init ();
- odr_input = odr_createmem (ODR_DECODE);
- odr_output = odr_createmem (ODR_ENCODE);
-
- zs = zebra_start("t2.cfg");
+ zs = start_service();
zh = zebra_open (zs);
-
- zebra_begin_trans (zh);
- zebra_record_insert (zh, myrec, strlen(myrec));
+ zebra_select_database(zh, "Default");
+ zebra_init(zh);
+ zebra_begin_trans (zh, 1);
+
+ zebra_add_record (zh, myrec, strlen(myrec));
+
+ zebra_search_PQF (zh, "@attr 1=4 my", "set1", &hits);
+ if (hits != 1)
+ {
+ yaz_log(LOG_FATAL, "Expected 1 hit. Got %d", hits);
+ exit_code = 1;
+ }
+
zebra_end_trans (zh);
zebra_commit (zh);
zebra_close (zh);
zebra_stop (zs);
- odr_destroy (odr_input);
- odr_destroy (odr_output);
-
nmem_exit ();
xmalloc_trav ("x");
- exit (0);
+ exit (exit_code);
}