Copy data structures one at a time using supplied size.
[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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  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 #define MOUSE_HACK
41
42 WINE_DEFAULT_DEBUG_CHANNEL(dinput);
43
44 /* Wine mouse driver object instances */
45 #define WINE_MOUSE_X_AXIS_INSTANCE   0
46 #define WINE_MOUSE_Y_AXIS_INSTANCE   1
47 #define WINE_MOUSE_Z_AXIS_INSTANCE   2
48 #define WINE_MOUSE_L_BUTTON_INSTANCE 0
49 #define WINE_MOUSE_R_BUTTON_INSTANCE 1
50 #define WINE_MOUSE_M_BUTTON_INSTANCE 2
51 #define WINE_MOUSE_D_BUTTON_INSTANCE 3
52
53 /* ------------------------------- */
54 /* Wine mouse internal data format */
55 /* ------------------------------- */
56
57 /* Constants used to access the offset array */
58 #define WINE_MOUSE_X_POSITION 0
59 #define WINE_MOUSE_Y_POSITION 1
60 #define WINE_MOUSE_Z_POSITION 2
61 #define WINE_MOUSE_L_POSITION 3
62 #define WINE_MOUSE_R_POSITION 4
63 #define WINE_MOUSE_M_POSITION 5
64
65 typedef struct {
66     LONG lX;
67     LONG lY;
68     LONG lZ;
69     BYTE rgbButtons[4];
70 } Wine_InternalMouseData;
71
72 #define WINE_INTERNALMOUSE_NUM_OBJS 6
73
74 static const DIOBJECTDATAFORMAT Wine_InternalMouseObjectFormat[WINE_INTERNALMOUSE_NUM_OBJS] = {
75     { &GUID_XAxis,   FIELD_OFFSET(Wine_InternalMouseData, lX),
76           DIDFT_MAKEINSTANCE(WINE_MOUSE_X_AXIS_INSTANCE) | DIDFT_RELAXIS, 0 },
77     { &GUID_YAxis,   FIELD_OFFSET(Wine_InternalMouseData, lY),
78           DIDFT_MAKEINSTANCE(WINE_MOUSE_Y_AXIS_INSTANCE) | DIDFT_RELAXIS, 0 },
79     { &GUID_ZAxis,   FIELD_OFFSET(Wine_InternalMouseData, lZ),
80           DIDFT_MAKEINSTANCE(WINE_MOUSE_Z_AXIS_INSTANCE) | DIDFT_RELAXIS, 0 },
81     { &GUID_Button, (FIELD_OFFSET(Wine_InternalMouseData, rgbButtons)) + 0,
82           DIDFT_MAKEINSTANCE(WINE_MOUSE_L_BUTTON_INSTANCE) | DIDFT_PSHBUTTON, 0 },
83     { &GUID_Button, (FIELD_OFFSET(Wine_InternalMouseData, rgbButtons)) + 1,
84           DIDFT_MAKEINSTANCE(WINE_MOUSE_R_BUTTON_INSTANCE) | DIDFT_PSHBUTTON, 0 },
85     { &GUID_Button, (FIELD_OFFSET(Wine_InternalMouseData, rgbButtons)) + 2,
86           DIDFT_MAKEINSTANCE(WINE_MOUSE_M_BUTTON_INSTANCE) | DIDFT_PSHBUTTON, 0 }
87 };
88
89 static const DIDATAFORMAT Wine_InternalMouseFormat = {
90     0, /* dwSize - unused */
91     0, /* dwObjsize - unused */
92     0, /* dwFlags - unused */
93     sizeof(Wine_InternalMouseData),
94     WINE_INTERNALMOUSE_NUM_OBJS, /* dwNumObjs */
95     (LPDIOBJECTDATAFORMAT) Wine_InternalMouseObjectFormat
96 };
97
98 static IDirectInputDevice8AVtbl SysMouseAvt;
99 static IDirectInputDevice8WVtbl SysMouseWvt;
100
101 typedef struct SysMouseImpl SysMouseImpl;
102
103 typedef enum {
104     WARP_DONE,   /* Warping has been done */
105     WARP_NEEDED, /* Warping is needed */
106     WARP_STARTED /* Warping has been done, waiting for the warp event */
107 } WARP_STATUS;
108
109 struct SysMouseImpl
110 {
111     LPVOID                          lpVtbl;
112     DWORD                           ref;
113     GUID                            guid;
114     
115     IDirectInputImpl               *dinput;
116     
117     /* The current data format and the conversion between internal
118        and external data formats */
119     DIDATAFORMAT                   *df;
120     DataFormat                     *wine_df;
121     int                             offset_array[WINE_INTERNALMOUSE_NUM_OBJS];
122     
123     /* SysMouseAImpl */
124     BYTE                            absolute;
125     /* Previous position for relative moves */
126     LONG                            prevX, prevY;
127     /* These are used in case of relative -> absolute transitions */
128     POINT                           org_coords;
129     HHOOK                           hook;
130     HWND                            win;
131     DWORD                           dwCoopLevel;
132     POINT                           mapped_center;
133     DWORD                           win_centerX, win_centerY;
134     LPDIDEVICEOBJECTDATA            data_queue;
135     int                             queue_head, queue_tail, queue_len;
136     BOOL                            overflow;
137     /* warping: whether we need to move mouse back to middle once we
138      * reach window borders (for e.g. shooters, "surface movement" games) */
139     WARP_STATUS                     need_warp;
140     int                             acquired;
141     HANDLE                          hEvent;
142     CRITICAL_SECTION                crit;
143     
144     /* This is for mouse reporting. */
145     Wine_InternalMouseData          m_state;
146 };
147
148 /* FIXME: This is ugly and not thread safe :/ */
149 static IDirectInputDevice8A* current_lock = NULL;
150
151 static GUID DInput_Wine_Mouse_GUID = { /* 9e573ed8-7734-11d2-8d4a-23903fb6bdf7 */
152     0x9e573ed8,
153     0x7734,
154     0x11d2,
155     {0x8d, 0x4a, 0x23, 0x90, 0x3f, 0xb6, 0xbd, 0xf7}
156 };
157
158 static void fill_mouse_dideviceinstanceA(LPDIDEVICEINSTANCEA lpddi, int version) {
159     DWORD dwSize;
160     DIDEVICEINSTANCEA ddi;
161     
162     dwSize = lpddi->dwSize;
163
164     TRACE("%ld %p\n", dwSize, lpddi);
165     
166     memset(lpddi, 0, dwSize);
167     memset(&ddi, 0, sizeof(ddi));
168
169     ddi.dwSize = dwSize;
170     ddi.guidInstance = GUID_SysMouse;/* DInput's GUID */
171     ddi.guidProduct = DInput_Wine_Mouse_GUID; /* Vendor's GUID */
172     if (version >= 8)
173         ddi.dwDevType = DI8DEVTYPE_MOUSE | (DI8DEVTYPEMOUSE_TRADITIONAL << 8);
174     else
175         ddi.dwDevType = DIDEVTYPE_MOUSE | (DIDEVTYPEMOUSE_TRADITIONAL << 8);
176     strcpy(ddi.tszInstanceName, "Mouse");
177     strcpy(ddi.tszProductName, "Wine Mouse");
178
179     memcpy(lpddi, &ddi, (dwSize < sizeof(ddi) ? dwSize : sizeof(ddi)));
180 }
181
182 static void fill_mouse_dideviceinstanceW(LPDIDEVICEINSTANCEW lpddi, int version) {
183     DWORD dwSize;
184     DIDEVICEINSTANCEW ddi;
185     
186     dwSize = lpddi->dwSize;
187
188     TRACE("%ld %p\n", dwSize, lpddi);
189     
190     memset(lpddi, 0, dwSize);
191     memset(&ddi, 0, sizeof(ddi));
192
193     ddi.dwSize = dwSize;
194     ddi.guidInstance = GUID_SysMouse;/* DInput's GUID */
195     ddi.guidProduct = DInput_Wine_Mouse_GUID; /* Vendor's GUID */
196     if (version >= 8)
197         ddi.dwDevType = DI8DEVTYPE_MOUSE | (DI8DEVTYPEMOUSE_TRADITIONAL << 8);
198     else
199         ddi.dwDevType = DIDEVTYPE_MOUSE | (DIDEVTYPEMOUSE_TRADITIONAL << 8);
200     MultiByteToWideChar(CP_ACP, 0, "Mouse", -1, ddi.tszInstanceName, MAX_PATH);
201     MultiByteToWideChar(CP_ACP, 0, "Wine Mouse", -1, ddi.tszProductName, MAX_PATH);
202
203     memcpy(lpddi, &ddi, (dwSize < sizeof(ddi) ? dwSize : sizeof(ddi)));
204 }
205
206 static BOOL mousedev_enum_deviceA(DWORD dwDevType, DWORD dwFlags, LPDIDEVICEINSTANCEA lpddi, int version, int id)
207 {
208     if (id != 0)
209         return FALSE;
210
211     if ((dwDevType == 0) ||
212         ((dwDevType == DIDEVTYPE_MOUSE) && (version < 8)) ||
213         (((dwDevType == DI8DEVCLASS_POINTER) || (dwDevType == DI8DEVTYPE_MOUSE)) && (version >= 8))) {
214         TRACE("Enumerating the mouse device\n");
215         
216         fill_mouse_dideviceinstanceA(lpddi, version);
217         
218         return TRUE;
219     }
220     
221     return FALSE;
222 }
223
224 static BOOL mousedev_enum_deviceW(DWORD dwDevType, DWORD dwFlags, LPDIDEVICEINSTANCEW lpddi, int version, int id)
225 {
226     if (id != 0)
227         return FALSE;
228
229     if ((dwDevType == 0) ||
230         ((dwDevType == DIDEVTYPE_MOUSE) && (version < 8)) ||
231         (((dwDevType == DI8DEVCLASS_POINTER) || (dwDevType == DI8DEVTYPE_MOUSE)) && (version >= 8))) {
232         TRACE("Enumerating the mouse device\n");
233         
234         fill_mouse_dideviceinstanceW(lpddi, version);
235         
236         return TRUE;
237     }
238     
239     return FALSE;
240 }
241
242 static SysMouseImpl *alloc_device(REFGUID rguid, LPVOID mvt, IDirectInputImpl *dinput)
243 {
244     int offset_array[WINE_INTERNALMOUSE_NUM_OBJS] = {
245         FIELD_OFFSET(Wine_InternalMouseData, lX),
246         FIELD_OFFSET(Wine_InternalMouseData, lY),
247         FIELD_OFFSET(Wine_InternalMouseData, lZ),
248         FIELD_OFFSET(Wine_InternalMouseData, rgbButtons) + 0,
249         FIELD_OFFSET(Wine_InternalMouseData, rgbButtons) + 1,
250         FIELD_OFFSET(Wine_InternalMouseData, rgbButtons) + 2
251     };
252     SysMouseImpl* newDevice;
253     newDevice = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(SysMouseImpl));
254     newDevice->ref = 1;
255     newDevice->lpVtbl = mvt;
256     InitializeCriticalSection(&(newDevice->crit));
257     memcpy(&(newDevice->guid),rguid,sizeof(*rguid));
258
259     /* Per default, Wine uses its internal data format */
260     newDevice->df = (DIDATAFORMAT *) &Wine_InternalMouseFormat;
261     memcpy(newDevice->offset_array, offset_array, WINE_INTERNALMOUSE_NUM_OBJS * sizeof(int));
262     newDevice->wine_df = (DataFormat *) HeapAlloc(GetProcessHeap(), 0, sizeof(DataFormat));
263     newDevice->wine_df->size = 0;
264     newDevice->wine_df->internal_format_size = Wine_InternalMouseFormat.dwDataSize;
265     newDevice->wine_df->dt = NULL;
266     newDevice->dinput = dinput;
267
268     return newDevice;
269 }
270
271 static HRESULT mousedev_create_deviceA(IDirectInputImpl *dinput, REFGUID rguid, REFIID riid, LPDIRECTINPUTDEVICEA* pdev)
272 {
273     if ((IsEqualGUID(&GUID_SysMouse,rguid)) ||             /* Generic Mouse */
274         (IsEqualGUID(&DInput_Wine_Mouse_GUID,rguid))) { /* Wine Mouse */
275         if ((riid == NULL) ||
276             IsEqualGUID(&IID_IDirectInputDeviceA,riid) ||
277             IsEqualGUID(&IID_IDirectInputDevice2A,riid) ||
278             IsEqualGUID(&IID_IDirectInputDevice7A,riid) ||
279             IsEqualGUID(&IID_IDirectInputDevice8A,riid)) {
280             *pdev = (IDirectInputDeviceA*) alloc_device(rguid, &SysMouseAvt, dinput);
281             TRACE("Creating a Mouse device (%p)\n", *pdev);
282             return DI_OK;
283         } else
284             return DIERR_NOINTERFACE;
285     }
286     
287     return DIERR_DEVICENOTREG;
288 }
289
290 static HRESULT mousedev_create_deviceW(IDirectInputImpl *dinput, REFGUID rguid, REFIID riid, LPDIRECTINPUTDEVICEW* pdev)
291 {
292     if ((IsEqualGUID(&GUID_SysMouse,rguid)) ||             /* Generic Mouse */
293         (IsEqualGUID(&DInput_Wine_Mouse_GUID,rguid))) { /* Wine Mouse */
294         if ((riid == NULL) ||
295             IsEqualGUID(&IID_IDirectInputDeviceW,riid) ||
296             IsEqualGUID(&IID_IDirectInputDevice2W,riid) ||
297             IsEqualGUID(&IID_IDirectInputDevice7W,riid) ||
298             IsEqualGUID(&IID_IDirectInputDevice8W,riid)) {
299             *pdev = (IDirectInputDeviceW*) alloc_device(rguid, &SysMouseWvt, dinput);
300             TRACE("Creating a Mouse device (%p)\n", *pdev);
301             return DI_OK;
302         } else
303             return DIERR_NOINTERFACE;
304     }
305     
306     return DIERR_DEVICENOTREG;
307 }
308 static dinput_device mousedev = {
309     100,
310     "Wine mouse driver",
311     mousedev_enum_deviceA,
312     mousedev_enum_deviceW,
313     mousedev_create_deviceA,
314     mousedev_create_deviceW
315 };
316
317 DECL_GLOBAL_CONSTRUCTOR(mousedev_register) { dinput_register_device(&mousedev); }
318
319 /******************************************************************************
320  *      SysMouseA (DInput Mouse support)
321  */
322
323 /******************************************************************************
324   *     Release : release the mouse buffer.
325   */
326 static ULONG WINAPI SysMouseAImpl_Release(LPDIRECTINPUTDEVICE8A iface)
327 {
328     SysMouseImpl *This = (SysMouseImpl *)iface;
329     ULONG ref;
330  
331     ref = InterlockedDecrement(&(This->ref));
332     if (ref)
333         return ref;
334     
335     /* Free the data queue */
336     HeapFree(GetProcessHeap(),0,This->data_queue);
337     
338     if (This->hook) {
339         UnhookWindowsHookEx( This->hook );
340         if (This->dwCoopLevel & DISCL_EXCLUSIVE)
341             ShowCursor(TRUE); /* show cursor */
342     }
343     DeleteCriticalSection(&(This->crit));
344     
345     /* Free the DataFormat */
346     if (This->df != &(Wine_InternalMouseFormat)) {
347         HeapFree(GetProcessHeap(), 0, This->df->rgodf);
348         HeapFree(GetProcessHeap(), 0, This->df);
349     }
350     
351     HeapFree(GetProcessHeap(),0,This);
352     return 0;
353 }
354
355
356 /******************************************************************************
357   *     SetCooperativeLevel : store the window in which we will do our
358   *   grabbing.
359   */
360 static HRESULT WINAPI SysMouseAImpl_SetCooperativeLevel(
361         LPDIRECTINPUTDEVICE8A iface,HWND hwnd,DWORD dwflags
362 )
363 {
364     SysMouseImpl *This = (SysMouseImpl *)iface;
365     
366     TRACE("(this=%p,0x%08lx,0x%08lx)\n",This,(DWORD)hwnd,dwflags);
367     
368     if (TRACE_ON(dinput)) {
369         TRACE(" cooperative level : ");
370         _dump_cooperativelevel_DI(dwflags);
371     }
372     
373     /* Store the window which asks for the mouse */
374     if (!hwnd)
375         hwnd = GetDesktopWindow();
376     This->win = hwnd;
377     This->dwCoopLevel = dwflags;
378     
379     return DI_OK;
380 }
381
382
383 /******************************************************************************
384   *     SetDataFormat : the application can choose the format of the data
385   *   the device driver sends back with GetDeviceState.
386   *
387   *   For the moment, only the "standard" configuration (c_dfDIMouse) is supported
388   *   in absolute and relative mode.
389   */
390 static HRESULT WINAPI SysMouseAImpl_SetDataFormat(
391         LPDIRECTINPUTDEVICE8A iface,LPCDIDATAFORMAT df
392 )
393 {
394     SysMouseImpl *This = (SysMouseImpl *)iface;
395     
396     TRACE("(this=%p,%p)\n",This,df);
397     
398     _dump_DIDATAFORMAT(df);
399     
400     /* Tests under windows show that a call to SetDataFormat always sets the mouse
401        in relative mode whatever the dwFlags value (DIDF_ABSAXIS/DIDF_RELAXIS).
402        To switch in absolute mode, SetProperty must be used. */
403     This->absolute = 0;
404     
405     /* Store the new data format */
406     This->df = HeapAlloc(GetProcessHeap(),0,df->dwSize);
407     memcpy(This->df, df, df->dwSize);
408     This->df->rgodf = HeapAlloc(GetProcessHeap(),0,df->dwNumObjs*df->dwObjSize);
409     memcpy(This->df->rgodf,df->rgodf,df->dwNumObjs*df->dwObjSize);
410     
411     /* Prepare all the data-conversion filters */
412     This->wine_df = create_DataFormat(&(Wine_InternalMouseFormat), df, This->offset_array);
413     
414     return DI_OK;
415 }
416
417 /* low-level mouse hook */
418 static LRESULT CALLBACK dinput_mouse_hook( int code, WPARAM wparam, LPARAM lparam )
419 {
420     LRESULT ret;
421     MSLLHOOKSTRUCT *hook = (MSLLHOOKSTRUCT *)lparam;
422     SysMouseImpl* This = (SysMouseImpl*) current_lock;
423     DWORD dwCoop;
424     static long last_event = 0;
425     int wdata;
426
427     if (code != HC_ACTION) return CallNextHookEx( This->hook, code, wparam, lparam );
428
429     EnterCriticalSection(&(This->crit));
430     dwCoop = This->dwCoopLevel;
431
432     /* Only allow mouse events every 10 ms.
433      * This is to allow the cursor to start acceleration before
434      * the warps happen. But if it involves a mouse button event we
435      * allow it since we don't want to lose the clicks.
436      */
437     if (((GetCurrentTime() - last_event) < 10)
438         && wparam == WM_MOUSEMOVE)
439         goto end;
440     else last_event = GetCurrentTime();
441     
442     /* Mouse moved -> send event if asked */
443     if (This->hEvent)
444         SetEvent(This->hEvent);
445     
446     if (wparam == WM_MOUSEMOVE) {
447         if (This->absolute) {
448             if (hook->pt.x != This->prevX)
449                 GEN_EVENT(This->offset_array[WINE_MOUSE_X_POSITION], hook->pt.x, hook->time, 0);
450             if (hook->pt.y != This->prevY)
451                 GEN_EVENT(This->offset_array[WINE_MOUSE_Y_POSITION], hook->pt.y, hook->time, 0);
452         } else {
453             /* Now, warp handling */
454             if ((This->need_warp == WARP_STARTED) &&
455                 (hook->pt.x == This->mapped_center.x) && (hook->pt.y == This->mapped_center.y)) {
456                 /* Warp has been done... */
457                 This->need_warp = WARP_DONE;
458                 goto end;
459             }
460             
461             /* Relative mouse input with absolute mouse event : the real fun starts here... */
462             if ((This->need_warp == WARP_NEEDED) ||
463                 (This->need_warp == WARP_STARTED)) {
464                 if (hook->pt.x != This->prevX)
465                     GEN_EVENT(This->offset_array[WINE_MOUSE_X_POSITION], hook->pt.x - This->prevX,
466                               hook->time, (This->dinput->evsequence)++);
467                 if (hook->pt.y != This->prevY)
468                     GEN_EVENT(This->offset_array[WINE_MOUSE_Y_POSITION], hook->pt.y - This->prevY,
469                               hook->time, (This->dinput->evsequence)++);
470             } else {
471                 /* This is the first time the event handler has been called after a
472                    GetDeviceData or GetDeviceState. */
473                 if (hook->pt.x != This->mapped_center.x) {
474                     GEN_EVENT(This->offset_array[WINE_MOUSE_X_POSITION], hook->pt.x - This->mapped_center.x,
475                               hook->time, (This->dinput->evsequence)++);
476                     This->need_warp = WARP_NEEDED;
477                 }
478                 
479                 if (hook->pt.y != This->mapped_center.y) {
480                     GEN_EVENT(This->offset_array[WINE_MOUSE_Y_POSITION], hook->pt.y - This->mapped_center.y,
481                               hook->time, (This->dinput->evsequence)++);
482                     This->need_warp = WARP_NEEDED;
483                 }
484             }
485         }
486         
487         This->prevX = hook->pt.x;
488         This->prevY = hook->pt.y;
489         
490         if (This->absolute) {
491             This->m_state.lX = hook->pt.x;
492             This->m_state.lY = hook->pt.y;
493         } else {
494             This->m_state.lX = hook->pt.x - This->mapped_center.x;
495             This->m_state.lY = hook->pt.y - This->mapped_center.y;
496         }
497     }
498     
499     TRACE(" msg %x pt %ld %ld (W=%d)\n",
500           wparam, hook->pt.x, hook->pt.y, (!This->absolute) && This->need_warp );
501     
502     switch(wparam) {
503         case WM_LBUTTONDOWN:
504             GEN_EVENT(This->offset_array[WINE_MOUSE_L_POSITION], 0x80,
505                       hook->time, This->dinput->evsequence++);
506             This->m_state.rgbButtons[0] = 0x80;
507             break;
508         case WM_LBUTTONUP:
509             GEN_EVENT(This->offset_array[WINE_MOUSE_L_POSITION], 0x00,
510                       hook->time, This->dinput->evsequence++);
511             This->m_state.rgbButtons[0] = 0x00;
512             break;
513         case WM_RBUTTONDOWN:
514             GEN_EVENT(This->offset_array[WINE_MOUSE_R_POSITION], 0x80,
515                       hook->time, This->dinput->evsequence++);
516             This->m_state.rgbButtons[1] = 0x80;
517             break;
518         case WM_RBUTTONUP:
519             GEN_EVENT(This->offset_array[WINE_MOUSE_R_POSITION], 0x00,
520                       hook->time, This->dinput->evsequence++);
521             This->m_state.rgbButtons[1] = 0x00;
522             break;
523         case WM_MBUTTONDOWN:
524             GEN_EVENT(This->offset_array[WINE_MOUSE_M_POSITION], 0x80,
525                       hook->time, This->dinput->evsequence++);
526             This->m_state.rgbButtons[2] = 0x80;
527             break;
528         case WM_MBUTTONUP:
529             GEN_EVENT(This->offset_array[WINE_MOUSE_M_POSITION], 0x00,
530                       hook->time, This->dinput->evsequence++);
531             This->m_state.rgbButtons[2] = 0x00;
532             break;
533         case WM_MOUSEWHEEL:
534             wdata = (short)HIWORD(hook->mouseData);
535             GEN_EVENT(This->offset_array[WINE_MOUSE_Z_POSITION], wdata,
536                       hook->time, This->dinput->evsequence++);
537             This->m_state.lZ += wdata;
538             break;
539     }
540     
541     TRACE("(X: %ld - Y: %ld   L: %02x M: %02x R: %02x)\n",
542           This->m_state.lX, This->m_state.lY,
543           This->m_state.rgbButtons[0], This->m_state.rgbButtons[2], This->m_state.rgbButtons[1]);
544     
545   end:
546     LeaveCriticalSection(&(This->crit));
547     
548     if (dwCoop & DISCL_NONEXCLUSIVE) {
549         /* Pass the events down to previous handlers (e.g. win32 input) */
550         ret = CallNextHookEx( This->hook, code, wparam, lparam );
551     } else {
552         /* Ignore message */
553         ret = 1;
554     }
555     return ret;
556 }
557
558
559 static void dinput_window_check(SysMouseImpl* This) {
560     RECT rect;
561     DWORD centerX, centerY;
562     
563     /* make sure the window hasn't moved */
564     GetWindowRect(This->win, &rect);
565     centerX = (rect.right  - rect.left) / 2;
566     centerY = (rect.bottom - rect.top ) / 2;
567     if (This->win_centerX != centerX || This->win_centerY != centerY) {
568         This->win_centerX = centerX;
569         This->win_centerY = centerY;
570     }
571     This->mapped_center.x = This->win_centerX;
572     This->mapped_center.y = This->win_centerY;
573     MapWindowPoints(This->win, HWND_DESKTOP, &This->mapped_center, 1);
574 }
575
576
577 /******************************************************************************
578   *     Acquire : gets exclusive control of the mouse
579   */
580 static HRESULT WINAPI SysMouseAImpl_Acquire(LPDIRECTINPUTDEVICE8A iface)
581 {
582     SysMouseImpl *This = (SysMouseImpl *)iface;
583     RECT        rect;
584     
585     TRACE("(this=%p)\n",This);
586     
587     if (This->acquired == 0) {
588         POINT point;
589         
590         /* Store (in a global variable) the current lock */
591         current_lock = (IDirectInputDevice8A*)This;
592         
593         /* Init the mouse state */
594         GetCursorPos( &point );
595         if (This->absolute) {
596             This->m_state.lX = point.x;
597             This->m_state.lY = point.y;
598             This->prevX = point.x;
599             This->prevY = point.y;
600         } else {
601             This->m_state.lX = 0;
602             This->m_state.lY = 0;
603             This->org_coords = point;
604         }
605         This->m_state.lZ = 0;
606         This->m_state.rgbButtons[0] = ((GetKeyState(VK_LBUTTON) & 0x80) ? 0xFF : 0x00);
607         This->m_state.rgbButtons[1] = ((GetKeyState(VK_RBUTTON) & 0x80) ? 0xFF : 0x00);
608         This->m_state.rgbButtons[2] = ((GetKeyState(VK_MBUTTON) & 0x80) ? 0xFF : 0x00);
609         
610         /* Install our mouse hook */
611         if (This->dwCoopLevel & DISCL_EXCLUSIVE)
612             ShowCursor(FALSE); /* hide cursor */
613         This->hook = SetWindowsHookExA( WH_MOUSE_LL, dinput_mouse_hook, DINPUT_instance, 0 );
614         
615         /* Get the window dimension and find the center */
616         GetWindowRect(This->win, &rect);
617         This->win_centerX = (rect.right  - rect.left) / 2;
618         This->win_centerY = (rect.bottom - rect.top ) / 2;
619         
620         /* Warp the mouse to the center of the window */
621         if (This->absolute == 0) {
622             This->mapped_center.x = This->win_centerX;
623             This->mapped_center.y = This->win_centerY;
624             MapWindowPoints(This->win, HWND_DESKTOP, &This->mapped_center, 1);
625             TRACE("Warping mouse to %ld - %ld\n", This->mapped_center.x, This->mapped_center.y);
626             SetCursorPos( This->mapped_center.x, This->mapped_center.y );
627 #ifdef MOUSE_HACK
628             This->need_warp = WARP_DONE;
629 #else
630             This->need_warp = WARP_STARTED;
631 #endif
632         }
633         
634         This->acquired = 1;
635         return DI_OK;
636     }
637     return S_FALSE;
638 }
639
640 /******************************************************************************
641   *     Unacquire : frees the mouse
642   */
643 static HRESULT WINAPI SysMouseAImpl_Unacquire(LPDIRECTINPUTDEVICE8A iface)
644 {
645     SysMouseImpl *This = (SysMouseImpl *)iface;
646     
647     TRACE("(this=%p)\n",This);
648     
649     if (This->acquired) {
650         /* Reinstall previous mouse event handler */
651         if (This->hook) {
652             UnhookWindowsHookEx( This->hook );
653             This->hook = 0;
654
655             if (This->dwCoopLevel & DISCL_EXCLUSIVE)
656                 ShowCursor(TRUE); /* show cursor */
657         }
658         
659         /* No more locks */
660         current_lock = NULL;
661         
662         /* Unacquire device */
663         This->acquired = 0;
664
665         /* And put the mouse cursor back where it was at acquire time */
666         if (This->absolute == 0) {
667             TRACE(" warping mouse back to (%ld , %ld)\n", This->org_coords.x, This->org_coords.y);
668             SetCursorPos(This->org_coords.x, This->org_coords.y);
669         }
670     } else {
671         return DI_NOEFFECT;
672     }
673         
674     return DI_OK;
675 }
676
677 /******************************************************************************
678   *     GetDeviceState : returns the "state" of the mouse.
679   *
680   *   For the moment, only the "standard" return structure (DIMOUSESTATE) is
681   *   supported.
682   */
683 static HRESULT WINAPI SysMouseAImpl_GetDeviceState(
684         LPDIRECTINPUTDEVICE8A iface,DWORD len,LPVOID ptr
685 ) {
686     SysMouseImpl *This = (SysMouseImpl *)iface;
687     
688     EnterCriticalSection(&(This->crit));
689     TRACE("(this=%p,0x%08lx,%p): \n",This,len,ptr);
690     
691     /* Copy the current mouse state */
692     fill_DataFormat(ptr, &(This->m_state), This->wine_df);
693     
694     /* Initialize the buffer when in relative mode */
695     if (This->absolute == 0) {
696         This->m_state.lX = 0;
697         This->m_state.lY = 0;
698         This->m_state.lZ = 0;
699     }
700     
701     /* Check if we need to do a mouse warping */
702     if (This->need_warp == WARP_NEEDED) {
703         dinput_window_check(This);
704         TRACE("Warping mouse to %ld - %ld\n", This->mapped_center.x, This->mapped_center.y);
705         SetCursorPos( This->mapped_center.x, This->mapped_center.y );
706         
707 #ifdef MOUSE_HACK
708         This->need_warp = WARP_DONE;
709 #else
710         This->need_warp = WARP_STARTED;
711 #endif
712     }
713     
714     LeaveCriticalSection(&(This->crit));
715     
716     TRACE("(X: %ld - Y: %ld - Z: %ld  L: %02x M: %02x R: %02x)\n",
717           This->m_state.lX, This->m_state.lY, This->m_state.lZ,
718           This->m_state.rgbButtons[0], This->m_state.rgbButtons[2], This->m_state.rgbButtons[1]);
719     
720     return DI_OK;
721 }
722
723 /******************************************************************************
724   *     GetDeviceState : gets buffered input data.
725   */
726 static HRESULT WINAPI SysMouseAImpl_GetDeviceData(LPDIRECTINPUTDEVICE8A iface,
727                                                   DWORD dodsize,
728                                                   LPDIDEVICEOBJECTDATA dod,
729                                                   LPDWORD entries,
730                                                   DWORD flags
731 ) {
732     SysMouseImpl *This = (SysMouseImpl *)iface;
733     DWORD len;
734     int nqtail;
735     
736     TRACE("(%p)->(dods=%ld,entries=%ld,fl=0x%08lx)\n",This,dodsize,*entries,flags);
737     
738     if (This->acquired == 0) {
739         WARN(" application tries to get data from an unacquired device !\n");
740         return DIERR_NOTACQUIRED;
741     }
742     
743     EnterCriticalSection(&(This->crit));
744     
745     len = ((This->queue_head < This->queue_tail) ? This->queue_len : 0)
746         + (This->queue_head - This->queue_tail);
747     if (len > *entries) len = *entries;
748     
749     if (dod == NULL) {
750         if (len)
751             TRACE("Application discarding %ld event(s).\n", len);
752         
753         *entries = len;
754         nqtail = This->queue_tail + len;
755         while (nqtail >= This->queue_len) nqtail -= This->queue_len;
756     } else {
757         if (dodsize < sizeof(DIDEVICEOBJECTDATA_DX3)) {
758             ERR("Wrong structure size !\n");
759             LeaveCriticalSection(&(This->crit));
760             return DIERR_INVALIDPARAM;
761         }
762         
763         if (len)
764             TRACE("Application retrieving %ld event(s).\n", len);
765         
766         *entries = 0;
767         nqtail = This->queue_tail;
768         while (len) {
769             /* Copy the buffered data into the application queue */
770             memcpy((char *)dod + *entries * dodsize, This->data_queue + nqtail, dodsize);
771             /* Advance position */
772             nqtail++;
773             if (nqtail >= This->queue_len)
774                 nqtail -= This->queue_len;
775             (*entries)++;
776             len--;
777         }
778     }
779     if (!(flags & DIGDD_PEEK))
780         This->queue_tail = nqtail;
781     
782     LeaveCriticalSection(&(This->crit));
783     
784     /* Check if we need to do a mouse warping */
785     if (This->need_warp == WARP_NEEDED) {
786         dinput_window_check(This);
787         TRACE("Warping mouse to %ld - %ld\n", This->mapped_center.x, This->mapped_center.y);
788         SetCursorPos( This->mapped_center.x, This->mapped_center.y );
789         
790 #ifdef MOUSE_HACK
791         This->need_warp = WARP_DONE;
792 #else
793         This->need_warp = WARP_STARTED;
794 #endif
795     }
796     return DI_OK;
797 }
798
799 /******************************************************************************
800   *     SetProperty : change input device properties
801   */
802 static HRESULT WINAPI SysMouseAImpl_SetProperty(LPDIRECTINPUTDEVICE8A iface,
803                                             REFGUID rguid,
804                                             LPCDIPROPHEADER ph)
805 {
806     SysMouseImpl *This = (SysMouseImpl *)iface;
807     
808     TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(rguid),ph);
809     
810     if (!HIWORD(rguid)) {
811         switch ((DWORD)rguid) {
812             case (DWORD) DIPROP_BUFFERSIZE: {
813                 LPCDIPROPDWORD  pd = (LPCDIPROPDWORD)ph;
814                 
815                 TRACE("buffersize = %ld\n",pd->dwData);
816                 
817                 This->data_queue = (LPDIDEVICEOBJECTDATA)HeapAlloc(GetProcessHeap(),0,
818                                                                    pd->dwData * sizeof(DIDEVICEOBJECTDATA));
819                 This->queue_head = 0;
820                 This->queue_tail = 0;
821                 This->queue_len  = pd->dwData;
822                 break;
823             }
824             case (DWORD) DIPROP_AXISMODE: {
825                 LPCDIPROPDWORD    pd = (LPCDIPROPDWORD)ph;
826                 This->absolute = !(pd->dwData);
827                 TRACE("Using %s coordinates mode now\n", This->absolute ? "absolute" : "relative");
828                 break;
829             }
830             default:
831               FIXME("Unknown type %ld (%s)\n",(DWORD)rguid,debugstr_guid(rguid));
832               break;
833         }
834     }
835     
836     return DI_OK;
837 }
838
839 /******************************************************************************
840   *     GetProperty : get input device properties
841   */
842 static HRESULT WINAPI SysMouseAImpl_GetProperty(LPDIRECTINPUTDEVICE8A iface,
843                                                 REFGUID rguid,
844                                                 LPDIPROPHEADER pdiph)
845 {
846     SysMouseImpl *This = (SysMouseImpl *)iface;
847     
848     TRACE("(this=%p,%s,%p): stub!\n",
849           iface, debugstr_guid(rguid), pdiph);
850     
851     if (TRACE_ON(dinput))
852         _dump_DIPROPHEADER(pdiph);
853     
854     if (!HIWORD(rguid)) {
855         switch ((DWORD)rguid) {
856             case (DWORD) DIPROP_BUFFERSIZE: {
857                 LPDIPROPDWORD   pd = (LPDIPROPDWORD)pdiph;
858                 
859                 TRACE(" return buffersize = %d\n",This->queue_len);
860                 pd->dwData = This->queue_len;
861                 break;
862             }
863               
864             case (DWORD) DIPROP_GRANULARITY: {
865                 LPDIPROPDWORD pr = (LPDIPROPDWORD) pdiph;
866                 
867                 /* We'll just assume that the app asks about the Z axis */
868                 pr->dwData = WHEEL_DELTA;
869                 
870                 break;
871             }
872               
873             case (DWORD) DIPROP_RANGE: {
874                 LPDIPROPRANGE pr = (LPDIPROPRANGE) pdiph;
875                 
876                 if ((pdiph->dwHow == DIPH_BYID) &&
877                     ((pdiph->dwObj == (DIDFT_MAKEINSTANCE(WINE_MOUSE_X_AXIS_INSTANCE) | DIDFT_RELAXIS)) ||
878                      (pdiph->dwObj == (DIDFT_MAKEINSTANCE(WINE_MOUSE_Y_AXIS_INSTANCE) | DIDFT_RELAXIS)))) {
879                     /* Querying the range of either the X or the Y axis.  As I do
880                        not know the range, do as if the range were
881                        unrestricted...*/
882                     pr->lMin = DIPROPRANGE_NOMIN;
883                     pr->lMax = DIPROPRANGE_NOMAX;
884                 }
885                 
886                 break;
887             }
888               
889             default:
890               FIXME("Unknown type %ld (%s)\n",(DWORD)rguid,debugstr_guid(rguid));
891               break;
892           }
893       }
894     
895     return DI_OK;
896 }
897
898
899
900 /******************************************************************************
901   *     SetEventNotification : specifies event to be sent on state change
902   */
903 static HRESULT WINAPI SysMouseAImpl_SetEventNotification(LPDIRECTINPUTDEVICE8A iface,
904                                                          HANDLE hnd) {
905     SysMouseImpl *This = (SysMouseImpl *)iface;
906     
907     TRACE("(this=%p,0x%08lx)\n",This,(DWORD)hnd);
908     
909     This->hEvent = hnd;
910     
911     return DI_OK;
912 }
913
914 /******************************************************************************
915   *     GetCapabilities : get the device capablitites
916   */
917 static HRESULT WINAPI SysMouseAImpl_GetCapabilities(
918         LPDIRECTINPUTDEVICE8A iface,
919         LPDIDEVCAPS lpDIDevCaps)
920 {
921     SysMouseImpl *This = (SysMouseImpl *)iface;
922     DIDEVCAPS devcaps;
923
924     TRACE("(this=%p,%p)\n",This,lpDIDevCaps);
925
926     if ((lpDIDevCaps->dwSize != sizeof(DIDEVCAPS)) && (lpDIDevCaps->dwSize != sizeof(DIDEVCAPS_DX3))) {
927         WARN("invalid parameter\n");
928         return DIERR_INVALIDPARAM;
929     }
930
931     devcaps.dwSize = lpDIDevCaps->dwSize;
932     devcaps.dwFlags = DIDC_ATTACHED;
933     if (This->dinput->version >= 8)
934         devcaps.dwDevType = DI8DEVTYPE_MOUSE | (DI8DEVTYPEMOUSE_TRADITIONAL << 8);
935     else
936         devcaps.dwDevType = DIDEVTYPE_MOUSE | (DIDEVTYPEMOUSE_TRADITIONAL << 8);
937     devcaps.dwAxes = 3;
938     devcaps.dwButtons = 3;
939     devcaps.dwPOVs = 0;
940     devcaps.dwFFSamplePeriod = 0;
941     devcaps.dwFFMinTimeResolution = 0;
942     devcaps.dwFirmwareRevision = 100;
943     devcaps.dwHardwareRevision = 100;
944     devcaps.dwFFDriverVersion = 0;
945
946     memcpy(lpDIDevCaps, &devcaps, lpDIDevCaps->dwSize);
947     
948     return DI_OK;
949 }
950
951
952 /******************************************************************************
953   *     EnumObjects : enumerate the different buttons and axis...
954   */
955 static HRESULT WINAPI SysMouseAImpl_EnumObjects(
956         LPDIRECTINPUTDEVICE8A iface,
957         LPDIENUMDEVICEOBJECTSCALLBACKA lpCallback,
958         LPVOID lpvRef,
959         DWORD dwFlags)
960 {
961     SysMouseImpl *This = (SysMouseImpl *)iface;
962     DIDEVICEOBJECTINSTANCEA ddoi;
963     
964     TRACE("(this=%p,%p,%p,%08lx)\n", This, lpCallback, lpvRef, dwFlags);
965     if (TRACE_ON(dinput)) {
966         TRACE("  - flags = ");
967         _dump_EnumObjects_flags(dwFlags);
968         TRACE("\n");
969     }
970     
971     /* Only the fields till dwFFMaxForce are relevant */
972     memset(&ddoi, 0, sizeof(ddoi));
973     ddoi.dwSize = FIELD_OFFSET(DIDEVICEOBJECTINSTANCEA, dwFFMaxForce);
974     
975     /* In a mouse, we have : two relative axis and three buttons */
976     if ((dwFlags == DIDFT_ALL) ||
977         (dwFlags & DIDFT_AXIS)) {
978         /* X axis */
979         ddoi.guidType = GUID_XAxis;
980         ddoi.dwOfs = This->offset_array[WINE_MOUSE_X_POSITION];
981         ddoi.dwType = DIDFT_MAKEINSTANCE(WINE_MOUSE_X_AXIS_INSTANCE) | DIDFT_RELAXIS;
982         strcpy(ddoi.tszName, "X-Axis");
983         _dump_OBJECTINSTANCEA(&ddoi);
984         if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK;
985         
986         /* Y axis */
987         ddoi.guidType = GUID_YAxis;
988         ddoi.dwOfs = This->offset_array[WINE_MOUSE_Y_POSITION];
989         ddoi.dwType = DIDFT_MAKEINSTANCE(WINE_MOUSE_Y_AXIS_INSTANCE) | DIDFT_RELAXIS;
990         strcpy(ddoi.tszName, "Y-Axis");
991         _dump_OBJECTINSTANCEA(&ddoi);
992         if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK;
993         
994         /* Z axis */
995         ddoi.guidType = GUID_ZAxis;
996         ddoi.dwOfs = This->offset_array[WINE_MOUSE_Z_POSITION];
997         ddoi.dwType = DIDFT_MAKEINSTANCE(WINE_MOUSE_Z_AXIS_INSTANCE) | DIDFT_RELAXIS;
998         strcpy(ddoi.tszName, "Z-Axis");
999         _dump_OBJECTINSTANCEA(&ddoi);
1000         if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK;
1001     }
1002
1003     if ((dwFlags == DIDFT_ALL) ||
1004         (dwFlags & DIDFT_BUTTON)) {
1005         ddoi.guidType = GUID_Button;
1006         
1007         /* Left button */
1008         ddoi.dwOfs = This->offset_array[WINE_MOUSE_L_POSITION];
1009         ddoi.dwType = DIDFT_MAKEINSTANCE(WINE_MOUSE_L_BUTTON_INSTANCE) | DIDFT_PSHBUTTON;
1010         strcpy(ddoi.tszName, "Left-Button");
1011         _dump_OBJECTINSTANCEA(&ddoi);
1012         if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK;
1013         
1014         /* Right button */
1015         ddoi.dwOfs = This->offset_array[WINE_MOUSE_R_POSITION];
1016         ddoi.dwType = DIDFT_MAKEINSTANCE(WINE_MOUSE_R_BUTTON_INSTANCE) | DIDFT_PSHBUTTON;
1017         strcpy(ddoi.tszName, "Right-Button");
1018         _dump_OBJECTINSTANCEA(&ddoi);
1019         if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK;
1020         
1021         /* Middle button */
1022         ddoi.dwOfs = This->offset_array[WINE_MOUSE_M_POSITION];
1023         ddoi.dwType = DIDFT_MAKEINSTANCE(WINE_MOUSE_M_BUTTON_INSTANCE) | DIDFT_PSHBUTTON;
1024         strcpy(ddoi.tszName, "Middle-Button");
1025         _dump_OBJECTINSTANCEA(&ddoi);
1026         if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK;
1027     }
1028     
1029     return DI_OK;
1030 }
1031
1032 static HRESULT WINAPI SysMouseWImpl_EnumObjects(LPDIRECTINPUTDEVICE8W iface, LPDIENUMDEVICEOBJECTSCALLBACKW lpCallback, LPVOID lpvRef,DWORD dwFlags)
1033 {
1034     SysMouseImpl *This = (SysMouseImpl *)iface;
1035     
1036     device_enumobjects_AtoWcb_data data;
1037     
1038     data.lpCallBack = lpCallback;
1039     data.lpvRef = lpvRef;
1040     
1041     return SysMouseAImpl_EnumObjects((LPDIRECTINPUTDEVICE8A) This, (LPDIENUMDEVICEOBJECTSCALLBACKA) DIEnumDevicesCallbackAtoW, (LPVOID) &data, dwFlags);
1042 }
1043
1044 /******************************************************************************
1045   *     GetDeviceInfo : get information about a device's identity
1046   */
1047 static HRESULT WINAPI SysMouseAImpl_GetDeviceInfo(
1048         LPDIRECTINPUTDEVICE8A iface,
1049         LPDIDEVICEINSTANCEA pdidi)
1050 {
1051     SysMouseImpl *This = (SysMouseImpl *)iface;
1052     TRACE("(this=%p,%p)\n", This, pdidi);
1053
1054     if (pdidi->dwSize != sizeof(DIDEVICEINSTANCEA)) {
1055         WARN(" dinput3 not supporte yet...\n");
1056         return DI_OK;
1057     }
1058
1059     fill_mouse_dideviceinstanceA(pdidi, This->dinput->version);
1060     
1061     return DI_OK;
1062 }
1063
1064 static HRESULT WINAPI SysMouseWImpl_GetDeviceInfo(LPDIRECTINPUTDEVICE8W iface, LPDIDEVICEINSTANCEW pdidi)
1065 {
1066     SysMouseImpl *This = (SysMouseImpl *)iface;
1067     TRACE("(this=%p,%p)\n", This, pdidi);
1068
1069     if (pdidi->dwSize != sizeof(DIDEVICEINSTANCEW)) {
1070         WARN(" dinput3 not supporte yet...\n");
1071         return DI_OK;
1072     }
1073
1074     fill_mouse_dideviceinstanceW(pdidi, This->dinput->version);
1075     
1076     return DI_OK;
1077 }
1078
1079
1080 static IDirectInputDevice8AVtbl SysMouseAvt =
1081 {
1082     IDirectInputDevice2AImpl_QueryInterface,
1083     IDirectInputDevice2AImpl_AddRef,
1084     SysMouseAImpl_Release,
1085     SysMouseAImpl_GetCapabilities,
1086     SysMouseAImpl_EnumObjects,
1087     SysMouseAImpl_GetProperty,
1088     SysMouseAImpl_SetProperty,
1089     SysMouseAImpl_Acquire,
1090     SysMouseAImpl_Unacquire,
1091     SysMouseAImpl_GetDeviceState,
1092     SysMouseAImpl_GetDeviceData,
1093     SysMouseAImpl_SetDataFormat,
1094     SysMouseAImpl_SetEventNotification,
1095     SysMouseAImpl_SetCooperativeLevel,
1096     IDirectInputDevice2AImpl_GetObjectInfo,
1097     SysMouseAImpl_GetDeviceInfo,
1098     IDirectInputDevice2AImpl_RunControlPanel,
1099     IDirectInputDevice2AImpl_Initialize,
1100     IDirectInputDevice2AImpl_CreateEffect,
1101     IDirectInputDevice2AImpl_EnumEffects,
1102     IDirectInputDevice2AImpl_GetEffectInfo,
1103     IDirectInputDevice2AImpl_GetForceFeedbackState,
1104     IDirectInputDevice2AImpl_SendForceFeedbackCommand,
1105     IDirectInputDevice2AImpl_EnumCreatedEffectObjects,
1106     IDirectInputDevice2AImpl_Escape,
1107     IDirectInputDevice2AImpl_Poll,
1108     IDirectInputDevice2AImpl_SendDeviceData,
1109     IDirectInputDevice7AImpl_EnumEffectsInFile,
1110     IDirectInputDevice7AImpl_WriteEffectToFile,
1111     IDirectInputDevice8AImpl_BuildActionMap,
1112     IDirectInputDevice8AImpl_SetActionMap,
1113     IDirectInputDevice8AImpl_GetImageInfo
1114 };
1115
1116 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
1117 # define XCAST(fun)     (typeof(SysMouseWvt.fun))
1118 #else
1119 # define XCAST(fun)     (void*)
1120 #endif
1121
1122 static IDirectInputDevice8WVtbl SysMouseWvt =
1123 {
1124     IDirectInputDevice2WImpl_QueryInterface,
1125     XCAST(AddRef)IDirectInputDevice2AImpl_AddRef,
1126     XCAST(Release)SysMouseAImpl_Release,
1127     XCAST(GetCapabilities)SysMouseAImpl_GetCapabilities,
1128     SysMouseWImpl_EnumObjects,
1129     XCAST(GetProperty)SysMouseAImpl_GetProperty,
1130     XCAST(SetProperty)SysMouseAImpl_SetProperty,
1131     XCAST(Acquire)SysMouseAImpl_Acquire,
1132     XCAST(Unacquire)SysMouseAImpl_Unacquire,
1133     XCAST(GetDeviceState)SysMouseAImpl_GetDeviceState,
1134     XCAST(GetDeviceData)SysMouseAImpl_GetDeviceData,
1135     XCAST(SetDataFormat)SysMouseAImpl_SetDataFormat,
1136     XCAST(SetEventNotification)SysMouseAImpl_SetEventNotification,
1137     XCAST(SetCooperativeLevel)SysMouseAImpl_SetCooperativeLevel,
1138     IDirectInputDevice2WImpl_GetObjectInfo,
1139     SysMouseWImpl_GetDeviceInfo,
1140     XCAST(RunControlPanel)IDirectInputDevice2AImpl_RunControlPanel,
1141     XCAST(Initialize)IDirectInputDevice2AImpl_Initialize,
1142     XCAST(CreateEffect)IDirectInputDevice2AImpl_CreateEffect,
1143     IDirectInputDevice2WImpl_EnumEffects,
1144     IDirectInputDevice2WImpl_GetEffectInfo,
1145     XCAST(GetForceFeedbackState)IDirectInputDevice2AImpl_GetForceFeedbackState,
1146     XCAST(SendForceFeedbackCommand)IDirectInputDevice2AImpl_SendForceFeedbackCommand,
1147     XCAST(EnumCreatedEffectObjects)IDirectInputDevice2AImpl_EnumCreatedEffectObjects,
1148     XCAST(Escape)IDirectInputDevice2AImpl_Escape,
1149     XCAST(Poll)IDirectInputDevice2AImpl_Poll,
1150     XCAST(SendDeviceData)IDirectInputDevice2AImpl_SendDeviceData,
1151     IDirectInputDevice7WImpl_EnumEffectsInFile,
1152     IDirectInputDevice7WImpl_WriteEffectToFile,
1153     IDirectInputDevice8WImpl_BuildActionMap,
1154     IDirectInputDevice8WImpl_SetActionMap,
1155     IDirectInputDevice8WImpl_GetImageInfo
1156 };
1157 #undef XCAST