/**********************************************************************
* FindResource (KERNEL.60)
*/
HRSRC16 WINAPI FindResource16( HMODULE16 hModule, LPCSTR name, LPCSTR type )
{
NE_TYPEINFO *pTypeInfo;
NE_NAMEINFO *pNameInfo;
LPBYTE pResTab;
NE_MODULE *pModule = get_module( hModule );
if (!pModule) return 0;
if (pModule->module32)
{
/* 32-bit PE module */
HRSRC hRsrc32 = FindResourceA( pModule->module32, name, type );
return MapHRsrc32To16( pModule, hRsrc32, HIWORD(type) ? 0 : LOWORD(type) );
}
TRACE("module=%04x name=%s type=%s\n", pModule->self, debugstr_a(name), debugstr_a(type) );
if (!pModule->ne_rsrctab) return 0;
type = get_res_name( type );
name = get_res_name( name );
if (HIWORD(type) || HIWORD(name))
{
DWORD id = NE_FindNameTableId( pModule, type, name );
if (id) /* found */
{
type = (LPCSTR)(ULONG_PTR)LOWORD(id);
name = (LPCSTR)(ULONG_PTR)HIWORD(id);
}
}
pResTab = (LPBYTE)pModule + pModule->ne_rsrctab;
pTypeInfo = (NE_TYPEINFO *)( pResTab + 2 );
for (;;)
{
if (!(pTypeInfo = NE_FindTypeSection( pResTab, pTypeInfo, type ))) break;
if ((pNameInfo = NE_FindResourceFromType( pResTab, pTypeInfo, name )))
{
TRACE(" Found id %p\n", name );
return (HRSRC16)( (char *)pNameInfo - (char *)pModule );
}
pTypeInfo = next_typeinfo(pTypeInfo);
}
return 0;
}
static HRSRC RES_FindResource2( HMODULE hModule, LPCSTR type,
LPCSTR name, WORD lang,
BOOL bUnicode, BOOL bRet16 )
{
HRSRC hRsrc = 0;
TRACE("(%08x, %08x%s, %08x%s, %04x, %s, %s)\n",
hModule,
(UINT)type, HIWORD(type)? (bUnicode? debugstr_w((LPWSTR)type) : debugstr_a(type)) : "",
(UINT)name, HIWORD(name)? (bUnicode? debugstr_w((LPWSTR)name) : debugstr_a(name)) : "",
lang,
bUnicode? "W" : "A",
bRet16? "NE" : "PE" );
if (!HIWORD(hModule))
{
HMODULE16 hMod16 = MapHModuleLS( hModule );
NE_MODULE *pModule = NE_GetPtr( hMod16 );
if (!pModule) return 0;
if (!pModule->module32)
{
/* 16-bit NE module */
LPSTR typeStr, nameStr;
if ( HIWORD( type ) && bUnicode )
typeStr = HEAP_strdupWtoA( GetProcessHeap(), 0, (LPCWSTR)type );
else
typeStr = (LPSTR)type;
if ( HIWORD( name ) && bUnicode )
nameStr = HEAP_strdupWtoA( GetProcessHeap(), 0, (LPCWSTR)name );
else
nameStr = (LPSTR)name;
hRsrc = NE_FindResource( pModule, nameStr, typeStr );
if ( HIWORD( type ) && bUnicode )
HeapFree( GetProcessHeap(), 0, typeStr );
if ( HIWORD( name ) && bUnicode )
HeapFree( GetProcessHeap(), 0, nameStr );
/* If we need to return 32-bit HRSRC, no conversion is necessary,
we simply use the 16-bit HRSRC as 32-bit HRSRC */
}
else
{
/* 32-bit PE module */
hRsrc = RES_FindResource2( pModule->module32, type, name, lang, bUnicode, FALSE );
/* If we need to return 16-bit HRSRC, perform conversion */
if ( bRet16 )
hRsrc = MapHRsrc32To16( pModule, hRsrc,
HIWORD( type )? 0 : LOWORD( type ) );
}
}
else
{
/* 32-bit PE module */
LPWSTR typeStr, nameStr;
if (HIWORD (type))
{
typeStr = RES_GetUnicodeName (type, bUnicode);
if (!typeStr)
return 0;
}
else
typeStr = (LPWSTR)type;
if (HIWORD (name))
{
nameStr = RES_GetUnicodeName (name, bUnicode);
if (!nameStr)
{
if (HIWORD (type))
HeapFree (GetProcessHeap (), 0, typeStr);
return 0;
}
}
else
nameStr = (LPWSTR)name;
/* Here is the real difference between FindResouce and FindResourceEx */
if(lang == MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL) ||
lang == MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT) ||
lang == MAKELANGID(LANG_NEUTRAL, SUBLANG_SYS_DEFAULT) ||
lang == MAKELANGID(LANG_NEUTRAL, 3)) /* FIXME: real name? */
hRsrc = PE_FindResourceW( hModule, nameStr, typeStr );
else
hRsrc = PE_FindResourceExW( hModule, nameStr, typeStr, lang );
if (HIWORD (type))
HeapFree (GetProcessHeap (), 0, typeStr);
if (HIWORD (name))
HeapFree (GetProcessHeap (), 0, nameStr);
}
return hRsrc;
}
