RTDECL(int) RTAsn1Integer_DecodeAsn1(PRTASN1CURSOR pCursor, uint32_t fFlags, PRTASN1INTEGER pThis, const char *pszErrorTag)
{
pThis->uValue.u = 0;
int rc = RTAsn1CursorReadHdr(pCursor, &pThis->Asn1Core, pszErrorTag);
if (RT_SUCCESS(rc))
{
rc = RTAsn1CursorMatchTagClassFlags(pCursor, &pThis->Asn1Core, ASN1_TAG_INTEGER,
ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_PRIMITIVE,
fFlags, pszErrorTag, "INTEGER");
if (RT_SUCCESS(rc))
{
uint32_t offLast = pThis->Asn1Core.cb - 1;
switch (pThis->Asn1Core.cb)
{
default:
case 8: pThis->uValue.u |= (uint64_t)pThis->Asn1Core.uData.pu8[offLast - 7] << 56;
case 7: pThis->uValue.u |= (uint64_t)pThis->Asn1Core.uData.pu8[offLast - 6] << 48;
case 6: pThis->uValue.u |= (uint64_t)pThis->Asn1Core.uData.pu8[offLast - 5] << 40;
case 5: pThis->uValue.u |= (uint64_t)pThis->Asn1Core.uData.pu8[offLast - 4] << 32;
case 4: pThis->uValue.u |= (uint32_t)pThis->Asn1Core.uData.pu8[offLast - 3] << 24;
case 3: pThis->uValue.u |= (uint32_t)pThis->Asn1Core.uData.pu8[offLast - 2] << 16;
case 2: pThis->uValue.u |= (uint16_t)pThis->Asn1Core.uData.pu8[offLast - 1] << 8;
case 1: pThis->uValue.u |= pThis->Asn1Core.uData.pu8[offLast];
}
RTAsn1CursorSkip(pCursor, pThis->Asn1Core.cb);
pThis->Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
pThis->Asn1Core.pOps = &g_RTAsn1Integer_Vtable;
return VINF_SUCCESS;
}
}
RT_ZERO(*pThis);
return rc;
}
RTDECL(int) RTAsn1OctetString_DecodeAsn1(PRTASN1CURSOR pCursor, uint32_t fFlags, PRTASN1OCTETSTRING pThis,
const char *pszErrorTag)
{
pThis->pEncapsulated = NULL;
RTAsn1CursorInitAllocation(pCursor, &pThis->EncapsulatedAllocation);
int rc = RTAsn1CursorReadHdr(pCursor, &pThis->Asn1Core, pszErrorTag);
if (RT_SUCCESS(rc))
{
rc = RTAsn1CursorMatchTagClassFlagsString(pCursor, &pThis->Asn1Core, ASN1_TAG_OCTET_STRING,
ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_PRIMITIVE,
fFlags, pszErrorTag, "OCTET STRING");
if (RT_SUCCESS(rc))
{
if ( !(pThis->Asn1Core.fClass & ASN1_TAGFLAG_CONSTRUCTED)
|| (fFlags & RTASN1CURSOR_GET_F_IMPLICIT) ) /* PKCS #7 ContentInfo tweak. */
{
RTAsn1CursorSkip(pCursor, pThis->Asn1Core.cb);
pThis->Asn1Core.pOps = &g_RTAsn1OctetString_Vtable;
pThis->Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
return VINF_SUCCESS;
}
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_CONSTRUCTED_STRING_NOT_IMPL,
"%s: Constructed OCTET STRING not implemented.", pszErrorTag);
}
else
rc = RTAsn1CursorSetInfo(pCursor, rc, "%s: Not OCTET STRING: fClass=%#x / uTag=%#x",
pszErrorTag, pThis->Asn1Core.fClass, pThis->Asn1Core.uTag);
}
RT_ZERO(*pThis);
return rc;
}
RTDECL(int) RTAsn1Time_DecodeAsn1(PRTASN1CURSOR pCursor, uint32_t fFlags, PRTASN1TIME pThis, const char *pszErrorTag)
{
Assert(!(fFlags & RTASN1CURSOR_GET_F_IMPLICIT));
int rc = RTAsn1CursorReadHdr(pCursor, &pThis->Asn1Core, pszErrorTag);
if (RT_SUCCESS(rc))
{
if (pThis->Asn1Core.fClass == (ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_PRIMITIVE) )
{
if (pThis->Asn1Core.uTag == ASN1_TAG_UTC_TIME)
{
RTAsn1CursorSkip(pCursor, pThis->Asn1Core.cb);
pThis->Asn1Core.pOps = &g_RTAsn1Time_Vtable;
pThis->Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
return rtAsn1Time_ConvertUTCTime(pCursor, pThis, pszErrorTag);
}
if (pThis->Asn1Core.uTag == ASN1_TAG_GENERALIZED_TIME)
{
RTAsn1CursorSkip(pCursor, pThis->Asn1Core.cb);
pThis->Asn1Core.pOps = &g_RTAsn1Time_Vtable;
pThis->Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
return rtAsn1Time_ConvertGeneralizedTime(pCursor, pThis, pszErrorTag);
}
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_CURSOR_TAG_MISMATCH, "%s: Not UTCTime nor GeneralizedTime: uTag=%#x",
pszErrorTag, pThis->Asn1Core.uTag);
}
else
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_CURSOR_TAG_FLAG_CLASS_MISMATCH,
"%s: Not UTCTime nor GeneralizedTime: fClass=%#x / uTag=%#x",
pszErrorTag, pThis->Asn1Core.fClass, pThis->Asn1Core.uTag);
}
RT_ZERO(*pThis);
return rc;
}
RTDECL(int) RTAsn1Boolean_DecodeAsn1(PRTASN1CURSOR pCursor, uint32_t fFlags, PRTASN1BOOLEAN pThis, const char *pszErrorTag)
{
pThis->fValue = 0;
int rc = RTAsn1CursorReadHdr(pCursor, &pThis->Asn1Core, pszErrorTag);
if (RT_SUCCESS(rc))
{
rc = RTAsn1CursorMatchTagClassFlags(pCursor, &pThis->Asn1Core, ASN1_TAG_BOOLEAN,
ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_PRIMITIVE, fFlags, pszErrorTag, "BOOLEAN");
if (RT_SUCCESS(rc))
{
if (pThis->Asn1Core.cb == 1)
{
RTAsn1CursorSkip(pCursor, pThis->Asn1Core.cb);
pThis->Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
pThis->Asn1Core.pOps = &g_RTAsn1Boolean_Vtable;
pThis->fValue = *pThis->Asn1Core.uData.pu8 != 0;
if ( *pThis->Asn1Core.uData.pu8 == 0
|| *pThis->Asn1Core.uData.pu8 == 0xff
|| !(pCursor->fFlags & (RTASN1CURSOR_FLAGS_DER | RTASN1CURSOR_FLAGS_CER)) )
return VINF_SUCCESS;
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_INVALID_BOOLEAN_ENCODING,
"%s: Invalid CER/DER boolean value: %#x, valid: 0, 0xff",
pszErrorTag, *pThis->Asn1Core.uData.pu8);
}
else
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_INVALID_BOOLEAN_ENCODING, "%s: Invalid boolean length, exepcted 1: %#x",
pszErrorTag, pThis->Asn1Core.cb);
}
}
RT_ZERO(*pThis);
return rc;
}
/**
* Common worker for the specific string type getters.
*
* @returns IPRT status code
* @param pCursor The cursor.
* @param fFlags The RTASN1CURSOR_GET_F_XXX flags.
* @param uTag The string tag.
* @param pThis The output object.
* @param pszErrorTag The error tag.
* @param pszWhat The string type name.
*/
static int rtAsn1XxxString_DecodeAsn1(PRTASN1CURSOR pCursor, uint32_t fFlags, uint8_t uTag, PRTASN1STRING pThis,
const char *pszErrorTag, const char *pszWhat)
{
pThis->cchUtf8 = 0;
pThis->pszUtf8 = NULL;
int rc = RTAsn1CursorReadHdr(pCursor, &pThis->Asn1Core, pszErrorTag);
if (RT_SUCCESS(rc))
{
rc = RTAsn1CursorMatchTagClassFlagsString(pCursor, &pThis->Asn1Core, uTag,
ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_PRIMITIVE,
fFlags, pszErrorTag, pszWhat);
if (RT_SUCCESS(rc))
{
if (!(pThis->Asn1Core.fClass & ASN1_TAGFLAG_CONSTRUCTED))
{
RTAsn1CursorSkip(pCursor, pThis->Asn1Core.cb);
pThis->Asn1Core.pOps = &g_RTAsn1String_Vtable;
pThis->Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
RTAsn1CursorInitAllocation(pCursor, &pThis->Allocation);
/* UTF-8 conversion is done lazily, upon request. */
return VINF_SUCCESS;
}
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_CONSTRUCTED_STRING_NOT_IMPL,
"%s: Constructed %s not implemented.", pszErrorTag, pszWhat);
}
}
RT_ZERO(*pThis);
return rc;
}
RTDECL(int) RTAsn1GeneralizedTime_DecodeAsn1(PRTASN1CURSOR pCursor, uint32_t fFlags, PRTASN1TIME pThis, const char *pszErrorTag)
{
int rc = RTAsn1CursorReadHdr(pCursor, &pThis->Asn1Core, pszErrorTag);
if (RT_SUCCESS(rc))
{
rc = RTAsn1CursorMatchTagClassFlags(pCursor, &pThis->Asn1Core, ASN1_TAG_GENERALIZED_TIME,
ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_PRIMITIVE,
fFlags, pszErrorTag, "GENERALIZED TIME");
if (RT_SUCCESS(rc))
{
RTAsn1CursorSkip(pCursor, pThis->Asn1Core.cb);
pThis->Asn1Core.pOps = &g_RTAsn1Time_Vtable;
pThis->Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
return rtAsn1Time_ConvertGeneralizedTime(pCursor, pThis, pszErrorTag);
}
}
RT_ZERO(*pThis);
return rc;
}
RTDECL(int) RTAsn1ObjId_DecodeAsn1(PRTASN1CURSOR pCursor, uint32_t fFlags, PRTASN1OBJID pThis, const char *pszErrorTag)
{
int rc = RTAsn1CursorReadHdr(pCursor, &pThis->Asn1Core, pszErrorTag);
if (RT_SUCCESS(rc))
{
rc = RTAsn1CursorMatchTagClassFlags(pCursor, &pThis->Asn1Core, ASN1_TAG_OID,
ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_PRIMITIVE, fFlags, pszErrorTag, "OID");
if (RT_SUCCESS(rc))
{
/*
* Validate and count things first.
*/
uint8_t cComponents = 0; /* gcc maybe-crap */
uint8_t cchObjId = 0; /* ditto */
rc = rtAsn1ObjId_PreParse(pCursor->pbCur, pThis->Asn1Core.cb, pCursor, pszErrorTag, &cComponents, &cchObjId);
if (RT_SUCCESS(rc))
{
/*
* Allocate memory for the components array, either out of the
* string buffer or off the heap.
*/
pThis->cComponents = cComponents;
RTAsn1CursorInitAllocation(pCursor, &pThis->Allocation);
#if 0 /** @todo breaks with arrays of ObjIds or structs containing them. They get resized and repositioned in memory, thus invalidating the pointer. Add recall-pointers callback, or just waste memory? Or maybe make all arrays pointer-arrays? */
if (cComponents * sizeof(uint32_t) <= sizeof(pThis->szObjId) - cchObjId - 1)
pThis->pauComponents = (uint32_t *)&pThis->szObjId[sizeof(pThis->szObjId) - cComponents * sizeof(uint32_t)];
else
#endif
rc = RTAsn1MemAllocZ(&pThis->Allocation, (void **)&pThis->pauComponents,
cComponents * sizeof(pThis->pauComponents[0]));
if (RT_SUCCESS(rc))
{
uint32_t *pauComponents = (uint32_t *)pThis->pauComponents;
/*
* Deal with the two first components first since they are
* encoded in a weird way to save a byte.
*/
uint8_t const *pbContent = pCursor->pbCur;
uint32_t cbContent = pThis->Asn1Core.cb;
uint32_t uValue;
rc = rtAsn1ObjId_ReadComponent(pbContent, cbContent, &uValue); AssertRC(rc);
if (RT_SUCCESS(rc))
{
pbContent += rc;
cbContent -= rc;
if (uValue < 80)
{
pauComponents[0] = uValue / 40;
pauComponents[1] = uValue % 40;
}
else
{
pauComponents[0] = 2;
pauComponents[1] = uValue - 2*40;
}
char *pszObjId = &pThis->szObjId[0];
*pszObjId++ = g_achDigits[pauComponents[0]];
size_t cbObjIdLeft = cchObjId + 1 - 1;
rc = rtAsn1ObjId_InternalFormatComponent(pauComponents[1], &pszObjId, &cbObjIdLeft); AssertRC(rc);
if (RT_SUCCESS(rc))
{
/*
* The other components are encoded in less complicated manner.
*/
for (uint32_t i = 2; i < cComponents; i++)
{
rc = rtAsn1ObjId_ReadComponent(pbContent, cbContent, &uValue);
AssertRCBreak(rc);
pbContent += rc;
cbContent -= rc;
pauComponents[i] = uValue;
rc = rtAsn1ObjId_InternalFormatComponent(uValue, &pszObjId, &cbObjIdLeft);
AssertRCBreak(rc);
}
if (RT_SUCCESS(rc))
{
Assert(cbObjIdLeft == 1);
*pszObjId = '\0';
RTAsn1CursorSkip(pCursor, pThis->Asn1Core.cb);
pThis->Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
pThis->Asn1Core.pOps = &g_RTAsn1ObjId_Vtable;
return VINF_SUCCESS;
}
}
}
}
}
}
}
RT_ZERO(*pThis);
return rc;
}
RTDECL(int) RTAsn1BitString_DecodeAsn1Ex(PRTASN1CURSOR pCursor, uint32_t fFlags, uint32_t cMaxBits, PRTASN1BITSTRING pThis,
const char *pszErrorTag)
{
pThis->cBits = 0;
pThis->cMaxBits = cMaxBits;
pThis->uBits.pv = NULL;
pThis->pEncapsulated = NULL;
RTAsn1CursorInitAllocation(pCursor, &pThis->EncapsulatedAllocation);
int rc = RTAsn1CursorReadHdr(pCursor, &pThis->Asn1Core, pszErrorTag);
if (RT_SUCCESS(rc))
{
rc = RTAsn1CursorMatchTagClassFlagsString(pCursor, &pThis->Asn1Core, ASN1_TAG_BIT_STRING,
ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_PRIMITIVE,
fFlags, pszErrorTag, "BIT STRING");
if (RT_SUCCESS(rc))
{
if (!(pThis->Asn1Core.fClass & ASN1_TAGFLAG_CONSTRUCTED))
{
if ( ( cMaxBits == UINT32_MAX
|| RT_ALIGN(cMaxBits, 8) / 8 + 1 >= pThis->Asn1Core.cb)
&& pThis->Asn1Core.cb > 0)
{
uint8_t cUnusedBits = pThis->Asn1Core.cb > 0 ? *pThis->Asn1Core.uData.pu8 : 0;
if (pThis->Asn1Core.cb < 2)
{
/* Not bits present. */
if (cUnusedBits == 0)
{
pThis->cBits = 0;
pThis->uBits.pv = NULL;
RTAsn1CursorSkip(pCursor, pThis->Asn1Core.cb);
pThis->Asn1Core.pOps = &g_RTAsn1BitString_Vtable;
pThis->Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
return VINF_SUCCESS;
}
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_INVALID_BITSTRING_ENCODING,
"%s: Bad unused bit count: %#x (cb=%#x)",
pszErrorTag, cUnusedBits, pThis->Asn1Core.cb);
}
else if (cUnusedBits < 8)
{
pThis->cBits = (pThis->Asn1Core.cb - 1) * 8;
pThis->cBits -= cUnusedBits;
pThis->uBits.pu8 = pThis->Asn1Core.uData.pu8 + 1;
if ( !(pCursor->fFlags & (RTASN1CURSOR_FLAGS_DER | RTASN1CURSOR_FLAGS_CER))
|| cUnusedBits == 0
|| !( pThis->uBits.pu8[pThis->Asn1Core.cb - 2] & (((uint8_t)1 << cUnusedBits) - (uint8_t)1) ) )
{
RTAsn1CursorSkip(pCursor, pThis->Asn1Core.cb);
pThis->Asn1Core.pOps = &g_RTAsn1BitString_Vtable;
pThis->Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
return VINF_SUCCESS;
}
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_INVALID_BITSTRING_ENCODING,
"%s: Unused bits shall be zero in DER/CER mode: last byte=%#x cUnused=%#x",
pszErrorTag, pThis->uBits.pu8[pThis->cBits / 8], cUnusedBits);
}
else
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_INVALID_BITSTRING_ENCODING,
"%s: Bad unused bit count: %#x (cb=%#x)",
pszErrorTag, cUnusedBits, pThis->Asn1Core.cb);
}
else
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_INVALID_BITSTRING_ENCODING,
"%s: Size mismatch: cb=%#x, expected %#x (cMaxBits=%#x)",
pszErrorTag, pThis->Asn1Core.cb, RT_ALIGN(cMaxBits, 8) / 8 + 1, cMaxBits);
}
else
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_CONSTRUCTED_STRING_NOT_IMPL,
"%s: Constructed BIT STRING not implemented.", pszErrorTag);
}
}
RT_ZERO(*pThis);
return rc;
}
RTDECL(int) RTAsn1DynType_DecodeAsn1(PRTASN1CURSOR pCursor, uint32_t fFlags, PRTASN1DYNTYPE pDynType, const char *pszErrorTag)
{
RT_ZERO(*pDynType);
Assert(!(fFlags & RTASN1CURSOR_GET_F_IMPLICIT)); RT_NOREF_PV(fFlags);
uint32_t cbSavedLeft = pCursor->cbLeft;
uint8_t const *pbSavedCur = pCursor->pbCur;
int rc = RTAsn1CursorReadHdr(pCursor, &pDynType->u.Core, pszErrorTag);
if (RT_SUCCESS(rc))
{
pDynType->enmType = RTASN1TYPE_CORE;
if (pDynType->u.Core.fClass == (ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_PRIMITIVE))
{
switch (pDynType->u.Core.uTag)
{
case ASN1_TAG_BOOLEAN:
pDynType->enmType = RTASN1TYPE_BOOLEAN;
break;
case ASN1_TAG_INTEGER:
pDynType->enmType = RTASN1TYPE_INTEGER;
break;
//case ASN1_TAG_ENUMERATED:
// pDynType->enmType = RTASN1TYPE_ENUMERATED;
// break;
//case ASN1_TAG_REAL:
// pDynType->enmType = RTASN1TYPE_REAL;
// break;
case ASN1_TAG_BIT_STRING:
pDynType->enmType = RTASN1TYPE_BIT_STRING;
break;
case ASN1_TAG_OCTET_STRING:
pDynType->enmType = RTASN1TYPE_OCTET_STRING;
break;
case ASN1_TAG_NULL:
pDynType->enmType = RTASN1TYPE_NULL;
break;
case ASN1_TAG_SEQUENCE:
RT_ZERO(*pDynType);
return RTAsn1CursorSetInfo(pCursor, VERR_ASN1_DYNTYPE_BAD_TAG, "ASN.1 SEQUENCE shall be constructed.");
case ASN1_TAG_SET:
RT_ZERO(*pDynType);
return RTAsn1CursorSetInfo(pCursor, VERR_ASN1_DYNTYPE_BAD_TAG, "ASN.1 SET shall be constructed.");
case ASN1_TAG_OID:
pDynType->enmType = RTASN1TYPE_OBJID;
break;
//case ASN1_TAG_RELATIVE_OID:
// pDynType->enmType = RTASN1TYPE_RELATIVE_OBJID;
// break;
case ASN1_TAG_UTC_TIME:
case ASN1_TAG_GENERALIZED_TIME:
pDynType->enmType = RTASN1TYPE_TIME;
break;
case ASN1_TAG_UTF8_STRING:
case ASN1_TAG_NUMERIC_STRING:
case ASN1_TAG_PRINTABLE_STRING:
case ASN1_TAG_T61_STRING:
case ASN1_TAG_VIDEOTEX_STRING:
case ASN1_TAG_IA5_STRING:
case ASN1_TAG_GRAPHIC_STRING:
case ASN1_TAG_VISIBLE_STRING:
case ASN1_TAG_UNIVERSAL_STRING:
case ASN1_TAG_GENERAL_STRING:
case ASN1_TAG_BMP_STRING:
pDynType->enmType = RTASN1TYPE_STRING;
break;
//case ASN1_TAG_CHARACTER_STRING:
// pDynType->enmType = RTASN1TYPE_CHARACTER_STRING;
// break;
default:
RT_ZERO(*pDynType);
return RTAsn1CursorSetInfo(pCursor, VERR_ASN1_DYNTYPE_TAG_NOT_IMPL,
"Primitive tag %u (%#x) not implemented.",
pDynType->u.Core.uTag, pDynType->u.Core.uTag);
}
}
else if (pDynType->u.Core.fClass == (ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_CONSTRUCTED))
switch (pDynType->u.Core.uTag)
{
case ASN1_TAG_BOOLEAN:
RT_ZERO(*pDynType);
return RTAsn1CursorSetInfo(pCursor, VERR_ASN1_DYNTYPE_BAD_TAG, "ASN.1 BOOLEAN shall be primitive.");
case ASN1_TAG_INTEGER:
RT_ZERO(*pDynType);
return RTAsn1CursorSetInfo(pCursor, VERR_ASN1_DYNTYPE_BAD_TAG, "ASN.1 BOOLEAN shall be primitive.");
case ASN1_TAG_ENUMERATED:
RT_ZERO(*pDynType);
return RTAsn1CursorSetInfo(pCursor, VERR_ASN1_DYNTYPE_BAD_TAG, "ASN.1 ENUMERATED shall be primitive.");
case ASN1_TAG_REAL:
RT_ZERO(*pDynType);
return RTAsn1CursorSetInfo(pCursor, VERR_ASN1_DYNTYPE_BAD_TAG, "ASN.1 REAL shall be primitive.");
case ASN1_TAG_BIT_STRING:
pDynType->enmType = RTASN1TYPE_BIT_STRING;
break;
case ASN1_TAG_OCTET_STRING:
pDynType->enmType = RTASN1TYPE_OCTET_STRING;
break;
case ASN1_TAG_NULL:
RT_ZERO(*pDynType);
return RTAsn1CursorSetInfo(pCursor, VERR_ASN1_DYNTYPE_BAD_TAG, "ASN.1 NULL shall be primitive.");
case ASN1_TAG_SEQUENCE:
#if 0
pDynType->enmType = RTASN1TYPE_SEQUENCE_CORE;
pDynType->u.SeqCore.Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
RTAsn1CursorSkip(pCursor, pDynType->u.Core.cb);
return VINF_SUCCESS;
#else
pDynType->enmType = RTASN1TYPE_CORE;
#endif
break;
case ASN1_TAG_SET:
#if 0
pDynType->enmType = RTASN1TYPE_SET_CORE;
pDynType->u.SeqCore.Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
RTAsn1CursorSkip(pCursor, pDynType->u.Core.cb);
return VINF_SUCCESS;
#else
pDynType->enmType = RTASN1TYPE_CORE;
#endif
break;
case ASN1_TAG_OID:
RT_ZERO(*pDynType);
return RTAsn1CursorSetInfo(pCursor, VERR_ASN1_DYNTYPE_BAD_TAG, "ASN.1 OBJECT ID shall be primitive.");
case ASN1_TAG_RELATIVE_OID:
RT_ZERO(*pDynType);
return RTAsn1CursorSetInfo(pCursor, VERR_ASN1_DYNTYPE_BAD_TAG, "ASN.1 RELATIVE OID shall be primitive.");
case ASN1_TAG_UTF8_STRING:
case ASN1_TAG_NUMERIC_STRING:
case ASN1_TAG_PRINTABLE_STRING:
case ASN1_TAG_T61_STRING:
case ASN1_TAG_VIDEOTEX_STRING:
case ASN1_TAG_IA5_STRING:
case ASN1_TAG_GRAPHIC_STRING:
case ASN1_TAG_VISIBLE_STRING:
case ASN1_TAG_UNIVERSAL_STRING:
case ASN1_TAG_GENERAL_STRING:
case ASN1_TAG_BMP_STRING:
pDynType->enmType = RTASN1TYPE_STRING;
break;
//case ASN1_TAG_CHARACTER_STRING:
// pDynType->enmType = RTASN1TYPE_CHARACTER_STRING;
// break;
default:
RT_ZERO(*pDynType);
return RTAsn1CursorSetInfo(pCursor, VERR_ASN1_DYNTYPE_TAG_NOT_IMPL,
"Constructed tag %u (%#x) not implemented.",
pDynType->u.Core.uTag, pDynType->u.Core.uTag);
}
else
{
RTAsn1CursorSkip(pCursor, pDynType->u.Core.cb);
return VINF_SUCCESS;
}
/*
* Restore the cursor and redo with specific type.
*/
pCursor->pbCur = pbSavedCur;
pCursor->cbLeft = cbSavedLeft;
switch (pDynType->enmType)
{
case RTASN1TYPE_INTEGER:
rc = RTAsn1Integer_DecodeAsn1(pCursor, 0, &pDynType->u.Integer, pszErrorTag);
break;
case RTASN1TYPE_BOOLEAN:
rc = RTAsn1Boolean_DecodeAsn1(pCursor, 0, &pDynType->u.Boolean, pszErrorTag);
break;
case RTASN1TYPE_OBJID:
rc = RTAsn1ObjId_DecodeAsn1(pCursor, 0, &pDynType->u.ObjId, pszErrorTag);
break;
case RTASN1TYPE_BIT_STRING:
rc = RTAsn1BitString_DecodeAsn1(pCursor, 0, &pDynType->u.BitString, pszErrorTag);
break;
case RTASN1TYPE_OCTET_STRING:
rc = RTAsn1OctetString_DecodeAsn1(pCursor, 0, &pDynType->u.OctetString, pszErrorTag);
break;
case RTASN1TYPE_NULL:
rc = RTAsn1Null_DecodeAsn1(pCursor, 0, &pDynType->u.Asn1Null, pszErrorTag);
break;
case RTASN1TYPE_TIME:
rc = RTAsn1Time_DecodeAsn1(pCursor, 0, &pDynType->u.Time, pszErrorTag);
break;
case RTASN1TYPE_STRING:
rc = RTAsn1String_DecodeAsn1(pCursor, 0, &pDynType->u.String, pszErrorTag);
break;
case RTASN1TYPE_CORE:
rc = RTAsn1Core_DecodeAsn1(pCursor, 0, &pDynType->u.Core, pszErrorTag);
break;
default:
AssertFailedReturn(VERR_INTERNAL_ERROR_4);
}
if (RT_SUCCESS(rc))
return rc;
}
RT_ZERO(*pDynType);
return rc;
}
RTDECL(int) RTAsn1String_DecodeAsn1(PRTASN1CURSOR pCursor, uint32_t fFlags, PRTASN1STRING pThis, const char *pszErrorTag)
{
RT_ZERO(*pThis);
AssertReturn(!(fFlags & RTASN1CURSOR_GET_F_IMPLICIT), VERR_INVALID_PARAMETER);
int rc = RTAsn1CursorReadHdr(pCursor, &pThis->Asn1Core, pszErrorTag);
if (RT_SUCCESS(rc))
{
/*
* Do tag matching.
*/
switch (pThis->Asn1Core.uTag)
{
case ASN1_TAG_UTF8_STRING:
case ASN1_TAG_NUMERIC_STRING:
case ASN1_TAG_PRINTABLE_STRING:
case ASN1_TAG_T61_STRING:
case ASN1_TAG_VIDEOTEX_STRING:
case ASN1_TAG_IA5_STRING:
case ASN1_TAG_GENERALIZED_TIME:
case ASN1_TAG_GRAPHIC_STRING:
case ASN1_TAG_VISIBLE_STRING:
case ASN1_TAG_GENERAL_STRING:
case ASN1_TAG_UNIVERSAL_STRING:
case ASN1_TAG_BMP_STRING:
rc = VINF_SUCCESS;
break;
default:
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_CURSOR_TAG_MISMATCH,
"%s: Not a string object: fClass=%#x / uTag=%#x",
pszErrorTag, pThis->Asn1Core.fClass, pThis->Asn1Core.uTag);
}
if (RT_SUCCESS(rc))
{
/*
* Match flags. CER/DER makes it complicated.
*/
if (pThis->Asn1Core.fClass == (ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_PRIMITIVE))
{
/*
* Primitive strings are simple.
*/
RTAsn1CursorSkip(pCursor, pThis->Asn1Core.cb);
pThis->Asn1Core.pOps = &g_RTAsn1String_Vtable;
pThis->Asn1Core.fFlags |= RTASN1CORE_F_PRIMITE_TAG_STRUCT;
RTAsn1CursorInitAllocation(pCursor, &pThis->Allocation);
/* UTF-8 conversion is done lazily, upon request. */
return VINF_SUCCESS;
}
if (pThis->Asn1Core.fClass == (ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_CONSTRUCTED))
{
/*
* Constructed strings are not yet fully implemented.
*/
if (pCursor->fFlags & RTASN1CURSOR_FLAGS_DER)
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_CURSOR_ILLEGAL_CONSTRUCTED_STRING,
"%s: DER encoding does not allow constructed strings (cb=%#x uTag=%#x fClass=%#x)",
pszErrorTag, pThis->Asn1Core.cb, pThis->Asn1Core.uTag, pThis->Asn1Core.fClass);
else if (pCursor->fFlags & RTASN1CURSOR_FLAGS_CER)
{
if (pThis->Asn1Core.cb > 1000)
rc = VINF_SUCCESS;
else
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_CURSOR_ILLEGAL_CONSTRUCTED_STRING,
"%s: Constructed strings only allowed for >1000 byte in CER encoding: cb=%#x uTag=%#x fClass=%#x",
pszErrorTag, pThis->Asn1Core.cb,
pThis->Asn1Core.uTag, pThis->Asn1Core.fClass);
}
/** @todo implement constructed strings. */
if (RT_SUCCESS(rc))
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_CONSTRUCTED_STRING_NOT_IMPL,
"%s: Support for constructed strings is not implemented", pszErrorTag);
}
else
rc = RTAsn1CursorSetInfo(pCursor, VERR_ASN1_CURSOR_TAG_FLAG_CLASS_MISMATCH,
"%s: Not a valid string object: fClass=%#x / uTag=%#x",
pszErrorTag, pThis->Asn1Core.fClass, pThis->Asn1Core.uTag);
}
}
RT_ZERO(*pThis);
return rc;
}
