Fix sample PQF

[yaz-moved-to-github.git] / zutil / srwtst.c

diff --git a/zutil/srwtst.c b/zutil/srwtst.c
index d31dca2..be4cad7 100644 (file)
--- a/zutil/srwtst.c
+++ b/zutil/srwtst.c
@@ -2,7 +2,7 @@
  * Copyright (c) 2002-2003, Index Data.
  * See the file LICENSE for details.
  *
- * $Id: srwtst.c,v 1.3 2003-02-17 22:35:48 adam Exp $
+ * $Id: srwtst.c,v 1.5 2003-03-03 19:57:37 adam Exp $
  */
 
 #include <yaz/srw.h>
@@ -49,10 +49,22 @@ int main(int argc, char **argv)
         if (soap_package->which == Z_SOAP_generic &&
             soap_package->u.generic->no == 0)
         {
-            Z_SRW_searchRetrieve *sr = soap_package->u.generic->p;
+            Z_SRW_PDU *sr = soap_package->u.generic->p;
             if (sr->which == Z_SRW_searchRetrieve_request)
             { 
                 Z_SRW_searchRetrieveRequest *req = sr->u.request;
+                switch(req->query_type)
+                {
+                case Z_SRW_query_type_cql:
+                    fprintf(stderr, "CQL: %s\n", req->query.cql);
+                    break;
+                case Z_SRW_query_type_xcql:
+                    fprintf(stderr, "XCQL\n");
+                    break;
+                case Z_SRW_query_type_pqf:
+                    fprintf(stderr, "PQF: %s\n", req->query.pqf);
+                    break;
+                }
             }
             else if (sr->which == Z_SRW_searchRetrieve_response)
             {