6192556a0e667e3ed957339bdd785106718fc3ab
[reactos.git] / reactos / dll / directx / wine / 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 <winreg.h>
34 //#include "dinput.h"
35
36 //#include "dinput_private.h"
37 #include "device_private.h"
38 #include <wine/debug.h>
39 #include <wine/unicode.h>
40
41 WINE_DEFAULT_DEBUG_CHANNEL(dinput);
42
43 /* Wine mouse driver object instances */
44 #define WINE_MOUSE_X_AXIS_INSTANCE 0
45 #define WINE_MOUSE_Y_AXIS_INSTANCE 1
46 #define WINE_MOUSE_Z_AXIS_INSTANCE 2
47 #define WINE_MOUSE_BUTTONS_INSTANCE 3
48
49 static const IDirectInputDevice8AVtbl SysMouseAvt;
50 static const IDirectInputDevice8WVtbl SysMouseWvt;
51
52 typedef struct SysMouseImpl SysMouseImpl;
53
54 typedef enum
55 {
56 WARP_DEFAULT,
57 WARP_DISABLE,
58 WARP_FORCE_ON
59 } WARP_MOUSE;
60
61 struct SysMouseImpl
62 {
63 struct IDirectInputDeviceImpl base;
64
65 /* SysMouseAImpl */
66 /* These are used in case of relative -> absolute transitions */
67 POINT org_coords;
68 BOOL clipped;
69 /* warping: whether we need to move mouse back to middle once we
70 * reach window borders (for e.g. shooters, "surface movement" games) */
71 BOOL need_warp;
72 DWORD last_warped;
73
74 /* This is for mouse reporting. */
75 DIMOUSESTATE2 m_state;
76
77 WARP_MOUSE warp_override;
78 };
79
80 static inline SysMouseImpl *impl_from_IDirectInputDevice8A(IDirectInputDevice8A *iface)
81 {
82 return CONTAINING_RECORD(CONTAINING_RECORD(iface, IDirectInputDeviceImpl, IDirectInputDevice8A_iface), SysMouseImpl, base);
83 }
84 static inline SysMouseImpl *impl_from_IDirectInputDevice8W(IDirectInputDevice8W *iface)
85 {
86 return CONTAINING_RECORD(CONTAINING_RECORD(iface, IDirectInputDeviceImpl, IDirectInputDevice8W_iface), SysMouseImpl, base);
87 }
88 static inline IDirectInputDevice8A *IDirectInputDevice8A_from_impl(SysMouseImpl *This)
89 {
90 return &This->base.IDirectInputDevice8A_iface;
91 }
92 static inline IDirectInputDevice8W *IDirectInputDevice8W_from_impl(SysMouseImpl *This)
93 {
94 return &This->base.IDirectInputDevice8W_iface;
95 }
96
97 static int dinput_mouse_hook( LPDIRECTINPUTDEVICE8A iface, WPARAM wparam, LPARAM lparam );
98
99 const GUID DInput_Wine_Mouse_GUID = { /* 9e573ed8-7734-11d2-8d4a-23903fb6bdf7 */
100 0x9e573ed8, 0x7734, 0x11d2, {0x8d, 0x4a, 0x23, 0x90, 0x3f, 0xb6, 0xbd, 0xf7}
101 };
102
103 static void _dump_mouse_state(const DIMOUSESTATE2 *m_state)
104 {
105 int i;
106
107 if (!TRACE_ON(dinput)) return;
108
109 TRACE("(X: %d Y: %d Z: %d", m_state->lX, m_state->lY, m_state->lZ);
110 for (i = 0; i < 5; i++) TRACE(" B%d: %02x", i, m_state->rgbButtons[i]);
111 TRACE(")\n");
112 }
113
114 static void fill_mouse_dideviceinstanceA(LPDIDEVICEINSTANCEA lpddi, DWORD version) {
115 DWORD dwSize;
116 DIDEVICEINSTANCEA ddi;
117
118 dwSize = lpddi->dwSize;
119
120 TRACE("%d %p\n", dwSize, lpddi);
121
122 memset(lpddi, 0, dwSize);
123 memset(&ddi, 0, sizeof(ddi));
124
125 ddi.dwSize = dwSize;
126 ddi.guidInstance = GUID_SysMouse;/* DInput's GUID */
127 ddi.guidProduct = DInput_Wine_Mouse_GUID; /* Vendor's GUID */
128 if (version >= 0x0800)
129 ddi.dwDevType = DI8DEVTYPE_MOUSE | (DI8DEVTYPEMOUSE_TRADITIONAL << 8);
130 else
131 ddi.dwDevType = DIDEVTYPE_MOUSE | (DIDEVTYPEMOUSE_TRADITIONAL << 8);
132 strcpy(ddi.tszInstanceName, "Mouse");
133 strcpy(ddi.tszProductName, "Wine Mouse");
134
135 memcpy(lpddi, &ddi, (dwSize < sizeof(ddi) ? dwSize : sizeof(ddi)));
136 }
137
138 static void fill_mouse_dideviceinstanceW(LPDIDEVICEINSTANCEW lpddi, DWORD version) {
139 DWORD dwSize;
140 DIDEVICEINSTANCEW ddi;
141
142 dwSize = lpddi->dwSize;
143
144 TRACE("%d %p\n", dwSize, lpddi);
145
146 memset(lpddi, 0, dwSize);
147 memset(&ddi, 0, sizeof(ddi));
148
149 ddi.dwSize = dwSize;
150 ddi.guidInstance = GUID_SysMouse;/* DInput's GUID */
151 ddi.guidProduct = DInput_Wine_Mouse_GUID; /* Vendor's GUID */
152 if (version >= 0x0800)
153 ddi.dwDevType = DI8DEVTYPE_MOUSE | (DI8DEVTYPEMOUSE_TRADITIONAL << 8);
154 else
155 ddi.dwDevType = DIDEVTYPE_MOUSE | (DIDEVTYPEMOUSE_TRADITIONAL << 8);
156 MultiByteToWideChar(CP_ACP, 0, "Mouse", -1, ddi.tszInstanceName, MAX_PATH);
157 MultiByteToWideChar(CP_ACP, 0, "Wine Mouse", -1, ddi.tszProductName, MAX_PATH);
158
159 memcpy(lpddi, &ddi, (dwSize < sizeof(ddi) ? dwSize : sizeof(ddi)));
160 }
161
162 static HRESULT mousedev_enum_deviceA(DWORD dwDevType, DWORD dwFlags, LPDIDEVICEINSTANCEA lpddi, DWORD version, int id)
163 {
164 if (id != 0)
165 return E_FAIL;
166
167 if ((dwDevType == 0) ||
168 ((dwDevType == DIDEVTYPE_MOUSE) && (version < 0x0800)) ||
169 (((dwDevType == DI8DEVCLASS_POINTER) || (dwDevType == DI8DEVTYPE_MOUSE)) && (version >= 0x0800))) {
170 TRACE("Enumerating the mouse device\n");
171
172 fill_mouse_dideviceinstanceA(lpddi, version);
173
174 return S_OK;
175 }
176
177 return S_FALSE;
178 }
179
180 static HRESULT mousedev_enum_deviceW(DWORD dwDevType, DWORD dwFlags, LPDIDEVICEINSTANCEW lpddi, DWORD version, int id)
181 {
182 if (id != 0)
183 return E_FAIL;
184
185 if ((dwDevType == 0) ||
186 ((dwDevType == DIDEVTYPE_MOUSE) && (version < 0x0800)) ||
187 (((dwDevType == DI8DEVCLASS_POINTER) || (dwDevType == DI8DEVTYPE_MOUSE)) && (version >= 0x0800))) {
188 TRACE("Enumerating the mouse device\n");
189
190 fill_mouse_dideviceinstanceW(lpddi, version);
191
192 return S_OK;
193 }
194
195 return S_FALSE;
196 }
197
198 static SysMouseImpl *alloc_device(REFGUID rguid, IDirectInputImpl *dinput)
199 {
200 SysMouseImpl* newDevice;
201 LPDIDATAFORMAT df = NULL;
202 unsigned i;
203 char buffer[20];
204 HKEY hkey, appkey;
205
206 newDevice = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(SysMouseImpl));
207 if (!newDevice) return NULL;
208 newDevice->base.IDirectInputDevice8A_iface.lpVtbl = &SysMouseAvt;
209 newDevice->base.IDirectInputDevice8W_iface.lpVtbl = &SysMouseWvt;
210 newDevice->base.ref = 1;
211 newDevice->base.dwCoopLevel = DISCL_NONEXCLUSIVE | DISCL_BACKGROUND;
212 newDevice->base.guid = *rguid;
213 InitializeCriticalSection(&newDevice->base.crit);
214 newDevice->base.crit.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": SysMouseImpl*->base.crit");
215 newDevice->base.dinput = dinput;
216 newDevice->base.event_proc = dinput_mouse_hook;
217
218 get_app_key(&hkey, &appkey);
219 if (!get_config_key(hkey, appkey, "MouseWarpOverride", buffer, sizeof(buffer)))
220 {
221 if (!strcasecmp(buffer, "disable"))
222 newDevice->warp_override = WARP_DISABLE;
223 else if (!strcasecmp(buffer, "force"))
224 newDevice->warp_override = WARP_FORCE_ON;
225 }
226 if (appkey) RegCloseKey(appkey);
227 if (hkey) RegCloseKey(hkey);
228
229 /* Create copy of default data format */
230 if (!(df = HeapAlloc(GetProcessHeap(), 0, c_dfDIMouse2.dwSize))) goto failed;
231 memcpy(df, &c_dfDIMouse2, c_dfDIMouse2.dwSize);
232 if (!(df->rgodf = HeapAlloc(GetProcessHeap(), 0, df->dwNumObjs * df->dwObjSize))) goto failed;
233 memcpy(df->rgodf, c_dfDIMouse2.rgodf, df->dwNumObjs * df->dwObjSize);
234
235 /* Because we don't do any detection yet just modify instance and type */
236 for (i = 0; i < df->dwNumObjs; i++)
237 if (DIDFT_GETTYPE(df->rgodf[i].dwType) & DIDFT_AXIS)
238 df->rgodf[i].dwType = DIDFT_MAKEINSTANCE(i) | DIDFT_RELAXIS;
239 else
240 df->rgodf[i].dwType = DIDFT_MAKEINSTANCE(i) | DIDFT_PSHBUTTON;
241
242 newDevice->base.data_format.wine_df = df;
243 IDirectInput_AddRef(&newDevice->base.dinput->IDirectInput7A_iface);
244
245 EnterCriticalSection(&dinput->crit);
246 list_add_tail(&dinput->devices_list, &newDevice->base.entry);
247 LeaveCriticalSection(&dinput->crit);
248
249 return newDevice;
250
251 failed:
252 if (df) HeapFree(GetProcessHeap(), 0, df->rgodf);
253 HeapFree(GetProcessHeap(), 0, df);
254 HeapFree(GetProcessHeap(), 0, newDevice);
255 return NULL;
256 }
257
258 static HRESULT mousedev_create_device(IDirectInputImpl *dinput, REFGUID rguid, REFIID riid, LPVOID *pdev, int unicode)
259 {
260 TRACE("%p %s %s %p %i\n", dinput, debugstr_guid(rguid), debugstr_guid(riid), pdev, unicode);
261 *pdev = NULL;
262
263 if (IsEqualGUID(&GUID_SysMouse, rguid) || /* Generic Mouse */
264 IsEqualGUID(&DInput_Wine_Mouse_GUID, rguid)) /* Wine Mouse */
265 {
266 SysMouseImpl *This;
267
268 if (riid == NULL)
269 ;/* nothing */
270 else if (IsEqualGUID(&IID_IDirectInputDeviceA, riid) ||
271 IsEqualGUID(&IID_IDirectInputDevice2A, riid) ||
272 IsEqualGUID(&IID_IDirectInputDevice7A, riid) ||
273 IsEqualGUID(&IID_IDirectInputDevice8A, riid))
274 {
275 unicode = 0;
276 }
277 else if (IsEqualGUID(&IID_IDirectInputDeviceW, riid) ||
278 IsEqualGUID(&IID_IDirectInputDevice2W, riid) ||
279 IsEqualGUID(&IID_IDirectInputDevice7W, riid) ||
280 IsEqualGUID(&IID_IDirectInputDevice8W, riid))
281 {
282 unicode = 1;
283 }
284 else
285 {
286 WARN("no interface\n");
287 return DIERR_NOINTERFACE;
288 }
289
290 This = alloc_device(rguid, dinput);
291 TRACE("Created a Mouse device (%p)\n", This);
292
293 if (!This) return DIERR_OUTOFMEMORY;
294
295 if (unicode)
296 *pdev = &This->base.IDirectInputDevice8W_iface;
297 else
298 *pdev = &This->base.IDirectInputDevice8A_iface;
299
300 return DI_OK;
301 }
302
303 return DIERR_DEVICENOTREG;
304 }
305
306 const struct dinput_device mouse_device = {
307 "Wine mouse driver",
308 mousedev_enum_deviceA,
309 mousedev_enum_deviceW,
310 mousedev_create_device
311 };
312
313 /******************************************************************************
314 * SysMouseA (DInput Mouse support)
315 */
316
317 /* low-level mouse hook */
318 static int dinput_mouse_hook( LPDIRECTINPUTDEVICE8A iface, WPARAM wparam, LPARAM lparam )
319 {
320 MSLLHOOKSTRUCT *hook = (MSLLHOOKSTRUCT *)lparam;
321 SysMouseImpl* This = impl_from_IDirectInputDevice8A(iface);
322 int wdata = 0, inst_id = -1, ret = 0;
323
324 TRACE("msg %lx @ (%d %d)\n", wparam, hook->pt.x, hook->pt.y);
325
326 EnterCriticalSection(&This->base.crit);
327
328 switch(wparam) {
329 case WM_MOUSEMOVE:
330 {
331 POINT pt, pt1;
332
333 GetCursorPos(&pt);
334 This->m_state.lX += pt.x = hook->pt.x - pt.x;
335 This->m_state.lY += pt.y = hook->pt.y - pt.y;
336
337 if (This->base.data_format.user_df->dwFlags & DIDF_ABSAXIS)
338 {
339 pt1.x = This->m_state.lX;
340 pt1.y = This->m_state.lY;
341 } else
342 pt1 = pt;
343
344 if (pt.x)
345 {
346 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_X_AXIS_INSTANCE) | DIDFT_RELAXIS;
347 wdata = pt1.x;
348 }
349 if (pt.y)
350 {
351 /* Already have X, need to queue it */
352 if (inst_id != -1)
353 queue_event(iface, inst_id,
354 wdata, GetCurrentTime(), This->base.dinput->evsequence);
355 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_Y_AXIS_INSTANCE) | DIDFT_RELAXIS;
356 wdata = pt1.y;
357 }
358
359 if (pt.x || pt.y)
360 {
361 if ((This->warp_override == WARP_FORCE_ON) ||
362 (This->warp_override != WARP_DISABLE && (This->base.dwCoopLevel & DISCL_EXCLUSIVE)))
363 This->need_warp = TRUE;
364 }
365 break;
366 }
367 case WM_MOUSEWHEEL:
368 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_Z_AXIS_INSTANCE) | DIDFT_RELAXIS;
369 This->m_state.lZ += wdata = (short)HIWORD(hook->mouseData);
370 /* FarCry crashes if it gets a mouse wheel message */
371 /* FIXME: should probably filter out other messages too */
372 ret = This->clipped;
373 break;
374 case WM_LBUTTONDOWN:
375 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 0) | DIDFT_PSHBUTTON;
376 This->m_state.rgbButtons[0] = wdata = 0x80;
377 break;
378 case WM_LBUTTONUP:
379 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 0) | DIDFT_PSHBUTTON;
380 This->m_state.rgbButtons[0] = wdata = 0x00;
381 break;
382 case WM_RBUTTONDOWN:
383 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 1) | DIDFT_PSHBUTTON;
384 This->m_state.rgbButtons[1] = wdata = 0x80;
385 break;
386 case WM_RBUTTONUP:
387 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 1) | DIDFT_PSHBUTTON;
388 This->m_state.rgbButtons[1] = wdata = 0x00;
389 break;
390 case WM_MBUTTONDOWN:
391 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 2) | DIDFT_PSHBUTTON;
392 This->m_state.rgbButtons[2] = wdata = 0x80;
393 break;
394 case WM_MBUTTONUP:
395 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 2) | DIDFT_PSHBUTTON;
396 This->m_state.rgbButtons[2] = wdata = 0x00;
397 break;
398 case WM_XBUTTONDOWN:
399 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 2 + HIWORD(hook->mouseData)) | DIDFT_PSHBUTTON;
400 This->m_state.rgbButtons[2 + HIWORD(hook->mouseData)] = wdata = 0x80;
401 break;
402 case WM_XBUTTONUP:
403 inst_id = DIDFT_MAKEINSTANCE(WINE_MOUSE_BUTTONS_INSTANCE + 2 + HIWORD(hook->mouseData)) | DIDFT_PSHBUTTON;
404 This->m_state.rgbButtons[2 + HIWORD(hook->mouseData)] = wdata = 0x00;
405 break;
406 }
407
408
409 if (inst_id != -1)
410 {
411 _dump_mouse_state(&This->m_state);
412 queue_event(iface, inst_id,
413 wdata, GetCurrentTime(), This->base.dinput->evsequence++);
414 }
415
416 LeaveCriticalSection(&This->base.crit);
417 return ret;
418 }
419
420 static void warp_check( SysMouseImpl* This, BOOL force )
421 {
422 DWORD now = GetCurrentTime();
423 const DWORD interval = This->clipped ? 500 : 10;
424
425 if (force || (This->need_warp && (now - This->last_warped > interval)))
426 {
427 RECT rect, new_rect;
428 POINT mapped_center;
429
430 This->last_warped = now;
431 This->need_warp = FALSE;
432 if (!GetClientRect(This->base.win, &rect)) return;
433 MapWindowPoints( This->base.win, 0, (POINT *)&rect, 2 );
434 if (!This->clipped)
435 {
436 mapped_center.x = (rect.left + rect.right) / 2;
437 mapped_center.y = (rect.top + rect.bottom) / 2;
438 TRACE("Warping mouse to %d - %d\n", mapped_center.x, mapped_center.y);
439 SetCursorPos( mapped_center.x, mapped_center.y );
440 }
441 if (This->base.dwCoopLevel & DISCL_EXCLUSIVE)
442 {
443 /* make sure we clip even if the window covers the whole screen */
444 rect.left = max( rect.left, GetSystemMetrics( SM_XVIRTUALSCREEN ) + 1 );
445 rect.top = max( rect.top, GetSystemMetrics( SM_YVIRTUALSCREEN ) + 1 );
446 rect.right = min( rect.right, rect.left + GetSystemMetrics( SM_CXVIRTUALSCREEN ) - 2 );
447 rect.bottom = min( rect.bottom, rect.top + GetSystemMetrics( SM_CYVIRTUALSCREEN ) - 2 );
448 TRACE("Clipping mouse to %s\n", wine_dbgstr_rect( &rect ));
449 ClipCursor( &rect );
450 This->clipped = GetClipCursor( &new_rect ) && EqualRect( &rect, &new_rect );
451 }
452 }
453 }
454
455
456 /******************************************************************************
457 * Acquire : gets exclusive control of the mouse
458 */
459 static HRESULT WINAPI SysMouseWImpl_Acquire(LPDIRECTINPUTDEVICE8W iface)
460 {
461 SysMouseImpl *This = impl_from_IDirectInputDevice8W(iface);
462 POINT point;
463 HRESULT res;
464
465 TRACE("(this=%p)\n",This);
466
467 if ((res = IDirectInputDevice2WImpl_Acquire(iface)) != DI_OK) return res;
468
469 /* Init the mouse state */
470 GetCursorPos( &point );
471 if (This->base.data_format.user_df->dwFlags & DIDF_ABSAXIS)
472 {
473 This->m_state.lX = point.x;
474 This->m_state.lY = point.y;
475 } else {
476 This->m_state.lX = 0;
477 This->m_state.lY = 0;
478 This->org_coords = point;
479 }
480 This->m_state.lZ = 0;
481 This->m_state.rgbButtons[0] = GetKeyState(VK_LBUTTON) & 0x80;
482 This->m_state.rgbButtons[1] = GetKeyState(VK_RBUTTON) & 0x80;
483 This->m_state.rgbButtons[2] = GetKeyState(VK_MBUTTON) & 0x80;
484
485 if (This->base.dwCoopLevel & DISCL_EXCLUSIVE)
486 {
487 ShowCursor(FALSE); /* hide cursor */
488 warp_check( This, TRUE );
489 }
490 else if (This->warp_override == WARP_FORCE_ON)
491 {
492 /* Need a window to warp mouse in. */
493 if (!This->base.win) This->base.win = GetDesktopWindow();
494 warp_check( This, TRUE );
495 }
496 else if (This->clipped)
497 {
498 ClipCursor( NULL );
499 This->clipped = FALSE;
500 }
501
502 return DI_OK;
503 }
504
505 static HRESULT WINAPI SysMouseAImpl_Acquire(LPDIRECTINPUTDEVICE8A iface)
506 {
507 SysMouseImpl *This = impl_from_IDirectInputDevice8A(iface);
508 return SysMouseWImpl_Acquire(IDirectInputDevice8W_from_impl(This));
509 }
510
511 /******************************************************************************
512 * Unacquire : frees the mouse
513 */
514 static HRESULT WINAPI SysMouseWImpl_Unacquire(LPDIRECTINPUTDEVICE8W iface)
515 {
516 SysMouseImpl *This = impl_from_IDirectInputDevice8W(iface);
517 HRESULT res;
518
519 TRACE("(this=%p)\n",This);
520
521 if ((res = IDirectInputDevice2WImpl_Unacquire(iface)) != DI_OK) return res;
522
523 if (This->base.dwCoopLevel & DISCL_EXCLUSIVE)
524 {
525 ClipCursor(NULL);
526 ShowCursor(TRUE); /* show cursor */
527 This->clipped = FALSE;
528 }
529
530 /* And put the mouse cursor back where it was at acquire time */
531 if (This->base.dwCoopLevel & DISCL_EXCLUSIVE || This->warp_override == WARP_FORCE_ON)
532 {
533 TRACE("warping mouse back to %s\n", wine_dbgstr_point(&This->org_coords));
534 SetCursorPos(This->org_coords.x, This->org_coords.y);
535 }
536
537 return DI_OK;
538 }
539
540 static HRESULT WINAPI SysMouseAImpl_Unacquire(LPDIRECTINPUTDEVICE8A iface)
541 {
542 SysMouseImpl *This = impl_from_IDirectInputDevice8A(iface);
543 return SysMouseWImpl_Unacquire(IDirectInputDevice8W_from_impl(This));
544 }
545
546 /******************************************************************************
547 * GetDeviceState : returns the "state" of the mouse.
548 *
549 * For the moment, only the "standard" return structure (DIMOUSESTATE) is
550 * supported.
551 */
552 static HRESULT WINAPI SysMouseWImpl_GetDeviceState(LPDIRECTINPUTDEVICE8W iface, DWORD len, LPVOID ptr)
553 {
554 SysMouseImpl *This = impl_from_IDirectInputDevice8W(iface);
555
556 if(This->base.acquired == 0) return DIERR_NOTACQUIRED;
557
558 TRACE("(this=%p,0x%08x,%p):\n", This, len, ptr);
559 _dump_mouse_state(&This->m_state);
560
561 EnterCriticalSection(&This->base.crit);
562 /* Copy the current mouse state */
563 fill_DataFormat(ptr, len, &This->m_state, &This->base.data_format);
564
565 /* Initialize the buffer when in relative mode */
566 if (!(This->base.data_format.user_df->dwFlags & DIDF_ABSAXIS))
567 {
568 This->m_state.lX = 0;
569 This->m_state.lY = 0;
570 This->m_state.lZ = 0;
571 }
572 LeaveCriticalSection(&This->base.crit);
573
574 warp_check( This, FALSE );
575 return DI_OK;
576 }
577
578 static HRESULT WINAPI SysMouseAImpl_GetDeviceState(LPDIRECTINPUTDEVICE8A iface, DWORD len, LPVOID ptr)
579 {
580 SysMouseImpl *This = impl_from_IDirectInputDevice8A(iface);
581 return SysMouseWImpl_GetDeviceState(IDirectInputDevice8W_from_impl(This), len, ptr);
582 }
583
584 /******************************************************************************
585 * GetDeviceData : gets buffered input data.
586 */
587 static HRESULT WINAPI SysMouseWImpl_GetDeviceData(LPDIRECTINPUTDEVICE8W iface,
588 DWORD dodsize, LPDIDEVICEOBJECTDATA dod, LPDWORD entries, DWORD flags)
589 {
590 SysMouseImpl *This = impl_from_IDirectInputDevice8W(iface);
591 HRESULT res;
592
593 res = IDirectInputDevice2WImpl_GetDeviceData(iface, dodsize, dod, entries, flags);
594 if (SUCCEEDED(res)) warp_check( This, FALSE );
595 return res;
596 }
597
598 static HRESULT WINAPI SysMouseAImpl_GetDeviceData(LPDIRECTINPUTDEVICE8A iface,
599 DWORD dodsize, LPDIDEVICEOBJECTDATA dod, LPDWORD entries, DWORD flags)
600 {
601 SysMouseImpl *This = impl_from_IDirectInputDevice8A(iface);
602 return SysMouseWImpl_GetDeviceData(IDirectInputDevice8W_from_impl(This), dodsize, dod, entries, flags);
603 }
604
605 /******************************************************************************
606 * GetProperty : get input device properties
607 */
608 static HRESULT WINAPI SysMouseWImpl_GetProperty(LPDIRECTINPUTDEVICE8W iface, REFGUID rguid, LPDIPROPHEADER pdiph)
609 {
610 SysMouseImpl *This = impl_from_IDirectInputDevice8W(iface);
611
612 TRACE("(%p) %s,%p\n", This, debugstr_guid(rguid), pdiph);
613 _dump_DIPROPHEADER(pdiph);
614
615 if (IS_DIPROP(rguid)) {
616 switch (LOWORD(rguid)) {
617 case (DWORD_PTR) DIPROP_GRANULARITY: {
618 LPDIPROPDWORD pr = (LPDIPROPDWORD) pdiph;
619
620 /* We'll just assume that the app asks about the Z axis */
621 pr->dwData = WHEEL_DELTA;
622
623 break;
624 }
625
626 case (DWORD_PTR) DIPROP_RANGE: {
627 LPDIPROPRANGE pr = (LPDIPROPRANGE) pdiph;
628
629 if ((pdiph->dwHow == DIPH_BYID) &&
630 ((pdiph->dwObj == (DIDFT_MAKEINSTANCE(WINE_MOUSE_X_AXIS_INSTANCE) | DIDFT_RELAXIS)) ||
631 (pdiph->dwObj == (DIDFT_MAKEINSTANCE(WINE_MOUSE_Y_AXIS_INSTANCE) | DIDFT_RELAXIS)))) {
632 /* Querying the range of either the X or the Y axis. As I do
633 not know the range, do as if the range were
634 unrestricted...*/
635 pr->lMin = DIPROPRANGE_NOMIN;
636 pr->lMax = DIPROPRANGE_NOMAX;
637 }
638
639 break;
640 }
641
642 default:
643 return IDirectInputDevice2WImpl_GetProperty(iface, rguid, pdiph);
644 }
645 }
646
647 return DI_OK;
648 }
649
650 static HRESULT WINAPI SysMouseAImpl_GetProperty(LPDIRECTINPUTDEVICE8A iface, REFGUID rguid, LPDIPROPHEADER pdiph)
651 {
652 SysMouseImpl *This = impl_from_IDirectInputDevice8A(iface);
653 return SysMouseWImpl_GetProperty(IDirectInputDevice8W_from_impl(This), rguid, pdiph);
654 }
655
656 /******************************************************************************
657 * GetCapabilities : get the device capabilities
658 */
659 static HRESULT WINAPI SysMouseWImpl_GetCapabilities(LPDIRECTINPUTDEVICE8W iface, LPDIDEVCAPS lpDIDevCaps)
660 {
661 SysMouseImpl *This = impl_from_IDirectInputDevice8W(iface);
662 DIDEVCAPS devcaps;
663
664 TRACE("(this=%p,%p)\n",This,lpDIDevCaps);
665
666 if ((lpDIDevCaps->dwSize != sizeof(DIDEVCAPS)) && (lpDIDevCaps->dwSize != sizeof(DIDEVCAPS_DX3))) {
667 WARN("invalid parameter\n");
668 return DIERR_INVALIDPARAM;
669 }
670
671 devcaps.dwSize = lpDIDevCaps->dwSize;
672 devcaps.dwFlags = DIDC_ATTACHED | DIDC_EMULATED;
673 if (This->base.dinput->dwVersion >= 0x0800)
674 devcaps.dwDevType = DI8DEVTYPE_MOUSE | (DI8DEVTYPEMOUSE_TRADITIONAL << 8);
675 else
676 devcaps.dwDevType = DIDEVTYPE_MOUSE | (DIDEVTYPEMOUSE_TRADITIONAL << 8);
677 devcaps.dwAxes = 3;
678 devcaps.dwButtons = 8;
679 devcaps.dwPOVs = 0;
680 devcaps.dwFFSamplePeriod = 0;
681 devcaps.dwFFMinTimeResolution = 0;
682 devcaps.dwFirmwareRevision = 100;
683 devcaps.dwHardwareRevision = 100;
684 devcaps.dwFFDriverVersion = 0;
685
686 memcpy(lpDIDevCaps, &devcaps, lpDIDevCaps->dwSize);
687
688 return DI_OK;
689 }
690
691 static HRESULT WINAPI SysMouseAImpl_GetCapabilities(LPDIRECTINPUTDEVICE8A iface, LPDIDEVCAPS lpDIDevCaps)
692 {
693 SysMouseImpl *This = impl_from_IDirectInputDevice8A(iface);
694 return SysMouseWImpl_GetCapabilities(IDirectInputDevice8W_from_impl(This), lpDIDevCaps);
695 }
696
697 /******************************************************************************
698 * GetObjectInfo : get information about a device object such as a button
699 * or axis
700 */
701 static HRESULT WINAPI SysMouseWImpl_GetObjectInfo(LPDIRECTINPUTDEVICE8W iface,
702 LPDIDEVICEOBJECTINSTANCEW pdidoi, DWORD dwObj, DWORD dwHow)
703 {
704 static const WCHAR x_axisW[] = {'X','-','A','x','i','s',0};
705 static const WCHAR y_axisW[] = {'Y','-','A','x','i','s',0};
706 static const WCHAR wheelW[] = {'W','h','e','e','l',0};
707 static const WCHAR buttonW[] = {'B','u','t','t','o','n',' ','%','d',0};
708 HRESULT res;
709
710 res = IDirectInputDevice2WImpl_GetObjectInfo(iface, pdidoi, dwObj, dwHow);
711 if (res != DI_OK) return res;
712
713 if (IsEqualGUID(&pdidoi->guidType, &GUID_XAxis)) strcpyW(pdidoi->tszName, x_axisW);
714 else if (IsEqualGUID(&pdidoi->guidType, &GUID_YAxis)) strcpyW(pdidoi->tszName, y_axisW);
715 else if (IsEqualGUID(&pdidoi->guidType, &GUID_ZAxis)) strcpyW(pdidoi->tszName, wheelW);
716 else if (pdidoi->dwType & DIDFT_BUTTON)
717 wsprintfW(pdidoi->tszName, buttonW, DIDFT_GETINSTANCE(pdidoi->dwType) - 3);
718
719 _dump_OBJECTINSTANCEW(pdidoi);
720 return res;
721 }
722
723 static HRESULT WINAPI SysMouseAImpl_GetObjectInfo(LPDIRECTINPUTDEVICE8A iface,
724 LPDIDEVICEOBJECTINSTANCEA pdidoi, DWORD dwObj, DWORD dwHow)
725 {
726 SysMouseImpl *This = impl_from_IDirectInputDevice8A(iface);
727 HRESULT res;
728 DIDEVICEOBJECTINSTANCEW didoiW;
729 DWORD dwSize = pdidoi->dwSize;
730
731 didoiW.dwSize = sizeof(didoiW);
732 res = SysMouseWImpl_GetObjectInfo(IDirectInputDevice8W_from_impl(This), &didoiW, dwObj, dwHow);
733 if (res != DI_OK) return res;
734
735 memset(pdidoi, 0, pdidoi->dwSize);
736 memcpy(pdidoi, &didoiW, FIELD_OFFSET(DIDEVICEOBJECTINSTANCEW, tszName));
737 pdidoi->dwSize = dwSize;
738 WideCharToMultiByte(CP_ACP, 0, didoiW.tszName, -1, pdidoi->tszName,
739 sizeof(pdidoi->tszName), NULL, NULL);
740
741 return res;
742 }
743
744 /******************************************************************************
745 * GetDeviceInfo : get information about a device's identity
746 */
747 static HRESULT WINAPI SysMouseAImpl_GetDeviceInfo(
748 LPDIRECTINPUTDEVICE8A iface,
749 LPDIDEVICEINSTANCEA pdidi)
750 {
751 SysMouseImpl *This = impl_from_IDirectInputDevice8A(iface);
752 TRACE("(this=%p,%p)\n", This, pdidi);
753
754 if (pdidi->dwSize != sizeof(DIDEVICEINSTANCEA)) {
755 WARN(" dinput3 not supported yet...\n");
756 return DI_OK;
757 }
758
759 fill_mouse_dideviceinstanceA(pdidi, This->base.dinput->dwVersion);
760
761 return DI_OK;
762 }
763
764 static HRESULT WINAPI SysMouseWImpl_GetDeviceInfo(LPDIRECTINPUTDEVICE8W iface, LPDIDEVICEINSTANCEW pdidi)
765 {
766 SysMouseImpl *This = impl_from_IDirectInputDevice8W(iface);
767 TRACE("(this=%p,%p)\n", This, pdidi);
768
769 if (pdidi->dwSize != sizeof(DIDEVICEINSTANCEW)) {
770 WARN(" dinput3 not supported yet...\n");
771 return DI_OK;
772 }
773
774 fill_mouse_dideviceinstanceW(pdidi, This->base.dinput->dwVersion);
775
776 return DI_OK;
777 }
778
779 static HRESULT WINAPI SysMouseWImpl_BuildActionMap(LPDIRECTINPUTDEVICE8W iface,
780 LPDIACTIONFORMATW lpdiaf,
781 LPCWSTR lpszUserName,
782 DWORD dwFlags)
783 {
784 FIXME("(%p)->(%p,%s,%08x): semi-stub !\n", iface, lpdiaf, debugstr_w(lpszUserName), dwFlags);
785
786 return _build_action_map(iface, lpdiaf, lpszUserName, dwFlags, DIMOUSE_MASK, &c_dfDIMouse2);
787 }
788
789 static HRESULT WINAPI SysMouseAImpl_BuildActionMap(LPDIRECTINPUTDEVICE8A iface,
790 LPDIACTIONFORMATA lpdiaf,
791 LPCSTR lpszUserName,
792 DWORD dwFlags)
793 {
794 SysMouseImpl *This = impl_from_IDirectInputDevice8A(iface);
795 DIACTIONFORMATW diafW;
796 HRESULT hr;
797 WCHAR *lpszUserNameW = NULL;
798 int username_size;
799
800 diafW.rgoAction = HeapAlloc(GetProcessHeap(), 0, sizeof(DIACTIONW)*lpdiaf->dwNumActions);
801 _copy_diactionformatAtoW(&diafW, lpdiaf);
802
803 if (lpszUserName != NULL)
804 {
805 username_size = MultiByteToWideChar(CP_ACP, 0, lpszUserName, -1, NULL, 0);
806 lpszUserNameW = HeapAlloc(GetProcessHeap(), 0, sizeof(WCHAR)*username_size);
807 MultiByteToWideChar(CP_ACP, 0, lpszUserName, -1, lpszUserNameW, username_size);
808 }
809
810 hr = SysMouseWImpl_BuildActionMap(&This->base.IDirectInputDevice8W_iface, &diafW, lpszUserNameW, dwFlags);
811
812 _copy_diactionformatWtoA(lpdiaf, &diafW);
813 HeapFree(GetProcessHeap(), 0, diafW.rgoAction);
814 HeapFree(GetProcessHeap(), 0, lpszUserNameW);
815
816 return hr;
817 }
818
819 static HRESULT WINAPI SysMouseWImpl_SetActionMap(LPDIRECTINPUTDEVICE8W iface,
820 LPDIACTIONFORMATW lpdiaf,
821 LPCWSTR lpszUserName,
822 DWORD dwFlags)
823 {
824 FIXME("(%p)->(%p,%s,%08x): semi-stub !\n", iface, lpdiaf, debugstr_w(lpszUserName), dwFlags);
825
826 return _set_action_map(iface, lpdiaf, lpszUserName, dwFlags, &c_dfDIMouse2);
827 }
828
829 static HRESULT WINAPI SysMouseAImpl_SetActionMap(LPDIRECTINPUTDEVICE8A iface,
830 LPDIACTIONFORMATA lpdiaf,
831 LPCSTR lpszUserName,
832 DWORD dwFlags)
833 {
834 SysMouseImpl *This = impl_from_IDirectInputDevice8A(iface);
835 DIACTIONFORMATW diafW;
836 HRESULT hr;
837 WCHAR *lpszUserNameW = NULL;
838 int username_size;
839
840 diafW.rgoAction = HeapAlloc(GetProcessHeap(), 0, sizeof(DIACTIONW)*lpdiaf->dwNumActions);
841 _copy_diactionformatAtoW(&diafW, lpdiaf);
842
843 if (lpszUserName != NULL)
844 {
845 username_size = MultiByteToWideChar(CP_ACP, 0, lpszUserName, -1, NULL, 0);
846 lpszUserNameW = HeapAlloc(GetProcessHeap(), 0, sizeof(WCHAR)*username_size);
847 MultiByteToWideChar(CP_ACP, 0, lpszUserName, -1, lpszUserNameW, username_size);
848 }
849
850 hr = SysMouseWImpl_SetActionMap(&This->base.IDirectInputDevice8W_iface, &diafW, lpszUserNameW, dwFlags);
851
852 HeapFree(GetProcessHeap(), 0, diafW.rgoAction);
853 HeapFree(GetProcessHeap(), 0, lpszUserNameW);
854
855 return hr;
856 }
857
858 static const IDirectInputDevice8AVtbl SysMouseAvt =
859 {
860 IDirectInputDevice2AImpl_QueryInterface,
861 IDirectInputDevice2AImpl_AddRef,
862 IDirectInputDevice2AImpl_Release,
863 SysMouseAImpl_GetCapabilities,
864 IDirectInputDevice2AImpl_EnumObjects,
865 SysMouseAImpl_GetProperty,
866 IDirectInputDevice2AImpl_SetProperty,
867 SysMouseAImpl_Acquire,
868 SysMouseAImpl_Unacquire,
869 SysMouseAImpl_GetDeviceState,
870 SysMouseAImpl_GetDeviceData,
871 IDirectInputDevice2AImpl_SetDataFormat,
872 IDirectInputDevice2AImpl_SetEventNotification,
873 IDirectInputDevice2AImpl_SetCooperativeLevel,
874 SysMouseAImpl_GetObjectInfo,
875 SysMouseAImpl_GetDeviceInfo,
876 IDirectInputDevice2AImpl_RunControlPanel,
877 IDirectInputDevice2AImpl_Initialize,
878 IDirectInputDevice2AImpl_CreateEffect,
879 IDirectInputDevice2AImpl_EnumEffects,
880 IDirectInputDevice2AImpl_GetEffectInfo,
881 IDirectInputDevice2AImpl_GetForceFeedbackState,
882 IDirectInputDevice2AImpl_SendForceFeedbackCommand,
883 IDirectInputDevice2AImpl_EnumCreatedEffectObjects,
884 IDirectInputDevice2AImpl_Escape,
885 IDirectInputDevice2AImpl_Poll,
886 IDirectInputDevice2AImpl_SendDeviceData,
887 IDirectInputDevice7AImpl_EnumEffectsInFile,
888 IDirectInputDevice7AImpl_WriteEffectToFile,
889 SysMouseAImpl_BuildActionMap,
890 SysMouseAImpl_SetActionMap,
891 IDirectInputDevice8AImpl_GetImageInfo
892 };
893
894 static const IDirectInputDevice8WVtbl SysMouseWvt =
895 {
896 IDirectInputDevice2WImpl_QueryInterface,
897 IDirectInputDevice2WImpl_AddRef,
898 IDirectInputDevice2WImpl_Release,
899 SysMouseWImpl_GetCapabilities,
900 IDirectInputDevice2WImpl_EnumObjects,
901 SysMouseWImpl_GetProperty,
902 IDirectInputDevice2WImpl_SetProperty,
903 SysMouseWImpl_Acquire,
904 SysMouseWImpl_Unacquire,
905 SysMouseWImpl_GetDeviceState,
906 SysMouseWImpl_GetDeviceData,
907 IDirectInputDevice2WImpl_SetDataFormat,
908 IDirectInputDevice2WImpl_SetEventNotification,
909 IDirectInputDevice2WImpl_SetCooperativeLevel,
910 SysMouseWImpl_GetObjectInfo,
911 SysMouseWImpl_GetDeviceInfo,
912 IDirectInputDevice2WImpl_RunControlPanel,
913 IDirectInputDevice2WImpl_Initialize,
914 IDirectInputDevice2WImpl_CreateEffect,
915 IDirectInputDevice2WImpl_EnumEffects,
916 IDirectInputDevice2WImpl_GetEffectInfo,
917 IDirectInputDevice2WImpl_GetForceFeedbackState,
918 IDirectInputDevice2WImpl_SendForceFeedbackCommand,
919 IDirectInputDevice2WImpl_EnumCreatedEffectObjects,
920 IDirectInputDevice2WImpl_Escape,
921 IDirectInputDevice2WImpl_Poll,
922 IDirectInputDevice2WImpl_SendDeviceData,
923 IDirectInputDevice7WImpl_EnumEffectsInFile,
924 IDirectInputDevice7WImpl_WriteEffectToFile,
925 SysMouseWImpl_BuildActionMap,
926 SysMouseWImpl_SetActionMap,
927 IDirectInputDevice8WImpl_GetImageInfo
928 };