Added an unknown VxD error code.
[wine] / dlls / dinput / keyboard / main.c
1 /*              DirectInput Keyboard device
2  *
3  * Copyright 1998 Marcus Meissner
4  * Copyright 1998,1999 Lionel Ulmer
5  *
6  */
7
8 #include "config.h"
9 #include <string.h>
10 #ifdef HAVE_SYS_ERRNO_H
11 # include <sys/errno.h>
12 #endif
13
14 #include "debugtools.h"
15 #include "user.h"
16 #include "winerror.h"
17 #include "windef.h"
18 #include "dinput.h"
19
20 #include "dinput_private.h"
21 #include "device_private.h"
22
23 DEFAULT_DEBUG_CHANNEL(dinput);
24
25 extern BYTE InputKeyStateTable[256];
26 extern int min_keycode, max_keycode;
27 extern WORD keyc2vkey[256];
28
29 static ICOM_VTABLE(IDirectInputDevice2A) SysKeyboardAvt;
30 static ICOM_VTABLE(IDirectInputDevice7A) SysKeyboard7Avt;
31      
32 typedef struct SysKeyboardAImpl SysKeyboardAImpl;
33 struct SysKeyboardAImpl
34 {
35         /* IDirectInputDevice2AImpl */
36         ICOM_VFIELD(IDirectInputDevice2A);
37         DWORD                           ref;
38         GUID                            guid;
39
40         IDirectInputAImpl *dinput;
41         
42         /* SysKeyboardAImpl */
43         BYTE                            keystate[256];
44         int                             acquired;
45 };
46
47 static GUID DInput_Wine_Keyboard_GUID = { /* 0ab8648a-7735-11d2-8c73-71df54a96441 */
48   0x0ab8648a,
49   0x7735,
50   0x11d2,
51   {0x8c, 0x73, 0x71, 0xdf, 0x54, 0xa9, 0x64, 0x41}
52 };
53
54 static BOOL keyboarddev_enum_device(DWORD dwDevType, DWORD dwFlags, LPCDIDEVICEINSTANCEA lpddi)
55 {
56   if ((dwDevType == 0) || (dwDevType == DIDEVTYPE_KEYBOARD)) {
57     TRACE("Enumerating the Keyboard device\n");
58     
59     lpddi->guidInstance = GUID_SysKeyboard;/* DInput's GUID */
60     lpddi->guidProduct = DInput_Wine_Keyboard_GUID; /* Vendor's GUID */
61     lpddi->dwDevType = DIDEVTYPE_KEYBOARD | (DIDEVTYPEKEYBOARD_UNKNOWN << 8);
62     strcpy(lpddi->tszInstanceName, "Keyboard");
63     strcpy(lpddi->tszProductName, "Wine Keyboard");
64     
65     return TRUE;
66   }
67
68   return FALSE;
69 }
70
71 static SysKeyboardAImpl *alloc_device(REFGUID rguid, ICOM_VTABLE(IDirectInputDevice2A) *kvt, IDirectInputAImpl *dinput)
72 {
73     SysKeyboardAImpl* newDevice;
74     newDevice = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(SysKeyboardAImpl));
75     newDevice->ref = 1;
76     ICOM_VTBL(newDevice) = kvt;
77     memcpy(&(newDevice->guid),rguid,sizeof(*rguid));
78     memset(newDevice->keystate,0,256);
79     newDevice->dinput = dinput;
80
81     return newDevice;
82 }
83
84
85 static HRESULT keyboarddev_create_device(IDirectInputAImpl *dinput, REFGUID rguid, REFIID riid, LPDIRECTINPUTDEVICEA* pdev)
86 {
87   if ((IsEqualGUID(&GUID_SysKeyboard,rguid)) ||          /* Generic Keyboard */
88       (IsEqualGUID(&DInput_Wine_Keyboard_GUID,rguid))) { /* Wine Keyboard */
89     if ((riid == NULL) || (IsEqualGUID(&IID_IDirectInputDevice2A,riid)) || (IsEqualGUID(&IID_IDirectInputDevice2A,riid))) {
90       *pdev=(IDirectInputDeviceA*) alloc_device(rguid, &SysKeyboardAvt, dinput);
91     
92       TRACE("Creating a Keyboard device (%p)\n", *pdev);
93       return DI_OK;
94     } else if (IsEqualGUID(&IID_IDirectInputDevice7A,riid)) {
95       *pdev=(IDirectInputDeviceA*) alloc_device(rguid, (ICOM_VTABLE(IDirectInputDevice2A) *) &SysKeyboard7Avt, dinput);
96     
97       TRACE("Creating a Keyboard DInput7A device (%p)\n", *pdev);
98       return DI_OK;
99     } else
100       return DIERR_NOINTERFACE;
101   }
102
103   return DIERR_DEVICENOTREG;
104 }
105
106 static dinput_device keyboarddev = {
107   100,
108   keyboarddev_enum_device,
109   keyboarddev_create_device
110 };
111
112 DECL_GLOBAL_CONSTRUCTOR(keyboarddev_register) { dinput_register_device(&keyboarddev); }
113
114 static HRESULT WINAPI SysKeyboardAImpl_SetProperty(
115         LPDIRECTINPUTDEVICE2A iface,REFGUID rguid,LPCDIPROPHEADER ph
116 )
117 {
118         ICOM_THIS(SysKeyboardAImpl,iface);
119
120         TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(rguid),ph);
121         TRACE("(size=%ld,headersize=%ld,obj=%ld,how=%ld\n",
122             ph->dwSize,ph->dwHeaderSize,ph->dwObj,ph->dwHow);
123         if (!HIWORD(rguid)) {
124                 switch ((DWORD)rguid) {
125                 case (DWORD) DIPROP_BUFFERSIZE: {
126                         LPCDIPROPDWORD  pd = (LPCDIPROPDWORD)ph;
127
128                         TRACE("(buffersize=%ld)\n",pd->dwData);
129                         break;
130                 }
131                 default:
132                         WARN("Unknown type %ld\n",(DWORD)rguid);
133                         break;
134                 }
135         }
136         return 0;
137 }
138
139 static HRESULT WINAPI SysKeyboardAImpl_GetDeviceState(
140         LPDIRECTINPUTDEVICE2A iface,DWORD len,LPVOID ptr
141 )
142 {
143         return USER_Driver.pGetDIState(len, ptr)?DI_OK:E_FAIL;
144 }
145
146 static HRESULT WINAPI SysKeyboardAImpl_GetDeviceData(
147         LPDIRECTINPUTDEVICE2A iface,DWORD dodsize,LPDIDEVICEOBJECTDATA dod,
148         LPDWORD entries,DWORD flags
149 )
150 {
151         ICOM_THIS(SysKeyboardAImpl,iface);
152         HRESULT ret;
153         int     i;
154
155         TRACE("(this=%p,%ld,%p,%p(%ld)),0x%08lx)\n",
156               This,dodsize,dod,entries,entries?*entries:0,flags);
157
158         ret=USER_Driver.pGetDIData(
159                 This->keystate, dodsize, dod, entries, flags)?DI_OK:E_FAIL;
160         for (i=0;i<*entries;i++) {
161                 dod[i].dwTimeStamp = GetTickCount();
162                 dod[i].dwSequence = (This->dinput->evsequence)++;
163         }
164         return ret;
165 }
166
167 static HRESULT WINAPI SysKeyboardAImpl_Acquire(LPDIRECTINPUTDEVICE2A iface)
168 {
169         ICOM_THIS(SysKeyboardAImpl,iface);
170         
171         TRACE("(this=%p)\n",This);
172         
173         if (This->acquired == 0) {
174           This->acquired = 1;
175         }
176         
177         return DI_OK;
178 }
179
180 static HRESULT WINAPI SysKeyboardAImpl_Unacquire(LPDIRECTINPUTDEVICE2A iface)
181 {
182         ICOM_THIS(SysKeyboardAImpl,iface);
183         TRACE("(this=%p)\n",This);
184
185         if (This->acquired == 1) {
186           This->acquired = 0;
187         } else {
188           ERR("Unacquiring a not-acquired device !!!\n");
189         }
190
191         return DI_OK;
192 }
193
194 /******************************************************************************
195   *     GetCapabilities : get the device capablitites
196   */
197 static HRESULT WINAPI SysKeyboardAImpl_GetCapabilities(
198         LPDIRECTINPUTDEVICE2A iface,
199         LPDIDEVCAPS lpDIDevCaps)
200 {
201   ICOM_THIS(SysKeyboardAImpl,iface);
202
203   TRACE("(this=%p,%p)\n",This,lpDIDevCaps);
204
205   if (lpDIDevCaps->dwSize == sizeof(DIDEVCAPS)) {
206     lpDIDevCaps->dwFlags = DIDC_ATTACHED;
207     lpDIDevCaps->dwDevType = DIDEVTYPE_KEYBOARD;
208     lpDIDevCaps->dwAxes = 0;
209     lpDIDevCaps->dwButtons = 0;
210     lpDIDevCaps->dwPOVs = 0;
211     lpDIDevCaps->dwFFSamplePeriod = 0;
212     lpDIDevCaps->dwFFMinTimeResolution = 0;
213     lpDIDevCaps->dwFirmwareRevision = 100;
214     lpDIDevCaps->dwHardwareRevision = 100;
215     lpDIDevCaps->dwFFDriverVersion = 0;
216   } else {
217     /* DirectX 3.0 */
218     FIXME("DirectX 3.0 not supported....\n");
219   }
220   
221   return DI_OK;
222 }
223
224 static ICOM_VTABLE(IDirectInputDevice2A) SysKeyboardAvt = 
225 {
226         ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
227         IDirectInputDevice2AImpl_QueryInterface,
228         IDirectInputDevice2AImpl_AddRef,
229         IDirectInputDevice2AImpl_Release,
230         SysKeyboardAImpl_GetCapabilities,
231         IDirectInputDevice2AImpl_EnumObjects,
232         IDirectInputDevice2AImpl_GetProperty,
233         SysKeyboardAImpl_SetProperty,
234         SysKeyboardAImpl_Acquire,
235         SysKeyboardAImpl_Unacquire,
236         SysKeyboardAImpl_GetDeviceState,
237         SysKeyboardAImpl_GetDeviceData,
238         IDirectInputDevice2AImpl_SetDataFormat,
239         IDirectInputDevice2AImpl_SetEventNotification,
240         IDirectInputDevice2AImpl_SetCooperativeLevel,
241         IDirectInputDevice2AImpl_GetObjectInfo,
242         IDirectInputDevice2AImpl_GetDeviceInfo,
243         IDirectInputDevice2AImpl_RunControlPanel,
244         IDirectInputDevice2AImpl_Initialize,
245         IDirectInputDevice2AImpl_CreateEffect,
246         IDirectInputDevice2AImpl_EnumEffects,
247         IDirectInputDevice2AImpl_GetEffectInfo,
248         IDirectInputDevice2AImpl_GetForceFeedbackState,
249         IDirectInputDevice2AImpl_SendForceFeedbackCommand,
250         IDirectInputDevice2AImpl_EnumCreatedEffectObjects,
251         IDirectInputDevice2AImpl_Escape,
252         IDirectInputDevice2AImpl_Poll,
253         IDirectInputDevice2AImpl_SendDeviceData
254 };
255
256 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
257 # define XCAST(fun)     (typeof(SysKeyboard7Avt.fun))
258 #else
259 # define XCAST(fun)     (void*)
260 #endif
261
262 static ICOM_VTABLE(IDirectInputDevice7A) SysKeyboard7Avt = 
263 {
264         ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
265         XCAST(QueryInterface)IDirectInputDevice2AImpl_QueryInterface,
266         XCAST(AddRef)IDirectInputDevice2AImpl_AddRef,
267         XCAST(Release)IDirectInputDevice2AImpl_Release,
268         XCAST(GetCapabilities)SysKeyboardAImpl_GetCapabilities,
269         XCAST(EnumObjects)IDirectInputDevice2AImpl_EnumObjects,
270         XCAST(GetProperty)IDirectInputDevice2AImpl_GetProperty,
271         XCAST(SetProperty)SysKeyboardAImpl_SetProperty,
272         XCAST(Acquire)SysKeyboardAImpl_Acquire,
273         XCAST(Unacquire)SysKeyboardAImpl_Unacquire,
274         XCAST(GetDeviceState)SysKeyboardAImpl_GetDeviceState,
275         XCAST(GetDeviceData)SysKeyboardAImpl_GetDeviceData,
276         XCAST(SetDataFormat)IDirectInputDevice2AImpl_SetDataFormat,
277         XCAST(SetEventNotification)IDirectInputDevice2AImpl_SetEventNotification,
278         XCAST(SetCooperativeLevel)IDirectInputDevice2AImpl_SetCooperativeLevel,
279         XCAST(GetObjectInfo)IDirectInputDevice2AImpl_GetObjectInfo,
280         XCAST(GetDeviceInfo)IDirectInputDevice2AImpl_GetDeviceInfo,
281         XCAST(RunControlPanel)IDirectInputDevice2AImpl_RunControlPanel,
282         XCAST(Initialize)IDirectInputDevice2AImpl_Initialize,
283         XCAST(CreateEffect)IDirectInputDevice2AImpl_CreateEffect,
284         XCAST(EnumEffects)IDirectInputDevice2AImpl_EnumEffects,
285         XCAST(GetEffectInfo)IDirectInputDevice2AImpl_GetEffectInfo,
286         XCAST(GetForceFeedbackState)IDirectInputDevice2AImpl_GetForceFeedbackState,
287         XCAST(SendForceFeedbackCommand)IDirectInputDevice2AImpl_SendForceFeedbackCommand,
288         XCAST(EnumCreatedEffectObjects)IDirectInputDevice2AImpl_EnumCreatedEffectObjects,
289         XCAST(Escape)IDirectInputDevice2AImpl_Escape,
290         XCAST(Poll)IDirectInputDevice2AImpl_Poll,
291         XCAST(SendDeviceData)IDirectInputDevice2AImpl_SendDeviceData,
292         IDirectInputDevice7AImpl_EnumEffectsInFile,
293         IDirectInputDevice7AImpl_WriteEffectToFile
294 };
295
296 #undef XCAST