/*
- * Copyright (c) 1995-2003, Index Data.
+ * Copyright (C) 1995-2007, Index Data ApS
* See the file LICENSE for details.
- * Sebastian Hammer, Adam Dickmeiss
*
- * $Id: zget.c,v 1.1 2003-10-27 12:21:36 adam Exp $
+ * $Id: zget.c,v 1.15 2007-05-06 20:12:20 adam Exp $
+ */
+/**
+ * \file zget.c
+ * \brief Implements Z39.50 package creator utilities
*/
#include <yaz/proto.h>
+#include <yaz/oid_db.h>
Z_InitRequest *zget_InitRequest(ODR o)
{
r->options = (Odr_bitmask *)odr_malloc(o, sizeof(*r->options));
ODR_MASK_ZERO(r->options);
r->protocolVersion = (Odr_bitmask *)
- odr_malloc(o, sizeof(*r->protocolVersion));
+ odr_malloc(o, sizeof(*r->protocolVersion));
ODR_MASK_SET(r->options, Z_Options_search);
ODR_MASK_SET(r->options, Z_Options_present);
ODR_MASK_SET(r->protocolVersion, Z_ProtocolVersion_1);
ODR_MASK_SET(r->protocolVersion, Z_ProtocolVersion_2);
- r->preferredMessageSize = odr_intdup(o, 30*1024);
- r->maximumRecordSize = odr_intdup(o, 30*1024);
+ r->preferredMessageSize = odr_intdup(o, 1024*1024);
+ r->maximumRecordSize = odr_intdup(o, 1024*1024);
r->idAuthentication = 0;
r->implementationId = "81";
- r->implementationName = "Index Data/YAZ";
+ r->implementationName = "YAZ";
r->implementationVersion = YAZ_VERSION
#ifdef YAZ_DATE_STR
" (" YAZ_DATE_STR ")"
#ifdef YAZ_OS
" " YAZ_OS
#endif
- ;
+ ;
r->userInformationField = 0;
r->otherInfo = 0;
return r;
r->maximumRecordSize = odr_intdup(o, 30*1024);
r->result = odr_intdup(o, 1);
r->implementationId = "81";
- r->implementationName = "Index Data/YAZ";
+ r->implementationName = "YAZ";
r->implementationVersion = YAZ_VERSION
#ifdef YAZ_DATE_STR
" (" YAZ_DATE_STR ")"
#ifdef YAZ_OS
" " YAZ_OS
#endif
- ;
+ ;
r->userInformationField = 0;
r->otherInfo = 0;
return r;
Z_DeleteResultSetRequest *zget_DeleteResultSetRequest(ODR o)
{
Z_DeleteResultSetRequest *r = (Z_DeleteResultSetRequest *)
- odr_malloc(o, sizeof(*r));
+ odr_malloc(o, sizeof(*r));
r->referenceId = 0;
- r->deleteFunction = odr_intdup(o, Z_DeleteRequest_list);
+ r->deleteFunction = odr_intdup(o, Z_DeleteResultSetRequest_list);
r->num_resultSetList = 0;
r->resultSetList = 0;
r->otherInfo = 0;
Z_DeleteResultSetResponse *zget_DeleteResultSetResponse(ODR o)
{
Z_DeleteResultSetResponse *r = (Z_DeleteResultSetResponse *)
- odr_malloc(o, sizeof(*r));
+ odr_malloc(o, sizeof(*r));
r->referenceId = 0;
r->deleteOperationStatus = odr_intdup(o, Z_DeleteStatus_success);
Z_TriggerResourceControlRequest *zget_TriggerResourceControlRequest(ODR o)
{
Z_TriggerResourceControlRequest *r = (Z_TriggerResourceControlRequest *)
- odr_malloc(o, sizeof(*r));
+ odr_malloc(o, sizeof(*r));
r->referenceId = 0;
- r->requestedAction = odr_intdup(o, Z_TriggerResourceCtrl_resourceReport);
+ r->requestedAction = odr_intdup(o, Z_TriggerResourceControlRequest_resourceReport);
r->prefResourceReportFormat = 0;
r->resultSetWanted = 0;
r->otherInfo = 0;
Z_ResourceControlRequest *zget_ResourceControlRequest(ODR o)
{
Z_ResourceControlRequest *r = (Z_ResourceControlRequest *)
- odr_malloc(o, sizeof(*r));
+ odr_malloc(o, sizeof(*r));
r->referenceId = 0;
r->suspendedFlag = 0;
Z_ResourceControlResponse *zget_ResourceControlResponse(ODR o)
{
Z_ResourceControlResponse *r = (Z_ResourceControlResponse *)
- odr_malloc(o, sizeof(*r));
+ odr_malloc(o, sizeof(*r));
r->referenceId = 0;
r->continueFlag = odr_intdup(o, 1);
Z_AccessControlRequest *zget_AccessControlRequest(ODR o)
{
Z_AccessControlRequest *r = (Z_AccessControlRequest *)
- odr_malloc(o, sizeof(*r));
+ odr_malloc(o, sizeof(*r));
r->referenceId = 0;
- r->which = Z_AccessRequest_simpleForm;
+ r->which = Z_AccessControlRequest_simpleForm;
r->u.simpleForm = 0;
r->otherInfo = 0;
return r;
Z_AccessControlResponse *zget_AccessControlResponse(ODR o)
{
Z_AccessControlResponse *r = (Z_AccessControlResponse *)
- odr_malloc(o, sizeof(*r));
+ odr_malloc(o, sizeof(*r));
r->referenceId = 0;
- r->which = Z_AccessResponse_simpleForm;
+ r->which = Z_AccessControlResponse_simpleForm;
r->u.simpleForm = 0;
r->diagnostic = 0;
r->otherInfo = 0;
Z_ResourceReportRequest *zget_ResourceReportRequest(ODR o)
{
Z_ResourceReportRequest *r = (Z_ResourceReportRequest *)
- odr_malloc(o, sizeof(*r));
+ odr_malloc(o, sizeof(*r));
r->referenceId = 0;
r->opId = 0;
Z_ResourceReportResponse *zget_ResourceReportResponse(ODR o)
{
Z_ResourceReportResponse *r = (Z_ResourceReportResponse *)
- odr_malloc(o, sizeof(*r));
+ odr_malloc(o, sizeof(*r));
r->referenceId = 0;
- r->resourceReportStatus = odr_intdup(o, Z_ResourceReportStatus_success);
+ r->resourceReportStatus = odr_intdup(o, Z_ResourceReportResponse_success);
r->resourceReport = 0;
r->otherInfo = 0;
return r;
Z_SortResponse *r = (Z_SortResponse *)odr_malloc(o, sizeof(*r));
r->referenceId = 0;
- r->sortStatus = odr_intdup(o, Z_SortStatus_success);
- r->resultSetStatus = odr_intdup(o, Z_SortResultSetStatus_empty);
+ r->sortStatus = odr_intdup(o, Z_SortResponse_success);
+ r->resultSetStatus = odr_intdup(o, Z_SortResponse_empty);
r->diagnostics = 0;
r->resultCount = 0;
r->otherInfo = 0;
Z_ExtendedServicesRequest *zget_ExtendedServicesRequest(ODR o)
{
Z_ExtendedServicesRequest *r = (Z_ExtendedServicesRequest *)
- odr_malloc(o, sizeof(*r));
+ odr_malloc(o, sizeof(*r));
r->referenceId = 0;
r->function = odr_intdup(o, Z_ExtendedServicesRequest_create);
Z_ExtendedServicesResponse *zget_ExtendedServicesResponse(ODR o)
{
Z_ExtendedServicesResponse *r = (Z_ExtendedServicesResponse *)
- odr_malloc(o, sizeof(*r));
+ odr_malloc(o, sizeof(*r));
r->referenceId = 0;
r->operationStatus = odr_intdup(o, Z_ExtendedServicesResponse_done);
break;
case Z_APDU_extendedServicesResponse:
r->u.extendedServicesResponse = zget_ExtendedServicesResponse(o);
- break;
+ break;
case Z_APDU_duplicateDetectionRequest:
r->u.duplicateDetectionRequest = zget_DuplicateDetectionRequest(o);
break;
r->u.duplicateDetectionResponse = zget_DuplicateDetectionResponse(o);
break;
default:
- fprintf(stderr, "Bad APDU-type to zget_APDU");
- exit(1);
+ return 0;
}
return r;
}
+
+Z_DefaultDiagFormat *zget_DefaultDiagFormat(ODR o, int error,
+ const char *addinfo)
+{
+ Z_DefaultDiagFormat *dr = (Z_DefaultDiagFormat *)
+ odr_malloc (o, sizeof(*dr));
+
+ dr->diagnosticSetId = odr_oiddup(o, yaz_oid_diagset_bib_1);
+ dr->condition = odr_intdup(o, error);
+ dr->which = Z_DefaultDiagFormat_v2Addinfo;
+ dr->u.v2Addinfo = odr_strdup (o, addinfo ? addinfo : "");
+ return dr;
+}
+
+Z_DiagRec *zget_DiagRec(ODR o, int error, const char *addinfo)
+{
+ Z_DiagRec *dr = (Z_DiagRec*) odr_malloc(o, sizeof(*dr));
+ dr->which = Z_DiagRec_defaultFormat;
+ dr->u.defaultFormat = zget_DefaultDiagFormat(o, error, addinfo);
+ return dr;
+}
+
+Z_DiagRecs *zget_DiagRecs(ODR o, int error, const char *addinfo)
+{
+ Z_DiagRecs *drecs = (Z_DiagRecs*) odr_malloc(o, sizeof(*drecs));
+ Z_DiagRec **dr = (Z_DiagRec**) odr_malloc(o, sizeof(**dr));
+ drecs->diagRecs = dr;
+ dr[0] = zget_DiagRec(o, error, addinfo);
+ drecs->num_diagRecs = 1;
+ return drecs;
+}
+
+Z_NamePlusRecord *zget_surrogateDiagRec(ODR o, const char *dbname,
+ int error, const char *addinfo)
+{
+ Z_NamePlusRecord *rec = (Z_NamePlusRecord *) odr_malloc (o, sizeof(*rec));
+ Z_DiagRec *drec = (Z_DiagRec *)odr_malloc (o, sizeof(*drec));
+
+ if (dbname)
+ rec->databaseName = odr_strdup(o, dbname);
+ else
+ rec->databaseName = 0;
+ rec->which = Z_NamePlusRecord_surrogateDiagnostic;
+ rec->u.surrogateDiagnostic = drec;
+ drec->which = Z_DiagRec_defaultFormat;
+ drec->u.defaultFormat = zget_DefaultDiagFormat(o, error, addinfo);
+ return rec;
+}
+
+Z_External *zget_init_diagnostics(ODR odr, int error, const char *addinfo)
+{
+ Z_External *x, *x2;
+ Z_OtherInformation *u;
+ Z_OtherInformationUnit *l;
+ Z_DiagnosticFormat *d;
+ Z_DiagnosticFormat_s *e;
+
+ x = (Z_External*) odr_malloc(odr, sizeof *x);
+ x->descriptor = 0;
+ x->indirect_reference = 0;
+ x->direct_reference = odr_oiddup(odr, yaz_oid_userinfo_userinfo_1);
+ x->which = Z_External_userInfo1;
+
+ u = (Z_OtherInformation *) odr_malloc(odr, sizeof *u);
+ x->u.userInfo1 = u;
+ u->num_elements = 1;
+ u->list = (Z_OtherInformationUnit**) odr_malloc(odr, sizeof *u->list);
+ u->list[0] = (Z_OtherInformationUnit*) odr_malloc(odr, sizeof *u->list[0]);
+ l = u->list[0];
+ l->category = 0;
+ l->which = Z_OtherInfo_externallyDefinedInfo;
+
+ x2 = (Z_External*) odr_malloc(odr, sizeof *x);
+ l->information.externallyDefinedInfo = x2;
+ x2->descriptor = 0;
+ x2->indirect_reference = 0;
+ x2->direct_reference = odr_oiddup(odr, yaz_oid_diagset_diag_1);
+ x2->which = Z_External_diag1;
+
+ d = (Z_DiagnosticFormat*) odr_malloc(odr, sizeof *d);
+ x2->u.diag1 = d;
+ d->num = 1;
+ d->elements = (Z_DiagnosticFormat_s**) odr_malloc (odr, sizeof *d->elements);
+ d->elements[0] = (Z_DiagnosticFormat_s*) odr_malloc (odr, sizeof *d->elements[0]);
+ e = d->elements[0];
+
+ e->which = Z_DiagnosticFormat_s_defaultDiagRec;
+ e->u.defaultDiagRec = zget_DefaultDiagFormat(odr, error, addinfo);
+ e->message = 0;
+ return x;
+}
+
+Z_External *zget_init_diagnostics_octet(ODR odr, int error,
+ const char *addinfo)
+{
+ Z_External *x, *x2;
+ Z_OtherInformation *u;
+ Z_OtherInformationUnit *l;
+ Z_DiagnosticFormat *d;
+ Z_DiagnosticFormat_s *e;
+ char *octet_buf;
+ int octet_len;
+ ODR encode;
+
+ u = (Z_OtherInformation *) odr_malloc(odr, sizeof *u);
+ u->num_elements = 1;
+ u->list = (Z_OtherInformationUnit**) odr_malloc(odr, sizeof *u->list);
+ u->list[0] = (Z_OtherInformationUnit*) odr_malloc(odr, sizeof *u->list[0]);
+ l = u->list[0];
+ l->category = 0;
+ l->which = Z_OtherInfo_externallyDefinedInfo;
+
+ x2 = (Z_External*) odr_malloc(odr, sizeof *x);
+ l->information.externallyDefinedInfo = x2;
+ x2->descriptor = 0;
+ x2->indirect_reference = 0;
+
+ x2->direct_reference = odr_oiddup(odr, yaz_oid_diagset_diag_1);
+ x2->which = Z_External_diag1;
+
+ d = (Z_DiagnosticFormat*) odr_malloc(odr, sizeof *d);
+ x2->u.diag1 = d;
+ d->num = 1;
+ d->elements = (Z_DiagnosticFormat_s**) odr_malloc (odr, sizeof *d->elements);
+ d->elements[0] = (Z_DiagnosticFormat_s*) odr_malloc (odr, sizeof *d->elements[0]);
+ e = d->elements[0];
+
+ e->which = Z_DiagnosticFormat_s_defaultDiagRec;
+ e->u.defaultDiagRec = zget_DefaultDiagFormat(odr, error, addinfo);
+ e->message = 0;
+
+ encode = odr_createmem(ODR_ENCODE);
+
+ z_OtherInformation(encode, &u, 0, 0);
+
+ octet_buf = odr_getbuf(encode, &octet_len, 0);
+
+ x = (Z_External*) odr_malloc(odr, sizeof *x);
+ x->descriptor = 0;
+ x->indirect_reference = 0;
+ x->direct_reference = odr_oiddup(odr, yaz_oid_userinfo_userinfo_1);
+ x->which = Z_External_octet;
+ x->u.octet_aligned = (Odr_oct *) odr_malloc(odr, sizeof(Odr_oct));
+ x->u.octet_aligned->buf = (unsigned char *) odr_malloc(odr, octet_len);
+ memcpy(x->u.octet_aligned->buf, octet_buf, octet_len);
+ x->u.octet_aligned->len = octet_len;
+
+ odr_destroy(encode);
+
+ return x;
+}
+
+/*
+ * Local variables:
+ * c-basic-offset: 4
+ * indent-tabs-mode: nil
+ * End:
+ * vim: shiftwidth=4 tabstop=8 expandtab
+ */
+