1 /* $Id: tstisamb.c,v 1.6 2004-06-03 00:24:12 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
24 #include <yaz/xmalloc.h>
29 static void log_item(int level, const void *b, const char *txt)
32 memcpy(&x, b, sizeof(int));
33 yaz_log(LOG_DEBUG, "%s %d", txt, x);
36 static void log_pr(const char *txt)
38 yaz_log(LOG_DEBUG, "%s", txt);
41 int compare_item(const void *a, const void *b)
45 memcpy(&ia, a, sizeof(int));
46 memcpy(&ib, b, sizeof(int));
50 void *code_start(int mode)
55 void code_item(int mode, void *p, char **dst, char **src)
57 memcpy (*dst, *src, sizeof(int));
58 (*dst) += sizeof(int);
59 (*src) += sizeof(int);
62 void code_reset(void *p)
65 void code_stop(int mode, void *p)
74 int code_read(void *vp, char **dst, int *insertMode)
76 struct read_info *ri = (struct read_info *)vp;
81 if (ri->no == ri->max)
84 memcpy (*dst, &x, sizeof(int));
92 void tst_forward(ISAMB isb, int n)
101 /* insert a number of entries */
105 isamc_i.clientData = &ri;
106 isamc_i.read_item = code_read;
108 isamc_p = isamb_merge (isb, 0 /* new list */ , &isamc_i);
110 /* read the entries */
111 pp = isamb_pp_open (isb, isamc_p);
113 for (i = 0; i<ri.max; i +=2 )
117 isamb_pp_forward(pp, &x, &xu);
118 if (x != xu && xu != x+1)
120 yaz_log(LOG_WARN, "isamb_pp_forward (1). Got %d (expected %d)",
128 pp = isamb_pp_open (isb, isamc_p);
129 for (i = 0; i<ri.max; i += 100)
133 isamb_pp_forward(pp, &x, &xu);
134 if (x != xu && xu != x+1)
136 yaz_log(LOG_WARN, "isamb_pp_forward (2). Got %d (expected %d)",
144 isamb_unlink(isb, isamc_p);
147 void tst_insert(ISAMB isb, int n)
155 /* insert a number of entries */
159 isamc_i.clientData = &ri;
160 isamc_i.read_item = code_read;
162 isamc_p = isamb_merge (isb, 0 /* new list */ , &isamc_i);
164 /* read the entries */
165 pp = isamb_pp_open (isb, isamc_p);
168 while(isamb_pp_read (pp, key_buf))
171 memcpy (&x, key_buf, sizeof(int));
174 yaz_log(LOG_WARN, "isamb_pp_read. Got %d (expected %d)",
182 yaz_log(LOG_WARN, "ri.max != ri.max (%d != %d)", ri.no, ri.max);
187 isamb_dump(isb, isamc_p, log_pr);
188 isamb_unlink(isb, isamc_p);
191 int main(int argc, char **argv)
198 yaz_log_init_level(LOG_ALL);
200 /* setup method (attributes) */
201 method.compare_item = compare_item;
202 method.log_item = log_item;
203 method.code_start = code_start;
204 method.code_item = code_item;
205 method.code_reset = code_reset;
206 method.code_stop = code_stop;
208 /* create block system */
209 bfs = bfs_create(0, 0);
212 yaz_log(LOG_WARN, "bfs_create failed");
218 /* create isam handle */
219 isb = isamb_open (bfs, "isamb", 1, &method, 0);
222 yaz_log(LOG_WARN, "isamb_open failed");
228 tst_insert(isb, 100);
229 tst_insert(isb, 500);
230 tst_insert(isb, 10000);
231 tst_forward(isb, 10000);
232 /* close isam handle */
235 /* exit block system */