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