zoom/zoomtst7.c

   1 /*
   2  * $Id: zoomtst7.c,v 1.5 2001-11-13 22:57:03 adam Exp $
   3  *
   4  * API test..
   5  */
   6
   7 #include <stdio.h>
   8 #include <stdlib.h>
   9 #include <assert.h>
  10
  11 #include <yaz/xmalloc.h>
  12 #include <yaz/nmem.h>
  13
  14 #include <yaz/zoom.h>
  15
  16 int main(int argc, char **argv)
  17 {
  18     int i, j, block;
  19     Z3950_connection z;
  20     Z3950_resultset r[10];  /* and result sets .. */
  21     Z3950_options o;
  22
  23     o = Z3950_options_create ();
  24
  25     z = Z3950_connection_new ("localhost", 9999);
  26     if (Z3950_connection_error (z, 0, 0))
  27     {
  28         printf ("error - couldn't connect?\n");
  29         exit (1);
  30     }
  31
  32     Z3950_connection_destroy (z);
  33
  34     for (block = 0; block < 3; block++)
  35     {
  36         switch (block)
  37         {
  38         case 0:
  39             printf ("blocking - not calling Z3950_events\n");
  40             break;
  41         case 1:
  42             printf ("blocking - calling Z3950_events\n");
  43             break;
  44         case 2:
  45             printf ("non-blocking - calling Z3950_events\n");
  46             break;
  47         }
  48         if (block > 1)
  49             Z3950_options_set (o, "async", "1");
  50         for (i = 0; i<10; i++)
  51         {
  52             char host[40];
  53             printf ("session %2d", i);
  54             sprintf (host, "localhost:9999/%d", i);
  55             z = Z3950_connection_create (o);
  56             Z3950_connection_connect (z, host, 0);
  57
  58             for (j = 0; j < 10; j++)
  59             {
  60                 Z3950_record recs[2];
  61                 size_t recs_count = 2;
  62                 char query[40];
  63                 Z3950_query s = Z3950_query_create ();
  64
  65                 sprintf (query, "i%dr%d", i, j);
  66
  67                 if (Z3950_query_prefix (s, query))
  68                 {
  69                     printf ("bad PQF: %s\n", query);
  70                     exit (2);
  71                 }
  72                 Z3950_options_set (o, "start", "0");
  73                 Z3950_options_set (o, "count", "0");
  74
  75                 r[j] = Z3950_connection_search (z, s); /* non-piggy */
  76
  77                 Z3950_resultset_records (r[j], recs, 0, 2);  /* first two */
  78                 Z3950_record_destroy (recs[0]);
  79                 Z3950_record_destroy (recs[1]);
  80
  81                 Z3950_resultset_records (r[j], recs, 1, 2);  /* third */
  82
  83                 Z3950_resultset_records (r[j], recs, 0, 0);  /* ignored */
  84
  85                 if (Z3950_resultset_size (r[j]) > 2)
  86                 {
  87                     if (!recs[0])
  88                     {
  89                         fprintf (stderr, "\nrecord missing\n");
  90                         exit (1);
  91                     }
  92                 }
  93                 Z3950_record_destroy (recs[0]);
  94                 Z3950_record_destroy (recs[1]);
  95
  96                 Z3950_query_destroy (s);
  97
  98                 putchar ('.');
  99                 if (block > 0)
 100                     while (Z3950_event (1, &z))
 101                         ;
 102             }
 103             for (j = 0; j<i; j++)
 104                 Z3950_resultset_destroy (r[j]);
 105             Z3950_connection_destroy (z);
 106             for (; j < 10; j++)
 107                 Z3950_resultset_destroy (r[j]);
 108             printf ("10 searches, 20 presents done\n");
 109         }
 110
 111         for (i = 0; i<1; i++)
 112         {
 113             Z3950_query q = Z3950_query_create ();
 114             char host[40];
 115
 116             printf ("session %2d", i+10);
 117             sprintf (host, "localhost:9999/%d", i);
 118             z = Z3950_connection_create (o);
 119             Z3950_connection_connect (z, host, 0);
 120
 121             for (j = 0; j < 10; j++)
 122             {
 123                 char query[40];
 124
 125                 sprintf (query, "i%dr%d", i, j);
 126
 127                 Z3950_options_set (o, "count", "0");
 128
 129                 r[j] = Z3950_connection_search_pqf (z, query);
 130
 131                 putchar ('.');
 132                 if (block > 0)
 133                     while (Z3950_event (1, &z))
 134                         ;
 135             }
 136             Z3950_connection_destroy (z);
 137
 138             for (j = 0; j < 10; j++)
 139             {
 140                 Z3950_resultset_records (r[j], 0, 0, 1);
 141                 if (block > 0)
 142                     while (Z3950_event (1, &z))
 143                         ;
 144             }
 145             for (j = 0; j < 10; j++)
 146                 Z3950_resultset_destroy (r[j]);
 147             Z3950_query_destroy (q);
 148             printf ("10 searches, 10 ignored presents done\n");
 149         }
 150     }
 151     Z3950_options_destroy (o);
 152     exit (0);
 153 }
 154