Added one type cast from char to unsigned char
[yaz-moved-to-github.git] / src / seshigh.c
index d355260..d74a617 100644 (file)
@@ -2,7 +2,7 @@
  * Copyright (C) 1995-2005, Index Data ApS
  * See the file LICENSE for details.
  *
- * $Id: seshigh.c,v 1.78 2006-05-08 10:16:47 adam Exp $
+ * $Id: seshigh.c,v 1.84 2006-05-30 04:50:04 quinn Exp $
  */
 /**
  * \file seshigh.c
@@ -609,7 +609,7 @@ static int retrieve_fetch(association *assoc, bend_fetch_rr *rr)
                 rr->errstring = odr_strdup(rr->stream, details);
             return -1;
         }
-        else if (r == 1)
+        else if (r == 1 || r == 3)
         {
             const char *details = input_schema;
             rr->errcode =  YAZ_BIB1_ELEMENT_SET_NAMES_UNSUPP;
@@ -620,19 +620,12 @@ static int retrieve_fetch(association *assoc, bend_fetch_rr *rr)
         else if (r == 2)
         {
             rr->errcode = YAZ_BIB1_RECORD_SYNTAX_UNSUPP;
-            return -1;
-        }
-        else if (r == 3)
-        {
-            const char *details = input_schema;
-            rr->errcode =  YAZ_BIB1_ELEMENT_SET_NAMES_UNSUPP;
-            if (details)
-                rr->errstring = odr_strdup(rr->stream, details);
-            return -1;
-        }
-        else if (r == 4)
-        {
-            rr->errcode = YAZ_BIB1_RECORD_NOT_AVAILABLE_IN_REQUESTED_SYNTAX; 
+            if (input_syntax_raw)
+            {
+                char oidbuf[OID_STR_MAX];
+                oid_to_dotstring(input_syntax_raw, oidbuf);
+                rr->errstring = odr_strdup(rr->stream, oidbuf);
+            }
             return -1;
         }
         if (backend_schema)
@@ -697,7 +690,7 @@ static int srw_bend_fetch(association *assoc, int pos,
     rr.referenceId = 0;
     rr.request_format = VAL_TEXT_XML;
     rr.request_format_raw = yaz_oidval_to_z3950oid(assoc->decode,
-                                                   CLASS_TRANSYN,
+                                                   CLASS_RECSYN,
                                                    VAL_TEXT_XML);
     rr.comp = (Z_RecordComposition *)
             odr_malloc(assoc->decode, sizeof(*rr.comp));
@@ -738,8 +731,6 @@ static int srw_bend_fetch(association *assoc, int pos,
     rr.len = 0;
     rr.record = 0;
     rr.last_in_set = 0;
-    rr.output_format = VAL_TEXT_XML;
-    rr.output_format_raw = 0;
     rr.errcode = 0;
     rr.errstring = 0;
     rr.surrogate_flag = 0;
@@ -1011,50 +1002,93 @@ static void srw_bend_search(association *assoc, request *req,
                     }
                     else
                     {
-                        int j = 0;
-                        int packing = Z_SRW_recordPacking_string;
+                        int ok = 1;
                         if (start + number > rr.hits)
                             number = rr.hits - start + 1;
-                        if (srw_req->recordPacking){
-                            if (!strcmp(srw_req->recordPacking, "xml"))
-                                packing = Z_SRW_recordPacking_XML;
-                            if (!strcmp(srw_req->recordPacking, "url"))
-                                packing = Z_SRW_recordPacking_URL;
-                        }
-                        srw_res->records = (Z_SRW_record *)
-                            odr_malloc(assoc->encode,
-                                       number * sizeof(*srw_res->records));
-                        
-                        srw_res->extra_records = (Z_SRW_extra_record **)
-                            odr_malloc(assoc->encode,
-                                       number*sizeof(*srw_res->extra_records));
-
-                        for (i = 0; i<number; i++)
+
+                        /* Call bend_present if defined */
+                        if (assoc->init->bend_present)
                         {
-                            int errcode;
+                            bend_present_rr *bprr = (bend_present_rr*)
+                                odr_malloc (assoc->decode, sizeof(*bprr));
+                            bprr->setname = "default";
+                            bprr->start = start;
+                            bprr->number = number;
+                            bprr->format = VAL_TEXT_XML;
+                            bprr->comp = (Z_RecordComposition *) odr_malloc(assoc->decode,
+                                    sizeof(*bprr->comp));
+                            bprr->comp->which = Z_RecordComp_simple;
+                            bprr->comp->u.simple = (Z_ElementSetNames *)
+                                odr_malloc(assoc->decode, sizeof(Z_ElementSetNames));
+                            bprr->comp->u.simple->which = Z_ElementSetNames_generic;
+                            bprr->comp->u.simple->u.generic = srw_req->recordSchema;
+                            bprr->stream = assoc->encode;
+                            bprr->referenceId = 0;
+                            bprr->print = assoc->print;
+                            bprr->request = req;
+                            bprr->association = assoc;
+                            bprr->errcode = 0;
+                            bprr->errstring = NULL;
+                            (*assoc->init->bend_present)(assoc->backend, bprr);
                             
-                            srw_res->records[j].recordPacking = packing;
-                            srw_res->records[j].recordData_buf = 0;
-                            srw_res->extra_records[j] = 0;
-                            yaz_log(YLOG_DEBUG, "srw_bend_fetch %d", i+start);
-                            errcode = srw_bend_fetch(assoc, i+start, srw_req,
-                                                     srw_res->records + j);
-                            if (errcode)
+                            if (!bprr->request)
+                                return;
+                            if (bprr->errcode)
                             {
+                                srw_error = yaz_diag_bib1_to_srw (bprr->errcode);
                                 yaz_add_srw_diagnostic(assoc->encode,
                                                        &srw_res->diagnostics,
                                                        &srw_res->num_diagnostics,
-                                                       yaz_diag_bib1_to_srw (errcode),
-                                                       rr.errstring);
+                                                       srw_error, bprr->errstring);
+                                ok = 0;
+                            }
+                        }
+
+                        if (ok)
+                        {
+                            int j = 0;
+                            int packing = Z_SRW_recordPacking_string;
+                            if (srw_req->recordPacking){
+                                if (!strcmp(srw_req->recordPacking, "xml"))
+                                    packing = Z_SRW_recordPacking_XML;
+                                if (!strcmp(srw_req->recordPacking, "url"))
+                                    packing = Z_SRW_recordPacking_URL;
+                            }
+                            srw_res->records = (Z_SRW_record *)
+                                odr_malloc(assoc->encode,
+                                           number * sizeof(*srw_res->records));
+                            
+                            srw_res->extra_records = (Z_SRW_extra_record **)
+                                odr_malloc(assoc->encode,
+                                           number*sizeof(*srw_res->extra_records));
+
+                            for (i = 0; i<number; i++)
+                            {
+                                int errcode;
                                 
-                                break;
+                                srw_res->records[j].recordPacking = packing;
+                                srw_res->records[j].recordData_buf = 0;
+                                srw_res->extra_records[j] = 0;
+                                yaz_log(YLOG_DEBUG, "srw_bend_fetch %d", i+start);
+                                errcode = srw_bend_fetch(assoc, i+start, srw_req,
+                                                         srw_res->records + j);
+                                if (errcode)
+                                {
+                                    yaz_add_srw_diagnostic(assoc->encode,
+                                                           &srw_res->diagnostics,
+                                                           &srw_res->num_diagnostics,
+                                                           yaz_diag_bib1_to_srw (errcode),
+                                                           rr.errstring);
+                                    
+                                    break;
+                                }
+                                if (srw_res->records[j].recordData_buf)
+                                    j++;
                             }
-                            if (srw_res->records[j].recordData_buf)
-                                j++;
+                            srw_res->num_records = j;
+                            if (!j)
+                                srw_res->records = 0;
                         }
-                        srw_res->num_records = j;
-                        if (!j)
-                            srw_res->records = 0;
                     }
                 }
             }
@@ -2241,7 +2275,7 @@ static Z_APDU *process_initRequest(association *assoc, request *reqb)
                 assoc->init->implementation_name,
                 odr_prepend(assoc->encode, "GFS", resp->implementationName));
 
-    version = odr_strdup(assoc->encode, "$Revision: 1.78 $");
+    version = odr_strdup(assoc->encode, "$Revision: 1.84 $");
     if (strlen(version) > 10)   /* check for unexpanded CVS strings */
         version[strlen(version)-2] = '\0';
     resp->implementationVersion = odr_prepend(assoc->encode,
@@ -2657,9 +2691,39 @@ static Z_APDU *response_searchRequest(association *assoc, request *reqb,
                 form = VAL_NONE;
             else
                 form = prefformat->value;
-            resp->records = pack_records(assoc, req->resultSetName, 1,
-                                         toget, compp, next, presst, form, req->referenceId,
-                                         req->preferredRecordSyntax, NULL);
+
+            /* Call bend_present if defined */
+            if (assoc->init->bend_present)
+            {
+                bend_present_rr *bprr = (bend_present_rr *)
+                    nmem_malloc (reqb->request_mem, sizeof(*bprr));
+                bprr->setname = req->resultSetName;
+                bprr->start = 1;
+                bprr->number = *toget;
+                bprr->format = form;
+                bprr->comp = compp;
+                bprr->referenceId = req->referenceId;
+                bprr->stream = assoc->encode;
+                bprr->print = assoc->print;
+                bprr->request = reqb;
+                bprr->association = assoc;
+                bprr->errcode = 0;
+                bprr->errstring = NULL;
+                (*assoc->init->bend_present)(assoc->backend, bprr);
+
+                if (!bprr->request)
+                    return 0;
+                if (bprr->errcode)
+                {
+                    resp->records = diagrec(assoc, bprr->errcode, bprr->errstring);
+                    *resp->presentStatus = Z_PresentStatus_failure;
+                }
+            }
+
+            if (!resp->records)
+                resp->records = pack_records(assoc, req->resultSetName, 1,
+                                             toget, compp, next, presst, form, req->referenceId,
+                                             req->preferredRecordSyntax, NULL);
             if (!resp->records)
                 return 0;
             resp->numberOfRecordsReturned = toget;