/* * 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 */ static const DWORD page_size = 0x1000; /* we only care about x86 */ /* Pop a DWORD from the 32-bit stack */ static inline DWORD stack32_pop( CONTEXT *context ) { DWORD ret = *(DWORD *)context->Esp; context->Esp += sizeof(DWORD); return ret; } /*********************************************************************** * VxDCall (VMM.VXD.@) */ DWORD WINAPI VMM_VxDCall( DWORD service, CONTEXT *context ) { static int warned; switch ( LOWORD(service) ) { case 0x0000: /* PageReserve */ { LPVOID address; LPVOID ret; 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 * page_size); ret = VirtualAlloc ( address, npages * page_size, 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; 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 * page_size); ret = VirtualAlloc ( address, npages * page_size, MEM_COMMIT, virt_perm ); TRACE("PageCommit: Returning: %p\n", ret ); return (DWORD )ret; } case 0x0002: /* PageDecommit */ { LPVOID address; BOOL ret; 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 * page_size ); ret = VirtualFree ( address, npages * page_size, 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; 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 * page_size ); 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 * page_size, 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 */ } }