* Copyright (c) 2002-2003, Index Data.
* See the file LICENSE for details.
*
- * $Id: srwtst.c,v 1.1 2003-02-14 18:49:24 adam Exp $
+ * $Id: srwtst.c,v 1.5 2003-03-03 19:57:37 adam Exp $
*/
#include <yaz/srw.h>
-#if HAVE_XSLT
+#if HAVE_XML2
Z_SOAP_Handler h[2] = {
{"http://www.loc.gov/zing/srw/v1.0/", 0, (Z_SOAP_fun) yaz_srw_codec},
{0, 0, 0}
ODR decode, encode;
int debug = 0;
+ nmem_init();
if (argc == 2 && !strcmp(argv[1], "debug"))
debug = 1;
no = fread(buf, 1, sizeof(buf), stdin);
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)
{
fprintf(stderr, "No output!\n");
exit(1);
}
+ odr_destroy(decode);
+ odr_destroy(encode);
+ nmem_exit();
exit(0);
}
#else