1 /* This file is part of the YAZ toolkit.
2 * Copyright (C) Index Data
3 * See the file LICENSE for details.
8 #include <yaz/xmalloc.h>
12 static void display_records (const char *tname, ZOOM_resultset r)
14 /* OK, no major errors. Look at the result count */
16 printf ("%s: %ld hits\n", tname, (long) ZOOM_resultset_size(r));
17 /* go through all records at target */
18 for (pos = 0; pos < 4; pos++)
20 ZOOM_record rec = ZOOM_resultset_record (r, pos);
23 /* get database for record and record itself at pos */
24 const char *db = ZOOM_record_get (rec, "database", 0);
26 const char *render = ZOOM_record_get (rec, "render", &len);
27 /* if rec is non-null, we got a record for display */
30 printf ("%d %s\n", pos+1, (db ? db : "unknown"));
33 if (fwrite (render, 1, len, stdout) != (size_t) len)
34 printf("write to stdout failed\n");
42 int main(int argc, char **argv)
46 ZOOM_connection z[500]; /* allow at most 500 connections */
47 ZOOM_resultset r1[500]; /* and result sets .. */
48 ZOOM_resultset r2[500]; /* and result sets .. */
52 o = ZOOM_options_create ();
55 fprintf (stderr, "usage:\n%s target1 .. targetN query1 query2\n",
62 ZOOM_options_set (o, "async", "1");
64 /* get 3 (at most) records from beginning */
65 ZOOM_options_set (o, "count", "3");
67 ZOOM_options_set (o, "preferredRecordSyntax", "sutrs");
68 ZOOM_options_set (o, "elementSetName", "B");
71 q = ZOOM_query_create ();
72 if (ZOOM_query_prefix (q, argv[argc-2]))
74 printf ("bad PQF: %s\n", argv[argc-2]);
77 /* connect - and search all */
78 for (i = 0; i<no; i++)
80 z[i] = ZOOM_connection_create (o);
81 ZOOM_connection_connect (z[i], argv[i+1], 0);
82 r1[i] = ZOOM_connection_search (z[i], q);
84 if (ZOOM_query_prefix (q, argv[argc-1]))
86 printf ("bad prefix query: %s\n", argv[argc-1]);
89 /* queue second search */
90 for (i = 0; i<no; i++)
91 r2[i] = ZOOM_connection_search (z[i], q);
93 /* fetch 5th record from first result set as well */
94 for (i = 0; i<no; i++)
95 ZOOM_resultset_records (r1[i], 0, 4, 1);
98 while (ZOOM_event (no, z))
102 for (i = 0; i<no; i++)
105 const char *errmsg, *addinfo;
106 if ((error = ZOOM_connection_error(z[i], &errmsg, &addinfo)))
107 fprintf (stderr, "%s error: %s (%d) %s\n",
108 ZOOM_connection_option_get(z[i], "host"),
109 errmsg, error, addinfo);
112 display_records (ZOOM_connection_option_get(z[i], "host"), r1[i]);
113 display_records (ZOOM_connection_option_get(z[i], "host"), r2[i]);
116 /* destroy stuff and exit */
117 ZOOM_query_destroy (q);
118 for (i = 0; i<no; i++)
120 ZOOM_connection_destroy (z[i]);
121 ZOOM_resultset_destroy (r1[i]);
122 ZOOM_resultset_destroy (r2[i]);
124 ZOOM_options_destroy(o);
130 * c-file-style: "Stroustrup"
131 * indent-tabs-mode: nil
133 * vim: shiftwidth=4 tabstop=8 expandtab