git.oblomov.eu Git - wine/blob - dlls/dinput/mouse.c

   1 /*              DirectInput Mouse device
   2  *
   3  * Copyright 1998 Marcus Meissner
   4  * Copyright 1998,1999 Lionel Ulmer
   5  * Copyright 2000-2001 TransGaming Technologies Inc.
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include "config.h"
  23 #include "wine/port.h"
  24
  25 #include <stdarg.h>
  26 #include <string.h>
  27
  28 #include "windef.h"
  29 #include "winbase.h"
  30 #include "wingdi.h"
  31 #include "winuser.h"
  32 #include "winerror.h"
  33 #include "dinput.h"
  34
  35 #include "dinput_private.h"
  36 #include "device_private.h"
  37 #include "wine/debug.h"
  38 #include "wine/unicode.h"
  39
  40 WINE_DEFAULT_DEBUG_CHANNEL(dinput);
  41
  42 /* Wine mouse driver object instances */
  43 #define WINE_MOUSE_X_AXIS_INSTANCE   0
  44 #define WINE_MOUSE_Y_AXIS_INSTANCE   1
  45 #define WINE_MOUSE_Z_AXIS_INSTANCE   2
  46 #define WINE_MOUSE_BUTTONS_INSTANCE  3
  47
  48 static const IDirectInputDevice8AVtbl SysMouseAvt;
  49 static const IDirectInputDevice8WVtbl SysMouseWvt;
  50
  51 typedef struct SysMouseImpl SysMouseImpl;
  52
  53 struct SysMouseImpl
  54 {
  55     struct IDirectInputDevice2AImpl base;
  56
  57     /* SysMouseAImpl */
  58     /* These are used in case of relative -> absolute transitions */
  59     POINT                           org_coords;
  60     POINT                           mapped_center;
  61     DWORD                           win_centerX, win_centerY;
  62     /* warping: whether we need to move mouse back to middle once we
  63      * reach window borders (for e.g. shooters, "surface movement" games) */
  64     BOOL                            need_warp;
  65     DWORD                           last_warped;
  66
  67     /* This is for mouse reporting. */
  68     DIMOUSESTATE2                   m_state;
  69 };
  70
  71 static void dinput_mouse_hook( LPDIRECTINPUTDEVICE8A iface, WPARAM wparam, LPARAM lparam );
  72
  73 const GUID DInput_Wine_Mouse_GUID = { /* 9e573ed8-7734-11d2-8d4a-23903fb6bdf7 */
  74     0x9e573ed8, 0x7734, 0x11d2, {0x8d, 0x4a, 0x23, 0x90, 0x3f, 0xb6, 0xbd, 0xf7}
  75 };
  76
  77 static void fill_mouse_dideviceinstanceA(LPDIDEVICEINSTANCEA lpddi, DWORD version) {
  78     DWORD dwSize;
  79     DIDEVICEINSTANCEA ddi;
  80
  81     dwSize = lpddi->dwSize;
  82
  83     TRACE("%d %p\n", dwSize, lpddi);
  84
  85     memset(lpddi, 0, dwSize);
  86     memset(&ddi, 0, sizeof(ddi));
  87
  88     ddi.dwSize = dwSize;
  89     ddi.guidInstance = GUID_SysMouse;/* DInput's GUID */
  90     ddi.guidProduct = DInput_Wine_Mouse_GUID; /* Vendor's GUID */
  91     if (version >= 0x0800)
  92         ddi.dwDevType = DI8DEVTYPE_MOUSE | (DI8DEVTYPEMOUSE_TRADITIONAL << 8);
  93     else
  94         ddi.dwDevType = DIDEVTYPE_MOUSE | (DIDEVTYPEMOUSE_TRADITIONAL << 8);
  95     strcpy(ddi.tszInstanceName, "Mouse");
  96     strcpy(ddi.tszProductName, "Wine Mouse");
  97
  98     memcpy(lpddi, &ddi, (dwSize < sizeof(ddi) ? dwSize : sizeof(ddi)));
  99 }
 100
 101 static void fill_mouse_dideviceinstanceW(LPDIDEVICEINSTANCEW lpddi, DWORD version) {
 102     DWORD dwSize;
 103     DIDEVICEINSTANCEW ddi;
 104
 105     dwSize = lpddi->dwSize;
 106
 107     TRACE("%d %p\n", dwSize, lpddi);
 108
 109     memset(lpddi, 0, dwSize);
 110     memset(&ddi, 0, sizeof(ddi));
 111
 112     ddi.dwSize = dwSize;
 113     ddi.guidInstance = GUID_SysMouse;/* DInput's GUID */
 114     ddi.guidProduct = DInput_Wine_Mouse_GUID; /* Vendor's GUID */
 115     if (version >= 0x0800)
 116         ddi.dwDevType = DI8DEVTYPE_MOUSE | (DI8DEVTYPEMOUSE_TRADITIONAL << 8);
 117     else
 118         ddi.dwDevType = DIDEVTYPE_MOUSE | (DIDEVTYPEMOUSE_TRADITIONAL << 8);
 119     MultiByteToWideChar(CP_ACP, 0, "Mouse", -1, ddi.tszInstanceName, MAX_PATH);
 120     MultiByteToWideChar(CP_ACP, 0, "Wine Mouse", -1, ddi.tszProductName, MAX_PATH);
 121
 122     memcpy(lpddi, &ddi, (dwSize < sizeof(ddi) ? dwSize : sizeof(ddi)));
 123 }
 124
 125 static BOOL mousedev_enum_deviceA(DWORD dwDevType, DWORD dwFlags, LPDIDEVICEINSTANCEA lpddi, DWORD version, int id)
 126 {
 127     if (id != 0)
 128         return FALSE;
 129
 130     if ((dwDevType == 0) ||
 131         ((dwDevType == DIDEVTYPE_MOUSE) && (version < 0x0800)) ||
 132         (((dwDevType == DI8DEVCLASS_POINTER) || (dwDevType == DI8DEVTYPE_MOUSE)) && (version >= 0x0800))) {
 133         TRACE("Enumerating the mouse device\n");
 134
 135         fill_mouse_dideviceinstanceA(lpddi, version);
 136
 137         return TRUE;
 138     }
 139
 140     return FALSE;
 141 }
 142
 143 static BOOL mousedev_enum_deviceW(DWORD dwDevType, DWORD dwFlags, LPDIDEVICEINSTANCEW lpddi, DWORD version, int id)
 144 {
 145     if (id != 0)
 146         return FALSE;
 147
 148     if ((dwDevType == 0) ||
 149         ((dwDevType == DIDEVTYPE_MOUSE) && (version < 0x0800)) ||
 150         (((dwDevType == DI8DEVCLASS_POINTER) || (dwDevType == DI8DEVTYPE_MOUSE)) && (version >= 0x0800))) {
 151         TRACE("Enumerating the mouse device\n");
 152
 153         fill_mouse_dideviceinstanceW(lpddi, version);
 154
 155         return TRUE;
 156     }
 157
 158     return FALSE;
 159 }
 160
 161 static SysMouseImpl *alloc_device(REFGUID rguid, const void *mvt, IDirectInputImpl *dinput)
 162 {
 163     SysMouseImpl* newDevice;
 164     LPDIDATAFORMAT df = NULL;
 165     int i;
 166
 167     newDevice = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(SysMouseImpl));
 168     if (!newDevice) return NULL;
 169     newDevice->base.lpVtbl = mvt;
 170     newDevice->base.ref = 1;
 171     newDevice->base.dwCoopLevel = DISCL_NONEXCLUSIVE | DISCL_BACKGROUND;
 172     memcpy(&newDevice->base.guid, rguid, sizeof(*rguid));
 173     InitializeCriticalSection(&newDevice->base.crit);
 174     newDevice->base.crit.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": SysMouseImpl*->base.crit");
 175     newDevice->base.dinput = dinput;
 176     newDevice->base.event_proc = dinput_mouse_hook;
 177
 178     /* Create copy of default data format */
 179     if (!(df = HeapAlloc(GetProcessHeap(), 0, c_dfDIMouse2.dwSize))) goto failed;
 180     memcpy(df, &c_dfDIMouse2, c_dfDIMouse2.dwSize);
 181     if (!(df->rgodf = HeapAlloc(GetProcessHeap(), 0, df->dwNumObjs * df->dwObjSize))) goto failed;
 182     memcpy(df->rgodf, c_dfDIMouse2.rgodf, df->dwNumObjs * df->dwObjSize);
 183
 184     /* Because we don't do any detection yet just modify instance and type */
 185     for (i = 0; i < df->dwNumObjs; i++)
 186         if (DIDFT_GETTYPE(df->rgodf[i].dwType) & DIDFT_AXIS)
 187             df->rgodf[i].dwType = DIDFT_MAKEINSTANCE(i) | DIDFT_RELAXIS;
 188         else
 189             df->rgodf[i].dwType = DIDFT_MAKEINSTANCE(i) | DIDFT_PSHBUTTON;
 190
 191     newDevice->base.data_format.wine_df = df;
 192     IDirectInput_AddRef((LPDIRECTINPUTDEVICE8A)newDevice->base.dinput);
 193     return newDevice;
 194
 195 failed:
 196     if (df) HeapFree(GetProcessHeap(), 0, df->rgodf);
 197     HeapFree(GetProcessHeap(), 0, df);
 198     HeapFree(GetProcessHeap(), 0, newDevice);
 199     return NULL;
 200 }
 201
 202 static HRESULT mousedev_create_deviceA(IDirectInputImpl *dinput, REFGUID rguid, REFIID riid, LPDIRECTINPUTDEVICEA* pdev)
 203 {
 204     if ((IsEqualGUID(&GUID_SysMouse,rguid)) ||             /* Generic Mouse */
 205         (IsEqualGUID(&DInput_Wine_Mouse_GUID,rguid))) { /* Wine Mouse */
 206         if ((riid == NULL) ||
 207             IsEqualGUID(&IID_IDirectInputDeviceA,riid) ||
 208             IsEqualGUID(&IID_IDirectInputDevice2A,riid) ||
 209             IsEqualGUID(&IID_IDirectInputDevice7A,riid) ||
 210             IsEqualGUID(&IID_IDirectInputDevice8A,riid)) {
 211             *pdev = (IDirectInputDeviceA*) alloc_device(rguid, &SysMouseAvt, dinput);
 212             TRACE("Creating a Mouse device (%p)\n", *pdev);
 213             if (!*pdev) return DIERR_OUTOFMEMORY;
 214             return DI_OK;
 215         } else
 216             return DIERR_NOINTERFACE;
 217     }
 218
 219     return DIERR_DEVICENOTREG;
 220 }
 221
 222 static HRESULT mousedev_create_deviceW(IDirectInputImpl *dinput, REFGUID rguid, REFIID riid, LPDIRECTINPUTDEVICEW* pdev)
 223 {
 224     if ((IsEqualGUID(&GUID_SysMouse,rguid)) ||             /* Generic Mouse */
 225         (IsEqualGUID(&DInput_Wine_Mouse_GUID,rguid))) { /* Wine Mouse */
 226         if ((riid == NULL) ||
 227             IsEqualGUID(&IID_IDirectInputDeviceW,riid) ||
 228             IsEqualGUID(&IID_IDirectInputDevice2W,riid) ||
 229             IsEqualGUID(&IID_IDirectInputDevice7W,riid) ||
 230             IsEqualGUID(&IID_IDirectInputDevice8W,riid)) {
 231             *pdev = (IDirectInputDeviceW*) alloc_device(rguid, &SysMouseWvt, dinput);
 232             TRACE("Creating a Mouse device (%p)\n", *pdev);
 233             if (!*pdev) return DIERR_OUTOFMEMORY;
 234             return DI_OK;
 235         } else
 236             return DIERR_NOINTERFACE;
 237     }
 238
 239     return DIERR_DEVICENOTREG;
 240 }
 241
 242 const struct dinput_device mouse_device = {
 243     "Wine mouse driver",
 244     mousedev_enum_deviceA,
 245     mousedev_enum_deviceW,
 246     mousedev_create_deviceA,
 247     mousedev_create_deviceW
 248 };
 249
 250 /******************************************************************************
 251  *      SysMouseA (DInput Mouse support)
 252  */
 253
 254 /* low-level mouse hook */
 255 static void dinput_mouse_hook( LPDIRECTINPUTDEVICE8A iface, WPARAM wparam, LPARAM lparam )
 256 {
 257     MSLLHOOKSTRUCT *hook = (MSLLHOOKSTRUCT *)lparam;
 258     SysMouseImpl* This = (SysMouseImpl*) iface;
 259     DWORD dwCoop;
 260     int wdata = 0, inst_id = -1;
 261
 262     EnterCriticalSection(&This->base.crit);
 263     dwCoop = This->base.dwCoopLevel;
 264
 265     switch(wparam) {
 266         case WM_MOUSEMOVE:
 267         {
 268             POINT pt, pt1;
 269
 270             GetCursorPos(&pt);
 271             This->m_state.lX += pt.x = hook->pt.x - pt.x;
 272             This->m_state.lY += pt.y = hook->pt.y - pt.y;
 273
 274             if (This->base.data_format.user_df->dwFlags & DIDF_ABSAXIS)
 275             {
 276                 pt1.x = This->m_state.lX;
 277                 pt1.y = This->m_state.lY;
 278             } else
 279                 pt1 = pt;
 280
 281             if (pt.x)
 282                 queue_event((LPDIRECTINPUTDEVICE8A)This, id_to_offset(&This->base.data_format,
 283                             DIDFT_MAKEINSTANCE(WINE_MOUSE_X_AXIS_INSTANCE) | DIDFT_RELAXIS),
 284                             pt1.x, hook->time, This->base.dinput->evsequence);
 285             if (pt.y)
 286             {
 287                 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_Y_AXIS_INSTANCE) | DIDFT_RELAXIS;
 288                 wdata = pt1.y;
 289             }
 290
 291             This->need_warp = (pt.x || pt.y) && dwCoop & DISCL_EXCLUSIVE;
 292             break;
 293         }
 294         case WM_MOUSEWHEEL:
 295             inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_Z_AXIS_INSTANCE) | DIDFT_RELAXIS;
 296             This->m_state.lZ += wdata = (short)HIWORD(hook->mouseData);
 297             break;
 298         case WM_LBUTTONDOWN:
 299             inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 0) | DIDFT_PSHBUTTON;
 300             This->m_state.rgbButtons[0] = wdata = 0x80;
 301             break;
 302         case WM_LBUTTONUP:
 303             inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 0) | DIDFT_PSHBUTTON;
 304             This->m_state.rgbButtons[0] = wdata = 0x00;
 305             break;
 306         case WM_RBUTTONDOWN:
 307             inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 1) | DIDFT_PSHBUTTON;
 308             This->m_state.rgbButtons[1] = wdata = 0x80;
 309             break;
 310         case WM_RBUTTONUP:
 311             inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 1) | DIDFT_PSHBUTTON;
 312             This->m_state.rgbButtons[1] = wdata = 0x00;
 313             break;
 314         case WM_MBUTTONDOWN:
 315             inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 2) | DIDFT_PSHBUTTON;
 316             This->m_state.rgbButtons[2] = wdata = 0x80;
 317             break;
 318         case WM_MBUTTONUP:
 319             inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 2) | DIDFT_PSHBUTTON;
 320             This->m_state.rgbButtons[2] = wdata = 0x00;
 321             break;
 322         case WM_XBUTTONDOWN:
 323             inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 2 + HIWORD(hook->mouseData)) | DIDFT_PSHBUTTON;
 324             This->m_state.rgbButtons[2 + HIWORD(hook->mouseData)] = wdata = 0x80;
 325             break;
 326         case WM_XBUTTONUP:
 327             inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 2 + HIWORD(hook->mouseData)) | DIDFT_PSHBUTTON;
 328             This->m_state.rgbButtons[2 + HIWORD(hook->mouseData)] = wdata = 0x00;
 329             break;
 330     }
 331
 332     if (TRACE_ON(dinput))
 333     {
 334         int i;
 335
 336         TRACE("msg %lx @ (%d %d): (X: %d Y: %d Z: %d", wparam, hook->pt.x, hook->pt.y,
 337               This->m_state.lX, This->m_state.lY, This->m_state.lZ);
 338         for (i = 0; i < 5; i++) TRACE(" B%d: %02x", i, This->m_state.rgbButtons[i]);
 339         TRACE(")\n");
 340     }
 341     if (inst_id != -1)
 342         queue_event((LPDIRECTINPUTDEVICE8A)This, id_to_offset(&This->base.data_format, inst_id),
 343                     wdata, hook->time, This->base.dinput->evsequence++);
 344
 345     LeaveCriticalSection(&This->base.crit);
 346 }
 347
 348 static BOOL dinput_window_check(SysMouseImpl* This) {
 349     RECT rect;
 350     DWORD centerX, centerY;
 351
 352     /* make sure the window hasn't moved */
 353     if(!GetWindowRect(This->base.win, &rect))
 354         return FALSE;
 355     centerX = (rect.right  - rect.left) / 2;
 356     centerY = (rect.bottom - rect.top ) / 2;
 357     if (This->win_centerX != centerX || This->win_centerY != centerY) {
 358         This->win_centerX = centerX;
 359         This->win_centerY = centerY;
 360     }
 361     This->mapped_center.x = This->win_centerX;
 362     This->mapped_center.y = This->win_centerY;
 363     MapWindowPoints(This->base.win, HWND_DESKTOP, &This->mapped_center, 1);
 364     return TRUE;
 365 }
 366
 367
 368 /******************************************************************************
 369   *     Acquire : gets exclusive control of the mouse
 370   */
 371 static HRESULT WINAPI SysMouseAImpl_Acquire(LPDIRECTINPUTDEVICE8A iface)
 372 {
 373     SysMouseImpl *This = (SysMouseImpl *)iface;
 374     RECT  rect;
 375     POINT point;
 376     HRESULT res;
 377
 378     TRACE("(this=%p)\n",This);
 379
 380     if ((res = IDirectInputDevice2AImpl_Acquire(iface)) != DI_OK) return res;
 381
 382     /* Init the mouse state */
 383     GetCursorPos( &point );
 384     if (This->base.data_format.user_df->dwFlags & DIDF_ABSAXIS)
 385     {
 386       This->m_state.lX = point.x;
 387       This->m_state.lY = point.y;
 388     } else {
 389       This->m_state.lX = 0;
 390       This->m_state.lY = 0;
 391       This->org_coords = point;
 392     }
 393     This->m_state.lZ = 0;
 394     This->m_state.rgbButtons[0] = GetKeyState(VK_LBUTTON) & 0x80;
 395     This->m_state.rgbButtons[1] = GetKeyState(VK_RBUTTON) & 0x80;
 396     This->m_state.rgbButtons[2] = GetKeyState(VK_MBUTTON) & 0x80;
 397
 398     /* Install our mouse hook */
 399     if (This->base.dwCoopLevel & DISCL_EXCLUSIVE)
 400       ShowCursor(FALSE); /* hide cursor */
 401
 402     /* Get the window dimension and find the center */
 403     GetWindowRect(This->base.win, &rect);
 404     This->win_centerX = (rect.right  - rect.left) / 2;
 405     This->win_centerY = (rect.bottom - rect.top ) / 2;
 406
 407     /* Warp the mouse to the center of the window */
 408     if (This->base.dwCoopLevel & DISCL_EXCLUSIVE)
 409     {
 410       This->mapped_center.x = This->win_centerX;
 411       This->mapped_center.y = This->win_centerY;
 412       MapWindowPoints(This->base.win, HWND_DESKTOP, &This->mapped_center, 1);
 413       TRACE("Warping mouse to %d - %d\n", This->mapped_center.x, This->mapped_center.y);
 414       SetCursorPos( This->mapped_center.x, This->mapped_center.y );
 415       This->last_warped = GetCurrentTime();
 416
 417       This->need_warp = FALSE;
 418     }
 419
 420     return DI_OK;
 421 }
 422
 423 /******************************************************************************
 424   *     Unacquire : frees the mouse
 425   */
 426 static HRESULT WINAPI SysMouseAImpl_Unacquire(LPDIRECTINPUTDEVICE8A iface)
 427 {
 428     SysMouseImpl *This = (SysMouseImpl *)iface;
 429     HRESULT res;
 430
 431     TRACE("(this=%p)\n",This);
 432
 433     if ((res = IDirectInputDevice2AImpl_Unacquire(iface)) != DI_OK) return res;
 434
 435     if (This->base.dwCoopLevel & DISCL_EXCLUSIVE)
 436         ShowCursor(TRUE); /* show cursor */
 437
 438     /* And put the mouse cursor back where it was at acquire time */
 439     if (This->base.dwCoopLevel & DISCL_EXCLUSIVE)
 440     {
 441       TRACE(" warping mouse back to (%d , %d)\n", This->org_coords.x, This->org_coords.y);
 442       SetCursorPos(This->org_coords.x, This->org_coords.y);
 443     }
 444
 445     return DI_OK;
 446 }
 447
 448 /******************************************************************************
 449   *     GetDeviceState : returns the "state" of the mouse.
 450   *
 451   *   For the moment, only the "standard" return structure (DIMOUSESTATE) is
 452   *   supported.
 453   */
 454 static HRESULT WINAPI SysMouseAImpl_GetDeviceState(
 455         LPDIRECTINPUTDEVICE8A iface,DWORD len,LPVOID ptr
 456 ) {
 457     SysMouseImpl *This = (SysMouseImpl *)iface;
 458
 459     if(This->base.acquired == 0) return DIERR_NOTACQUIRED;
 460
 461     TRACE("(this=%p,0x%08x,%p):\n", This, len, ptr);
 462     TRACE("(X: %d - Y: %d - Z: %d  L: %02x M: %02x R: %02x)\n",
 463           This->m_state.lX, This->m_state.lY, This->m_state.lZ,
 464           This->m_state.rgbButtons[0], This->m_state.rgbButtons[2], This->m_state.rgbButtons[1]);
 465
 466     EnterCriticalSection(&This->base.crit);
 467     /* Copy the current mouse state */
 468     fill_DataFormat(ptr, &(This->m_state), &This->base.data_format);
 469
 470     /* Initialize the buffer when in relative mode */
 471     if (!(This->base.data_format.user_df->dwFlags & DIDF_ABSAXIS))
 472     {
 473         This->m_state.lX = 0;
 474         This->m_state.lY = 0;
 475         This->m_state.lZ = 0;
 476     }
 477     LeaveCriticalSection(&This->base.crit);
 478
 479     /* Check if we need to do a mouse warping */
 480     if (This->need_warp && (GetCurrentTime() - This->last_warped > 10))
 481     {
 482         if(!dinput_window_check(This))
 483             return DIERR_GENERIC;
 484         TRACE("Warping mouse to %d - %d\n", This->mapped_center.x, This->mapped_center.y);
 485         SetCursorPos( This->mapped_center.x, This->mapped_center.y );
 486         This->last_warped = GetCurrentTime();
 487
 488         This->need_warp = FALSE;
 489     }
 490
 491     return DI_OK;
 492 }
 493
 494 /******************************************************************************
 495   *     GetDeviceData : gets buffered input data.
 496   */
 497 static HRESULT WINAPI SysMouseAImpl_GetDeviceData(LPDIRECTINPUTDEVICE8A iface,
 498         DWORD dodsize, LPDIDEVICEOBJECTDATA dod, LPDWORD entries, DWORD flags)
 499 {
 500     SysMouseImpl *This = (SysMouseImpl *)iface;
 501     HRESULT res;
 502
 503     res = IDirectInputDevice2AImpl_GetDeviceData(iface, dodsize, dod, entries, flags);
 504     if (FAILED(res)) return res;
 505
 506     /* Check if we need to do a mouse warping */
 507     if (This->need_warp && (GetCurrentTime() - This->last_warped > 10))
 508     {
 509         if(!dinput_window_check(This))
 510             return DIERR_GENERIC;
 511         TRACE("Warping mouse to %d - %d\n", This->mapped_center.x, This->mapped_center.y);
 512         SetCursorPos( This->mapped_center.x, This->mapped_center.y );
 513         This->last_warped = GetCurrentTime();
 514
 515         This->need_warp = FALSE;
 516     }
 517     return res;
 518 }
 519
 520 /******************************************************************************
 521   *     GetProperty : get input device properties
 522   */
 523 static HRESULT WINAPI SysMouseAImpl_GetProperty(LPDIRECTINPUTDEVICE8A iface,
 524                                                 REFGUID rguid,
 525                                                 LPDIPROPHEADER pdiph)
 526 {
 527     SysMouseImpl *This = (SysMouseImpl *)iface;
 528
 529     TRACE("(%p) %s,%p\n", This, debugstr_guid(rguid), pdiph);
 530     _dump_DIPROPHEADER(pdiph);
 531
 532     if (!HIWORD(rguid)) {
 533         switch (LOWORD(rguid)) {
 534             case (DWORD) DIPROP_GRANULARITY: {
 535                 LPDIPROPDWORD pr = (LPDIPROPDWORD) pdiph;
 536
 537                 /* We'll just assume that the app asks about the Z axis */
 538                 pr->dwData = WHEEL_DELTA;
 539
 540                 break;
 541             }
 542
 543             case (DWORD) DIPROP_RANGE: {
 544                 LPDIPROPRANGE pr = (LPDIPROPRANGE) pdiph;
 545
 546                 if ((pdiph->dwHow == DIPH_BYID) &&
 547                     ((pdiph->dwObj == (DIDFT_MAKEINSTANCE(WINE_MOUSE_X_AXIS_INSTANCE) | DIDFT_RELAXIS)) ||
 548                      (pdiph->dwObj == (DIDFT_MAKEINSTANCE(WINE_MOUSE_Y_AXIS_INSTANCE) | DIDFT_RELAXIS)))) {
 549                     /* Querying the range of either the X or the Y axis.  As I do
 550                        not know the range, do as if the range were
 551                        unrestricted...*/
 552                     pr->lMin = DIPROPRANGE_NOMIN;
 553                     pr->lMax = DIPROPRANGE_NOMAX;
 554                 }
 555
 556                 break;
 557             }
 558
 559             default:
 560                 return IDirectInputDevice2AImpl_GetProperty(iface, rguid, pdiph);
 561         }
 562     }
 563
 564     return DI_OK;
 565 }
 566
 567 /******************************************************************************
 568   *     GetCapabilities : get the device capablitites
 569   */
 570 static HRESULT WINAPI SysMouseAImpl_GetCapabilities(
 571         LPDIRECTINPUTDEVICE8A iface,
 572         LPDIDEVCAPS lpDIDevCaps)
 573 {
 574     SysMouseImpl *This = (SysMouseImpl *)iface;
 575     DIDEVCAPS devcaps;
 576
 577     TRACE("(this=%p,%p)\n",This,lpDIDevCaps);
 578
 579     if ((lpDIDevCaps->dwSize != sizeof(DIDEVCAPS)) && (lpDIDevCaps->dwSize != sizeof(DIDEVCAPS_DX3))) {
 580         WARN("invalid parameter\n");
 581         return DIERR_INVALIDPARAM;
 582     }
 583
 584     devcaps.dwSize = lpDIDevCaps->dwSize;
 585     devcaps.dwFlags = DIDC_ATTACHED;
 586     if (This->base.dinput->dwVersion >= 0x0800)
 587         devcaps.dwDevType = DI8DEVTYPE_MOUSE | (DI8DEVTYPEMOUSE_TRADITIONAL << 8);
 588     else
 589         devcaps.dwDevType = DIDEVTYPE_MOUSE | (DIDEVTYPEMOUSE_TRADITIONAL << 8);
 590     devcaps.dwAxes = 3;
 591     devcaps.dwButtons = 8;
 592     devcaps.dwPOVs = 0;
 593     devcaps.dwFFSamplePeriod = 0;
 594     devcaps.dwFFMinTimeResolution = 0;
 595     devcaps.dwFirmwareRevision = 100;
 596     devcaps.dwHardwareRevision = 100;
 597     devcaps.dwFFDriverVersion = 0;
 598
 599     memcpy(lpDIDevCaps, &devcaps, lpDIDevCaps->dwSize);
 600
 601     return DI_OK;
 602 }
 603
 604 /******************************************************************************
 605   *     GetObjectInfo : get information about a device object such as a button
 606   *                     or axis
 607   */
 608 static HRESULT WINAPI SysMouseWImpl_GetObjectInfo(LPDIRECTINPUTDEVICE8W iface,
 609         LPDIDEVICEOBJECTINSTANCEW pdidoi, DWORD dwObj, DWORD dwHow)
 610 {
 611     static const WCHAR x_axisW[] = {'X','-','A','x','i','s',0};
 612     static const WCHAR y_axisW[] = {'Y','-','A','x','i','s',0};
 613     static const WCHAR wheelW[] = {'W','h','e','e','l',0};
 614     static const WCHAR buttonW[] = {'B','u','t','t','o','n',' ','%','d',0};
 615     HRESULT res;
 616
 617     res = IDirectInputDevice2WImpl_GetObjectInfo(iface, pdidoi, dwObj, dwHow);
 618     if (res != DI_OK) return res;
 619
 620     if      (IsEqualGUID(&pdidoi->guidType, &GUID_XAxis)) strcpyW(pdidoi->tszName, x_axisW);
 621     else if (IsEqualGUID(&pdidoi->guidType, &GUID_YAxis)) strcpyW(pdidoi->tszName, y_axisW);
 622     else if (IsEqualGUID(&pdidoi->guidType, &GUID_ZAxis)) strcpyW(pdidoi->tszName, wheelW);
 623     else if (pdidoi->dwType & DIDFT_BUTTON)
 624         wsprintfW(pdidoi->tszName, buttonW, DIDFT_GETINSTANCE(pdidoi->dwType) - 3);
 625
 626     _dump_OBJECTINSTANCEW(pdidoi);
 627     return res;
 628 }
 629
 630 static HRESULT WINAPI SysMouseAImpl_GetObjectInfo(LPDIRECTINPUTDEVICE8A iface,
 631         LPDIDEVICEOBJECTINSTANCEA pdidoi, DWORD dwObj, DWORD dwHow)
 632 {
 633     HRESULT res;
 634     DIDEVICEOBJECTINSTANCEW didoiW;
 635     DWORD dwSize = pdidoi->dwSize;
 636
 637     didoiW.dwSize = sizeof(didoiW);
 638     res = SysMouseWImpl_GetObjectInfo((LPDIRECTINPUTDEVICE8W)iface, &didoiW, dwObj, dwHow);
 639     if (res != DI_OK) return res;
 640
 641     memset(pdidoi, 0, pdidoi->dwSize);
 642     memcpy(pdidoi, &didoiW, FIELD_OFFSET(DIDEVICEOBJECTINSTANCEW, tszName));
 643     pdidoi->dwSize = dwSize;
 644     WideCharToMultiByte(CP_ACP, 0, didoiW.tszName, -1, pdidoi->tszName,
 645                         sizeof(pdidoi->tszName), NULL, NULL);
 646
 647     return res;
 648 }
 649
 650 /******************************************************************************
 651   *     GetDeviceInfo : get information about a device's identity
 652   */
 653 static HRESULT WINAPI SysMouseAImpl_GetDeviceInfo(
 654         LPDIRECTINPUTDEVICE8A iface,
 655         LPDIDEVICEINSTANCEA pdidi)
 656 {
 657     SysMouseImpl *This = (SysMouseImpl *)iface;
 658     TRACE("(this=%p,%p)\n", This, pdidi);
 659
 660     if (pdidi->dwSize != sizeof(DIDEVICEINSTANCEA)) {
 661         WARN(" dinput3 not supporte yet...\n");
 662         return DI_OK;
 663     }
 664
 665     fill_mouse_dideviceinstanceA(pdidi, This->base.dinput->dwVersion);
 666
 667     return DI_OK;
 668 }
 669
 670 static HRESULT WINAPI SysMouseWImpl_GetDeviceInfo(LPDIRECTINPUTDEVICE8W iface, LPDIDEVICEINSTANCEW pdidi)
 671 {
 672     SysMouseImpl *This = (SysMouseImpl *)iface;
 673     TRACE("(this=%p,%p)\n", This, pdidi);
 674
 675     if (pdidi->dwSize != sizeof(DIDEVICEINSTANCEW)) {
 676         WARN(" dinput3 not supporte yet...\n");
 677         return DI_OK;
 678     }
 679
 680     fill_mouse_dideviceinstanceW(pdidi, This->base.dinput->dwVersion);
 681
 682     return DI_OK;
 683 }
 684
 685
 686 static const IDirectInputDevice8AVtbl SysMouseAvt =
 687 {
 688     IDirectInputDevice2AImpl_QueryInterface,
 689     IDirectInputDevice2AImpl_AddRef,
 690     IDirectInputDevice2AImpl_Release,
 691     SysMouseAImpl_GetCapabilities,
 692     IDirectInputDevice2AImpl_EnumObjects,
 693     SysMouseAImpl_GetProperty,
 694     IDirectInputDevice2AImpl_SetProperty,
 695     SysMouseAImpl_Acquire,
 696     SysMouseAImpl_Unacquire,
 697     SysMouseAImpl_GetDeviceState,
 698     SysMouseAImpl_GetDeviceData,
 699     IDirectInputDevice2AImpl_SetDataFormat,
 700     IDirectInputDevice2AImpl_SetEventNotification,
 701     IDirectInputDevice2AImpl_SetCooperativeLevel,
 702     SysMouseAImpl_GetObjectInfo,
 703     SysMouseAImpl_GetDeviceInfo,
 704     IDirectInputDevice2AImpl_RunControlPanel,
 705     IDirectInputDevice2AImpl_Initialize,
 706     IDirectInputDevice2AImpl_CreateEffect,
 707     IDirectInputDevice2AImpl_EnumEffects,
 708     IDirectInputDevice2AImpl_GetEffectInfo,
 709     IDirectInputDevice2AImpl_GetForceFeedbackState,
 710     IDirectInputDevice2AImpl_SendForceFeedbackCommand,
 711     IDirectInputDevice2AImpl_EnumCreatedEffectObjects,
 712     IDirectInputDevice2AImpl_Escape,
 713     IDirectInputDevice2AImpl_Poll,
 714     IDirectInputDevice2AImpl_SendDeviceData,
 715     IDirectInputDevice7AImpl_EnumEffectsInFile,
 716     IDirectInputDevice7AImpl_WriteEffectToFile,
 717     IDirectInputDevice8AImpl_BuildActionMap,
 718     IDirectInputDevice8AImpl_SetActionMap,
 719     IDirectInputDevice8AImpl_GetImageInfo
 720 };
 721
 722 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
 723 # define XCAST(fun)     (typeof(SysMouseWvt.fun))
 724 #else
 725 # define XCAST(fun)     (void*)
 726 #endif
 727
 728 static const IDirectInputDevice8WVtbl SysMouseWvt =
 729 {
 730     IDirectInputDevice2WImpl_QueryInterface,
 731     XCAST(AddRef)IDirectInputDevice2AImpl_AddRef,
 732     XCAST(Release)IDirectInputDevice2AImpl_Release,
 733     XCAST(GetCapabilities)SysMouseAImpl_GetCapabilities,
 734     IDirectInputDevice2WImpl_EnumObjects,
 735     XCAST(GetProperty)SysMouseAImpl_GetProperty,
 736     XCAST(SetProperty)IDirectInputDevice2AImpl_SetProperty,
 737     XCAST(Acquire)SysMouseAImpl_Acquire,
 738     XCAST(Unacquire)SysMouseAImpl_Unacquire,
 739     XCAST(GetDeviceState)SysMouseAImpl_GetDeviceState,
 740     XCAST(GetDeviceData)SysMouseAImpl_GetDeviceData,
 741     XCAST(SetDataFormat)IDirectInputDevice2AImpl_SetDataFormat,
 742     XCAST(SetEventNotification)IDirectInputDevice2AImpl_SetEventNotification,
 743     XCAST(SetCooperativeLevel)IDirectInputDevice2AImpl_SetCooperativeLevel,
 744     SysMouseWImpl_GetObjectInfo,
 745     SysMouseWImpl_GetDeviceInfo,
 746     XCAST(RunControlPanel)IDirectInputDevice2AImpl_RunControlPanel,
 747     XCAST(Initialize)IDirectInputDevice2AImpl_Initialize,
 748     XCAST(CreateEffect)IDirectInputDevice2AImpl_CreateEffect,
 749     IDirectInputDevice2WImpl_EnumEffects,
 750     IDirectInputDevice2WImpl_GetEffectInfo,
 751     XCAST(GetForceFeedbackState)IDirectInputDevice2AImpl_GetForceFeedbackState,
 752     XCAST(SendForceFeedbackCommand)IDirectInputDevice2AImpl_SendForceFeedbackCommand,
 753     XCAST(EnumCreatedEffectObjects)IDirectInputDevice2AImpl_EnumCreatedEffectObjects,
 754     XCAST(Escape)IDirectInputDevice2AImpl_Escape,
 755     XCAST(Poll)IDirectInputDevice2AImpl_Poll,
 756     XCAST(SendDeviceData)IDirectInputDevice2AImpl_SendDeviceData,
 757     IDirectInputDevice7WImpl_EnumEffectsInFile,
 758     IDirectInputDevice7WImpl_WriteEffectToFile,
 759     IDirectInputDevice8WImpl_BuildActionMap,
 760     IDirectInputDevice8WImpl_SetActionMap,
 761     IDirectInputDevice8WImpl_GetImageInfo
 762 };
 763 #undef XCAST