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); }