mirror of
https://github.com/reactos/wine.git
synced 2024-11-29 22:50:43 +00:00
477 lines
18 KiB
C
477 lines
18 KiB
C
/*
|
|
* VMM VxD implementation
|
|
*
|
|
* Copyright 1998 Marcus Meissner
|
|
* Copyright 1998 Ulrich Weigand
|
|
* Copyright 1998 Patrik Stridvall
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
*/
|
|
|
|
#include "config.h"
|
|
#include "wine/port.h"
|
|
|
|
#include <stdarg.h>
|
|
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "winternl.h"
|
|
#include "wine/debug.h"
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(vxd);
|
|
|
|
/*
|
|
* VMM VxDCall service names are (mostly) taken from Stan Mitchell's
|
|
* "Inside the Windows 95 File System"
|
|
*/
|
|
|
|
#define N_VMM_SERVICE 41
|
|
|
|
static const char * const VMM_Service_Name[N_VMM_SERVICE] =
|
|
{
|
|
"PageReserve", /* 0x0000 */
|
|
"PageCommit", /* 0x0001 */
|
|
"PageDecommit", /* 0x0002 */
|
|
"PagerRegister", /* 0x0003 */
|
|
"PagerQuery", /* 0x0004 */
|
|
"HeapAllocate", /* 0x0005 */
|
|
"ContextCreate", /* 0x0006 */
|
|
"ContextDestroy", /* 0x0007 */
|
|
"PageAttach", /* 0x0008 */
|
|
"PageFlush", /* 0x0009 */
|
|
"PageFree", /* 0x000A */
|
|
"ContextSwitch", /* 0x000B */
|
|
"HeapReAllocate", /* 0x000C */
|
|
"PageModifyPermissions", /* 0x000D */
|
|
"PageQuery", /* 0x000E */
|
|
"GetCurrentContext", /* 0x000F */
|
|
"HeapFree", /* 0x0010 */
|
|
"RegOpenKey", /* 0x0011 */
|
|
"RegCreateKey", /* 0x0012 */
|
|
"RegCloseKey", /* 0x0013 */
|
|
"RegDeleteKey", /* 0x0014 */
|
|
"RegSetValue", /* 0x0015 */
|
|
"RegDeleteValue", /* 0x0016 */
|
|
"RegQueryValue", /* 0x0017 */
|
|
"RegEnumKey", /* 0x0018 */
|
|
"RegEnumValue", /* 0x0019 */
|
|
"RegQueryValueEx", /* 0x001A */
|
|
"RegSetValueEx", /* 0x001B */
|
|
"RegFlushKey", /* 0x001C */
|
|
"RegQueryInfoKey", /* 0x001D */
|
|
"GetDemandPageInfo", /* 0x001E */
|
|
"BlockOnID", /* 0x001F */
|
|
"SignalID", /* 0x0020 */
|
|
"RegLoadKey", /* 0x0021 */
|
|
"RegUnLoadKey", /* 0x0022 */
|
|
"RegSaveKey", /* 0x0023 */
|
|
"RegRemapPreDefKey", /* 0x0024 */
|
|
"PageChangePager", /* 0x0025 */
|
|
"RegQueryMultipleValues", /* 0x0026 */
|
|
"RegReplaceKey", /* 0x0027 */
|
|
"<KERNEL32.101>" /* 0x0028 -- What does this do??? */
|
|
};
|
|
|
|
/* PageReserve arena values */
|
|
#define PR_PRIVATE 0x80000400 /* anywhere in private arena */
|
|
#define PR_SHARED 0x80060000 /* anywhere in shared arena */
|
|
#define PR_SYSTEM 0x80080000 /* anywhere in system arena */
|
|
|
|
/* PageReserve flags */
|
|
#define PR_FIXED 0x00000008 /* don't move during PageReAllocate */
|
|
#define PR_4MEG 0x00000001 /* allocate on 4mb boundary */
|
|
#define PR_STATIC 0x00000010 /* see PageReserve documentation */
|
|
|
|
/* PageCommit default pager handle values */
|
|
#define PD_ZEROINIT 0x00000001 /* swappable zero-initialized pages */
|
|
#define PD_NOINIT 0x00000002 /* swappable uninitialized pages */
|
|
#define PD_FIXEDZERO 0x00000003 /* fixed zero-initialized pages */
|
|
#define PD_FIXED 0x00000004 /* fixed uninitialized pages */
|
|
|
|
/* PageCommit flags */
|
|
#define PC_FIXED 0x00000008 /* pages are permanently locked */
|
|
#define PC_LOCKED 0x00000080 /* pages are made present and locked */
|
|
#define PC_LOCKEDIFDP 0x00000100 /* pages are locked if swap via DOS */
|
|
#define PC_WRITABLE 0x00020000 /* make the pages writable */
|
|
#define PC_USER 0x00040000 /* make the pages ring 3 accessible */
|
|
#define PC_INCR 0x40000000 /* increment "pagerdata" each page */
|
|
#define PC_PRESENT 0x80000000 /* make pages initially present */
|
|
#define PC_STATIC 0x20000000 /* allow commit in PR_STATIC object */
|
|
#define PC_DIRTY 0x08000000 /* make pages initially dirty */
|
|
#define PC_CACHEDIS 0x00100000 /* Allocate uncached pages - new for WDM */
|
|
#define PC_CACHEWT 0x00080000 /* Allocate write through cache pages - new for WDM */
|
|
#define PC_PAGEFLUSH 0x00008000 /* Touch device mapped pages on alloc - new for WDM */
|
|
|
|
/* PageCommitContig additional flags */
|
|
#define PCC_ZEROINIT 0x00000001 /* zero-initialize new pages */
|
|
#define PCC_NOLIN 0x10000000 /* don't map to any linear address */
|
|
|
|
|
|
/* Pop a DWORD from the 32-bit stack */
|
|
static inline DWORD stack32_pop( CONTEXT86 *context )
|
|
{
|
|
DWORD ret = *(DWORD *)context->Esp;
|
|
context->Esp += sizeof(DWORD);
|
|
return ret;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* VxDCall (VMM.VXD.@)
|
|
*/
|
|
DWORD WINAPI VMM_VxDCall( DWORD service, CONTEXT86 *context )
|
|
{
|
|
static int warned;
|
|
|
|
switch ( LOWORD(service) )
|
|
{
|
|
case 0x0000: /* PageReserve */
|
|
{
|
|
LPVOID address;
|
|
LPVOID ret;
|
|
DWORD psize = getpagesize();
|
|
ULONG page = stack32_pop( context );
|
|
ULONG npages = stack32_pop( context );
|
|
ULONG flags = stack32_pop( context );
|
|
|
|
TRACE("PageReserve: page: %08x, npages: %08x, flags: %08x partial stub!\n",
|
|
page, npages, flags );
|
|
|
|
if ( page == PR_SYSTEM ) {
|
|
ERR("Can't reserve ring 1 memory\n");
|
|
return -1;
|
|
}
|
|
/* FIXME: This has to be handled separately for the separate
|
|
address-spaces we now have */
|
|
if ( page == PR_PRIVATE || page == PR_SHARED ) page = 0;
|
|
/* FIXME: Handle flags in some way */
|
|
address = (LPVOID )(page * psize);
|
|
ret = VirtualAlloc ( address, ( npages * psize ), MEM_RESERVE, 0 );
|
|
TRACE("PageReserve: returning: %p\n", ret );
|
|
if ( ret == NULL )
|
|
return -1;
|
|
else
|
|
return (DWORD )ret;
|
|
}
|
|
|
|
case 0x0001: /* PageCommit */
|
|
{
|
|
LPVOID address;
|
|
LPVOID ret;
|
|
DWORD virt_perm;
|
|
DWORD psize = getpagesize();
|
|
ULONG page = stack32_pop( context );
|
|
ULONG npages = stack32_pop( context );
|
|
ULONG hpd = stack32_pop( context );
|
|
ULONG pagerdata = stack32_pop( context );
|
|
ULONG flags = stack32_pop( context );
|
|
|
|
TRACE("PageCommit: page: %08x, npages: %08x, hpd: %08x pagerdata: "
|
|
"%08x, flags: %08x partial stub\n",
|
|
page, npages, hpd, pagerdata, flags );
|
|
|
|
if ( flags & PC_USER )
|
|
if ( flags & PC_WRITABLE )
|
|
virt_perm = PAGE_EXECUTE_READWRITE;
|
|
else
|
|
virt_perm = PAGE_EXECUTE_READ;
|
|
else
|
|
virt_perm = PAGE_NOACCESS;
|
|
|
|
address = (LPVOID )(page * psize);
|
|
ret = VirtualAlloc ( address, ( npages * psize ), MEM_COMMIT, virt_perm );
|
|
TRACE("PageCommit: Returning: %p\n", ret );
|
|
return (DWORD )ret;
|
|
|
|
}
|
|
|
|
case 0x0002: /* PageDecommit */
|
|
{
|
|
LPVOID address;
|
|
BOOL ret;
|
|
DWORD psize = getpagesize();
|
|
ULONG page = stack32_pop( context );
|
|
ULONG npages = stack32_pop( context );
|
|
ULONG flags = stack32_pop( context );
|
|
|
|
TRACE("PageDecommit: page: %08x, npages: %08x, flags: %08x partial stub\n",
|
|
page, npages, flags );
|
|
address = (LPVOID )( page * psize );
|
|
ret = VirtualFree ( address, ( npages * psize ), MEM_DECOMMIT );
|
|
TRACE("PageDecommit: Returning: %s\n", ret ? "TRUE" : "FALSE" );
|
|
return ret;
|
|
}
|
|
|
|
case 0x000d: /* PageModifyPermissions */
|
|
{
|
|
DWORD pg_old_perm;
|
|
DWORD pg_new_perm;
|
|
DWORD virt_old_perm;
|
|
DWORD virt_new_perm;
|
|
MEMORY_BASIC_INFORMATION mbi;
|
|
LPVOID address;
|
|
DWORD psize = getpagesize();
|
|
ULONG page = stack32_pop ( context );
|
|
ULONG npages = stack32_pop ( context );
|
|
ULONG permand = stack32_pop ( context );
|
|
ULONG permor = stack32_pop ( context );
|
|
|
|
TRACE("PageModifyPermissions %08x %08x %08x %08x partial stub\n",
|
|
page, npages, permand, permor );
|
|
address = (LPVOID )( page * psize );
|
|
|
|
VirtualQuery ( address, &mbi, sizeof ( MEMORY_BASIC_INFORMATION ));
|
|
virt_old_perm = mbi.Protect;
|
|
|
|
switch ( virt_old_perm & mbi.Protect ) {
|
|
case PAGE_READONLY:
|
|
case PAGE_EXECUTE:
|
|
case PAGE_EXECUTE_READ:
|
|
pg_old_perm = PC_USER;
|
|
break;
|
|
case PAGE_READWRITE:
|
|
case PAGE_WRITECOPY:
|
|
case PAGE_EXECUTE_READWRITE:
|
|
case PAGE_EXECUTE_WRITECOPY:
|
|
pg_old_perm = PC_USER | PC_WRITABLE;
|
|
break;
|
|
case PAGE_NOACCESS:
|
|
default:
|
|
pg_old_perm = 0;
|
|
break;
|
|
}
|
|
pg_new_perm = pg_old_perm;
|
|
pg_new_perm &= permand & ~PC_STATIC;
|
|
pg_new_perm |= permor & ~PC_STATIC;
|
|
|
|
virt_new_perm = ( virt_old_perm ) & ~0xff;
|
|
if ( pg_new_perm & PC_USER )
|
|
{
|
|
if ( pg_new_perm & PC_WRITABLE )
|
|
virt_new_perm |= PAGE_EXECUTE_READWRITE;
|
|
else
|
|
virt_new_perm |= PAGE_EXECUTE_READ;
|
|
}
|
|
|
|
if ( ! VirtualProtect ( address, ( npages * psize ), virt_new_perm, &virt_old_perm ) ) {
|
|
ERR("Can't change page permissions for %p\n", address );
|
|
return 0xffffffff;
|
|
}
|
|
TRACE("Returning: %08x\n", pg_old_perm );
|
|
return pg_old_perm;
|
|
}
|
|
|
|
case 0x000a: /* PageFree */
|
|
{
|
|
BOOL ret;
|
|
LPVOID hmem = (LPVOID) stack32_pop( context );
|
|
DWORD flags = stack32_pop( context );
|
|
|
|
TRACE("PageFree: hmem: %p, flags: %08x partial stub\n",
|
|
hmem, flags );
|
|
|
|
ret = VirtualFree ( hmem, 0, MEM_RELEASE );
|
|
TRACE("Returning: %d\n", ret );
|
|
return ret;
|
|
}
|
|
|
|
case 0x0011: /* RegOpenKey */
|
|
stack32_pop( context ); /* kkey */
|
|
stack32_pop( context ); /* lpszSubKey */
|
|
stack32_pop( context ); /* retkey */
|
|
/* return RegOpenKeyExA( hkey, lpszSubKey, 0, KEY_ALL_ACCESS, retkey ); */
|
|
if (!warned)
|
|
{
|
|
ERR( "Using the native Win95 advapi32.dll is no longer supported.\n" );
|
|
ERR( "Please configure advapi32 to builtin.\n" );
|
|
warned++;
|
|
}
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x0012: /* RegCreateKey */
|
|
stack32_pop( context ); /* hkey */
|
|
stack32_pop( context ); /* lpszSubKey */
|
|
stack32_pop( context ); /* retkey */
|
|
/* return RegCreateKeyA( hkey, lpszSubKey, retkey ); */
|
|
if (!warned)
|
|
{
|
|
ERR( "Using the native Win95 advapi32.dll is no longer supported.\n" );
|
|
ERR( "Please configure advapi32 to builtin.\n" );
|
|
warned++;
|
|
}
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x0013: /* RegCloseKey */
|
|
stack32_pop( context ); /* hkey */
|
|
/* return RegCloseKey( hkey ); */
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x0014: /* RegDeleteKey */
|
|
stack32_pop( context ); /* hkey */
|
|
stack32_pop( context ); /* lpszSubKey */
|
|
/* return RegDeleteKeyA( hkey, lpszSubKey ); */
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x0015: /* RegSetValue */
|
|
stack32_pop( context ); /* hkey */
|
|
stack32_pop( context ); /* lpszSubKey */
|
|
stack32_pop( context ); /* dwType */
|
|
stack32_pop( context ); /* lpszData */
|
|
stack32_pop( context ); /* cbData */
|
|
/* return RegSetValueA( hkey, lpszSubKey, dwType, lpszData, cbData ); */
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x0016: /* RegDeleteValue */
|
|
stack32_pop( context ); /* hkey */
|
|
stack32_pop( context ); /* lpszValue */
|
|
/* return RegDeleteValueA( hkey, lpszValue ); */
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x0017: /* RegQueryValue */
|
|
stack32_pop( context ); /* hkey */
|
|
stack32_pop( context ); /* lpszSubKey */
|
|
stack32_pop( context ); /* lpszData */
|
|
stack32_pop( context ); /* lpcbData */
|
|
/* return RegQueryValueA( hkey, lpszSubKey, lpszData, lpcbData ); */
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x0018: /* RegEnumKey */
|
|
stack32_pop( context ); /* hkey */
|
|
stack32_pop( context ); /* iSubkey */
|
|
stack32_pop( context ); /* lpszName */
|
|
stack32_pop( context ); /* lpcchName */
|
|
/* return RegEnumKeyA( hkey, iSubkey, lpszName, lpcchName ); */
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x0019: /* RegEnumValue */
|
|
stack32_pop( context ); /* hkey */
|
|
stack32_pop( context ); /* iValue */
|
|
stack32_pop( context ); /* lpszValue */
|
|
stack32_pop( context ); /* lpcchValue */
|
|
stack32_pop( context ); /* lpReserved */
|
|
stack32_pop( context ); /* lpdwType */
|
|
stack32_pop( context ); /* lpbData */
|
|
stack32_pop( context ); /* lpcbData */
|
|
/* return RegEnumValueA( hkey, iValue, lpszValue, lpcchValue, lpReserved, lpdwType, lpbData, lpcbData ); */
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x001A: /* RegQueryValueEx */
|
|
stack32_pop( context ); /* hkey */
|
|
stack32_pop( context ); /* lpszValue */
|
|
stack32_pop( context ); /* lpReserved */
|
|
stack32_pop( context ); /* lpdwType */
|
|
stack32_pop( context ); /* lpbData */
|
|
stack32_pop( context ); /* lpcbData */
|
|
/* return RegQueryValueExA( hkey, lpszValue, lpReserved, lpdwType, lpbData, lpcbData ); */
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x001B: /* RegSetValueEx */
|
|
stack32_pop( context ); /* hkey */
|
|
stack32_pop( context ); /* lpszValue */
|
|
stack32_pop( context ); /* dwReserved */
|
|
stack32_pop( context ); /* dwType */
|
|
stack32_pop( context ); /* lpbData */
|
|
stack32_pop( context ); /* cbData */
|
|
/* return RegSetValueExA( hkey, lpszValue, dwReserved, dwType, lpbData, cbData ); */
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x001C: /* RegFlushKey */
|
|
stack32_pop( context ); /* hkey */
|
|
/* return RegFlushKey( hkey ); */
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x001D: /* RegQueryInfoKey */
|
|
/* NOTE: This VxDCall takes only a subset of the parameters that the
|
|
corresponding Win32 API call does. The implementation in Win95
|
|
ADVAPI32 sets all output parameters not mentioned here to zero. */
|
|
stack32_pop( context ); /* hkey */
|
|
stack32_pop( context ); /* lpcSubKeys */
|
|
stack32_pop( context ); /* lpcchMaxSubKey */
|
|
stack32_pop( context ); /* lpcValues */
|
|
stack32_pop( context ); /* lpcchMaxValueName */
|
|
stack32_pop( context ); /* lpcchMaxValueData */
|
|
/* return RegQueryInfoKeyA( hkey, lpcSubKeys, lpcchMaxSubKey, lpcValues, lpcchMaxValueName, lpcchMaxValueData ); */
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
|
|
case 0x001e: /* GetDemandPageInfo */
|
|
{
|
|
DWORD dinfo = stack32_pop( context );
|
|
DWORD flags = stack32_pop( context );
|
|
|
|
/* GetDemandPageInfo is supposed to fill out the struct at
|
|
* "dinfo" with various low-level memory management information.
|
|
* Apps are certainly not supposed to call this, although it's
|
|
* demoed and documented by Pietrek on pages 441-443 of "Windows
|
|
* 95 System Programming Secrets" if any program needs a real
|
|
* implementation of this.
|
|
*/
|
|
|
|
FIXME("GetDemandPageInfo(%08x %08x): stub!\n", dinfo, flags);
|
|
|
|
return 0;
|
|
}
|
|
|
|
case 0x0021: /* RegLoadKey */
|
|
{
|
|
HKEY hkey = (HKEY) stack32_pop( context );
|
|
LPCSTR lpszSubKey = (LPCSTR)stack32_pop( context );
|
|
LPCSTR lpszFile = (LPCSTR)stack32_pop( context );
|
|
FIXME("RegLoadKey(%p,%s,%s): stub\n",hkey, debugstr_a(lpszSubKey), debugstr_a(lpszFile));
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
}
|
|
|
|
case 0x0022: /* RegUnLoadKey */
|
|
{
|
|
HKEY hkey = (HKEY) stack32_pop( context );
|
|
LPCSTR lpszSubKey = (LPCSTR)stack32_pop( context );
|
|
FIXME("RegUnLoadKey(%p,%s): stub\n",hkey, debugstr_a(lpszSubKey));
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
}
|
|
|
|
case 0x0023: /* RegSaveKey */
|
|
{
|
|
HKEY hkey = (HKEY) stack32_pop( context );
|
|
LPCSTR lpszFile = (LPCSTR)stack32_pop( context );
|
|
LPSECURITY_ATTRIBUTES sa = (LPSECURITY_ATTRIBUTES)stack32_pop( context );
|
|
FIXME("RegSaveKey(%p,%s,%p): stub\n",hkey, debugstr_a(lpszFile),sa);
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
}
|
|
|
|
#if 0 /* Functions are not yet implemented in misc/registry.c */
|
|
case 0x0024: /* RegRemapPreDefKey */
|
|
case 0x0026: /* RegQueryMultipleValues */
|
|
#endif
|
|
|
|
case 0x0027: /* RegReplaceKey */
|
|
{
|
|
HKEY hkey = (HKEY) stack32_pop( context );
|
|
LPCSTR lpszSubKey = (LPCSTR)stack32_pop( context );
|
|
LPCSTR lpszNewFile= (LPCSTR)stack32_pop( context );
|
|
LPCSTR lpszOldFile= (LPCSTR)stack32_pop( context );
|
|
FIXME("RegReplaceKey(%p,%s,%s,%s): stub\n", hkey, debugstr_a(lpszSubKey),
|
|
debugstr_a(lpszNewFile),debugstr_a(lpszOldFile));
|
|
return ERROR_CALL_NOT_IMPLEMENTED;
|
|
}
|
|
|
|
default:
|
|
if (LOWORD(service) < N_VMM_SERVICE)
|
|
FIXME( "Unimplemented service %s (%08x)\n",
|
|
VMM_Service_Name[LOWORD(service)], service);
|
|
else
|
|
FIXME( "Unknown service %08x\n", service);
|
|
return 0xffffffff; /* FIXME */
|
|
}
|
|
}
|