-/* $Id: testlib.c,v 1.46 2007-11-30 10:08:01 adam Exp $
- Copyright (C) 1995-2007
- 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
}
}
-ZEBRA_RES tl_fetch_first(ZebraHandle zh, const char *element_set,
- const Odr_oid * format, ODR odr,
- const char **rec_buf, size_t *rec_len)
+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 = 1; /* get from this position */
+ retrievalRecord[0].position = position;
yaz_set_esn(&comp, element_set, odr->mem);
- res = zebra_records_retrieve(zh, odr, "default", comp, format, 1,
+ res = zebra_records_retrieve(zh, odr, "rsetname", comp, format, 1,
retrievalRecord);
if (res != ZEBRA_OK)
{
return res;
}
-ZEBRA_RES tl_fetch_first_compare(ZebraHandle zh,
- const char *element_set,
- const Odr_oid *format, const char *cmp_rec)
+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_first(zh, element_set, format, odr,
- &rec_buf, &rec_len);
+ 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