git.oblomov.eu Git - wine/blob - dlls/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  *
   7  *
   8  * This library is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Lesser General Public
  10  * License as published by the Free Software Foundation; either
  11  * version 2.1 of the License, or (at your option) any later version.
  12  *
  13  * This library is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * Lesser General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public
  19  * License along with this library; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  21  */
  22 /* Status:
  23  *
  24  * - Tomb Raider 2 Demo:
  25  *   Playable using keyboard only.
  26  * - WingCommander Prophecy Demo:
  27  *   Doesn't get Input Focus.
  28  *
  29  * - Fallout : works great in X and DGA mode
  30  */
  31
  32 #include "config.h"
  33 #include <assert.h>
  34 #include <stdarg.h>
  35 #include <string.h>
  36
  37 #define COBJMACROS
  38
  39 #include "wine/debug.h"
  40 #include "wine/unicode.h"
  41 #include "windef.h"
  42 #include "winbase.h"
  43 #include "winuser.h"
  44 #include "winerror.h"
  45 #include "dinput_private.h"
  46
  47 WINE_DEFAULT_DEBUG_CHANNEL(dinput);
  48
  49 static const IDirectInput7AVtbl ddi7avt;
  50 static const IDirectInput7WVtbl ddi7wvt;
  51 static const IDirectInput8AVtbl ddi8avt;
  52 static const IDirectInput8WVtbl ddi8wvt;
  53
  54 static const struct dinput_device *dinput_devices[] =
  55 {
  56     &mouse_device,
  57     &keyboard_device,
  58     &joystick_linuxinput_device,
  59     &joystick_linux_device
  60 };
  61 #define NB_DINPUT_DEVICES (sizeof(dinput_devices)/sizeof(dinput_devices[0]))
  62
  63 HINSTANCE DINPUT_instance = NULL;
  64
  65 BOOL WINAPI DllMain( HINSTANCE inst, DWORD reason, LPVOID reserv)
  66 {
  67     switch(reason)
  68     {
  69       case DLL_PROCESS_ATTACH:
  70         DisableThreadLibraryCalls(inst);
  71         DINPUT_instance = inst;
  72         break;
  73       case DLL_PROCESS_DETACH:
  74         break;
  75     }
  76     return TRUE;
  77 }
  78
  79
  80 /******************************************************************************
  81  *      DirectInputCreateEx (DINPUT.@)
  82  */
  83 HRESULT WINAPI DirectInputCreateEx(
  84         HINSTANCE hinst, DWORD dwVersion, REFIID riid, LPVOID *ppDI,
  85         LPUNKNOWN punkOuter)
  86 {
  87         IDirectInputImpl* This;
  88
  89         TRACE("(%p,%04lx,%s,%p,%p)\n", hinst,dwVersion,debugstr_guid(riid),ppDI,punkOuter);
  90
  91         if (IsEqualGUID(&IID_IDirectInputA,riid) ||
  92             IsEqualGUID(&IID_IDirectInput2A,riid) ||
  93             IsEqualGUID(&IID_IDirectInput7A,riid)) {
  94           This = HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputImpl));
  95           This->lpVtbl = &ddi7avt;
  96           This->ref = 1;
  97           This->dwVersion = dwVersion;
  98           *ppDI = This;
  99
 100           return DI_OK;
 101         }
 102
 103         if (IsEqualGUID(&IID_IDirectInputW,riid) ||
 104             IsEqualGUID(&IID_IDirectInput2W,riid) ||
 105             IsEqualGUID(&IID_IDirectInput7W,riid)) {
 106           This = HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputImpl));
 107           This->lpVtbl = &ddi7wvt;
 108           This->ref = 1;
 109           This->dwVersion = dwVersion;
 110           *ppDI = This;
 111
 112           return DI_OK;
 113         }
 114
 115         if (IsEqualGUID(&IID_IDirectInput8A,riid)) {
 116           This = HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputImpl));
 117           This->lpVtbl = &ddi8avt;
 118           This->ref = 1;
 119           This->dwVersion = dwVersion;
 120           *ppDI = This;
 121
 122           return DI_OK;
 123         }
 124
 125         if (IsEqualGUID(&IID_IDirectInput8W,riid)) {
 126           This = HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputImpl));
 127           This->lpVtbl = &ddi8wvt;
 128           This->ref = 1;
 129           This->dwVersion = dwVersion;
 130           *ppDI = This;
 131
 132           return DI_OK;
 133         }
 134
 135         return DIERR_OLDDIRECTINPUTVERSION;
 136 }
 137
 138 /******************************************************************************
 139  *      DirectInputCreateA (DINPUT.@)
 140  */
 141 HRESULT WINAPI DirectInputCreateA(HINSTANCE hinst, DWORD dwVersion, LPDIRECTINPUTA *ppDI, LPUNKNOWN punkOuter)
 142 {
 143         IDirectInputImpl* This;
 144         TRACE("(%p,%04lx,%p,%p)\n", hinst,dwVersion,ppDI,punkOuter);
 145         This = HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputImpl));
 146         This->lpVtbl = &ddi7avt;
 147         This->ref = 1;
 148         This->dwVersion = dwVersion;
 149         *ppDI = (IDirectInputA*)This;
 150         return 0;
 151
 152 }
 153
 154 /******************************************************************************
 155  *      DirectInputCreateW (DINPUT.@)
 156  */
 157 HRESULT WINAPI DirectInputCreateW(HINSTANCE hinst, DWORD dwVersion, LPDIRECTINPUTW *ppDI, LPUNKNOWN punkOuter)
 158 {
 159         IDirectInputImpl* This;
 160         TRACE("(%p,%04lx,%p,%p)\n", hinst,dwVersion,ppDI,punkOuter);
 161         This = HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputImpl));
 162         This->lpVtbl = &ddi7wvt;
 163         This->ref = 1;
 164         This->dwVersion = dwVersion;
 165         *ppDI = (IDirectInputW*)This;
 166         return 0;
 167 }
 168
 169 static const char *_dump_DIDEVTYPE_value(DWORD dwDevType) {
 170     switch (dwDevType) {
 171         case 0: return "All devices";
 172         case DIDEVTYPE_MOUSE: return "DIDEVTYPE_MOUSE";
 173         case DIDEVTYPE_KEYBOARD: return "DIDEVTYPE_KEYBOARD";
 174         case DIDEVTYPE_JOYSTICK: return "DIDEVTYPE_JOYSTICK";
 175         case DIDEVTYPE_DEVICE: return "DIDEVTYPE_DEVICE";
 176         default: return "Unkown";
 177     }
 178 }
 179
 180 static void _dump_EnumDevices_dwFlags(DWORD dwFlags) {
 181     if (TRACE_ON(dinput)) {
 182         unsigned int   i;
 183         static const struct {
 184             DWORD       mask;
 185             const char  *name;
 186         } flags[] = {
 187 #define FE(x) { x, #x}
 188             FE(DIEDFL_ALLDEVICES),
 189             FE(DIEDFL_ATTACHEDONLY),
 190             FE(DIEDFL_FORCEFEEDBACK),
 191             FE(DIEDFL_INCLUDEALIASES),
 192             FE(DIEDFL_INCLUDEPHANTOMS)
 193 #undef FE
 194         };
 195         if (dwFlags == 0) {
 196             DPRINTF("DIEDFL_ALLDEVICES");
 197             return;
 198         }
 199         for (i = 0; i < (sizeof(flags) / sizeof(flags[0])); i++)
 200             if (flags[i].mask & dwFlags)
 201                 DPRINTF("%s ",flags[i].name);
 202     }
 203 }
 204
 205 /******************************************************************************
 206  *      IDirectInputA_EnumDevices
 207  */
 208 static HRESULT WINAPI IDirectInputAImpl_EnumDevices(
 209         LPDIRECTINPUT7A iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKA lpCallback,
 210         LPVOID pvRef, DWORD dwFlags)
 211 {
 212     IDirectInputImpl *This = (IDirectInputImpl *)iface;
 213     DIDEVICEINSTANCEA devInstance;
 214     int i, j, r;
 215
 216     TRACE("(this=%p,0x%04lx '%s',%p,%p,%04lx)\n",
 217           This, dwDevType, _dump_DIDEVTYPE_value(dwDevType),
 218           lpCallback, pvRef, dwFlags);
 219     TRACE(" flags: "); _dump_EnumDevices_dwFlags(dwFlags); TRACE("\n");
 220
 221     for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 222         if (!dinput_devices[i]->enum_deviceA) continue;
 223         for (j = 0, r = -1; r != 0; j++) {
 224             devInstance.dwSize = sizeof(devInstance);
 225             TRACE("  - checking device %d ('%s')\n", i, dinput_devices[i]->name);
 226             if ((r = dinput_devices[i]->enum_deviceA(dwDevType, dwFlags, &devInstance, This->dwVersion, j))) {
 227                 if (lpCallback(&devInstance,pvRef) == DIENUM_STOP)
 228                     return 0;
 229             }
 230         }
 231     }
 232
 233     return 0;
 234 }
 235 /******************************************************************************
 236  *      IDirectInputW_EnumDevices
 237  */
 238 static HRESULT WINAPI IDirectInputWImpl_EnumDevices(
 239         LPDIRECTINPUT7W iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKW lpCallback,
 240         LPVOID pvRef, DWORD dwFlags)
 241 {
 242     IDirectInputImpl *This = (IDirectInputImpl *)iface;
 243     DIDEVICEINSTANCEW devInstance;
 244     int i, j, r;
 245
 246     TRACE("(this=%p,0x%04lx '%s',%p,%p,%04lx)\n",
 247           This, dwDevType, _dump_DIDEVTYPE_value(dwDevType),
 248           lpCallback, pvRef, dwFlags);
 249     TRACE(" flags: "); _dump_EnumDevices_dwFlags(dwFlags); TRACE("\n");
 250
 251     for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 252         if (!dinput_devices[i]->enum_deviceW) continue;
 253         for (j = 0, r = -1; r != 0; j++) {
 254             devInstance.dwSize = sizeof(devInstance);
 255             TRACE("  - checking device %d ('%s')\n", i, dinput_devices[i]->name);
 256             if ((r = dinput_devices[i]->enum_deviceW(dwDevType, dwFlags, &devInstance, This->dwVersion, j))) {
 257                 if (lpCallback(&devInstance,pvRef) == DIENUM_STOP)
 258                     return 0;
 259             }
 260         }
 261     }
 262
 263     return 0;
 264 }
 265
 266 static ULONG WINAPI IDirectInputAImpl_AddRef(LPDIRECTINPUT7A iface)
 267 {
 268         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 269         return InterlockedIncrement((&This->ref));
 270 }
 271
 272 static ULONG WINAPI IDirectInputAImpl_Release(LPDIRECTINPUT7A iface)
 273 {
 274         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 275         ULONG ref;
 276         ref = InterlockedDecrement(&(This->ref));
 277         if (ref == 0)
 278                 HeapFree(GetProcessHeap(),0,This);
 279         return ref;
 280 }
 281
 282 static HRESULT WINAPI IDirectInputAImpl_QueryInterface(LPDIRECTINPUT7A iface, REFIID riid, LPVOID *ppobj) {
 283         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 284
 285         TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
 286         if (IsEqualGUID(&IID_IUnknown,riid) ||
 287             IsEqualGUID(&IID_IDirectInputA,riid) ||
 288             IsEqualGUID(&IID_IDirectInput2A,riid) ||
 289             IsEqualGUID(&IID_IDirectInput7A,riid)) {
 290                 IDirectInputAImpl_AddRef(iface);
 291                 *ppobj = This;
 292                 return 0;
 293         }
 294         TRACE("Unsupported interface !\n");
 295         return E_FAIL;
 296 }
 297
 298 static HRESULT WINAPI IDirectInputWImpl_QueryInterface(LPDIRECTINPUT7W iface, REFIID riid, LPVOID *ppobj) {
 299         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 300
 301         TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
 302         if (IsEqualGUID(&IID_IUnknown,riid) ||
 303             IsEqualGUID(&IID_IDirectInputW,riid) ||
 304             IsEqualGUID(&IID_IDirectInput2W,riid) ||
 305             IsEqualGUID(&IID_IDirectInput7W,riid)) {
 306                 IDirectInputAImpl_AddRef((LPDIRECTINPUT7A) iface);
 307                 *ppobj = This;
 308                 return 0;
 309         }
 310         TRACE("Unsupported interface !\n");
 311         return E_FAIL;
 312 }
 313
 314 static HRESULT WINAPI IDirectInputAImpl_CreateDevice(
 315         LPDIRECTINPUT7A iface,REFGUID rguid,LPDIRECTINPUTDEVICEA* pdev,
 316         LPUNKNOWN punk
 317 ) {
 318         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 319         HRESULT ret_value = DIERR_DEVICENOTREG;
 320         int i;
 321
 322         TRACE("(this=%p,%s,%p,%p)\n",This,debugstr_guid(rguid),pdev,punk);
 323
 324         if (pdev == NULL) {
 325                 WARN("invalid pointer: pdev == NULL\n");
 326                 return E_POINTER;
 327         }
 328
 329         if (rguid == NULL) {
 330                 WARN("invalid pointer: rguid == NULL\n");
 331                 return E_POINTER;
 332         }
 333
 334         /* Loop on all the devices to see if anyone matches the given GUID */
 335         for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 336           HRESULT ret;
 337           if (!dinput_devices[i]->create_deviceA) continue;
 338           if ((ret = dinput_devices[i]->create_deviceA(This, rguid, NULL, pdev)) == DI_OK)
 339             return DI_OK;
 340
 341           if (ret == DIERR_NOINTERFACE)
 342             ret_value = DIERR_NOINTERFACE;
 343         }
 344
 345         return ret_value;
 346 }
 347
 348 static HRESULT WINAPI IDirectInputWImpl_CreateDevice(LPDIRECTINPUT7A iface,
 349                                                      REFGUID rguid, LPDIRECTINPUTDEVICEW* pdev, LPUNKNOWN punk) {
 350         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 351         HRESULT ret_value = DIERR_DEVICENOTREG;
 352         int i;
 353
 354         TRACE("(this=%p,%s,%p,%p)\n",This,debugstr_guid(rguid),pdev,punk);
 355
 356         /* Loop on all the devices to see if anyone matches the given GUID */
 357         for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 358           HRESULT ret;
 359           if (!dinput_devices[i]->create_deviceW) continue;
 360           if ((ret = dinput_devices[i]->create_deviceW(This, rguid, NULL, pdev)) == DI_OK)
 361             return DI_OK;
 362
 363           if (ret == DIERR_NOINTERFACE)
 364             ret_value = DIERR_NOINTERFACE;
 365         }
 366
 367         return ret_value;
 368 }
 369
 370 static HRESULT WINAPI IDirectInputAImpl_Initialize(LPDIRECTINPUT7A iface, HINSTANCE hinst, DWORD x) {
 371         return DIERR_ALREADYINITIALIZED;
 372 }
 373
 374 static HRESULT WINAPI IDirectInputAImpl_GetDeviceStatus(LPDIRECTINPUT7A iface,
 375                                                         REFGUID rguid) {
 376   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 377
 378   FIXME("(%p)->(%s): stub\n",This,debugstr_guid(rguid));
 379
 380   return DI_OK;
 381 }
 382
 383 static HRESULT WINAPI IDirectInputAImpl_RunControlPanel(LPDIRECTINPUT7A iface,
 384                                                         HWND hwndOwner,
 385                                                         DWORD dwFlags) {
 386   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 387   FIXME("(%p)->(%p,%08lx): stub\n",This, hwndOwner, dwFlags);
 388
 389   return DI_OK;
 390 }
 391
 392 static HRESULT WINAPI IDirectInput2AImpl_FindDevice(LPDIRECTINPUT7A iface, REFGUID rguid,
 393                                                     LPCSTR pszName, LPGUID pguidInstance) {
 394   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 395   FIXME("(%p)->(%s, %s, %p): stub\n", This, debugstr_guid(rguid), pszName, pguidInstance);
 396
 397   return DI_OK;
 398 }
 399
 400 static HRESULT WINAPI IDirectInput2WImpl_FindDevice(LPDIRECTINPUT7W iface, REFGUID rguid,
 401                                                     LPCWSTR pszName, LPGUID pguidInstance) {
 402   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 403   FIXME("(%p)->(%s, %s, %p): stub\n", This, debugstr_guid(rguid), debugstr_w(pszName), pguidInstance);
 404
 405   return DI_OK;
 406 }
 407
 408 static HRESULT WINAPI IDirectInput7AImpl_CreateDeviceEx(LPDIRECTINPUT7A iface, REFGUID rguid,
 409                                                         REFIID riid, LPVOID* pvOut, LPUNKNOWN lpUnknownOuter)
 410 {
 411   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 412   HRESULT ret_value = DIERR_DEVICENOTREG;
 413   int i;
 414
 415   TRACE("(%p)->(%s, %s, %p, %p)\n", This, debugstr_guid(rguid), debugstr_guid(riid), pvOut, lpUnknownOuter);
 416
 417   /* Loop on all the devices to see if anyone matches the given GUID */
 418   for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 419     HRESULT ret;
 420     if (!dinput_devices[i]->create_deviceA) continue;
 421     if ((ret = dinput_devices[i]->create_deviceA(This, rguid, riid, (LPDIRECTINPUTDEVICEA*) pvOut)) == DI_OK)
 422       return DI_OK;
 423
 424     if (ret == DIERR_NOINTERFACE)
 425       ret_value = DIERR_NOINTERFACE;
 426   }
 427
 428   return ret_value;
 429 }
 430
 431 static HRESULT WINAPI IDirectInput7WImpl_CreateDeviceEx(LPDIRECTINPUT7W iface, REFGUID rguid,
 432                                                         REFIID riid, LPVOID* pvOut, LPUNKNOWN lpUnknownOuter)
 433 {
 434   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 435   HRESULT ret_value = DIERR_DEVICENOTREG;
 436   int i;
 437
 438   TRACE("(%p)->(%s, %s, %p, %p)\n", This, debugstr_guid(rguid), debugstr_guid(riid), pvOut, lpUnknownOuter);
 439
 440   /* Loop on all the devices to see if anyone matches the given GUID */
 441   for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 442     HRESULT ret;
 443     if (!dinput_devices[i]->create_deviceW) continue;
 444     if ((ret = dinput_devices[i]->create_deviceW(This, rguid, riid, (LPDIRECTINPUTDEVICEW*) pvOut)) == DI_OK)
 445       return DI_OK;
 446
 447     if (ret == DIERR_NOINTERFACE)
 448       ret_value = DIERR_NOINTERFACE;
 449   }
 450
 451   return ret_value;
 452 }
 453
 454 static HRESULT WINAPI IDirectInput8AImpl_QueryInterface(LPDIRECTINPUT8A iface, REFIID riid, LPVOID *ppobj) {
 455       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 456
 457       TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
 458       if (IsEqualGUID(&IID_IUnknown,riid) ||
 459           IsEqualGUID(&IID_IDirectInput8A,riid)) {
 460               IDirectInputAImpl_AddRef((LPDIRECTINPUT7A) iface);
 461               *ppobj = This;
 462               return 0;
 463       }
 464       TRACE("Unsupported interface !\n");
 465       return E_NOINTERFACE;
 466 }
 467
 468 static HRESULT WINAPI IDirectInput8WImpl_QueryInterface(LPDIRECTINPUT8W iface, REFIID riid, LPVOID *ppobj) {
 469       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 470
 471       TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
 472       if (IsEqualGUID(&IID_IUnknown,riid) ||
 473           IsEqualGUID(&IID_IDirectInput8W,riid)) {
 474               IDirectInputAImpl_AddRef((LPDIRECTINPUT7A) iface);
 475               *ppobj = This;
 476               return 0;
 477       }
 478       TRACE("Unsupported interface !\n");
 479       return E_NOINTERFACE;
 480 }
 481
 482 static HRESULT WINAPI IDirectInput8AImpl_EnumDevicesBySemantics(
 483       LPDIRECTINPUT8A iface, LPCSTR ptszUserName, LPDIACTIONFORMATA lpdiActionFormat,
 484       LPDIENUMDEVICESBYSEMANTICSCBA lpCallback,
 485       LPVOID pvRef, DWORD dwFlags
 486 )
 487 {
 488       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 489
 490       FIXME("(this=%p,%s,%p,%p,%p,%04lx): stub\n", This, ptszUserName, lpdiActionFormat,
 491             lpCallback, pvRef, dwFlags);
 492       return 0;
 493 }
 494
 495 static HRESULT WINAPI IDirectInput8WImpl_EnumDevicesBySemantics(
 496       LPDIRECTINPUT8W iface, LPCWSTR ptszUserName, LPDIACTIONFORMATW lpdiActionFormat,
 497       LPDIENUMDEVICESBYSEMANTICSCBW lpCallback,
 498       LPVOID pvRef, DWORD dwFlags
 499 )
 500 {
 501       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 502
 503       FIXME("(this=%p,%s,%p,%p,%p,%04lx): stub\n", This, debugstr_w(ptszUserName), lpdiActionFormat,
 504             lpCallback, pvRef, dwFlags);
 505       return 0;
 506 }
 507
 508 static HRESULT WINAPI IDirectInput8AImpl_ConfigureDevices(
 509       LPDIRECTINPUT8A iface, LPDICONFIGUREDEVICESCALLBACK lpdiCallback,
 510       LPDICONFIGUREDEVICESPARAMSA lpdiCDParams, DWORD dwFlags, LPVOID pvRefData
 511 )
 512 {
 513       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 514
 515       FIXME("(this=%p,%p,%p,%04lx,%p): stub\n", This, lpdiCallback, lpdiCDParams,
 516             dwFlags, pvRefData);
 517       return 0;
 518 }
 519
 520 static HRESULT WINAPI IDirectInput8WImpl_ConfigureDevices(
 521       LPDIRECTINPUT8W iface, LPDICONFIGUREDEVICESCALLBACK lpdiCallback,
 522       LPDICONFIGUREDEVICESPARAMSW lpdiCDParams, DWORD dwFlags, LPVOID pvRefData
 523 )
 524 {
 525       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 526
 527       FIXME("(this=%p,%p,%p,%04lx,%p): stub\n", This, lpdiCallback, lpdiCDParams,
 528             dwFlags, pvRefData);
 529       return 0;
 530 }
 531
 532 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
 533 # define XCAST(fun)   (typeof(ddi7avt.fun))
 534 #else
 535 # define XCAST(fun)     (void*)
 536 #endif
 537
 538 static const IDirectInput7AVtbl ddi7avt = {
 539         XCAST(QueryInterface)IDirectInputAImpl_QueryInterface,
 540         XCAST(AddRef)IDirectInputAImpl_AddRef,
 541         XCAST(Release)IDirectInputAImpl_Release,
 542         XCAST(CreateDevice)IDirectInputAImpl_CreateDevice,
 543         XCAST(EnumDevices)IDirectInputAImpl_EnumDevices,
 544         XCAST(GetDeviceStatus)IDirectInputAImpl_GetDeviceStatus,
 545         XCAST(RunControlPanel)IDirectInputAImpl_RunControlPanel,
 546         XCAST(Initialize)IDirectInputAImpl_Initialize,
 547         XCAST(FindDevice)IDirectInput2AImpl_FindDevice,
 548         XCAST(CreateDeviceEx)IDirectInput7AImpl_CreateDeviceEx
 549 };
 550
 551 #undef XCAST
 552 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
 553 # define XCAST(fun)   (typeof(ddi7wvt.fun))
 554 #else
 555 # define XCAST(fun)     (void*)
 556 #endif
 557
 558 static const IDirectInput7WVtbl ddi7wvt = {
 559         XCAST(QueryInterface)IDirectInputWImpl_QueryInterface,
 560         XCAST(AddRef)IDirectInputAImpl_AddRef,
 561         XCAST(Release)IDirectInputAImpl_Release,
 562         XCAST(CreateDevice)IDirectInputWImpl_CreateDevice,
 563         XCAST(EnumDevices)IDirectInputWImpl_EnumDevices,
 564         XCAST(GetDeviceStatus)IDirectInputAImpl_GetDeviceStatus,
 565         XCAST(RunControlPanel)IDirectInputAImpl_RunControlPanel,
 566         XCAST(Initialize)IDirectInputAImpl_Initialize,
 567         XCAST(FindDevice)IDirectInput2WImpl_FindDevice,
 568         XCAST(CreateDeviceEx)IDirectInput7WImpl_CreateDeviceEx
 569 };
 570 #undef XCAST
 571
 572 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
 573 # define XCAST(fun)     (typeof(ddi8avt.fun))
 574 #else
 575 # define XCAST(fun)     (void*)
 576 #endif
 577
 578 static const IDirectInput8AVtbl ddi8avt = {
 579         XCAST(QueryInterface)IDirectInput8AImpl_QueryInterface,
 580         XCAST(AddRef)IDirectInputAImpl_AddRef,
 581         XCAST(Release)IDirectInputAImpl_Release,
 582         XCAST(CreateDevice)IDirectInputAImpl_CreateDevice,
 583         XCAST(EnumDevices)IDirectInputAImpl_EnumDevices,
 584         XCAST(GetDeviceStatus)IDirectInputAImpl_GetDeviceStatus,
 585         XCAST(RunControlPanel)IDirectInputAImpl_RunControlPanel,
 586         XCAST(Initialize)IDirectInputAImpl_Initialize,
 587         XCAST(FindDevice)IDirectInput2AImpl_FindDevice,
 588         XCAST(EnumDevicesBySemantics)IDirectInput8AImpl_EnumDevicesBySemantics,
 589         XCAST(ConfigureDevices)IDirectInput8AImpl_ConfigureDevices
 590 };
 591 #undef XCAST
 592
 593 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
 594 # define XCAST(fun)     (typeof(ddi8wvt.fun))
 595 #else
 596 # define XCAST(fun)     (void*)
 597 #endif
 598 static const IDirectInput8WVtbl ddi8wvt = {
 599         XCAST(QueryInterface)IDirectInput8WImpl_QueryInterface,
 600         XCAST(AddRef)IDirectInputAImpl_AddRef,
 601         XCAST(Release)IDirectInputAImpl_Release,
 602         XCAST(CreateDevice)IDirectInputWImpl_CreateDevice,
 603         XCAST(EnumDevices)IDirectInputWImpl_EnumDevices,
 604         XCAST(GetDeviceStatus)IDirectInputAImpl_GetDeviceStatus,
 605         XCAST(RunControlPanel)IDirectInputAImpl_RunControlPanel,
 606         XCAST(Initialize)IDirectInputAImpl_Initialize,
 607         XCAST(FindDevice)IDirectInput2WImpl_FindDevice,
 608         XCAST(EnumDevicesBySemantics)IDirectInput8WImpl_EnumDevicesBySemantics,
 609         XCAST(ConfigureDevices)IDirectInput8WImpl_ConfigureDevices
 610 };
 611 #undef XCAST
 612
 613 /*******************************************************************************
 614  * DirectInput ClassFactory
 615  */
 616 typedef struct
 617 {
 618     /* IUnknown fields */
 619     const IClassFactoryVtbl    *lpVtbl;
 620     LONG                        ref;
 621 } IClassFactoryImpl;
 622
 623 static HRESULT WINAPI DICF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
 624         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
 625
 626         FIXME("(%p)->(%s,%p),stub!\n",This,debugstr_guid(riid),ppobj);
 627         return E_NOINTERFACE;
 628 }
 629
 630 static ULONG WINAPI DICF_AddRef(LPCLASSFACTORY iface) {
 631         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
 632         return InterlockedIncrement(&(This->ref));
 633 }
 634
 635 static ULONG WINAPI DICF_Release(LPCLASSFACTORY iface) {
 636         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
 637         /* static class, won't be  freed */
 638         return InterlockedDecrement(&(This->ref));
 639 }
 640
 641 static HRESULT WINAPI DICF_CreateInstance(
 642         LPCLASSFACTORY iface,LPUNKNOWN pOuter,REFIID riid,LPVOID *ppobj
 643 ) {
 644         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
 645
 646         TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj);
 647         if ( IsEqualGUID( &IID_IDirectInputA, riid ) ||
 648              IsEqualGUID( &IID_IDirectInputW, riid ) ||
 649              IsEqualGUID( &IID_IDirectInput2A, riid ) ||
 650              IsEqualGUID( &IID_IDirectInput2W, riid ) ||
 651              IsEqualGUID( &IID_IDirectInput7A, riid ) ||
 652              IsEqualGUID( &IID_IDirectInput7W, riid ) ||
 653              IsEqualGUID( &IID_IDirectInput8A, riid ) ||
 654              IsEqualGUID( &IID_IDirectInput8W, riid ) ) {
 655                 /* FIXME: reuse already created dinput if present? */
 656                 return DirectInputCreateEx(0,0,riid,ppobj,pOuter);
 657         }
 658
 659         FIXME("(%p,%p,%s,%p) Interface not found!\n",This,pOuter,debugstr_guid(riid),ppobj);
 660         return E_NOINTERFACE;
 661 }
 662
 663 static HRESULT WINAPI DICF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
 664         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
 665         FIXME("(%p)->(%d),stub!\n",This,dolock);
 666         return S_OK;
 667 }
 668
 669 static const IClassFactoryVtbl DICF_Vtbl = {
 670         DICF_QueryInterface,
 671         DICF_AddRef,
 672         DICF_Release,
 673         DICF_CreateInstance,
 674         DICF_LockServer
 675 };
 676 static IClassFactoryImpl DINPUT_CF = {&DICF_Vtbl, 1 };
 677
 678 /***********************************************************************
 679  *              DllCanUnloadNow (DINPUT.@)
 680  */
 681 HRESULT WINAPI DllCanUnloadNow(void)
 682 {
 683     FIXME("(void): stub\n");
 684
 685     return S_FALSE;
 686 }
 687
 688 /***********************************************************************
 689  *              DllGetClassObject (DINPUT.@)
 690  */
 691 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv)
 692 {
 693     TRACE("(%s,%s,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
 694     if ( IsEqualCLSID( &IID_IClassFactory, riid ) ) {
 695         *ppv = (LPVOID)&DINPUT_CF;
 696         IClassFactory_AddRef((IClassFactory*)*ppv);
 697     return S_OK;
 698     }
 699
 700     FIXME("(%s,%s,%p): no interface found.\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
 701     return CLASS_E_CLASSNOTAVAILABLE;
 702 }