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