Added RFC1006 as separate library

[yaz-moved-to-github.git] / server / seshigh.c

diff --git a/server/seshigh.c b/server/seshigh.c
index edda495..02bdd79 100644 (file)
--- a/server/seshigh.c
+++ b/server/seshigh.c
@@ -4,7 +4,16 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: seshigh.c,v $
- * Revision 1.12  1995-03-29 15:40:16  quinn
+ * Revision 1.15  1995-03-30 14:03:23  quinn
+ * Added RFC1006 as separate library
+ *
+ * Revision 1.14  1995/03/30  12:18:17  quinn
+ * Fixed bug.
+ *
+ * Revision 1.13  1995/03/30  09:09:24  quinn
+ * Added state-handle and some support for asynchronous activities.
+ *
+ * Revision 1.12  1995/03/29  15:40:16  quinn
  * Ongoing work. Statserv is now dynamic by default
  *
  * Revision 1.11  1995/03/28  09:16:21  quinn
@@ -80,6 +89,7 @@ association *create_association(IOCHAN channel, COMSTACK link)
     new->state = ASSOC_UNINIT;
     new->input_buffer = 0;
     new->input_buffer_len = 0;
+    new->backend = 0;
     if (cs_getproto(link) == CS_Z3950)
        new->proto = PROTO_Z3950;
     else
@@ -94,6 +104,8 @@ void destroy_association(association *h)
     free(h->encode_buffer);
     if (h->input_buffer)
        free(h->input_buffer);
+    if (h->backend)
+       bend_close(h->backend);
     free(h);
 }
 
@@ -209,6 +221,7 @@ static int process_initRequest(IOCHAN client, Z_InitRequest *req)
        return -1;
     }
 
+    assoc->backend = binitres->handle;
     apdup = &apdu;
     apdu.which = Z_APDU_initResponse;
     apdu.u.initResponse = &resp;
@@ -244,7 +257,7 @@ static int process_initRequest(IOCHAN client, Z_InitRequest *req)
     resp.result = &result;
     resp.implementationId = "YAZ";
     resp.implementationName = "Index Data/YAZ Generic Frontend Server";
-    resp.implementationVersion = "$Revision: 1.12 $";
+    resp.implementationVersion = "$Revision: 1.15 $";
     resp.userInformationField = 0;
     if (!z_APDU(assoc->encode, &apdup, 0))
     {
@@ -346,7 +359,7 @@ static Z_Records *pack_records(association *a, char *setname, int start,
        }
        freq.setname = setname;
        freq.number = recno;
-       if (!(fres = bend_fetch(&freq)))
+       if (!(fres = bend_fetch(a->backend, &freq, 0)))
        {
            *pres = Z_PRES_FAILURE;
            return diagrec(a->proto, 2, "Backend interface problem");
@@ -436,6 +449,7 @@ static int process_searchRequest(IOCHAN client, Z_SearchRequest *req)
     bend_searchresult *bsrt;
     oident *oent;
     int next = 0;
+    static int none = Z_RES_NONE;
 
     fprintf(stderr, "Got SearchRequest.\n");
     apdup = &apdu;
@@ -451,7 +465,15 @@ static int process_searchRequest(IOCHAN client, Z_SearchRequest *req)
        if (!(oent = oid_getentbyoid(q->attributeSetId)) ||
            oent->class != CLASS_ATTSET ||
            oent->value != VAL_BIB1)
+       {
            resp.records = diagrec(assoc->proto, 121, 0);
+           resp.resultCount = &nulint;
+           resp.numberOfRecordsReturned = &nulint;
+           resp.nextResultSetPosition = &nulint;
+           resp.searchStatus = &none;
+           resp.resultSetStatus = 0;
+           resp.presentStatus = 0;
+       }
     }
     if (!resp.records)
     {
@@ -465,60 +487,62 @@ static int process_searchRequest(IOCHAN client, Z_SearchRequest *req)
        bsrq.basenames = req->databaseNames;
        bsrq.query = req->query;
 
-       if (!(bsrt = bend_search(&bsrq)))
+       if (!(bsrt = bend_search(assoc->backend, &bsrq, 0)))
            return -1;
        else if (bsrt->errcode)
+       {
+
            resp.records = diagrec(assoc->proto, bsrt->errcode,
                bsrt->errstring);
+           resp.resultCount = &nulint;
+           resp.numberOfRecordsReturned = &nulint;
+           resp.nextResultSetPosition = &nulint;
+           resp.searchStatus = &nulint;
+           resp.resultSetStatus = &none;
+           resp.presentStatus = 0;
+       }
        else
+       {
            resp.records = 0;
 
-       resp.resultCount = &bsrt->hits;
+           resp.resultCount = &bsrt->hits;
 
-       /* how many records does the user agent want, then? */
-       if (bsrt->hits <= *req->smallSetUpperBound)
-       {
-           toget = bsrt->hits;
-           setnames = req->smallSetElementSetNames;
-       }
-       else if (bsrt->hits < *req->largeSetLowerBound)
-       {
-           toget = *req->mediumSetPresentNumber;
-           setnames = req->mediumSetElementSetNames;
-       }
-       else
-           toget = 0;
+           /* how many records does the user agent want, then? */
+           if (bsrt->hits <= *req->smallSetUpperBound)
+           {
+               toget = bsrt->hits;
+               setnames = req->smallSetElementSetNames;
+           }
+           else if (bsrt->hits < *req->largeSetLowerBound)
+           {
+               toget = *req->mediumSetPresentNumber;
+               setnames = req->mediumSetElementSetNames;
+           }
+           else
+               toget = 0;
 
-       if (toget)
-       {
-           resp.records = pack_records(assoc, req->resultSetName, 1, &toget,
-               setnames, &next, &presst);
-           if (!resp.records)
-               return -1;
-           resp.numberOfRecordsReturned = &toget;
-           resp.nextResultSetPosition = &next;
-           resp.searchStatus = &sr;
-           resp.resultSetStatus = &sr;
-           resp.presentStatus = &presst;
-       }
-       else
-       {
-           resp.records = 0;
-           resp.numberOfRecordsReturned = &nulint;
-           resp.nextResultSetPosition = &nulint;
-           resp.searchStatus = &sr;
-           resp.resultSetStatus = &sr;
-           resp.presentStatus = 0;
+           if (toget && !resp.records)
+           {
+               resp.records = pack_records(assoc, req->resultSetName, 1,
+                   &toget, setnames, &next, &presst);
+               if (!resp.records)
+                   return -1;
+               resp.numberOfRecordsReturned = &toget;
+               resp.nextResultSetPosition = &next;
+               resp.searchStatus = &sr;
+               resp.resultSetStatus = 0;
+               resp.presentStatus = &presst;
+           }
+           else
+           {
+               resp.numberOfRecordsReturned = &nulint;
+               resp.nextResultSetPosition = &next;
+               resp.searchStatus = &sr;
+               resp.resultSetStatus = 0;
+               resp.presentStatus = 0;
+           }
        }
     }
-    else
-    {
-       resp.resultCount = &nulint;
-       resp.numberOfRecordsReturned = &nulint;
-       resp.nextResultSetPosition = &nulint;
-       resp.searchStatus = &nulint;
-       resp.resultSetStatus = 0;
-    }
 
     if (!z_APDU(assoc->encode, &apdup, 0))
     {