wordpad: Fixed the font size validation for the toolbar's combobox.
[wine] / dlls / dinput / dinput_main.c
index cb77d4b..f28fe25 100644 (file)
@@ -2,6 +2,8 @@
  *
  * Copyright 1998 Marcus Meissner
  * Copyright 1998,1999 Lionel Ulmer
+ * Copyright 2000-2002 TransGaming Technologies Inc.
+ * Copyright 2007 Vitaliy Margolen
  *
  *
  * This library is free software; you can redistribute it and/or
@@ -16,7 +18,7 @@
  *
  * You should have received a copy of the GNU Lesser General Public
  * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  */
 /* Status:
  *
  *   Playable using keyboard only.
  * - WingCommander Prophecy Demo:
  *   Doesn't get Input Focus.
- * 
- * - Fallout : works great in X and DGA mode
  *
- * FIXME: The keyboard handling needs to (and will) be merged into keyboard.c
- *       (The current implementation is currently only a proof of concept and
- *        an utter mess.)
+ * - Fallout : works great in X and DGA mode
  */
 
 #include "config.h"
 #include <assert.h>
+#include <stdarg.h>
 #include <string.h>
 
+#define COBJMACROS
+#define NONAMELESSUNION
+
 #include "wine/debug.h"
+#include "wine/unicode.h"
+#include "windef.h"
 #include "winbase.h"
 #include "winuser.h"
 #include "winerror.h"
-#include "windef.h"
 #include "dinput_private.h"
+#include "device_private.h"
 
 WINE_DEFAULT_DEBUG_CHANNEL(dinput);
 
-static ICOM_VTABLE(IDirectInputA) ddiavt;
-static ICOM_VTABLE(IDirectInput7A) ddi7avt;
+static const IDirectInput7AVtbl ddi7avt;
+static const IDirectInput7WVtbl ddi7wvt;
+static const IDirectInput8AVtbl ddi8avt;
+static const IDirectInput8WVtbl ddi8wvt;
+
+static inline IDirectInputImpl *impl_from_IDirectInput7W( IDirectInput7W *iface )
+{
+    return CONTAINING_RECORD( iface, IDirectInputImpl, lpVtbl7w );
+}
+
+static inline IDirectInputImpl *impl_from_IDirectInput8A( IDirectInput8A *iface )
+{
+    return CONTAINING_RECORD( iface, IDirectInputImpl, lpVtbl8a );
+}
+
+static inline IDirectInputImpl *impl_from_IDirectInput8W( IDirectInput8W *iface )
+{
+    return CONTAINING_RECORD( iface, IDirectInputImpl, lpVtbl8w );
+}
 
-/* This array will be filled a dinput.so loading */
-#define MAX_WINE_DINPUT_DEVICES 4
-static dinput_device * dinput_devices[MAX_WINE_DINPUT_DEVICES];
-static int nrof_dinput_devices = 0;
+static inline IDirectInput7W *IDirectInput7W_from_impl( IDirectInputImpl *iface )
+{
+    return (IDirectInput7W *)(&iface->lpVtbl7w);
+}
 
-BOOL WINAPI Init( HINSTANCE inst, DWORD reason, LPVOID reserv)
+static const struct dinput_device *dinput_devices[] =
+{
+    &mouse_device,
+    &keyboard_device,
+    &joystick_linuxinput_device,
+    &joystick_linux_device
+};
+#define NB_DINPUT_DEVICES (sizeof(dinput_devices)/sizeof(dinput_devices[0]))
+
+static HINSTANCE DINPUT_instance = NULL;
+
+BOOL WINAPI DllMain( HINSTANCE inst, DWORD reason, LPVOID reserv)
 {
     switch(reason)
     {
       case DLL_PROCESS_ATTACH:
-        keyboard_hook = SetWindowsHookExW( WH_KEYBOARD_LL, KeyboardCallback, 0, 0 );
+        DisableThreadLibraryCalls(inst);
+        DINPUT_instance = inst;
         break;
       case DLL_PROCESS_DETACH:
-        UnhookWindowsHookEx(keyboard_hook);
         break;
     }
     return TRUE;
 }
 
-
-/* register a direct draw driver. We better not use malloc for we are in 
- * the ELF startup initialisation at this point.
- */
-void dinput_register_device(dinput_device *device) {
-    int        i;
-
-    /* insert according to priority */
-    for (i=0;i<nrof_dinput_devices;i++) {
-       if (dinput_devices[i]->pref <= device->pref) {
-           memcpy(dinput_devices+i+1,dinput_devices+i,sizeof(dinput_devices[0])*(nrof_dinput_devices-i));
-           dinput_devices[i] = device;
-           break;
-       }
-    }
-    if (i==nrof_dinput_devices)        /* not found, or too low priority */
-       dinput_devices[nrof_dinput_devices] = device;
-
-    nrof_dinput_devices++;
-
-    /* increase MAX_DDRAW_DRIVERS if the line below triggers */
-    assert(nrof_dinput_devices <= MAX_WINE_DINPUT_DEVICES);
-}
+static BOOL check_hook_thread(void);
+static CRITICAL_SECTION dinput_hook_crit;
+static struct list direct_input_list = LIST_INIT( direct_input_list );
 
 /******************************************************************************
  *     DirectInputCreateEx (DINPUT.@)
  */
 HRESULT WINAPI DirectInputCreateEx(
        HINSTANCE hinst, DWORD dwVersion, REFIID riid, LPVOID *ppDI,
-       LPUNKNOWN punkOuter
-) {
-       IDirectInputAImpl* This;
-
-       TRACE("(0x%08lx,%04lx,%s,%p,%p)\n",
-               (DWORD)hinst,dwVersion,debugstr_guid(riid),ppDI,punkOuter
-       );
-       if (IsEqualGUID(&IID_IDirectInputA,riid)) {
-         This = (IDirectInputAImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputAImpl));
-         This->ref = 1;
-         ICOM_VTBL(This) = &ddiavt;
-         *ppDI = This;
-         
-         return DI_OK;
-       }
-       
-       if (IsEqualGUID(&IID_IDirectInput7A,riid)) {
-         This = (IDirectInputAImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputAImpl));
-         This->ref = 1;
-         ICOM_VTBL(This) = (ICOM_VTABLE(IDirectInputA) *) &ddi7avt;
-         *ppDI = This;
-         
-         return DI_OK;
-       }
+       LPUNKNOWN punkOuter) 
+{
+    IDirectInputImpl* This;
+
+    TRACE("(%p,%04x,%s,%p,%p)\n", hinst, dwVersion, debugstr_guid(riid), ppDI, punkOuter);
 
-       return DIERR_OLDDIRECTINPUTVERSION;
+    if (IsEqualGUID( &IID_IDirectInputA,  riid ) ||
+        IsEqualGUID( &IID_IDirectInput2A, riid ) ||
+        IsEqualGUID( &IID_IDirectInput7A, riid ) ||
+        IsEqualGUID( &IID_IDirectInputW,  riid ) ||
+        IsEqualGUID( &IID_IDirectInput2W, riid ) ||
+        IsEqualGUID( &IID_IDirectInput7W, riid ) ||
+        IsEqualGUID( &IID_IDirectInput8A, riid ) ||
+        IsEqualGUID( &IID_IDirectInput8W, riid ))
+    {
+        if (!(This = HeapAlloc( GetProcessHeap(), 0, sizeof(IDirectInputImpl) )))
+            return DIERR_OUTOFMEMORY;
+    }
+    else
+        return DIERR_OLDDIRECTINPUTVERSION;
+
+    This->lpVtbl      = &ddi7avt;
+    This->lpVtbl7w    = &ddi7wvt;
+    This->lpVtbl8a    = &ddi8avt;
+    This->lpVtbl8w    = &ddi8wvt;
+    This->ref         = 0;
+    This->dwVersion   = dwVersion;
+    This->evsequence  = 1;
+
+    InitializeCriticalSection(&This->crit);
+    This->crit.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": IDirectInputImpl*->crit");
+
+    list_init( &This->devices_list );
+
+    /* Add self to the list of the IDirectInputs */
+    EnterCriticalSection( &dinput_hook_crit );
+    list_add_head( &direct_input_list, &This->entry );
+    LeaveCriticalSection( &dinput_hook_crit );
+
+    if (!check_hook_thread())
+    {
+        IUnknown_Release( (LPDIRECTINPUT7A)This );
+        return DIERR_GENERIC;
+    }
+
+    IDirectInput_QueryInterface( (IDirectInput7A *)This, riid, ppDI );
+    return DI_OK;
 }
 
 /******************************************************************************
@@ -129,198 +162,696 @@ HRESULT WINAPI DirectInputCreateEx(
  */
 HRESULT WINAPI DirectInputCreateA(HINSTANCE hinst, DWORD dwVersion, LPDIRECTINPUTA *ppDI, LPUNKNOWN punkOuter)
 {
-       IDirectInputAImpl* This;
-       TRACE("(0x%08lx,%04lx,%p,%p)\n",
-               (DWORD)hinst,dwVersion,ppDI,punkOuter
-       );
-       This = (IDirectInputAImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputAImpl));
-       This->ref = 1;
-       ICOM_VTBL(This) = &ddiavt;
-       *ppDI=(IDirectInputA*)This;
-       return 0;
+    return DirectInputCreateEx(hinst, dwVersion, &IID_IDirectInput7A, (LPVOID *)ppDI, punkOuter);
 }
+
+/******************************************************************************
+ *     DirectInputCreateW (DINPUT.@)
+ */
+HRESULT WINAPI DirectInputCreateW(HINSTANCE hinst, DWORD dwVersion, LPDIRECTINPUTW *ppDI, LPUNKNOWN punkOuter)
+{
+    return DirectInputCreateEx(hinst, dwVersion, &IID_IDirectInput7W, (LPVOID *)ppDI, punkOuter);
+}
+
+static const char *_dump_DIDEVTYPE_value(DWORD dwDevType) {
+    switch (dwDevType) {
+        case 0: return "All devices";
+       case DIDEVTYPE_MOUSE: return "DIDEVTYPE_MOUSE";
+       case DIDEVTYPE_KEYBOARD: return "DIDEVTYPE_KEYBOARD";
+       case DIDEVTYPE_JOYSTICK: return "DIDEVTYPE_JOYSTICK";
+       case DIDEVTYPE_DEVICE: return "DIDEVTYPE_DEVICE";
+       default: return "Unknown";
+    }
+}
+
+static void _dump_EnumDevices_dwFlags(DWORD dwFlags) {
+    if (TRACE_ON(dinput)) {
+       unsigned int   i;
+       static const struct {
+           DWORD       mask;
+           const char  *name;
+       } flags[] = {
+#define FE(x) { x, #x}
+           FE(DIEDFL_ALLDEVICES),
+           FE(DIEDFL_ATTACHEDONLY),
+           FE(DIEDFL_FORCEFEEDBACK),
+           FE(DIEDFL_INCLUDEALIASES),
+           FE(DIEDFL_INCLUDEPHANTOMS)
+#undef FE
+       };
+       TRACE(" flags: ");
+       if (dwFlags == 0) {
+           TRACE("DIEDFL_ALLDEVICES");
+           return;
+       }
+       for (i = 0; i < (sizeof(flags) / sizeof(flags[0])); i++)
+           if (flags[i].mask & dwFlags)
+               TRACE("%s ",flags[i].name);
+    }
+    TRACE("\n");
+}
+
+void _dump_diactionformatA(LPDIACTIONFORMATA lpdiActionFormat) {
+    int i;
+
+    FIXME("diaf.dwSize = %d\n", lpdiActionFormat->dwSize);
+    FIXME("diaf.dwActionSize = %d\n", lpdiActionFormat->dwActionSize);
+    FIXME("diaf.dwDataSize = %d\n", lpdiActionFormat->dwDataSize);
+    FIXME("diaf.dwNumActions = %d\n", lpdiActionFormat->dwNumActions);
+    FIXME("diaf.rgoAction = %p\n", lpdiActionFormat->rgoAction);
+    for (i=0;i<lpdiActionFormat->dwNumActions;i++) {
+        FIXME("diaf.rgoAction[%d]:\n", i);
+        FIXME("\tuAppData=%lx\n", lpdiActionFormat->rgoAction[i].uAppData);
+        FIXME("\tdwSemantics=%x\n", lpdiActionFormat->rgoAction[i].dwSemantics);
+        FIXME("\tdwFlags=%x\n", lpdiActionFormat->rgoAction[i].dwFlags);
+        FIXME("\tszActionName=%s\n", debugstr_a(lpdiActionFormat->rgoAction[i].u.lptszActionName));
+        FIXME("\tguidInstance=%s\n", debugstr_guid(&lpdiActionFormat->rgoAction[i].guidInstance));
+        FIXME("\tdwObjID=%x\n", lpdiActionFormat->rgoAction[i].dwObjID);
+        FIXME("\tdwHow=%x\n", lpdiActionFormat->rgoAction[i].dwHow);
+    }
+    FIXME("diaf.guidActionMap = %s\n", debugstr_guid(&lpdiActionFormat->guidActionMap));
+    FIXME("diaf.dwGenre = %d\n", lpdiActionFormat->dwGenre);
+    FIXME("diaf.dwBufferSize = %d\n", lpdiActionFormat->dwBufferSize);
+    FIXME("diaf.lAxisMin = %d\n", lpdiActionFormat->lAxisMin);
+    FIXME("diaf.lAxisMax = %d\n", lpdiActionFormat->lAxisMax);
+    FIXME("diaf.hInstString = %p\n", lpdiActionFormat->hInstString);
+    FIXME("diaf.ftTimeStamp ...\n");
+    FIXME("diaf.dwCRC = %x\n", lpdiActionFormat->dwCRC);
+    FIXME("diaf.tszActionMap = %s\n", debugstr_a(lpdiActionFormat->tszActionMap));
+}
+
 /******************************************************************************
  *     IDirectInputA_EnumDevices
  */
 static HRESULT WINAPI IDirectInputAImpl_EnumDevices(
        LPDIRECTINPUT7A iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKA lpCallback,
-       LPVOID pvRef, DWORD dwFlags
-)
+       LPVOID pvRef, DWORD dwFlags)
 {
-       ICOM_THIS(IDirectInputAImpl,iface);
-       DIDEVICEINSTANCEA devInstance;
-       int i;
+    IDirectInputImpl *This = (IDirectInputImpl *)iface;
+    DIDEVICEINSTANCEA devInstance;
+    int i, j, r;
+    
+    TRACE("(this=%p,0x%04x '%s',%p,%p,%04x)\n",
+         This, dwDevType, _dump_DIDEVTYPE_value(dwDevType),
+         lpCallback, pvRef, dwFlags);
+    _dump_EnumDevices_dwFlags(dwFlags);
 
-       TRACE("(this=%p,0x%04lx,%p,%p,%04lx)\n", This, dwDevType, lpCallback, pvRef, dwFlags);
+    for (i = 0; i < NB_DINPUT_DEVICES; i++) {
+        if (!dinput_devices[i]->enum_deviceA) continue;
+        for (j = 0, r = -1; r != 0; j++) {
+           devInstance.dwSize = sizeof(devInstance);
+           TRACE("  - checking device %d ('%s')\n", i, dinput_devices[i]->name);
+           if ((r = dinput_devices[i]->enum_deviceA(dwDevType, dwFlags, &devInstance, This->dwVersion, j))) {
+               if (lpCallback(&devInstance,pvRef) == DIENUM_STOP)
+                   return 0;
+           }
+       }
+    }
+    
+    return 0;
+}
+/******************************************************************************
+ *     IDirectInputW_EnumDevices
+ */
+static HRESULT WINAPI IDirectInputWImpl_EnumDevices(
+       LPDIRECTINPUT7W iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKW lpCallback,
+       LPVOID pvRef, DWORD dwFlags) 
+{
+    IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
+    DIDEVICEINSTANCEW devInstance;
+    int i, j, r;
+    
+    TRACE("(this=%p,0x%04x '%s',%p,%p,%04x)\n",
+         This, dwDevType, _dump_DIDEVTYPE_value(dwDevType),
+         lpCallback, pvRef, dwFlags);
+    _dump_EnumDevices_dwFlags(dwFlags);
 
-       for (i = 0; i < nrof_dinput_devices; i++) {
-         if (dinput_devices[i]->enum_device(dwDevType, dwFlags, &devInstance)) {
-           if (lpCallback(&devInstance,pvRef) == DIENUM_STOP)
-             return 0;
-         }
+    for (i = 0; i < NB_DINPUT_DEVICES; i++) {
+        if (!dinput_devices[i]->enum_deviceW) continue;
+        for (j = 0, r = -1; r != 0; j++) {
+           devInstance.dwSize = sizeof(devInstance);
+           TRACE("  - checking device %d ('%s')\n", i, dinput_devices[i]->name);
+           if ((r = dinput_devices[i]->enum_deviceW(dwDevType, dwFlags, &devInstance, This->dwVersion, j))) {
+               if (lpCallback(&devInstance,pvRef) == DIENUM_STOP)
+                   return 0;
+           }
        }
-       
-       return 0;
+    }
+    
+    return 0;
 }
 
 static ULONG WINAPI IDirectInputAImpl_AddRef(LPDIRECTINPUT7A iface)
 {
-       ICOM_THIS(IDirectInputAImpl,iface);
-       return ++(This->ref);
+    IDirectInputImpl *This = (IDirectInputImpl *)iface;
+    ULONG ref = InterlockedIncrement(&This->ref);
+
+    TRACE( "(%p) incrementing from %d\n", This, ref - 1);
+    return ref;
+}
+
+static ULONG WINAPI IDirectInputWImpl_AddRef(LPDIRECTINPUT7W iface)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
+    return IDirectInputAImpl_AddRef( (IDirectInput7A *)This );
 }
 
 static ULONG WINAPI IDirectInputAImpl_Release(LPDIRECTINPUT7A iface)
 {
-       ICOM_THIS(IDirectInputAImpl,iface);
-       if (!(--This->ref)) {
-               HeapFree(GetProcessHeap(),0,This);
-               return 0;
-       }
-       return This->ref;
+    IDirectInputImpl *This = (IDirectInputImpl *)iface;
+    ULONG ref = InterlockedDecrement( &This->ref );
+
+    TRACE( "(%p) releasing from %d\n", This, ref + 1 );
+
+    if (ref) return ref;
+
+    /* Remove self from the list of the IDirectInputs */
+    EnterCriticalSection( &dinput_hook_crit );
+    list_remove( &This->entry );
+    LeaveCriticalSection( &dinput_hook_crit );
+
+    check_hook_thread();
+
+    This->crit.DebugInfo->Spare[0] = 0;
+    DeleteCriticalSection( &This->crit );
+    HeapFree( GetProcessHeap(), 0, This );
+
+    return 0;
 }
 
-static HRESULT WINAPI IDirectInputAImpl_CreateDevice(
-       LPDIRECTINPUT7A iface,REFGUID rguid,LPDIRECTINPUTDEVICEA* pdev,
-       LPUNKNOWN punk
-) {
-       ICOM_THIS(IDirectInputAImpl,iface);
-       HRESULT ret_value = DIERR_DEVICENOTREG;
-       int i;
-       
-       TRACE("(this=%p,%s,%p,%p)\n",This,debugstr_guid(rguid),pdev,punk);
+static ULONG WINAPI IDirectInputWImpl_Release(LPDIRECTINPUT7W iface)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
+    return IDirectInputAImpl_Release( (IDirectInput7A *)This );
+}
 
-       /* Loop on all the devices to see if anyone matches the given GUID */
-       for (i = 0; i < nrof_dinput_devices; i++) {
-         HRESULT ret;
-         if ((ret = dinput_devices[i]->create_device(This, rguid, NULL, pdev)) == DI_OK)
-           return DI_OK;
+static HRESULT WINAPI IDirectInputAImpl_QueryInterface(LPDIRECTINPUT7A iface, REFIID riid, LPVOID *ppobj)
+{
+    IDirectInputImpl *This = (IDirectInputImpl *)iface;
 
-         if (ret == DIERR_NOINTERFACE)
-           ret_value = DIERR_NOINTERFACE;
-       }
+    TRACE( "(%p)->(%s,%p)\n", This, debugstr_guid(riid), ppobj );
+
+    if (IsEqualGUID( &IID_IUnknown, riid ) ||
+        IsEqualGUID( &IID_IDirectInputA,  riid ) ||
+        IsEqualGUID( &IID_IDirectInput2A, riid ) ||
+        IsEqualGUID( &IID_IDirectInput7A, riid ))
+    {
+        *ppobj = &This->lpVtbl;
+        IUnknown_AddRef( (IUnknown*)*ppobj );
+
+        return DI_OK;
+    }
+
+    if (IsEqualGUID( &IID_IDirectInputW,  riid ) ||
+        IsEqualGUID( &IID_IDirectInput2W, riid ) ||
+        IsEqualGUID( &IID_IDirectInput7W, riid ))
+    {
+        *ppobj = &This->lpVtbl7w;
+        IUnknown_AddRef( (IUnknown*)*ppobj );
+
+        return DI_OK;
+    }
 
-       return ret_value;
+    if (IsEqualGUID( &IID_IDirectInput8A, riid ))
+    {
+        *ppobj = &This->lpVtbl8a;
+        IUnknown_AddRef( (IUnknown*)*ppobj );
+
+        return DI_OK;
+    }
+
+    if (IsEqualGUID( &IID_IDirectInput8W, riid ))
+    {
+        *ppobj = &This->lpVtbl8w;
+        IUnknown_AddRef( (IUnknown*)*ppobj );
+
+        return DI_OK;
+    }
+
+    FIXME( "Unsupported interface !\n" );
+    return E_FAIL;
 }
 
-static HRESULT WINAPI IDirectInputAImpl_QueryInterface(
-       LPDIRECTINPUT7A iface,REFIID riid,LPVOID *ppobj
-) {
-       ICOM_THIS(IDirectInputAImpl,iface);
+static HRESULT WINAPI IDirectInputWImpl_QueryInterface(LPDIRECTINPUT7W iface, REFIID riid, LPVOID *ppobj)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
+    return IDirectInputAImpl_QueryInterface( (IDirectInput7A *)This, riid, ppobj );
+}
 
-       TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
-       if (IsEqualGUID(&IID_IUnknown,riid)) {
-               IDirectInputA_AddRef(iface);
-               *ppobj = This;
-               return 0;
-       }
-       if (IsEqualGUID(&IID_IDirectInputA,riid)) {
-               IDirectInputA_AddRef(iface);
-               *ppobj = This;
-               return 0;
-       }
-       TRACE("Unsupported interface !\n");
-       return E_FAIL;
+static HRESULT WINAPI IDirectInputAImpl_Initialize(LPDIRECTINPUT7A iface, HINSTANCE hinst, DWORD x) {
+       TRACE("(this=%p,%p,%x)\n",iface, hinst, x);
+       
+       /* Initialize can return: DIERR_BETADIRECTINPUTVERSION, DIERR_OLDDIRECTINPUTVERSION and DI_OK.
+        * Since we already initialized the device, return DI_OK. In the past we returned DIERR_ALREADYINITIALIZED
+        * which broke applications like Tomb Raider Legend because it isn't a legal return value.
+        */
+       return DI_OK;
 }
 
-static HRESULT WINAPI IDirectInputAImpl_Initialize(
-       LPDIRECTINPUT7A iface,HINSTANCE hinst,DWORD x
-) {
-       return DIERR_ALREADYINITIALIZED;
+static HRESULT WINAPI IDirectInputWImpl_Initialize(LPDIRECTINPUT7W iface, HINSTANCE hinst, DWORD x)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
+    return IDirectInputAImpl_Initialize( (IDirectInput7A *)This, hinst, x );
 }
 
-static HRESULT WINAPI IDirectInputAImpl_GetDeviceStatus(LPDIRECTINPUT7A iface,
-                                                       REFGUID rguid) {
-  ICOM_THIS(IDirectInputAImpl,iface);
-  
-  FIXME("(%p)->(%s): stub\n",This,debugstr_guid(rguid));
-  
-  return DI_OK;
+static HRESULT WINAPI IDirectInputAImpl_GetDeviceStatus(LPDIRECTINPUT7A iface, REFGUID rguid)
+{
+    IDirectInputImpl *This = (IDirectInputImpl *)iface;
+    HRESULT hr;
+    LPDIRECTINPUTDEVICEA device;
+
+    TRACE( "(%p)->(%s)\n", This, debugstr_guid(rguid) );
+
+    hr = IDirectInput_CreateDevice( iface, rguid, &device, NULL );
+    if (hr != DI_OK) return DI_NOTATTACHED;
+
+    IUnknown_Release( device );
+
+    return DI_OK;
+}
+
+static HRESULT WINAPI IDirectInputWImpl_GetDeviceStatus(LPDIRECTINPUT7W iface, REFGUID rguid)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
+    return IDirectInputAImpl_GetDeviceStatus( (IDirectInput7A *)This, rguid );
 }
 
 static HRESULT WINAPI IDirectInputAImpl_RunControlPanel(LPDIRECTINPUT7A iface,
                                                        HWND hwndOwner,
-                                                       DWORD dwFlags) {
-  ICOM_THIS(IDirectInputAImpl,iface);
-  FIXME("(%p)->(%08lx,%08lx): stub\n",This, (DWORD) hwndOwner, dwFlags);
-  
-  return DI_OK;
+                                                       DWORD dwFlags)
+{
+    IDirectInputImpl *This = (IDirectInputImpl *)iface;
+
+    FIXME( "(%p)->(%p,%08x): stub\n", This, hwndOwner, dwFlags );
+
+    return DI_OK;
+}
+
+static HRESULT WINAPI IDirectInputWImpl_RunControlPanel(LPDIRECTINPUT7W iface, HWND hwndOwner, DWORD dwFlags)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
+    return IDirectInputAImpl_RunControlPanel( (IDirectInput7A *)This, hwndOwner, dwFlags );
+}
+
+static HRESULT WINAPI IDirectInput2AImpl_FindDevice(LPDIRECTINPUT7A iface, REFGUID rguid,
+                                                   LPCSTR pszName, LPGUID pguidInstance)
+{
+    IDirectInputImpl *This = (IDirectInputImpl *)iface;
+
+    FIXME( "(%p)->(%s, %s, %p): stub\n", This, debugstr_guid(rguid), pszName, pguidInstance );
+
+    return DI_OK;
 }
 
-static HRESULT WINAPI IDirectInput2AImpl_FindDevice(LPDIRECTINPUT2A iface, REFGUID rguid,
-                                                   LPCSTR pszName, LPGUID pguidInstance) {
-  ICOM_THIS(IDirectInputAImpl,iface);
-  FIXME("(%p)->(%s, %s, %p): stub\n", This, debugstr_guid(rguid), pszName, pguidInstance);
-  
-  return DI_OK;
+static HRESULT WINAPI IDirectInput2WImpl_FindDevice(LPDIRECTINPUT7W iface, REFGUID rguid,
+                                                   LPCWSTR pszName, LPGUID pguidInstance)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
+
+    FIXME( "(%p)->(%s, %s, %p): stub\n", This, debugstr_guid(rguid), debugstr_w(pszName), pguidInstance );
+
+    return DI_OK;
 }
 
 static HRESULT WINAPI IDirectInput7AImpl_CreateDeviceEx(LPDIRECTINPUT7A iface, REFGUID rguid,
                                                        REFIID riid, LPVOID* pvOut, LPUNKNOWN lpUnknownOuter)
 {
-  ICOM_THIS(IDirectInputAImpl,iface);
+  IDirectInputImpl *This = (IDirectInputImpl *)iface;
   HRESULT ret_value = DIERR_DEVICENOTREG;
   int i;
-       
+
   TRACE("(%p)->(%s, %s, %p, %p)\n", This, debugstr_guid(rguid), debugstr_guid(riid), pvOut, lpUnknownOuter);
 
+  if (!rguid || !pvOut) return E_POINTER;
+
   /* Loop on all the devices to see if anyone matches the given GUID */
-  for (i = 0; i < nrof_dinput_devices; i++) {
+  for (i = 0; i < NB_DINPUT_DEVICES; i++) {
     HRESULT ret;
-    if ((ret = dinput_devices[i]->create_device(This, rguid, riid, (LPDIRECTINPUTDEVICEA*) pvOut)) == DI_OK)
+
+    if (!dinput_devices[i]->create_deviceA) continue;
+    if ((ret = dinput_devices[i]->create_deviceA(This, rguid, riid, (LPDIRECTINPUTDEVICEA*) pvOut)) == DI_OK)
+    {
+      EnterCriticalSection( &This->crit );
+      list_add_tail( &This->devices_list, &(*(IDirectInputDevice2AImpl**)pvOut)->entry );
+      LeaveCriticalSection( &This->crit );
       return DI_OK;
-    
+    }
+
     if (ret == DIERR_NOINTERFACE)
       ret_value = DIERR_NOINTERFACE;
   }
-  
+
+  if (ret_value == DIERR_NOINTERFACE)
+  {
+    WARN("invalid device GUID %s\n", debugstr_guid(rguid));
+  }
+
   return ret_value;
 }
 
-#if !defined(__STRICT_ANSI__) && defined(__GNUC__)
-# define XCAST(fun)    (typeof(ddiavt.fun))
-#else
-# define XCAST(fun)    (void*)
-#endif
+static HRESULT WINAPI IDirectInput7WImpl_CreateDeviceEx(LPDIRECTINPUT7W iface, REFGUID rguid,
+                                                       REFIID riid, LPVOID* pvOut, LPUNKNOWN lpUnknownOuter)
+{
+  IDirectInputImpl *This = impl_from_IDirectInput7W( iface );
+  HRESULT ret_value = DIERR_DEVICENOTREG;
+  int i;
+
+  TRACE("(%p)->(%s, %s, %p, %p)\n", This, debugstr_guid(rguid), debugstr_guid(riid), pvOut, lpUnknownOuter);
+
+  if (!rguid || !pvOut) return E_POINTER;
+
+  /* Loop on all the devices to see if anyone matches the given GUID */
+  for (i = 0; i < NB_DINPUT_DEVICES; i++) {
+    HRESULT ret;
+
+    if (!dinput_devices[i]->create_deviceW) continue;
+    if ((ret = dinput_devices[i]->create_deviceW(This, rguid, riid, (LPDIRECTINPUTDEVICEW*) pvOut)) == DI_OK)
+    {
+      EnterCriticalSection( &This->crit );
+      list_add_tail( &This->devices_list, &(*(IDirectInputDevice2AImpl**)pvOut)->entry );
+      LeaveCriticalSection( &This->crit );
+      return DI_OK;
+    }
+
+    if (ret == DIERR_NOINTERFACE)
+      ret_value = DIERR_NOINTERFACE;
+  }
+
+  return ret_value;
+}
+
+static HRESULT WINAPI IDirectInputAImpl_CreateDevice(LPDIRECTINPUT7A iface, REFGUID rguid,
+                                                     LPDIRECTINPUTDEVICEA* pdev, LPUNKNOWN punk)
+{
+    return IDirectInput7AImpl_CreateDeviceEx(iface, rguid, NULL, (LPVOID*)pdev, punk);
+}
+
+static HRESULT WINAPI IDirectInputWImpl_CreateDevice(LPDIRECTINPUT7W iface, REFGUID rguid,
+                                                     LPDIRECTINPUTDEVICEW* pdev, LPUNKNOWN punk)
+{
+    return IDirectInput7WImpl_CreateDeviceEx(iface, rguid, NULL, (LPVOID*)pdev, punk);
+}
+
+/*******************************************************************************
+ *      DirectInput8
+ */
+
+static ULONG WINAPI IDirectInput8AImpl_AddRef(LPDIRECTINPUT8A iface)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
+    return IDirectInputAImpl_AddRef( (IDirectInput7A *)This );
+}
+
+static ULONG WINAPI IDirectInput8WImpl_AddRef(LPDIRECTINPUT8W iface)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
+    return IDirectInputAImpl_AddRef( (IDirectInput7A *)This );
+}
+
+static HRESULT WINAPI IDirectInput8AImpl_QueryInterface(LPDIRECTINPUT8A iface, REFIID riid, LPVOID *ppobj)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
+    return IDirectInputAImpl_QueryInterface( (IDirectInput7A *)This, riid, ppobj );
+}
+
+static HRESULT WINAPI IDirectInput8WImpl_QueryInterface(LPDIRECTINPUT8W iface, REFIID riid, LPVOID *ppobj)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
+    return IDirectInputAImpl_QueryInterface( (IDirectInput7A *)This, riid, ppobj );
+}
+
+static ULONG WINAPI IDirectInput8AImpl_Release(LPDIRECTINPUT8A iface)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
+    return IDirectInputAImpl_Release( (IDirectInput7A *)This );
+}
+
+static ULONG WINAPI IDirectInput8WImpl_Release(LPDIRECTINPUT8W iface)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
+    return IDirectInputAImpl_Release( (IDirectInput7A *)This );
+}
+
+static HRESULT WINAPI IDirectInput8AImpl_CreateDevice(LPDIRECTINPUT8A iface, REFGUID rguid,
+                                                      LPDIRECTINPUTDEVICE8A* pdev, LPUNKNOWN punk)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
+    return IDirectInput7AImpl_CreateDeviceEx( (IDirectInput7A *)This, rguid, NULL, (LPVOID*)pdev, punk );
+}
+
+static HRESULT WINAPI IDirectInput8WImpl_CreateDevice(LPDIRECTINPUT8W iface, REFGUID rguid,
+                                                      LPDIRECTINPUTDEVICE8W* pdev, LPUNKNOWN punk)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
+    return IDirectInput7WImpl_CreateDeviceEx( IDirectInput7W_from_impl( This ), rguid, NULL, (LPVOID*)pdev, punk );
+}
+
+static HRESULT WINAPI IDirectInput8AImpl_EnumDevices(LPDIRECTINPUT8A iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKA lpCallback,
+                                                     LPVOID pvRef, DWORD dwFlags)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
+    return IDirectInputAImpl_EnumDevices( (IDirectInput7A *)This, dwDevType, lpCallback, pvRef, dwFlags );
+}
+
+static HRESULT WINAPI IDirectInput8WImpl_EnumDevices(LPDIRECTINPUT8W iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKW lpCallback,
+                                                     LPVOID pvRef, DWORD dwFlags)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
+    return IDirectInputWImpl_EnumDevices( IDirectInput7W_from_impl( This ), dwDevType, lpCallback, pvRef, dwFlags );
+}
 
-static ICOM_VTABLE(IDirectInputA) ddiavt = 
+static HRESULT WINAPI IDirectInput8AImpl_GetDeviceStatus(LPDIRECTINPUT8A iface, REFGUID rguid)
 {
-       ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
-       XCAST(QueryInterface)IDirectInputAImpl_QueryInterface,
-       XCAST(AddRef)IDirectInputAImpl_AddRef,
-       XCAST(Release)IDirectInputAImpl_Release,
-       XCAST(CreateDevice)IDirectInputAImpl_CreateDevice,
-       XCAST(EnumDevices)IDirectInputAImpl_EnumDevices,
-       XCAST(GetDeviceStatus)IDirectInputAImpl_GetDeviceStatus,
-       XCAST(RunControlPanel)IDirectInputAImpl_RunControlPanel,
-       XCAST(Initialize)IDirectInputAImpl_Initialize
+    IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
+    return IDirectInputAImpl_GetDeviceStatus( (IDirectInput7A *)This, rguid );
+}
+
+static HRESULT WINAPI IDirectInput8WImpl_GetDeviceStatus(LPDIRECTINPUT8W iface, REFGUID rguid)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
+    return IDirectInputAImpl_GetDeviceStatus( (IDirectInput7A *)This, rguid );
+}
+
+static HRESULT WINAPI IDirectInput8AImpl_RunControlPanel(LPDIRECTINPUT8A iface, HWND hwndOwner, DWORD dwFlags)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
+    return IDirectInputAImpl_RunControlPanel( (IDirectInput7A *)This, hwndOwner, dwFlags );
+}
+
+static HRESULT WINAPI IDirectInput8WImpl_RunControlPanel(LPDIRECTINPUT8W iface, HWND hwndOwner, DWORD dwFlags)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
+    return IDirectInputAImpl_RunControlPanel( (IDirectInput7A *)This, hwndOwner, dwFlags );
+}
+
+static HRESULT WINAPI IDirectInput8AImpl_Initialize(LPDIRECTINPUT8A iface, HINSTANCE hinst, DWORD x)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
+    return IDirectInputAImpl_Initialize( (IDirectInput7A *)This, hinst, x );
+}
+
+static HRESULT WINAPI IDirectInput8WImpl_Initialize(LPDIRECTINPUT8W iface, HINSTANCE hinst, DWORD x)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
+    return IDirectInputAImpl_Initialize( (IDirectInput7A *)This, hinst, x );
+}
+
+static HRESULT WINAPI IDirectInput8AImpl_FindDevice(LPDIRECTINPUT8A iface, REFGUID rguid, LPCSTR pszName, LPGUID pguidInstance)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
+    return IDirectInput2AImpl_FindDevice( (IDirectInput7A *)This, rguid, pszName, pguidInstance );
+}
+
+static HRESULT WINAPI IDirectInput8WImpl_FindDevice(LPDIRECTINPUT8W iface, REFGUID rguid, LPCWSTR pszName, LPGUID pguidInstance)
+{
+    IDirectInput7W *This = IDirectInput7W_from_impl( impl_from_IDirectInput8W( iface ) );
+    return IDirectInput2WImpl_FindDevice( This, rguid, pszName, pguidInstance );
+}
+
+static HRESULT WINAPI IDirectInput8AImpl_EnumDevicesBySemantics(
+      LPDIRECTINPUT8A iface, LPCSTR ptszUserName, LPDIACTIONFORMATA lpdiActionFormat,
+      LPDIENUMDEVICESBYSEMANTICSCBA lpCallback,
+      LPVOID pvRef, DWORD dwFlags
+)
+{
+    IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
+
+    FIXME("(this=%p,%s,%p,%p,%p,%04x): stub\n", This, ptszUserName, lpdiActionFormat,
+          lpCallback, pvRef, dwFlags);
+#define X(x) if (dwFlags & x) FIXME("\tdwFlags |= "#x"\n");
+       X(DIEDBSFL_ATTACHEDONLY)
+       X(DIEDBSFL_THISUSER)
+       X(DIEDBSFL_FORCEFEEDBACK)
+       X(DIEDBSFL_AVAILABLEDEVICES)
+       X(DIEDBSFL_MULTIMICEKEYBOARDS)
+       X(DIEDBSFL_NONGAMINGDEVICES)
+#undef X
+
+    _dump_diactionformatA(lpdiActionFormat);
+
+    return DI_OK;
+}
+
+static HRESULT WINAPI IDirectInput8WImpl_EnumDevicesBySemantics(
+      LPDIRECTINPUT8W iface, LPCWSTR ptszUserName, LPDIACTIONFORMATW lpdiActionFormat,
+      LPDIENUMDEVICESBYSEMANTICSCBW lpCallback,
+      LPVOID pvRef, DWORD dwFlags
+)
+{
+      IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
+
+      FIXME("(this=%p,%s,%p,%p,%p,%04x): stub\n", This, debugstr_w(ptszUserName), lpdiActionFormat,
+            lpCallback, pvRef, dwFlags);
+      return 0;
+}
+
+static HRESULT WINAPI IDirectInput8AImpl_ConfigureDevices(
+      LPDIRECTINPUT8A iface, LPDICONFIGUREDEVICESCALLBACK lpdiCallback,
+      LPDICONFIGUREDEVICESPARAMSA lpdiCDParams, DWORD dwFlags, LPVOID pvRefData
+)
+{
+      IDirectInputImpl *This = impl_from_IDirectInput8A( iface );
+
+      FIXME("(this=%p,%p,%p,%04x,%p): stub\n", This, lpdiCallback, lpdiCDParams,
+            dwFlags, pvRefData);
+      return 0;
+}
+
+static HRESULT WINAPI IDirectInput8WImpl_ConfigureDevices(
+      LPDIRECTINPUT8W iface, LPDICONFIGUREDEVICESCALLBACK lpdiCallback,
+      LPDICONFIGUREDEVICESPARAMSW lpdiCDParams, DWORD dwFlags, LPVOID pvRefData
+)
+{
+      IDirectInputImpl *This = impl_from_IDirectInput8W( iface );
+
+      FIXME("(this=%p,%p,%p,%04x,%p): stub\n", This, lpdiCallback, lpdiCDParams,
+            dwFlags, pvRefData);
+      return 0;
+}
+
+static const IDirectInput7AVtbl ddi7avt = {
+    IDirectInputAImpl_QueryInterface,
+    IDirectInputAImpl_AddRef,
+    IDirectInputAImpl_Release,
+    IDirectInputAImpl_CreateDevice,
+    IDirectInputAImpl_EnumDevices,
+    IDirectInputAImpl_GetDeviceStatus,
+    IDirectInputAImpl_RunControlPanel,
+    IDirectInputAImpl_Initialize,
+    IDirectInput2AImpl_FindDevice,
+    IDirectInput7AImpl_CreateDeviceEx
+};
+
+static const IDirectInput7WVtbl ddi7wvt = {
+    IDirectInputWImpl_QueryInterface,
+    IDirectInputWImpl_AddRef,
+    IDirectInputWImpl_Release,
+    IDirectInputWImpl_CreateDevice,
+    IDirectInputWImpl_EnumDevices,
+    IDirectInputWImpl_GetDeviceStatus,
+    IDirectInputWImpl_RunControlPanel,
+    IDirectInputWImpl_Initialize,
+    IDirectInput2WImpl_FindDevice,
+    IDirectInput7WImpl_CreateDeviceEx
+};
+
+static const IDirectInput8AVtbl ddi8avt = {
+    IDirectInput8AImpl_QueryInterface,
+    IDirectInput8AImpl_AddRef,
+    IDirectInput8AImpl_Release,
+    IDirectInput8AImpl_CreateDevice,
+    IDirectInput8AImpl_EnumDevices,
+    IDirectInput8AImpl_GetDeviceStatus,
+    IDirectInput8AImpl_RunControlPanel,
+    IDirectInput8AImpl_Initialize,
+    IDirectInput8AImpl_FindDevice,
+    IDirectInput8AImpl_EnumDevicesBySemantics,
+    IDirectInput8AImpl_ConfigureDevices
 };
-#undef XCAST
-
-#if !defined(__STRICT_ANSI__) && defined(__GNUC__)
-# define XCAST(fun)    (typeof(ddi7avt.fun))
-#else
-# define XCAST(fun)    (void*)
-#endif
-
-static ICOM_VTABLE(IDirectInput7A) ddi7avt = {
-       ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
-       XCAST(QueryInterface)IDirectInputAImpl_QueryInterface,
-       XCAST(AddRef)IDirectInputAImpl_AddRef,
-       XCAST(Release)IDirectInputAImpl_Release,
-       XCAST(CreateDevice)IDirectInputAImpl_CreateDevice,
-       XCAST(EnumDevices)IDirectInputAImpl_EnumDevices,
-       XCAST(GetDeviceStatus)IDirectInputAImpl_GetDeviceStatus,
-       XCAST(RunControlPanel)IDirectInputAImpl_RunControlPanel,
-       XCAST(Initialize)IDirectInputAImpl_Initialize,
-       XCAST(FindDevice)IDirectInput2AImpl_FindDevice,
-       IDirectInput7AImpl_CreateDeviceEx
+
+static const IDirectInput8WVtbl ddi8wvt = {
+    IDirectInput8WImpl_QueryInterface,
+    IDirectInput8WImpl_AddRef,
+    IDirectInput8WImpl_Release,
+    IDirectInput8WImpl_CreateDevice,
+    IDirectInput8WImpl_EnumDevices,
+    IDirectInput8WImpl_GetDeviceStatus,
+    IDirectInput8WImpl_RunControlPanel,
+    IDirectInput8WImpl_Initialize,
+    IDirectInput8WImpl_FindDevice,
+    IDirectInput8WImpl_EnumDevicesBySemantics,
+    IDirectInput8WImpl_ConfigureDevices
 };
-#undef XCAST
+
+/*******************************************************************************
+ * DirectInput ClassFactory
+ */
+typedef struct
+{
+    /* IUnknown fields */
+    const IClassFactoryVtbl    *lpVtbl;
+    LONG                        ref;
+} IClassFactoryImpl;
+
+static HRESULT WINAPI DICF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
+       IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
+
+       FIXME("(%p)->(%s,%p),stub!\n",This,debugstr_guid(riid),ppobj);
+       return E_NOINTERFACE;
+}
+
+static ULONG WINAPI DICF_AddRef(LPCLASSFACTORY iface) {
+       IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
+       return InterlockedIncrement(&(This->ref));
+}
+
+static ULONG WINAPI DICF_Release(LPCLASSFACTORY iface) {
+       IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
+       /* static class, won't be  freed */
+       return InterlockedDecrement(&(This->ref));
+}
+
+static HRESULT WINAPI DICF_CreateInstance(
+       LPCLASSFACTORY iface,LPUNKNOWN pOuter,REFIID riid,LPVOID *ppobj
+) {
+       IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
+
+       TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj);
+       if ( IsEqualGUID( &IID_IDirectInputA, riid ) ||
+            IsEqualGUID( &IID_IDirectInputW, riid ) ||
+            IsEqualGUID( &IID_IDirectInput2A, riid ) ||
+            IsEqualGUID( &IID_IDirectInput2W, riid ) ||
+            IsEqualGUID( &IID_IDirectInput7A, riid ) ||
+            IsEqualGUID( &IID_IDirectInput7W, riid ) ||
+            IsEqualGUID( &IID_IDirectInput8A, riid ) ||
+            IsEqualGUID( &IID_IDirectInput8W, riid ) ) {
+               /* FIXME: reuse already created dinput if present? */
+               return DirectInputCreateEx(0,0,riid,ppobj,pOuter);
+       }
+
+       FIXME("(%p,%p,%s,%p) Interface not found!\n",This,pOuter,debugstr_guid(riid),ppobj);    
+       return E_NOINTERFACE;
+}
+
+static HRESULT WINAPI DICF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
+       IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
+       FIXME("(%p)->(%d),stub!\n",This,dolock);
+       return S_OK;
+}
+
+static const IClassFactoryVtbl DICF_Vtbl = {
+       DICF_QueryInterface,
+       DICF_AddRef,
+       DICF_Release,
+       DICF_CreateInstance,
+       DICF_LockServer
+};
+static IClassFactoryImpl DINPUT_CF = {&DICF_Vtbl, 1 };
 
 /***********************************************************************
  *             DllCanUnloadNow (DINPUT.@)
  */
-HRESULT WINAPI DINPUT_DllCanUnloadNow(void)
+HRESULT WINAPI DllCanUnloadNow(void)
 {
     FIXME("(void): stub\n");
 
@@ -330,31 +861,236 @@ HRESULT WINAPI DINPUT_DllCanUnloadNow(void)
 /***********************************************************************
  *             DllGetClassObject (DINPUT.@)
  */
-HRESULT WINAPI DINPUT_DllGetClassObject(REFCLSID rclsid, REFIID riid,
-                                       LPVOID *ppv)
+HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv)
 {
-    FIXME("(%p, %p, %p): stub\n", debugstr_guid(rclsid), 
-         debugstr_guid(riid), ppv);
+    TRACE("(%s,%s,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
+    if ( IsEqualCLSID( &IID_IClassFactory, riid ) ) {
+       *ppv = (LPVOID)&DINPUT_CF;
+       IClassFactory_AddRef((IClassFactory*)*ppv);
+    return S_OK;
+    }
 
+    FIXME("(%s,%s,%p): no interface found.\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
     return CLASS_E_CLASSNOTAVAILABLE;
 }
 
-/***********************************************************************
- *             DllRegisterServer (DINPUT.@)
+/******************************************************************************
+ *     DInput hook thread
  */
-HRESULT WINAPI DINPUT_DllRegisterServer(void)
+
+static LRESULT CALLBACK LL_hook_proc( int code, WPARAM wparam, LPARAM lparam )
 {
-    FIXME("(void): stub\n");
+    IDirectInputImpl *dinput;
 
-    return S_OK;
+    if (code != HC_ACTION) return CallNextHookEx( 0, code, wparam, lparam );
+
+    EnterCriticalSection( &dinput_hook_crit );
+    LIST_FOR_EACH_ENTRY( dinput, &direct_input_list, IDirectInputImpl, entry )
+    {
+        IDirectInputDevice2AImpl *dev;
+
+        EnterCriticalSection( &dinput->crit );
+        LIST_FOR_EACH_ENTRY( dev, &dinput->devices_list, IDirectInputDevice2AImpl, entry )
+            if (dev->acquired && dev->event_proc)
+            {
+                TRACE("calling %p->%p (%lx %lx)\n", dev, dev->event_proc, wparam, lparam);
+                dev->event_proc( (LPDIRECTINPUTDEVICE8A)dev, wparam, lparam );
+            }
+        LeaveCriticalSection( &dinput->crit );
+    }
+    LeaveCriticalSection( &dinput_hook_crit );
+
+    return CallNextHookEx( 0, code, wparam, lparam );
 }
 
-/***********************************************************************
- *             DllUnregisterServer (DINPUT.@)
- */
-HRESULT WINAPI DINPUT_DllUnregisterServer(void)
+static LRESULT CALLBACK callwndproc_proc( int code, WPARAM wparam, LPARAM lparam )
 {
-    FIXME("(void): stub\n");
+    CWPSTRUCT *msg = (CWPSTRUCT *)lparam;
+    IDirectInputImpl *dinput;
+    HWND foreground;
 
-    return S_OK;
+    if (code != HC_ACTION || (msg->message != WM_KILLFOCUS &&
+        msg->message != WM_ACTIVATEAPP && msg->message != WM_ACTIVATE))
+        return CallNextHookEx( 0, code, wparam, lparam );
+
+    foreground = GetForegroundWindow();
+
+    EnterCriticalSection( &dinput_hook_crit );
+
+    LIST_FOR_EACH_ENTRY( dinput, &direct_input_list, IDirectInputImpl, entry )
+    {
+        IDirectInputDevice2AImpl *dev;
+
+        EnterCriticalSection( &dinput->crit );
+        LIST_FOR_EACH_ENTRY( dev, &dinput->devices_list, IDirectInputDevice2AImpl, entry )
+        {
+            if (!dev->acquired) continue;
+
+            if (msg->hwnd == dev->win && msg->hwnd != foreground)
+            {
+                TRACE( "%p window is not foreground - unacquiring %p\n", dev->win, dev );
+                IDirectInputDevice_Unacquire( (LPDIRECTINPUTDEVICE8A)dev );
+            }
+        }
+        LeaveCriticalSection( &dinput->crit );
+    }
+    LeaveCriticalSection( &dinput_hook_crit );
+
+    return CallNextHookEx( 0, code, wparam, lparam );
+}
+
+static DWORD WINAPI hook_thread_proc(void *param)
+{
+    static HHOOK kbd_hook, mouse_hook;
+    MSG msg;
+
+    /* Force creation of the message queue */
+    PeekMessageW( &msg, 0, 0, 0, PM_NOREMOVE );
+    SetEvent(*(LPHANDLE)param);
+
+    while (GetMessageW( &msg, 0, 0, 0 ))
+    {
+        UINT kbd_cnt = 0, mice_cnt = 0;
+
+        if (msg.message == WM_USER+0x10)
+        {
+            IDirectInputImpl *dinput;
+
+            TRACE( "Processing hook change notification lp:%ld\n", msg.lParam );
+
+            if (!msg.wParam && !msg.lParam)
+            {
+                if (kbd_hook) UnhookWindowsHookEx( kbd_hook );
+                if (mouse_hook) UnhookWindowsHookEx( mouse_hook );
+                kbd_hook = mouse_hook = NULL;
+                break;
+            }
+
+            EnterCriticalSection( &dinput_hook_crit );
+
+            /* Count acquired keyboards and mice*/
+            LIST_FOR_EACH_ENTRY( dinput, &direct_input_list, IDirectInputImpl, entry )
+            {
+                IDirectInputDevice2AImpl *dev;
+
+                EnterCriticalSection( &dinput->crit );
+                LIST_FOR_EACH_ENTRY( dev, &dinput->devices_list, IDirectInputDevice2AImpl, entry )
+                {
+                    if (!dev->acquired || !dev->event_proc) continue;
+
+                    if (IsEqualGUID( &dev->guid, &GUID_SysKeyboard ) ||
+                        IsEqualGUID( &dev->guid, &DInput_Wine_Keyboard_GUID ))
+                        kbd_cnt++;
+                    else
+                        if (IsEqualGUID( &dev->guid, &GUID_SysMouse ) ||
+                            IsEqualGUID( &dev->guid, &DInput_Wine_Mouse_GUID ))
+                            mice_cnt++;
+                }
+                LeaveCriticalSection( &dinput->crit );
+            }
+            LeaveCriticalSection( &dinput_hook_crit );
+
+            if (kbd_cnt && !kbd_hook)
+                kbd_hook = SetWindowsHookExW( WH_KEYBOARD_LL, LL_hook_proc, DINPUT_instance, 0 );
+            else if (!kbd_cnt && kbd_hook)
+            {
+                UnhookWindowsHookEx( kbd_hook );
+                kbd_hook = NULL;
+            }
+
+            if (mice_cnt && !mouse_hook)
+                mouse_hook = SetWindowsHookExW( WH_MOUSE_LL, LL_hook_proc, DINPUT_instance, 0 );
+            else if (!mice_cnt && mouse_hook)
+            {
+                UnhookWindowsHookEx( mouse_hook );
+                mouse_hook = NULL;
+            }
+        }
+        TranslateMessage(&msg);
+        DispatchMessageW(&msg);
+    }
+
+    return 0;
+}
+
+static DWORD hook_thread_id;
+
+static CRITICAL_SECTION_DEBUG dinput_critsect_debug =
+{
+    0, 0, &dinput_hook_crit,
+    { &dinput_critsect_debug.ProcessLocksList, &dinput_critsect_debug.ProcessLocksList },
+      0, 0, { (DWORD_PTR)(__FILE__ ": dinput_hook_crit") }
+};
+static CRITICAL_SECTION dinput_hook_crit = { &dinput_critsect_debug, -1, 0, 0, 0, 0 };
+
+static BOOL check_hook_thread(void)
+{
+    static HANDLE hook_thread;
+
+    EnterCriticalSection(&dinput_hook_crit);
+
+    TRACE("IDirectInputs left: %d\n", list_count(&direct_input_list));
+    if (!list_empty(&direct_input_list) && !hook_thread)
+    {
+        HANDLE event;
+
+        event = CreateEventW(NULL, FALSE, FALSE, NULL);
+        hook_thread = CreateThread(NULL, 0, hook_thread_proc, &event, 0, &hook_thread_id);
+        if (event && hook_thread)
+        {
+            HANDLE handles[2];
+            handles[0] = event;
+            handles[1] = hook_thread;
+            WaitForMultipleObjects(2, handles, FALSE, INFINITE);
+        }
+        LeaveCriticalSection(&dinput_hook_crit);
+        CloseHandle(event);
+    }
+    else if (list_empty(&direct_input_list) && hook_thread)
+    {
+        DWORD tid = hook_thread_id;
+
+        hook_thread_id = 0;
+        PostThreadMessageW(tid, WM_USER+0x10, 0, 0);
+        LeaveCriticalSection(&dinput_hook_crit);
+
+        /* wait for hook thread to exit */
+        WaitForSingleObject(hook_thread, INFINITE);
+        CloseHandle(hook_thread);
+        hook_thread = NULL;
+    }
+    else
+        LeaveCriticalSection(&dinput_hook_crit);
+
+    return hook_thread_id != 0;
+}
+
+void check_dinput_hooks(LPDIRECTINPUTDEVICE8A iface)
+{
+    static HHOOK callwndproc_hook;
+    static ULONG foreground_cnt;
+    IDirectInputDevice2AImpl *dev = (IDirectInputDevice2AImpl *)iface;
+
+    EnterCriticalSection(&dinput_hook_crit);
+
+    if (dev->dwCoopLevel & DISCL_FOREGROUND)
+    {
+        if (dev->acquired)
+            foreground_cnt++;
+        else
+            foreground_cnt--;
+    }
+
+    if (foreground_cnt && !callwndproc_hook)
+        callwndproc_hook = SetWindowsHookExW( WH_CALLWNDPROC, callwndproc_proc,
+                                              DINPUT_instance, GetCurrentThreadId() );
+    else if (!foreground_cnt && callwndproc_hook)
+    {
+        UnhookWindowsHookEx( callwndproc_hook );
+        callwndproc_hook = NULL;
+    }
+
+    PostThreadMessageW( hook_thread_id, WM_USER+0x10, 1, 0 );
+
+    LeaveCriticalSection(&dinput_hook_crit);
 }