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