Release 980517

Sun May 17 16:23:56 1998  Uwe Bonnes <bon@elektron.ikp.physik.tu-darmstadt.de>

	* [file/profile.c]
	Fix the return value of PROFILE_GetSection

	* [misc/crtdll.c]
	Do _getdrive, fix _chdrive.

	* [misc/commdlg.c]
	First cut at ChooseColor[WA].

	* [misc/network.c]
	Do something sensible for WNetGetDirectoryType16.

Sun May 17 10:21:35 1998  Andreas Mohr <100.30936@germany.net>

	* [controls/menu.c]
	Fixed disabled sub menus with MF_BYPOSITION that were not disabled.

	* [misc/crtdll.c] [relay32/crtdll.spec] [include/winerror.h]
	Implemented fscanf, fsetpos, _access, _fpreset (thanks to Uwe Bonnes),
	and _ltoa. 

	* [loader/task.c]
	MakeProcInstance: must use CURRENT_DS if hInst == NULL.

	* [misc/shell.c]
	SHELL_GetResourceTable, InternalExtractIcon: fixed broken .ICO handling

	* [windows/winpos.c]
	DeferWindowPos: removed "same parent" requirement.
	Which doc states that this is required ?

Sat May 16 20:08:11 1998  Alexandre Julliard  <julliard@lrc.epfl.ch>

	* [loader/module.c] [loader/ne/module.c]
	More NE module cleanups.

	* [loader/task.c]
	Fixed SwitchStackBack().

Fri May 15 10:04:27 1998  Marcus Meissner <marcus@jet.franken.de>

	* [configure.in][inlcude/acconfig.h]
	Fixed broken OSS check, added check for working sigaltstack,
	fixed broken statfs checks on some linux systems.

	* [files/directory.c][loader/pe_image.c][relay32/builtin.c]
	  [loader/module.c]
	Added handling of win32 module pathnames.

	* [relay32/wnaspi32.spec]
	New file.

	* [misc/lzexpand.c]
	LZCopy auto-decompresses LZ compressed files, even if they are not
	specially flagged. Fixes some InstallShield problems.

	* [misc/registry.c]
	Some fixes for RegQueryInfoKey (reference program monkey.exe
	from Win32 SDK works now better). Probably still has faults.

Fri May 15 08:58:58 1998  Martin Boehme <boehme@informatik.mu-luebeck.de>

	* [graphics/mapping.c] [include/dc.h] [include/gdi.h] [objects/dc.c]
	Reworked the way world transformations and mapping modes are handled
	so that both of these transformations can be computed in a single
	step.

	* [graphics/painting.c] [graphics/path.c] [include/path.h]
	More GDI path support.

	* [graphics/x11drv/graphics.c]
	Fixed the return value of GRAPH_DrawArc for the zero height /
	zero width case to reflect Windows' behaviour.

	* [include/windows.h] [relay32/gdi32.spec] [objects/dc.c]
	Implemented ModifyWorldTransform and CombineTransform.

Tue May 14 18:03:46 1998  Eric Kohl <ekohl@abo.rhein-zeitung.de>

	* [controls/commctrl.c][relay32/comctl32.spec]
	  [controls/*.c][include/*.h]
	Implemented InitCommonControlsEx (dll version 4.72 compatible).
	InitCommonControls calls ImageCommonControlsEx.
	Registering code of the common controls had to be changed
	(see XXXX_Register functions).

	* [controls/status.c][include/commctrl.h][include/status.h]
	Implemented most new features and fixed the look and feel.

	* [contols/commctrl.c][include/commctrl.h][relay32/comctl32.spec]
	Implemented MenuHelp (incomplete).

	* [controls/status.c][controls/progress.c]
	Changed allocation strategy for control specific memory.

	* [controls/header.c][include/header.h][include/commctrl.h]
	First implementation of header control.

	* [windows/defwnd.c][windows/syscolors.c]
	Fixed default control colors for Win95 look.

	* [windows/nonclient.c]
	Fixed off by one error for Win95 look. Top border of child windows
	should be visible.

	* [misc/imagelist.h]
	Improved documentation and fixed some bugs.

Thu May 14 15:42:21 1998  Robert Wilhelm  <robert@physiol.med.tu-muenchen.de>

	* [relay32/crtdll.spec]
	Added hypot,j0,j1,jn and ceil.

Wed May 13 19:10:10 1998  Pascal Cuoq <pcuoq@ens-lyon.fr>

	* [controls/listbox.c]
	Item height is now exactly font height.
	Wine listboxes now behave like Windows' when they are 
	created without WS_VSCROLL but the program subsequently 
	calls ShowScrollBar or SetScrollInfo.

Wed May 13 18:33:01 1998  Ulrich Weigand <weigand@informatik.uni-erlangen.de>

	* [relay32/relay386.c]
	Restore ES also in the non-debug case.

	* [windows/event.c]
	Bugfix: Blocking TSXNextEvent could deadlock Wine.

	* [win32/process.c] [windows/message.c]
	Silly stubs for MsgWaitForMultipleObjects / PostThreadMessage
	that make some programs run better.

	* [windows/winproc.c]
	WINPROC_MapMsg32Ato16/16To32A: added WM_NOTIFY.  

        * [win32/kernel32.c]
	Added 16->32 thunking and improved 32->16 thunking functions.

	* [tools/build.c]
	Added new variant of CallFrom16 stub for use with Win95 thunks.

	* [if1632/kernel.spec] [if1632/builtin.c] [win32/kernel32.c]
	Added a few undocumented KERNEL functions.

	* [loader/ne/module.c] [loader/ne/segment.c]
	Call DllEntryPoint for 16-bit DLLs with subsystem >= 4.0.

	* [win32/kernel32.spec] [win32/wow32.spec] [win32/ordinals.c]
	Use names from the Oct 94 beta release for undoc. functions.

Wed May 13 14:18:26 1998  Matthew Becker <mbecker@glasscity.net>

	* [misc/registry.c]
	Code cleanup.

	* [misc/cpu.c]
	Commented out the registry puts temporarily.

	* [programs/regtest/*]
	New registry testing program.

Tue May 12 22:54:03 1998  Michael Mess <michael@kawo2.rwth-aachen.de>

	* [multimedia/audio.c]
	ioctl's do not commute in /dev/dsp initialization.

Tue May 12 20:11:42 1998  Karl Garrison <karlos@eznet.net>

	* [win32/console.c]
	Implemented SetConsoleTextAttribute, FillConsoleOutputCharacter.
	Improved cursor positioning.
	This allows for text colors in an xterm, rxvt, or console.

Tue May 12 17:57:52 1998  Petter Reinholdtsen <pere@td.org.uit.no>

	* [Makefile.in]
	Create prefix/{bin|lib} directories if missing during install.

Sun May 10 19:37:51 1998  Jan Willamowius <jan@janhh.shnet.org>

	* [multimedia/mmio.c]
	Have mmioSetBuffer return success (0), so Corel Draw 4
	keeps working. (IO is still unbuffered)

Wed May  6 16:57:55 1998  James Juran <jrj120@psu.edu>

        * [Makefile.in] [Make.rules.in]
	Changed "make clean" to remove `textedit` backup files (*%)

	* [controls/menu.c][graphics/x11drv/xfont.c][include/libres.h]
	  [loader/main.c][loader/ne/module.c][scheduler/synchro.c]
	  [win32/time.c][windows/winpos.c][include/windows.h]
	Fixed miscellaneous compilation warnings.

	* [misc/main.c][miscemu/main.c][include/main.h]
	Moved prototypes to new include file main.h, various cleanups.

Tue May  5 21:05:06 1998  Morten Welinder  <terra@diku.dk>

	* [misc/winsock.c]
	Don't refer to __FreeBSD__ when HAVE_STRERROR is meant.

	* [misc/debugstr.c]
	For debug_dumpstrSend, send strings to stderr.

Tue May  5 21:47:40 1998  Huw D M Davies <h.davies1@physics.oxford.ac.uk>

	* [objects/region.c]
	Fix for REGION_RegionOp() if newReg is one of the source regions.

Tue May  5 18:27:32 1998  Jim Peterson <jspeter@roanoke.infi.net>

	* [misc/main.c]
	Add '-h/-help' option and print WINE_RELEASE_INFO with usage message.

	* [misc/spy.c]
	Realign trace messages.

Tue May  5 15:46:47 1998  Donnie V. Savage <dsavage@cisco.com>

	* [graphics/ddraw.c]
	Fixed compile warnings

	* [misc/winsock.c]
	Warnings should not be errors.

Tue May  5 13:40:42 1998  Jim Peterson <jspeter@roanoke.infi.net>

	* [*/*]
	Remove many warnings through explicit casts, added #include's,
	and corrected printf formats.

Tue May  5 05:18:12 1998  Insomnia (Stea Greene) <insomnia@core.binghamton.edu>

	* [graphics/ddraw.c]
	Kept unchanged portion of old palette when changing only a few
	palette entries.  Really should only deallocate the changed cells.
	This make StarCraft work almost perfectly (sound overflows still
	cause static).

Mon May  4 15:04:57 1998  Alexander V. Lukyanov <lav@long.yar.ru>

	* [misc/lstr.c]
	FormatMessage: terminate string on %0, undo linefeed strip.
diff --git a/loader/pe_image.c b/loader/pe_image.c
index 12c962e..3d2dfbd 100644
--- a/loader/pe_image.c
+++ b/loader/pe_image.c
@@ -241,18 +241,14 @@
 	/* don't use MODULE_Load, Win32 creates new task differently */
 	res = PE_LoadLibraryEx32A( name, process, 0, 0 );
 	if (res <= (HMODULE32) 32) {
-	    char buffer[1024];
-
-	    /* Try with prepending the path of the current module */
-	    if (GetModuleFileName32A( wm->module, buffer, sizeof (buffer))) {
-	        char *p;
-
-		if (!(p = strrchr (buffer, '\\')))
-		    p = buffer;
-		strcpy (p + 1, name);
-		res = PE_LoadLibraryEx32A( buffer, process, 0, 0 );
-	    } else
-	    	ERR(win32,"cannot find the module just loaded!\n");
+	    char *p,buffer[2000];
+	    
+	    /* GetModuleFileName would use the wrong process, so don't use it */
+	    strcpy(buffer,wm->shortname);
+	    if (!(p = strrchr (buffer, '\\')))
+		p = buffer;
+	    strcpy (p + 1, name);
+	    res = PE_LoadLibraryEx32A( buffer, process, 0, 0 );
 	}
 	if (res <= (HMODULE32) 32) {
 	    WARN (module, "Module %s not found\n", name);
@@ -533,36 +529,32 @@
 /**********************************************************************
  * This maps a loaded PE dll into the address space of the specified process.
  */
-static BOOL32 PE_MapImage( HMODULE32 *phModule, PDB32 *process,
-                           OFSTRUCT *ofs, DWORD flags )
+static BOOL32 PE_MapImage( PDB32 *process,WINE_MODREF *wm, OFSTRUCT *ofs, DWORD flags )
 {
-	WINE_MODREF		*wm;
 	PE_MODREF		*pem;
 	int			i, result;
 	DWORD			load_addr;
 	IMAGE_DATA_DIRECTORY	dir;
 	char			*modname;
 	int			vma_size;
-	HMODULE32		hModule = *phModule;
+	HMODULE32		hModule = wm->module;
 
         IMAGE_SECTION_HEADER *pe_seg;
         IMAGE_DOS_HEADER *dos_header = (IMAGE_DOS_HEADER *)hModule;
         IMAGE_NT_HEADERS *nt_header = PE_HEADER(hModule);
 	
-
-	wm = (WINE_MODREF*)HeapAlloc(process->heap,HEAP_ZERO_MEMORY,
-                                    sizeof(*wm));
-	wm->type= MODULE32_PE;
 	pem 	= &(wm->binfmt.pe);
 
-	/* NOTE: fixup_imports takes care of the correct order */
-	wm->next	= process->modref_list;
-	process->modref_list = wm;
+	result = GetLongPathName32A(ofs->szPathName,NULL,0);
+	wm->longname = (char*)HeapAlloc(process->heap,0,result+1);
+	GetLongPathName32A(ofs->szPathName,wm->longname,result+1);
+
+	wm->shortname = HEAP_strdupA(process->heap,0,ofs->szPathName);
 
 	if (!(nt_header->FileHeader.Characteristics & IMAGE_FILE_DLL))
         {
 		if (process->exe_modref)
-			WARN(win32,"overwriting old exe_modref... arrgh\n");
+			FIXME(win32,"overwriting old exe_modref... arrgh\n");
 		process->exe_modref = wm;
 	}
 
@@ -577,10 +569,10 @@
 						 MEM_RESERVE | MEM_COMMIT,
 						 PAGE_EXECUTE_READWRITE );
 	}
-	/* *phModule is the module32 entry in the NE_MODULE. We need to
-	 * change it here, since it can get referenced by fixup_imports()
+	/* NOTE: this changes a value in the process modref chain, which can
+	 * be accessed independently from this function
 	 */
-	wm->module = *phModule = (HMODULE32)load_addr;
+	wm->module = (HMODULE32)load_addr;
 
 	TRACE(win32, "Load addr is really %lx, range %x\n",
                       load_addr, vma_size);
@@ -713,8 +705,6 @@
 		modname = s = ofs->szPathName;
 		while ((s=strchr(modname,'\\')))
 			modname = s+1;
-		if ((s=strchr(modname,'.')))
-			*s='\0';
 		wm->modname = HEAP_strdupA(process->heap,0,modname);
 	}
 	if(pem->pe_import)	{
@@ -760,13 +750,9 @@
 	WINE_MODREF	*wm;
 
 	if ((hModule = MODULE_FindModule32( process, name ))) {
-		
-		pModule = MODULE_GetPtr32(hModule);
 		for (wm= process->modref_list;wm;wm=wm->next)
-			if (wm->module == hModule) {
-				pModule->count++;
+			if (wm->module == hModule)
 				return hModule;
-			}
 		/* Since MODULE_FindModule32 uses the modref chain too, the
 		 * module MUST have been found above. If not, something has gone
 		 * terribly wrong.
@@ -781,31 +767,55 @@
 	if (HFILE_ERROR32==(hFile=OpenFile32(name,&ofs,OF_READ))) {
 		/* Now try the built-in even if disabled */
 		if ((hModule = BUILTIN32_LoadModule( name, TRUE, process ))) {
-			fprintf( stderr, "Warning: could not load external DLL '%s', using built-in module.\n", name );
-			return hModule;
+		    WARN( module, "Could not load external DLL '%s', using built-in module.\n", name );
+		    return hModule;
 		}
 		return 1;
 	}
+	/* will go away ... */
 	if ((hModule = MODULE_CreateDummyModule( &ofs )) < 32) {
 		_lclose32(hFile);
 		return hModule;
 	}
-	pModule		= (NE_MODULE *)GlobalLock16( hModule );
-	pModule->flags	= NE_FFLAGS_WIN32;
-	pModule->module32 = PE_LoadImage( hFile );
+	pModule         = (NE_MODULE *)GlobalLock16( hModule );
+	pModule->flags  = NE_FFLAGS_WIN32;
+	/* .. */
+
+	wm=(WINE_MODREF*)HeapAlloc(process->heap,HEAP_ZERO_MEMORY,sizeof(*wm));
+	wm->type = MODULE32_PE;
+	/* NOTE: fixup_imports takes care of the correct order */
+	wm->next = process->modref_list;
+	process->modref_list = wm;
+
+	wm->module = pModule->module32 = PE_LoadImage( hFile );
+
 	CloseHandle( hFile );
-        if (pModule->module32 < 32) 
+        if (wm->module < 32) 
         {
-            FreeLibrary32( hModule);
+	    process->modref_list = wm->next;
+	    HeapFree(process->heap,0,wm);
+	    ERR(win32,"can't load %s\n",ofs.szPathName);
             return 21; /* FIXME: probably 0 */
         }
 
 	/* (possible) recursion */
-	if (!PE_MapImage( &(pModule->module32), process, &ofs,flags)) {
-		/* FIXME: should free this module and its referenced ones */
-		return 0;
+	if (!PE_MapImage(process,wm,&ofs,flags)) {
+	    /* ERROR cleanup ... */
+	    WINE_MODREF	**xwm;
+
+	    ERR(win32,"couldn't load %s\n",ofs.szPathName);
+	    /* unlink from process modref chain */
+	    for (    xwm=&(process->modref_list);
+		     *xwm && (*xwm!=wm);
+		     xwm=&((*xwm)->next)
+	    ) /* EMPTY */;
+	    if (*xwm)
+	    	*xwm=(*xwm)->next;
+	    	
+	    return 0;
 	}
-	return pModule->module32;
+        pModule->module32 = wm->module;
+	return wm->module;
 }
 
 /*****************************************************************************
@@ -813,23 +823,30 @@
  * FIXME: this function should use PE_LoadLibraryEx32A, but currently can't
  * due to the PROCESS_Create stuff.
  */
-HINSTANCE16 PE_LoadModule( HFILE32 hFile, OFSTRUCT *ofs, LPCSTR cmd_line,
+HINSTANCE16 PE_LoadModule( LPCSTR name, LPCSTR cmd_line,
                            LPCSTR env, UINT16 show_cmd )
 {
     HMODULE16 hModule16;
     HMODULE32 hModule32;
     HINSTANCE16 hInstance;
     NE_MODULE *pModule;
+    HFILE32 hFile;
+    OFSTRUCT ofs;
     THDB *thdb = THREAD_Current();
-    
-    if ((hModule16 = MODULE_CreateDummyModule( ofs )) < 32) return hModule16;
+    PDB32 *process;
+    WINE_MODREF	*wm;
+
+    if ((hFile = OpenFile32( name, &ofs, OF_READ )) == HFILE_ERROR32)
+        return 2;  /* File not found */
+
+    if ((hModule16 = MODULE_CreateDummyModule( &ofs )) < 32) return hModule16;
     pModule = (NE_MODULE *)GlobalLock16( hModule16 );
     pModule->flags = NE_FFLAGS_WIN32;
 
     pModule->module32 = hModule32 = PE_LoadImage( hFile );
     if (hModule32 < 32) return 21;
 
-    hInstance = MODULE_CreateInstance( hModule16, NULL, (cmd_line == NULL) );
+    hInstance = NE_CreateInstance( pModule, NULL, (cmd_line == NULL) );
     if (cmd_line &&
         !(PE_HEADER(hModule32)->FileHeader.Characteristics & IMAGE_FILE_DLL))
     {
@@ -838,11 +855,21 @@
         TDB *pTask = (TDB *)GlobalLock16( pdb->task );
         thdb = pTask->thdb;
     }
-    if (!PE_MapImage( &(pModule->module32), thdb->process, ofs, 0 ))
+
+    process = thdb->process;
+
+    wm=(WINE_MODREF*)HeapAlloc(process->heap,HEAP_ZERO_MEMORY,sizeof(*wm));
+    wm->type = MODULE32_PE;
+    /* NOTE: fixup_imports takes care of the correct order */
+    wm->next = process->modref_list;
+    wm->module = hModule32;
+    process->modref_list = wm;
+    if (!PE_MapImage( process, wm, &ofs, 0 ))
     {
      	/* FIXME: should destroy the task created and free referenced stuff */
         return 0;
     }
+    pModule->module32 = wm->module;
     /* FIXME: Yuck. Is there no other good place to do that? */
     PE_InitTls( thdb );
     return hInstance;