2 * Copyright (c) 2001, Index Data.
3 * See the file LICENSE for details.
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.
9 * Revision 1.4 2001/04/25 19:40:18 adam
10 * Added refernceId handling for other services.
12 * Revision 1.3 2001/04/11 12:33:42 heikki
13 * Working on ursula things
15 * Revision 1.2 2001/04/05 15:12:24 adam
18 * Revision 1.1 2001/04/04 14:02:49 adam
19 * URSULA / Z-ruth service.
24 #include <yaz++/yaz-z-server.h>
27 int Yaz_Facility_Ursula::init(Yaz_Z_Server *s, Z_InitRequest *initRequest,
28 Z_InitResponse *initResponse)
30 Z_Options *req = initRequest->options;
31 Z_Options *res = initResponse->options;
33 if (ODR_MASK_GET(req, Z_Options_extendedServices))
34 ODR_MASK_SET(res, Z_Options_extendedServices);
38 int Yaz_Facility_Ursula::recv(Yaz_Z_Server *s, Z_APDU *apdu_request)
40 Z_APDU *apdu_response;
42 if (apdu_request->which != Z_APDU_extendedServicesRequest)
44 Z_ExtendedServicesRequest *req = apdu_request->u.extendedServicesRequest;
46 Z_External *r = req->taskSpecificParameters;
51 if (r->which != ODR_EXTERNAL_octet)
53 yaz_log (LOG_LOG, "ursula::recv not octet alighed");
56 odr_setbuf (s->odr_decode(), (char*) r->u.octet_aligned->buf,
57 r->u.octet_aligned->len, 0);
59 if (!z_UrsPDU (s->odr_decode(), &pdu, 0, ""))
61 yaz_log (LOG_LOG, "ursula::decode failed");
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);