mirror of
git://source.winehq.org/git/wine.git
synced 2024-09-14 16:56:17 +00:00
0623a6f3cf
Sun Jan 18 17:05:58 1998 Alexandre Julliard <julliard@lrc.epfl.ch> * [include/stackframe.h] [tools/build.c] Some cleanups in stack frame building. * [misc/port.c] Implemented clone() wrapper for libc5 users. * [scheduler/mutex.c] [scheduler/synchro.c] Implemented abandoned mutexes. * [scheduler/process.c] [scheduler/thread.c] We now create a process and a thread structure as soon as possible during initialization. * [scheduler/thread.c] [scheduler/sysdeps.c] Moved system-specific thread handling to sysdeps.c. Fri Jan 16 10:45:15 1998 Marcus Meissner <msmeissn@cip.informatik.uni-erlangen.de> * [graphics/ddraw.c][include/ddraw.h] Surface handling enhanced. Some stuff already works ;) * [multimedia/dsound.c][include/dsound.h] Implemented using the Open Sound System. Slowly starts to work (sounds terrible for some programs). * [configure.in][multimedia/audio.c][include/config.h.in] Added check for OpenSoundSystem, fixed -lXxf86dga check. Replaced OS #ifdefs by #ifdef HAVE_OSS in mm/audio.c. * [if1632/relay.c][relay32/relay386.c] Do not print control characters for 'str' or 'wstr' args. * [misc/registry.c] "" seems to equals NULL in keynames. Replace where needed. Seems to help the win95 regedit.exe... * [win32/newfns.c] Implemented QueryPerformance* using gettimeofday(2) (should be done using the pentium timers probably). * [tools/ipcl] Removed useless open_pipe construct. Sun Jan 11 17:10:02 1998 Huw D M Davies <h.davies1@physics.oxford.ac.uk> * [objects/region.c] [include/region.h] [graphics/x11drv/clipping.c] Regions are now internal to Wine. The basis of this code is taken from the X11 distribution. GetRegionData() is implemented as is ExtCreateRegion() (without Xforms). CreatePolyPolygonRgn() should behave correctly now. * [objects/metafile.c] [graphics/metafiledrv/graphics.c] [graphics/metafiledrv/init.c] [include/metafile.h] [include/metafiledrv.h] Playback of META_CREATEREGION should now work. Implemented recording of META_CREATEREGION and META_PAINTREGION. * [graphics/x11drv/graphics.c] FillRgn() (and therefore its friends) respect logical co-ords. Wed Jan 7 01:21:45 1998 Steinar Hamre <steinarh@stud.fim.ntnu.no> * [configure.in] [include/acconfig.h] [tools/build.c] Now checking whether to use .string or .ascii. * [configure.in] [include/acconfig.h] [scheduler/critsection.c] Defining union semun if this is not available from header files. * [misc/lstr.c] Moved wine's own header files below <wctype.h> to avoid parse error on Solaris. Sun Jan 4 15:38:07 1998 Andrew Taylor <ataylor@cadvision.com> * [multimedia/mmsystem.c] [multimedia/mmio.c] Implemented mmioSendMessage and rearranged the mmio subsystem in terms of this function. Wed Dec 24 00:51:29 1997 Charles Duffy <cduffy@bigfoot.com> * [windows/clipboard.c] [relay32/user32.spec] GetPriorityClipboardFormat32 now has something other than just a stub. I have no idea if it works (can't test until SetClipboardData is finished) but HEdit likes things a lot more this way.
386 lines
11 KiB
C
386 lines
11 KiB
C
/*
|
|
* PE (Portable Execute) File Resources
|
|
*
|
|
* Copyright 1995 Thomas Sandford
|
|
* Copyright 1996 Martin von Loewis
|
|
*
|
|
* Based on the Win16 resource handling code in loader/resource.c
|
|
* Copyright 1993 Robert J. Amstadt
|
|
* Copyright 1995 Alexandre Julliard
|
|
* Copyright 1997 Marcus Meissner
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
#include <sys/types.h>
|
|
#include "wintypes.h"
|
|
#include "windows.h"
|
|
#include "pe_image.h"
|
|
#include "module.h"
|
|
#include "heap.h"
|
|
#include "task.h"
|
|
#include "process.h"
|
|
#include "libres.h"
|
|
#include "stackframe.h"
|
|
#include "neexe.h"
|
|
#include "stddebug.h"
|
|
#include "debug.h"
|
|
|
|
/**********************************************************************
|
|
* HMODULE32toPE_MODREF
|
|
*
|
|
* small helper function to get a PE_MODREF from a passed HMODULE32
|
|
*/
|
|
static PE_MODREF*
|
|
HMODULE32toPE_MODREF(HMODULE32 hmod) {
|
|
NE_MODULE *pModule;
|
|
PDB32 *pdb = PROCESS_Current();
|
|
PE_MODREF *pem;
|
|
|
|
if (!hmod) hmod = GetTaskDS(); /* FIXME: correct? */
|
|
hmod = MODULE_HANDLEtoHMODULE32( hmod );
|
|
if (!hmod) return NULL;
|
|
if (!(pModule = MODULE_GetPtr( hmod ))) return 0;
|
|
pem = pdb->modref_list;
|
|
while (pem && pem->module != hmod)
|
|
pem=pem->next;
|
|
return pem;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* GetResDirEntryW
|
|
*
|
|
* Helper function - goes down one level of PE resource tree
|
|
*
|
|
*/
|
|
LPIMAGE_RESOURCE_DIRECTORY GetResDirEntryW(LPIMAGE_RESOURCE_DIRECTORY resdirptr,
|
|
LPCWSTR name,DWORD root,
|
|
BOOL32 allowdefault)
|
|
{
|
|
int entrynum;
|
|
LPIMAGE_RESOURCE_DIRECTORY_ENTRY entryTable;
|
|
int namelen;
|
|
|
|
if (HIWORD(name)) {
|
|
if (name[0]=='#') {
|
|
char buf[10];
|
|
|
|
lstrcpynWtoA(buf,name+1,10);
|
|
return GetResDirEntryW(resdirptr,(LPCWSTR)atoi(buf),root,allowdefault);
|
|
}
|
|
entryTable = (LPIMAGE_RESOURCE_DIRECTORY_ENTRY) (
|
|
(BYTE *) resdirptr +
|
|
sizeof(IMAGE_RESOURCE_DIRECTORY));
|
|
namelen = lstrlen32W(name);
|
|
for (entrynum = 0; entrynum < resdirptr->NumberOfNamedEntries; entrynum++)
|
|
{
|
|
LPIMAGE_RESOURCE_DIR_STRING_U str =
|
|
(LPIMAGE_RESOURCE_DIR_STRING_U) (root +
|
|
entryTable[entrynum].u1.s.NameOffset);
|
|
if(namelen != str->Length)
|
|
continue;
|
|
if(lstrncmpi32W(name,str->NameString,str->Length)==0)
|
|
return (LPIMAGE_RESOURCE_DIRECTORY) (
|
|
root +
|
|
entryTable[entrynum].u2.s.OffsetToDirectory);
|
|
}
|
|
return NULL;
|
|
} else {
|
|
entryTable = (LPIMAGE_RESOURCE_DIRECTORY_ENTRY) (
|
|
(BYTE *) resdirptr +
|
|
sizeof(IMAGE_RESOURCE_DIRECTORY) +
|
|
resdirptr->NumberOfNamedEntries * sizeof(IMAGE_RESOURCE_DIRECTORY_ENTRY));
|
|
for (entrynum = 0; entrynum < resdirptr->NumberOfIdEntries; entrynum++)
|
|
if ((DWORD)entryTable[entrynum].u1.Name == (DWORD)name)
|
|
return (LPIMAGE_RESOURCE_DIRECTORY) (
|
|
root +
|
|
entryTable[entrynum].u2.s.OffsetToDirectory);
|
|
/* just use first entry if no default can be found */
|
|
if (allowdefault && !name && resdirptr->NumberOfIdEntries)
|
|
return (LPIMAGE_RESOURCE_DIRECTORY) (
|
|
root +
|
|
entryTable[0].u2.s.OffsetToDirectory);
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
/**********************************************************************
|
|
* PE_FindResourceEx32W
|
|
*/
|
|
HANDLE32 PE_FindResourceEx32W(
|
|
HINSTANCE32 hModule,LPCWSTR name,LPCWSTR type,WORD lang
|
|
) {
|
|
LPIMAGE_RESOURCE_DIRECTORY resdirptr;
|
|
DWORD root;
|
|
HANDLE32 result;
|
|
PE_MODREF *pem = HMODULE32toPE_MODREF(hModule);
|
|
|
|
if (!pem || !pem->pe_resource)
|
|
return 0;
|
|
|
|
resdirptr = pem->pe_resource;
|
|
root = (DWORD) resdirptr;
|
|
if ((resdirptr = GetResDirEntryW(resdirptr, type, root, FALSE)) == NULL)
|
|
return 0;
|
|
if ((resdirptr = GetResDirEntryW(resdirptr, name, root, FALSE)) == NULL)
|
|
return 0;
|
|
result = (HANDLE32)GetResDirEntryW(resdirptr, (LPCWSTR)(UINT32)lang, root, FALSE);
|
|
/* Try LANG_NEUTRAL, too */
|
|
if(!result)
|
|
return (HANDLE32)GetResDirEntryW(resdirptr, (LPCWSTR)0, root, TRUE);
|
|
return result;
|
|
}
|
|
|
|
|
|
/**********************************************************************
|
|
* PE_LoadResource32
|
|
*/
|
|
HANDLE32 PE_LoadResource32( HINSTANCE32 hModule, HANDLE32 hRsrc )
|
|
{
|
|
PE_MODREF *pem = HMODULE32toPE_MODREF(hModule);
|
|
|
|
if (!pem || !pem->pe_resource)
|
|
return 0;
|
|
if (!hRsrc)
|
|
return 0;
|
|
return (HANDLE32) (pem->module + ((LPIMAGE_RESOURCE_DATA_ENTRY)hRsrc)->OffsetToData);
|
|
}
|
|
|
|
|
|
/**********************************************************************
|
|
* PE_SizeofResource32
|
|
*/
|
|
DWORD PE_SizeofResource32( HINSTANCE32 hModule, HANDLE32 hRsrc )
|
|
{
|
|
/* we don't need hModule */
|
|
if (!hRsrc)
|
|
return 0;
|
|
return ((LPIMAGE_RESOURCE_DATA_ENTRY)hRsrc)->Size;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* PE_EnumResourceTypes32A
|
|
*/
|
|
BOOL32
|
|
PE_EnumResourceTypes32A(HMODULE32 hmod,ENUMRESTYPEPROC32A lpfun,LONG lparam) {
|
|
PE_MODREF *pem = HMODULE32toPE_MODREF(hmod);
|
|
int i;
|
|
LPIMAGE_RESOURCE_DIRECTORY resdir;
|
|
LPIMAGE_RESOURCE_DIRECTORY_ENTRY et;
|
|
BOOL32 ret;
|
|
HANDLE32 heap = GetProcessHeap();
|
|
|
|
if (!pem || !pem->pe_resource)
|
|
return FALSE;
|
|
|
|
resdir = (LPIMAGE_RESOURCE_DIRECTORY)pem->pe_resource;
|
|
et =(LPIMAGE_RESOURCE_DIRECTORY_ENTRY)((LPBYTE)resdir+sizeof(IMAGE_RESOURCE_DIRECTORY));
|
|
ret = FALSE;
|
|
for (i=0;i<resdir->NumberOfNamedEntries+resdir->NumberOfIdEntries;i++) {
|
|
LPSTR name;
|
|
|
|
if (HIWORD(et[i].u1.Name))
|
|
name = HEAP_strdupWtoA(heap,0,(LPWSTR)((LPBYTE)pem->pe_resource+et[i].u1.Name));
|
|
else
|
|
name = (LPSTR)et[i].u1.Name;
|
|
ret = lpfun(hmod,name,lparam);
|
|
if (HIWORD(name))
|
|
HeapFree(heap,0,name);
|
|
if (!ret)
|
|
break;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* PE_EnumResourceTypes32W
|
|
*/
|
|
BOOL32
|
|
PE_EnumResourceTypes32W(HMODULE32 hmod,ENUMRESTYPEPROC32W lpfun,LONG lparam) {
|
|
PE_MODREF *pem = HMODULE32toPE_MODREF(hmod);
|
|
int i;
|
|
LPIMAGE_RESOURCE_DIRECTORY resdir;
|
|
LPIMAGE_RESOURCE_DIRECTORY_ENTRY et;
|
|
BOOL32 ret;
|
|
|
|
if (!pem || !pem->pe_resource)
|
|
return FALSE;
|
|
|
|
resdir = (LPIMAGE_RESOURCE_DIRECTORY)pem->pe_resource;
|
|
et =(LPIMAGE_RESOURCE_DIRECTORY_ENTRY)((LPBYTE)resdir+sizeof(IMAGE_RESOURCE_DIRECTORY));
|
|
ret = FALSE;
|
|
for (i=0;i<resdir->NumberOfNamedEntries+resdir->NumberOfIdEntries;i++) {
|
|
LPWSTR type;
|
|
if (HIWORD(et[i].u1.Name))
|
|
type = (LPWSTR)((LPBYTE)pem->pe_resource+et[i].u1.Name);
|
|
else
|
|
type = (LPWSTR)et[i].u1.Name;
|
|
|
|
ret = lpfun(hmod,type,lparam);
|
|
if (!ret)
|
|
break;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* PE_EnumResourceNames32A
|
|
*/
|
|
BOOL32
|
|
PE_EnumResourceNames32A(
|
|
HMODULE32 hmod,LPCSTR type,ENUMRESNAMEPROC32A lpfun,LONG lparam
|
|
) {
|
|
PE_MODREF *pem = HMODULE32toPE_MODREF(hmod);
|
|
int i;
|
|
LPIMAGE_RESOURCE_DIRECTORY resdir;
|
|
LPIMAGE_RESOURCE_DIRECTORY_ENTRY et;
|
|
BOOL32 ret;
|
|
HANDLE32 heap = GetProcessHeap();
|
|
LPWSTR typeW;
|
|
|
|
if (!pem || !pem->pe_resource)
|
|
return FALSE;
|
|
resdir = (LPIMAGE_RESOURCE_DIRECTORY)pem->pe_resource;
|
|
if (HIWORD(type))
|
|
typeW = HEAP_strdupAtoW(heap,0,type);
|
|
else
|
|
typeW = (LPWSTR)type;
|
|
resdir = GetResDirEntryW(resdir,typeW,(DWORD)pem->pe_resource,FALSE);
|
|
if (HIWORD(typeW))
|
|
HeapFree(heap,0,typeW);
|
|
if (!resdir)
|
|
return FALSE;
|
|
et =(LPIMAGE_RESOURCE_DIRECTORY_ENTRY)((LPBYTE)resdir+sizeof(IMAGE_RESOURCE_DIRECTORY));
|
|
ret = FALSE;
|
|
for (i=0;i<resdir->NumberOfNamedEntries+resdir->NumberOfIdEntries;i++) {
|
|
LPSTR name;
|
|
|
|
if (HIWORD(et[i].u1.Name))
|
|
name = HEAP_strdupWtoA(heap,0,(LPWSTR)((LPBYTE)pem->pe_resource+et[i].u1.Name));
|
|
else
|
|
name = (LPSTR)et[i].u1.Name;
|
|
ret = lpfun(hmod,type,name,lparam);
|
|
if (HIWORD(name)) HeapFree(heap,0,name);
|
|
if (!ret)
|
|
break;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* PE_EnumResourceNames32W
|
|
*/
|
|
BOOL32
|
|
PE_EnumResourceNames32W(
|
|
HMODULE32 hmod,LPCWSTR type,ENUMRESNAMEPROC32W lpfun,LONG lparam
|
|
) {
|
|
PE_MODREF *pem = HMODULE32toPE_MODREF(hmod);
|
|
int i;
|
|
LPIMAGE_RESOURCE_DIRECTORY resdir;
|
|
LPIMAGE_RESOURCE_DIRECTORY_ENTRY et;
|
|
BOOL32 ret;
|
|
|
|
if (!pem || !pem->pe_resource)
|
|
return FALSE;
|
|
|
|
resdir = (LPIMAGE_RESOURCE_DIRECTORY)pem->pe_resource;
|
|
resdir = GetResDirEntryW(resdir,type,(DWORD)pem->pe_resource,FALSE);
|
|
if (!resdir)
|
|
return FALSE;
|
|
et =(LPIMAGE_RESOURCE_DIRECTORY_ENTRY)((LPBYTE)resdir+sizeof(IMAGE_RESOURCE_DIRECTORY));
|
|
ret = FALSE;
|
|
for (i=0;i<resdir->NumberOfNamedEntries+resdir->NumberOfIdEntries;i++) {
|
|
LPWSTR name;
|
|
if (HIWORD(et[i].u1.Name))
|
|
name = (LPWSTR)((LPBYTE)pem->pe_resource+et[i].u1.Name);
|
|
else
|
|
name = (LPWSTR)et[i].u1.Name;
|
|
ret = lpfun(hmod,type,name,lparam);
|
|
if (!ret)
|
|
break;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* PE_EnumResourceNames32A
|
|
*/
|
|
BOOL32
|
|
PE_EnumResourceLanguages32A(
|
|
HMODULE32 hmod,LPCSTR name,LPCSTR type,ENUMRESLANGPROC32A lpfun,
|
|
LONG lparam
|
|
) {
|
|
PE_MODREF *pem = HMODULE32toPE_MODREF(hmod);
|
|
int i;
|
|
LPIMAGE_RESOURCE_DIRECTORY resdir;
|
|
LPIMAGE_RESOURCE_DIRECTORY_ENTRY et;
|
|
BOOL32 ret;
|
|
HANDLE32 heap = GetProcessHeap();
|
|
LPWSTR nameW,typeW;
|
|
|
|
if (!pem || !pem->pe_resource)
|
|
return FALSE;
|
|
|
|
resdir = (LPIMAGE_RESOURCE_DIRECTORY)pem->pe_resource;
|
|
if (HIWORD(name))
|
|
nameW = HEAP_strdupAtoW(heap,0,name);
|
|
else
|
|
nameW = (LPWSTR)name;
|
|
resdir = GetResDirEntryW(resdir,nameW,(DWORD)pem->pe_resource,FALSE);
|
|
if (HIWORD(nameW))
|
|
HeapFree(heap,0,nameW);
|
|
if (!resdir)
|
|
return FALSE;
|
|
if (HIWORD(type))
|
|
typeW = HEAP_strdupAtoW(heap,0,type);
|
|
else
|
|
typeW = (LPWSTR)type;
|
|
resdir = GetResDirEntryW(resdir,typeW,(DWORD)pem->pe_resource,FALSE);
|
|
if (HIWORD(typeW))
|
|
HeapFree(heap,0,typeW);
|
|
if (!resdir)
|
|
return FALSE;
|
|
et =(LPIMAGE_RESOURCE_DIRECTORY_ENTRY)((LPBYTE)resdir+sizeof(IMAGE_RESOURCE_DIRECTORY));
|
|
ret = FALSE;
|
|
for (i=0;i<resdir->NumberOfNamedEntries+resdir->NumberOfIdEntries;i++) {
|
|
/* languages are just ids... I hopem */
|
|
ret = lpfun(hmod,name,type,et[i].u1.Id,lparam);
|
|
if (!ret)
|
|
break;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* PE_EnumResourceLanguages32W
|
|
*/
|
|
BOOL32
|
|
PE_EnumResourceLanguages32W(
|
|
HMODULE32 hmod,LPCWSTR name,LPCWSTR type,ENUMRESLANGPROC32W lpfun,
|
|
LONG lparam
|
|
) {
|
|
PE_MODREF *pem = HMODULE32toPE_MODREF(hmod);
|
|
int i;
|
|
LPIMAGE_RESOURCE_DIRECTORY resdir;
|
|
LPIMAGE_RESOURCE_DIRECTORY_ENTRY et;
|
|
BOOL32 ret;
|
|
|
|
if (!pem || !pem->pe_resource)
|
|
return FALSE;
|
|
|
|
resdir = (LPIMAGE_RESOURCE_DIRECTORY)pem->pe_resource;
|
|
resdir = GetResDirEntryW(resdir,name,(DWORD)pem->pe_resource,FALSE);
|
|
if (!resdir)
|
|
return FALSE;
|
|
resdir = GetResDirEntryW(resdir,type,(DWORD)pem->pe_resource,FALSE);
|
|
if (!resdir)
|
|
return FALSE;
|
|
et =(LPIMAGE_RESOURCE_DIRECTORY_ENTRY)((LPBYTE)resdir+sizeof(IMAGE_RESOURCE_DIRECTORY));
|
|
ret = FALSE;
|
|
for (i=0;i<resdir->NumberOfNamedEntries+resdir->NumberOfIdEntries;i++) {
|
|
ret = lpfun(hmod,name,type,et[i].u1.Id,lparam);
|
|
if (!ret)
|
|
break;
|
|
}
|
|
return ret;
|
|
}
|