git.oblomov.eu Git - wine/blob - dlls/winedos/int33.c

   1 /*
   2  * DOS interrupt 33h handler
   3  *
   4  * Copyright 1999 Ove Kåven
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include <stdarg.h>
  22 #include <stdlib.h>
  23 #include <string.h>
  24
  25 #include "windef.h"
  26 #include "winbase.h"
  27 #include "wingdi.h"
  28 #include "winuser.h"
  29 #include "miscemu.h"
  30 #include "dosexe.h"
  31 #include "vga.h"
  32 #include "wine/debug.h"
  33
  34 WINE_DEFAULT_DEBUG_CHANNEL(int);
  35
  36 static struct
  37 {
  38   DWORD x, y, but;
  39   WORD lbcount, rbcount, rlastx, rlasty, llastx, llasty;
  40   FARPROC16 callback;
  41   WORD callmask;
  42   WORD VMPratio, HMPratio, oldx, oldy;
  43 } mouse_info;
  44
  45 /**********************************************************************
  46  *          DOSVM_Int33Handler (WINEDOS16.151)
  47  *
  48  * Handler for int 33h (MS MOUSE).
  49  */
  50 void WINAPI DOSVM_Int33Handler( CONTEXT86 *context )
  51 {
  52   switch (LOWORD(context->Eax)) {
  53   case 0x00:
  54   case 0x21:
  55     TRACE("Reset mouse driver and request status\n");
  56     SET_AX( context, 0xFFFF ); /* installed */
  57     SET_BX( context, 3 );      /* # of buttons */
  58     memset( &mouse_info, 0, sizeof(mouse_info) );
  59     /* Set the default mickey/pixel ratio */
  60     mouse_info.HMPratio = 8;
  61     mouse_info.VMPratio = 16;
  62     break;
  63   case 0x01:
  64     FIXME("Show mouse cursor\n");
  65     break;
  66   case 0x02:
  67     FIXME("Hide mouse cursor\n");
  68     break;
  69   case 0x03:
  70     TRACE("Return mouse position and button status: (%ld,%ld) and %ld\n",
  71          mouse_info.x, mouse_info.y, mouse_info.but);
  72     SET_BX( context, mouse_info.but );
  73     SET_CX( context, mouse_info.x );
  74     SET_DX( context, mouse_info.y );
  75     break;
  76   case 0x04:
  77     FIXME("Position mouse cursor\n");
  78     break;
  79   case 0x05:
  80     TRACE("Return Mouse button press Information for %s mouse button\n",
  81           BX_reg(context) ? "right" : "left");
  82     if (BX_reg(context)) {
  83       SET_BX( context, mouse_info.rbcount );
  84       mouse_info.rbcount = 0;
  85       SET_CX( context, mouse_info.rlastx );
  86       SET_DX( context, mouse_info.rlasty );
  87     } else {
  88       SET_BX( context, mouse_info.lbcount );
  89       mouse_info.lbcount = 0;
  90       SET_CX( context, mouse_info.llastx );
  91       SET_DX( context, mouse_info.llasty );
  92     }
  93     SET_AX( context, mouse_info.but );
  94     break;
  95   case 0x07:
  96     FIXME("Define horizontal mouse cursor range %d..%d\n",
  97           CX_reg(context), DX_reg(context));
  98     break;
  99   case 0x08:
 100     FIXME("Define vertical mouse cursor range %d..%d\n",
 101           CX_reg(context), DX_reg(context));
 102     break;
 103   case 0x09:
 104     FIXME("Define graphics mouse cursor\n");
 105     break;
 106   case 0x0A:
 107     FIXME("Define text mouse cursor\n");
 108     break;
 109   case 0x0B:
 110     TRACE("Read Mouse motion counters\n");
 111     SET_CX( context, (mouse_info.x - mouse_info.oldx) * (mouse_info.HMPratio / 8) );
 112     SET_DX( context, (mouse_info.y - mouse_info.oldy) * (mouse_info.VMPratio / 8) );
 113     mouse_info.oldx = mouse_info.x;
 114     mouse_info.oldy = mouse_info.y;
 115     break;
 116   case 0x0C:
 117     TRACE("Define mouse interrupt subroutine\n");
 118     mouse_info.callmask = CX_reg(context);
 119     mouse_info.callback = (FARPROC16)MAKESEGPTR(context->SegEs, LOWORD(context->Edx));
 120     break;
 121   case 0x0F:
 122     TRACE("Set mickey/pixel ratio\n");
 123     mouse_info.HMPratio = CX_reg(context);
 124     mouse_info.VMPratio = DX_reg(context);
 125     break;
 126   case 0x10:
 127     FIXME("Define screen region for update\n");
 128     break;
 129   default:
 130     INT_BARF(context,0x33);
 131   }
 132 }
 133
 134 typedef struct {
 135   FARPROC16 proc;
 136   WORD mask,but,x,y,mx,my;
 137 } MCALLDATA;
 138
 139 static void MouseRelay(CONTEXT86 *context,void *mdata)
 140 {
 141   MCALLDATA *data = (MCALLDATA *)mdata;
 142   CONTEXT86 ctx = *context;
 143
 144   if (!ISV86(&ctx))
 145   {
 146       ctx.EFlags |= V86_FLAG;
 147       ctx.SegSs = 0; /* Allocate new stack. */
 148   }
 149
 150   ctx.Eax   = data->mask;
 151   ctx.Ebx   = data->but;
 152   ctx.Ecx   = data->x;
 153   ctx.Edx   = data->y;
 154   ctx.Esi   = data->mx;
 155   ctx.Edi   = data->my;
 156   ctx.SegCs = SELECTOROF(data->proc);
 157   ctx.Eip   = OFFSETOF(data->proc);
 158   free(data);
 159   DPMI_CallRMProc(&ctx, NULL, 0, 0);
 160 }
 161
 162 static void QueueMouseRelay(DWORD mx, DWORD my, WORD mask)
 163 {
 164   mouse_info.x = mx;
 165   mouse_info.y = my;
 166
 167   /* Left button down */
 168   if(mask & 0x02) {
 169     mouse_info.but |= 0x01;
 170     mouse_info.llastx = mx;
 171     mouse_info.llasty = my;
 172     mouse_info.lbcount++;
 173   }
 174
 175   /* Left button up */
 176   if(mask & 0x04) {
 177     mouse_info.but &= ~0x01;
 178   }
 179
 180   /* Right button down */
 181   if(mask & 0x08) {
 182     mouse_info.but |= 0x02;
 183     mouse_info.rlastx = mx;
 184     mouse_info.rlasty = my;
 185     mouse_info.rbcount++;
 186   }
 187
 188   /* Right button up */
 189   if(mask & 0x10) {
 190     mouse_info.but &= ~0x02;
 191   }
 192
 193   /* Middle button down */
 194   if(mask & 0x20) {
 195     mouse_info.but |= 0x04;
 196   }
 197
 198   /* Middle button up */
 199   if(mask & 0x40) {
 200     mouse_info.but &= ~0x04;
 201   }
 202
 203   if ((mask & mouse_info.callmask) && mouse_info.callback) {
 204     MCALLDATA *data = calloc(1,sizeof(MCALLDATA));
 205     data->proc = mouse_info.callback;
 206     data->mask = mask & mouse_info.callmask;
 207     data->but = mouse_info.but;
 208     data->x = mouse_info.x;
 209     data->y = mouse_info.y;
 210
 211     /*
 212      * Fake mickeys.
 213      *
 214      * FIXME: This is not entirely correct. If mouse if moved to the edge
 215      *        of the screen, mouse will stop moving and mickeys won't
 216      *        be updated even though they should be.
 217      */
 218     data->mx = mouse_info.x * (mouse_info.HMPratio / 8);
 219     data->my = mouse_info.y * (mouse_info.VMPratio / 8);
 220
 221     DOSVM_QueueEvent(-1, DOS_PRIORITY_MOUSE, MouseRelay, data);
 222   }
 223 }
 224
 225 void WINAPI DOSVM_Int33Message(UINT message,WPARAM wParam,LPARAM lParam)
 226 {
 227   WORD mask = 0;
 228   unsigned Height, Width, SX=1, SY=1;
 229
 230   if (!VGA_GetMode(&Height,&Width,NULL)) {
 231     /* may need to do some coordinate scaling */
 232     if (Width)
 233       SX = 640/Width;
 234     if (!SX) SX=1;
 235   }
 236
 237   switch (message) {
 238   case WM_MOUSEMOVE:
 239     mask |= 0x01;
 240     break;
 241   case WM_LBUTTONDOWN:
 242   case WM_LBUTTONDBLCLK:
 243     mask |= 0x02;
 244     break;
 245   case WM_LBUTTONUP:
 246     mask |= 0x04;
 247     break;
 248   case WM_RBUTTONDOWN:
 249   case WM_RBUTTONDBLCLK:
 250     mask |= 0x08;
 251     break;
 252   case WM_RBUTTONUP:
 253     mask |= 0x10;
 254     break;
 255   case WM_MBUTTONDOWN:
 256   case WM_MBUTTONDBLCLK:
 257     mask |= 0x20;
 258     break;
 259   case WM_MBUTTONUP:
 260     mask |= 0x40;
 261     break;
 262   }
 263
 264   QueueMouseRelay(LOWORD(lParam) * SX,
 265                  HIWORD(lParam) * SY,
 266                  mask);
 267 }
 268
 269 void WINAPI DOSVM_Int33Console(MOUSE_EVENT_RECORD *record)
 270 {
 271   unsigned Height, Width;
 272   WORD mask = 0;
 273   BOOL newLeftButton = record->dwButtonState & FROM_LEFT_1ST_BUTTON_PRESSED;
 274   BOOL oldLeftButton = mouse_info.but & 0x01;
 275   BOOL newRightButton = record->dwButtonState & RIGHTMOST_BUTTON_PRESSED;
 276   BOOL oldRightButton = mouse_info.but & 0x02;
 277   BOOL newMiddleButton = record->dwButtonState & FROM_LEFT_2ND_BUTTON_PRESSED;
 278   BOOL oldMiddleButton = mouse_info.but & 0x04;
 279
 280   if(newLeftButton && !oldLeftButton)
 281     mask |= 0x02;
 282   else if(!newLeftButton && oldLeftButton)
 283     mask |= 0x04;
 284
 285   if(newRightButton && !oldRightButton)
 286     mask |= 0x08;
 287   else if(!newRightButton && oldRightButton)
 288     mask |= 0x10;
 289
 290   if(newMiddleButton && !oldMiddleButton)
 291     mask |= 0x20;
 292   else if(!newMiddleButton && oldMiddleButton)
 293     mask |= 0x40;
 294
 295   if (VGA_GetAlphaMode(&Width, &Height))
 296     QueueMouseRelay( 640 / Width * record->dwMousePosition.X,
 297                      200 / Height * record->dwMousePosition.Y,
 298                      mask );
 299 }