win32/device.c

   1 /*
   2  * Win32 device functions
   3  *
   4  * Copyright 1998 Marcus Meissner
   5  * Copyright 1998 Ulrich Weigand
   6  * Copyright 1998 Patrik Stridvall
   7  *
   8  */
   9
  10 #include <errno.h>
  11 #include <assert.h>
  12 #include <stdlib.h>
  13 #include <unistd.h>
  14 #include <sys/types.h>
  15 #include <sys/stat.h>
  16 #include <sys/mman.h>
  17 #include <fcntl.h>
  18 #include <string.h>
  19 #include <time.h>
  20 #include "windows.h"
  21 #include "winbase.h"
  22 #include "winerror.h"
  23 #include "file.h"
  24 #include "process.h"
  25 #include "mmsystem.h"
  26 #include "heap.h"
  27 #include "debug.h"
  28 #include "winioctl.h"
  29 #include "stackframe.h"
  30 #include "winnt.h"
  31 #include "msdos.h"
  32 #include "miscemu.h"
  33
  34 static void DEVICE_Destroy(K32OBJ *dev);
  35 const K32OBJ_OPS DEVICE_Ops =
  36 {
  37     NULL,               /* signaled */
  38     NULL,               /* satisfied */
  39     NULL,               /* add_wait */
  40     NULL,               /* remove_wait */
  41     NULL,               /* read */
  42     NULL,               /* write */
  43     DEVICE_Destroy      /* destroy */
  44 };
  45
  46 /* The device object */
  47 typedef struct
  48 {
  49     K32OBJ    header;
  50
  51     struct VxDInfo *info;
  52     char     *devname;
  53     int       mode;
  54
  55 } DEVICE_OBJECT;
  56
  57
  58 static BOOL32 DeviceIo_VTDAPI(DEVICE_OBJECT *dev, DWORD dwIoControlCode,
  59                               LPVOID lpvInBuffer, DWORD cbInBuffer,
  60                               LPVOID lpvOutBuffer, DWORD cbOutBuffer,
  61                               LPDWORD lpcbBytesReturned,
  62                               LPOVERLAPPED lpOverlapped);
  63 static BOOL32 DeviceIo_MONODEBG(DEVICE_OBJECT *dev, DWORD dwIoControlCode,
  64                               LPVOID lpvInBuffer, DWORD cbInBuffer,
  65                               LPVOID lpvOutBuffer, DWORD cbOutBuffer,
  66                               LPDWORD lpcbBytesReturned,
  67                               LPOVERLAPPED lpOverlapped);
  68
  69 static BOOL32 VxDCall_VMM( DWORD *retv, DWORD service, CONTEXT *context );
  70
  71 static BOOL32 DeviceIo_IFSMgr(DEVICE_OBJECT *dev, DWORD dwIoControlCode,
  72                               LPVOID lpvInBuffer, DWORD cbInBuffer,
  73                               LPVOID lpvOutBuffer, DWORD cbOutBuffer,
  74                               LPDWORD lpcbBytesReturned,
  75                               LPOVERLAPPED lpOverlapped);
  76
  77 static BOOL32 DeviceIo_VWin32(DEVICE_OBJECT *dev, DWORD dwIoControlCode,
  78                               LPVOID lpvInBuffer, DWORD cbInBuffer,
  79                               LPVOID lpvOutBuffer, DWORD cbOutBuffer,
  80                               LPDWORD lpcbBytesReturned,
  81                               LPOVERLAPPED lpOverlapped);
  82
  83 /*
  84  * VxD names are taken from the Win95 DDK
  85  */
  86
  87 struct VxDInfo
  88 {
  89     LPCSTR  name;
  90     WORD    id;
  91     BOOL32  (*vxdcall)(DWORD *, DWORD, CONTEXT *);
  92     BOOL32  (*deviceio)(DEVICE_OBJECT *, DWORD, LPVOID, DWORD,
  93                         LPVOID, DWORD, LPDWORD, LPOVERLAPPED);
  94 }
  95     VxDList[] =
  96 {
  97     /* Standard VxD IDs */
  98     { "VMM",      0x0001, VxDCall_VMM, NULL },
  99     { "DEBUG",    0x0002, NULL, NULL },
 100     { "VPICD",    0x0003, NULL, NULL },
 101     { "VDMAD",    0x0004, NULL, NULL },
 102     { "VTD",      0x0005, NULL, NULL },
 103     { "V86MMGR",  0x0006, NULL, NULL },
 104     { "PAGESWAP", 0x0007, NULL, NULL },
 105     { "PARITY",   0x0008, NULL, NULL },
 106     { "REBOOT",   0x0009, NULL, NULL },
 107     { "VDD",      0x000A, NULL, NULL },
 108     { "VSD",      0x000B, NULL, NULL },
 109     { "VMD",      0x000C, NULL, NULL },
 110     { "VKD",      0x000D, NULL, NULL },
 111     { "VCD",      0x000E, NULL, NULL },
 112     { "VPD",      0x000F, NULL, NULL },
 113     { "BLOCKDEV", 0x0010, NULL, NULL },
 114     { "VMCPD",    0x0011, NULL, NULL },
 115     { "EBIOS",    0x0012, NULL, NULL },
 116     { "BIOSXLAT", 0x0013, NULL, NULL },
 117     { "VNETBIOS", 0x0014, NULL, NULL },
 118     { "DOSMGR",   0x0015, NULL, NULL },
 119     { "WINLOAD",  0x0016, NULL, NULL },
 120     { "SHELL",    0x0017, NULL, NULL },
 121     { "VMPOLL",   0x0018, NULL, NULL },
 122     { "VPROD",    0x0019, NULL, NULL },
 123     { "DOSNET",   0x001A, NULL, NULL },
 124     { "VFD",      0x001B, NULL, NULL },
 125     { "VDD2",     0x001C, NULL, NULL },
 126     { "WINDEBUG", 0x001D, NULL, NULL },
 127     { "TSRLOAD",  0x001E, NULL, NULL },
 128     { "BIOSHOOK", 0x001F, NULL, NULL },
 129     { "INT13",    0x0020, NULL, NULL },
 130     { "PAGEFILE", 0x0021, NULL, NULL },
 131     { "SCSI",     0x0022, NULL, NULL },
 132     { "MCA_POS",  0x0023, NULL, NULL },
 133     { "SCSIFD",   0x0024, NULL, NULL },
 134     { "VPEND",    0x0025, NULL, NULL },
 135     { "VPOWERD",  0x0026, NULL, NULL },
 136     { "VXDLDR",   0x0027, NULL, NULL },
 137     { "NDIS",     0x0028, NULL, NULL },
 138     { "BIOS_EXT", 0x0029, NULL, NULL },
 139     { "VWIN32",   0x002A, NULL, DeviceIo_VWin32 },
 140     { "VCOMM",    0x002B, NULL, NULL },
 141     { "SPOOLER",  0x002C, NULL, NULL },
 142     { "WIN32S",   0x002D, NULL, NULL },
 143     { "DEBUGCMD", 0x002E, NULL, NULL },
 144
 145     { "VNB",      0x0031, NULL, NULL },
 146     { "SERVER",   0x0032, NULL, NULL },
 147     { "CONFIGMG", 0x0033, NULL, NULL },
 148     { "DWCFGMG",  0x0034, NULL, NULL },
 149     { "SCSIPORT", 0x0035, NULL, NULL },
 150     { "VFBACKUP", 0x0036, NULL, NULL },
 151     { "ENABLE",   0x0037, NULL, NULL },
 152     { "VCOND",    0x0038, NULL, NULL },
 153
 154     { "EFAX",     0x003A, NULL, NULL },
 155     { "DSVXD",    0x003B, NULL, NULL },
 156     { "ISAPNP",   0x003C, NULL, NULL },
 157     { "BIOS",     0x003D, NULL, NULL },
 158     { "WINSOCK",  0x003E, NULL, NULL },
 159     { "WSOCK",    0x003E, NULL, NULL },
 160     { "WSIPX",    0x003F, NULL, NULL },
 161     { "IFSMgr",   0x0040, NULL, DeviceIo_IFSMgr },
 162     { "VCDFSD",   0x0041, NULL, NULL },
 163     { "MRCI2",    0x0042, NULL, NULL },
 164     { "PCI",      0x0043, NULL, NULL },
 165     { "PELOADER", 0x0044, NULL, NULL },
 166     { "EISA",     0x0045, NULL, NULL },
 167     { "DRAGCLI",  0x0046, NULL, NULL },
 168     { "DRAGSRV",  0x0047, NULL, NULL },
 169     { "PERF",     0x0048, NULL, NULL },
 170     { "AWREDIR",  0x0049, NULL, NULL },
 171
 172     /* Far East support */
 173     { "ETEN",     0x0060, NULL, NULL },
 174     { "CHBIOS",   0x0061, NULL, NULL },
 175     { "VMSGD",    0x0062, NULL, NULL },
 176     { "VPPID",    0x0063, NULL, NULL },
 177     { "VIME",     0x0064, NULL, NULL },
 178     { "VHBIOSD",  0x0065, NULL, NULL },
 179
 180     /* Multimedia OEM IDs */
 181     { "VTDAPI",   0x0442, NULL, DeviceIo_VTDAPI },
 182
 183     /* Network Device IDs */
 184     { "VNetSup",  0x0480, NULL, NULL },
 185     { "VRedir",   0x0481, NULL, NULL },
 186     { "VBrowse",  0x0482, NULL, NULL },
 187     { "VSHARE",   0x0483, NULL, NULL },
 188     { "IFSMgr",   0x0484, NULL, NULL },
 189     { "MEMPROBE", 0x0485, NULL, NULL },
 190     { "VFAT",     0x0486, NULL, NULL },
 191     { "NWLINK",   0x0487, NULL, NULL },
 192     { "VNWLINK",  0x0487, NULL, NULL },
 193     { "NWSUP",    0x0487, NULL, NULL },
 194     { "VTDI",     0x0488, NULL, NULL },
 195     { "VIP",      0x0489, NULL, NULL },
 196     { "VTCP",     0x048A, NULL, NULL },
 197     { "VCache",   0x048B, NULL, NULL },
 198     { "VUDP",     0x048C, NULL, NULL },
 199     { "VAsync",   0x048D, NULL, NULL },
 200     { "NWREDIR",  0x048E, NULL, NULL },
 201     { "STAT80",   0x048F, NULL, NULL },
 202     { "SCSIPORT", 0x0490, NULL, NULL },
 203     { "FILESEC",  0x0491, NULL, NULL },
 204     { "NWSERVER", 0x0492, NULL, NULL },
 205     { "SECPROV",  0x0493, NULL, NULL },
 206     { "NSCL",     0x0494, NULL, NULL },
 207     { "WSTCP",    0x0495, NULL, NULL },
 208     { "NDIS2SUP", 0x0496, NULL, NULL },
 209     { "MSODISUP", 0x0497, NULL, NULL },
 210     { "Splitter", 0x0498, NULL, NULL },
 211     { "PPP",      0x0499, NULL, NULL },
 212     { "VDHCP",    0x049A, NULL, NULL },
 213     { "VNBT",     0x049B, NULL, NULL },
 214     { "LOGGER",   0x049D, NULL, NULL },
 215     { "EFILTER",  0x049E, NULL, NULL },
 216     { "FFILTER",  0x049F, NULL, NULL },
 217     { "TFILTER",  0x04A0, NULL, NULL },
 218     { "AFILTER",  0x04A1, NULL, NULL },
 219     { "IRLAMP",   0x04A2, NULL, NULL },
 220
 221     { "MONODEBG.VXD", 0x4242, NULL, DeviceIo_MONODEBG },
 222
 223     { NULL,       0,      NULL, NULL }
 224 };
 225
 226 /*
 227  * VMM VxDCall service names are (mostly) taken from Stan Mitchell's
 228  * "Inside the Windows 95 File System"
 229  */
 230
 231 #define N_VMM_SERVICE 41
 232
 233 LPCSTR VMM_Service_Name[N_VMM_SERVICE] =
 234 {
 235     "PageReserve",            /* 0x0000 */
 236     "PageCommit",             /* 0x0001 */
 237     "PageDecommit",           /* 0x0002 */
 238     "PagerRegister",          /* 0x0003 */
 239     "PagerQuery",             /* 0x0004 */
 240     "HeapAllocate",           /* 0x0005 */
 241     "ContextCreate",          /* 0x0006 */
 242     "ContextDestroy",         /* 0x0007 */
 243     "PageAttach",             /* 0x0008 */
 244     "PageFlush",              /* 0x0009 */
 245     "PageFree",               /* 0x000A */
 246     "ContextSwitch",          /* 0x000B */
 247     "HeapReAllocate",         /* 0x000C */
 248     "PageModifyPerm",         /* 0x000D */
 249     "PageQuery",              /* 0x000E */
 250     "GetCurrentContext",      /* 0x000F */
 251     "HeapFree",               /* 0x0010 */
 252     "RegOpenKey",             /* 0x0011 */
 253     "RegCreateKey",           /* 0x0012 */
 254     "RegCloseKey",            /* 0x0013 */
 255     "RegDeleteKey",           /* 0x0014 */
 256     "RegSetValue",            /* 0x0015 */
 257     "RegDeleteValue",         /* 0x0016 */
 258     "RegQueryValue",          /* 0x0017 */
 259     "RegEnumKey",             /* 0x0018 */
 260     "RegEnumValue",           /* 0x0019 */
 261     "RegQueryValueEx",        /* 0x001A */
 262     "RegSetValueEx",          /* 0x001B */
 263     "RegFlushKey",            /* 0x001C */
 264     "RegQueryInfoKey",        /* 0x001D */
 265     "GetDemandPageInfo",      /* 0x001E */
 266     "BlockOnID",              /* 0x001F */
 267     "SignalID",               /* 0x0020 */
 268     "RegLoadKey",             /* 0x0021 */
 269     "RegUnLoadKey",           /* 0x0022 */
 270     "RegSaveKey",             /* 0x0023 */
 271     "RegRemapPreDefKey",      /* 0x0024 */
 272     "PageChangePager",        /* 0x0025 */
 273     "RegQueryMultipleValues", /* 0x0026 */
 274     "RegReplaceKey",          /* 0x0027 */
 275     "<KERNEL32.101>"          /* 0x0028 -- What does this do??? */
 276 };
 277
 278 HANDLE32 DEVICE_Open(LPCSTR filename, DWORD access)
 279 {
 280         DEVICE_OBJECT *dev;
 281         HANDLE32 handle;
 282         int i;
 283
 284         dev = HeapAlloc( SystemHeap, 0, sizeof(DEVICE_OBJECT) );
 285         if (!dev) return INVALID_HANDLE_VALUE32;
 286
 287         dev->header.type = K32OBJ_DEVICE_IOCTL;
 288         dev->header.refcount = 1;
 289         dev->mode       = access;
 290         dev->devname    = HEAP_strdupA(SystemHeap,0,filename);
 291         dev->info       = NULL;
 292
 293         for (i = 0; VxDList[i].name; i++)
 294             if (!lstrcmpi32A(VxDList[i].name, filename))
 295                 break;
 296         if (VxDList[i].name)
 297             dev->info = &VxDList[i];
 298         else
 299             FIXME(win32, "Unknown VxD %s\n", filename);
 300
 301
 302         handle = HANDLE_Alloc( PROCESS_Current(), &(dev->header),
 303                                FILE_ALL_ACCESS | GENERIC_READ |
 304                                GENERIC_WRITE | GENERIC_EXECUTE /*FIXME*/, TRUE, -1 );
 305         /* If the allocation failed, the object is already destroyed */
 306         if (handle == INVALID_HANDLE_VALUE32) dev = NULL;
 307         return handle;
 308 }
 309
 310 static void DEVICE_Destroy(K32OBJ *obj)
 311 {
 312     DEVICE_OBJECT *dev = (DEVICE_OBJECT *)obj;
 313     assert( obj->type == K32OBJ_DEVICE_IOCTL );
 314
 315     if ( dev->devname )
 316     {
 317         HeapFree( SystemHeap, 0, dev->devname );
 318         dev->devname = NULL;
 319     }
 320
 321     obj->type = K32OBJ_UNKNOWN;
 322     HeapFree( SystemHeap, 0, dev );
 323 }
 324
 325 /****************************************************************************
 326  *              DeviceIoControl (KERNEL32.188)
 327  * This is one of those big ugly nasty procedure which can do
 328  * a million and one things when it comes to devices. It can also be
 329  * used for VxD communication.
 330  *
 331  * A return value of FALSE indicates that something has gone wrong which
 332  * GetLastError can decypher.
 333  */
 334 BOOL32 WINAPI DeviceIoControl(HANDLE32 hDevice, DWORD dwIoControlCode,
 335                               LPVOID lpvInBuffer, DWORD cbInBuffer,
 336                               LPVOID lpvOutBuffer, DWORD cbOutBuffer,
 337                               LPDWORD lpcbBytesReturned,
 338                               LPOVERLAPPED lpOverlapped)
 339 {
 340         DEVICE_OBJECT   *dev = (DEVICE_OBJECT *)HANDLE_GetObjPtr(
 341                 PROCESS_Current(), hDevice, K32OBJ_DEVICE_IOCTL, 0 /*FIXME*/, NULL );
 342
 343         TRACE(win32, "(%d,%ld,%p,%ld,%p,%ld,%p,%p)\n",
 344                 hDevice,dwIoControlCode,lpvInBuffer,cbInBuffer,
 345                 lpvOutBuffer,cbOutBuffer,lpcbBytesReturned,lpOverlapped
 346         );
 347
 348         if (!dev)
 349         {
 350                 SetLastError( ERROR_INVALID_PARAMETER );
 351                 return FALSE;
 352         }
 353
 354         /* Check if this is a user defined control code for a VxD */
 355         if( HIWORD( dwIoControlCode ) == 0 )
 356         {
 357                 if ( dev->info && dev->info->deviceio )
 358                 {
 359                         return dev->info->deviceio( dev, dwIoControlCode,
 360                                         lpvInBuffer, cbInBuffer,
 361                                         lpvOutBuffer, cbOutBuffer,
 362                                         lpcbBytesReturned, lpOverlapped );
 363                 }
 364                 else
 365                 {
 366                         /* FIXME: Set appropriate error */
 367                         FIXME( win32, "Unimplemented control %ld for VxD device %s\n",
 368                                           dwIoControlCode, dev->devname );
 369                 }
 370         }
 371         else
 372         {
 373                 switch( dwIoControlCode )
 374                 {
 375                 case FSCTL_DELETE_REPARSE_POINT:
 376                 case FSCTL_DISMOUNT_VOLUME:
 377                 case FSCTL_GET_COMPRESSION:
 378                 case FSCTL_GET_REPARSE_POINT:
 379                 case FSCTL_LOCK_VOLUME:
 380                 case FSCTL_QUERY_ALLOCATED_RANGES:
 381                 case FSCTL_SET_COMPRESSION:
 382                 case FSCTL_SET_REPARSE_POINT:
 383                 case FSCTL_SET_SPARSE:
 384                 case FSCTL_SET_ZERO_DATA:
 385                 case FSCTL_UNLOCK_VOLUME:
 386                 case IOCTL_DISK_CHECK_VERIFY:
 387                 case IOCTL_DISK_EJECT_MEDIA:
 388                 case IOCTL_DISK_FORMAT_TRACKS:
 389                 case IOCTL_DISK_GET_DRIVE_GEOMETRY:
 390                 case IOCTL_DISK_GET_DRIVE_LAYOUT:
 391                 case IOCTL_DISK_GET_MEDIA_TYPES:
 392                 case IOCTL_DISK_GET_PARTITION_INFO:
 393                 case IOCTL_DISK_LOAD_MEDIA:
 394                 case IOCTL_DISK_MEDIA_REMOVAL:
 395                 case IOCTL_DISK_PERFORMANCE:
 396                 case IOCTL_DISK_REASSIGN_BLOCKS:
 397                 case IOCTL_DISK_SET_DRIVE_LAYOUT:
 398                 case IOCTL_DISK_SET_PARTITION_INFO:
 399                 case IOCTL_DISK_VERIFY:
 400                 case IOCTL_SERIAL_LSRMST_INSERT:
 401                 case IOCTL_STORAGE_CHECK_VERIFY:
 402                 case IOCTL_STORAGE_EJECT_MEDIA:
 403                 case IOCTL_STORAGE_GET_MEDIA_TYPES:
 404                 case IOCTL_STORAGE_LOAD_MEDIA:
 405                 case IOCTL_STORAGE_MEDIA_REMOVAL:
 406                         FIXME( win32, "unimplemented dwIoControlCode=%08lx\n", dwIoControlCode);
 407                         SetLastError( ERROR_CALL_NOT_IMPLEMENTED );
 408                         return FALSE;
 409                         break;
 410                 default:
 411                         FIXME( win32, "ignored dwIoControlCode=%08lx\n",dwIoControlCode);
 412                         SetLastError( ERROR_CALL_NOT_IMPLEMENTED );
 413                         return FALSE;
 414                         break;
 415                 }
 416         }
 417         return FALSE;
 418 }
 419
 420 /***********************************************************************
 421  *           DeviceIo_VTDAPI
 422  */
 423 static BOOL32 DeviceIo_VTDAPI(DEVICE_OBJECT *dev, DWORD dwIoControlCode,
 424                               LPVOID lpvInBuffer, DWORD cbInBuffer,
 425                               LPVOID lpvOutBuffer, DWORD cbOutBuffer,
 426                               LPDWORD lpcbBytesReturned,
 427                               LPOVERLAPPED lpOverlapped)
 428 {
 429     BOOL32 retv = TRUE;
 430
 431     switch (dwIoControlCode)
 432     {
 433     case 5:
 434         if (lpvOutBuffer && (cbOutBuffer>=4))
 435             *(DWORD*)lpvOutBuffer = timeGetTime();
 436
 437         if (lpcbBytesReturned)
 438             *lpcbBytesReturned = 4;
 439
 440         break;
 441
 442     default:
 443         FIXME(win32, "Control %ld not implemented\n", dwIoControlCode);
 444         retv = FALSE;
 445         break;
 446     }
 447
 448     return retv;
 449 }
 450
 451
 452
 453
 454
 455 /***********************************************************************
 456  *           VxDCall                   (KERNEL32.[1-9])
 457  */
 458 static void VxDCall( CONTEXT *context, int nArgs )
 459 {
 460     DWORD retv, service;
 461     int i, ok = FALSE;
 462
 463     /* Pop return address to caller */
 464     EIP_reg(context) = STACK32_POP(context);
 465
 466     /* Pop requested service ID */
 467     service = STACK32_POP(context);
 468
 469     TRACE(win32, "(%08lx, ...)\n", service);
 470
 471     for (i = 0; VxDList[i].name; i++)
 472         if (VxDList[i].id == HIWORD(service))
 473             break;
 474
 475     if (!VxDList[i].name)
 476         FIXME(win32, "Unknown VxD (%08lx)\n", service);
 477     else if (!VxDList[i].vxdcall)
 478         FIXME(win32, "Unimplemented VxD (%08lx)\n", service);
 479     else
 480         ok = VxDList[i].vxdcall(&retv, service, context);
 481
 482     /* If unimplemented, trust the caller to have called the
 483        version with the correct number of arguments */
 484     if (!ok)
 485     {
 486         ESP_reg(context) += 4 * nArgs;
 487         retv = 0xffffffff;  /* FIXME */
 488     }
 489
 490     /* Push return address back onto stack */
 491     STACK32_PUSH(context, EIP_reg(context));
 492
 493     /* Return to caller */
 494     EAX_reg(context) = retv;
 495 }
 496
 497 REGS_ENTRYPOINT(VxDCall0) { VxDCall( context, 0 ); }
 498 REGS_ENTRYPOINT(VxDCall1) { VxDCall( context, 1 ); }
 499 REGS_ENTRYPOINT(VxDCall2) { VxDCall( context, 2 ); }
 500 REGS_ENTRYPOINT(VxDCall3) { VxDCall( context, 3 ); }
 501 REGS_ENTRYPOINT(VxDCall4) { VxDCall( context, 4 ); }
 502 REGS_ENTRYPOINT(VxDCall5) { VxDCall( context, 5 ); }
 503 REGS_ENTRYPOINT(VxDCall6) { VxDCall( context, 6 ); }
 504 REGS_ENTRYPOINT(VxDCall7) { VxDCall( context, 7 ); }
 505 REGS_ENTRYPOINT(VxDCall8) { VxDCall( context, 8 ); }
 506
 507 /***********************************************************************
 508  *           VxDCall_VMM
 509  */
 510 BOOL32 VxDCall_VMM( DWORD *retv, DWORD service, CONTEXT *context )
 511 {
 512     BOOL32 ok = TRUE;
 513
 514     switch ( LOWORD(service) )
 515     {
 516     case 0x0011:  /* RegOpenKey */
 517     {
 518         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 519         LPCSTR  lpszSubKey = (LPCSTR) STACK32_POP( context );
 520         LPHKEY  retkey     = (LPHKEY) STACK32_POP( context );
 521         *retv = RegOpenKey32A( hkey, lpszSubKey, retkey );
 522     }
 523     break;
 524
 525     case 0x0012:  /* RegCreateKey */
 526     {
 527         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 528         LPCSTR  lpszSubKey = (LPCSTR) STACK32_POP( context );
 529         LPHKEY  retkey     = (LPHKEY) STACK32_POP( context );
 530         *retv = RegCreateKey32A( hkey, lpszSubKey, retkey );
 531     }
 532     break;
 533
 534     case 0x0013:  /* RegCloseKey */
 535     {
 536         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 537         *retv = RegCloseKey( hkey );
 538     }
 539     break;
 540
 541     case 0x0014:  /* RegDeleteKey */
 542     {
 543         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 544         LPCSTR  lpszSubKey = (LPCSTR) STACK32_POP( context );
 545         *retv = RegDeleteKey32A( hkey, lpszSubKey );
 546     }
 547     break;
 548
 549     case 0x0015:  /* RegSetValue */
 550     {
 551         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 552         LPCSTR  lpszSubKey = (LPCSTR) STACK32_POP( context );
 553         DWORD   dwType     = (DWORD)  STACK32_POP( context );
 554         LPCSTR  lpszData   = (LPCSTR) STACK32_POP( context );
 555         DWORD   cbData     = (DWORD)  STACK32_POP( context );
 556         *retv = RegSetValue32A( hkey, lpszSubKey, dwType, lpszData, cbData );
 557     }
 558     break;
 559
 560     case 0x0016:  /* RegDeleteValue */
 561     {
 562         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 563         LPSTR   lpszValue  = (LPSTR)  STACK32_POP( context );
 564         *retv = RegDeleteValue32A( hkey, lpszValue );
 565     }
 566     break;
 567
 568     case 0x0017:  /* RegQueryValue */
 569     {
 570         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 571         LPSTR   lpszSubKey = (LPSTR)  STACK32_POP( context );
 572         LPSTR   lpszData   = (LPSTR)  STACK32_POP( context );
 573         LPDWORD lpcbData   = (LPDWORD)STACK32_POP( context );
 574         *retv = RegQueryValue32A( hkey, lpszSubKey, lpszData, lpcbData );
 575     }
 576     break;
 577
 578     case 0x0018:  /* RegEnumKey */
 579     {
 580         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 581         DWORD   iSubkey    = (DWORD)  STACK32_POP( context );
 582         LPSTR   lpszName   = (LPSTR)  STACK32_POP( context );
 583         DWORD   lpcchName  = (DWORD)  STACK32_POP( context );
 584         *retv = RegEnumKey32A( hkey, iSubkey, lpszName, lpcchName );
 585     }
 586     break;
 587
 588     case 0x0019:  /* RegEnumValue */
 589     {
 590         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 591         DWORD   iValue     = (DWORD)  STACK32_POP( context );
 592         LPSTR   lpszValue  = (LPSTR)  STACK32_POP( context );
 593         LPDWORD lpcchValue = (LPDWORD)STACK32_POP( context );
 594         LPDWORD lpReserved = (LPDWORD)STACK32_POP( context );
 595         LPDWORD lpdwType   = (LPDWORD)STACK32_POP( context );
 596         LPBYTE  lpbData    = (LPBYTE) STACK32_POP( context );
 597         LPDWORD lpcbData   = (LPDWORD)STACK32_POP( context );
 598         *retv = RegEnumValue32A( hkey, iValue, lpszValue, lpcchValue,
 599                                  lpReserved, lpdwType, lpbData, lpcbData );
 600     }
 601     break;
 602
 603     case 0x001A:  /* RegQueryValueEx */
 604     {
 605         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 606         LPSTR   lpszValue  = (LPSTR)  STACK32_POP( context );
 607         LPDWORD lpReserved = (LPDWORD)STACK32_POP( context );
 608         LPDWORD lpdwType   = (LPDWORD)STACK32_POP( context );
 609         LPBYTE  lpbData    = (LPBYTE) STACK32_POP( context );
 610         LPDWORD lpcbData   = (LPDWORD)STACK32_POP( context );
 611         *retv = RegQueryValueEx32A( hkey, lpszValue, lpReserved,
 612                                     lpdwType, lpbData, lpcbData );
 613     }
 614     break;
 615
 616     case 0x001B:  /* RegSetValueEx */
 617     {
 618         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 619         LPSTR   lpszValue  = (LPSTR)  STACK32_POP( context );
 620         DWORD   dwReserved = (DWORD)  STACK32_POP( context );
 621         DWORD   dwType     = (DWORD)  STACK32_POP( context );
 622         LPBYTE  lpbData    = (LPBYTE) STACK32_POP( context );
 623         DWORD   cbData     = (DWORD)STACK32_POP( context );
 624         *retv = RegSetValueEx32A( hkey, lpszValue, dwReserved,
 625                                   dwType, lpbData, cbData );
 626     }
 627     break;
 628
 629     case 0x001C:  /* RegFlushKey */
 630     {
 631         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 632         *retv = RegFlushKey( hkey );
 633     }
 634     break;
 635
 636     case 0x001D:  /* RegQueryInfoKey */
 637     {
 638         /* NOTE: This VxDCall takes only a subset of the parameters that the
 639                  corresponding Win32 API call does. The implementation in Win95
 640                  ADVAPI32 sets all output parameters not mentioned here to zero. */
 641
 642         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 643         LPDWORD lpcSubKeys = (LPDWORD)STACK32_POP( context );
 644         LPDWORD lpcchMaxSubKey
 645                            = (LPDWORD)STACK32_POP( context );
 646         LPDWORD lpcValues  = (LPDWORD)STACK32_POP( context );
 647         LPDWORD lpcchMaxValueName
 648                            = (LPDWORD)STACK32_POP( context );
 649         LPDWORD lpcchMaxValueData
 650                            = (LPDWORD)STACK32_POP( context );
 651         *retv = RegQueryInfoKey32A( hkey, NULL, NULL, NULL, lpcSubKeys, lpcchMaxSubKey,
 652                                     NULL, lpcValues, lpcchMaxValueName, lpcchMaxValueData,
 653                                     NULL, NULL );
 654     }
 655     break;
 656
 657     case 0x0021:  /* RegLoadKey */
 658     {
 659         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 660         LPCSTR  lpszSubKey = (LPCSTR) STACK32_POP( context );
 661         LPCSTR  lpszFile   = (LPCSTR) STACK32_POP( context );
 662         *retv = RegLoadKey32A( hkey, lpszSubKey, lpszFile );
 663     }
 664     break;
 665
 666     case 0x0022:  /* RegUnLoadKey */
 667     {
 668         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 669         LPCSTR  lpszSubKey = (LPCSTR) STACK32_POP( context );
 670         *retv = RegUnLoadKey32A( hkey, lpszSubKey );
 671     }
 672     break;
 673
 674     case 0x0023:  /* RegSaveKey */
 675     {
 676         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 677         LPCSTR  lpszFile   = (LPCSTR) STACK32_POP( context );
 678         LPSECURITY_ATTRIBUTES sa =
 679                (LPSECURITY_ATTRIBUTES)STACK32_POP( context );
 680         *retv = RegSaveKey32A( hkey, lpszFile, sa );
 681     }
 682     break;
 683
 684 #if 0 /* Functions are not yet implemented in misc/registry.c */
 685     case 0x0024:  /* RegRemapPreDefKey */
 686     case 0x0026:  /* RegQueryMultipleValues */
 687 #endif
 688
 689     case 0x0027:  /* RegReplaceKey */
 690     {
 691         HKEY    hkey       = (HKEY)   STACK32_POP( context );
 692         LPCSTR  lpszSubKey = (LPCSTR) STACK32_POP( context );
 693         LPCSTR  lpszNewFile= (LPCSTR) STACK32_POP( context );
 694         LPCSTR  lpszOldFile= (LPCSTR) STACK32_POP( context );
 695         *retv = RegReplaceKey32A( hkey, lpszSubKey, lpszNewFile, lpszOldFile );
 696     }
 697     break;
 698
 699     default:
 700         if (LOWORD(service) < N_VMM_SERVICE)
 701             FIXME(win32, "Unimplemented service %s (%08lx)\n",
 702                           VMM_Service_Name[LOWORD(service)], service);
 703         else
 704             FIXME(win32, "Unknown service %08lx\n", service);
 705
 706         ok = FALSE;
 707         break;
 708     }
 709
 710     return ok;
 711 }
 712
 713 /***********************************************************************
 714  *           DeviceIo_IFSMgr
 715  * NOTES
 716  *   The ioctls is used by 'MSNET32.DLL'.
 717  *
 718  *   I have been unable to uncover any documentation about the ioctls so
 719  *   the implementation of the cases IFS_IOCTL_21 and IFS_IOCTL_2F are
 720  *   based on a resonable guesses on information found in the Windows 95 DDK.
 721  *
 722  */
 723
 724 /*
 725  * IFSMgr DeviceIO service
 726  */
 727
 728 #define IFS_IOCTL_21                100
 729 #define IFS_IOCTL_2F                101
 730 #define IFS_IOCTL_GET_RES           102
 731 #define IFS_IOCTL_GET_NETPRO_NAME_A 103
 732
 733 struct win32apireq {
 734         unsigned long   ar_proid;
 735         unsigned long   ar_eax;
 736         unsigned long   ar_ebx;
 737         unsigned long   ar_ecx;
 738         unsigned long   ar_edx;
 739         unsigned long   ar_esi;
 740         unsigned long   ar_edi;
 741         unsigned long   ar_ebp;
 742         unsigned short  ar_error;
 743         unsigned short  ar_pad;
 744 };
 745
 746 static void win32apieq_2_CONTEXT(struct win32apireq *pIn,CONTEXT *pCxt)
 747 {
 748         memset(pCxt,0,sizeof(CONTEXT));
 749
 750         pCxt->ContextFlags=CONTEXT_INTEGER|CONTEXT_CONTROL;
 751         pCxt->Eax = pIn->ar_eax;
 752         pCxt->Ebx = pIn->ar_ebx;
 753         pCxt->Ecx = pIn->ar_ecx;
 754         pCxt->Edx = pIn->ar_edx;
 755         pCxt->Esi = pIn->ar_esi;
 756         pCxt->Edi = pIn->ar_edi;
 757
 758         /* FIXME: Only partial CONTEXT_CONTROL */
 759         pCxt->Ebp = pIn->ar_ebp;
 760
 761         /* FIXME: pIn->ar_proid ignored */
 762         /* FIXME: pIn->ar_error ignored */
 763         /* FIXME: pIn->ar_pad ignored */
 764 }
 765
 766 static void CONTEXT_2_win32apieq(CONTEXT *pCxt,struct win32apireq *pOut)
 767 {
 768         memset(pOut,0,sizeof(struct win32apireq));
 769
 770         pOut->ar_eax = pCxt->Eax;
 771         pOut->ar_ebx = pCxt->Ebx;
 772         pOut->ar_ecx = pCxt->Ecx;
 773         pOut->ar_edx = pCxt->Edx;
 774         pOut->ar_esi = pCxt->Esi;
 775         pOut->ar_edi = pCxt->Edi;
 776
 777         /* FIXME: Only partial CONTEXT_CONTROL */
 778         pOut->ar_ebp = pCxt->Ebp;
 779
 780         /* FIXME: pOut->ar_proid ignored */
 781         /* FIXME: pOut->ar_error ignored */
 782         /* FIXME: pOut->ar_pad ignored */
 783 }
 784
 785 static BOOL32 DeviceIo_IFSMgr(DEVICE_OBJECT *dev, DWORD dwIoControlCode,
 786                               LPVOID lpvInBuffer, DWORD cbInBuffer,
 787                               LPVOID lpvOutBuffer, DWORD cbOutBuffer,
 788                               LPDWORD lpcbBytesReturned,
 789                               LPOVERLAPPED lpOverlapped)
 790 {
 791     BOOL32 retv = TRUE;
 792         TRACE(win32,"(%p,%ld,%p,%ld,%p,%ld,%p,%p): stub\n",
 793                         dev,dwIoControlCode,
 794                         lpvInBuffer,cbInBuffer,
 795                         lpvOutBuffer,cbOutBuffer,
 796                         lpcbBytesReturned,
 797                         lpOverlapped);
 798
 799     switch (dwIoControlCode)
 800     {
 801         case IFS_IOCTL_21:
 802         case IFS_IOCTL_2F:{
 803                 CONTEXT cxt;
 804                 struct win32apireq *pIn=(struct win32apireq *) lpvInBuffer;
 805                 struct win32apireq *pOut=(struct win32apireq *) lpvOutBuffer;
 806
 807                 TRACE(win32,
 808                         "Control '%s': "
 809                         "proid=0x%08lx, eax=0x%08lx, ebx=0x%08lx, ecx=0x%08lx, "
 810                         "edx=0x%08lx, esi=0x%08lx, edi=0x%08lx, ebp=0x%08lx, "
 811                         "error=0x%04x, pad=0x%04x\n",
 812                         (dwIoControlCode==IFS_IOCTL_21)?"IFS_IOCTL_21":"IFS_IOCTL_2F",
 813                         pIn->ar_proid, pIn->ar_eax, pIn->ar_ebx, pIn->ar_ecx,
 814                         pIn->ar_edx, pIn->ar_esi, pIn->ar_edi, pIn->ar_ebp,
 815                         pIn->ar_error, pIn->ar_pad
 816                 );
 817
 818                 win32apieq_2_CONTEXT(pIn,&cxt);
 819
 820                 if(dwIoControlCode==IFS_IOCTL_21)
 821                 {
 822                         DOS3Call(&cxt); /* Call int 21h */
 823                 } else {
 824                         INT_Int2fHandler(&cxt); /* Call int 2Fh */
 825                 }
 826
 827                 CONTEXT_2_win32apieq(&cxt,pOut);
 828
 829         retv = TRUE;
 830         } break;
 831         case IFS_IOCTL_GET_RES:{
 832         FIXME(win32, "Control 'IFS_IOCTL_GET_RES' not implemented\n");
 833         retv = FALSE;
 834         } break;
 835         case IFS_IOCTL_GET_NETPRO_NAME_A:{
 836         FIXME(win32, "Control 'IFS_IOCTL_GET_NETPRO_NAME_A' not implemented\n");
 837         retv = FALSE;
 838         } break;
 839     default:
 840         FIXME(win32, "Control %ld not implemented\n", dwIoControlCode);
 841         retv = FALSE;
 842     }
 843
 844     return retv;
 845 }
 846
 847
 848 /***********************************************************************
 849  *           DeviceIo_VWin32
 850  */
 851
 852 static void DIOCRegs_2_CONTEXT( DIOC_REGISTERS *pIn, CONTEXT *pCxt )
 853 {
 854     memset( pCxt, 0, sizeof(CONTEXT) );
 855     /* Note: segment registers == 0 means that CTX_SEG_OFF_TO_LIN
 856              will interpret 32-bit register contents as linear pointers */
 857
 858     pCxt->ContextFlags=CONTEXT_INTEGER|CONTEXT_CONTROL;
 859     pCxt->Eax = pIn->reg_EAX;
 860     pCxt->Ebx = pIn->reg_EBX;
 861     pCxt->Ecx = pIn->reg_ECX;
 862     pCxt->Edx = pIn->reg_EDX;
 863     pCxt->Esi = pIn->reg_ESI;
 864     pCxt->Edi = pIn->reg_EDI;
 865
 866     /* FIXME: Only partial CONTEXT_CONTROL */
 867     pCxt->EFlags = pIn->reg_Flags;
 868 }
 869
 870 static void CONTEXT_2_DIOCRegs( CONTEXT *pCxt, DIOC_REGISTERS *pOut )
 871 {
 872     memset( pOut, 0, sizeof(DIOC_REGISTERS) );
 873
 874     pOut->reg_EAX = pCxt->Eax;
 875     pOut->reg_EBX = pCxt->Ebx;
 876     pOut->reg_ECX = pCxt->Ecx;
 877     pOut->reg_EDX = pCxt->Edx;
 878     pOut->reg_ESI = pCxt->Esi;
 879     pOut->reg_EDI = pCxt->Edi;
 880
 881     /* FIXME: Only partial CONTEXT_CONTROL */
 882     pOut->reg_Flags = pCxt->EFlags;
 883 }
 884
 885
 886 static BOOL32 DeviceIo_VWin32(DEVICE_OBJECT *dev, DWORD dwIoControlCode,
 887                               LPVOID lpvInBuffer, DWORD cbInBuffer,
 888                               LPVOID lpvOutBuffer, DWORD cbOutBuffer,
 889                               LPDWORD lpcbBytesReturned,
 890                               LPOVERLAPPED lpOverlapped)
 891 {
 892     BOOL32 retv = TRUE;
 893
 894     switch (dwIoControlCode)
 895     {
 896     case VWIN32_DIOC_DOS_IOCTL:
 897     case VWIN32_DIOC_DOS_INT13:
 898     case VWIN32_DIOC_DOS_INT25:
 899     case VWIN32_DIOC_DOS_INT26:
 900     {
 901         CONTEXT cxt;
 902         DIOC_REGISTERS *pIn  = (DIOC_REGISTERS *)lpvInBuffer;
 903         DIOC_REGISTERS *pOut = (DIOC_REGISTERS *)lpvOutBuffer;
 904
 905         TRACE( win32, "Control '%s': "
 906                       "eax=0x%08lx, ebx=0x%08lx, ecx=0x%08lx, "
 907                       "edx=0x%08lx, esi=0x%08lx, edi=0x%08lx ",
 908                       (dwIoControlCode == VWIN32_DIOC_DOS_IOCTL)? "VWIN32_DIOC_DOS_IOCTL" :
 909                       (dwIoControlCode == VWIN32_DIOC_DOS_INT13)? "VWIN32_DIOC_DOS_INT13" :
 910                       (dwIoControlCode == VWIN32_DIOC_DOS_INT25)? "VWIN32_DIOC_DOS_INT25" :
 911                       (dwIoControlCode == VWIN32_DIOC_DOS_INT26)? "VWIN32_DIOC_DOS_INT26" : "???",
 912                       pIn->reg_EAX, pIn->reg_EBX, pIn->reg_ECX,
 913                       pIn->reg_EDX, pIn->reg_ESI, pIn->reg_EDI );
 914
 915         DIOCRegs_2_CONTEXT( pIn, &cxt );
 916
 917         switch (dwIoControlCode)
 918         {
 919         case VWIN32_DIOC_DOS_IOCTL: DOS3Call( &cxt ); break; /* Call int 21h */
 920         case VWIN32_DIOC_DOS_INT13: INT_Int13Handler( &cxt ); break;
 921         case VWIN32_DIOC_DOS_INT25: INT_Int25Handler( &cxt ); break;
 922         case VWIN32_DIOC_DOS_INT26: INT_Int26Handler( &cxt ); break;
 923         }
 924
 925         CONTEXT_2_DIOCRegs( &cxt, pOut );
 926     }
 927     break;
 928
 929     case VWIN32_DIOC_SIMCTRLC:
 930         FIXME(win32, "Control VWIN32_DIOC_SIMCTRLC not implemented\n");
 931         retv = FALSE;
 932         break;
 933
 934     default:
 935         FIXME(win32, "Unknown Control %ld\n", dwIoControlCode);
 936         retv = FALSE;
 937         break;
 938     }
 939
 940     return retv;
 941 }
 942
 943
 944
 945
 946
 947 /* this is used by some Origin games */
 948 static BOOL32 DeviceIo_MONODEBG(DEVICE_OBJECT *dev, DWORD dwIoControlCode,
 949                               LPVOID lpvInBuffer, DWORD cbInBuffer,
 950                               LPVOID lpvOutBuffer, DWORD cbOutBuffer,
 951                               LPDWORD lpcbBytesReturned,
 952                               LPOVERLAPPED lpOverlapped)
 953 {
 954         switch (dwIoControlCode) {
 955         case 1: /* version */
 956                 *(LPDWORD)lpvOutBuffer = 0x20004; /* WC SecretOps */
 957                 break;
 958         case 9: /* debug output */
 959                 fprintf(stderr,"MONODEBG: %s\n",debugstr_a(lpvInBuffer));
 960                 break;
 961         default:
 962                 FIXME(win32,"(%p,%ld,%p,%ld,%p,%ld,%p,%p): stub\n",
 963                         dev,dwIoControlCode,
 964                         lpvInBuffer,cbInBuffer,
 965                         lpvOutBuffer,cbOutBuffer,
 966                         lpcbBytesReturned,
 967                         lpOverlapped
 968                 );
 969                 break;
 970         }
 971         return TRUE;
 972 }