261 lines
7.1 KiB
OpenEdge ABL
261 lines
7.1 KiB
OpenEdge ABL
/*++ BUILD Version: 0001 // Increment this if a change has global effects
|
|
|
|
Copyright (c) Microsoft Corporation. All rights reserved.
|
|
|
|
Module Name:
|
|
|
|
wow64t.h
|
|
|
|
Abstract:
|
|
|
|
32-bit structure definitions for 64-bit NT.
|
|
|
|
Author:
|
|
|
|
Barry Bond (barrybo) 20-Jun-1998
|
|
|
|
Revision History:
|
|
|
|
--*/
|
|
|
|
#ifndef _WOW64T_
|
|
#define _WOW64T_
|
|
|
|
|
|
//
|
|
// Page size on x86 NT
|
|
//
|
|
#define PAGE_SIZE_X86NT 0x1000
|
|
#define PAGE_SHIFT_X86NT 12L
|
|
|
|
//
|
|
// Conver the number of native pages to sub x86-pages
|
|
//
|
|
#define Wow64GetNumberOfX86Pages(NativePages) \
|
|
(NativePages * (PAGE_SIZE >> PAGE_SHIFT_X86NT))
|
|
|
|
|
|
// The name of the 32-bit system directory, which is a child of %SystemRoot%
|
|
#define WOW64_SYSTEM_DIRECTORY "syswow64"
|
|
#define WOW64_SYSTEM_DIRECTORY_U L"syswow64"
|
|
|
|
// Length in bytes of the new system directory, not counting a
|
|
// null terminator
|
|
//
|
|
#define WOW64_SYSTEM_DIRECTORY_SIZE (sizeof(WOW64_SYSTEM_DIRECTORY)-sizeof(CHAR))
|
|
#define WOW64_SYSTEM_DIRECTORY_U_SIZE (sizeof(WOW64_SYSTEM_DIRECTORY_U)-sizeof(WCHAR))
|
|
|
|
#define WOW64_X86_TAG " (x86)"
|
|
#define WOW64_X86_TAG_U L" (x86)"
|
|
|
|
#define TYPE32(x) ULONG
|
|
#define TYPE64(x) ULONGLONG
|
|
|
|
//
|
|
// Wow64Info structure is shared between 32-bit and 64-bit modules inside a Wow64 process.
|
|
// NOTE : This structure shouldn't contain any pointer-dependent data, as
|
|
// it is viewed from 32-bit and 64-bit code.
|
|
//
|
|
typedef struct _WOW64INFO {
|
|
|
|
ULONG NativeSystemPageSize; // Page size of the native system the emulator is running on.
|
|
|
|
ULONG CpuFlags;
|
|
|
|
} WOW64INFO, *PWOW64INFO;
|
|
|
|
|
|
typedef struct _PEB_LDR_DATA32 {
|
|
ULONG Length;
|
|
BOOLEAN Initialized;
|
|
TYPE32(HANDLE) SsHandle;
|
|
LIST_ENTRY32 InLoadOrderModuleList;
|
|
LIST_ENTRY32 InMemoryOrderModuleList;
|
|
LIST_ENTRY32 InInitializationOrderModuleList;
|
|
TYPE32(PVOID) EntryInProgress;
|
|
} PEB_LDR_DATA32, *PPEB_LDR_DATA32;
|
|
|
|
typedef struct _GDI_TEB_BATCH32 {
|
|
ULONG Offset;
|
|
TYPE32(ULONG_PTR) HDC;
|
|
ULONG Buffer[GDI_BATCH_BUFFER_SIZE];
|
|
} GDI_TEB_BATCH32,*PGDI_TEB_BATCH32;
|
|
|
|
|
|
typedef struct _GDI_TEB_BATCH64 {
|
|
ULONG Offset;
|
|
TYPE64(ULONG_PTR) HDC;
|
|
ULONG Buffer[GDI_BATCH_BUFFER_SIZE];
|
|
} GDI_TEB_BATCH64,*PGDI_TEB_BATCH64;
|
|
|
|
|
|
typedef struct _Wx86ThreadState32 {
|
|
TYPE32(PULONG) CallBx86Eip;
|
|
TYPE32(PVOID) DeallocationCpu;
|
|
BOOLEAN UseKnownWx86Dll;
|
|
char OleStubInvoked;
|
|
} WX86THREAD32, *PWX86THREAD32;
|
|
|
|
typedef struct _Wx86ThreadState64 {
|
|
TYPE64(PULONG) CallBx86Eip;
|
|
TYPE64(PVOID) DeallocationCpu;
|
|
BOOLEAN UseKnownWx86Dll;
|
|
char OleStubInvoked;
|
|
} WX86THREAD64, *PWX86THREAD64;
|
|
|
|
typedef struct _CLIENT_ID32 {
|
|
TYPE32(HANDLE) UniqueProcess;
|
|
TYPE32(HANDLE) UniqueThread;
|
|
} CLIENT_ID32;
|
|
|
|
typedef CLIENT_ID32 *PCLIENT_ID32;
|
|
|
|
#if !defined(CLIENT_ID64_DEFINED)
|
|
|
|
typedef struct _CLIENT_ID64 {
|
|
TYPE64(HANDLE) UniqueProcess;
|
|
TYPE64(HANDLE) UniqueThread;
|
|
} CLIENT_ID64;
|
|
|
|
typedef CLIENT_ID64 *PCLIENT_ID64;
|
|
|
|
#define CLIENT_ID64_DEFINED
|
|
|
|
#endif
|
|
|
|
typedef ULONG GDI_HANDLE_BUFFER32[GDI_HANDLE_BUFFER_SIZE32];
|
|
typedef ULONG GDI_HANDLE_BUFFER64[GDI_HANDLE_BUFFER_SIZE64];
|
|
|
|
#define PEBTEB_BITS 32
|
|
#include "pebteb.h"
|
|
#undef PEBTEB_BITS
|
|
|
|
#define PEBTEB_BITS 64
|
|
#include "pebteb.h"
|
|
#undef PEBTEB_BITS
|
|
|
|
typedef struct _RTL_DRIVE_LETTER_CURDIR32 {
|
|
USHORT Flags;
|
|
USHORT Length;
|
|
ULONG TimeStamp;
|
|
STRING32 DosPath;
|
|
} RTL_DRIVE_LETTER_CURDIR32, *PRTL_DRIVE_LETTER_CURDIR32;
|
|
|
|
|
|
typedef struct _CURDIR32 {
|
|
UNICODE_STRING32 DosPath;
|
|
TYPE32(HANDLE) Handle;
|
|
} CURDIR32, *PCURDIR32;
|
|
|
|
|
|
|
|
typedef struct _RTL_USER_PROCESS_PARAMETERS32 {
|
|
ULONG MaximumLength;
|
|
ULONG Length;
|
|
|
|
ULONG Flags;
|
|
ULONG DebugFlags;
|
|
|
|
TYPE32(HANDLE) ConsoleHandle;
|
|
ULONG ConsoleFlags;
|
|
TYPE32(HANDLE) StandardInput;
|
|
TYPE32(HANDLE) StandardOutput;
|
|
TYPE32(HANDLE) StandardError;
|
|
|
|
CURDIR32 CurrentDirectory; // ProcessParameters
|
|
UNICODE_STRING32 DllPath; // ProcessParameters
|
|
UNICODE_STRING32 ImagePathName; // ProcessParameters
|
|
UNICODE_STRING32 CommandLine; // ProcessParameters
|
|
TYPE32(PVOID) Environment; // NtAllocateVirtualMemory
|
|
|
|
ULONG StartingX;
|
|
ULONG StartingY;
|
|
ULONG CountX;
|
|
ULONG CountY;
|
|
ULONG CountCharsX;
|
|
ULONG CountCharsY;
|
|
ULONG FillAttribute;
|
|
|
|
ULONG WindowFlags;
|
|
ULONG ShowWindowFlags;
|
|
UNICODE_STRING32 WindowTitle; // ProcessParameters
|
|
UNICODE_STRING32 DesktopInfo; // ProcessParameters
|
|
UNICODE_STRING32 ShellInfo; // ProcessParameters
|
|
UNICODE_STRING32 RuntimeData; // ProcessParameters
|
|
RTL_DRIVE_LETTER_CURDIR32 CurrentDirectores[ RTL_MAX_DRIVE_LETTERS ];
|
|
} RTL_USER_PROCESS_PARAMETERS32, *PRTL_USER_PROCESS_PARAMETERS32;
|
|
|
|
#if !defined(BUILD_WOW6432)
|
|
|
|
//
|
|
// Macros to encapsulate fields that are used to store the TEB.
|
|
// They are kernel safe since the 64BIT TEB is locked down in memory
|
|
// and cann't be moved or decommited until the thread dies.
|
|
|
|
#define WOW64_GET_TEB32(teb64) \
|
|
((PTEB32)((teb64)->NtTib.ExceptionList))
|
|
|
|
//
|
|
// Update the first qword in the 64-bit TEB. The 32-bit rdteb instruction
|
|
// reads the TEB32 pointer value directly from this field.
|
|
//
|
|
#define WOW64_SET_TEB32(teb64, teb32) \
|
|
(teb64)->NtTib.ExceptionList = (struct _EXCEPTION_REGISTRATION_RECORD *)(teb32);
|
|
|
|
|
|
#define WOW64_TEB32_POINTER_ADDRESS(teb64) \
|
|
(PVOID)&((teb64)->NtTib.ExceptionList)
|
|
|
|
|
|
#endif
|
|
|
|
//
|
|
// Thunk macros
|
|
|
|
#define UStr32ToUStr(dst, src) { (dst)->Length = (src)->Length; \
|
|
(dst)->MaximumLength = (src)->MaximumLength; \
|
|
(dst)->Buffer = (PWSTR) ((src)->Buffer); }
|
|
|
|
#define UStrToUStr32(dst, src) { (dst)->Length = (src)->Length; \
|
|
(dst)->MaximumLength = (src)->MaximumLength; \
|
|
(dst)->Buffer = (ULONG) ((src)->Buffer); }
|
|
|
|
#define NtCurrentTeb32() ((PTEB32) (NtCurrentTeb()->NtTib.ExceptionList) )
|
|
#define NtCurrentPeb32() ((PPEB32) (NtCurrentTeb32()->ProcessEnvironmentBlock) )
|
|
|
|
|
|
// This is currently defined in windows\core\w32inc\w32wow64.h:
|
|
#define NtCurrentTeb64() ((PTEB64)((PTEB32)NtCurrentTeb())->GdiBatchCount)
|
|
|
|
// This is currently defined in base\wow64\inc\wow64.h:
|
|
#define WOW64_TLS_FILESYSREDIR 8 // Used to enable/disable the filesystem
|
|
#define WOW64_TLS_WOW64INFO 10 // Used to access native system information for wow64 processes.
|
|
|
|
|
|
// These should only be called from Win32 code known to be running on Win64.
|
|
#if !_WIN64
|
|
#define Wow64EnableFilesystemRedirector() \
|
|
NtCurrentTeb64()->TlsSlots[WOW64_TLS_FILESYSREDIR] = 0;
|
|
|
|
#define Wow64DisableFilesystemRedirector(filename) \
|
|
NtCurrentTeb64()->TlsSlots[WOW64_TLS_FILESYSREDIR] = (ULONGLONG)(ULONG)filename;
|
|
|
|
//
|
|
// Wow64Info is accessed only from compiled code for x86 on win64.
|
|
// NOTE: Only Wow64 processes are allowed to call these macros.
|
|
//
|
|
|
|
#define Wow64GetSharedInfo() ((PWOW64INFO)NtCurrentTeb64()->TlsSlots[WOW64_TLS_WOW64INFO])
|
|
|
|
#define Wow64GetSystemNativePageSize() \
|
|
((PWOW64INFO)(NtCurrentTeb64()->TlsSlots[WOW64_TLS_WOW64INFO]))->NativeSystemPageSize
|
|
|
|
#else
|
|
|
|
#define Wow64GetSharedInfo() ((PWOW64INFO)NtCurrentTeb()->TlsSlots[WOW64_TLS_WOW64INFO])
|
|
|
|
#endif
|
|
|
|
|
|
#endif // _WOW64T_
|