X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;ds=sidebyside;f=zutil%2Fsrwtst.c;fp=zutil%2Fsrwtst.c;h=0000000000000000000000000000000000000000;hb=c6e47cbbff56f39f6d81b079ebaeac41d793d4d9;hp=be4cad7ed86beebf66936aa408b1a69698e1713f;hpb=c71d717ada2a9ef730d527f161eb5ba9aa641a9f;p=yaz-moved-to-github.git diff --git a/zutil/srwtst.c b/zutil/srwtst.c deleted file mode 100644 index be4cad7..0000000 --- a/zutil/srwtst.c +++ /dev/null @@ -1,107 +0,0 @@ -/* - * Copyright (c) 2002-2003, Index Data. - * See the file LICENSE for details. - * - * $Id: srwtst.c,v 1.5 2003-03-03 19:57:37 adam Exp $ - */ - -#include - -#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} -}; - -int main(int argc, char **argv) -{ - char buf[163840]; - char *content_buf = buf; - int content_len; - int ret; - size_t no; - Z_SOAP *soap_package = 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 (no < 1 || no == sizeof(buf)) - { - fprintf(stderr, "Bad file or too big\n"); - exit (1); - } - decode = odr_createmem(ODR_DECODE); - encode = odr_createmem(ODR_ENCODE); - content_len = no; - ret = z_soap_codec(decode, &soap_package, - &content_buf, &content_len, h); - if (!soap_package) - { - fprintf(stderr, "Decoding seriously failed\n"); - exit(1); - } - if (debug) - { - fprintf(stderr, "got NS = %s\n", soap_package->ns); - if (soap_package->which == Z_SOAP_generic && - soap_package->u.generic->no == 0) - { - 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) - { - Z_SRW_searchRetrieveResponse *res = sr->u.response; - if (res->records && res->num_records) - { - int i; - for (i = 0; inum_records; i++) - { - fprintf (stderr, "%d\n", i); - if (res->records[i].recordData_buf) - fwrite(res->records[i].recordData_buf, 1, - res->records[i].recordData_len, stderr); - } - } - } - - } - } - ret = z_soap_codec(encode, &soap_package, - &content_buf, &content_len, h); - if (content_buf && content_len) - fwrite (content_buf, content_len, 1, stdout); - else - { - fprintf(stderr, "No output!\n"); - exit(1); - } - odr_destroy(decode); - odr_destroy(encode); - nmem_exit(); - exit(0); -} -#else -int main(int argc, char **argv) -{ - fprintf(stderr, "SOAP disabled\n"); - exit(1); -} -#endif