msdos/int33.c

   1 /*
   2  * DOS interrupt 33h handler
   3  */
   4
   5 #include <stdlib.h>
   6 #include "windef.h"
   7 #include "wingdi.h"
   8 #include "winuser.h"
   9 #include "miscemu.h"
  10 #include "dosexe.h"
  11 #include "vga.h"
  12 #include "debugtools.h"
  13
  14 DEFAULT_DEBUG_CHANNEL(int)
  15
  16 typedef struct {
  17   DWORD x, y, but;
  18   FARPROC16 callback;
  19   WORD callmask;
  20 } MOUSESYSTEM;
  21
  22 /**********************************************************************
  23  *          INT_Int33Handler
  24  *
  25  * Handler for int 33h (MS MOUSE).
  26  */
  27 void WINAPI INT_Int33Handler( CONTEXT86 *context )
  28 {
  29   MOUSESYSTEM *sys = (MOUSESYSTEM *)DOSVM_GetSystemData(0x33);
  30
  31   switch (AX_reg(context)) {
  32   case 0x00:
  33     TRACE("Reset mouse driver and request status\n");
  34     AX_reg(context) = 0xFFFF; /* installed */
  35     BX_reg(context) = 3;      /* # of buttons */
  36     sys = calloc(1,sizeof(MOUSESYSTEM));
  37     DOSVM_SetSystemData(0x33, sys);
  38     break;
  39   case 0x03:
  40     TRACE("Return mouse position and button status\n");
  41     BX_reg(context) = sys->but;
  42     CX_reg(context) = sys->x;
  43     DX_reg(context) = sys->y;
  44     break;
  45   case 0x04:
  46     FIXME("Position mouse cursor\n");
  47     break;
  48   case 0x0C:
  49     TRACE("Define mouse interrupt subroutine\n");
  50     sys->callmask = CX_reg(context);
  51     sys->callback = (FARPROC16)PTR_SEG_OFF_TO_SEGPTR(ES_reg(context), DX_reg(context));
  52     break;
  53   default:
  54     INT_BARF(context,0x33);
  55   }
  56 }
  57
  58 typedef struct {
  59   FARPROC16 proc;
  60   WORD mask,but,x,y,mx,my;
  61 } MCALLDATA;
  62
  63 static void MouseRelay(LPDOSTASK lpDosTask,CONTEXT86 *context,void *mdata)
  64 {
  65   MCALLDATA *data = (MCALLDATA *)mdata;
  66   CONTEXT86 ctx = *context;
  67
  68   EAX_reg(&ctx) = data->mask;
  69   EBX_reg(&ctx) = data->but;
  70   ECX_reg(&ctx) = data->x;
  71   EDX_reg(&ctx) = data->y;
  72   ESI_reg(&ctx) = data->mx;
  73   EDI_reg(&ctx) = data->my;
  74   CS_reg(&ctx)  = SELECTOROF(data->proc);
  75   EIP_reg(&ctx) = OFFSETOF(data->proc);
  76   free(data);
  77   DPMI_CallRMProc(&ctx, NULL, 0, 0);
  78 }
  79
  80 void WINAPI INT_Int33Message(UINT message,WPARAM wParam,LPARAM lParam)
  81 {
  82   MOUSESYSTEM *sys = (MOUSESYSTEM *)DOSVM_GetSystemData(0x33);
  83   WORD mask = 0;
  84   unsigned Height, Width, SX=1, SY=1;
  85
  86   if (!sys) return;
  87   if (!VGA_GetMode(&Height,&Width,NULL)) {
  88     /* may need to do some coordinate scaling */
  89     SX = 640/Width;
  90     if (!SX) SX=1;
  91   }
  92   sys->x = LOWORD(lParam) * SX;
  93   sys->y = HIWORD(lParam) * SY;
  94   switch (message) {
  95   case WM_MOUSEMOVE:
  96     mask |= 0x01;
  97     break;
  98   case WM_LBUTTONDOWN:
  99   case WM_LBUTTONDBLCLK:
 100     sys->but |= 0x01;
 101     mask |= 0x02;
 102     break;
 103   case WM_LBUTTONUP:
 104     sys->but &= ~0x01;
 105     mask |= 0x04;
 106     break;
 107   case WM_RBUTTONDOWN:
 108   case WM_RBUTTONDBLCLK:
 109     sys->but |= 0x02;
 110     mask |= 0x08;
 111     break;
 112   case WM_RBUTTONUP:
 113     sys->but &= ~0x02;
 114     mask |= 0x10;
 115     break;
 116   case WM_MBUTTONDOWN:
 117   case WM_MBUTTONDBLCLK:
 118     sys->but |= 0x04;
 119     mask |= 0x20;
 120     break;
 121   case WM_MBUTTONUP:
 122     sys->but &= ~0x04;
 123     mask |= 0x40;
 124     break;
 125   }
 126
 127   if ((mask & sys->callmask) && sys->callback) {
 128     MCALLDATA *data = calloc(1,sizeof(MCALLDATA));
 129     data->proc = sys->callback;
 130     data->mask = mask & sys->callmask;
 131     data->but = sys->but;
 132     data->x = sys->x;
 133     data->y = sys->y;
 134     DOSVM_QueueEvent(-1, DOS_PRIORITY_MOUSE, MouseRelay, data);
 135   }
 136 }