| /* DirectInput |
| * |
| * Copyright 1998 Marcus Meissner |
| */ |
| /* Status: |
| * |
| * - Tomb Raider 2 Demo: |
| * Playable using keyboard only. |
| * - WingCommander Prophecy Demo: |
| * Doesn't get Input Focus. |
| * |
| * 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.) |
| */ |
| |
| #include "config.h" |
| #include <string.h> |
| #include <unistd.h> |
| #include <assert.h> |
| #include <X11/Xlib.h> |
| #include <sys/signal.h> |
| |
| #include "windows.h" |
| #include "winerror.h" |
| #include "shell.h" |
| #include "ole.h" |
| #include "compobj.h" |
| #include "interfaces.h" |
| #include "gdi.h" |
| #include "heap.h" |
| #include "win.h" |
| #include "dinput.h" |
| #include "debug.h" |
| |
| extern BYTE InputKeyStateTable[256]; |
| extern BYTE vkey2scode[512]; |
| |
| static IDirectInputA_VTable ddiavt; |
| static IDirectInputDeviceA_VTable SysKeyboardAvt; |
| static IDirectInputDeviceA_VTable SysMouseAvt; |
| |
| /****************************************************************************** |
| * DirectInputCreate32A |
| */ |
| HRESULT WINAPI DirectInputCreate32A(HINSTANCE32 hinst, DWORD dwVersion, LPDIRECTINPUT32A *ppDI, LPUNKNOWN punkOuter) { |
| TRACE(dinput, "(0x%08lx,%04lx,%p,%p)\n", |
| (DWORD)hinst,dwVersion,ppDI,punkOuter |
| ); |
| (*ppDI) = (LPDIRECTINPUT32A)HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInput32A)); |
| (*ppDI)->ref = 1; |
| (*ppDI)->lpvtbl = &ddiavt; |
| return 0; |
| } |
| /****************************************************************************** |
| * IDirectInputA_EnumDevices |
| */ |
| static HRESULT WINAPI IDirectInputA_EnumDevices( |
| LPDIRECTINPUT32A this,DWORD dwFlags,LPDIENUMDEVICESCALLBACK32A cb, |
| LPVOID context,DWORD x |
| ) { |
| FIXME(dinput,"(this=%p,0x%08lx,%p,%p,0x%08lx): stub\n",this,dwFlags,cb,context,x); |
| return 0; |
| } |
| |
| static ULONG WINAPI IDirectInputA_AddRef(LPDIRECTINPUT32A this) { |
| return ++(this->ref); |
| } |
| |
| static ULONG WINAPI IDirectInputA_Release(LPDIRECTINPUT32A this) { |
| if (!(--this->ref)) { |
| HeapFree(GetProcessHeap(),0,this); |
| return 0; |
| } |
| return this->ref; |
| } |
| |
| static HRESULT WINAPI IDirectInputA_CreateDevice( |
| LPDIRECTINPUT32A this,REFGUID rguid,LPDIRECTINPUTDEVICE32A* pdev, |
| LPUNKNOWN punk |
| ) { |
| char xbuf[50]; |
| |
| WINE_StringFromCLSID(rguid,xbuf); |
| FIXME(dinput,"(this=%p,%s,%p,%p): stub\n",this,xbuf,pdev,punk); |
| if (!memcmp(&GUID_SysKeyboard,rguid,sizeof(GUID_SysKeyboard))) { |
| *pdev = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(SysKeyboard32A)); |
| (*pdev)->ref = 1; |
| (*pdev)->lpvtbl = &SysKeyboardAvt; |
| memcpy(&((*pdev)->guid),rguid,sizeof(*rguid)); |
| memset(((LPSYSKEYBOARD32A)(*pdev))->keystate,0,256); |
| return 0; |
| } |
| if (!memcmp(&GUID_SysMouse,rguid,sizeof(GUID_SysMouse))) { |
| *pdev = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirectInputDevice32A)); |
| (*pdev)->ref = 1; |
| (*pdev)->lpvtbl = &SysMouseAvt; |
| memcpy(&((*pdev)->guid),rguid,sizeof(*rguid)); |
| return 0; |
| } |
| return E_FAIL; |
| } |
| |
| static HRESULT WINAPI IDirectInputA_QueryInterface( |
| LPDIRECTINPUT32A this,REFIID riid,LPVOID *ppobj |
| ) { |
| char xbuf[50]; |
| |
| WINE_StringFromCLSID(riid,xbuf); |
| TRACE(dinput,"(this=%p,%s,%p)\n",this,xbuf,ppobj); |
| if (!memcmp(&IID_IUnknown,riid,sizeof(*riid))) { |
| this->lpvtbl->fnAddRef(this); |
| *ppobj = this; |
| return 0; |
| } |
| if (!memcmp(&IID_IDirectInputA,riid,sizeof(*riid))) { |
| this->lpvtbl->fnAddRef(this); |
| *ppobj = this; |
| return 0; |
| } |
| return E_FAIL; |
| } |
| |
| static HRESULT WINAPI IDirectInputA_Initialize( |
| LPDIRECTINPUT32A this,HINSTANCE32 hinst,DWORD x |
| ) { |
| return DIERR_ALREADYINITIALIZED; |
| } |
| |
| static IDirectInputA_VTable ddiavt= { |
| IDirectInputA_QueryInterface, |
| IDirectInputA_AddRef, |
| IDirectInputA_Release, |
| IDirectInputA_CreateDevice, |
| IDirectInputA_EnumDevices, |
| (void*)6, |
| (void*)7, |
| IDirectInputA_Initialize |
| }; |
| |
| /****************************************************************************** |
| * IDirectInputDeviceA |
| */ |
| static HRESULT WINAPI IDirectInputDeviceA_SetDataFormat( |
| LPDIRECTINPUTDEVICE32A this,LPCDIDATAFORMAT df |
| ) { |
| /* |
| int i; |
| TRACE(dinput,"(this=%p,%p)\n",this,df); |
| |
| TRACE(dinput,"df.dwSize=%ld\n",df->dwSize); |
| TRACE(dinput,"(df.dwObjsize=%ld)\n",df->dwObjSize); |
| TRACE(dinput,"(df.dwFlags=0x%08lx)\n",df->dwFlags); |
| TRACE(dinput,"(df.dwDataSize=%ld)\n",df->dwDataSize); |
| TRACE(dinput,"(df.dwNumObjs=%ld)\n",df->dwNumObjs); |
| |
| for (i=0;i<df->dwNumObjs;i++) { |
| char xbuf[50]; |
| |
| if (df->rgodf[i].pguid) |
| WINE_StringFromCLSID(df->rgodf[i].pguid,xbuf); |
| else |
| strcpy(xbuf,"<no guid>"); |
| TRACE(dinput,"df.rgodf[%d].guid %s\n",i,xbuf); |
| TRACE(dinput,"df.rgodf[%d].dwOfs %ld\n",i,df->rgodf[i].dwOfs); |
| TRACE(dinput,"dwType 0x%02lx,dwInstance %ld\n",DIDFT_GETTYPE(df->rgodf[i].dwType),DIDFT_GETINSTANCE(df->rgodf[i].dwType)); |
| TRACE(dinput,"df.rgodf[%d].dwFlags 0x%08lx\n",i,df->rgodf[i].dwFlags); |
| } |
| */ |
| return 0; |
| } |
| |
| static HRESULT WINAPI IDirectInputDeviceA_SetCooperativeLevel( |
| LPDIRECTINPUTDEVICE32A this,HWND32 hwnd,DWORD dwflags |
| ) { |
| FIXME(dinput,"(this=%p,0x%08lx,0x%08lx): stub\n",this,(DWORD)hwnd,dwflags); |
| return 0; |
| } |
| |
| static HRESULT WINAPI IDirectInputDeviceA_SetProperty( |
| LPDIRECTINPUTDEVICE32A this,REFGUID rguid,LPCDIPROPHEADER ph |
| ) { |
| char xbuf[50]; |
| |
| if (HIWORD(rguid)) |
| WINE_StringFromCLSID(rguid,xbuf); |
| else |
| sprintf(xbuf,"<special guid %ld>",(DWORD)rguid); |
| TRACE(dinput,"(this=%p,%s,%p)\n",this,xbuf,ph); |
| if (!HIWORD(rguid)) { |
| switch ((DWORD)rguid) { |
| case DIPROP_BUFFERSIZE: { |
| LPCDIPROPDWORD pd = (LPCDIPROPDWORD)ph; |
| |
| TRACE(dinput,"buffersize = %ld\n",pd->dwData); |
| break; |
| } |
| default: |
| WARN(dinput,"Unknown type %ld\n",(DWORD)rguid); |
| break; |
| } |
| } |
| return 0; |
| } |
| |
| static HRESULT WINAPI IDirectInputDeviceA_SetEventNotification( |
| LPDIRECTINPUTDEVICE32A this,HANDLE32 hnd |
| ) { |
| FIXME(dinput,"(this=%p,0x%08lx): stub\n",this,(DWORD)hnd); |
| return 0; |
| } |
| |
| static HRESULT WINAPI IDirectInputDeviceA_GetDeviceData( |
| LPDIRECTINPUTDEVICE32A this,DWORD dodsize,LPDIDEVICEOBJECTDATA dod, |
| LPDWORD entries,DWORD flags |
| ) { |
| /* TRACE(dinput,"IDirectInputDeviceA(%p)->GetDeviceData(%ld,%p,%p(0x%08lx),0x%08lx)\n",this,dodsize,dod,entries,*entries,flags);*/ |
| return 0; |
| } |
| |
| |
| static HRESULT WINAPI IDirectInputDeviceA_Acquire(LPDIRECTINPUTDEVICE32A this) { |
| FIXME(dinput,"(this=%p): stub\n",this); |
| return 0; |
| } |
| |
| static HRESULT WINAPI IDirectInputDeviceA_Unacquire(LPDIRECTINPUTDEVICE32A this) { |
| FIXME(dinput,"(this=%p): stub\n",this); |
| return 0; |
| } |
| |
| static ULONG WINAPI IDirectInputDeviceA_Release(LPDIRECTINPUTDEVICE32A this) { |
| this->ref--; |
| if (this->ref) |
| return this->ref; |
| HeapFree(GetProcessHeap(),0,this); |
| return 0; |
| } |
| |
| static HRESULT WINAPI SysKeyboardA_SetProperty( |
| LPDIRECTINPUTDEVICE32A this,REFGUID rguid,LPCDIPROPHEADER ph |
| ) { |
| char xbuf[50]; |
| |
| if (HIWORD(rguid)) |
| WINE_StringFromCLSID(rguid,xbuf); |
| else |
| sprintf(xbuf,"<special guid %ld>",(DWORD)rguid); |
| TRACE(dinput,"(this=%p,%s,%p)\n",this,xbuf,ph); |
| TRACE(dinput,"(size=%ld,headersize=%ld,obj=%ld,how=%ld\n", |
| ph->dwSize,ph->dwHeaderSize,ph->dwObj,ph->dwHow); |
| if (!HIWORD(rguid)) { |
| switch ((DWORD)rguid) { |
| case DIPROP_BUFFERSIZE: { |
| LPCDIPROPDWORD pd = (LPCDIPROPDWORD)ph; |
| |
| TRACE(dinput,"(buffersize=%ld)\n",pd->dwData); |
| break; |
| } |
| default: |
| WARN(dinput,"Unknown type %ld\n",(DWORD)rguid); |
| break; |
| } |
| } |
| return 0; |
| } |
| |
| static HRESULT WINAPI SysKeyboardA_GetDeviceState( |
| LPDIRECTINPUTDEVICE32A this,DWORD len,LPVOID ptr |
| ) { |
| if (len==256) { |
| int i; |
| |
| memset(ptr,0,256); |
| for (i=0;i<256;i++) |
| if (InputKeyStateTable[i]&0x80) { |
| ((LPBYTE)ptr)[vkey2scode[i] ]=0x80; |
| ((LPBYTE)ptr)[vkey2scode[i]|0x80]=0x80; |
| } |
| return 0; |
| } |
| WARN(dinput,"whoops, SysKeyboardA_GetDeviceState got len %ld?\n",len); |
| return 0; |
| } |
| |
| static HRESULT WINAPI SysKeyboardA_GetDeviceData( |
| LPDIRECTINPUTDEVICE32A this,DWORD dodsize,LPDIDEVICEOBJECTDATA dod, |
| LPDWORD entries,DWORD flags |
| ) { |
| int i,n,xentries; |
| LPSYSKEYBOARD32A kthis = (LPSYSKEYBOARD32A)this; |
| |
| TRACE(dinput,"(this=%p,%ld,%p,%p(%ld)),0x%08lx)\n", |
| this,dodsize,dod,entries,entries?*entries:0,flags); |
| if (entries) |
| xentries = *entries; |
| else |
| xentries = 1; |
| |
| for (n=i=0;(i<256) && (n<*entries);i++) { |
| if (kthis->keystate[i] == (InputKeyStateTable[i]&0x80)) |
| continue; |
| if (dod) { |
| /* add an entry */ |
| dod[n].dwOfs = vkey2scode[i]; |
| dod[n].dwData = InputKeyStateTable[i]&0x80; |
| dod[n].dwTimeStamp = 0; /* umm */ |
| dod[n].dwSequence = 0; /* umm */ |
| n++; |
| } |
| if (!(flags & DIGDD_PEEK)) |
| kthis->keystate[i] = InputKeyStateTable[i]&0x80; |
| } |
| *entries = n; |
| return 0; |
| } |
| |
| static HRESULT WINAPI SysKeyboardA_Acquire(LPDIRECTINPUTDEVICE32A this) { |
| FIXME(dinput,"(this=%p): stub\n",this); |
| return 0; |
| } |
| |
| static HRESULT WINAPI SysKeyboardA_Unacquire(LPDIRECTINPUTDEVICE32A this) { |
| FIXME(dinput,"(this=%p): stub\n",this); |
| return 0; |
| } |
| |
| |
| static HRESULT WINAPI IDirectInputDeviceA_GetDeviceState( |
| LPDIRECTINPUTDEVICE32A this,DWORD len,LPVOID ptr |
| ) { |
| FIXME(dinput,"(this=%p,0x%08lx,%p): stub\n",this,len,ptr); |
| return 0; |
| } |
| |
| static HRESULT WINAPI IDirectInputDeviceA_QueryInterface( |
| LPDIRECTINPUTDEVICE32A this,REFIID riid,LPVOID *ppobj |
| ) { |
| char xbuf[50]; |
| |
| WINE_StringFromCLSID(riid,xbuf); |
| TRACE(dinput,"(this=%p,%s,%p)\n",this,xbuf,ppobj); |
| if (!memcmp(&IID_IUnknown,riid,sizeof(*riid))) { |
| this->lpvtbl->fnAddRef(this); |
| *ppobj = this; |
| return 0; |
| } |
| if (!memcmp(&IID_IDirectInputDeviceA,riid,sizeof(*riid))) { |
| this->lpvtbl->fnAddRef(this); |
| *ppobj = this; |
| return 0; |
| } |
| return E_FAIL; |
| } |
| |
| static IDirectInputDeviceA_VTable SysKeyboardAvt={ |
| IDirectInputDeviceA_QueryInterface, |
| (void*)2, |
| IDirectInputDeviceA_Release, |
| (void*)4, |
| (void*)5, |
| (void*)6, |
| SysKeyboardA_SetProperty, |
| SysKeyboardA_Acquire, |
| SysKeyboardA_Unacquire, |
| SysKeyboardA_GetDeviceState, |
| SysKeyboardA_GetDeviceData, |
| IDirectInputDeviceA_SetDataFormat, |
| IDirectInputDeviceA_SetEventNotification, |
| IDirectInputDeviceA_SetCooperativeLevel, |
| (void*)15, |
| (void*)16, |
| (void*)17, |
| (void*)18, |
| }; |
| |
| static IDirectInputDeviceA_VTable SysMouseAvt={ |
| IDirectInputDeviceA_QueryInterface, |
| (void*)2, |
| IDirectInputDeviceA_Release, |
| (void*)4, |
| (void*)5, |
| (void*)6, |
| IDirectInputDeviceA_SetProperty, |
| IDirectInputDeviceA_Acquire, |
| IDirectInputDeviceA_Unacquire, |
| IDirectInputDeviceA_GetDeviceState, |
| IDirectInputDeviceA_GetDeviceData, |
| IDirectInputDeviceA_SetDataFormat, |
| IDirectInputDeviceA_SetEventNotification, |
| IDirectInputDeviceA_SetCooperativeLevel, |
| (void*)15, |
| (void*)16, |
| (void*)17, |
| (void*)18, |
| }; |