2 * $Id: testclient.c,v 1.4 2002-10-23 13:55:37 adam Exp $
4 * Z39.50 client specifically for Zebra testing.
9 #include <yaz/xmalloc.h>
10 #include <yaz/options.h>
13 char *prog = "testclient";
15 int main(int argc, char **argv)
20 const char *errmsg, *addinfo;
26 int retrieve_number = 0;
27 int retrieve_offset = 0;
31 while ((ret = options("d:n:o:f:", argv, argc, &arg)) != -2)
37 target = xstrdup(arg);
42 delay_sec = atoi(arg);
45 retrieve_number = atoi(arg);
48 retrieve_offset = atoi(arg);
51 format = xstrdup(arg);
54 printf ("%s: unknown option %s\n", prog, arg);
55 printf ("usage:\n%s [options] target query \n", prog);
56 printf (" eg. bagel.indexdata.dk/gils computer\n");
61 if (!target || !target)
63 printf ("%s: missing target/query\n", prog);
64 printf ("usage:\n%s [options] target query \n", prog);
65 printf (" eg. bagel.indexdata.dk/gils computer\n");
66 printf ("Options:\n");
67 printf (" -n num number of records to fetch. Default: 0.\n");
68 printf (" -o off offset for records - counting from 0.\n");
69 printf (" -f format set record syntax. Default: none\n");
70 printf (" -d sec delay a number of seconds before exit.\n");
74 z = ZOOM_connection_new (target, 0);
76 if ((error = ZOOM_connection_error(z, &errmsg, &addinfo)))
78 printf ("Error: %s (%d) %s\n", errmsg, error, addinfo);
82 r = ZOOM_connection_search_pqf (z, query);
83 if ((error = ZOOM_connection_error(z, &errmsg, &addinfo)))
84 fprintf (stderr, "Error: %s (%d) %s\n", errmsg, error, addinfo);
86 printf ("Result count: %d\n", ZOOM_resultset_size(r));
89 ZOOM_resultset_option_set(r, "preferredRecordSyntax", format);
90 for (pos = 0; pos < retrieve_number; pos++)
95 ZOOM_resultset_record(r, pos + retrieve_offset),
99 fwrite (rec, 1, len, stdout);
103 ZOOM_resultset_destroy (r);
104 ZOOM_connection_destroy (z);