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 IDirectInput7AVtbl ddi7avt;
  50 static IDirectInput7WVtbl ddi7wvt;
  51 static IDirectInput8AVtbl ddi8avt;
  52 static 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("(0x%08lx,%04lx,%s,%p,%p)\n", (DWORD)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->version = 1;
  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->version = 1;
 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->version = 8;
 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->version = 8;
 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("(0x%08lx,%04lx,%p,%p)\n", (DWORD)hinst,dwVersion,ppDI,punkOuter);
 145         This = HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputImpl));
 146         This->lpVtbl = &ddi7avt;
 147         This->ref = 1;
 148         if (dwVersion >= 0x0800) {
 149             This->version = 8;
 150         } else {
 151             /* We do not differientiate between version 1, 2 and 7 */
 152             This->version = 1;
 153         }
 154         *ppDI = (IDirectInputA*)This;
 155         return 0;
 156
 157 }
 158
 159 /******************************************************************************
 160  *      DirectInputCreateW (DINPUT.@)
 161  */
 162 HRESULT WINAPI DirectInputCreateW(HINSTANCE hinst, DWORD dwVersion, LPDIRECTINPUTW *ppDI, LPUNKNOWN punkOuter)
 163 {
 164         IDirectInputImpl* This;
 165         TRACE("(0x%08lx,%04lx,%p,%p)\n", (DWORD)hinst,dwVersion,ppDI,punkOuter);
 166         This = HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputImpl));
 167         This->lpVtbl = &ddi7wvt;
 168         This->ref = 1;
 169         if (dwVersion >= 0x0800) {
 170             This->version = 8;
 171         } else {
 172             /* We do not differientiate between version 1, 2 and 7 */
 173             This->version = 1;
 174         }
 175         *ppDI = (IDirectInputW*)This;
 176         return 0;
 177 }
 178
 179 static const char *_dump_DIDEVTYPE_value(DWORD dwDevType) {
 180     switch (dwDevType) {
 181         case 0: return "All devices";
 182         case DIDEVTYPE_MOUSE: return "DIDEVTYPE_MOUSE";
 183         case DIDEVTYPE_KEYBOARD: return "DIDEVTYPE_KEYBOARD";
 184         case DIDEVTYPE_JOYSTICK: return "DIDEVTYPE_JOYSTICK";
 185         case DIDEVTYPE_DEVICE: return "DIDEVTYPE_DEVICE";
 186         default: return "Unkown";
 187     }
 188 }
 189
 190 static void _dump_EnumDevices_dwFlags(DWORD dwFlags) {
 191     if (TRACE_ON(dinput)) {
 192         unsigned int   i;
 193         static const struct {
 194             DWORD       mask;
 195             const char  *name;
 196         } flags[] = {
 197 #define FE(x) { x, #x}
 198             FE(DIEDFL_ALLDEVICES),
 199             FE(DIEDFL_ATTACHEDONLY),
 200             FE(DIEDFL_FORCEFEEDBACK),
 201             FE(DIEDFL_INCLUDEALIASES),
 202             FE(DIEDFL_INCLUDEPHANTOMS)
 203 #undef FE
 204         };
 205         if (dwFlags == 0) {
 206             DPRINTF("DIEDFL_ALLDEVICES");
 207             return;
 208         }
 209         for (i = 0; i < (sizeof(flags) / sizeof(flags[0])); i++)
 210             if (flags[i].mask & dwFlags)
 211                 DPRINTF("%s ",flags[i].name);
 212     }
 213 }
 214
 215 /******************************************************************************
 216  *      IDirectInputA_EnumDevices
 217  */
 218 static HRESULT WINAPI IDirectInputAImpl_EnumDevices(
 219         LPDIRECTINPUT7A iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKA lpCallback,
 220         LPVOID pvRef, DWORD dwFlags)
 221 {
 222     IDirectInputImpl *This = (IDirectInputImpl *)iface;
 223     DIDEVICEINSTANCEA devInstance;
 224     int i, j, r;
 225
 226     TRACE("(this=%p,0x%04lx '%s',%p,%p,%04lx)\n",
 227           This, dwDevType, _dump_DIDEVTYPE_value(dwDevType),
 228           lpCallback, pvRef, dwFlags);
 229     TRACE(" flags: "); _dump_EnumDevices_dwFlags(dwFlags); TRACE("\n");
 230
 231     for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 232         if (!dinput_devices[i]->enum_deviceA) continue;
 233         for (j = 0, r = -1; r != 0; j++) {
 234             devInstance.dwSize = sizeof(devInstance);
 235             TRACE("  - checking device %d ('%s')\n", i, dinput_devices[i]->name);
 236             if ((r = dinput_devices[i]->enum_deviceA(dwDevType, dwFlags, &devInstance, This->version, j))) {
 237                 if (lpCallback(&devInstance,pvRef) == DIENUM_STOP)
 238                     return 0;
 239             }
 240         }
 241     }
 242
 243     return 0;
 244 }
 245 /******************************************************************************
 246  *      IDirectInputW_EnumDevices
 247  */
 248 static HRESULT WINAPI IDirectInputWImpl_EnumDevices(
 249         LPDIRECTINPUT7W iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKW lpCallback,
 250         LPVOID pvRef, DWORD dwFlags)
 251 {
 252     IDirectInputImpl *This = (IDirectInputImpl *)iface;
 253     DIDEVICEINSTANCEW devInstance;
 254     int i, j, r;
 255
 256     TRACE("(this=%p,0x%04lx '%s',%p,%p,%04lx)\n",
 257           This, dwDevType, _dump_DIDEVTYPE_value(dwDevType),
 258           lpCallback, pvRef, dwFlags);
 259     TRACE(" flags: "); _dump_EnumDevices_dwFlags(dwFlags); TRACE("\n");
 260
 261     for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 262         if (!dinput_devices[i]->enum_deviceW) continue;
 263         for (j = 0, r = -1; r != 0; j++) {
 264             devInstance.dwSize = sizeof(devInstance);
 265             TRACE("  - checking device %d ('%s')\n", i, dinput_devices[i]->name);
 266             if ((r = dinput_devices[i]->enum_deviceW(dwDevType, dwFlags, &devInstance, This->version, j))) {
 267                 if (lpCallback(&devInstance,pvRef) == DIENUM_STOP)
 268                     return 0;
 269             }
 270         }
 271     }
 272
 273     return 0;
 274 }
 275
 276 static ULONG WINAPI IDirectInputAImpl_AddRef(LPDIRECTINPUT7A iface)
 277 {
 278         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 279         return InterlockedIncrement((&This->ref));
 280 }
 281
 282 static ULONG WINAPI IDirectInputAImpl_Release(LPDIRECTINPUT7A iface)
 283 {
 284         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 285         ULONG ref;
 286         ref = InterlockedDecrement(&(This->ref));
 287         if (ref == 0)
 288                 HeapFree(GetProcessHeap(),0,This);
 289         return ref;
 290 }
 291
 292 static HRESULT WINAPI IDirectInputAImpl_QueryInterface(LPDIRECTINPUT7A iface, REFIID riid, LPVOID *ppobj) {
 293         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 294
 295         TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
 296         if (IsEqualGUID(&IID_IUnknown,riid) ||
 297             IsEqualGUID(&IID_IDirectInputA,riid) ||
 298             IsEqualGUID(&IID_IDirectInput2A,riid) ||
 299             IsEqualGUID(&IID_IDirectInput7A,riid)) {
 300                 IDirectInputAImpl_AddRef(iface);
 301                 *ppobj = This;
 302                 return 0;
 303         }
 304         TRACE("Unsupported interface !\n");
 305         return E_FAIL;
 306 }
 307
 308 static HRESULT WINAPI IDirectInputWImpl_QueryInterface(LPDIRECTINPUT7W iface, REFIID riid, LPVOID *ppobj) {
 309         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 310
 311         TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
 312         if (IsEqualGUID(&IID_IUnknown,riid) ||
 313             IsEqualGUID(&IID_IDirectInputW,riid) ||
 314             IsEqualGUID(&IID_IDirectInput2W,riid) ||
 315             IsEqualGUID(&IID_IDirectInput7W,riid)) {
 316                 IDirectInputAImpl_AddRef((LPDIRECTINPUT7A) iface);
 317                 *ppobj = This;
 318                 return 0;
 319         }
 320         TRACE("Unsupported interface !\n");
 321         return E_FAIL;
 322 }
 323
 324 static HRESULT WINAPI IDirectInputAImpl_CreateDevice(
 325         LPDIRECTINPUT7A iface,REFGUID rguid,LPDIRECTINPUTDEVICEA* pdev,
 326         LPUNKNOWN punk
 327 ) {
 328         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 329         HRESULT ret_value = DIERR_DEVICENOTREG;
 330         int i;
 331
 332         TRACE("(this=%p,%s,%p,%p)\n",This,debugstr_guid(rguid),pdev,punk);
 333
 334         if (pdev == NULL) {
 335                 WARN("invalid pointer: pdev == NULL\n");
 336                 return E_POINTER;
 337         }
 338
 339         if (rguid == NULL) {
 340                 WARN("invalid pointer: rguid == NULL\n");
 341                 return E_POINTER;
 342         }
 343
 344         /* Loop on all the devices to see if anyone matches the given GUID */
 345         for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 346           HRESULT ret;
 347           if (!dinput_devices[i]->create_deviceA) continue;
 348           if ((ret = dinput_devices[i]->create_deviceA(This, rguid, NULL, pdev)) == DI_OK)
 349             return DI_OK;
 350
 351           if (ret == DIERR_NOINTERFACE)
 352             ret_value = DIERR_NOINTERFACE;
 353         }
 354
 355         return ret_value;
 356 }
 357
 358 static HRESULT WINAPI IDirectInputWImpl_CreateDevice(LPDIRECTINPUT7A iface,
 359                                                      REFGUID rguid, LPDIRECTINPUTDEVICEW* pdev, LPUNKNOWN punk) {
 360         IDirectInputImpl *This = (IDirectInputImpl *)iface;
 361         HRESULT ret_value = DIERR_DEVICENOTREG;
 362         int i;
 363
 364         TRACE("(this=%p,%s,%p,%p)\n",This,debugstr_guid(rguid),pdev,punk);
 365
 366         /* Loop on all the devices to see if anyone matches the given GUID */
 367         for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 368           HRESULT ret;
 369           if (!dinput_devices[i]->create_deviceW) continue;
 370           if ((ret = dinput_devices[i]->create_deviceW(This, rguid, NULL, pdev)) == DI_OK)
 371             return DI_OK;
 372
 373           if (ret == DIERR_NOINTERFACE)
 374             ret_value = DIERR_NOINTERFACE;
 375         }
 376
 377         return ret_value;
 378 }
 379
 380 static HRESULT WINAPI IDirectInputAImpl_Initialize(LPDIRECTINPUT7A iface, HINSTANCE hinst, DWORD x) {
 381         return DIERR_ALREADYINITIALIZED;
 382 }
 383
 384 static HRESULT WINAPI IDirectInputAImpl_GetDeviceStatus(LPDIRECTINPUT7A iface,
 385                                                         REFGUID rguid) {
 386   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 387
 388   FIXME("(%p)->(%s): stub\n",This,debugstr_guid(rguid));
 389
 390   return DI_OK;
 391 }
 392
 393 static HRESULT WINAPI IDirectInputAImpl_RunControlPanel(LPDIRECTINPUT7A iface,
 394                                                         HWND hwndOwner,
 395                                                         DWORD dwFlags) {
 396   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 397   FIXME("(%p)->(%08lx,%08lx): stub\n",This, (DWORD) hwndOwner, dwFlags);
 398
 399   return DI_OK;
 400 }
 401
 402 static HRESULT WINAPI IDirectInput2AImpl_FindDevice(LPDIRECTINPUT7A iface, REFGUID rguid,
 403                                                     LPCSTR pszName, LPGUID pguidInstance) {
 404   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 405   FIXME("(%p)->(%s, %s, %p): stub\n", This, debugstr_guid(rguid), pszName, pguidInstance);
 406
 407   return DI_OK;
 408 }
 409
 410 static HRESULT WINAPI IDirectInput2WImpl_FindDevice(LPDIRECTINPUT7W iface, REFGUID rguid,
 411                                                     LPCWSTR pszName, LPGUID pguidInstance) {
 412   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 413   FIXME("(%p)->(%s, %s, %p): stub\n", This, debugstr_guid(rguid), debugstr_w(pszName), pguidInstance);
 414
 415   return DI_OK;
 416 }
 417
 418 static HRESULT WINAPI IDirectInput7AImpl_CreateDeviceEx(LPDIRECTINPUT7A iface, REFGUID rguid,
 419                                                         REFIID riid, LPVOID* pvOut, LPUNKNOWN lpUnknownOuter)
 420 {
 421   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 422   HRESULT ret_value = DIERR_DEVICENOTREG;
 423   int i;
 424
 425   TRACE("(%p)->(%s, %s, %p, %p)\n", This, debugstr_guid(rguid), debugstr_guid(riid), pvOut, lpUnknownOuter);
 426
 427   /* Loop on all the devices to see if anyone matches the given GUID */
 428   for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 429     HRESULT ret;
 430     if (!dinput_devices[i]->create_deviceA) continue;
 431     if ((ret = dinput_devices[i]->create_deviceA(This, rguid, riid, (LPDIRECTINPUTDEVICEA*) pvOut)) == DI_OK)
 432       return DI_OK;
 433
 434     if (ret == DIERR_NOINTERFACE)
 435       ret_value = DIERR_NOINTERFACE;
 436   }
 437
 438   return ret_value;
 439 }
 440
 441 static HRESULT WINAPI IDirectInput7WImpl_CreateDeviceEx(LPDIRECTINPUT7W iface, REFGUID rguid,
 442                                                         REFIID riid, LPVOID* pvOut, LPUNKNOWN lpUnknownOuter)
 443 {
 444   IDirectInputImpl *This = (IDirectInputImpl *)iface;
 445   HRESULT ret_value = DIERR_DEVICENOTREG;
 446   int i;
 447
 448   TRACE("(%p)->(%s, %s, %p, %p)\n", This, debugstr_guid(rguid), debugstr_guid(riid), pvOut, lpUnknownOuter);
 449
 450   /* Loop on all the devices to see if anyone matches the given GUID */
 451   for (i = 0; i < NB_DINPUT_DEVICES; i++) {
 452     HRESULT ret;
 453     if (!dinput_devices[i]->create_deviceW) continue;
 454     if ((ret = dinput_devices[i]->create_deviceW(This, rguid, riid, (LPDIRECTINPUTDEVICEW*) pvOut)) == DI_OK)
 455       return DI_OK;
 456
 457     if (ret == DIERR_NOINTERFACE)
 458       ret_value = DIERR_NOINTERFACE;
 459   }
 460
 461   return ret_value;
 462 }
 463
 464 static HRESULT WINAPI IDirectInput8AImpl_QueryInterface(LPDIRECTINPUT8A iface, REFIID riid, LPVOID *ppobj) {
 465       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 466
 467       TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
 468       if (IsEqualGUID(&IID_IUnknown,riid) ||
 469           IsEqualGUID(&IID_IDirectInput8A,riid)) {
 470               IDirectInputAImpl_AddRef((LPDIRECTINPUT7A) iface);
 471               *ppobj = This;
 472               return 0;
 473       }
 474       TRACE("Unsupported interface !\n");
 475       return E_NOINTERFACE;
 476 }
 477
 478 static HRESULT WINAPI IDirectInput8WImpl_QueryInterface(LPDIRECTINPUT8W iface, REFIID riid, LPVOID *ppobj) {
 479       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 480
 481       TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
 482       if (IsEqualGUID(&IID_IUnknown,riid) ||
 483           IsEqualGUID(&IID_IDirectInput8W,riid)) {
 484               IDirectInputAImpl_AddRef((LPDIRECTINPUT7A) iface);
 485               *ppobj = This;
 486               return 0;
 487       }
 488       TRACE("Unsupported interface !\n");
 489       return E_NOINTERFACE;
 490 }
 491
 492 static HRESULT WINAPI IDirectInput8AImpl_EnumDevicesBySemantics(
 493       LPDIRECTINPUT8A iface, LPCSTR ptszUserName, LPDIACTIONFORMATA lpdiActionFormat,
 494       LPDIENUMDEVICESBYSEMANTICSCBA lpCallback,
 495       LPVOID pvRef, DWORD dwFlags
 496 )
 497 {
 498       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 499
 500       FIXME("(this=%p,%s,%p,%p,%p,%04lx): stub\n", This, ptszUserName, lpdiActionFormat,
 501             lpCallback, pvRef, dwFlags);
 502       return 0;
 503 }
 504
 505 static HRESULT WINAPI IDirectInput8WImpl_EnumDevicesBySemantics(
 506       LPDIRECTINPUT8W iface, LPCWSTR ptszUserName, LPDIACTIONFORMATW lpdiActionFormat,
 507       LPDIENUMDEVICESBYSEMANTICSCBW lpCallback,
 508       LPVOID pvRef, DWORD dwFlags
 509 )
 510 {
 511       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 512
 513       FIXME("(this=%p,%s,%p,%p,%p,%04lx): stub\n", This, debugstr_w(ptszUserName), lpdiActionFormat,
 514             lpCallback, pvRef, dwFlags);
 515       return 0;
 516 }
 517
 518 static HRESULT WINAPI IDirectInput8AImpl_ConfigureDevices(
 519       LPDIRECTINPUT8A iface, LPDICONFIGUREDEVICESCALLBACK lpdiCallback,
 520       LPDICONFIGUREDEVICESPARAMSA lpdiCDParams, DWORD dwFlags, LPVOID pvRefData
 521 )
 522 {
 523       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 524
 525       FIXME("(this=%p,%p,%p,%04lx,%p): stub\n", This, lpdiCallback, lpdiCDParams,
 526             dwFlags, pvRefData);
 527       return 0;
 528 }
 529
 530 static HRESULT WINAPI IDirectInput8WImpl_ConfigureDevices(
 531       LPDIRECTINPUT8W iface, LPDICONFIGUREDEVICESCALLBACK lpdiCallback,
 532       LPDICONFIGUREDEVICESPARAMSW lpdiCDParams, DWORD dwFlags, LPVOID pvRefData
 533 )
 534 {
 535       IDirectInputImpl *This = (IDirectInputImpl *)iface;
 536
 537       FIXME("(this=%p,%p,%p,%04lx,%p): stub\n", This, lpdiCallback, lpdiCDParams,
 538             dwFlags, pvRefData);
 539       return 0;
 540 }
 541
 542 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
 543 # define XCAST(fun)   (typeof(ddi7avt.fun))
 544 #else
 545 # define XCAST(fun)     (void*)
 546 #endif
 547
 548 static IDirectInput7AVtbl ddi7avt = {
 549         XCAST(QueryInterface)IDirectInputAImpl_QueryInterface,
 550         XCAST(AddRef)IDirectInputAImpl_AddRef,
 551         XCAST(Release)IDirectInputAImpl_Release,
 552         XCAST(CreateDevice)IDirectInputAImpl_CreateDevice,
 553         XCAST(EnumDevices)IDirectInputAImpl_EnumDevices,
 554         XCAST(GetDeviceStatus)IDirectInputAImpl_GetDeviceStatus,
 555         XCAST(RunControlPanel)IDirectInputAImpl_RunControlPanel,
 556         XCAST(Initialize)IDirectInputAImpl_Initialize,
 557         XCAST(FindDevice)IDirectInput2AImpl_FindDevice,
 558         XCAST(CreateDeviceEx)IDirectInput7AImpl_CreateDeviceEx
 559 };
 560
 561 #undef XCAST
 562 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
 563 # define XCAST(fun)   (typeof(ddi7wvt.fun))
 564 #else
 565 # define XCAST(fun)     (void*)
 566 #endif
 567
 568 static IDirectInput7WVtbl ddi7wvt = {
 569         XCAST(QueryInterface)IDirectInputWImpl_QueryInterface,
 570         XCAST(AddRef)IDirectInputAImpl_AddRef,
 571         XCAST(Release)IDirectInputAImpl_Release,
 572         XCAST(CreateDevice)IDirectInputWImpl_CreateDevice,
 573         XCAST(EnumDevices)IDirectInputWImpl_EnumDevices,
 574         XCAST(GetDeviceStatus)IDirectInputAImpl_GetDeviceStatus,
 575         XCAST(RunControlPanel)IDirectInputAImpl_RunControlPanel,
 576         XCAST(Initialize)IDirectInputAImpl_Initialize,
 577         XCAST(FindDevice)IDirectInput2WImpl_FindDevice,
 578         XCAST(CreateDeviceEx)IDirectInput7WImpl_CreateDeviceEx
 579 };
 580 #undef XCAST
 581
 582 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
 583 # define XCAST(fun)     (typeof(ddi8avt.fun))
 584 #else
 585 # define XCAST(fun)     (void*)
 586 #endif
 587
 588 static IDirectInput8AVtbl ddi8avt = {
 589         XCAST(QueryInterface)IDirectInput8AImpl_QueryInterface,
 590         XCAST(AddRef)IDirectInputAImpl_AddRef,
 591         XCAST(Release)IDirectInputAImpl_Release,
 592         XCAST(CreateDevice)IDirectInputAImpl_CreateDevice,
 593         XCAST(EnumDevices)IDirectInputAImpl_EnumDevices,
 594         XCAST(GetDeviceStatus)IDirectInputAImpl_GetDeviceStatus,
 595         XCAST(RunControlPanel)IDirectInputAImpl_RunControlPanel,
 596         XCAST(Initialize)IDirectInputAImpl_Initialize,
 597         XCAST(FindDevice)IDirectInput2AImpl_FindDevice,
 598         XCAST(EnumDevicesBySemantics)IDirectInput8AImpl_EnumDevicesBySemantics,
 599         XCAST(ConfigureDevices)IDirectInput8AImpl_ConfigureDevices
 600 };
 601 #undef XCAST
 602
 603 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
 604 # define XCAST(fun)     (typeof(ddi8wvt.fun))
 605 #else
 606 # define XCAST(fun)     (void*)
 607 #endif
 608 static IDirectInput8WVtbl ddi8wvt = {
 609         XCAST(QueryInterface)IDirectInput8WImpl_QueryInterface,
 610         XCAST(AddRef)IDirectInputAImpl_AddRef,
 611         XCAST(Release)IDirectInputAImpl_Release,
 612         XCAST(CreateDevice)IDirectInputWImpl_CreateDevice,
 613         XCAST(EnumDevices)IDirectInputWImpl_EnumDevices,
 614         XCAST(GetDeviceStatus)IDirectInputAImpl_GetDeviceStatus,
 615         XCAST(RunControlPanel)IDirectInputAImpl_RunControlPanel,
 616         XCAST(Initialize)IDirectInputAImpl_Initialize,
 617         XCAST(FindDevice)IDirectInput2WImpl_FindDevice,
 618         XCAST(EnumDevicesBySemantics)IDirectInput8WImpl_EnumDevicesBySemantics,
 619         XCAST(ConfigureDevices)IDirectInput8WImpl_ConfigureDevices
 620 };
 621 #undef XCAST
 622
 623 /*******************************************************************************
 624  * DirectInput ClassFactory
 625  */
 626 typedef struct
 627 {
 628     /* IUnknown fields */
 629     IClassFactoryVtbl          *lpVtbl;
 630     DWORD                       ref;
 631 } IClassFactoryImpl;
 632
 633 static HRESULT WINAPI DICF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
 634         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
 635
 636         FIXME("(%p)->(%s,%p),stub!\n",This,debugstr_guid(riid),ppobj);
 637         return E_NOINTERFACE;
 638 }
 639
 640 static ULONG WINAPI DICF_AddRef(LPCLASSFACTORY iface) {
 641         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
 642         return InterlockedIncrement(&(This->ref));
 643 }
 644
 645 static ULONG WINAPI DICF_Release(LPCLASSFACTORY iface) {
 646         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
 647         /* static class, won't be  freed */
 648         return InterlockedDecrement(&(This->ref));
 649 }
 650
 651 static HRESULT WINAPI DICF_CreateInstance(
 652         LPCLASSFACTORY iface,LPUNKNOWN pOuter,REFIID riid,LPVOID *ppobj
 653 ) {
 654         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
 655
 656         TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj);
 657         if ( IsEqualGUID( &IID_IDirectInputA, riid ) ||
 658              IsEqualGUID( &IID_IDirectInputW, riid ) ||
 659              IsEqualGUID( &IID_IDirectInput2A, riid ) ||
 660              IsEqualGUID( &IID_IDirectInput2W, riid ) ||
 661              IsEqualGUID( &IID_IDirectInput7A, riid ) ||
 662              IsEqualGUID( &IID_IDirectInput7W, riid ) ||
 663              IsEqualGUID( &IID_IDirectInput8A, riid ) ||
 664              IsEqualGUID( &IID_IDirectInput8W, riid ) ) {
 665                 /* FIXME: reuse already created dinput if present? */
 666                 return DirectInputCreateEx(0,0,riid,ppobj,pOuter);
 667         }
 668
 669         FIXME("(%p,%p,%s,%p) Interface not found!\n",This,pOuter,debugstr_guid(riid),ppobj);
 670         return E_NOINTERFACE;
 671 }
 672
 673 static HRESULT WINAPI DICF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
 674         IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
 675         FIXME("(%p)->(%d),stub!\n",This,dolock);
 676         return S_OK;
 677 }
 678
 679 static IClassFactoryVtbl DICF_Vtbl = {
 680         DICF_QueryInterface,
 681         DICF_AddRef,
 682         DICF_Release,
 683         DICF_CreateInstance,
 684         DICF_LockServer
 685 };
 686 static IClassFactoryImpl DINPUT_CF = {&DICF_Vtbl, 1 };
 687
 688 /***********************************************************************
 689  *              DllCanUnloadNow (DINPUT.@)
 690  */
 691 HRESULT WINAPI DINPUT_DllCanUnloadNow(void)
 692 {
 693     FIXME("(void): stub\n");
 694
 695     return S_FALSE;
 696 }
 697
 698 /***********************************************************************
 699  *              DllGetClassObject (DINPUT.@)
 700  */
 701 HRESULT WINAPI DINPUT_DllGetClassObject(REFCLSID rclsid, REFIID riid,
 702                                         LPVOID *ppv)
 703 {
 704     TRACE("(%s,%s,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
 705     if ( IsEqualCLSID( &IID_IClassFactory, riid ) ) {
 706         *ppv = (LPVOID)&DINPUT_CF;
 707         IClassFactory_AddRef((IClassFactory*)*ppv);
 708     return S_OK;
 709     }
 710
 711     FIXME("(%s,%s,%p): no interface found.\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
 712     return CLASS_E_CLASSNOTAVAILABLE;
 713 }