Merged msacm and msacm32 dlls.
[wine] / 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 }