X-Git-Url: http://git.indexdata.com/?p=yazpp-moved-to-github.git;a=blobdiff_plain;f=src%2Fyaz-z-assoc.cpp;h=63b346a11bd49cbd07bebd844fc05fbee95b0d06;hp=824bae65d6b0c259019b435a4c634d6f38a02689;hb=4b3585940162cf9ca65ca4a6914c0addcde50eef;hpb=22eeea158d7baa9291b5449304d979c173034f0a diff --git a/src/yaz-z-assoc.cpp b/src/yaz-z-assoc.cpp index 824bae6..63b346a 100644 --- a/src/yaz-z-assoc.cpp +++ b/src/yaz-z-assoc.cpp @@ -1,111 +1,80 @@ -/* - * Copyright (c) 1998-1999, Index Data. +/* This file is part of the yazpp toolkit. + * Copyright (C) 1998-2008 Index Data and Mike Taylor * See the file LICENSE for details. - * Sebastian Hammer, Adam Dickmeiss - * - * $Log: yaz-z-assoc.cpp,v $ - * Revision 1.12 2000-09-05 13:57:28 adam - * Fixed get_otherInfoAPDU to return otherInfo for extended services. - * - * Revision 1.11 2000/09/04 08:59:16 adam - * Changed call to logging functions (yaz_ added). - * - * Revision 1.10 2000/09/04 08:29:22 adam - * Fixed memory leak(s). Added re-use of associations, rather than - * re-init, when maximum number of targets are in use. - * - * Revision 1.9 2000/08/10 08:42:42 adam - * Fixes for {set,get}_APDU_log. - * - * Revision 1.8 2000/08/07 14:19:59 adam - * Fixed serious bug regarding timeouts. Improved logging for proxy. - * - * Revision 1.7 2000/05/10 11:36:58 ian - * Added default parameters for refid to request functions. - * Added default parameter for result set name to search and present request. - * Commented out forced logging of PDU contents. - * Added send_deleteResultSetRequest - * - * Revision 1.6 1999/12/06 13:52:45 adam - * Modified for new location of YAZ header files. Experimental threaded - * operation. - * - * Revision 1.5 1999/11/10 10:02:34 adam - * Work on proxy. - * - * Revision 1.4 1999/09/13 12:53:44 adam - * Proxy removes OtherInfo Proxy Address and Session ID. Other - * Otherinfo remains untouched. - * - * Revision 1.3 1999/04/21 12:09:01 adam - * Many improvements. Modified to proxy server to work with "sessions" - * based on cookies. - * - * Revision 1.2 1999/04/20 10:30:05 adam - * Implemented various stuff for client and proxy. Updated calls - * to ODR to reflect new name parameter. - * - * Revision 1.1 1999/04/09 11:46:57 adam - * Added object Yaz_Z_Assoc. Much more functional client. - * */ #include +#include #include -#include +#include #include +#include + +using namespace yazpp_1; -int Yaz_Z_Assoc::yaz_init_func() +int Z_Assoc::yaz_init_func() { - nmem_init(); +#ifndef WIN32 + signal (SIGPIPE, SIG_IGN); +#endif return 1; } -int Yaz_Z_Assoc::yaz_init_flag = Yaz_Z_Assoc::yaz_init_func(); +int Z_Assoc::yaz_init_flag = Z_Assoc::yaz_init_func(); -Yaz_Z_Assoc::Yaz_Z_Assoc(IYaz_PDU_Observable *the_PDU_Observable) +Z_Assoc::Z_Assoc(IPDU_Observable *the_PDU_Observable) { m_PDU_Observable = the_PDU_Observable; m_odr_in = odr_createmem (ODR_DECODE); m_odr_out = odr_createmem (ODR_ENCODE); m_odr_print = odr_createmem (ODR_PRINT); - m_log = LOG_DEBUG; + m_log = YLOG_DEBUG; m_APDU_file = 0; m_APDU_fname = 0; m_hostname = 0; + m_APDU_yazlog = 0; } -void Yaz_Z_Assoc::set_APDU_log(const char *fname) +void Z_Assoc::set_APDU_log(const char *fname) { if (m_APDU_file && m_APDU_file != stderr) { - fclose (m_APDU_file); - m_APDU_file = 0; + fclose (m_APDU_file); + m_APDU_file = 0; } delete [] m_APDU_fname; m_APDU_fname = 0; - if (fname) + if (fname) { - m_APDU_fname = new char[strlen(fname)+1]; - strcpy (m_APDU_fname, fname); - if (*fname && strcmp(fname, "-")) - m_APDU_file = fopen (fname, "a"); - else - m_APDU_file = stderr; - odr_setprint(m_odr_print, m_APDU_file); + m_APDU_fname = new char[strlen(fname)+1]; + strcpy (m_APDU_fname, fname); + if (!strcmp(fname, "-")) + m_APDU_file = stderr; + else if (*fname == '\0') + m_APDU_file = 0; + else + m_APDU_file = fopen (fname, "a"); + odr_setprint(m_odr_print, m_APDU_file); } } -const char *Yaz_Z_Assoc::get_APDU_log() +int Z_Assoc::set_APDU_yazlog(int v) +{ + int old = m_APDU_yazlog; + m_APDU_yazlog = v; + return old; +} + +const char *Z_Assoc::get_APDU_log() { return m_APDU_fname; } -Yaz_Z_Assoc::~Yaz_Z_Assoc() +Z_Assoc::~Z_Assoc() { - m_PDU_Observable->destroy(); + m_PDU_Observable->destroy(); delete m_PDU_Observable; odr_destroy (m_odr_print); // note: also runs fclose on m_APDU_file .. odr_destroy (m_odr_out); @@ -114,141 +83,262 @@ Yaz_Z_Assoc::~Yaz_Z_Assoc() delete [] m_hostname; } -void Yaz_Z_Assoc::recv_PDU(const char *buf, int len) +void Z_Assoc::recv_PDU(const char *buf, int len) { - logf (m_log, "recv_PDU len=%d", len); - Z_APDU *apdu = decode_Z_PDU (buf, len); + yaz_log (m_log, "recv_PDU len=%d", len); + Z_GDU *apdu = decode_GDU (buf, len); if (apdu) { - recv_Z_PDU (apdu); + recv_GDU (apdu, len); + } + else + { + close(); + failNotify(); } } -Z_APDU *Yaz_Z_Assoc::create_Z_PDU(int type) +Z_APDU *Z_Assoc::create_Z_PDU(int type) { Z_APDU *apdu = zget_APDU(m_odr_out, type); if (apdu->which == Z_APDU_initRequest) { - Z_InitRequest * p = apdu->u.initRequest; - char *newName = (char*) odr_malloc(m_odr_out, 50); - strcpy (newName, p->implementationName); - strcat (newName, " YAZ++"); - p->implementationName = newName; + Z_InitRequest * p = apdu->u.initRequest; + char *newName = (char*) odr_malloc(m_odr_out, 50); + strcpy (newName, p->implementationName); + strcat (newName, " YAZ++"); + p->implementationName = newName; } return apdu; } -int Yaz_Z_Assoc::send_Z_PDU(Z_APDU *apdu) +Z_ReferenceId **Z_Assoc::get_referenceIdP(Z_APDU *apdu) +{ + switch (apdu->which) + { + case Z_APDU_initRequest: + return &apdu->u.initRequest->referenceId; + case Z_APDU_initResponse: + return &apdu->u.initResponse->referenceId; + case Z_APDU_searchRequest: + return &apdu->u.searchRequest->referenceId; + case Z_APDU_searchResponse: + return &apdu->u.searchResponse->referenceId; + case Z_APDU_presentRequest: + return &apdu->u.presentRequest->referenceId; + case Z_APDU_presentResponse: + return &apdu->u.presentResponse->referenceId; + case Z_APDU_deleteResultSetRequest: + return &apdu->u.deleteResultSetRequest->referenceId; + case Z_APDU_deleteResultSetResponse: + return &apdu->u.deleteResultSetResponse->referenceId; + case Z_APDU_accessControlRequest: + return &apdu->u.accessControlRequest->referenceId; + case Z_APDU_accessControlResponse: + return &apdu->u.accessControlResponse->referenceId; + case Z_APDU_resourceControlRequest: + return &apdu->u.resourceControlRequest->referenceId; + case Z_APDU_resourceControlResponse: + return &apdu->u.resourceControlResponse->referenceId; + case Z_APDU_triggerResourceControlRequest: + return &apdu->u.triggerResourceControlRequest->referenceId; + case Z_APDU_resourceReportRequest: + return &apdu->u.resourceReportRequest->referenceId; + case Z_APDU_resourceReportResponse: + return &apdu->u.resourceReportResponse->referenceId; + case Z_APDU_scanRequest: + return &apdu->u.scanRequest->referenceId; + case Z_APDU_scanResponse: + return &apdu->u.scanResponse->referenceId; + case Z_APDU_sortRequest: + return &apdu->u.sortRequest->referenceId; + case Z_APDU_sortResponse: + return &apdu->u.sortResponse->referenceId; + case Z_APDU_segmentRequest: + return &apdu->u.segmentRequest->referenceId; + case Z_APDU_extendedServicesRequest: + return &apdu->u.extendedServicesRequest->referenceId; + case Z_APDU_extendedServicesResponse: + return &apdu->u.extendedServicesResponse->referenceId; + case Z_APDU_close: + return &apdu->u.close->referenceId; + } + return 0; +} + +void Z_Assoc::transfer_referenceId(Z_APDU *from, Z_APDU *to) +{ + Z_ReferenceId **id_from = get_referenceIdP(from); + Z_ReferenceId **id_to = get_referenceIdP(to); + if (id_from && *id_from && id_to) + { + *id_to = (Z_ReferenceId*) odr_malloc (m_odr_out, sizeof(**id_to)); + (*id_to)->size = (*id_to)->len = (*id_from)->len; + (*id_to)->buf = (unsigned char*) odr_malloc (m_odr_out, (*id_to)->len); + memcpy ((*id_to)->buf, (*id_from)->buf, (*id_to)->len); + } + else if (id_to) + *id_to = 0; +} + +int Z_Assoc::send_Z_PDU(Z_APDU *apdu, int *plen) +{ + Z_GDU *gdu = (Z_GDU*) odr_malloc(odr_encode(), sizeof(*gdu)); + gdu->which = Z_GDU_Z3950; + gdu->u.z3950 = apdu; + return send_GDU(gdu, plen); +} + +int Z_Assoc::send_GDU(Z_GDU *apdu, int *plen) { char *buf; int len; - if (encode_Z_PDU(apdu, &buf, &len) > 0) - return m_PDU_Observable->send_PDU(buf, len); + if (encode_GDU(apdu, &buf, &len) > 0) + { + if (plen) + *plen = len; + return m_PDU_Observable->send_PDU(buf, len); + } return -1; } -Z_APDU *Yaz_Z_Assoc::decode_Z_PDU(const char *buf, int len) +Z_GDU *Z_Assoc::decode_GDU(const char *buf, int len) { - Z_APDU *apdu; + Z_GDU *apdu; odr_reset (m_odr_in); odr_setbuf (m_odr_in, (char*) buf, len, 0); - if (!z_APDU(m_odr_in, &apdu, 0, 0)) + if (!z_GDU(m_odr_in, &apdu, 0, 0)) { - logf(LOG_LOG, "ODR error on incoming PDU: %s [near byte %d] ", - odr_errmsg(odr_geterror(m_odr_in)), - odr_offset(m_odr_in)); - logf(LOG_LOG, "PDU dump:"); + const char *element = odr_getelement(m_odr_in); + yaz_log(YLOG_LOG, "PDU decode failed '%s' near byte %ld. Element %s", + odr_errmsg(odr_geterror(m_odr_in)), + (long) odr_offset(m_odr_in), + element ? element : "unknown"); + yaz_log(YLOG_LOG, "PDU dump:"); odr_dumpBER(yaz_log_file(), buf, len); return 0; } else { - if (m_APDU_file) - z_APDU(m_odr_print, &apdu, 0, "decode"); + if (m_APDU_yazlog) + { // use YAZ log FILE + FILE *save = m_APDU_file; + + odr_setprint(m_odr_print, yaz_log_file()); + z_GDU(m_odr_print, &apdu, 0, "decode"); + m_APDU_file = save; + odr_setprint(m_odr_print, save); + } + if (m_APDU_file) + { + z_GDU(m_odr_print, &apdu, 0, "decode"); + fflush(m_APDU_file); + } return apdu; } } -int Yaz_Z_Assoc::encode_Z_PDU(Z_APDU *apdu, char **buf, int *len) +int Z_Assoc::encode_GDU(Z_GDU *apdu, char **buf, int *len) { - if (!z_APDU(m_odr_out, &apdu, 0, 0)) + const char *element = 0; + int r = z_GDU(m_odr_out, &apdu, 0, 0); + + if (!r) // decoding failed. Get the failed element + element = odr_getelement(m_odr_out); + + if (m_APDU_yazlog || !r) { - logf (LOG_LOG, "yaz_Z_Assoc::encode_Z_PDU failed"); - return -1; + if (!r) + yaz_log (YLOG_LOG, "PDU encode failed. Element %s", + element ? element : "unknown"); + FILE *save = m_APDU_file; + FILE *yazf = yaz_log_file(); + odr_setprint(m_odr_print, yazf); // use YAZ log FILE + z_GDU(m_odr_print, &apdu, 0, "encode"); + m_APDU_file = save; + odr_setprint(m_odr_print, save); } if (m_APDU_file) - z_APDU(m_odr_print, &apdu, 0, "encode"); + { + if (!r) + fprintf (m_APDU_file, "PDU encode failed. Element %s", + element ? element : "unknown"); + z_GDU(m_odr_print, &apdu, 0, "encode"); + fflush(m_APDU_file); + } + if (!r) // encoding failed + return -1; *buf = odr_getbuf (m_odr_out, len, 0); odr_reset (m_odr_out); return *len; } -const char *Yaz_Z_Assoc::get_hostname() +const char *Z_Assoc::get_hostname() { return m_hostname; } -void Yaz_Z_Assoc::client(const char *addr) +int Z_Assoc::client(const char *addr) { delete [] m_hostname; m_hostname = new char[strlen(addr)+1]; strcpy (m_hostname, addr); - m_PDU_Observable->connect (this, addr); + return m_PDU_Observable->connect (this, addr); } -void Yaz_Z_Assoc::close() +void Z_Assoc::close() { - m_PDU_Observable->close (); + m_PDU_Observable->close_session(); } -void Yaz_Z_Assoc::server(const char *addr) +int Z_Assoc::server(const char *addr) { delete [] m_hostname; m_hostname = new char[strlen(addr)+1]; strcpy (m_hostname, addr); - m_PDU_Observable->listen (this, addr); + return m_PDU_Observable->listen (this, addr); } -ODR Yaz_Z_Assoc::odr_encode() +ODR Z_Assoc::odr_encode() { return m_odr_out; } -ODR Yaz_Z_Assoc::odr_decode() +ODR Z_Assoc::odr_decode() { return m_odr_in; } -ODR Yaz_Z_Assoc::odr_print() +ODR Z_Assoc::odr_print() { return m_odr_print; } -void Yaz_Z_Assoc::timeout(int timeout) +void Z_Assoc::timeout(int timeout) { m_PDU_Observable->idleTime(timeout); } -void Yaz_Z_Assoc::get_otherInfoAPDU(Z_APDU *apdu, Z_OtherInformation ***oip) +void Z_Assoc::get_otherInfoAPDU(Z_APDU *apdu, Z_OtherInformation ***oip) { switch (apdu->which) { case Z_APDU_initRequest: - *oip = &apdu->u.initRequest->otherInfo; - break; + *oip = &apdu->u.initRequest->otherInfo; + break; case Z_APDU_searchRequest: - *oip = &apdu->u.searchRequest->otherInfo; - break; + *oip = &apdu->u.searchRequest->otherInfo; + break; case Z_APDU_presentRequest: - *oip = &apdu->u.presentRequest->otherInfo; - break; + *oip = &apdu->u.presentRequest->otherInfo; + break; case Z_APDU_sortRequest: - *oip = &apdu->u.sortRequest->otherInfo; - break; + *oip = &apdu->u.sortRequest->otherInfo; + break; case Z_APDU_scanRequest: - *oip = &apdu->u.scanRequest->otherInfo; - break; + *oip = &apdu->u.scanRequest->otherInfo; + break; case Z_APDU_extendedServicesRequest: *oip = &apdu->u.extendedServicesRequest->otherInfo; break; @@ -256,20 +346,20 @@ void Yaz_Z_Assoc::get_otherInfoAPDU(Z_APDU *apdu, Z_OtherInformation ***oip) *oip = &apdu->u.deleteResultSetRequest->otherInfo; break; case Z_APDU_initResponse: - *oip = &apdu->u.initResponse->otherInfo; - break; + *oip = &apdu->u.initResponse->otherInfo; + break; case Z_APDU_searchResponse: - *oip = &apdu->u.searchResponse->otherInfo; - break; + *oip = &apdu->u.searchResponse->otherInfo; + break; case Z_APDU_presentResponse: - *oip = &apdu->u.presentResponse->otherInfo; - break; + *oip = &apdu->u.presentResponse->otherInfo; + break; case Z_APDU_sortResponse: - *oip = &apdu->u.sortResponse->otherInfo; - break; + *oip = &apdu->u.sortResponse->otherInfo; + break; case Z_APDU_scanResponse: - *oip = &apdu->u.scanResponse->otherInfo; - break; + *oip = &apdu->u.scanResponse->otherInfo; + break; case Z_APDU_extendedServicesResponse: *oip = &apdu->u.extendedServicesResponse->otherInfo; break; @@ -277,69 +367,61 @@ void Yaz_Z_Assoc::get_otherInfoAPDU(Z_APDU *apdu, Z_OtherInformation ***oip) *oip = &apdu->u.deleteResultSetResponse->otherInfo; break; default: - *oip = 0; - break; + *oip = 0; + break; } } -void Yaz_Z_Assoc::set_otherInformationString ( +void Z_Assoc::set_otherInformationString( Z_APDU *apdu, - int oidval, int categoryValue, - const char *str) + const Odr_oid *oid, int categoryValue, const char *str) { Z_OtherInformation **otherInformation; get_otherInfoAPDU(apdu, &otherInformation); if (!otherInformation) - return; - set_otherInformationString(otherInformation, oidval, categoryValue, str); -} - -void Yaz_Z_Assoc::set_otherInformationString ( - Z_OtherInformation **otherInformation, - int oidval, int categoryValue, - const char *str) -{ - int oid[OID_SIZE]; - struct oident ent; - ent.proto = PROTO_Z3950; - ent.oclass = CLASS_USERINFO; - ent.value = (oid_value) oidval; - if (!oid_ent_to_oid (&ent, oid)) - return ; + return; set_otherInformationString(otherInformation, oid, categoryValue, str); } -void Yaz_Z_Assoc::set_otherInformationString ( + +void Z_Assoc::set_otherInformationString ( Z_OtherInformation **otherInformation, - int *oid, int categoryValue, const char *str) + const Odr_oid *oid, int categoryValue, const char *str) { Z_OtherInformationUnit *oi = - update_otherInformation(otherInformation, 1, oid, categoryValue, 0); + update_otherInformation(otherInformation, 1, oid, categoryValue, 0); if (!oi) - return; + return; oi->information.characterInfo = odr_strdup (odr_encode(), str); } -Z_OtherInformationUnit *Yaz_Z_Assoc::update_otherInformation ( +Z_OtherInformationUnit *Z_Assoc::update_otherInformation ( Z_OtherInformation **otherInformationP, int createFlag, - int *oid, int categoryValue, int deleteFlag) + const Odr_oid *oid, int categoryValue, int deleteFlag) { return yaz_oi_update (otherInformationP, - (createFlag ? odr_encode() : 0), - oid, categoryValue, deleteFlag); + (createFlag ? odr_encode() : 0), + oid, categoryValue, deleteFlag); } -Z_ReferenceId* Yaz_Z_Assoc::getRefID(char* str) +Z_ReferenceId* Z_Assoc::getRefID(char* str) { Z_ReferenceId* id = NULL; - if ( str ) + if (str) { id = (Z_ReferenceId*) odr_malloc (m_odr_out, sizeof(*id)); id->size = id->len = strlen(str); id->buf = (unsigned char *) str; } - return id; } +/* + * Local variables: + * c-basic-offset: 4 + * indent-tabs-mode: nil + * End: + * vim: shiftwidth=4 tabstop=8 expandtab + */ +