mirror of
git://source.winehq.org/git/wine.git
synced 2024-10-31 10:13:56 +00:00
a11d7b1a68
Sun Mar 1 10:45:23 1998 Andreas Mohr <100.30936@germany.net> * [loader/ne_image.c] Fixed problem with weird DLLs (NE_FFLAGS_SINGLEDATA && DGROUP = 0). * [msdos/dosmem.c] Export address for __0000H, too. * [msdos/dpmi.c] Changed MemAlloc functions to return less fragmented addresses. Sat Feb 28 18:50:12 1998 Alexandre Julliard <julliard@lrc.epfl.ch> * [scheduler/process.c] [scheduler/sysdeps.c] Don't use %fs register before threading initialization. Sat Feb 28 14:04:56 1998 Kristian Nielsen <kristian.nielsen@risoe.dk> * [configure.in] [include/acconfig.h] Autoconf macro to check for non-reentrant X libraries. * [windows/winpos.c] In SetWindowPos32(), do not cause WM_SIZE messages when the SWP_NOSIZE flag is specified. This fixes the division-by-zero in Borland C++ 4.0 "Open Project" menu item. Sat Feb 28 13:11:26 1998 James Moody <013263m@dragon.acadiau.ca> * [ole/ole2nls.c] Changed "English" values from German to English. * [files/dos_fs.c] Fixed off-by-one month bug. Fri Feb 27 22:12:01 1998 Douglas Ridgway <ridgway@winehq.com> * [windows/win.c] Fix winelib class menu loading bug. * [include/module.h] [loader/module.c] LoadModule32 should be implemented in terms of CreateProcess. * [programs/view/*] Metafile viewer sample program. * [documentation/wine.texinfo] [documentation/Makefile.in] Improvements and additions, HTML target. Fri Feb 27 04:27:48 1998 Dimitrie O. Paun <dimi@cs.toronto.edu> * [*/*] Switched to the new debug messages interface. For more information please refer to documentation/debug-msgs. Because the new scheme introduces a new semantic level, I had to manually do through about 530 dprintf_xxx! The rest of about 2400 where transformed via a script. Because of the large number of changes that I had to do, some may have not come out as nicely as I wanted them. If this is the case, please let me know. There is a lot of work left to do: -- a few hundred printf's to be converted -- about 2300 fprintf's to be converted -- about 600 FIXME's to be transformed The problem is that in the above mentioned cases, a lot of manual intervention is required because a lot of the information is missing. There are also a lot of other things to be done to the interface and so forth. I have now ideas for a at least a month worth of full time work :) I will proceed with many changes in the next few releases, so please do not start modifing things because there will be a hell of a lot of conflicts. If you have ideas that you want to integrate or you want to work on different things, please coordinate with me. Thu Feb 26 13:04:29 1998 David Lee Lambert <lamber45@egr.msu.edu> * [ole/ole2nls.c] [include/windows.h] First try at OLE date- and time-formatting functions. Wed Feb 25 11:20:35 1998 Marcus Meissner <msmeissn@cip.informatik.uni-erlangen.de> * [files/*.c] Changed dos device handling, added 'CON' devicehandling. * [graphics/ddraw.c] Bug fixes, some additions. * [if1632/builtin.c][loader/module.c][library/winestub.c] Small hack so we don't need a dummy BUILTIN_LoadModule in winestub.c. * [ole/*][relay32/ole32.spec][if1632/storage.spec] storage.dll started. winword loads documents (saving doesn't work yet, dunno why). Several ole additions, some cleanups and bugfixes. IMalloc16 implemented. * [loader/pe_image.c] Added some comments, fixed circular dll references, fixed modref ordering, fixed tls allocation. * [memory/global.c] Added validity checks before every GET_ARENA_PTR. (several functions rely on Global* return values on invalid handles, like IsTask). Implemented GlobalUnlockFree16. * [memory/virtual.c] Replaced dprintf_virtual by fprintf, so we can do 'info map' again in the debugger. Increase read linesize for Linux2.1 cases. * [misc/cpu.c][misc/registry.c] Moved cpu registry initialization to misc/cpu.c. * [multimedia/dsound.c] Enhanced, replaced GETOSPACE bufferingcheck by SETFRAGMENT. * [relay32/crtdll.spec][relay32/ntdll.spec] Replaced some ptr by respective 'str' and 'wstr' arguments for libc functions. * [scheduler/thread.c] Added some sanity checks to stackallocation, tlshandling fixed. * [tools/build.c] Fixed cdecl argumenttype order (was reversed). * [win32/ordinals.c] Implemented KERNEL_449. * [windows/dinput.c] Some fixes, needs much more work. Tomb Raider2 works with keyboard ;) Tue Feb 24 20:46:37 1998 James Juran <jrj120@psu.edu> * [windows/win.c] Fixed USER32 ordinal numbers in documentation. Sat Feb 21 12:30:38 1998 John Richardson <jrichard@zko.dec.com> * [files/file.c] [include/k32obj.h] [memory/virtual.c] [scheduler/critsection.c] [scheduler/event.c] [scheduler/handle.c] [scheduler/k32obj.c] [scheduler/mutex.c] [scheduler/process.c] [scheduler/semaphore.c] [scheduler/thread.c] Added generic k32obj read and write routines for k32objs that support I/O. * [documentation/console] Updated console docs. * [win32/console.c] Make console work like a k32obj that supports I/O. * [include/windows.h] Make WriteFile and ReadFile take HANDLE32 for handle. Sun Feb 15 14:07:07 1998 Dimitrie O. Paun <dimi@mail.cs.toronto.edu> * [controls/menu.c] [misc/ver.c] [multimedia/dsound.c] [multimedia/joystick.c] [windows/dialog.c] Modified some dprintf_xxx's to prepare them for a new dprintf_ scheme. Basically, I changed the dprintf's that outputed a line with many dprintf calls to do just one dprintf call.
384 lines
11 KiB
C
384 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 "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;
|
|
}
|