dlls/vwin32.vxd/vwin32.c

   1 /*
   2  * VWIN32 VxD implementation
   3  *
   4  * Copyright 1998 Marcus Meissner
   5  * Copyright 1998 Ulrich Weigand
   6  * Copyright 1998 Patrik Stridvall
   7  *
   8  * This library is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Lesser General Public
  10  * License as published by the Free Software Foundation; either
  11  * version 2.1 of the License, or (at your option) any later version.
  12  *
  13  * This library is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * Lesser General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public
  19  * License along with this library; if not, write to the Free Software
  20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  21  */
  22
  23 #include <stdarg.h>
  24
  25 #include "windef.h"
  26 #include "winbase.h"
  27 #include "winioctl.h"
  28 #include "wine/debug.h"
  29
  30 WINE_DEFAULT_DEBUG_CHANNEL(vxd);
  31
  32 typedef struct tagDIOCRegs {
  33     DWORD   reg_EBX;
  34     DWORD   reg_EDX;
  35     DWORD   reg_ECX;
  36     DWORD   reg_EAX;
  37     DWORD   reg_EDI;
  38     DWORD   reg_ESI;
  39     DWORD   reg_Flags;
  40 } DIOC_REGISTERS, *PDIOC_REGISTERS;
  41
  42 #define VWIN32_DIOC_DOS_IOCTL     1 /* This is the specified MS-DOS device I/O ctl - Interrupt 21h Function 4400h - 4411h */
  43 #define VWIN32_DIOC_DOS_INT25     2 /* This is the Absolute Disk Read command - Interrupt 25h */
  44 #define VWIN32_DIOC_DOS_INT26     3 /* This is the Absolute Disk Write command - Interrupt 25h */
  45 #define VWIN32_DIOC_DOS_INT13     4 /* This is Interrupt 13h commands */
  46 #define VWIN32_DIOC_SIMCTRLC      5 /* Simulate Ctrl-C */
  47 #define VWIN32_DIOC_DOS_DRIVEINFO 6 /* This is Interrupt 21h Function 730X commands */
  48
  49 #include <pshpack1.h>
  50 typedef struct tagMID {
  51     WORD  midInfoLevel;
  52     DWORD midSerialNum;
  53     BYTE  midVolLabel[11];
  54     BYTE  midFileSysType[8];
  55 } MID, *PMID;
  56 #include <poppack.h>
  57
  58 extern void __wine_call_int_handler( CONTEXT *context, BYTE intnum );
  59
  60 /* Pop a DWORD from the 32-bit stack */
  61 static inline DWORD stack32_pop( CONTEXT *context )
  62 {
  63     DWORD ret = *(DWORD *)context->Esp;
  64     context->Esp += sizeof(DWORD);
  65     return ret;
  66 }
  67
  68 static void DIOCRegs_2_CONTEXT( DIOC_REGISTERS *pIn, CONTEXT *pCxt )
  69 {
  70     memset( pCxt, 0, sizeof(*pCxt) );
  71     /* Note: segment registers == 0 means that CTX_SEG_OFF_TO_LIN
  72              will interpret 32-bit register contents as linear pointers */
  73
  74     pCxt->ContextFlags=CONTEXT_INTEGER|CONTEXT_CONTROL;
  75     pCxt->Eax = pIn->reg_EAX;
  76     pCxt->Ebx = pIn->reg_EBX;
  77     pCxt->Ecx = pIn->reg_ECX;
  78     pCxt->Edx = pIn->reg_EDX;
  79     pCxt->Esi = pIn->reg_ESI;
  80     pCxt->Edi = pIn->reg_EDI;
  81
  82     /* FIXME: Only partial CONTEXT_CONTROL */
  83
  84     pCxt->EFlags = pIn->reg_Flags & ~0x00020000; /* clear vm86 mode */
  85 }
  86
  87 static void CONTEXT_2_DIOCRegs( CONTEXT *pCxt, DIOC_REGISTERS *pOut )
  88 {
  89     memset( pOut, 0, sizeof(DIOC_REGISTERS) );
  90
  91     pOut->reg_EAX = pCxt->Eax;
  92     pOut->reg_EBX = pCxt->Ebx;
  93     pOut->reg_ECX = pCxt->Ecx;
  94     pOut->reg_EDX = pCxt->Edx;
  95     pOut->reg_ESI = pCxt->Esi;
  96     pOut->reg_EDI = pCxt->Edi;
  97
  98     /* FIXME: Only partial CONTEXT_CONTROL */
  99     pOut->reg_Flags = pCxt->EFlags;
 100 }
 101
 102 /***********************************************************************
 103  *           DeviceIoControl   (VWIN32.VXD.@)
 104  */
 105 BOOL WINAPI VWIN32_DeviceIoControl(DWORD dwIoControlCode,
 106                                    LPVOID lpvInBuffer, DWORD cbInBuffer,
 107                                    LPVOID lpvOutBuffer, DWORD cbOutBuffer,
 108                                    LPDWORD lpcbBytesReturned, LPOVERLAPPED lpOverlapped)
 109 {
 110     switch (dwIoControlCode)
 111     {
 112     case VWIN32_DIOC_DOS_IOCTL:
 113     case 0x10: /* Int 0x21 call, call it VWIN_DIOC_INT21 ? */
 114     case VWIN32_DIOC_DOS_INT13:
 115     case VWIN32_DIOC_DOS_INT25:
 116     case VWIN32_DIOC_DOS_INT26:
 117     case 0x29: /* Int 0x31 call, call it VWIN_DIOC_INT31 ? */
 118     case VWIN32_DIOC_DOS_DRIVEINFO:
 119         {
 120             CONTEXT cxt;
 121             DIOC_REGISTERS *pIn  = lpvInBuffer;
 122             DIOC_REGISTERS *pOut = lpvOutBuffer;
 123             BYTE intnum = 0;
 124
 125             TRACE( "Control '%s': "
 126                    "eax=0x%08x, ebx=0x%08x, ecx=0x%08x, "
 127                    "edx=0x%08x, esi=0x%08x, edi=0x%08x\n",
 128                    (dwIoControlCode == VWIN32_DIOC_DOS_IOCTL)? "VWIN32_DIOC_DOS_IOCTL" :
 129                    (dwIoControlCode == VWIN32_DIOC_DOS_INT25)? "VWIN32_DIOC_DOS_INT25" :
 130                    (dwIoControlCode == VWIN32_DIOC_DOS_INT26)? "VWIN32_DIOC_DOS_INT26" :
 131                    (dwIoControlCode == VWIN32_DIOC_DOS_DRIVEINFO)? "VWIN32_DIOC_DOS_DRIVEINFO" :  "???",
 132                    pIn->reg_EAX, pIn->reg_EBX, pIn->reg_ECX,
 133                    pIn->reg_EDX, pIn->reg_ESI, pIn->reg_EDI );
 134
 135             DIOCRegs_2_CONTEXT( pIn, &cxt );
 136
 137             switch (dwIoControlCode)
 138             {
 139             case VWIN32_DIOC_DOS_IOCTL: /* Call int 21h */
 140             case 0x10: /* Int 0x21 call, call it VWIN_DIOC_INT21 ? */
 141             case VWIN32_DIOC_DOS_DRIVEINFO:        /* Call int 21h 730x */
 142                 intnum = 0x21;
 143                 break;
 144             case VWIN32_DIOC_DOS_INT13:
 145                 intnum = 0x13;
 146                 break;
 147             case VWIN32_DIOC_DOS_INT25:
 148                 intnum = 0x25;
 149                 break;
 150             case VWIN32_DIOC_DOS_INT26:
 151                 intnum = 0x26;
 152                 break;
 153             case 0x29: /* Int 0x31 call, call it VWIN_DIOC_INT31 ? */
 154                 intnum = 0x31;
 155                 break;
 156             }
 157
 158             __wine_call_int_handler( &cxt, intnum );
 159             CONTEXT_2_DIOCRegs( &cxt, pOut );
 160         }
 161         return TRUE;
 162
 163     case VWIN32_DIOC_SIMCTRLC:
 164         FIXME( "Control VWIN32_DIOC_SIMCTRLC not implemented\n");
 165         return FALSE;
 166
 167     default:
 168         FIXME( "Unknown Control %d\n", dwIoControlCode);
 169         return FALSE;
 170     }
 171 }
 172
 173
 174 /***********************************************************************
 175  *           VxDCall   (VWIN32.VXD.@)
 176  *
 177  *  Service numbers taken from page 448 of Pietrek's "Windows 95 System
 178  *  Programming Secrets".  Parameters from experimentation on real Win98.
 179  *
 180  */
 181 DWORD WINAPI VWIN32_VxDCall( DWORD service, CONTEXT *context )
 182 {
 183     switch ( LOWORD(service) )
 184     {
 185     case 0x0000: /* GetVersion */
 186         {
 187             DWORD vers = GetVersion();
 188             return (LOBYTE(vers) << 8) | HIBYTE(vers);
 189         }
 190     case 0x0020: /* Get VMCPD Version */
 191         {
 192             DWORD parm = stack32_pop(context);
 193
 194             FIXME("Get VMCPD Version(%08x): partial stub!\n", parm);
 195
 196             /* FIXME: This is what Win98 returns, it may
 197              *        not be correct in all situations.
 198              *        It makes Bleem! happy though.
 199              */
 200             return 0x0405;
 201         }
 202     case 0x0029: /* Int31/DPMI dispatch */
 203         {
 204             DWORD callnum = stack32_pop(context);
 205             DWORD parm    = stack32_pop(context);
 206
 207             TRACE("Int31/DPMI dispatch(%08x)\n", callnum);
 208
 209             context->Eax = callnum;
 210             context->Ecx = parm;
 211             __wine_call_int_handler( context, 0x31 );
 212             return LOWORD(context->Eax);
 213         }
 214     case 0x002a: /* Int41 dispatch - parm = int41 service number */
 215         {
 216             DWORD callnum = stack32_pop(context);
 217             return callnum; /* FIXME: should really call INT_Int41Handler() */
 218         }
 219     default:
 220         FIXME("Unknown service %08x\n", service);
 221         return 0xffffffff;
 222     }
 223 }