src/yaz-z-server-ursula.cpp

   1 /*
   2  * Copyright (c) 2001, Index Data.
   3  * See the file LICENSE for details.
   4  *
   5  * $Log: yaz-z-server-ursula.cpp,v $
   6  * Revision 1.5  2001-08-13 16:39:12  adam
   7  * PDU_Assoc keeps track of children. Using yaz_log instead of logf.
   8  *
   9  * Revision 1.4  2001/04/25 19:40:18  adam
  10  * Added refernceId handling for other services.
  11  *
  12  * Revision 1.3  2001/04/11 12:33:42  heikki
  13  * Working on ursula things
  14  *
  15  * Revision 1.2  2001/04/05 15:12:24  adam
  16  * WIN32 updates.
  17  *
  18  * Revision 1.1  2001/04/04 14:02:49  adam
  19  * URSULA / Z-ruth service.
  20  *
  21  */
  22
  23 #include <yaz/log.h>
  24 #include <yaz++/yaz-z-server.h>
  25
  26 #if HAVE_YAZ_URSULA_H
  27 int Yaz_Facility_Ursula::init(Yaz_Z_Server *s, Z_InitRequest *initRequest,
  28                               Z_InitResponse *initResponse)
  29 {
  30     Z_Options *req = initRequest->options;
  31     Z_Options *res = initResponse->options;
  32
  33     if (ODR_MASK_GET(req, Z_Options_extendedServices))
  34         ODR_MASK_SET(res, Z_Options_extendedServices);
  35     return 1;
  36 }
  37
  38 int Yaz_Facility_Ursula::recv(Yaz_Z_Server *s, Z_APDU *apdu_request)
  39 {
  40     Z_APDU *apdu_response;
  41
  42     if (apdu_request->which != Z_APDU_extendedServicesRequest)
  43         return 0;
  44     Z_ExtendedServicesRequest *req = apdu_request->u.extendedServicesRequest;
  45
  46     Z_External *r = req->taskSpecificParameters;
  47
  48     if (!r)
  49         return 0;
  50
  51     if (r->which != ODR_EXTERNAL_octet)
  52     {
  53         yaz_log (LOG_LOG, "ursula::recv not octet alighed");
  54         return 0;
  55     }
  56     odr_setbuf (s->odr_decode(), (char*) r->u.octet_aligned->buf,
  57                 r->u.octet_aligned->len, 0);
  58     Z_UrsPDU *pdu = 0;
  59     if (!z_UrsPDU (s->odr_decode(), &pdu, 0, ""))
  60     {
  61         yaz_log (LOG_LOG, "ursula::decode failed");
  62         return 0;
  63     }
  64     yaz_log (LOG_LOG, "got ursula packet");
  65     apdu_response = s->create_Z_PDU(Z_APDU_extendedServicesResponse);
  66     ursula_service(req, pdu, apdu_response->u.extendedServicesResponse, NULL);
  67       // FIXME: Initialize the response pdu...   ADAM!!!
  68     s->transfer_referenceId(apdu_request, apdu_response);
  69     s->send_Z_PDU(apdu_response);
  70     return 1;
  71 }
  72 #endif