EXTXMLMETHOD int rtXmlDecDynBase64Str (OSCTXT* pctxt, OSDynOctStr* pvalue)
{
const OSUTF8CHAR* const inpdata = (const OSUTF8CHAR*) OSRTBUFPTR (pctxt);
int stat;
size_t nocts = 0;
size_t encLen;
OSOCTET* data;
/* Count octets */
stat = rtXmlGetBase64StrDecodedLen
(inpdata, pctxt->buffer.size, &nocts, &encLen);
if (stat < 0) return LOG_RTERRNEW (pctxt, stat);
pvalue->numocts = (OSUINT32)nocts;
data = (OSOCTET*) rtxMemAlloc (pctxt, nocts);
if (data != 0) {
pvalue->data = data;
stat = rtXmlDecBase64StrValue
(pctxt, data, 0, nocts, encLen);
}
else
stat = LOG_RTERRNEW (pctxt, RTERR_NOMEM);
return (stat);
}
EXTXMLMETHOD int rtXmlDecDynUTF8Str (OSCTXT* pctxt, const OSUTF8CHAR** outdata)
{
const OSUTF8CHAR* const inpdata = (const OSUTF8CHAR*) OSRTBUFPTR (pctxt);
size_t i;
const size_t nbytes = OSRTBUFSIZE(pctxt);
OSOCTET* str;
OSRT_CHECK_EVAL_DATE1(pctxt);
/* Allocate memory for output data */
str = (OSOCTET*) rtxMemAlloc (pctxt, nbytes + 1);
if (str != 0) {
/* Copy UTF-8 source chars to destination */
for (i = 0; i < nbytes; i++) {
str[i] = inpdata[i];
}
str [i] = 0;
}
else
return LOG_RTERRNEW (pctxt, RTERR_NOMEM);
*outdata = (const OSUTF8CHAR*) str;
return (0);
}
/**
* rtXmlMatchDateTime:
* This function matches a datetime value from a supplied context.
*/
EXTXMLMETHOD int rtXmlMatchDateTime (OSCTXT* pctxt)
{
const OSUTF8CHAR* const inpdata = (const OSUTF8CHAR*) OSRTBUFPTR (pctxt);
const size_t nbytes = OSRTBUFSIZE(pctxt);
OSXSDDateTime value;
int stat;
stat = rtxParseDateTimeString (inpdata, nbytes, &value);
return (stat < 0) ? stat: 0;
}
int xd_memcpy (OSCTXT* pctxt, OSOCTET *object_p, int length)
{
OSBOOL do_copy = (OSBOOL) ((ASN1BUF_INDEFLEN(pctxt)) ?
TRUE : ((pctxt->buffer.byteIndex + length) <= pctxt->buffer.size));
if (do_copy) {
memcpy (object_p, OSRTBUFPTR(pctxt), length);
pctxt->buffer.byteIndex += length;
return (0);
}
else return LOG_RTERR (pctxt, RTERR_ENDOFBUF);
}
int xe_OpenType (OSCTXT* pctxt,
const OSOCTET* object_p,
OSUINT32 numocts)
{
OSCTXT lctxt;
int aal = 0, already_encoded, len, stat;
ASN1TAG tag;
if (numocts > 0) {
if (0 == object_p) return LOG_RTERR(pctxt, RTERR_BADVALUE);
if ((stat = rtInitSubContext (&lctxt, pctxt)) != 0)
return LOG_RTERR(pctxt, stat);
stat = xd_setp (&lctxt, object_p, numocts, &tag, &len);
rtxFreeContext (&lctxt);
if (stat != 0) return LOG_RTERR (pctxt, stat);
if (tag == 0 && len == 0) /* EOC is not allowed as OpenType */
return LOG_RTERR(pctxt, RTERR_BADVALUE);
/* An any field is considered to be already encoded if the given */
/* pointer is equal to the current encode pointer. This will be */
/* the case when an extra field is being prepended onto an */
/* existing ASN.1 message (for example, the X.410 PDU).. */
already_encoded = (object_p == OSRTBUFPTR(pctxt));
/* For an indefinite length message, need to get the actual */
/* length by parsing tags until the end of the message is */
/* reached.. */
if (len == ASN_K_INDEFLEN) { /* indefinite length message */
if ((len = xd_indeflen (object_p)) < 0)
return LOG_RTERR(pctxt, len);
}
/* If not already copied, copy message component to encode buffer */
aal = (already_encoded) ?
len : xe_memcpy (pctxt, object_p, len);
}
else {
return LOG_RTERR (pctxt, RTERR_BADVALUE);
}
return (aal);
}
EXTRTMETHOD OSBOOL rtxMatchPattern2 (OSCTXT* pctxt,
const OSUTF8CHAR* pattern)
{
OSUTF8CHAR buf[128], *text;
OSBOOL rv;
if (OSRTBUFSIZE (pctxt) < sizeof (buf)) {
text = buf;
OSCRTLMEMCPY (text, OSRTBUFPTR(pctxt), OSRTBUFSIZE (pctxt));
text [OSRTBUFSIZE (pctxt)] = 0;
}
else {
text = rtxUTF8Strndup
(pctxt, (const OSUTF8CHAR*)OSRTBUFPTR(pctxt), OSRTBUFSIZE (pctxt));
}
rv = rtxMatchPattern (pctxt, text, pattern);
if (text != buf)
rtxMemFreePtr (pctxt, text);
return rv;
}
EXTXMLMETHOD int rtXmlDecUTF8Str (OSCTXT* pctxt, OSUTF8CHAR* outdata, size_t max_len)
{
const OSUTF8CHAR* const inpdata = (const OSUTF8CHAR*) OSRTBUFPTR (pctxt);
size_t i;
const size_t nbytes =
(OSRTBUFSIZE(pctxt) + 1 > max_len) ? max_len : OSRTBUFSIZE(pctxt) + 1;
OSRT_CHECK_EVAL_DATE1(pctxt);
for(i = 0; i < nbytes - 1; i++) {
outdata[i] = inpdata[i];
}
outdata[i] = (OSUTF8CHAR)'\0';
return 0;
}
EXTXMLMETHOD int rtXmlDecBase64Str (OSCTXT* pctxt,
OSOCTET* pvalue, OSUINT32* pnocts,
OSINT32 bufsize)
{
int stat;
size_t encLen;
OSUINT32 nocts;
stat = rtXmlGetBase64StrDecodedLen
(OSRTBUFPTR (pctxt), OSRTBUFSIZE(pctxt), 0, &encLen);
if (stat < 0) return LOG_RTERRNEW (pctxt, stat);
stat = rtXmlDecBase64StrValue (pctxt, pvalue, &nocts, bufsize, encLen);
if (stat != 0) return LOG_RTERR (pctxt, stat);
*pnocts = nocts;
return (0);
}
EXTERN int asn1D_OrderResponseType_respondedOrderLine_list (OSCTXT* pctxt,
OrderResponseType_respondedOrderLine_list *pvalue, ASN1TagType tagging, int length)
{
int stat = 0;
RespondedOrderLine* pdata;
OSRTDListNode* pnode;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE OF or SET OF */
rtxDListInit (pvalue);
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
while (!XD_CHKEND (pctxt, &ccb))
{
rtxDListAllocNodeAndData (pctxt, RespondedOrderLine, &pnode, &pdata);
if (pnode == NULL)
return LOG_RTERR (pctxt, RTERR_NOMEM);
asn1Init_RespondedOrderLine (pdata);
stat = asn1D_RespondedOrderLine (pctxt,
pdata, ASN1EXPL, length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
rtxDListAppendNode (pvalue, pnode);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
int xd_chkend (OSCTXT* pctxt, ASN1CCB* ccb_p)
{
int len;
ASN1TAG tag;
register int eoc, stat, usedBytes;
if (ccb_p->len == ASN_K_INDEFLEN)
{
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat == RTERR_ENDOFBUF) {
rtxErrReset (pctxt);
eoc = TRUE;
}
else if (tag == 0 && len == 0)
{
/* Advance cursor past EOC only if enveloping context */
/* parsed the indefinite length marker.. */
/*
if (ccb_p->tagging == ASN1EXPL) {
xd_tag_len (pctxt, &tag, &len, XM_ADVANCE);
}
*/
eoc = TRUE;
}
else
eoc = FALSE;
}
else
{
usedBytes = (int)(OSRTBUFPTR(pctxt) - ccb_p->ptr);
eoc = ((usedBytes >= ccb_p->len) ||
(pctxt->buffer.byteIndex >= pctxt->buffer.size)); /*!AB 09/19/02 */
}
return (eoc);
}
int xe_expandBuffer (OSCTXT *pctxt, size_t length)
{
OSOCTET* newBuf_p, *msg_p;
size_t usedBytes;
if (pctxt->buffer.dynamic)
{
/* If dynamic encoding is enabled, expand the current buffer to */
/* allow encoding to continue. */
/* Change to double buffer size each time (ED, 10/4/06) */
/* size_t extent = OSRTMAX (ASN_K_ENCBUFSIZ, length); */
size_t extent = OSRTMAX (pctxt->buffer.size, length);
size_t newSize = pctxt->buffer.size + extent;
newBuf_p = (OSOCTET*) rtxMemAlloc (pctxt, newSize);
if (!newBuf_p) return LOG_RTERR (pctxt, RTERR_NOMEM);
/* Set message pointer position in new buffer and copy existing */
/* message to it.. */
usedBytes = pctxt->buffer.size - pctxt->buffer.byteIndex;
msg_p = (newBuf_p + newSize) - usedBytes;
memcpy (msg_p, OSRTBUFPTR(pctxt), usedBytes);
/* Free old buffer and set context parameters */
rtxMemFreePtr (pctxt, pctxt->buffer.data);
pctxt->buffer.data = newBuf_p;
pctxt->buffer.size = newSize;
pctxt->buffer.byteIndex += extent;
return (0);
}
else
return LOG_RTERR (pctxt, RTERR_BUFOVFLW);
}
/***********************************************************************
*
* Routine name: xd_bitstr_s (decode static bit string)
*
* Description: This routine decodes the bit string at the current
* message pointer location and returns its value. The
* value is returned in the "ASNBITSTR" structure. This
* structure contains a value for the number of bits and
* a pointer to the decoded bit string. The routine
* also advances the message pointer to the start of the
* the next field.
*
* The routine first checks to see if explicit tagging
* is specified. If yes, it calls xd_match to match
* the universal tag for this message type. If the
* match is not successful, a negative value is returned
* to indicate the parse was not successful.
*
* If the match is successful or implicit tagging is
* specified, the first byte of the data value is fetched.
* This byte contains a value indicating the number of bits
* in the last octet that are unused. Dynamic memory is
* then allocated for the bit string and xd_memcpy
* is called to copy the string from the message to the
* allocated memory. The number of bits is calculated by
* multiplying the number of octets times eight bits/octet
* and then subtracting the number of unused bits obtained
* above. The number of bits and dynamic memory pointer
* are passed back to the caller via the "ASNBITSTR"
* structure. The actual length of the string in bytes is
* returned as the function result.
*
* Inputs:
*
* Name Type Description
* ---- ---- -----------
* pctxt struct Pointer to ASN.1 context block structure
* tagging enum Specifies whether element is implicitly or
* explicitly tagged.
* length int Length of data to retrieve. Valid for implicit
* case only.
*
* Outputs:
*
* Name Type Description
* ---- ---- -----------
* stat int Status of operation. Returned as function result.
* object char* Decoded bit string value.
* numbits int Number of bits in string.
*
**********************************************************************/
int xd_bitstr_s (OSCTXT* pctxt,
OSOCTET* object_p, OSUINT32* numbits_p,
ASN1TagType tagging, int length)
{
int bufsiz = (*numbits_p - 1) / 8 + 1;
int stat = 0;
OSOCTET b = 8;
if (tagging == ASN1EXPL) {
if (!XD_MATCH1 (pctxt, ASN_ID_BITSTR)) {
return berErrUnexpTag (pctxt, ASN_ID_BITSTR);
}
stat = XD_LEN (pctxt, &length);
if (stat != 0) LOG_RTERR (pctxt, stat);
}
if (pctxt->flags & ASN1CONSTAG) { /* constructed case */
ASN1CCB ccb;
int idx = 0, oidx = -1, len;
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
while (!XD_CHKEND (pctxt, &ccb)) {
if ((stat = xd_match1 (pctxt, ASN_ID_BITSTR, &len)) != 0)
return LOG_RTERR (pctxt, stat);
if ((int)(idx + len) == bufsiz + 1) { /* last segment detection */
if ((stat = XD_MEMCPY1 (pctxt, &b)) != 0) /* read unused bit count */
return LOG_RTERR (pctxt, stat);
len --;
oidx = -1;
}
else oidx = idx;
if (idx + len <= bufsiz)
stat = xd_memcpy (pctxt, object_p + idx, len);
else stat = RTERR_STROVFLW;
if (stat != 0) return LOG_RTERR (pctxt, stat);
else idx += len;
}
if (oidx >= 0 && idx - oidx > 0) { /* if unused bit count wasn't fetched... */
b = object_p [oidx];
memcpy (object_p + oidx, object_p + oidx + 1, idx - oidx - 1);
idx --;
}
if (b <= 7) { /* initial octet should be 0..7, !AB (11/06/02) */
*numbits_p = (idx * 8) - b;
/* If not indefinite length, make sure we consumed exactly as */
/* many bytes as specified in the constructed length field.. */
if (length != ASN_K_INDEFLEN) {
size_t usedBytes = OSRTBUFPTR(pctxt) - ccb.ptr;
if (usedBytes != (size_t)length)
return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else
return LOG_RTERR (pctxt, RTERR_BADVALUE);
}
else if (length > 0) { /* primitive case */
if ((stat = XD_MEMCPY1 (pctxt, &b)) == 0) {
length--; /* adjust by 1; first byte is unused bit count */
if (length == 0) {
if (0 == b)
*numbits_p = 0;
else
stat = ASN_E_INVLEN;
}
if (stat == 0) {
if (b <= 7) { /* initial octet should be 0..7, !AB (11/05/02) */
if (length <= bufsiz) {
stat = xd_memcpy (pctxt, object_p, length);
*numbits_p = (length * 8) - b;
}
else
stat = RTERR_STROVFLW;
}
else
stat = RTERR_BADVALUE;
}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
else if (length == 0)
*numbits_p = 0;
else
return LOG_RTERR (pctxt, ASN_E_INVLEN);
return 0;
}
EXTERN int asn1D_OrderResponseSimpleType (OSCTXT* pctxt,
OrderResponseSimpleType *pvalue, ASN1TagType tagging, int length)
{
int stat = 0;
int reqcnt = 0;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE */
memset (&pvalue->m, 0, sizeof(pvalue->m));
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
ccb.seqx = 0;
while (!XD_CHKEND (pctxt, &ccb)) {
switch (ccb.seqx) {
case 0:
/* decode iD */
if (XD_PEEKTAG (pctxt, 0x80)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_UnspecializedDatatypes_1_0_IdentifierType (pctxt,
&pvalue->iD, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 1:
/* decode copyIndicator */
if (XD_PEEKTAG (pctxt, 0x81)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CopyIndicator (pctxt,
&pvalue->copyIndicator, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.copyIndicatorPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 2:
/* decode gUID */
if (XD_PEEKTAG (pctxt, 0x82)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_UnspecializedDatatypes_1_0_IdentifierType (pctxt,
&pvalue->gUID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.gUIDPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 3:
/* decode issueDate */
if (XD_PEEKTAG (pctxt, 0x83)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_IssueDate (pctxt,
&pvalue->issueDate, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 4:
/* decode documentStatusCode */
if (XD_PEEKTAG (pctxt, 0x84)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_DocumentStatusCodeType (pctxt,
&pvalue->documentStatusCode, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.documentStatusCodePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 5:
/* decode note */
if (XD_PEEKTAG (pctxt, 0x85)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_Note (pctxt,
&pvalue->note, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.notePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 6:
/* decode acceptedIndicator */
if (XD_PEEKTAG (pctxt, 0x86)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_OrderResponseSimple_1_0_AcceptedIndicator (pctxt,
&pvalue->acceptedIndicator, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 7:
/* decode rejectionNote */
if (XD_PEEKTAG (pctxt, 0x87)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_RejectionNote (pctxt,
&pvalue->rejectionNote, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.rejectionNotePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 8:
/* decode orderReference */
if (XD_PEEKTAG (pctxt, 0x88)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_OrderReference (pctxt,
&pvalue->orderReference, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 9:
/* decode buyerParty */
if (XD_PEEKTAG (pctxt, 0x89)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_BuyerParty (pctxt,
&pvalue->buyerParty, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 10:
/* decode sellerParty */
if (XD_PEEKTAG (pctxt, 0x8a)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_SellerParty (pctxt,
&pvalue->sellerParty, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
default:
{ ASN1TAG tag;
int len;
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat != 0) return LOG_RTERR (pctxt, stat);
switch (tag) {
case (TM_CTXT|TM_CONS|0):
case (TM_CTXT|TM_CONS|1):
case (TM_CTXT|TM_CONS|2):
case (TM_CTXT|TM_CONS|3):
case (TM_CTXT|TM_CONS|4):
case (TM_CTXT|TM_CONS|5):
case (TM_CTXT|TM_CONS|6):
case (TM_CTXT|TM_CONS|7):
case (TM_CTXT|TM_CONS|8):
case (TM_CTXT|TM_CONS|9):
case (TM_CTXT|TM_CONS|10):
stat = RTERR_SEQORDER;
break;
default:
stat = RTERR_SEQOVFLW;
break;
}}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
else ccb.seqx++;
}
if (reqcnt < 6) {
return LOG_RTERR (pctxt, RTERR_SETMISRQ);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
EXTERN int asn1D_LatitudeDirectionCodeType (OSCTXT* pctxt,
LatitudeDirectionCodeType *pvalue, ASN1TagType tagging, int length)
{
int stat = 0;
int reqcnt = 0;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE */
memset (&pvalue->m, 0, sizeof(pvalue->m));
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
ccb.seqx = 0;
while (!XD_CHKEND (pctxt, &ccb)) {
switch (ccb.seqx) {
case 0:
/* decode codeListAgencyID */
if (XD_PEEKTAG (pctxt, 0x80)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->codeListAgencyID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.codeListAgencyIDPresent = TRUE;
}
}
break;
case 1:
/* decode codeListAgencyName */
if (XD_PEEKTAG (pctxt, 0x81)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->codeListAgencyName, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.codeListAgencyNamePresent = TRUE;
}
}
break;
case 2:
/* decode codeListID */
if (XD_PEEKTAG (pctxt, 0x82)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->codeListID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.codeListIDPresent = TRUE;
}
}
break;
case 3:
/* decode codeListName */
if (XD_PEEKTAG (pctxt, 0x83)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->codeListName, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.codeListNamePresent = TRUE;
}
}
break;
case 4:
/* decode codeListSchemeURI */
if (XD_PEEKTAG (pctxt, 0x84)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->codeListSchemeURI, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.codeListSchemeURIPresent = TRUE;
}
}
break;
case 5:
/* decode codeListURI */
if (XD_PEEKTAG (pctxt, 0x85)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->codeListURI, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.codeListURIPresent = TRUE;
}
}
break;
case 6:
/* decode codeListVersionID */
if (XD_PEEKTAG (pctxt, 0x86)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->codeListVersionID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.codeListVersionIDPresent = TRUE;
}
}
break;
case 7:
/* decode languageID */
if (XD_PEEKTAG (pctxt, 0x87)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->languageID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.languageIDPresent = TRUE;
}
}
break;
case 8:
/* decode name */
if (XD_PEEKTAG (pctxt, 0x88)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->name, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.namePresent = TRUE;
}
}
break;
case 9:
/* decode base */
if (XD_PEEKTAG (pctxt, 0x89)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_LatitudeDirectionCodeContentType (pctxt,
&pvalue->base, ASN1IMPL, length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
default:
{ ASN1TAG tag;
int len;
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat != 0) return LOG_RTERR (pctxt, stat);
switch (tag) {
case (TM_CTXT|TM_PRIM|0):
case (TM_CTXT|TM_CONS|0):
case (TM_CTXT|TM_PRIM|1):
case (TM_CTXT|TM_CONS|1):
case (TM_CTXT|TM_PRIM|2):
case (TM_CTXT|TM_CONS|2):
case (TM_CTXT|TM_PRIM|3):
case (TM_CTXT|TM_CONS|3):
case (TM_CTXT|TM_PRIM|4):
case (TM_CTXT|TM_CONS|4):
case (TM_CTXT|TM_PRIM|5):
case (TM_CTXT|TM_CONS|5):
case (TM_CTXT|TM_PRIM|6):
case (TM_CTXT|TM_CONS|6):
case (TM_CTXT|TM_PRIM|7):
case (TM_CTXT|TM_CONS|7):
case (TM_CTXT|TM_PRIM|8):
case (TM_CTXT|TM_CONS|8):
case (TM_CTXT|TM_PRIM|9):
stat = RTERR_SEQORDER;
break;
default:
stat = RTERR_SEQOVFLW;
break;
}}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
else ccb.seqx++;
}
if (reqcnt < 1) {
return LOG_RTERR (pctxt, RTERR_SETMISRQ);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
EXTERN int asn1D_RejectionNoteType (OSCTXT* pctxt,
RejectionNoteType *pvalue, ASN1TagType tagging, int length)
{
int stat = 0;
int reqcnt = 0;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE */
memset (&pvalue->m, 0, sizeof(pvalue->m));
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
ccb.seqx = 0;
while (!XD_CHKEND (pctxt, &ccb)) {
switch (ccb.seqx) {
case 0:
/* decode languageLocaleID */
if (XD_PEEKTAG (pctxt, 0x80)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->languageLocaleID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.languageLocaleIDPresent = TRUE;
}
}
break;
case 1:
/* decode languageID */
if (XD_PEEKTAG (pctxt, 0x81)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->languageID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.languageIDPresent = TRUE;
}
}
break;
case 2:
/* decode base */
if (XD_PEEKTAG (pctxt, 0x82)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->base, ASN1IMPL, length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
default:
{ ASN1TAG tag;
int len;
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat != 0) return LOG_RTERR (pctxt, stat);
switch (tag) {
case (TM_CTXT|TM_PRIM|0):
case (TM_CTXT|TM_CONS|0):
case (TM_CTXT|TM_PRIM|1):
case (TM_CTXT|TM_CONS|1):
case (TM_CTXT|TM_PRIM|2):
case (TM_CTXT|TM_CONS|2):
stat = RTERR_SEQORDER;
break;
default:
stat = RTERR_SEQOVFLW;
break;
}}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
else ccb.seqx++;
}
if (reqcnt < 1) {
return LOG_RTERR (pctxt, RTERR_SETMISRQ);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
EXTERN int asn1D_UBL_OrderResponseSimple_1_0_AcceptedIndicatorType (OSCTXT* pctxt,
UBL_OrderResponseSimple_1_0_AcceptedIndicatorType *pvalue, ASN1TagType tagging, int length)
{
int stat = 0;
int reqcnt = 0;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE */
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
ccb.seqx = 0;
while (!XD_CHKEND (pctxt, &ccb)) {
switch (ccb.seqx) {
case 0:
/* decode base */
if (XD_PEEKTAG (pctxt, 0x80)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_boolean (pctxt, &pvalue->base, ASN1IMPL, length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
default:
{ ASN1TAG tag;
int len;
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat != 0) return LOG_RTERR (pctxt, stat);
switch (tag) {
case (TM_CTXT|TM_PRIM|0):
stat = RTERR_SEQORDER;
break;
default:
stat = RTERR_SEQOVFLW;
break;
}}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
else ccb.seqx++;
}
if (reqcnt < 1) {
return LOG_RTERR (pctxt, RTERR_SETMISRQ);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
EXTERN int asn1D_InvoiceSummaryType (OSCTXT* pctxt,
InvoiceSummaryType *pvalue, ASN1TagType tagging, int length)
{
int stat = 0;
int reqcnt = 0;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE */
memset (&pvalue->m, 0, sizeof(pvalue->m));
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
ccb.seqx = 0;
while (!XD_CHKEND (pctxt, &ccb)) {
switch (ccb.seqx) {
case 0:
/* decode lineItemCountValue */
if (XD_PEEKTAG (pctxt, 0x80)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_NumericType (pctxt,
&pvalue->lineItemCountValue, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.lineItemCountValuePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 1:
/* decode subtotalAmount */
if (XD_PEEKTAG (pctxt, 0x81)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_AmountType (pctxt,
&pvalue->subtotalAmount, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 2:
/* decode pricingVariation_list */
if (XD_PEEKTAG (pctxt, 0x82)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
/* decode inline SEQUENCE OF type */
{
int stat = 0;
PricingVariationType* pdata2;
OSRTDListNode* pnode;
ASN1CCB ccb;
/* decode SEQUENCE OF or SET OF */
rtxDListInit (&pvalue->pricingVariation_list);
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
while (!XD_CHKEND (pctxt, &ccb))
{
rtxDListAllocNodeAndData (pctxt, PricingVariationType, &pnode, &pdata2);
if (pnode == NULL)
return LOG_RTERR (pctxt, RTERR_NOMEM);
asn1Init_PricingVariationType (pdata2);
stat = asn1D_PricingVariationType (pctxt,
pdata2, ASN1EXPL, length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
rtxDListAppendNode (&pvalue->pricingVariation_list, pnode);
}
}
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 3:
/* decode totalTax */
if (XD_PEEKTAG (pctxt, 0x83)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_TaxType (pctxt,
&pvalue->totalTax, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.totalTaxPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 4:
/* decode priceAmount */
if (XD_PEEKTAG (pctxt, 0x84)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_AmountType (pctxt,
&pvalue->priceAmount, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 5:
/* decode packingSlipIdentifier */
if (XD_PEEKTAG (pctxt, 0x85)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_IdentifierType (pctxt,
&pvalue->packingSlipIdentifier, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.packingSlipIdentifierPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 6:
/* decode summaryNote */
if (XD_PEEKTAG (pctxt, 0x86)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_NoteType (pctxt,
&pvalue->summaryNote, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.summaryNotePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
default:
{ ASN1TAG tag;
int len;
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat != 0) return LOG_RTERR (pctxt, stat);
switch (tag) {
case (TM_CTXT|TM_CONS|0):
case (TM_CTXT|TM_CONS|1):
case (TM_CTXT|TM_CONS|2):
case (TM_CTXT|TM_CONS|3):
case (TM_CTXT|TM_CONS|4):
case (TM_CTXT|TM_CONS|5):
case (TM_CTXT|TM_CONS|6):
stat = RTERR_SEQORDER;
break;
default:
stat = RTERR_SEQOVFLW;
break;
}}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
else ccb.seqx++;
}
if (reqcnt < 3) {
return LOG_RTERR (pctxt, RTERR_SETMISRQ);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
/*
* Starts parsing. The XML data being parsed should be set either set as
* a buffer in OSCTXT (pctxt->buffer) or read from its stream (pctxt->pStream).
*/
int rtSaxCParse (OSXMLREADER* pReader)
{
long len;
enum XML_Status stat = XML_STATUS_OK;
struct OSRTSTREAM* pStream;
XMLReaderImpl* readerImpl = (XMLReaderImpl*)(void*)pReader;
OSCTXT* pctxt;
OSSAXHandlerBase* pSaxBase;
if (pReader == 0 || pReader->pctxt == 0 || readerImpl->parser == 0)
return RTERR_NOTINIT;
pctxt = pReader->pctxt;
pStream = pctxt->pStream;
rtxErrReset (pctxt);
pSaxBase = (OSSAXHandlerBase*)readerImpl->userData;
if (pStream == 0) {
/* stream is not set - parse just a buffer */
stat = XML_Parse (readerImpl->parser, (char*)OSRTBUFPTR(pctxt),
(int)pctxt->buffer.size, TRUE);
return (stat == XML_STATUS_ERROR) ? RTERR_XMLPARSE : 0;
}
else { /* read from stream and parse */
do {
void* pbuf;
XML_Bool isFinal;
/* get the buffer to read in */
pbuf = XML_GetBuffer (readerImpl->parser, XML_BUF_SIZE);
/* read data to the buffer */
len = rtxStreamRead (pctxt, (OSOCTET*)pbuf, XML_BUF_SIZE);
if (len < 0)
break;
isFinal = (XML_Bool)(!len);
/* parse the data in the buffer */
if ((stat = XML_ParseBuffer (readerImpl->parser, len, isFinal)) == 0)
break;
/* the following code is necessary only if it is necessary to
* decode several XML documents consequently from one stream. */
if (pSaxBase->mState == OS_SAX_FINAL_STATE) {
/* if parsing is finished, but buffer is not empty we need
* to find the beginning of the next XML message and set
* this piece of data as pre-read buffer for BufferedStream.*/
XML_ParsingStatus status;
XML_GetParsingStatus(readerImpl->parser, &status);
if (status.parsing == XML_SUSPENDED) {
int offset, lenn;
/* Get buffer pointer, offset and length of remaining data.
Note, that patching of Expat is necessary to fix two problems:
1) even if parser is stopped by XML_StopParser, it will return
error "junk after end-of-document" if buffer is not empty;
2) XML_GetInputContext worked only if macro XML_CONTEXT_BYTES
was defined. But it could work even without it. */
const char * _pbuf =
XML_GetInputContext(readerImpl->parser, &offset, &lenn);
if (offset > 0 && lenn - offset > 0) {
int stat = 0;
const OSUTF8CHAR* prereadBuf = (const OSUTF8CHAR*)_pbuf + offset;
size_t prereadBufLen = (size_t)(lenn - offset), i;
/* check, is the buffer just whitespaces or not. If yes,
discard it */
for (i = 0; i < prereadBufLen; i++) {
if (!OS_ISSPACE (prereadBuf[i])) {
if (OSRTSTREAM_ID (pctxt) != OSRTSTRMID_DIRECTBUF) {
stat = rtxStreamBufferedCreate (pctxt,
OSRTSTRMCM_RESTORE_UNDERLAYING_AFTER_RESET);
if (stat < 0) len = stat;
}
if (stat == 0) {
stat = rtxStreamBufferedSetPreReadBuf (pctxt,
(const OSOCTET*)prereadBuf + i, prereadBufLen - i);
if (stat < 0) len = stat;
}
break;
}
}
}
stat = XML_STATUS_OK;
}
break;
}
} while (len > 0);
}
if (len < 0) {
return LOG_RTERR (pctxt, len);
}
else if (stat != XML_STATUS_OK) {
XML_LChar str[256];
len = RTERR_XMLPARSE;
EXML_ErrorString (readerImpl->parser,
XML_GetErrorCode (readerImpl->parser), str,
sizeof(str)/sizeof(str[0]));
LOG_RTERRNEW (pctxt, len);
rtxErrAddStrParm (pctxt, LSTRX (pctxt, str));
return len;
}
return 0;
}
EXTERN int asn1D_InvoiceHeaderType (OSCTXT* pctxt, InvoiceHeaderType *pvalue,
ASN1TagType tagging, int length)
{
int stat = 0;
int reqcnt = 0;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE */
memset (&pvalue->m, 0, sizeof(pvalue->m));
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
ccb.seqx = 0;
while (!XD_CHKEND (pctxt, &ccb)) {
switch (ccb.seqx) {
case 0:
/* decode issueDateTime */
if (XD_PEEKTAG (pctxt, 0x80)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_DateTimeType (pctxt,
&pvalue->issueDateTime, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 1:
/* decode identifier */
if (XD_PEEKTAG (pctxt, 0x81)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_IdentifierType (pctxt,
&pvalue->identifier, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 2:
/* decode pOIdentifier */
if (XD_PEEKTAG (pctxt, 0x82)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_IdentifierType (pctxt,
&pvalue->pOIdentifier, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 3:
/* decode currencyCode */
if (XD_PEEKTAG (pctxt, 0x83)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_CodeType (pctxt,
&pvalue->currencyCode, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.currencyCodePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 4:
/* decode language */
if (XD_PEEKTAG (pctxt, 0x84)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_LanguageType (pctxt,
&pvalue->language, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.languagePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 5:
/* decode buyerParty */
if (XD_PEEKTAG (pctxt, 0x85)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_PartyType (pctxt,
&pvalue->buyerParty, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 6:
/* decode sellerParty */
if (XD_PEEKTAG (pctxt, 0x86)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_PartyType (pctxt,
&pvalue->sellerParty, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 7:
/* decode consigneeParty */
if (XD_PEEKTAG (pctxt, 0x87)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_PartyType (pctxt,
&pvalue->consigneeParty, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.consigneePartyPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 8:
/* decode despatchParty */
if (XD_PEEKTAG (pctxt, 0x88)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_PartyType (pctxt,
&pvalue->despatchParty, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.despatchPartyPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 9:
/* decode shipment */
if (XD_PEEKTAG (pctxt, 0x89)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_ShipmentType (pctxt,
&pvalue->shipment, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.shipmentPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 10:
/* decode paymentMeans */
if (XD_PEEKTAG (pctxt, 0x8a)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_PaymentMeansType (pctxt,
&pvalue->paymentMeans, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 11:
/* decode lineItemCountValue */
if (XD_PEEKTAG (pctxt, 0x8b)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_NumericType (pctxt,
&pvalue->lineItemCountValue, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.lineItemCountValuePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
default:
{ ASN1TAG tag;
int len;
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat != 0) return LOG_RTERR (pctxt, stat);
switch (tag) {
case (TM_CTXT|TM_CONS|0):
case (TM_CTXT|TM_CONS|1):
case (TM_CTXT|TM_CONS|2):
case (TM_CTXT|TM_CONS|3):
case (TM_CTXT|TM_CONS|4):
case (TM_CTXT|TM_CONS|5):
case (TM_CTXT|TM_CONS|6):
case (TM_CTXT|TM_CONS|7):
case (TM_CTXT|TM_CONS|8):
case (TM_CTXT|TM_CONS|9):
case (TM_CTXT|TM_CONS|10):
case (TM_CTXT|TM_CONS|11):
stat = RTERR_SEQORDER;
break;
default:
stat = RTERR_SEQOVFLW;
break;
}}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
else ccb.seqx++;
}
if (reqcnt < 6) {
return LOG_RTERR (pctxt, RTERR_SETMISRQ);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
EXTERN int asn1D_InvoiceLineItemType (OSCTXT* pctxt,
InvoiceLineItemType *pvalue, ASN1TagType tagging, int length)
{
int stat = 0;
int reqcnt = 0;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE */
memset (&pvalue->m, 0, sizeof(pvalue->m));
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
ccb.seqx = 0;
while (!XD_CHKEND (pctxt, &ccb)) {
switch (ccb.seqx) {
case 0:
/* decode lineID */
if (XD_PEEKTAG (pctxt, 0x80)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_IdentifierType (pctxt,
&pvalue->lineID, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 1:
/* decode item */
if (XD_PEEKTAG (pctxt, 0x81)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_ItemType (pctxt,
&pvalue->item, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 2:
/* decode orderStatus */
if (XD_PEEKTAG (pctxt, 0x82)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_CodeType (pctxt,
&pvalue->orderStatus, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.orderStatusPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 3:
/* decode pricing */
if (XD_PEEKTAG (pctxt, 0x83)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_PricingType (pctxt,
&pvalue->pricing, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 4:
/* decode pricingVariation */
if (XD_PEEKTAG (pctxt, 0x84)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_PricingVariationType (pctxt,
&pvalue->pricingVariation, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.pricingVariationPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 5:
/* decode itemTax */
if (XD_PEEKTAG (pctxt, 0x85)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_AmountType (pctxt,
&pvalue->itemTax, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.itemTaxPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 6:
/* decode totalAmount */
if (XD_PEEKTAG (pctxt, 0x86)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CCT_AmountType (pctxt,
&pvalue->totalAmount, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
default:
{ ASN1TAG tag;
int len;
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat != 0) return LOG_RTERR (pctxt, stat);
switch (tag) {
case (TM_CTXT|TM_CONS|0):
case (TM_CTXT|TM_CONS|1):
case (TM_CTXT|TM_CONS|2):
case (TM_CTXT|TM_CONS|3):
case (TM_CTXT|TM_CONS|4):
case (TM_CTXT|TM_CONS|5):
case (TM_CTXT|TM_CONS|6):
stat = RTERR_SEQORDER;
break;
default:
stat = RTERR_SEQOVFLW;
break;
}}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
else ccb.seqx++;
}
if (reqcnt < 4) {
return LOG_RTERR (pctxt, RTERR_SETMISRQ);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
EXTERN int asn1D_InvoiceType (OSCTXT* pctxt, InvoiceType *pvalue,
ASN1TagType tagging, int length)
{
int stat = 0;
int reqcnt = 0;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE */
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
ccb.seqx = 0;
while (!XD_CHKEND (pctxt, &ccb)) {
switch (ccb.seqx) {
case 0:
/* decode header */
if (XD_PEEKTAG (pctxt, 0x80)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_InvoiceHeaderType (pctxt,
&pvalue->header, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 1:
/* decode lineItem_list */
if (XD_PEEKTAG (pctxt, 0x81)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
/* decode inline SEQUENCE OF type */
{
int stat = 0;
InvoiceLineItemType* pdata2;
OSRTDListNode* pnode;
ASN1CCB ccb;
/* decode SEQUENCE OF or SET OF */
rtxDListInit (&pvalue->lineItem_list);
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
while (!XD_CHKEND (pctxt, &ccb))
{
rtxDListAllocNodeAndData (pctxt, InvoiceLineItemType, &pnode, &pdata2);
if (pnode == NULL)
return LOG_RTERR (pctxt, RTERR_NOMEM);
asn1Init_InvoiceLineItemType (pdata2);
stat = asn1D_InvoiceLineItemType (pctxt,
pdata2, ASN1EXPL, length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
rtxDListAppendNode (&pvalue->lineItem_list, pnode);
}
if (!(pvalue->lineItem_list.count >= 1U)) {
rtxErrAddStrParm (pctxt, "InvoiceType.lineItem_list.count");
rtxErrAddIntParm (pctxt, (int)pvalue->lineItem_list.count);
return LOG_RTERR (pctxt, RTERR_CONSVIO);
}
}
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 2:
/* decode summary */
if (XD_PEEKTAG (pctxt, 0x82)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_InvoiceSummaryType (pctxt,
&pvalue->summary, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
default:
{ ASN1TAG tag;
int len;
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat != 0) return LOG_RTERR (pctxt, stat);
switch (tag) {
case (TM_CTXT|TM_CONS|0):
case (TM_CTXT|TM_CONS|1):
case (TM_CTXT|TM_CONS|2):
stat = RTERR_SEQORDER;
break;
default:
stat = RTERR_SEQOVFLW;
break;
}}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
else ccb.seqx++;
}
if (reqcnt < 3) {
return LOG_RTERR (pctxt, RTERR_SETMISRQ);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
OSOCTET *xe_getp (OSCTXT* pctxt)
{
return OSRTBUFPTR(pctxt);
}
EXTERN int asn1D_OrderResponseType (OSCTXT* pctxt,
OrderResponseType *pvalue, ASN1TagType tagging, int length)
{
int stat = 0;
int reqcnt = 0;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE */
memset (&pvalue->m, 0, sizeof(pvalue->m));
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
ccb.seqx = 0;
while (!XD_CHKEND (pctxt, &ccb)) {
switch (ccb.seqx) {
case 0:
/* decode buyersID */
if (XD_PEEKTAG (pctxt, 0x80)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_UnspecializedDatatypes_1_0_IdentifierType (pctxt,
&pvalue->buyersID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.buyersIDPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 1:
/* decode sellersID */
if (XD_PEEKTAG (pctxt, 0x81)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_UnspecializedDatatypes_1_0_IdentifierType (pctxt,
&pvalue->sellersID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.sellersIDPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 2:
/* decode copyIndicator */
if (XD_PEEKTAG (pctxt, 0x82)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CopyIndicator (pctxt,
&pvalue->copyIndicator, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.copyIndicatorPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 3:
/* decode gUID */
if (XD_PEEKTAG (pctxt, 0x83)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_UnspecializedDatatypes_1_0_IdentifierType (pctxt,
&pvalue->gUID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.gUIDPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 4:
/* decode issueDate */
if (XD_PEEKTAG (pctxt, 0x84)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_IssueDate (pctxt,
&pvalue->issueDate, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 5:
/* decode documentStatusCode */
if (XD_PEEKTAG (pctxt, 0x85)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_DocumentStatusCodeType (pctxt,
&pvalue->documentStatusCode, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.documentStatusCodePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 6:
/* decode note */
if (XD_PEEKTAG (pctxt, 0x86)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_Note (pctxt,
&pvalue->note, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.notePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 7:
/* decode transactionCurrencyCode */
if (XD_PEEKTAG (pctxt, 0x87)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CurrencyCodeType (pctxt,
&pvalue->transactionCurrencyCode, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.transactionCurrencyCodePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 8:
/* decode pricingCurrencyCode */
if (XD_PEEKTAG (pctxt, 0x88)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_CurrencyCodeType (pctxt,
&pvalue->pricingCurrencyCode, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.pricingCurrencyCodePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 9:
/* decode earliestDate */
if (XD_PEEKTAG (pctxt, 0x89)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_OrderResponse_1_0_EarliestDate (pctxt,
&pvalue->earliestDate, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.earliestDatePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 10:
/* decode expiryDate */
if (XD_PEEKTAG (pctxt, 0x8a)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_ExpiryDate (pctxt,
&pvalue->expiryDate, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.expiryDatePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 11:
/* decode validityDurationMeasure */
if (XD_PEEKTAG (pctxt, 0x8b)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_OrderResponse_1_0_ValidityDurationMeasure (pctxt,
&pvalue->validityDurationMeasure, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.validityDurationMeasurePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 12:
/* decode taxTotalAmount */
if (XD_PEEKTAG (pctxt, 0x8c)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_TaxTotalAmount (pctxt,
&pvalue->taxTotalAmount, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.taxTotalAmountPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 13:
/* decode lineExtensionTotalAmount */
if (XD_PEEKTAG (pctxt, 0x8d)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_LineExtensionTotalAmount (pctxt,
&pvalue->lineExtensionTotalAmount, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.lineExtensionTotalAmountPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 14:
/* decode totalPackagesCountQuantity */
if (XD_PEEKTAG (pctxt, 0x8e)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_OrderResponse_1_0_TotalPackagesCountQuantity (pctxt,
&pvalue->totalPackagesCountQuantity, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.totalPackagesCountQuantityPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 15:
/* decode grossWeightMeasure */
if (XD_PEEKTAG (pctxt, 0x8f)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_GrossWeightMeasure (pctxt,
&pvalue->grossWeightMeasure, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.grossWeightMeasurePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 16:
/* decode netWeightMeasure */
if (XD_PEEKTAG (pctxt, 0x90)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_NetWeightMeasure (pctxt,
&pvalue->netWeightMeasure, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.netWeightMeasurePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 17:
/* decode netNetWeightMeasure */
if (XD_PEEKTAG (pctxt, 0x91)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_NetNetWeightMeasure (pctxt,
&pvalue->netNetWeightMeasure, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.netNetWeightMeasurePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 18:
/* decode grossVolumeMeasure */
if (XD_PEEKTAG (pctxt, 0x92)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_GrossVolumeMeasure (pctxt,
&pvalue->grossVolumeMeasure, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.grossVolumeMeasurePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 19:
/* decode netVolumeMeasure */
if (XD_PEEKTAG (pctxt, 0x93)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_NetVolumeMeasure (pctxt,
&pvalue->netVolumeMeasure, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.netVolumeMeasurePresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 20:
/* decode lineItemCountNumeric */
if (XD_PEEKTAG (pctxt, 0x94)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_OrderResponse_1_0_LineItemCountNumeric (pctxt,
&pvalue->lineItemCountNumeric, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.lineItemCountNumericPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 21:
/* decode orderReference_list */
if (XD_PEEKTAG (pctxt, 0x95)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_OrderResponseType_orderReference_list (pctxt,
&pvalue->orderReference_list, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 22:
/* decode buyerParty */
if (XD_PEEKTAG (pctxt, 0x96)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_BuyerParty (pctxt,
&pvalue->buyerParty, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 23:
/* decode sellerParty */
if (XD_PEEKTAG (pctxt, 0x97)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_SellerParty (pctxt,
&pvalue->sellerParty, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 24:
/* decode originatorParty */
if (XD_PEEKTAG (pctxt, 0x98)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_OrderResponse_1_0_OriginatorParty (pctxt,
&pvalue->originatorParty, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.originatorPartyPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 25:
/* decode freightForwarderParty */
if (XD_PEEKTAG (pctxt, 0x99)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_OrderResponse_1_0_FreightForwarderParty (pctxt,
&pvalue->freightForwarderParty, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.freightForwarderPartyPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 26:
/* decode delivery_list */
if (XD_PEEKTAG (pctxt, 0x9a)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D__SeqOfDelivery (pctxt,
&pvalue->delivery_list, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 27:
/* decode deliveryTerms */
if (XD_PEEKTAG (pctxt, 0x9b)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_DeliveryTerms (pctxt,
&pvalue->deliveryTerms, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.deliveryTermsPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 28:
/* decode allowanceCharge_list */
if (XD_PEEKTAG (pctxt, 0x9c)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D__SeqOfAllowanceCharge (pctxt,
&pvalue->allowanceCharge_list, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 29:
/* decode salesConditions */
if (XD_PEEKTAG (pctxt, 0x9d)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_SalesConditions (pctxt,
&pvalue->salesConditions, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.salesConditionsPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 30:
/* decode destinationCountry */
if (XD_PEEKTAG (pctxt, 0x9e)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = asn1D_UBL_OrderResponse_1_0_DestinationCountry (pctxt,
&pvalue->destinationCountry, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.destinationCountryPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
break;
case 31:
/* decode respondedOrderLine_list */
if ((stat = xd_match (pctxt, TM_CTXT|TM_CONS|31, &length, XM_ADVANCE)) == 0) {
stat = asn1D_OrderResponseType_respondedOrderLine_list (pctxt,
&pvalue->respondedOrderLine_list, ASN1IMPL, length);
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 32:
/* decode paymentMeans */
if ((stat = xd_match (pctxt, TM_CTXT|TM_CONS|32, &length, XM_ADVANCE)) == 0) {
stat = asn1D_PaymentMeans (pctxt,
&pvalue->paymentMeans, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.paymentMeansPresent = TRUE;
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
}
else if (stat == RTERR_IDNOTFOU) {
stat = rtxErrReset (pctxt);
}
break;
default:
{ ASN1TAG tag;
int len;
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat != 0) return LOG_RTERR (pctxt, stat);
switch (tag) {
case (TM_CTXT|TM_CONS|0):
case (TM_CTXT|TM_CONS|1):
case (TM_CTXT|TM_CONS|2):
case (TM_CTXT|TM_CONS|3):
case (TM_CTXT|TM_CONS|4):
case (TM_CTXT|TM_CONS|5):
case (TM_CTXT|TM_CONS|6):
case (TM_CTXT|TM_CONS|7):
case (TM_CTXT|TM_CONS|8):
case (TM_CTXT|TM_CONS|9):
case (TM_CTXT|TM_CONS|10):
case (TM_CTXT|TM_CONS|11):
case (TM_CTXT|TM_CONS|12):
case (TM_CTXT|TM_CONS|13):
case (TM_CTXT|TM_CONS|14):
case (TM_CTXT|TM_CONS|15):
case (TM_CTXT|TM_CONS|16):
case (TM_CTXT|TM_CONS|17):
case (TM_CTXT|TM_CONS|18):
case (TM_CTXT|TM_CONS|19):
case (TM_CTXT|TM_CONS|20):
case (TM_CTXT|TM_CONS|21):
case (TM_CTXT|TM_CONS|22):
case (TM_CTXT|TM_CONS|23):
case (TM_CTXT|TM_CONS|24):
case (TM_CTXT|TM_CONS|25):
case (TM_CTXT|TM_CONS|26):
case (TM_CTXT|TM_CONS|27):
case (TM_CTXT|TM_CONS|28):
case (TM_CTXT|TM_CONS|29):
case (TM_CTXT|TM_CONS|30):
case (TM_CTXT|TM_CONS|31):
case (TM_CTXT|TM_CONS|32):
stat = RTERR_SEQORDER;
break;
default:
stat = RTERR_SEQOVFLW;
break;
}}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
else ccb.seqx++;
}
if (reqcnt < 7) {
return LOG_RTERR (pctxt, RTERR_SETMISRQ);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
EXTERN int asn1D_Math (OSCTXT* pctxt, Math *pvalue, ASN1TagType tagging,
int length)
{
int stat = 0;
int reqcnt = 0;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE */
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
ccb.seqx = 0;
while (!XD_CHKEND (pctxt, &ccb)) {
switch (ccb.seqx) {
case 0:
/* decode attr */
if (XD_PEEKTAG (pctxt, 0x80)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
/* decode inline SEQUENCE OF type */
{
int stat = 0;
const OSUTF8CHAR* pdata2;
OSRTDListNode* pnode;
ASN1CCB ccb;
/* decode SEQUENCE OF or SET OF */
rtxDListInit (&pvalue->attr);
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
while (!XD_CHKEND (pctxt, &ccb))
{
pnode = rtxMemAllocTypeZ (pctxt, OSRTDListNode);
if (pnode == NULL)
return LOG_RTERR (pctxt, RTERR_NOMEM);
stat = xd_utf8str (pctxt, &pdata2, ASN1EXPL, length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
pnode->data = (void*)pdata2;
rtxDListAppendNode (&pvalue->attr, pnode);
}
}
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 1:
/* decode element446_list */
if (XD_PEEKTAG (pctxt, 0x81)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
/* decode inline SEQUENCE OF type */
{
int stat = 0;
Odf_Element446* pdata2;
OSRTDListNode* pnode;
ASN1CCB ccb;
/* decode SEQUENCE OF or SET OF */
rtxDListInit (&pvalue->element446_list);
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
while (!XD_CHKEND (pctxt, &ccb))
{
rtxDListAllocNodeAndData (pctxt, Odf_Element446, &pnode, &pdata2);
if (pnode == NULL)
return LOG_RTERR (pctxt, RTERR_NOMEM);
stat = asn1D_Odf_Element446 (pctxt,
(Odf_Element446*)pdata2, ASN1EXPL, length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
rtxDListAppendNode (&pvalue->element446_list, pnode);
}
}
if (stat == 0) {
if (length == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
}
else return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
default:
{ ASN1TAG tag;
int len;
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat != 0) return LOG_RTERR (pctxt, stat);
switch (tag) {
case (TM_CTXT|TM_CONS|0):
case (TM_CTXT|TM_CONS|1):
stat = RTERR_SEQORDER;
break;
default:
stat = RTERR_SEQOVFLW;
break;
}}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
else ccb.seqx++;
}
if (reqcnt < 2) {
return LOG_RTERR (pctxt, RTERR_SETMISRQ);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
EXTERN int asn1D_UBL_OrderResponse_1_0_PackagesCountQuantityType (OSCTXT* pctxt,
UBL_OrderResponse_1_0_PackagesCountQuantityType *pvalue, ASN1TagType tagging, int length)
{
int stat = 0;
int reqcnt = 0;
ASN1CCB ccb;
if (tagging == ASN1EXPL) {
stat = xd_match1 (pctxt, 0x10, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
}
/* decode SEQUENCE */
memset (&pvalue->m, 0, sizeof(pvalue->m));
ccb.len = length;
ccb.ptr = OSRTBUFPTR(pctxt);
ccb.seqx = 0;
while (!XD_CHKEND (pctxt, &ccb)) {
switch (ccb.seqx) {
case 0:
/* decode quantityUnitCode */
if (XD_PEEKTAG (pctxt, 0x80)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->quantityUnitCode, ASN1IMPL, length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
case 1:
/* decode quantityUnitCodeListAgencyID */
if (XD_PEEKTAG (pctxt, 0x81)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->quantityUnitCodeListAgencyID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.quantityUnitCodeListAgencyIDPresent = TRUE;
}
}
break;
case 2:
/* decode quantityUnitCodeListAgencyName */
if (XD_PEEKTAG (pctxt, 0x82)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->quantityUnitCodeListAgencyName, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.quantityUnitCodeListAgencyNamePresent = TRUE;
}
}
break;
case 3:
/* decode quantityUnitCodeListID */
if (XD_PEEKTAG (pctxt, 0x83)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_utf8str (pctxt, &pvalue->quantityUnitCodeListID, ASN1IMPL, length);
if (stat == 0) {
pvalue->m.quantityUnitCodeListIDPresent = TRUE;
}
}
break;
case 4:
/* decode base */
if (XD_PEEKTAG (pctxt, 0x84)) {
stat = xd_Tag1AndLen (pctxt, &length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
stat = xd_real (pctxt, &pvalue->base, ASN1IMPL, length);
if (stat != 0) return LOG_RTERR (pctxt, stat);
reqcnt++;
}
break;
default:
{ ASN1TAG tag;
int len;
stat = xd_tag_len (pctxt, &tag, &len, 0);
if (stat != 0) return LOG_RTERR (pctxt, stat);
switch (tag) {
case (TM_CTXT|TM_PRIM|0):
case (TM_CTXT|TM_CONS|0):
case (TM_CTXT|TM_PRIM|1):
case (TM_CTXT|TM_CONS|1):
case (TM_CTXT|TM_PRIM|2):
case (TM_CTXT|TM_CONS|2):
case (TM_CTXT|TM_PRIM|3):
case (TM_CTXT|TM_CONS|3):
case (TM_CTXT|TM_PRIM|4):
stat = RTERR_SEQORDER;
break;
default:
stat = RTERR_SEQOVFLW;
break;
}}
}
if (stat != 0) return LOG_RTERR (pctxt, stat);
else ccb.seqx++;
}
if (reqcnt < 2) {
return LOG_RTERR (pctxt, RTERR_SETMISRQ);
}
if (tagging == ASN1EXPL && ccb.len == ASN_K_INDEFLEN) {
if (XD_MATCHEOC (pctxt)) XD_BUMPIDX (pctxt, 2);
else return LOG_RTERR (pctxt, ASN_E_INVLEN);
}
return (stat);
}
