X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=asn%2Fprt-exd.c;h=d2569e67630b00af62fddda47711cb151d777292;hp=0508f179a811321218d80526c853f7d8c6f918bc;hb=8030536c98d595898b316df5eb118b1d6398450c;hpb=657fb99115b87a5244e9a33bbe4ca3d9d18849c4 diff --git a/asn/prt-exd.c b/asn/prt-exd.c index 0508f17..d2569e6 100644 --- a/asn/prt-exd.c +++ b/asn/prt-exd.c @@ -1,10 +1,29 @@ /* - * Copyright (c) 1995, Index Data. + * Copyright (c) 1995-1998, Index Data. * See the file LICENSE for details. * Sebastian Hammer, Adam Dickmeiss * * $Log: prt-exd.c,v $ - * Revision 1.2 1995-09-27 15:02:41 quinn + * Revision 1.8 1998-02-11 11:53:32 adam + * Changed code so that it compiles as C++. + * + * Revision 1.7 1998/02/10 15:31:46 adam + * Implemented date and time structure. Changed the Update Extended + * Service. + * + * Revision 1.6 1998/01/05 09:04:57 adam + * Fixed bugs in encoders/decoders - Not operator (!) missing. + * + * Revision 1.5 1997/04/30 08:52:02 quinn + * Null + * + * Revision 1.4 1996/10/10 12:35:12 quinn + * Added Update extended service. + * + * Revision 1.3 1995/09/29 17:11:54 quinn + * Smallish + * + * Revision 1.2 1995/09/27 15:02:41 quinn * Modified function heads & prototypes. * * Revision 1.1 1995/08/21 09:16:32 quinn @@ -15,7 +34,7 @@ #include -int MDF z_TaskPackage(ODR o, Z_TaskPackage **p, int opt) +int z_TaskPackage(ODR o, Z_TaskPackage **p, int opt) { if (!odr_sequence_begin(o, p, sizeof(**p))) return opt && odr_ok(o); @@ -36,7 +55,7 @@ int MDF z_TaskPackage(ODR o, Z_TaskPackage **p, int opt) 8, 1) && odr_implicit(o, odr_integer, &(*p)->taskStatus, ODR_CONTEXT, 9, 0) && odr_implicit_settag(o, ODR_CONTEXT, 10) && - (odr_sequence_of(o, z_DiagRec, &(*p)->packageDiagnostics, + (odr_sequence_of(o, (Odr_fun)z_DiagRec, &(*p)->packageDiagnostics, &(*p)->num_packageDiagnostics) || odr_ok(o)) && odr_implicit(o, z_External, &(*p)->taskSpecificParameters, ODR_CONTEXT, 11, 0) && @@ -112,16 +131,16 @@ int z_IOBilling(ODR o, Z_IOBilling **p, int opt) { static Odr_arm arm[] = { - {ODR_IMPLICIT, ODR_CONTEXT, 0, Z_IOBilling_billInvoice, odr_null}, - {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_IOBilling_prepay, odr_null}, - {ODR_IMPLICIT, ODR_CONTEXT, 2, Z_IOBilling_depositAccount, odr_null}, + {ODR_IMPLICIT, ODR_CONTEXT, 0, Z_IOBilling_billInvoice, (Odr_fun)odr_null}, + {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_IOBilling_prepay, (Odr_fun)odr_null}, + {ODR_IMPLICIT, ODR_CONTEXT, 2, Z_IOBilling_depositAccount, (Odr_fun)odr_null}, {ODR_IMPLICIT, ODR_CONTEXT, 3, Z_IOBilling_creditCard, - z_IOCreditCardInfo}, + (Odr_fun)z_IOCreditCardInfo}, {ODR_IMPLICIT, ODR_CONTEXT, 4, Z_IOBilling_cardInfoPreviouslySupplied, - odr_null}, - {ODR_IMPLICIT, ODR_CONTEXT, 5, Z_IOBilling_privateKnown, odr_null}, + (Odr_fun)odr_null}, + {ODR_IMPLICIT, ODR_CONTEXT, 5, Z_IOBilling_privateKnown, (Odr_fun)odr_null}, {ODR_IMPLICIT, ODR_CONTEXT, 6, Z_IOBilling_privateNotKnown, - z_External}, + (Odr_fun)z_External}, {-1, -1, -1, -1, 0} }; @@ -175,18 +194,18 @@ int z_IOTaskPackage(ODR o, Z_IOTaskPackage **p, int opt) odr_sequence_end(o); } -int MDF z_ItemOrder(ODR o, Z_ItemOrder **p, int opt) +int z_ItemOrder(ODR o, Z_ItemOrder **p, int opt) { static Odr_arm arm[] = { - {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_ItemOrder_esRequest, z_IORequest}, + {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_ItemOrder_esRequest, (Odr_fun)z_IORequest}, {ODR_IMPLICIT, ODR_CONTEXT, 2, Z_ItemOrder_taskPackage, - z_IOTaskPackage}, + (Odr_fun)z_IOTaskPackage}, {-1, -1, -1, -1, 0} }; if (o->direction == ODR_DECODE) - *p = odr_malloc(o, sizeof(**p)); + *p = (Z_ItemOrder *)odr_malloc(o, sizeof(**p)); else if (!*p) return opt; if (odr_choice(o, arm, &(*p)->u, &(*p)->which)) @@ -194,3 +213,173 @@ int MDF z_ItemOrder(ODR o, Z_ItemOrder **p, int opt) *p = 0; return opt && odr_ok(o); } + +/* ----------------------- ITEM UPDATE -------------------- */ + +int z_IUSuppliedRecordsId (ODR o, Z_IUSuppliedRecordsId **p, int opt) +{ + static Odr_arm arm[] = { + {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_IUSuppliedRecordsId_timeStamp, + odr_generalizedtime}, + {ODR_IMPLICIT, ODR_CONTEXT, 2, Z_IUSuppliedRecordsId_versionNumber, + z_InternationalString}, + {ODR_IMPLICIT, ODR_CONTEXT, 3, Z_IUSuppliedRecordsId_previousVersion, + (Odr_fun)odr_external}, + {-1, -1, -1, -1, 0} + }; + if (!odr_initmember(o, p, sizeof(**p))) + return opt && odr_ok(o); + if (odr_choice(o, arm, &(*p)->u, &(*p)->which)) + return 1; + *p = 0; + return opt && odr_ok(o); +} + +int z_IUCorrelationInfo (ODR o, Z_IUCorrelationInfo **p, int opt) +{ + if (!odr_sequence_begin (o, p, sizeof(**p))) + return opt && odr_ok (o); + return + odr_implicit (o, z_InternationalString, + &(*p)->note, ODR_CONTEXT, 1, 1) && + odr_implicit (o, odr_integer, + &(*p)->id, ODR_CONTEXT, 2, 1) && + odr_sequence_end (o); +} + +int z_IUSuppliedRecords_elem (ODR o, Z_IUSuppliedRecords_elem **p, int opt) +{ + static Odr_arm arm[] = { + {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_IUSuppliedRecords_number, + (Odr_fun)odr_integer}, + {ODR_IMPLICIT, ODR_CONTEXT, 2, Z_IUSuppliedRecords_string, + (Odr_fun)z_InternationalString}, + {ODR_IMPLICIT, ODR_CONTEXT, 3, Z_IUSuppliedRecords_opaque, + (Odr_fun)odr_octetstring}, + {-1, -1, -1, -1, 0} + }; + if (!odr_sequence_begin (o, p, sizeof(**p))) + return opt && odr_ok (o); + return + ((odr_constructed_begin (o, &(*p)->u, ODR_CONTEXT, 1) && + odr_choice (o, arm, &(*p)->u, &(*p)->which) && + odr_constructed_end (o)) || odr_ok(o)) && + odr_explicit (o, z_IUSuppliedRecordsId, + &(*p)->supplementalId, ODR_CONTEXT, 2, 1) && + odr_implicit (o, z_IUCorrelationInfo, + &(*p)->correlationInfo, ODR_CONTEXT, 3, 1) && + odr_implicit (o, odr_external, + &(*p)->record, ODR_CONTEXT, 4, 0) && + odr_sequence_end (o); +} + +int z_IUSuppliedRecords (ODR o, Z_IUSuppliedRecords **p, int opt) +{ + if (!odr_initmember (o, p, sizeof(**p))) + return opt && odr_ok(o); + if (odr_sequence_of (o, (Odr_fun)z_IUSuppliedRecords_elem, &(*p)->elements, + &(*p)->num)) + return 1; + *p = 0; + return opt && odr_ok(o); +} + +int z_IUTaskPackageRecordStructure (ODR o, Z_IUTaskPackageRecordStructure **p, + int opt) +{ + static Odr_arm arm[] = { + {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_IUTaskPackageRecordStructure_record, + (Odr_fun)odr_external}, + {ODR_EXPLICIT, ODR_CONTEXT, 2, Z_IUTaskPackageRecordStructure_surrogateDiagnostics, + (Odr_fun)z_DiagRecs}, + {-1, -1, -1, -1, 0} + }; + if (!odr_sequence_begin (o, p, sizeof(**p))) + return opt && odr_ok (o); + return + ((odr_constructed_begin (o, &(*p)->u, ODR_CONTEXT, 1) && + odr_choice (o, arm, &(*p)->u, &(*p)->which) && + odr_constructed_end (o)) || odr_ok(o)) && + odr_implicit (o, z_IUCorrelationInfo, + &(*p)->correlationInfo, ODR_CONTEXT, 2, 1) && + odr_implicit (o, odr_integer, + &(*p)->recordStatus, ODR_CONTEXT, 3, 0) && + odr_implicit (o, z_DiagRecs, + &(*p)->supplementalDiagnostics, ODR_CONTEXT, 4, 1) && + odr_sequence_end (o); +} + +int z_IUOriginPartToKeep (ODR o, Z_IUOriginPartToKeep **p, int opt) +{ + if (!odr_sequence_begin (o, p, sizeof(**p))) + return opt && odr_ok (o); + return + odr_implicit (o, odr_integer, + &(*p)->action, ODR_CONTEXT, 1, 0) && + odr_implicit (o, z_InternationalString, + &(*p)->databaseName, ODR_CONTEXT, 2, 0) && + odr_implicit (o, odr_oid, + &(*p)->schema, ODR_CONTEXT, 3, 1) && + odr_implicit (o, z_InternationalString, + &(*p)->elementSetName, ODR_CONTEXT, 4, 1) && + odr_implicit (o, odr_external, + &(*p)->actionQualifier, ODR_CONTEXT, 5, 1) && + odr_sequence_end (o); +} + +int z_IUTargetPart (ODR o, Z_IUTargetPart **p, int opt) +{ + if (!odr_sequence_begin (o, p, sizeof(**p))) + return opt && odr_ok (o); + return + odr_implicit (o, odr_integer, + &(*p)->updateStatus, ODR_CONTEXT, 1, 0) && + odr_implicit_settag (o, ODR_CONTEXT, 2) && + (odr_sequence_of(o, (Odr_fun)z_DiagRec, &(*p)->globalDiagnostics, + &(*p)->num_globalDiagnostics) || odr_ok(o)) && + odr_implicit_settag (o, ODR_CONTEXT, 3) && + odr_sequence_of(o, (Odr_fun)z_IUTaskPackageRecordStructure, &(*p)->taskPackageRecords, + &(*p)->num_taskPackageRecords) && + odr_sequence_end (o); +} + +int z_IUUpdateEsRequest (ODR o, Z_IUUpdateEsRequest **p, int opt) +{ + if (!odr_sequence_begin (o, p, sizeof(**p))) + return opt && odr_ok (o); + return + odr_explicit (o, z_IUOriginPartToKeep, + &(*p)->toKeep, ODR_CONTEXT, 1, 0) && + odr_explicit (o, z_IUSuppliedRecords, + &(*p)->notToKeep, ODR_CONTEXT, 2, 0) && + odr_sequence_end (o); +} + +int z_IUUpdateTaskPackage (ODR o, Z_IUUpdateTaskPackage **p, int opt) +{ + if (!odr_sequence_begin (o, p, sizeof(**p))) + return opt && odr_ok (o); + return + odr_explicit (o, z_IUOriginPartToKeep, + &(*p)->originPart, ODR_CONTEXT, 1, 0) && + odr_explicit (o, z_IUTargetPart, + &(*p)->targetPart, ODR_CONTEXT, 2, 0) && + odr_sequence_end (o); +} + +int z_IUUpdate (ODR o, Z_IUUpdate **p, int opt) +{ + static Odr_arm arm[] = { + {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_IUUpdate_esRequest, + (Odr_fun)z_IUUpdateEsRequest}, + {ODR_IMPLICIT, ODR_CONTEXT, 2, Z_IUUpdate_taskPackage, + (Odr_fun)z_IUUpdateTaskPackage}, + {-1, -1, -1, -1, 0} + }; + if (!odr_initmember(o, p, sizeof(**p))) + return opt && odr_ok(o); + if (odr_choice(o, arm, &(*p)->u, &(*p)->which)) + return 1; + *p = 0; + return opt && odr_ok(o); +}