void DisassembleToken(IMetaDataImport *i,
DWORD token)
{
HRESULT hr;
switch (TypeFromToken(token))
{
default:
printf("<unknown token type %08x>", TypeFromToken(token));
break;
case mdtTypeDef:
{
ULONG cLen;
WCHAR szName[50];
hr = i->GetTypeDefProps(token, szName, 49, &cLen, NULL, NULL);
if (FAILED(hr))
StringCchCopyW(szName, COUNTOF(szName), L"<unknown type def>");
printf("%S", szName);
}
break;
case mdtTypeRef:
{
ULONG cLen;
WCHAR szName[50];
hr = i->GetTypeRefProps(token, NULL, szName, 49, &cLen);
if (FAILED(hr))
StringCchCopyW(szName, COUNTOF(szName), L"<unknown type ref>");
printf("%S", szName);
}
break;
case mdtFieldDef:
{
ULONG cLen;
WCHAR szFieldName[50];
WCHAR szClassName[50];
mdTypeDef mdClass;
hr = i->GetFieldProps(token, &mdClass, szFieldName, 49, &cLen,
NULL, NULL, NULL, NULL, NULL, NULL);
if (FAILED(hr))
StringCchCopyW(szFieldName, COUNTOF(szFieldName), L"<unknown field def>");
hr = i->GetTypeDefProps(mdClass, szClassName, 49, &cLen,
NULL, NULL);
if (FAILED(hr))
StringCchCopyW(szClassName, COUNTOF(szClassName), L"<unknown type def>");
printf("%S::%S", szClassName, szFieldName);
}
break;
case mdtMethodDef:
{
ULONG cLen;
WCHAR szFieldName[50];
WCHAR szClassName[50];
mdTypeDef mdClass;
hr = i->GetMethodProps(token, &mdClass, szFieldName, 49, &cLen,
NULL, NULL, NULL, NULL, NULL);
if (FAILED(hr))
StringCchCopyW(szFieldName, COUNTOF(szFieldName), L"<unknown method def>");
hr = i->GetTypeDefProps(mdClass, szClassName, 49, &cLen,
NULL, NULL);
if (FAILED(hr))
StringCchCopyW(szClassName, COUNTOF(szClassName), L"<unknown type def>");
printf("%S::%S", szClassName, szFieldName);
}
break;
case mdtMemberRef:
{
mdTypeRef cr = mdTypeRefNil;
LPWSTR pMemberName;
WCHAR memberName[50];
ULONG memberNameLen;
hr = i->GetMemberRefProps(token, &cr, memberName, 49,
&memberNameLen, NULL, NULL);
if (FAILED(hr))
{
pMemberName = L"<unknown member ref>";
}
else
pMemberName = memberName;
ULONG cLen;
WCHAR szName[50];
if(TypeFromToken(cr) == mdtTypeRef)
{
if (FAILED(i->GetTypeRefProps(cr, NULL, szName, 50, &cLen)))
{
StringCchCopyW(szName, COUNTOF(szName), L"<unknown type ref>");
}
}
else if(TypeFromToken(cr) == mdtTypeDef)
{
if (FAILED(i->GetTypeDefProps(cr, szName, 49, &cLen,
NULL, NULL)))
{
StringCchCopyW(szName, COUNTOF(szName), L"<unknown type def>");
}
}
else if(TypeFromToken(cr) == mdtTypeSpec)
{
IMDInternalImport *pIMDI = NULL;
if (SUCCEEDED(GetMDInternalFromImport(i, &pIMDI)))
{
CQuickBytes out;
ULONG cSig;
PCCOR_SIGNATURE sig;
if (FAILED(pIMDI->GetSigFromToken(cr, &cSig, &sig)))
{
StringCchCopyW(szName, COUNTOF(szName), L"<Invalid record>");
}
else
{
PrettyPrintType(sig, &out, pIMDI);
MultiByteToWideChar (CP_ACP, 0, asString(&out), -1, szName, 50);
}
pIMDI->Release();
}
else
{
StringCchCopyW(szName, COUNTOF(szName), L"<unknown type spec>");
}
}
else
{
StringCchCopyW(szName, COUNTOF(szName), L"<unknown type token>");
}
printf("%S::%S ", szName, pMemberName);
}
break;
}
}
//---------------------------------------------------------------------------------------
//
COR_ILMETHOD_DECODER::COR_ILMETHOD_DECODER(
COR_ILMETHOD * header,
void * pInternalImport,
DecoderStatus * wbStatus)
{
STATIC_CONTRACT_NOTHROW;
STATIC_CONTRACT_FORBID_FAULT;
// Can't put contract because of SEH
// CONTRACTL
// {
// NOTHROW;
// GC_NOTRIGGER;
// FORBID_FAULT;
// }
// CONTRACTL_END
bool fErrorInInit = false;
struct Param
{
COR_ILMETHOD_DECODER * pThis;
COR_ILMETHOD * header;
} param;
param.pThis = this;
param.header = header;
PAL_TRY(Param *, pParam, ¶m)
{
// Decode the COR header into a more convenient form
DecoderInit(pParam->pThis, pParam->header);
}
PAL_EXCEPT_FILTER(FilterAllExceptions)
{
fErrorInInit = true;
Code = 0;
SetLocalVarSigTok(0);
if (wbStatus != NULL)
{
*wbStatus = FORMAT_ERROR;
}
}
PAL_ENDTRY
if (fErrorInInit)
{
return;
}
// If there is a local variable sig, fetch it into 'LocalVarSig'
if ((GetLocalVarSigTok() != 0) && (pInternalImport != NULL))
{
IMDInternalImport * pMDI = reinterpret_cast<IMDInternalImport *>(pInternalImport);
if (wbStatus != NULL)
{
if ((!pMDI->IsValidToken(GetLocalVarSigTok())) ||
(TypeFromToken(GetLocalVarSigTok()) != mdtSignature) ||
(RidFromToken(GetLocalVarSigTok()) == 0))
{
*wbStatus = FORMAT_ERROR; // failure bad local variable signature token
return;
}
}
if (FAILED(pMDI->GetSigFromToken(GetLocalVarSigTok(), &cbLocalVarSig, &LocalVarSig)))
{
// Failure bad local variable signature token
if (wbStatus != NULL)
{
*wbStatus = FORMAT_ERROR;
}
LocalVarSig = NULL;
cbLocalVarSig = 0;
return;
}
if (wbStatus != NULL)
{
if (FAILED(validateTokenSig(GetLocalVarSigTok(), LocalVarSig, cbLocalVarSig, 0, pMDI)) ||
(*LocalVarSig != IMAGE_CEE_CS_CALLCONV_LOCAL_SIG))
{
*wbStatus = VERIFICATION_ERROR; // failure validating local variable signature
return;
}
}
}
if (wbStatus != NULL)
{
*wbStatus = SUCCESS;
}
} // COR_ILMETHOD_DECODER::COR_ILMETHOD_DECODER
