4d6b56aff70d89b01c78ee717a19b985cb3546e2
[reactos.git] / reactos / dll / directx / dinput / dinput_main.c
1 /* DirectInput
2 *
3 * Copyright 1998 Marcus Meissner
4 * Copyright 1998,1999 Lionel Ulmer
5 * Copyright 2000-2002 TransGaming Technologies Inc.
6 * Copyright 2007 Vitaliy Margolen
7 *
8 *
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
13 *
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
18 *
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
22 */
23 /* Status:
24 *
25 * - Tomb Raider 2 Demo:
26 * Playable using keyboard only.
27 * - WingCommander Prophecy Demo:
28 * Doesn't get Input Focus.
29 *
30 * - Fallout : works great in X and DGA mode
31 */
32
33 #include <config.h>
34 //#include <assert.h>
35 //#include <stdarg.h>
36 //#include <string.h>
37
38 #define WIN32_NO_STATUS
39 #define _INC_WINDOWS
40 #define COM_NO_WINDOWS_H
41
42 #define COBJMACROS
43 #define NONAMELESSUNION
44
45 #include <wine/debug.h>
46 //#include "wine/unicode.h"
47 //#include "windef.h"
48 #include <winbase.h>
49 #include <winuser.h>
50 #include <winnls.h>
51 //#include "winerror.h"
52 #include <objbase.h>
53 #include <rpcproxy.h>
54 //#include "initguid.h"
55 //#include "dinput_private.h"
56 #include "device_private.h"
57 //#include "dinputd.h"
58
59 WINE_DEFAULT_DEBUG_CHANNEL(dinput);
60
61 static const IDirectInput7AVtbl ddi7avt;
62 static const IDirectInput7WVtbl ddi7wvt;
63 static const IDirectInput8AVtbl ddi8avt;
64 static const IDirectInput8WVtbl ddi8wvt;
65 static const IDirectInputJoyConfig8Vtbl JoyConfig8vt;
66
67 static inline IDirectInputImpl *impl_from_IDirectInput7A( IDirectInput7A *iface )
68 {
69 return CONTAINING_RECORD( iface, IDirectInputImpl, IDirectInput7A_iface );
70 }
71
72 static inline IDirectInputImpl *impl_from_IDirectInput7W( IDirectInput7W *iface )
73 {
74 return CONTAINING_RECORD( iface, IDirectInputImpl, IDirectInput7W_iface );
75 }
76
77 static inline IDirectInputImpl *impl_from_IDirectInput8A( IDirectInput8A *iface )
78 {
79 return CONTAINING_RECORD( iface, IDirectInputImpl, IDirectInput8A_iface );
80 }
81
82 static inline IDirectInputImpl *impl_from_IDirectInput8W( IDirectInput8W *iface )
83 {
84 return CONTAINING_RECORD( iface, IDirectInputImpl, IDirectInput8W_iface );
85 }
86
87 static inline IDirectInputDeviceImpl *impl_from_IDirectInputDevice8A(IDirectInputDevice8A *iface)
88 {
89 return CONTAINING_RECORD(iface, IDirectInputDeviceImpl, IDirectInputDevice8A_iface);
90 }
91 static inline IDirectInputDeviceImpl *impl_from_IDirectInputDevice8W(IDirectInputDevice8W *iface)
92 {
93 return CONTAINING_RECORD(iface, IDirectInputDeviceImpl, IDirectInputDevice8W_iface);
94 }
95
96 static const struct dinput_device *dinput_devices[] =
97 {
98 &mouse_device,
99 &keyboard_device,
100 &joystick_linuxinput_device,
101 &joystick_linux_device,
102 &joystick_osx_device
103 };
104 #define NB_DINPUT_DEVICES (sizeof(dinput_devices)/sizeof(dinput_devices[0]))
105
106 static HINSTANCE DINPUT_instance = NULL;
107
108 static BOOL check_hook_thread(void);
109 static CRITICAL_SECTION dinput_hook_crit;
110 static struct list direct_input_list = LIST_INIT( direct_input_list );
111
112 static HRESULT initialize_directinput_instance(IDirectInputImpl *This, DWORD dwVersion);
113 static void uninitialize_directinput_instance(IDirectInputImpl *This);
114
115 static HRESULT create_directinput_instance(REFIID riid, LPVOID *ppDI, IDirectInputImpl **out)
116 {
117 IDirectInputImpl *This = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectInputImpl) );
118 HRESULT hr;
119
120 if (!This)
121 return E_OUTOFMEMORY;
122
123 This->IDirectInput7A_iface.lpVtbl = &ddi7avt;
124 This->IDirectInput7W_iface.lpVtbl = &ddi7wvt;
125 This->IDirectInput8A_iface.lpVtbl = &ddi8avt;
126 This->IDirectInput8W_iface.lpVtbl = &ddi8wvt;
127 This->IDirectInputJoyConfig8_iface.lpVtbl = &JoyConfig8vt;
128
129 hr = IDirectInput_QueryInterface( &This->IDirectInput7A_iface, riid, ppDI );
130 if (FAILED(hr))
131 {
132 HeapFree( GetProcessHeap(), 0, This );
133 return hr;
134 }
135
136 if (out) *out = This;
137 return DI_OK;
138 }
139
140 /******************************************************************************
141 * DirectInputCreateEx (DINPUT.@)
142 */
143 HRESULT WINAPI DirectInputCreateEx(
144 HINSTANCE hinst, DWORD dwVersion, REFIID riid, LPVOID *ppDI,
145 LPUNKNOWN punkOuter)
146 {
147 IDirectInputImpl *This;
148 HRESULT hr;
149
150 TRACE("(%p,%04x,%s,%p,%p)\n", hinst, dwVersion, debugstr_guid(riid), ppDI, punkOuter);
151
152 if (IsEqualGUID( &IID_IDirectInputA, riid ) ||
153 IsEqualGUID( &IID_IDirectInput2A, riid ) ||
154 IsEqualGUID( &IID_IDirectInput7A, riid ) ||
155 IsEqualGUID( &IID_IDirectInputW, riid ) ||
156 IsEqualGUID( &IID_IDirectInput2W, riid ) ||
157 IsEqualGUID( &IID_IDirectInput7W, riid ))
158 {
159 hr = create_directinput_instance(riid, ppDI, &This);
160 if (FAILED(hr))
161 return hr;
162 }
163 else
164 return DIERR_NOINTERFACE;
165
166 hr = IDirectInput_Initialize( &This->IDirectInput7A_iface, hinst, dwVersion );
167 if (FAILED(hr))
168 {
169 IDirectInput_Release( &This->IDirectInput7A_iface );
170 *ppDI = NULL;
171 return hr;
172 }
173
174 return DI_OK;
175 }
176
177 /******************************************************************************
178 * DirectInputCreateA (DINPUT.@)
179 */
180 HRESULT WINAPI DECLSPEC_HOTPATCH DirectInputCreateA(HINSTANCE hinst, DWORD dwVersion, LPDIRECTINPUTA *ppDI, LPUNKNOWN punkOuter)
181 {
182 return DirectInputCreateEx(hinst, dwVersion, &IID_IDirectInput7A, (LPVOID *)ppDI, punkOuter);
183 }
184
185 /******************************************************************************
186 * DirectInputCreateW (DINPUT.@)
187 */
188 HRESULT WINAPI DECLSPEC_HOTPATCH DirectInputCreateW(HINSTANCE hinst, DWORD dwVersion, LPDIRECTINPUTW *ppDI, LPUNKNOWN punkOuter)
189 {
190 return DirectInputCreateEx(hinst, dwVersion, &IID_IDirectInput7W, (LPVOID *)ppDI, punkOuter);
191 }
192
193 static const char *_dump_DIDEVTYPE_value(DWORD dwDevType)
194 {
195 switch (dwDevType) {
196 case 0: return "All devices";
197 case DIDEVTYPE_MOUSE: return "DIDEVTYPE_MOUSE";
198 case DIDEVTYPE_KEYBOARD: return "DIDEVTYPE_KEYBOARD";
199 case DIDEVTYPE_JOYSTICK: return "DIDEVTYPE_JOYSTICK";
200 case DIDEVTYPE_DEVICE: return "DIDEVTYPE_DEVICE";
201 default: return "Unknown";
202 }
203 }
204
205 static void _dump_EnumDevices_dwFlags(DWORD dwFlags)
206 {
207 if (TRACE_ON(dinput)) {
208 unsigned int i;
209 static const struct {
210 DWORD mask;
211 const char *name;
212 } flags[] = {
213 #define FE(x) { x, #x}
214 FE(DIEDFL_ALLDEVICES),
215 FE(DIEDFL_ATTACHEDONLY),
216 FE(DIEDFL_FORCEFEEDBACK),
217 FE(DIEDFL_INCLUDEALIASES),
218 FE(DIEDFL_INCLUDEPHANTOMS),
219 FE(DIEDFL_INCLUDEHIDDEN)
220 #undef FE
221 };
222 TRACE(" flags: ");
223 if (dwFlags == 0) {
224 TRACE("DIEDFL_ALLDEVICES\n");
225 return;
226 }
227 for (i = 0; i < (sizeof(flags) / sizeof(flags[0])); i++)
228 if (flags[i].mask & dwFlags)
229 TRACE("%s ",flags[i].name);
230 }
231 TRACE("\n");
232 }
233
234 static void _dump_diactionformatA(LPDIACTIONFORMATA lpdiActionFormat)
235 {
236 unsigned int i;
237
238 TRACE("diaf.dwSize = %d\n", lpdiActionFormat->dwSize);
239 TRACE("diaf.dwActionSize = %d\n", lpdiActionFormat->dwActionSize);
240 TRACE("diaf.dwDataSize = %d\n", lpdiActionFormat->dwDataSize);
241 TRACE("diaf.dwNumActions = %d\n", lpdiActionFormat->dwNumActions);
242 TRACE("diaf.rgoAction = %p\n", lpdiActionFormat->rgoAction);
243 TRACE("diaf.guidActionMap = %s\n", debugstr_guid(&lpdiActionFormat->guidActionMap));
244 TRACE("diaf.dwGenre = 0x%08x\n", lpdiActionFormat->dwGenre);
245 TRACE("diaf.dwBufferSize = %d\n", lpdiActionFormat->dwBufferSize);
246 TRACE("diaf.lAxisMin = %d\n", lpdiActionFormat->lAxisMin);
247 TRACE("diaf.lAxisMax = %d\n", lpdiActionFormat->lAxisMax);
248 TRACE("diaf.hInstString = %p\n", lpdiActionFormat->hInstString);
249 TRACE("diaf.ftTimeStamp ...\n");
250 TRACE("diaf.dwCRC = 0x%x\n", lpdiActionFormat->dwCRC);
251 TRACE("diaf.tszActionMap = %s\n", debugstr_a(lpdiActionFormat->tszActionMap));
252 for (i = 0; i < lpdiActionFormat->dwNumActions; i++)
253 {
254 TRACE("diaf.rgoAction[%u]:\n", i);
255 TRACE("\tuAppData=0x%lx\n", lpdiActionFormat->rgoAction[i].uAppData);
256 TRACE("\tdwSemantic=0x%08x\n", lpdiActionFormat->rgoAction[i].dwSemantic);
257 TRACE("\tdwFlags=0x%x\n", lpdiActionFormat->rgoAction[i].dwFlags);
258 TRACE("\tszActionName=%s\n", debugstr_a(lpdiActionFormat->rgoAction[i].u.lptszActionName));
259 TRACE("\tguidInstance=%s\n", debugstr_guid(&lpdiActionFormat->rgoAction[i].guidInstance));
260 TRACE("\tdwObjID=0x%x\n", lpdiActionFormat->rgoAction[i].dwObjID);
261 TRACE("\tdwHow=0x%x\n", lpdiActionFormat->rgoAction[i].dwHow);
262 }
263 }
264
265 void _copy_diactionformatAtoW(LPDIACTIONFORMATW to, LPDIACTIONFORMATA from)
266 {
267 int i;
268
269 to->dwSize = sizeof(DIACTIONFORMATW);
270 to->dwActionSize = sizeof(DIACTIONW);
271 to->dwDataSize = from->dwDataSize;
272 to->dwNumActions = from->dwNumActions;
273 to->guidActionMap = from->guidActionMap;
274 to->dwGenre = from->dwGenre;
275 to->dwBufferSize = from->dwBufferSize;
276 to->lAxisMin = from->lAxisMin;
277 to->lAxisMax = from->lAxisMax;
278 to->dwCRC = from->dwCRC;
279 to->ftTimeStamp = from->ftTimeStamp;
280
281 for (i=0; i < to->dwNumActions; i++)
282 {
283 to->rgoAction[i].uAppData = from->rgoAction[i].uAppData;
284 to->rgoAction[i].dwSemantic = from->rgoAction[i].dwSemantic;
285 to->rgoAction[i].dwFlags = from->rgoAction[i].dwFlags;
286 to->rgoAction[i].guidInstance = from->rgoAction[i].guidInstance;
287 to->rgoAction[i].dwObjID = from->rgoAction[i].dwObjID;
288 to->rgoAction[i].dwHow = from->rgoAction[i].dwHow;
289 }
290 }
291
292 void _copy_diactionformatWtoA(LPDIACTIONFORMATA to, LPDIACTIONFORMATW from)
293 {
294 int i;
295
296 to->dwSize = sizeof(DIACTIONFORMATA);
297 to->dwActionSize = sizeof(DIACTIONA);
298 to->dwDataSize = from->dwDataSize;
299 to->dwNumActions = from->dwNumActions;
300 to->guidActionMap = from->guidActionMap;
301 to->dwGenre = from->dwGenre;
302 to->dwBufferSize = from->dwBufferSize;
303 to->lAxisMin = from->lAxisMin;
304 to->lAxisMax = from->lAxisMax;
305 to->dwCRC = from->dwCRC;
306 to->ftTimeStamp = from->ftTimeStamp;
307
308 for (i=0; i < to->dwNumActions; i++)
309 {
310 to->rgoAction[i].uAppData = from->rgoAction[i].uAppData;
311 to->rgoAction[i].dwSemantic = from->rgoAction[i].dwSemantic;
312 to->rgoAction[i].dwFlags = from->rgoAction[i].dwFlags;
313 to->rgoAction[i].guidInstance = from->rgoAction[i].guidInstance;
314 to->rgoAction[i].dwObjID = from->rgoAction[i].dwObjID;
315 to->rgoAction[i].dwHow = from->rgoAction[i].dwHow;
316 }
317 }
318
319 /* diactionformat_priority
320 *
321 * Given a DIACTIONFORMAT structure and a DI genre, returns the enumeration
322 * priority. Joysticks should pass the game genre, and mouse or keyboard their
323 * respective DI*_MASK
324 */
325 static DWORD diactionformat_priorityA(LPDIACTIONFORMATA lpdiaf, DWORD genre)
326 {
327 int i;
328 DWORD priorityFlags = 0;
329
330 /* If there's at least one action for the device it's priority 1 */
331 for(i=0; i < lpdiaf->dwNumActions; i++)
332 if ((lpdiaf->rgoAction[i].dwSemantic & genre) == genre)
333 priorityFlags |= DIEDBS_MAPPEDPRI1;
334
335 return priorityFlags;
336 }
337
338 static DWORD diactionformat_priorityW(LPDIACTIONFORMATW lpdiaf, DWORD genre)
339 {
340 int i;
341 DWORD priorityFlags = 0;
342
343 /* If there's at least one action for the device it's priority 1 */
344 for(i=0; i < lpdiaf->dwNumActions; i++)
345 if ((lpdiaf->rgoAction[i].dwSemantic & genre) == genre)
346 priorityFlags |= DIEDBS_MAPPEDPRI1;
347
348 return priorityFlags;
349 }
350
351 /******************************************************************************
352 * IDirectInputA_EnumDevices
353 */
354 static HRESULT WINAPI IDirectInputAImpl_EnumDevices(
355 LPDIRECTINPUT7A iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKA lpCallback,
356 LPVOID pvRef, DWORD dwFlags)
357 {
358 IDirectInputImpl *This = impl_from_IDirectInput7A(iface);
359 DIDEVICEINSTANCEA devInstance;
360 unsigned int i;
361 int j, r;
362
363 TRACE("(this=%p,0x%04x '%s',%p,%p,%04x)\n",
364 This, dwDevType, _dump_DIDEVTYPE_value(dwDevType),
365 lpCallback, pvRef, dwFlags);
366 _dump_EnumDevices_dwFlags(dwFlags);
367
368 if (!lpCallback ||
369 dwFlags & ~(DIEDFL_ATTACHEDONLY | DIEDFL_FORCEFEEDBACK | DIEDFL_INCLUDEALIASES | DIEDFL_INCLUDEPHANTOMS | DIEDFL_INCLUDEHIDDEN) ||
370 (dwDevType > DI8DEVCLASS_GAMECTRL && dwDevType < DI8DEVTYPE_DEVICE) || dwDevType > DI8DEVTYPE_SUPPLEMENTAL)
371 return DIERR_INVALIDPARAM;
372
373 if (!This->initialized)
374 return DIERR_NOTINITIALIZED;
375
376 for (i = 0; i < NB_DINPUT_DEVICES; i++) {
377 if (!dinput_devices[i]->enum_deviceA) continue;
378 for (j = 0, r = -1; r != 0; j++) {
379 devInstance.dwSize = sizeof(devInstance);
380 TRACE(" - checking device %u ('%s')\n", i, dinput_devices[i]->name);
381 if ((r = dinput_devices[i]->enum_deviceA(dwDevType, dwFlags, &devInstance, This->dwVersion, j))) {
382 if (lpCallback(&devInstance,pvRef) == DIENUM_STOP)
383 return 0;
384 }
385 }
386 }
387
388 return 0;
389 }
390 /******************************************************************************
391 * IDirectInputW_EnumDevices
392 */
393 static HRESULT WINAPI IDirectInputWImpl_EnumDevices(
394 LPDIRECTINPUT7W iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKW lpCallback,
395 LPVOID pvRef, DWORD dwFlags)
396 {
397 IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
398 DIDEVICEINSTANCEW devInstance;
399 unsigned int i;
400 int j, r;
401
402 TRACE("(this=%p,0x%04x '%s',%p,%p,%04x)\n",
403 This, dwDevType, _dump_DIDEVTYPE_value(dwDevType),
404 lpCallback, pvRef, dwFlags);
405 _dump_EnumDevices_dwFlags(dwFlags);
406
407 if (!lpCallback ||
408 dwFlags & ~(DIEDFL_ATTACHEDONLY | DIEDFL_FORCEFEEDBACK | DIEDFL_INCLUDEALIASES | DIEDFL_INCLUDEPHANTOMS | DIEDFL_INCLUDEHIDDEN) ||
409 (dwDevType > DI8DEVCLASS_GAMECTRL && dwDevType < DI8DEVTYPE_DEVICE) || dwDevType > DI8DEVTYPE_SUPPLEMENTAL)
410 return DIERR_INVALIDPARAM;
411
412 if (!This->initialized)
413 return DIERR_NOTINITIALIZED;
414
415 for (i = 0; i < NB_DINPUT_DEVICES; i++) {
416 if (!dinput_devices[i]->enum_deviceW) continue;
417 for (j = 0, r = -1; r != 0; j++) {
418 devInstance.dwSize = sizeof(devInstance);
419 TRACE(" - checking device %u ('%s')\n", i, dinput_devices[i]->name);
420 if ((r = dinput_devices[i]->enum_deviceW(dwDevType, dwFlags, &devInstance, This->dwVersion, j))) {
421 if (lpCallback(&devInstance,pvRef) == DIENUM_STOP)
422 return 0;
423 }
424 }
425 }
426
427 return 0;
428 }
429
430 static ULONG WINAPI IDirectInputAImpl_AddRef(LPDIRECTINPUT7A iface)
431 {
432 IDirectInputImpl *This = impl_from_IDirectInput7A( iface );
433 ULONG ref = InterlockedIncrement(&This->ref);
434
435 TRACE( "(%p) incrementing from %d\n", This, ref - 1);
436 return ref;
437 }
438
439 static ULONG WINAPI IDirectInputWImpl_AddRef(LPDIRECTINPUT7W iface)
440 {
441 IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
442 return IDirectInputAImpl_AddRef( &This->IDirectInput7A_iface );
443 }
444
445 static ULONG WINAPI IDirectInputAImpl_Release(LPDIRECTINPUT7A iface)
446 {
447 IDirectInputImpl *This = impl_from_IDirectInput7A( iface );
448 ULONG ref = InterlockedDecrement( &This->ref );
449
450 TRACE( "(%p) releasing from %d\n", This, ref + 1 );
451
452 if (ref == 0)
453 {
454 uninitialize_directinput_instance( This );
455 HeapFree( GetProcessHeap(), 0, This );
456 }
457
458 return ref;
459 }
460
461 static ULONG WINAPI IDirectInputWImpl_Release(LPDIRECTINPUT7W iface)
462 {
463 IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
464 return IDirectInputAImpl_Release( &This->IDirectInput7A_iface );
465 }
466
467 static HRESULT WINAPI IDirectInputAImpl_QueryInterface(LPDIRECTINPUT7A iface, REFIID riid, LPVOID *ppobj)
468 {
469 IDirectInputImpl *This = impl_from_IDirectInput7A( iface );
470
471 TRACE( "(%p)->(%s,%p)\n", This, debugstr_guid(riid), ppobj );
472
473 if (!riid || !ppobj)
474 return E_POINTER;
475
476 if (IsEqualGUID( &IID_IUnknown, riid ) ||
477 IsEqualGUID( &IID_IDirectInputA, riid ) ||
478 IsEqualGUID( &IID_IDirectInput2A, riid ) ||
479 IsEqualGUID( &IID_IDirectInput7A, riid ))
480 {
481 *ppobj = &This->IDirectInput7A_iface;
482 IUnknown_AddRef( (IUnknown*)*ppobj );
483
484 return DI_OK;
485 }
486
487 if (IsEqualGUID( &IID_IDirectInputW, riid ) ||
488 IsEqualGUID( &IID_IDirectInput2W, riid ) ||
489 IsEqualGUID( &IID_IDirectInput7W, riid ))
490 {
491 *ppobj = &This->IDirectInput7W_iface;
492 IUnknown_AddRef( (IUnknown*)*ppobj );
493
494 return DI_OK;
495 }
496
497 if (IsEqualGUID( &IID_IDirectInput8A, riid ))
498 {
499 *ppobj = &This->IDirectInput8A_iface;
500 IUnknown_AddRef( (IUnknown*)*ppobj );
501
502 return DI_OK;
503 }
504
505 if (IsEqualGUID( &IID_IDirectInput8W, riid ))
506 {
507 *ppobj = &This->IDirectInput8W_iface;
508 IUnknown_AddRef( (IUnknown*)*ppobj );
509
510 return DI_OK;
511 }
512
513 if (IsEqualGUID( &IID_IDirectInputJoyConfig8, riid ))
514 {
515 *ppobj = &This->IDirectInputJoyConfig8_iface;
516 IUnknown_AddRef( (IUnknown*)*ppobj );
517
518 return DI_OK;
519 }
520
521 FIXME( "Unsupported interface: %s\n", debugstr_guid(riid));
522 *ppobj = NULL;
523 return E_NOINTERFACE;
524 }
525
526 static HRESULT WINAPI IDirectInputWImpl_QueryInterface(LPDIRECTINPUT7W iface, REFIID riid, LPVOID *ppobj)
527 {
528 IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
529 return IDirectInputAImpl_QueryInterface( &This->IDirectInput7A_iface, riid, ppobj );
530 }
531
532 static HRESULT initialize_directinput_instance(IDirectInputImpl *This, DWORD dwVersion)
533 {
534 if (!This->initialized)
535 {
536 This->dwVersion = dwVersion;
537 This->evsequence = 1;
538
539 InitializeCriticalSection( &This->crit );
540 This->crit.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": IDirectInputImpl*->crit");
541
542 list_init( &This->devices_list );
543
544 /* Add self to the list of the IDirectInputs */
545 EnterCriticalSection( &dinput_hook_crit );
546 list_add_head( &direct_input_list, &This->entry );
547 LeaveCriticalSection( &dinput_hook_crit );
548
549 This->initialized = TRUE;
550
551 if (!check_hook_thread())
552 {
553 uninitialize_directinput_instance( This );
554 return DIERR_GENERIC;
555 }
556 }
557
558 return DI_OK;
559 }
560
561 static void uninitialize_directinput_instance(IDirectInputImpl *This)
562 {
563 if (This->initialized)
564 {
565 /* Remove self from the list of the IDirectInputs */
566 EnterCriticalSection( &dinput_hook_crit );
567 list_remove( &This->entry );
568 LeaveCriticalSection( &dinput_hook_crit );
569
570 check_hook_thread();
571
572 This->crit.DebugInfo->Spare[0] = 0;
573 DeleteCriticalSection( &This->crit );
574
575 This->initialized = FALSE;
576 }
577 }
578
579 enum directinput_versions
580 {
581 DIRECTINPUT_VERSION_300 = 0x0300,
582 DIRECTINPUT_VERSION_500 = 0x0500,
583 DIRECTINPUT_VERSION_50A = 0x050A,
584 DIRECTINPUT_VERSION_5B2 = 0x05B2,
585 DIRECTINPUT_VERSION_602 = 0x0602,
586 DIRECTINPUT_VERSION_61A = 0x061A,
587 DIRECTINPUT_VERSION_700 = 0x0700,
588 };
589
590 static HRESULT WINAPI IDirectInputAImpl_Initialize(LPDIRECTINPUT7A iface, HINSTANCE hinst, DWORD version)
591 {
592 IDirectInputImpl *This = impl_from_IDirectInput7A( iface );
593
594 TRACE("(%p)->(%p, 0x%04x)\n", iface, hinst, version);
595
596 if (!hinst)
597 return DIERR_INVALIDPARAM;
598 else if (version == 0)
599 return DIERR_NOTINITIALIZED;
600 else if (version > DIRECTINPUT_VERSION_700)
601 return DIERR_OLDDIRECTINPUTVERSION;
602 else if (version != DIRECTINPUT_VERSION_300 && version != DIRECTINPUT_VERSION_500 &&
603 version != DIRECTINPUT_VERSION_50A && version != DIRECTINPUT_VERSION_5B2 &&
604 version != DIRECTINPUT_VERSION_602 && version != DIRECTINPUT_VERSION_61A &&
605 version != DIRECTINPUT_VERSION_700 && version != DIRECTINPUT_VERSION)
606 return DIERR_BETADIRECTINPUTVERSION;
607
608 return initialize_directinput_instance(This, version);
609 }
610
611 static HRESULT WINAPI IDirectInputWImpl_Initialize(LPDIRECTINPUT7W iface, HINSTANCE hinst, DWORD x)
612 {
613 IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
614 return IDirectInputAImpl_Initialize( &This->IDirectInput7A_iface, hinst, x );
615 }
616
617 static HRESULT WINAPI IDirectInputAImpl_GetDeviceStatus(LPDIRECTINPUT7A iface, REFGUID rguid)
618 {
619 IDirectInputImpl *This = impl_from_IDirectInput7A( iface );
620 HRESULT hr;
621 LPDIRECTINPUTDEVICEA device;
622
623 TRACE( "(%p)->(%s)\n", This, debugstr_guid(rguid) );
624
625 if (!rguid) return E_POINTER;
626 if (!This->initialized)
627 return DIERR_NOTINITIALIZED;
628
629 hr = IDirectInput_CreateDevice( iface, rguid, &device, NULL );
630 if (hr != DI_OK) return DI_NOTATTACHED;
631
632 IUnknown_Release( device );
633
634 return DI_OK;
635 }
636
637 static HRESULT WINAPI IDirectInputWImpl_GetDeviceStatus(LPDIRECTINPUT7W iface, REFGUID rguid)
638 {
639 IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
640 return IDirectInputAImpl_GetDeviceStatus( &This->IDirectInput7A_iface, rguid );
641 }
642
643 static HRESULT WINAPI IDirectInputAImpl_RunControlPanel(LPDIRECTINPUT7A iface,
644 HWND hwndOwner,
645 DWORD dwFlags)
646 {
647 WCHAR control_exeW[] = {'c','o','n','t','r','o','l','.','e','x','e',0};
648 STARTUPINFOW si = {0};
649 PROCESS_INFORMATION pi;
650
651 IDirectInputImpl *This = impl_from_IDirectInput7A( iface );
652
653 TRACE( "(%p)->(%p, %08x)\n", This, hwndOwner, dwFlags );
654
655 if (hwndOwner && !IsWindow(hwndOwner))
656 return E_HANDLE;
657
658 if (dwFlags)
659 return DIERR_INVALIDPARAM;
660
661 if (!This->initialized)
662 return DIERR_NOTINITIALIZED;
663
664 if (!CreateProcessW(NULL, control_exeW, NULL, NULL, FALSE, DETACHED_PROCESS, NULL, NULL, &si, &pi))
665 return HRESULT_FROM_WIN32(GetLastError());
666
667 return DI_OK;
668 }
669
670 static HRESULT WINAPI IDirectInputWImpl_RunControlPanel(LPDIRECTINPUT7W iface, HWND hwndOwner, DWORD dwFlags)
671 {
672 IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
673 return IDirectInputAImpl_RunControlPanel( &This->IDirectInput7A_iface, hwndOwner, dwFlags );
674 }
675
676 static HRESULT WINAPI IDirectInput2AImpl_FindDevice(LPDIRECTINPUT7A iface, REFGUID rguid,
677 LPCSTR pszName, LPGUID pguidInstance)
678 {
679 IDirectInputImpl *This = impl_from_IDirectInput7A( iface );
680
681 FIXME( "(%p)->(%s, %s, %p): stub\n", This, debugstr_guid(rguid), pszName, pguidInstance );
682
683 return DI_OK;
684 }
685
686 static HRESULT WINAPI IDirectInput2WImpl_FindDevice(LPDIRECTINPUT7W iface, REFGUID rguid,
687 LPCWSTR pszName, LPGUID pguidInstance)
688 {
689 IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
690
691 FIXME( "(%p)->(%s, %s, %p): stub\n", This, debugstr_guid(rguid), debugstr_w(pszName), pguidInstance );
692
693 return DI_OK;
694 }
695
696 static HRESULT create_device(IDirectInputImpl *This, REFGUID rguid, REFIID riid, LPVOID *pvOut, BOOL unicode)
697 {
698 unsigned int i;
699
700 if (pvOut)
701 *pvOut = NULL;
702
703 if (!rguid || !pvOut)
704 return E_POINTER;
705
706 if (!This->initialized)
707 return DIERR_NOTINITIALIZED;
708
709 /* Loop on all the devices to see if anyone matches the given GUID */
710 for (i = 0; i < NB_DINPUT_DEVICES; i++)
711 {
712 HRESULT ret;
713
714 if (!dinput_devices[i]->create_device) continue;
715 if ((ret = dinput_devices[i]->create_device(This, rguid, riid, pvOut, unicode)) == DI_OK)
716 return DI_OK;
717 }
718
719 WARN("invalid device GUID %s\n", debugstr_guid(rguid));
720 return DIERR_DEVICENOTREG;
721 }
722
723 static HRESULT WINAPI IDirectInput7AImpl_CreateDeviceEx(LPDIRECTINPUT7A iface, REFGUID rguid,
724 REFIID riid, LPVOID* pvOut, LPUNKNOWN lpUnknownOuter)
725 {
726 IDirectInputImpl *This = impl_from_IDirectInput7A( iface );
727
728 TRACE("(%p)->(%s, %s, %p, %p)\n", This, debugstr_guid(rguid), debugstr_guid(riid), pvOut, lpUnknownOuter);
729
730 return create_device(This, rguid, riid, pvOut, FALSE);
731 }
732
733 static HRESULT WINAPI IDirectInput7WImpl_CreateDeviceEx(LPDIRECTINPUT7W iface, REFGUID rguid,
734 REFIID riid, LPVOID* pvOut, LPUNKNOWN lpUnknownOuter)
735 {
736 IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
737
738 TRACE("(%p)->(%s, %s, %p, %p)\n", This, debugstr_guid(rguid), debugstr_guid(riid), pvOut, lpUnknownOuter);
739
740 return create_device(This, rguid, riid, pvOut, TRUE);
741 }
742
743 static HRESULT WINAPI IDirectInputAImpl_CreateDevice(LPDIRECTINPUT7A iface, REFGUID rguid,
744 LPDIRECTINPUTDEVICEA* pdev, LPUNKNOWN punk)
745 {
746 return IDirectInput7AImpl_CreateDeviceEx(iface, rguid, NULL, (LPVOID*)pdev, punk);
747 }
748
749 static HRESULT WINAPI IDirectInputWImpl_CreateDevice(LPDIRECTINPUT7W iface, REFGUID rguid,
750 LPDIRECTINPUTDEVICEW* pdev, LPUNKNOWN punk)
751 {
752 return IDirectInput7WImpl_CreateDeviceEx(iface, rguid, NULL, (LPVOID*)pdev, punk);
753 }
754
755 /*******************************************************************************
756 * DirectInput8
757 */
758
759 static ULONG WINAPI IDirectInput8AImpl_AddRef(LPDIRECTINPUT8A iface)
760 {
761 IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
762 return IDirectInputAImpl_AddRef( &This->IDirectInput7A_iface );
763 }
764
765 static ULONG WINAPI IDirectInput8WImpl_AddRef(LPDIRECTINPUT8W iface)
766 {
767 IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
768 return IDirectInputAImpl_AddRef( &This->IDirectInput7A_iface );
769 }
770
771 static HRESULT WINAPI IDirectInput8AImpl_QueryInterface(LPDIRECTINPUT8A iface, REFIID riid, LPVOID *ppobj)
772 {
773 IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
774 return IDirectInputAImpl_QueryInterface( &This->IDirectInput7A_iface, riid, ppobj );
775 }
776
777 static HRESULT WINAPI IDirectInput8WImpl_QueryInterface(LPDIRECTINPUT8W iface, REFIID riid, LPVOID *ppobj)
778 {
779 IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
780 return IDirectInputAImpl_QueryInterface( &This->IDirectInput7A_iface, riid, ppobj );
781 }
782
783 static ULONG WINAPI IDirectInput8AImpl_Release(LPDIRECTINPUT8A iface)
784 {
785 IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
786 return IDirectInputAImpl_Release( &This->IDirectInput7A_iface );
787 }
788
789 static ULONG WINAPI IDirectInput8WImpl_Release(LPDIRECTINPUT8W iface)
790 {
791 IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
792 return IDirectInputAImpl_Release( &This->IDirectInput7A_iface );
793 }
794
795 static HRESULT WINAPI IDirectInput8AImpl_CreateDevice(LPDIRECTINPUT8A iface, REFGUID rguid,
796 LPDIRECTINPUTDEVICE8A* pdev, LPUNKNOWN punk)
797 {
798 IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
799 return IDirectInput7AImpl_CreateDeviceEx( &This->IDirectInput7A_iface, rguid, NULL, (LPVOID*)pdev, punk );
800 }
801
802 static HRESULT WINAPI IDirectInput8WImpl_CreateDevice(LPDIRECTINPUT8W iface, REFGUID rguid,
803 LPDIRECTINPUTDEVICE8W* pdev, LPUNKNOWN punk)
804 {
805 IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
806 return IDirectInput7WImpl_CreateDeviceEx( &This->IDirectInput7W_iface, rguid, NULL, (LPVOID*)pdev, punk );
807 }
808
809 static HRESULT WINAPI IDirectInput8AImpl_EnumDevices(LPDIRECTINPUT8A iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKA lpCallback,
810 LPVOID pvRef, DWORD dwFlags)
811 {
812 IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
813 return IDirectInputAImpl_EnumDevices( &This->IDirectInput7A_iface, dwDevType, lpCallback, pvRef, dwFlags );
814 }
815
816 static HRESULT WINAPI IDirectInput8WImpl_EnumDevices(LPDIRECTINPUT8W iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKW lpCallback,
817 LPVOID pvRef, DWORD dwFlags)
818 {
819 IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
820 return IDirectInputWImpl_EnumDevices( &This->IDirectInput7W_iface, dwDevType, lpCallback, pvRef, dwFlags );
821 }
822
823 static HRESULT WINAPI IDirectInput8AImpl_GetDeviceStatus(LPDIRECTINPUT8A iface, REFGUID rguid)
824 {
825 IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
826 return IDirectInputAImpl_GetDeviceStatus( &This->IDirectInput7A_iface, rguid );
827 }
828
829 static HRESULT WINAPI IDirectInput8WImpl_GetDeviceStatus(LPDIRECTINPUT8W iface, REFGUID rguid)
830 {
831 IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
832 return IDirectInputAImpl_GetDeviceStatus( &This->IDirectInput7A_iface, rguid );
833 }
834
835 static HRESULT WINAPI IDirectInput8AImpl_RunControlPanel(LPDIRECTINPUT8A iface, HWND hwndOwner, DWORD dwFlags)
836 {
837 IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
838 return IDirectInputAImpl_RunControlPanel( &This->IDirectInput7A_iface, hwndOwner, dwFlags );
839 }
840
841 static HRESULT WINAPI IDirectInput8WImpl_RunControlPanel(LPDIRECTINPUT8W iface, HWND hwndOwner, DWORD dwFlags)
842 {
843 IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
844 return IDirectInputAImpl_RunControlPanel( &This->IDirectInput7A_iface, hwndOwner, dwFlags );
845 }
846
847 static HRESULT WINAPI IDirectInput8AImpl_Initialize(LPDIRECTINPUT8A iface, HINSTANCE hinst, DWORD version)
848 {
849 IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
850
851 TRACE("(%p)->(%p, 0x%04x)\n", iface, hinst, version);
852
853 if (!hinst)
854 return DIERR_INVALIDPARAM;
855 else if (version == 0)
856 return DIERR_NOTINITIALIZED;
857 else if (version < DIRECTINPUT_VERSION)
858 return DIERR_BETADIRECTINPUTVERSION;
859 else if (version > DIRECTINPUT_VERSION)
860 return DIERR_OLDDIRECTINPUTVERSION;
861
862 return initialize_directinput_instance(This, version);
863 }
864
865 static HRESULT WINAPI IDirectInput8WImpl_Initialize(LPDIRECTINPUT8W iface, HINSTANCE hinst, DWORD version)
866 {
867 IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
868 return IDirectInput8AImpl_Initialize( &This->IDirectInput8A_iface, hinst, version );
869 }
870
871 static HRESULT WINAPI IDirectInput8AImpl_FindDevice(LPDIRECTINPUT8A iface, REFGUID rguid, LPCSTR pszName, LPGUID pguidInstance)
872 {
873 IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
874 return IDirectInput2AImpl_FindDevice( &This->IDirectInput7A_iface, rguid, pszName, pguidInstance );
875 }
876
877 static HRESULT WINAPI IDirectInput8WImpl_FindDevice(LPDIRECTINPUT8W iface, REFGUID rguid, LPCWSTR pszName, LPGUID pguidInstance)
878 {
879 IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
880 return IDirectInput2WImpl_FindDevice( &This->IDirectInput7W_iface, rguid, pszName, pguidInstance );
881 }
882
883 static HRESULT WINAPI IDirectInput8AImpl_EnumDevicesBySemantics(
884 LPDIRECTINPUT8A iface, LPCSTR ptszUserName, LPDIACTIONFORMATA lpdiActionFormat,
885 LPDIENUMDEVICESBYSEMANTICSCBA lpCallback,
886 LPVOID pvRef, DWORD dwFlags
887 )
888 {
889 static REFGUID guids[2] = { &GUID_SysKeyboard, &GUID_SysMouse };
890 static const DWORD actionMasks[] = { DIKEYBOARD_MASK, DIMOUSE_MASK };
891 IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
892 DIDEVICEINSTANCEA didevi;
893 LPDIRECTINPUTDEVICE8A lpdid;
894 DWORD callbackFlags;
895 int i, j;
896
897
898 FIXME("(this=%p,%s,%p,%p,%p,%04x): semi-stub\n", This, debugstr_a(ptszUserName), lpdiActionFormat,
899 lpCallback, pvRef, dwFlags);
900 #define X(x) if (dwFlags & x) FIXME("\tdwFlags |= "#x"\n");
901 X(DIEDBSFL_ATTACHEDONLY)
902 X(DIEDBSFL_THISUSER)
903 X(DIEDBSFL_FORCEFEEDBACK)
904 X(DIEDBSFL_AVAILABLEDEVICES)
905 X(DIEDBSFL_MULTIMICEKEYBOARDS)
906 X(DIEDBSFL_NONGAMINGDEVICES)
907 #undef X
908
909 _dump_diactionformatA(lpdiActionFormat);
910
911 didevi.dwSize = sizeof(didevi);
912
913 /* Enumerate all the joysticks */
914 for (i = 0; i < NB_DINPUT_DEVICES; i++)
915 {
916 BOOL enumSuccess;
917
918 if (!dinput_devices[i]->enum_deviceA) continue;
919
920 for (j = 0, enumSuccess = -1; enumSuccess != 0; j++)
921 {
922 TRACE(" - checking device %u ('%s')\n", i, dinput_devices[i]->name);
923
924 callbackFlags = diactionformat_priorityA(lpdiActionFormat, lpdiActionFormat->dwGenre);
925 /* Default behavior is to enumerate attached game controllers */
926 enumSuccess = dinput_devices[i]->enum_deviceA(DI8DEVCLASS_GAMECTRL, DIEDFL_ATTACHEDONLY | dwFlags, &didevi, This->dwVersion, j);
927 if (enumSuccess)
928 {
929 IDirectInput_CreateDevice(iface, &didevi.guidInstance, &lpdid, NULL);
930
931 if (lpCallback(&didevi, lpdid, callbackFlags, 0, pvRef) == DIENUM_STOP)
932 return DI_OK;
933 }
934 }
935 }
936
937 if (dwFlags & DIEDBSFL_FORCEFEEDBACK) return DI_OK;
938
939 /* Enumerate keyboard and mouse */
940 for(i=0; i < sizeof(guids)/sizeof(guids[0]); i++)
941 {
942 callbackFlags = diactionformat_priorityA(lpdiActionFormat, actionMasks[i]);
943
944 IDirectInput_CreateDevice(iface, guids[i], &lpdid, NULL);
945 IDirectInputDevice_GetDeviceInfo(lpdid, &didevi);
946
947 if (lpCallback(&didevi, lpdid, callbackFlags, sizeof(guids)/sizeof(guids[0]) - (i+1), pvRef) == DIENUM_STOP)
948 return DI_OK;
949 }
950
951 return DI_OK;
952 }
953
954 static HRESULT WINAPI IDirectInput8WImpl_EnumDevicesBySemantics(
955 LPDIRECTINPUT8W iface, LPCWSTR ptszUserName, LPDIACTIONFORMATW lpdiActionFormat,
956 LPDIENUMDEVICESBYSEMANTICSCBW lpCallback,
957 LPVOID pvRef, DWORD dwFlags
958 )
959 {
960 static REFGUID guids[2] = { &GUID_SysKeyboard, &GUID_SysMouse };
961 static const DWORD actionMasks[] = { DIKEYBOARD_MASK, DIMOUSE_MASK };
962 IDirectInputImpl *This = impl_from_IDirectInput8W(iface);
963 DIDEVICEINSTANCEW didevi;
964 LPDIRECTINPUTDEVICE8W lpdid;
965 DWORD callbackFlags;
966 int i, j;
967
968 FIXME("(this=%p,%s,%p,%p,%p,%04x): semi-stub\n", This, debugstr_w(ptszUserName), lpdiActionFormat,
969 lpCallback, pvRef, dwFlags);
970
971 didevi.dwSize = sizeof(didevi);
972
973 /* Enumerate all the joysticks */
974 for (i = 0; i < NB_DINPUT_DEVICES; i++)
975 {
976 BOOL enumSuccess;
977
978 if (!dinput_devices[i]->enum_deviceW) continue;
979
980 for (j = 0, enumSuccess = -1; enumSuccess != 0; j++)
981 {
982 TRACE(" - checking device %u ('%s')\n", i, dinput_devices[i]->name);
983
984 callbackFlags = diactionformat_priorityW(lpdiActionFormat, lpdiActionFormat->dwGenre);
985 /* Default behavior is to enumerate attached game controllers */
986 enumSuccess = dinput_devices[i]->enum_deviceW(DI8DEVCLASS_GAMECTRL, DIEDFL_ATTACHEDONLY | dwFlags, &didevi, This->dwVersion, j);
987 if (enumSuccess)
988 {
989 IDirectInput_CreateDevice(iface, &didevi.guidInstance, &lpdid, NULL);
990
991 if (lpCallback(&didevi, lpdid, callbackFlags, 0, pvRef) == DIENUM_STOP)
992 return DI_OK;
993 }
994 }
995 }
996
997 if (dwFlags & DIEDBSFL_FORCEFEEDBACK) return DI_OK;
998
999 /* Enumerate keyboard and mouse */
1000 for(i=0; i < sizeof(guids)/sizeof(guids[0]); i++)
1001 {
1002 callbackFlags = diactionformat_priorityW(lpdiActionFormat, actionMasks[i]);
1003
1004 IDirectInput_CreateDevice(iface, guids[i], &lpdid, NULL);
1005 IDirectInputDevice_GetDeviceInfo(lpdid, &didevi);
1006
1007 if (lpCallback(&didevi, lpdid, callbackFlags, sizeof(guids)/sizeof(guids[0]) - (i+1), pvRef) == DIENUM_STOP)
1008 return DI_OK;
1009 }
1010
1011 return DI_OK;
1012 }
1013
1014 static HRESULT WINAPI IDirectInput8WImpl_ConfigureDevices(
1015 LPDIRECTINPUT8W iface, LPDICONFIGUREDEVICESCALLBACK lpdiCallback,
1016 LPDICONFIGUREDEVICESPARAMSW lpdiCDParams, DWORD dwFlags, LPVOID pvRefData
1017 )
1018 {
1019 IDirectInputImpl *This = impl_from_IDirectInput8W(iface);
1020
1021 FIXME("(this=%p,%p,%p,%04x,%p): stub\n", This, lpdiCallback, lpdiCDParams, dwFlags, pvRefData);
1022
1023 /* Call helper function in config.c to do the real work */
1024 return _configure_devices(iface, lpdiCallback, lpdiCDParams, dwFlags, pvRefData);
1025 }
1026
1027 static HRESULT WINAPI IDirectInput8AImpl_ConfigureDevices(
1028 LPDIRECTINPUT8A iface, LPDICONFIGUREDEVICESCALLBACK lpdiCallback,
1029 LPDICONFIGUREDEVICESPARAMSA lpdiCDParams, DWORD dwFlags, LPVOID pvRefData
1030 )
1031 {
1032 IDirectInputImpl *This = impl_from_IDirectInput8A(iface);
1033 DIACTIONFORMATW diafW;
1034 DICONFIGUREDEVICESPARAMSW diCDParamsW;
1035 HRESULT hr;
1036 int i;
1037
1038 FIXME("(this=%p,%p,%p,%04x,%p): stub\n", This, lpdiCallback, lpdiCDParams, dwFlags, pvRefData);
1039
1040 /* Copy parameters */
1041 diCDParamsW.dwSize = sizeof(DICONFIGUREDEVICESPARAMSW);
1042 diCDParamsW.dwcFormats = lpdiCDParams->dwcFormats;
1043 diCDParamsW.lprgFormats = &diafW;
1044 diCDParamsW.hwnd = lpdiCDParams->hwnd;
1045
1046 diafW.rgoAction = HeapAlloc(GetProcessHeap(), 0, sizeof(DIACTIONW)*lpdiCDParams->lprgFormats->dwNumActions);
1047 _copy_diactionformatAtoW(&diafW, lpdiCDParams->lprgFormats);
1048
1049 /* Copy action names */
1050 for (i=0; i < diafW.dwNumActions; i++)
1051 {
1052 const char* from = lpdiCDParams->lprgFormats->rgoAction[i].u.lptszActionName;
1053 int len = MultiByteToWideChar(CP_ACP, 0, from , -1, NULL , 0);
1054 WCHAR *to = HeapAlloc(GetProcessHeap(), 0, sizeof(WCHAR)*len);
1055
1056 MultiByteToWideChar(CP_ACP, 0, from , -1, to , len);
1057 diafW.rgoAction[i].u.lptszActionName = to;
1058 }
1059
1060 hr = IDirectInput8WImpl_ConfigureDevices(&This->IDirectInput8W_iface, lpdiCallback, &diCDParamsW, dwFlags, pvRefData);
1061
1062 /* Copy back configuration */
1063 if (SUCCEEDED(hr))
1064 _copy_diactionformatWtoA(lpdiCDParams->lprgFormats, &diafW);
1065
1066 /* Free memory */
1067 for (i=0; i < diafW.dwNumActions; i++)
1068 HeapFree(GetProcessHeap(), 0, (void*) diafW.rgoAction[i].u.lptszActionName);
1069
1070 HeapFree(GetProcessHeap(), 0, diafW.rgoAction);
1071
1072 return hr;
1073 }
1074
1075 /*****************************************************************************
1076 * IDirectInputJoyConfig8 interface
1077 */
1078
1079 static inline IDirectInputImpl *impl_from_IDirectInputJoyConfig8(IDirectInputJoyConfig8 *iface)
1080 {
1081 return CONTAINING_RECORD( iface, IDirectInputImpl, IDirectInputJoyConfig8_iface );
1082 }
1083
1084 static HRESULT WINAPI JoyConfig8Impl_QueryInterface(IDirectInputJoyConfig8 *iface, REFIID riid, void** ppobj)
1085 {
1086 IDirectInputImpl *This = impl_from_IDirectInputJoyConfig8( iface );
1087 return IDirectInputAImpl_QueryInterface( &This->IDirectInput7A_iface, riid, ppobj );
1088 }
1089
1090 static ULONG WINAPI JoyConfig8Impl_AddRef(IDirectInputJoyConfig8 *iface)
1091 {
1092 IDirectInputImpl *This = impl_from_IDirectInputJoyConfig8( iface );
1093 return IDirectInputAImpl_AddRef( &This->IDirectInput7A_iface );
1094 }
1095
1096 static ULONG WINAPI JoyConfig8Impl_Release(IDirectInputJoyConfig8 *iface)
1097 {
1098 IDirectInputImpl *This = impl_from_IDirectInputJoyConfig8( iface );
1099 return IDirectInputAImpl_Release( &This->IDirectInput7A_iface );
1100 }
1101
1102 static HRESULT WINAPI JoyConfig8Impl_Acquire(IDirectInputJoyConfig8 *iface)
1103 {
1104 FIXME( "(%p): stub!\n", iface );
1105 return E_NOTIMPL;
1106 }
1107
1108 static HRESULT WINAPI JoyConfig8Impl_Unacquire(IDirectInputJoyConfig8 *iface)
1109 {
1110 FIXME( "(%p): stub!\n", iface );
1111 return E_NOTIMPL;
1112 }
1113
1114 static HRESULT WINAPI JoyConfig8Impl_SetCooperativeLevel(IDirectInputJoyConfig8 *iface, HWND hwnd, DWORD flags)
1115 {
1116 FIXME( "(%p)->(%p, 0x%08x): stub!\n", iface, hwnd, flags );
1117 return E_NOTIMPL;
1118 }
1119
1120 static HRESULT WINAPI JoyConfig8Impl_SendNotify(IDirectInputJoyConfig8 *iface)
1121 {
1122 FIXME( "(%p): stub!\n", iface );
1123 return E_NOTIMPL;
1124 }
1125
1126 static HRESULT WINAPI JoyConfig8Impl_EnumTypes(IDirectInputJoyConfig8 *iface, LPDIJOYTYPECALLBACK cb, void *ref)
1127 {
1128 FIXME( "(%p)->(%p, %p): stub!\n", iface, cb, ref );
1129 return E_NOTIMPL;
1130 }
1131
1132 static HRESULT WINAPI JoyConfig8Impl_GetTypeInfo(IDirectInputJoyConfig8 *iface, LPCWSTR name, LPDIJOYTYPEINFO info, DWORD flags)
1133 {
1134 FIXME( "(%p)->(%s, %p, 0x%08x): stub!\n", iface, debugstr_w(name), info, flags );
1135 return E_NOTIMPL;
1136 }
1137
1138 static HRESULT WINAPI JoyConfig8Impl_SetTypeInfo(IDirectInputJoyConfig8 *iface, LPCWSTR name, LPCDIJOYTYPEINFO info, DWORD flags,
1139 LPWSTR new_name)
1140 {
1141 FIXME( "(%p)->(%s, %p, 0x%08x, %s): stub!\n", iface, debugstr_w(name), info, flags, debugstr_w(new_name) );
1142 return E_NOTIMPL;
1143 }
1144
1145 static HRESULT WINAPI JoyConfig8Impl_DeleteType(IDirectInputJoyConfig8 *iface, LPCWSTR name)
1146 {
1147 FIXME( "(%p)->(%s): stub!\n", iface, debugstr_w(name) );
1148 return E_NOTIMPL;
1149 }
1150
1151 static HRESULT WINAPI JoyConfig8Impl_GetConfig(IDirectInputJoyConfig8 *iface, UINT id, LPDIJOYCONFIG info, DWORD flags)
1152 {
1153 IDirectInputImpl *di = impl_from_IDirectInputJoyConfig8(iface);
1154 UINT found = 0;
1155 int i, j, r;
1156
1157 FIXME("(%p)->(%d, %p, 0x%08x): semi-stub!\n", iface, id, info, flags);
1158
1159 #define X(x) if (flags & x) FIXME("\tflags |= "#x"\n");
1160 X(DIJC_GUIDINSTANCE)
1161 X(DIJC_REGHWCONFIGTYPE)
1162 X(DIJC_GAIN)
1163 X(DIJC_CALLOUT)
1164 #undef X
1165
1166 /* Enumerate all joysticks in order */
1167 for (i = 0; i < NB_DINPUT_DEVICES; i++)
1168 {
1169 if (!dinput_devices[i]->enum_deviceA) continue;
1170
1171 for (j = 0, r = -1; r != 0; j++)
1172 {
1173 DIDEVICEINSTANCEA dev;
1174 dev.dwSize = sizeof(dev);
1175 if ((r = dinput_devices[i]->enum_deviceA(DI8DEVCLASS_GAMECTRL, 0, &dev, di->dwVersion, j)))
1176 {
1177 /* Only take into account the chosen id */
1178 if (found == id)
1179 {
1180 if (flags & DIJC_GUIDINSTANCE)
1181 info->guidInstance = dev.guidInstance;
1182
1183 return DI_OK;
1184 }
1185 found += 1;
1186 }
1187 }
1188 }
1189
1190 return DIERR_NOMOREITEMS;
1191 }
1192
1193 static HRESULT WINAPI JoyConfig8Impl_SetConfig(IDirectInputJoyConfig8 *iface, UINT id, LPCDIJOYCONFIG info, DWORD flags)
1194 {
1195 FIXME( "(%p)->(%d, %p, 0x%08x): stub!\n", iface, id, info, flags );
1196 return E_NOTIMPL;
1197 }
1198
1199 static HRESULT WINAPI JoyConfig8Impl_DeleteConfig(IDirectInputJoyConfig8 *iface, UINT id)
1200 {
1201 FIXME( "(%p)->(%d): stub!\n", iface, id );
1202 return E_NOTIMPL;
1203 }
1204
1205 static HRESULT WINAPI JoyConfig8Impl_GetUserValues(IDirectInputJoyConfig8 *iface, LPDIJOYUSERVALUES info, DWORD flags)
1206 {
1207 FIXME( "(%p)->(%p, 0x%08x): stub!\n", iface, info, flags );
1208 return E_NOTIMPL;
1209 }
1210
1211 static HRESULT WINAPI JoyConfig8Impl_SetUserValues(IDirectInputJoyConfig8 *iface, LPCDIJOYUSERVALUES info, DWORD flags)
1212 {
1213 FIXME( "(%p)->(%p, 0x%08x): stub!\n", iface, info, flags );
1214 return E_NOTIMPL;
1215 }
1216
1217 static HRESULT WINAPI JoyConfig8Impl_AddNewHardware(IDirectInputJoyConfig8 *iface, HWND hwnd, REFGUID guid)
1218 {
1219 FIXME( "(%p)->(%p, %s): stub!\n", iface, hwnd, debugstr_guid(guid) );
1220 return E_NOTIMPL;
1221 }
1222
1223 static HRESULT WINAPI JoyConfig8Impl_OpenTypeKey(IDirectInputJoyConfig8 *iface, LPCWSTR name, DWORD security, PHKEY key)
1224 {
1225 FIXME( "(%p)->(%s, 0x%08x, %p): stub!\n", iface, debugstr_w(name), security, key );
1226 return E_NOTIMPL;
1227 }
1228
1229 static HRESULT WINAPI JoyConfig8Impl_OpenAppStatusKey(IDirectInputJoyConfig8 *iface, PHKEY key)
1230 {
1231 FIXME( "(%p)->(%p): stub!\n", iface, key );
1232 return E_NOTIMPL;
1233 }
1234
1235 static const IDirectInput7AVtbl ddi7avt = {
1236 IDirectInputAImpl_QueryInterface,
1237 IDirectInputAImpl_AddRef,
1238 IDirectInputAImpl_Release,
1239 IDirectInputAImpl_CreateDevice,
1240 IDirectInputAImpl_EnumDevices,
1241 IDirectInputAImpl_GetDeviceStatus,
1242 IDirectInputAImpl_RunControlPanel,
1243 IDirectInputAImpl_Initialize,
1244 IDirectInput2AImpl_FindDevice,
1245 IDirectInput7AImpl_CreateDeviceEx
1246 };
1247
1248 static const IDirectInput7WVtbl ddi7wvt = {
1249 IDirectInputWImpl_QueryInterface,
1250 IDirectInputWImpl_AddRef,
1251 IDirectInputWImpl_Release,
1252 IDirectInputWImpl_CreateDevice,
1253 IDirectInputWImpl_EnumDevices,
1254 IDirectInputWImpl_GetDeviceStatus,
1255 IDirectInputWImpl_RunControlPanel,
1256 IDirectInputWImpl_Initialize,
1257 IDirectInput2WImpl_FindDevice,
1258 IDirectInput7WImpl_CreateDeviceEx
1259 };
1260
1261 static const IDirectInput8AVtbl ddi8avt = {
1262 IDirectInput8AImpl_QueryInterface,
1263 IDirectInput8AImpl_AddRef,
1264 IDirectInput8AImpl_Release,
1265 IDirectInput8AImpl_CreateDevice,
1266 IDirectInput8AImpl_EnumDevices,
1267 IDirectInput8AImpl_GetDeviceStatus,
1268 IDirectInput8AImpl_RunControlPanel,
1269 IDirectInput8AImpl_Initialize,
1270 IDirectInput8AImpl_FindDevice,
1271 IDirectInput8AImpl_EnumDevicesBySemantics,
1272 IDirectInput8AImpl_ConfigureDevices
1273 };
1274
1275 static const IDirectInput8WVtbl ddi8wvt = {
1276 IDirectInput8WImpl_QueryInterface,
1277 IDirectInput8WImpl_AddRef,
1278 IDirectInput8WImpl_Release,
1279 IDirectInput8WImpl_CreateDevice,
1280 IDirectInput8WImpl_EnumDevices,
1281 IDirectInput8WImpl_GetDeviceStatus,
1282 IDirectInput8WImpl_RunControlPanel,
1283 IDirectInput8WImpl_Initialize,
1284 IDirectInput8WImpl_FindDevice,
1285 IDirectInput8WImpl_EnumDevicesBySemantics,
1286 IDirectInput8WImpl_ConfigureDevices
1287 };
1288
1289 static const IDirectInputJoyConfig8Vtbl JoyConfig8vt =
1290 {
1291 JoyConfig8Impl_QueryInterface,
1292 JoyConfig8Impl_AddRef,
1293 JoyConfig8Impl_Release,
1294 JoyConfig8Impl_Acquire,
1295 JoyConfig8Impl_Unacquire,
1296 JoyConfig8Impl_SetCooperativeLevel,
1297 JoyConfig8Impl_SendNotify,
1298 JoyConfig8Impl_EnumTypes,
1299 JoyConfig8Impl_GetTypeInfo,
1300 JoyConfig8Impl_SetTypeInfo,
1301 JoyConfig8Impl_DeleteType,
1302 JoyConfig8Impl_GetConfig,
1303 JoyConfig8Impl_SetConfig,
1304 JoyConfig8Impl_DeleteConfig,
1305 JoyConfig8Impl_GetUserValues,
1306 JoyConfig8Impl_SetUserValues,
1307 JoyConfig8Impl_AddNewHardware,
1308 JoyConfig8Impl_OpenTypeKey,
1309 JoyConfig8Impl_OpenAppStatusKey
1310 };
1311
1312 /*******************************************************************************
1313 * DirectInput ClassFactory
1314 */
1315 typedef struct
1316 {
1317 /* IUnknown fields */
1318 IClassFactory IClassFactory_iface;
1319 LONG ref;
1320 } IClassFactoryImpl;
1321
1322 static inline IClassFactoryImpl *impl_from_IClassFactory(IClassFactory *iface)
1323 {
1324 return CONTAINING_RECORD(iface, IClassFactoryImpl, IClassFactory_iface);
1325 }
1326
1327 static HRESULT WINAPI DICF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
1328 IClassFactoryImpl *This = impl_from_IClassFactory(iface);
1329
1330 FIXME("(%p)->(%s,%p),stub!\n",This,debugstr_guid(riid),ppobj);
1331 return E_NOINTERFACE;
1332 }
1333
1334 static ULONG WINAPI DICF_AddRef(LPCLASSFACTORY iface) {
1335 IClassFactoryImpl *This = impl_from_IClassFactory(iface);
1336 return InterlockedIncrement(&(This->ref));
1337 }
1338
1339 static ULONG WINAPI DICF_Release(LPCLASSFACTORY iface) {
1340 IClassFactoryImpl *This = impl_from_IClassFactory(iface);
1341 /* static class, won't be freed */
1342 return InterlockedDecrement(&(This->ref));
1343 }
1344
1345 static HRESULT WINAPI DICF_CreateInstance(
1346 LPCLASSFACTORY iface,LPUNKNOWN pOuter,REFIID riid,LPVOID *ppobj
1347 ) {
1348 IClassFactoryImpl *This = impl_from_IClassFactory(iface);
1349
1350 TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj);
1351 if ( IsEqualGUID( &IID_IUnknown, riid ) ||
1352 IsEqualGUID( &IID_IDirectInputA, riid ) ||
1353 IsEqualGUID( &IID_IDirectInputW, riid ) ||
1354 IsEqualGUID( &IID_IDirectInput2A, riid ) ||
1355 IsEqualGUID( &IID_IDirectInput2W, riid ) ||
1356 IsEqualGUID( &IID_IDirectInput7A, riid ) ||
1357 IsEqualGUID( &IID_IDirectInput7W, riid ) ) {
1358 return create_directinput_instance(riid, ppobj, NULL);
1359 }
1360
1361 FIXME("(%p,%p,%s,%p) Interface not found!\n",This,pOuter,debugstr_guid(riid),ppobj);
1362 return E_NOINTERFACE;
1363 }
1364
1365 static HRESULT WINAPI DICF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
1366 IClassFactoryImpl *This = impl_from_IClassFactory(iface);
1367 FIXME("(%p)->(%d),stub!\n",This,dolock);
1368 return S_OK;
1369 }
1370
1371 static const IClassFactoryVtbl DICF_Vtbl = {
1372 DICF_QueryInterface,
1373 DICF_AddRef,
1374 DICF_Release,
1375 DICF_CreateInstance,
1376 DICF_LockServer
1377 };
1378 static IClassFactoryImpl DINPUT_CF = {{&DICF_Vtbl}, 1 };
1379
1380 /***********************************************************************
1381 * DllCanUnloadNow (DINPUT.@)
1382 */
1383 HRESULT WINAPI DllCanUnloadNow(void)
1384 {
1385 return S_FALSE;
1386 }
1387
1388 /***********************************************************************
1389 * DllGetClassObject (DINPUT.@)
1390 */
1391 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv)
1392 {
1393 TRACE("(%s,%s,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
1394 if ( IsEqualCLSID( &IID_IClassFactory, riid ) ) {
1395 *ppv = &DINPUT_CF;
1396 IClassFactory_AddRef((IClassFactory*)*ppv);
1397 return S_OK;
1398 }
1399
1400 FIXME("(%s,%s,%p): no interface found.\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
1401 return CLASS_E_CLASSNOTAVAILABLE;
1402 }
1403
1404 /***********************************************************************
1405 * DllRegisterServer (DINPUT.@)
1406 */
1407 HRESULT WINAPI DllRegisterServer(void)
1408 {
1409 return __wine_register_resources( DINPUT_instance );
1410 }
1411
1412 /***********************************************************************
1413 * DllUnregisterServer (DINPUT.@)
1414 */
1415 HRESULT WINAPI DllUnregisterServer(void)
1416 {
1417 return __wine_unregister_resources( DINPUT_instance );
1418 }
1419
1420 /******************************************************************************
1421 * DInput hook thread
1422 */
1423
1424 static LRESULT CALLBACK LL_hook_proc( int code, WPARAM wparam, LPARAM lparam )
1425 {
1426 IDirectInputImpl *dinput;
1427 int skip = 0;
1428
1429 if (code != HC_ACTION) return CallNextHookEx( 0, code, wparam, lparam );
1430
1431 EnterCriticalSection( &dinput_hook_crit );
1432 LIST_FOR_EACH_ENTRY( dinput, &direct_input_list, IDirectInputImpl, entry )
1433 {
1434 IDirectInputDeviceImpl *dev;
1435
1436 EnterCriticalSection( &dinput->crit );
1437 LIST_FOR_EACH_ENTRY( dev, &dinput->devices_list, IDirectInputDeviceImpl, entry )
1438 if (dev->acquired && dev->event_proc)
1439 {
1440 TRACE("calling %p->%p (%lx %lx)\n", dev, dev->event_proc, wparam, lparam);
1441 skip |= dev->event_proc( &dev->IDirectInputDevice8A_iface, wparam, lparam );
1442 }
1443 LeaveCriticalSection( &dinput->crit );
1444 }
1445 LeaveCriticalSection( &dinput_hook_crit );
1446
1447 return skip ? 1 : CallNextHookEx( 0, code, wparam, lparam );
1448 }
1449
1450 static LRESULT CALLBACK callwndproc_proc( int code, WPARAM wparam, LPARAM lparam )
1451 {
1452 CWPSTRUCT *msg = (CWPSTRUCT *)lparam;
1453 IDirectInputImpl *dinput;
1454 HWND foreground;
1455
1456 if (code != HC_ACTION || (msg->message != WM_KILLFOCUS &&
1457 msg->message != WM_ACTIVATEAPP && msg->message != WM_ACTIVATE))
1458 return CallNextHookEx( 0, code, wparam, lparam );
1459
1460 foreground = GetForegroundWindow();
1461
1462 EnterCriticalSection( &dinput_hook_crit );
1463
1464 LIST_FOR_EACH_ENTRY( dinput, &direct_input_list, IDirectInputImpl, entry )
1465 {
1466 IDirectInputDeviceImpl *dev;
1467
1468 EnterCriticalSection( &dinput->crit );
1469 LIST_FOR_EACH_ENTRY( dev, &dinput->devices_list, IDirectInputDeviceImpl, entry )
1470 {
1471 if (!dev->acquired) continue;
1472
1473 if (msg->hwnd == dev->win && msg->hwnd != foreground)
1474 {
1475 TRACE( "%p window is not foreground - unacquiring %p\n", dev->win, dev );
1476 IDirectInputDevice_Unacquire( &dev->IDirectInputDevice8A_iface );
1477 }
1478 }
1479 LeaveCriticalSection( &dinput->crit );
1480 }
1481 LeaveCriticalSection( &dinput_hook_crit );
1482
1483 return CallNextHookEx( 0, code, wparam, lparam );
1484 }
1485
1486 static DWORD WINAPI hook_thread_proc(void *param)
1487 {
1488 static HHOOK kbd_hook, mouse_hook;
1489 MSG msg;
1490
1491 /* Force creation of the message queue */
1492 PeekMessageW( &msg, 0, 0, 0, PM_NOREMOVE );
1493 SetEvent(*(LPHANDLE)param);
1494
1495 while (GetMessageW( &msg, 0, 0, 0 ))
1496 {
1497 UINT kbd_cnt = 0, mice_cnt = 0;
1498
1499 if (msg.message == WM_USER+0x10)
1500 {
1501 IDirectInputImpl *dinput;
1502
1503 TRACE( "Processing hook change notification lp:%ld\n", msg.lParam );
1504
1505 if (!msg.wParam && !msg.lParam)
1506 {
1507 if (kbd_hook) UnhookWindowsHookEx( kbd_hook );
1508 if (mouse_hook) UnhookWindowsHookEx( mouse_hook );
1509 kbd_hook = mouse_hook = NULL;
1510 break;
1511 }
1512
1513 EnterCriticalSection( &dinput_hook_crit );
1514
1515 /* Count acquired keyboards and mice*/
1516 LIST_FOR_EACH_ENTRY( dinput, &direct_input_list, IDirectInputImpl, entry )
1517 {
1518 IDirectInputDeviceImpl *dev;
1519
1520 EnterCriticalSection( &dinput->crit );
1521 LIST_FOR_EACH_ENTRY( dev, &dinput->devices_list, IDirectInputDeviceImpl, entry )
1522 {
1523 if (!dev->acquired || !dev->event_proc) continue;
1524
1525 if (IsEqualGUID( &dev->guid, &GUID_SysKeyboard ) ||
1526 IsEqualGUID( &dev->guid, &DInput_Wine_Keyboard_GUID ))
1527 kbd_cnt++;
1528 else
1529 if (IsEqualGUID( &dev->guid, &GUID_SysMouse ) ||
1530 IsEqualGUID( &dev->guid, &DInput_Wine_Mouse_GUID ))
1531 mice_cnt++;
1532 }
1533 LeaveCriticalSection( &dinput->crit );
1534 }
1535 LeaveCriticalSection( &dinput_hook_crit );
1536
1537 if (kbd_cnt && !kbd_hook)
1538 kbd_hook = SetWindowsHookExW( WH_KEYBOARD_LL, LL_hook_proc, DINPUT_instance, 0 );
1539 else if (!kbd_cnt && kbd_hook)
1540 {
1541 UnhookWindowsHookEx( kbd_hook );
1542 kbd_hook = NULL;
1543 }
1544
1545 if (mice_cnt && !mouse_hook)
1546 mouse_hook = SetWindowsHookExW( WH_MOUSE_LL, LL_hook_proc, DINPUT_instance, 0 );
1547 else if (!mice_cnt && mouse_hook)
1548 {
1549 UnhookWindowsHookEx( mouse_hook );
1550 mouse_hook = NULL;
1551 }
1552 }
1553 TranslateMessage(&msg);
1554 DispatchMessageW(&msg);
1555 }
1556
1557 return 0;
1558 }
1559
1560 static DWORD hook_thread_id;
1561
1562 static CRITICAL_SECTION_DEBUG dinput_critsect_debug =
1563 {
1564 0, 0, &dinput_hook_crit,
1565 { &dinput_critsect_debug.ProcessLocksList, &dinput_critsect_debug.ProcessLocksList },
1566 0, 0, { (DWORD_PTR)(__FILE__ ": dinput_hook_crit") }
1567 };
1568 static CRITICAL_SECTION dinput_hook_crit = { &dinput_critsect_debug, -1, 0, 0, 0, 0 };
1569
1570 static BOOL check_hook_thread(void)
1571 {
1572 static HANDLE hook_thread;
1573
1574 EnterCriticalSection(&dinput_hook_crit);
1575
1576 TRACE("IDirectInputs left: %d\n", list_count(&direct_input_list));
1577 if (!list_empty(&direct_input_list) && !hook_thread)
1578 {
1579 HANDLE event;
1580
1581 event = CreateEventW(NULL, FALSE, FALSE, NULL);
1582 hook_thread = CreateThread(NULL, 0, hook_thread_proc, &event, 0, &hook_thread_id);
1583 if (event && hook_thread)
1584 {
1585 HANDLE handles[2];
1586 handles[0] = event;
1587 handles[1] = hook_thread;
1588 WaitForMultipleObjects(2, handles, FALSE, INFINITE);
1589 }
1590 LeaveCriticalSection(&dinput_hook_crit);
1591 CloseHandle(event);
1592 }
1593 else if (list_empty(&direct_input_list) && hook_thread)
1594 {
1595 DWORD tid = hook_thread_id;
1596
1597 hook_thread_id = 0;
1598 PostThreadMessageW(tid, WM_USER+0x10, 0, 0);
1599 LeaveCriticalSection(&dinput_hook_crit);
1600
1601 /* wait for hook thread to exit */
1602 WaitForSingleObject(hook_thread, INFINITE);
1603 CloseHandle(hook_thread);
1604 hook_thread = NULL;
1605 }
1606 else
1607 LeaveCriticalSection(&dinput_hook_crit);
1608
1609 return hook_thread_id != 0;
1610 }
1611
1612 void check_dinput_hooks(LPDIRECTINPUTDEVICE8W iface)
1613 {
1614 static HHOOK callwndproc_hook;
1615 static ULONG foreground_cnt;
1616 IDirectInputDeviceImpl *dev = impl_from_IDirectInputDevice8W(iface);
1617
1618 EnterCriticalSection(&dinput_hook_crit);
1619
1620 if (dev->dwCoopLevel & DISCL_FOREGROUND)
1621 {
1622 if (dev->acquired)
1623 foreground_cnt++;
1624 else
1625 foreground_cnt--;
1626 }
1627
1628 if (foreground_cnt && !callwndproc_hook)
1629 callwndproc_hook = SetWindowsHookExW( WH_CALLWNDPROC, callwndproc_proc,
1630 DINPUT_instance, GetCurrentThreadId() );
1631 else if (!foreground_cnt && callwndproc_hook)
1632 {
1633 UnhookWindowsHookEx( callwndproc_hook );
1634 callwndproc_hook = NULL;
1635 }
1636
1637 PostThreadMessageW( hook_thread_id, WM_USER+0x10, 1, 0 );
1638
1639 LeaveCriticalSection(&dinput_hook_crit);
1640 }
1641
1642 BOOL WINAPI DllMain( HINSTANCE inst, DWORD reason, LPVOID reserv)
1643 {
1644 switch(reason)
1645 {
1646 case DLL_PROCESS_ATTACH:
1647 DisableThreadLibraryCalls(inst);
1648 DINPUT_instance = inst;
1649 break;
1650 case DLL_PROCESS_DETACH:
1651 DeleteCriticalSection(&dinput_hook_crit);
1652 break;
1653 }
1654 return TRUE;
1655 }