ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

- In MZ_DoLoadImage if an environment segment is specified in the 

parameter block, use that and do not inherit from the calling
  process.
- Call FreeEnvironmentStrings when the strings are no longer used.
This commit is contained in:
Rein Klazes 2005-05-05 10:32:54 +00:00 committed by Alexandre Julliard
parent 45bcdd2be1
commit 1e43a90727
1 changed files with 18 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
dlls/winedos/module.c
View File

@ -199,11 +199,11 @@ static BOOL MZ_InitMemory(void)
return TRUE; return TRUE;
} }
static BOOL MZ_DoLoadImage( HANDLE hFile, LPCSTR filename, OverlayBlock *oblk ) static BOOL MZ_DoLoadImage( HANDLE hFile, LPCSTR filename, OverlayBlock *oblk, WORD par_env_seg )
{ {
IMAGE_DOS_HEADER mz_header; IMAGE_DOS_HEADER mz_header;
DWORD image_start,image_size,min_size,max_size,avail; DWORD image_start,image_size,min_size,max_size,avail;
BYTE*psp_start,*load_start,*oldenv; BYTE*psp_start,*load_start,*oldenv = 0;
int x, old_com=0, alloc; int x, old_com=0, alloc;
SEGPTR reloc; SEGPTR reloc;
WORD env_seg, load_seg, rel_seg, oldpsp_seg; WORD env_seg, load_seg, rel_seg, oldpsp_seg;
@ -211,15 +211,19 @@ static BOOL MZ_DoLoadImage( HANDLE hFile, LPCSTR filename, OverlayBlock *oblk )
if (DOSVM_psp) { if (DOSVM_psp) {
/* DOS process already running, inherit from it */ /* DOS process already running, inherit from it */
PDB16* par_psp = (PDB16*)((DWORD)DOSVM_psp << 4); PDB16* par_psp;
alloc=0; alloc=0;
oldenv = (LPBYTE)((DWORD)par_psp->environment << 4);
oldpsp_seg = DOSVM_psp; oldpsp_seg = DOSVM_psp;
if( !par_env_seg) {
par_psp = (PDB16*)((DWORD)DOSVM_psp << 4);
oldenv = (LPBYTE)((DWORD)par_psp->environment << 4);
}
} else { } else {
/* allocate new DOS process, inheriting from Wine environment */ /* allocate new DOS process, inheriting from Wine environment */
alloc=1; alloc=1;
oldenv = GetEnvironmentStringsA();
oldpsp_seg = 0; oldpsp_seg = 0;
if( !par_env_seg)
oldenv = GetEnvironmentStringsA();
} }
SetFilePointer(hFile,0,NULL,FILE_BEGIN); SetFilePointer(hFile,0,NULL,FILE_BEGIN);
@ -261,7 +265,12 @@ static BOOL MZ_DoLoadImage( HANDLE hFile, LPCSTR filename, OverlayBlock *oblk )
load_start=(LPBYTE)((DWORD)load_seg<<4); load_start=(LPBYTE)((DWORD)load_seg<<4);
} else { } else {
/* allocate environment block */ /* allocate environment block */
if( par_env_seg)
env_seg = par_env_seg;
else
env_seg=MZ_InitEnvironment(oldenv, filename); env_seg=MZ_InitEnvironment(oldenv, filename);
if( alloc && oldenv)
FreeEnvironmentStringsA( oldenv);
/* allocate memory for the executable */ /* allocate memory for the executable */
TRACE("Allocating DOS memory (min=%ld, max=%ld)\n",min_size,max_size); TRACE("Allocating DOS memory (min=%ld, max=%ld)\n",min_size,max_size);
@ -415,7 +424,7 @@ void WINAPI wine_load_dos_exe( LPCSTR filename, LPCSTR cmdline )
} }
} }
if (MZ_DoLoadImage( hFile, filename, NULL )) if (MZ_DoLoadImage( hFile, filename, NULL, 0 ))
MZ_Launch( dos_cmdtail, dos_length ); MZ_Launch( dos_cmdtail, dos_length );
} }
@ -512,7 +521,7 @@ BOOL WINAPI MZ_Exec( CONTEXT86 *context, LPCSTR filename, BYTE func, LPVOID para
PDB16 *psp = (PDB16 *)psp_start; PDB16 *psp = (PDB16 *)psp_start;
psp->saveStack = (DWORD)MAKESEGPTR(context->SegSs, LOWORD(context->Esp)); psp->saveStack = (DWORD)MAKESEGPTR(context->SegSs, LOWORD(context->Esp));
} }
ret = MZ_DoLoadImage( hFile, filename, NULL ); ret = MZ_DoLoadImage( hFile, filename, NULL, ((ExecBlock *)paramblk)->env_seg );
if (ret) { if (ret) {
/* MZ_LoadImage created a new PSP and loaded new values into it, /* MZ_LoadImage created a new PSP and loaded new values into it,
* let's work on the new values now */ * let's work on the new values now */
@ -558,7 +567,7 @@ BOOL WINAPI MZ_Exec( CONTEXT86 *context, LPCSTR filename, BYTE func, LPVOID para
case 3: /* load overlay */ case 3: /* load overlay */
{ {
OverlayBlock *blk = (OverlayBlock *)paramblk; OverlayBlock *blk = (OverlayBlock *)paramblk;
ret = MZ_DoLoadImage( hFile, filename, blk ); ret = MZ_DoLoadImage( hFile, filename, blk, 0);
} }
break; break;
default: default: