Small hack to check if we need to relocate the TLS directory or not

(some seem to need this pointer relocateable, some already do relocate it by themselves).

Small hack to check if we need to relocate the TLS directory or not
a19862fc · Marcus Meissner · Alexandre Julliard · 96075121 · a19862fc
Commit a19862fc authored Oct 13, 1999 by Marcus Meissner Committed by Alexandre Julliard Oct 13, 1999
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 1 deletion

pe_image.c loader/pe_image.c +6 -1

No files found.
--- a/loader/pe_image.c
+++ b/loader/pe_image.c
@@ -1056,7 +1056,12 @@ void PE_InitTls( void )
 		
 		if ( pem->tlsindex == -1 ) {
 			pem->tlsindex = TlsAlloc();
-			*pdir->AddressOfIndex=pem->tlsindex;   
+			if ((((DWORD)pdir->AddressOfIndex)>peh->OptionalHeader.ImageBase)
+			      &&(((DWORD)pdir->AddressOfIndex)<peh->OptionalHeader.ImageBase+peh->OptionalHeader.SizeOfImage)
+			)
+				*pdir->AddressOfIndex=pem->tlsindex;   
+			else
+				*(LPDWORD)((((char*)pdir->AddressOfIndex)+delta))=pem->tlsindex;
 		}
 		datasize= pdir->EndAddressOfRawData-pdir->StartAddressOfRawData;
 		size	= datasize + pdir->SizeOfZeroFill;