1 /* $Id: zoomtst10.c,v 1.1 2006-06-15 10:34:24 adam Exp $ */
4 \brief Synchronous single-target search using CCL conversion
9 #include <yaz/xmalloc.h>
12 int main(int argc, char **argv)
16 ZOOM_query q = ZOOM_query_create();
18 const char *errmsg, *addinfo;
19 int ccl_error_code, ccl_error_pos;
20 const char *ccl_error_string;
24 fprintf (stderr, "usage:\n%s target cclquery\n", *argv);
25 fprintf (stderr, " eg. bagel.indexdata.dk/gils 'ti=computer'\n");
29 if (ZOOM_query_ccl2rpn(q, argv[2],
30 "term t=l,r s=al\n" "ti u=4 s=pw\n",
31 &ccl_error_code, &ccl_error_string, &ccl_error_pos))
33 printf("CCL Error %d: %s\n", ccl_error_code, ccl_error_string);
34 if (ccl_error_pos >= 0)
35 printf("%s\n%*s^\n", argv[2], ccl_error_pos, "");
36 ZOOM_query_destroy(q);
40 z = ZOOM_connection_new (argv[1], 0);
42 if ((error = ZOOM_connection_error(z, &errmsg, &addinfo)))
44 fprintf (stderr, "Error: %s (%d) %s\n", errmsg, error, addinfo);
48 r = ZOOM_connection_search (z, q);
49 ZOOM_query_destroy(q);
50 if ((error = ZOOM_connection_error(z, &errmsg, &addinfo)))
51 fprintf (stderr, "Error: %s (%d) %s\n", errmsg, error, addinfo);
53 printf ("Result count: %ld\n", (long) ZOOM_resultset_size(r));
54 ZOOM_resultset_destroy (r);
55 ZOOM_connection_destroy (z);
62 * indent-tabs-mode: nil
64 * vim: shiftwidth=4 tabstop=8 expandtab