oleaut32: Use the typelib debug channel for debug messages output during loading of SLTG typelibs.
This commit is contained in:
parent
341f32a36d
commit
48c5a06916
|
@ -2882,7 +2882,7 @@ static HRESULT sltg_get_typelib_ref(const sltg_ref_lookup_t *table, DWORD typein
|
||||||
return S_OK;
|
return S_OK;
|
||||||
}
|
}
|
||||||
|
|
||||||
ERR("Unable to find reference\n");
|
ERR_(typelib)("Unable to find reference\n");
|
||||||
*typelib_ref = -1;
|
*typelib_ref = -1;
|
||||||
return E_FAIL;
|
return E_FAIL;
|
||||||
}
|
}
|
||||||
|
@ -3007,7 +3007,7 @@ static sltg_ref_lookup_t *SLTG_DoRefs(SLTG_RefInfo *pRef, ITypeLibImpl *pTL,
|
||||||
|
|
||||||
name += SLTG_ReadStringA(name, &refname);
|
name += SLTG_ReadStringA(name, &refname);
|
||||||
if(sscanf(refname, "*\\R%x*#%x", &lib_offs, &type_num) != 2)
|
if(sscanf(refname, "*\\R%x*#%x", &lib_offs, &type_num) != 2)
|
||||||
FIXME("Can't sscanf ref\n");
|
FIXME_(typelib)("Can't sscanf ref\n");
|
||||||
if(lib_offs != 0xffff) {
|
if(lib_offs != 0xffff) {
|
||||||
TLBImpLib **import = &pTL->pImpLibs;
|
TLBImpLib **import = &pTL->pImpLibs;
|
||||||
|
|
||||||
|
@ -3029,7 +3029,7 @@ static sltg_ref_lookup_t *SLTG_DoRefs(SLTG_RefInfo *pRef, ITypeLibImpl *pTL,
|
||||||
&(*import)->wVersionMajor,
|
&(*import)->wVersionMajor,
|
||||||
&(*import)->wVersionMinor,
|
&(*import)->wVersionMinor,
|
||||||
&(*import)->lcid, fname) != 4) {
|
&(*import)->lcid, fname) != 4) {
|
||||||
FIXME("can't sscanf ref %s\n",
|
FIXME_(typelib)("can't sscanf ref %s\n",
|
||||||
pNameTable + lib_offs + 40);
|
pNameTable + lib_offs + 40);
|
||||||
}
|
}
|
||||||
len = strlen(fname);
|
len = strlen(fname);
|
||||||
|
@ -3057,7 +3057,7 @@ static sltg_ref_lookup_t *SLTG_DoRefs(SLTG_RefInfo *pRef, ITypeLibImpl *pTL,
|
||||||
typelib_ref += 4;
|
typelib_ref += 4;
|
||||||
}
|
}
|
||||||
if((BYTE)*name != SLTG_REF_MAGIC)
|
if((BYTE)*name != SLTG_REF_MAGIC)
|
||||||
FIXME("End of ref block magic = %x\n", *name);
|
FIXME_(typelib)("End of ref block magic = %x\n", *name);
|
||||||
dump_TLBRefType(pTL);
|
dump_TLBRefType(pTL);
|
||||||
return table;
|
return table;
|
||||||
}
|
}
|
||||||
|
@ -3086,7 +3086,7 @@ static char *SLTG_DoImpls(char *pBlk, ITypeInfoImpl *pTI,
|
||||||
if(info->next == 0xffff)
|
if(info->next == 0xffff)
|
||||||
break;
|
break;
|
||||||
if(OneOnly)
|
if(OneOnly)
|
||||||
FIXME("Interface inheriting more than one interface\n");
|
FIXME_(typelib)("Interface inheriting more than one interface\n");
|
||||||
info = (SLTG_ImplInfo*)(pBlk + info->next);
|
info = (SLTG_ImplInfo*)(pBlk + info->next);
|
||||||
}
|
}
|
||||||
info++; /* see comment at top of function */
|
info++; /* see comment at top of function */
|
||||||
|
@ -3170,7 +3170,7 @@ static void SLTG_DoVars(char *pBlk, char *pFirstItem, ITypeInfoImpl *pTI, unsign
|
||||||
*(INT*)(pBlk + pItem->byte_offs);
|
*(INT*)(pBlk + pItem->byte_offs);
|
||||||
break;
|
break;
|
||||||
default:
|
default:
|
||||||
FIXME("VAR_CONST unimplemented for type %d\n", (*ppVarDesc)->vardesc.elemdescVar.tdesc.vt);
|
FIXME_(typelib)("VAR_CONST unimplemented for type %d\n", (*ppVarDesc)->vardesc.elemdescVar.tdesc.vt);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
@ -3491,7 +3491,7 @@ static ITypeLib2* ITypeLib2_Constructor_SLTG(LPVOID pLib, DWORD dwTLBLength)
|
||||||
TRACE_(typelib)("\tmagic=0x%08x, file blocks = %d\n", pHeader->SLTG_magic,
|
TRACE_(typelib)("\tmagic=0x%08x, file blocks = %d\n", pHeader->SLTG_magic,
|
||||||
pHeader->nrOfFileBlks );
|
pHeader->nrOfFileBlks );
|
||||||
if (pHeader->SLTG_magic != SLTG_SIGNATURE) {
|
if (pHeader->SLTG_magic != SLTG_SIGNATURE) {
|
||||||
FIXME("Header type magic 0x%08x not supported.\n",
|
FIXME_(typelib)("Header type magic 0x%08x not supported.\n",
|
||||||
pHeader->SLTG_magic);
|
pHeader->SLTG_magic);
|
||||||
return NULL;
|
return NULL;
|
||||||
}
|
}
|
||||||
|
@ -3508,12 +3508,12 @@ static ITypeLib2* ITypeLib2_Constructor_SLTG(LPVOID pLib, DWORD dwTLBLength)
|
||||||
/* Let's see if we're still in sync */
|
/* Let's see if we're still in sync */
|
||||||
if(memcmp(pMagic->CompObj_magic, SLTG_COMPOBJ_MAGIC,
|
if(memcmp(pMagic->CompObj_magic, SLTG_COMPOBJ_MAGIC,
|
||||||
sizeof(SLTG_COMPOBJ_MAGIC))) {
|
sizeof(SLTG_COMPOBJ_MAGIC))) {
|
||||||
FIXME("CompObj magic = %s\n", pMagic->CompObj_magic);
|
FIXME_(typelib)("CompObj magic = %s\n", pMagic->CompObj_magic);
|
||||||
return NULL;
|
return NULL;
|
||||||
}
|
}
|
||||||
if(memcmp(pMagic->dir_magic, SLTG_DIR_MAGIC,
|
if(memcmp(pMagic->dir_magic, SLTG_DIR_MAGIC,
|
||||||
sizeof(SLTG_DIR_MAGIC))) {
|
sizeof(SLTG_DIR_MAGIC))) {
|
||||||
FIXME("dir magic = %s\n", pMagic->dir_magic);
|
FIXME_(typelib)("dir magic = %s\n", pMagic->dir_magic);
|
||||||
return NULL;
|
return NULL;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -3607,7 +3607,7 @@ static ITypeLib2* ITypeLib2_Constructor_SLTG(LPVOID pLib, DWORD dwTLBLength)
|
||||||
pNameTable += 0x20;
|
pNameTable += 0x20;
|
||||||
break;
|
break;
|
||||||
default:
|
default:
|
||||||
FIXME("pNameTable jump = %x\n", *(WORD*)pNameTable);
|
FIXME_(typelib)("pNameTable jump = %x\n", *(WORD*)pNameTable);
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -3615,7 +3615,7 @@ static ITypeLib2* ITypeLib2_Constructor_SLTG(LPVOID pLib, DWORD dwTLBLength)
|
||||||
|
|
||||||
pNameTable += 2;
|
pNameTable += 2;
|
||||||
|
|
||||||
TRACE("Library name is %s\n", pNameTable + pLibBlk->name);
|
TRACE_(typelib)("Library name is %s\n", pNameTable + pLibBlk->name);
|
||||||
|
|
||||||
pTypeLibImpl->Name = TLB_MultiByteToBSTR(pNameTable + pLibBlk->name);
|
pTypeLibImpl->Name = TLB_MultiByteToBSTR(pNameTable + pLibBlk->name);
|
||||||
|
|
||||||
|
@ -3637,16 +3637,17 @@ static ITypeLib2* ITypeLib2_Constructor_SLTG(LPVOID pLib, DWORD dwTLBLength)
|
||||||
|
|
||||||
if(strcmp(pBlkEntry[order].index_string + (char*)pMagic,
|
if(strcmp(pBlkEntry[order].index_string + (char*)pMagic,
|
||||||
pOtherTypeInfoBlks[i].index_name)) {
|
pOtherTypeInfoBlks[i].index_name)) {
|
||||||
FIXME("Index strings don't match\n");
|
FIXME_(typelib)("Index strings don't match\n");
|
||||||
return NULL;
|
return NULL;
|
||||||
}
|
}
|
||||||
|
|
||||||
pTIHeader = pBlk;
|
pTIHeader = pBlk;
|
||||||
if(pTIHeader->magic != SLTG_TIHEADER_MAGIC) {
|
if(pTIHeader->magic != SLTG_TIHEADER_MAGIC) {
|
||||||
FIXME("TypeInfoHeader magic = %04x\n", pTIHeader->magic);
|
FIXME_(typelib)("TypeInfoHeader magic = %04x\n", pTIHeader->magic);
|
||||||
return NULL;
|
return NULL;
|
||||||
}
|
}
|
||||||
TRACE("pTIHeader->res06 = %x, pTIHeader->res0e = %x, pTIHeader->res16 = %x, pTIHeader->res1e = %x\n",
|
TRACE_(typelib)("pTIHeader->res06 = %x, pTIHeader->res0e = %x, "
|
||||||
|
"pTIHeader->res16 = %x, pTIHeader->res1e = %x\n",
|
||||||
pTIHeader->res06, pTIHeader->res0e, pTIHeader->res16, pTIHeader->res1e);
|
pTIHeader->res06, pTIHeader->res0e, pTIHeader->res16, pTIHeader->res1e);
|
||||||
|
|
||||||
*ppTypeInfoImpl = (ITypeInfoImpl*)ITypeInfo_Constructor();
|
*ppTypeInfoImpl = (ITypeInfoImpl*)ITypeInfo_Constructor();
|
||||||
|
@ -3664,11 +3665,11 @@ static ITypeLib2* ITypeLib2_Constructor_SLTG(LPVOID pLib, DWORD dwTLBLength)
|
||||||
(pTIHeader->typeflags1 >> 3) | (pTIHeader->typeflags2 << 5);
|
(pTIHeader->typeflags1 >> 3) | (pTIHeader->typeflags2 << 5);
|
||||||
|
|
||||||
if((pTIHeader->typeflags1 & 7) != 2)
|
if((pTIHeader->typeflags1 & 7) != 2)
|
||||||
FIXME("typeflags1 = %02x\n", pTIHeader->typeflags1);
|
FIXME_(typelib)("typeflags1 = %02x\n", pTIHeader->typeflags1);
|
||||||
if(pTIHeader->typeflags3 != 2)
|
if(pTIHeader->typeflags3 != 2)
|
||||||
FIXME("typeflags3 = %02x\n", pTIHeader->typeflags3);
|
FIXME_(typelib)("typeflags3 = %02x\n", pTIHeader->typeflags3);
|
||||||
|
|
||||||
TRACE("TypeInfo %s of kind %s guid %s typeflags %04x\n",
|
TRACE_(typelib)("TypeInfo %s of kind %s guid %s typeflags %04x\n",
|
||||||
debugstr_w((*ppTypeInfoImpl)->Name),
|
debugstr_w((*ppTypeInfoImpl)->Name),
|
||||||
typekind_desc[pTIHeader->typekind],
|
typekind_desc[pTIHeader->typekind],
|
||||||
debugstr_guid(&(*ppTypeInfoImpl)->TypeAttr.guid),
|
debugstr_guid(&(*ppTypeInfoImpl)->TypeAttr.guid),
|
||||||
|
|
Loading…
Reference in New Issue