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