msdos/vxd.c

   1 /*
   2  * VxD emulation
   3  *
   4  * Copyright 1995 Anand Kumria
   5  */
   6
   7 #include <stdio.h>
   8 #include "windows.h"
   9 #include "msdos.h"
  10 #include "miscemu.h"
  11 #include "debug.h"
  12
  13
  14 #define VXD_BARF(context,name) \
  15     fprintf( stderr, "vxd %s: unknown/not implemented parameters:\n" \
  16                      "vxd %s: AX %04x, BX %04x, CX %04x, DX %04x, " \
  17                      "SI %04x, DI %04x, DS %04x, ES %04x\n", \
  18              (name), (name), AX_reg(context), BX_reg(context), \
  19              CX_reg(context), DX_reg(context), SI_reg(context), \
  20              DI_reg(context), (WORD)DS_reg(context), (WORD)ES_reg(context) )
  21
  22
  23 static WORD VXD_WinVersion(void)
  24 {
  25     WORD version = LOWORD(GetVersion16());
  26     return (version >> 8) | (version << 8);
  27 }
  28
  29 /***********************************************************************
  30  *           VXD_PageFile
  31  */
  32 void WINAPI VXD_PageFile( CONTEXT *context )
  33 {
  34     unsigned    service = AX_reg(context);
  35
  36     /* taken from Ralf Brown's Interrupt List */
  37
  38     TRACE(vxd,"[%04x] PageFile\n", (UINT16)service );
  39
  40     switch(service)
  41     {
  42     case 0x00: /* get version, is this windows version? */
  43         TRACE(vxd,"returning version\n");
  44         AX_reg(context) = VXD_WinVersion();
  45         RESET_CFLAG(context);
  46         break;
  47
  48     case 0x01: /* get swap file info */
  49         TRACE(vxd,"VxD PageFile: returning swap file info\n");
  50         AX_reg(context) = 0x00; /* paging disabled */
  51         ECX_reg(context) = 0;   /* maximum size of paging file */
  52         /* FIXME: do I touch DS:SI or DS:DI? */
  53         RESET_CFLAG(context);
  54         break;
  55
  56     case 0x02: /* delete permanent swap on exit */
  57         TRACE(vxd,"VxD PageFile: supposed to delete swap\n");
  58         RESET_CFLAG(context);
  59         break;
  60
  61     case 0x03: /* current temporary swap file size */
  62         TRACE(vxd,"VxD PageFile: what is current temp. swap size\n");
  63         RESET_CFLAG(context);
  64         break;
  65
  66     case 0x04: /* read or write?? INTERRUP.D */
  67     case 0x05: /* cancel?? INTERRUP.D */
  68     case 0x06: /* test I/O valid INTERRUP.D */
  69     default:
  70         VXD_BARF( context, "pagefile" );
  71         break;
  72     }
  73 }
  74
  75
  76 /***********************************************************************
  77  *           VXD_Shell
  78  */
  79 void WINAPI VXD_Shell( CONTEXT *context )
  80 {
  81     unsigned    service = DX_reg(context);
  82
  83     TRACE(vxd,"[%04x] Shell\n", (UINT16)service);
  84
  85     switch (service) /* Ralf Brown says EDX, but I use DX instead */
  86     {
  87     case 0x0000:
  88         TRACE(vxd,"returning version\n");
  89         AX_reg(context) = VXD_WinVersion();
  90         EBX_reg(context) = 1; /* system VM Handle */
  91         break;
  92
  93     case 0x0001:
  94     case 0x0002:
  95     case 0x0003:
  96     case 0x0004:
  97     case 0x0005:
  98         TRACE(vxd,"VxD Shell: EDX = %08lx\n",EDX_reg(context));
  99         VXD_BARF( context, "shell" );
 100         break;
 101
 102     case 0x0006: /* SHELL_Get_VM_State */
 103         TRACE(vxd,"VxD Shell: returning VM state\n");
 104         /* Actually we don't, not yet. We have to return a structure
 105          * and I am not to sure how to set it up and return it yet,
 106          * so for now let's do nothing. I can (hopefully) get this
 107          * by the next release
 108          */
 109         /* RESET_CFLAG(context); */
 110         break;
 111
 112     case 0x0007:
 113     case 0x0008:
 114     case 0x0009:
 115     case 0x000A:
 116     case 0x000B:
 117     case 0x000C:
 118     case 0x000D:
 119     case 0x000E:
 120     case 0x000F:
 121     case 0x0010:
 122     case 0x0011:
 123     case 0x0012:
 124     case 0x0013:
 125     case 0x0014:
 126     case 0x0015:
 127     case 0x0016:
 128     default:
 129         TRACE(vxd,"VxD Shell: EDX = %08lx\n",EDX_reg(context));
 130         VXD_BARF( context, "shell");
 131         break;
 132     }
 133 }
 134
 135
 136 /***********************************************************************
 137  *           VXD_Comm
 138  */
 139 void WINAPI VXD_Comm( CONTEXT *context )
 140 {
 141     unsigned    service = AX_reg(context);
 142
 143     TRACE(vxd,"[%04x] Comm\n", (UINT16)service);
 144
 145     switch (service)
 146     {
 147     case 0x0000: /* get version */
 148         TRACE(vxd,"returning version\n");
 149         AX_reg(context) = VXD_WinVersion();
 150         RESET_CFLAG(context);
 151         break;
 152
 153     case 0x0001: /* set port global */
 154     case 0x0002: /* get focus */
 155     case 0x0003: /* virtualise port */
 156     default:
 157         VXD_BARF( context, "comm" );
 158     }
 159 }
 160
 161 /***********************************************************************
 162  *           VXD_Timer
 163  */
 164 void VXD_Timer( CONTEXT *context )
 165 {
 166     unsigned service = AX_reg(context);
 167
 168     TRACE(vxd,"[%04x] Virtual Timer\n", (UINT16)service);
 169
 170     switch(service)
 171     {
 172     case 0x0000: /* version */
 173         AX_reg(context) = VXD_WinVersion();
 174         RESET_CFLAG(context);
 175         break;
 176
 177     case 0x0100: /* clock tick time, in 840nsecs */
 178         EAX_reg(context) = GetTickCount();
 179
 180         EDX_reg(context) = EAX_reg(context) >> 22;
 181         EAX_reg(context) <<= 10; /* not very precise */
 182         break;
 183
 184     case 0x0101: /* current Windows time, msecs */
 185     case 0x0102: /* current VM time, msecs */
 186         EAX_reg(context) = GetTickCount();
 187         break;
 188
 189     default:
 190         VXD_BARF( context, "VTD" );
 191     }
 192 }
 193