2 * $Id: testclient.c,v 1.5 2002-11-09 22:26:19 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;
33 while ((ret = options("d:n:o:f:c:", argv, argc, &arg)) != -2)
39 target = xstrdup(arg);
44 delay_sec = atoi(arg);
47 retrieve_number = atoi(arg);
50 retrieve_offset = atoi(arg);
53 format = xstrdup(arg);
56 check_count = atoi(arg);
59 printf ("%s: unknown option %s\n", prog, arg);
60 printf ("usage:\n%s [options] target query \n", prog);
61 printf (" eg. bagel.indexdata.dk/gils computer\n");
66 if (!target || !target)
68 printf ("%s: missing target/query\n", prog);
69 printf ("usage:\n%s [options] target query \n", prog);
70 printf (" eg. bagel.indexdata.dk/gils computer\n");
71 printf ("Options:\n");
72 printf (" -n num number of records to fetch. Default: 0.\n");
73 printf (" -o off offset for records - counting from 0.\n");
74 printf (" -f format set record syntax. Default: none\n");
75 printf (" -d sec delay a number of seconds before exit.\n");
79 z = ZOOM_connection_new (target, 0);
81 if ((error = ZOOM_connection_error(z, &errmsg, &addinfo)))
83 printf ("Error: %s (%d) %s\n", errmsg, error, addinfo);
87 r = ZOOM_connection_search_pqf (z, query);
88 if ((error = ZOOM_connection_error(z, &errmsg, &addinfo)))
90 printf ("Error: %s (%d) %s\n", errmsg, error, addinfo);
91 if (check_count != -1)
96 printf ("Result count: %d\n", ZOOM_resultset_size(r));
97 if (check_count != -1 && check_count != ZOOM_resultset_size(r))
101 ZOOM_resultset_option_set(r, "preferredRecordSyntax", format);
102 for (pos = 0; pos < retrieve_number; pos++)
107 ZOOM_resultset_record(r, pos + retrieve_offset),
111 fwrite (rec, 1, len, stdout);
115 ZOOM_resultset_destroy (r);
116 ZOOM_connection_destroy (z);