Makefile updates for Automake 1.5+. Test script updates

[idzebra-moved-to-github.git] / test / api / testclient.c

diff --git a/test/api/testclient.c b/test/api/testclient.c
new file mode 100644 (file)
index 0000000..e1a17ab
--- /dev/null
+++ b/test/api/testclient.c
@@ -0,0 +1,127 @@
+/*
+ * $Id: testclient.c,v 1.1 2003-05-21 14:39:22 adam Exp $
+ *
+ * Z39.50 client specifically for Zebra testing.
+ */
+
+#include <stdlib.h>
+#include <stdio.h>
+#ifdef WIN32
+#else
+#include <unistd.h>
+#endif
+
+#include <yaz/xmalloc.h>
+#include <yaz/options.h>
+#include <yaz/zoom.h>
+
+char *prog = "testclient";
+
+int main(int argc, char **argv)
+{
+    ZOOM_connection z;
+    ZOOM_resultset r;
+    int error;
+    const char *errmsg, *addinfo;
+    char *query = 0;
+    char *target = 0;
+    char *arg;
+    int delay_sec = 0;
+    int expected_hits=-1;
+    int ret;
+    int retrieve_number = 0;
+    int retrieve_offset = 0;
+    char *format = 0;
+    int pos;
+    int check_count = -1;
+    int exit_code = 0;
+
+    while ((ret = options("d:n:o:f:c:", argv, argc, &arg)) != -2)
+    {
+        switch (ret)
+        {
+        case 0:
+            if (!target)
+                target = xstrdup(arg);
+            else if (!query)
+                query = xstrdup(arg);
+            break;
+        case 'd':
+            delay_sec = atoi(arg);
+            break;
+        case 'n':
+            retrieve_number = atoi(arg);
+            break;
+        case 'o':
+            retrieve_offset = atoi(arg);
+            break;
+        case 'f':
+            format = xstrdup(arg);
+            break;
+        case 'c':
+           check_count = atoi(arg);
+           break;
+        default:
+            printf ("%s: unknown option %s\n", prog, arg);
+            printf ("usage:\n%s [options] target query \n", prog);
+            printf (" eg.  indexdata.dk/gils computer\n");
+            exit (1);
+        }
+    }
+
+    if (!target || !target)
+    {
+        printf ("%s: missing target/query\n", prog);
+        printf ("usage:\n%s [options] target query \n", prog);
+        printf (" eg.  bagel.indexdata.dk/gils computer\n");
+        printf ("Options:\n");
+        printf (" -n num       number of records to fetch. Default: 0.\n");
+        printf (" -o off       offset for records - counting from 0.\n");
+        printf (" -f format    set record syntax. Default: none\n");
+        printf (" -d sec       delay a number of seconds before exit.\n");
+        exit (3);
+    }
+    z = ZOOM_connection_new (target, 0);
+    
+    if ((error = ZOOM_connection_error(z, &errmsg, &addinfo)))
+    {
+       printf ("Error: %s (%d) %s\n", errmsg, error, addinfo);
+       exit (2);
+    }
+
+    r = ZOOM_connection_search_pqf (z, query);
+    if ((error = ZOOM_connection_error(z, &errmsg, &addinfo)))
+    {
+       printf ("Error: %s (%d) %s\n", errmsg, error, addinfo);
+       if (check_count != -1)
+            exit_code = 10;
+    }
+    else
+    {
+       printf ("Result count: %d\n", ZOOM_resultset_size(r));
+       if (check_count != -1 && check_count != ZOOM_resultset_size(r))
+       {
+           printf("Wrong number of hits, expected %d, got %d\n",
+                           expected_hits, ZOOM_resultset_size(r) );
+           exit(3);
+       }
+    }
+    if (format)
+        ZOOM_resultset_option_set(r, "preferredRecordSyntax", format);
+    for (pos = 0; pos < retrieve_number; pos++)
+    {
+        int len;
+        const char *rec =
+            ZOOM_record_get(
+                ZOOM_resultset_record(r, pos + retrieve_offset),
+                "render", &len);
+        
+        if (rec)
+            fwrite (rec, 1, len, stdout);
+    }
+    if (delay_sec > 0)
+       sleep(delay_sec);
+    ZOOM_resultset_destroy (r);
+    ZOOM_connection_destroy (z);
+    exit (exit_code);
+}