-/* $Id: testlib.c,v 1.40 2006-11-10 12:57:49 adam Exp $
- Copyright (C) 1995-2006
- Index Data ApS
-
-This file is part of the Zebra server.
+/* This file is part of the Zebra server.
+ Copyright (C) 1994-2011 Index Data
Zebra is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free
#include <assert.h>
#include <yaz/log.h>
#include <yaz/pquery.h>
+#include <yaz/oid_db.h>
#include <idzebra/api.h>
#include "testlib.h"
-/** start_log: open a log file */
-/* FIXME - parse command line arguments to set log levels etc */
-int log_level=0; /* not static, t*.c may use it */
+int log_level = YLOG_LOG;
-void tl_start_log(int argc, char **argv)
-{
- char logname[2048];
- if (!argv)
- return;
- if (!argv[0])
- return;
- sprintf(logname, "%s.log", argv[0]);
-#if HAVE_UNISTD_H
- unlink(logname);
-#endif
- yaz_log_init_file(logname);
- if (argc >= 2)
- log_level = yaz_log_mask_str_x(argv[1], 0);
- if (argc >= 3)
- yaz_log_time_format(argv[2]);
- if (log_level)
- yaz_log_init_level(log_level);
- yaz_log(log_level, "starting %s", argv[0]);
-}
-
-/**
+/*
* tl_start_up : do common start things, and a zebra_start
- * - nmem_init
* - build the name of logfile from argv[0], and open it
* if no argv passed, do not open a log
* - read zebra.cfg from env var srcdir if it exists; otherwise current dir
setrlimit(RLIMIT_CPU, &rlim);
#endif
#endif
- nmem_init();
- tl_start_log(argc, argv);
return tl_zebra_start(cfgname);
}
if (zs)
zebra_stop(zs);
- nmem_exit();
xmalloc_trav("x");
return 1;
}
odr_output = odr_createmem(ODR_ENCODE);
rc = zebra_records_retrieve(zh, odr_output, setname, 0,
- VAL_TEXT_XML, exphits, retrievalRecord);
+ yaz_oid_recsyn_xml, exphits, retrievalRecord);
if (rc != ZEBRA_OK)
ret = 0;
else if (!strstr(retrievalRecord[0].buf, firstrec))
}
}
+ZEBRA_RES tl_fetch(ZebraHandle zh, int position, const char *element_set,
+ const Odr_oid * format, ODR odr,
+ const char **rec_buf, size_t *rec_len)
+{
+ ZebraRetrievalRecord retrievalRecord[1];
+ Z_RecordComposition *comp;
+ ZEBRA_RES res;
+
+ retrievalRecord[0].position = position;
+
+ yaz_set_esn(&comp, element_set, odr->mem);
+
+ res = zebra_records_retrieve(zh, odr, "rsetname", comp, format, 1,
+ retrievalRecord);
+ if (res != ZEBRA_OK)
+ {
+ int code = zebra_errCode(zh);
+ yaz_log(YLOG_FATAL, "zebra_records_retrieve returned error %d",
+ code);
+ }
+ else
+ {
+ *rec_buf = retrievalRecord[0].buf;
+ *rec_len = retrievalRecord[0].len;
+ }
+ return res;
+}
+ZEBRA_RES tl_fetch_compare(ZebraHandle zh,
+ int position, const char *element_set,
+ const Odr_oid *format, const char *cmp_rec)
+{
+ const char *rec_buf = 0;
+ size_t rec_len = 0;
+ ODR odr = odr_createmem(ODR_ENCODE);
+ ZEBRA_RES res = tl_fetch(zh, position, element_set, format, odr,
+ &rec_buf, &rec_len);
+ if (res == ZEBRA_OK)
+ {
+ if (strlen(cmp_rec) != rec_len)
+ res = ZEBRA_FAIL;
+ else if (memcmp(cmp_rec, rec_buf, rec_len))
+ res = ZEBRA_FAIL;
+ if (res == ZEBRA_FAIL)
+ {
+ int l = rec_len;
+ yaz_log(YLOG_LOG, "Expected: %s", cmp_rec);
+ yaz_log(YLOG_LOG, "Got: %.*s", l, rec_buf);
+ }
+ }
+ odr_destroy(odr);
+ return res;
+}
+ZEBRA_RES tl_fetch_first_compare(ZebraHandle zh,
+ const char *element_set,
+ const Odr_oid *format, const char *cmp_rec)
+{
+ return tl_fetch_compare(zh, 1, element_set, format, cmp_rec);
+}
/*
* Local variables:
* c-basic-offset: 4
+ * c-file-style: "Stroustrup"
* indent-tabs-mode: nil
* End:
* vim: shiftwidth=4 tabstop=8 expandtab