crypt32/tests: Don't crash on Win9x.
[wine] / dlls / dinput / keyboard.c
1 /*              DirectInput Keyboard device
2  *
3  * Copyright 1998 Marcus Meissner
4  * Copyright 1998,1999 Lionel Ulmer
5  * Copyright 2000-2001 TransGaming Technologies Inc.
6  * Copyright 2005 Raphael Junqueira
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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21  */
22
23 #include "config.h"
24 #include "wine/port.h"
25
26 #include <stdarg.h>
27 #include <string.h>
28 #include "windef.h"
29 #include "winbase.h"
30 #include "winuser.h"
31 #include "winerror.h"
32 #include "dinput.h"
33
34 #include "dinput_private.h"
35 #include "device_private.h"
36 #include "wine/debug.h"
37 #include "wine/unicode.h"
38
39 WINE_DEFAULT_DEBUG_CHANNEL(dinput);
40
41 #define WINE_DINPUT_KEYBOARD_MAX_KEYS 256
42
43 static const IDirectInputDevice8AVtbl SysKeyboardAvt;
44 static const IDirectInputDevice8WVtbl SysKeyboardWvt;
45
46 typedef struct SysKeyboardImpl SysKeyboardImpl;
47 struct SysKeyboardImpl
48 {
49     struct IDirectInputDevice2AImpl base;
50     BYTE DInputKeyState[WINE_DINPUT_KEYBOARD_MAX_KEYS];
51 };
52
53 static BYTE map_dik_code(DWORD scanCode, DWORD vkCode)
54 {
55     static const BYTE asciiCodes[] =
56      {/*32*/  DIK_SPACE,0,0,0,0,0,0,DIK_APOSTROPHE,
57       /*40*/  0,0,0,0,DIK_COMMA,DIK_MINUS,DIK_PERIOD,DIK_SLASH,
58       /*48*/  DIK_0,DIK_1,DIK_2,DIK_3,DIK_4,DIK_5,DIK_6,DIK_7,
59       /*56*/  DIK_8,DIK_9,DIK_COLON,DIK_SEMICOLON,0,DIK_EQUALS,0,0,
60       /*64*/  DIK_AT,DIK_A,DIK_B,DIK_C,DIK_D,DIK_E,DIK_F,DIK_G,
61       /*72*/  DIK_H,DIK_I,DIK_J,DIK_K,DIK_L,DIK_M,DIK_N,DIK_O,
62       /*80*/  DIK_P,DIK_Q,DIK_R,DIK_S,DIK_T,DIK_U,DIK_V,DIK_W,
63       /*88*/  DIK_X,DIK_Y,DIK_Z,DIK_LBRACKET,0,DIK_RBRACKET,DIK_CIRCUMFLEX,DIK_UNDERLINE}      /*95*/ ;
64
65     BYTE out_code = 0;
66     WCHAR c = MapVirtualKeyW(vkCode,MAPVK_VK_TO_CHAR);
67
68     if (c > 31 && c < 96)
69         out_code = asciiCodes[c - 32];
70
71     if (out_code == 0)
72         out_code = scanCode;
73
74     return out_code;
75 }
76
77 static void KeyboardCallback( LPDIRECTINPUTDEVICE8A iface, WPARAM wparam, LPARAM lparam )
78 {
79     SysKeyboardImpl *This = (SysKeyboardImpl *)iface;
80     int dik_code;
81     KBDLLHOOKSTRUCT *hook = (KBDLLHOOKSTRUCT *)lparam;
82     BYTE new_diks;
83
84     if (wparam != WM_KEYDOWN && wparam != WM_KEYUP &&
85         wparam != WM_SYSKEYDOWN && wparam != WM_SYSKEYUP)
86         return;
87
88     TRACE("(%p) %ld,%ld\n", iface, wparam, lparam);
89
90     dik_code = map_dik_code(hook->scanCode & 0xff,hook->vkCode);
91     /* R-Shift is special - it is an extended key with separate scan code */
92     if (hook->flags & LLKHF_EXTENDED && dik_code != 0x36)
93         dik_code |= 0x80;
94
95     new_diks = hook->flags & LLKHF_UP ? 0 : 0x80;
96
97     /* returns now if key event already known */
98     if (new_diks == This->DInputKeyState[dik_code])
99         return;
100
101     This->DInputKeyState[dik_code] = new_diks;
102     TRACE(" setting %02X to %02X\n", dik_code, This->DInputKeyState[dik_code]);
103       
104     dik_code = id_to_offset(&This->base.data_format, DIDFT_MAKEINSTANCE(dik_code) | DIDFT_PSHBUTTON);
105     EnterCriticalSection(&This->base.crit);
106     queue_event((LPDIRECTINPUTDEVICE8A)This, dik_code, new_diks, hook->time, This->base.dinput->evsequence++);
107     LeaveCriticalSection(&This->base.crit);
108 }
109
110 const GUID DInput_Wine_Keyboard_GUID = { /* 0ab8648a-7735-11d2-8c73-71df54a96441 */
111     0x0ab8648a, 0x7735, 0x11d2, {0x8c, 0x73, 0x71, 0xdf, 0x54, 0xa9, 0x64, 0x41}
112 };
113
114 static void fill_keyboard_dideviceinstanceA(LPDIDEVICEINSTANCEA lpddi, DWORD version) {
115     DWORD dwSize;
116     DIDEVICEINSTANCEA ddi;
117     
118     dwSize = lpddi->dwSize;
119
120     TRACE("%d %p\n", dwSize, lpddi);
121     
122     memset(lpddi, 0, dwSize);
123     memset(&ddi, 0, sizeof(ddi));
124
125     ddi.dwSize = dwSize;
126     ddi.guidInstance = GUID_SysKeyboard;/* DInput's GUID */
127     ddi.guidProduct = DInput_Wine_Keyboard_GUID; /* Vendor's GUID */
128     if (version >= 0x0800)
129         ddi.dwDevType = DI8DEVTYPE_KEYBOARD | (DI8DEVTYPEKEYBOARD_UNKNOWN << 8);
130     else
131         ddi.dwDevType = DIDEVTYPE_KEYBOARD | (DIDEVTYPEKEYBOARD_UNKNOWN << 8);
132     strcpy(ddi.tszInstanceName, "Keyboard");
133     strcpy(ddi.tszProductName, "Wine Keyboard");
134
135     memcpy(lpddi, &ddi, (dwSize < sizeof(ddi) ? dwSize : sizeof(ddi)));
136 }
137
138 static void fill_keyboard_dideviceinstanceW(LPDIDEVICEINSTANCEW lpddi, DWORD version) {
139     DWORD dwSize;
140     DIDEVICEINSTANCEW ddi;
141     
142     dwSize = lpddi->dwSize;
143
144     TRACE("%d %p\n", dwSize, lpddi);
145     
146     memset(lpddi, 0, dwSize);
147     memset(&ddi, 0, sizeof(ddi));
148  
149     ddi.dwSize = dwSize;
150     ddi.guidInstance = GUID_SysKeyboard;/* DInput's GUID */
151     ddi.guidProduct = DInput_Wine_Keyboard_GUID; /* Vendor's GUID */
152     if (version >= 0x0800)
153         ddi.dwDevType = DI8DEVTYPE_KEYBOARD | (DI8DEVTYPEKEYBOARD_UNKNOWN << 8);
154     else
155         ddi.dwDevType = DIDEVTYPE_KEYBOARD | (DIDEVTYPEKEYBOARD_UNKNOWN << 8);
156     MultiByteToWideChar(CP_ACP, 0, "Keyboard", -1, ddi.tszInstanceName, MAX_PATH);
157     MultiByteToWideChar(CP_ACP, 0, "Wine Keyboard", -1, ddi.tszProductName, MAX_PATH);
158
159     memcpy(lpddi, &ddi, (dwSize < sizeof(ddi) ? dwSize : sizeof(ddi)));
160 }
161  
162 static BOOL keyboarddev_enum_deviceA(DWORD dwDevType, DWORD dwFlags, LPDIDEVICEINSTANCEA lpddi, DWORD version, int id)
163 {
164   if (id != 0)
165     return FALSE;
166
167   if ((dwDevType == 0) ||
168       ((dwDevType == DIDEVTYPE_KEYBOARD) && (version < 0x0800)) ||
169       (((dwDevType == DI8DEVCLASS_KEYBOARD) || (dwDevType == DI8DEVTYPE_KEYBOARD)) && (version >= 0x0800))) {
170     TRACE("Enumerating the Keyboard device\n");
171  
172     fill_keyboard_dideviceinstanceA(lpddi, version);
173     
174     return TRUE;
175   }
176
177   return FALSE;
178 }
179
180 static BOOL keyboarddev_enum_deviceW(DWORD dwDevType, DWORD dwFlags, LPDIDEVICEINSTANCEW lpddi, DWORD version, int id)
181 {
182   if (id != 0)
183     return FALSE;
184
185   if ((dwDevType == 0) ||
186       ((dwDevType == DIDEVTYPE_KEYBOARD) && (version < 0x0800)) ||
187       (((dwDevType == DI8DEVCLASS_KEYBOARD) || (dwDevType == DI8DEVTYPE_KEYBOARD)) && (version >= 0x0800))) {
188     TRACE("Enumerating the Keyboard device\n");
189
190     fill_keyboard_dideviceinstanceW(lpddi, version);
191     
192     return TRUE;
193   }
194
195   return FALSE;
196 }
197
198 static SysKeyboardImpl *alloc_device(REFGUID rguid, const void *kvt, IDirectInputImpl *dinput)
199 {
200     SysKeyboardImpl* newDevice;
201     LPDIDATAFORMAT df = NULL;
202     int i, idx = 0;
203
204     newDevice = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(SysKeyboardImpl));
205     newDevice->base.lpVtbl = kvt;
206     newDevice->base.ref = 1;
207     memcpy(&newDevice->base.guid, rguid, sizeof(*rguid));
208     newDevice->base.dinput = dinput;
209     newDevice->base.event_proc = KeyboardCallback;
210     InitializeCriticalSection(&newDevice->base.crit);
211     newDevice->base.crit.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": SysKeyboardImpl*->base.crit");
212
213     /* Create copy of default data format */
214     if (!(df = HeapAlloc(GetProcessHeap(), 0, c_dfDIKeyboard.dwSize))) goto failed;
215     memcpy(df, &c_dfDIKeyboard, c_dfDIKeyboard.dwSize);
216     if (!(df->rgodf = HeapAlloc(GetProcessHeap(), 0, df->dwNumObjs * df->dwObjSize))) goto failed;
217
218     for (i = 0; i < df->dwNumObjs; i++)
219     {
220         char buf[MAX_PATH];
221
222         if (!GetKeyNameTextA(((i & 0x7f) << 16) | ((i & 0x80) << 17), buf, sizeof(buf)))
223             continue;
224
225         memcpy(&df->rgodf[idx], &c_dfDIKeyboard.rgodf[i], df->dwObjSize);
226         df->rgodf[idx++].dwType = DIDFT_MAKEINSTANCE(i) | DIDFT_PSHBUTTON;
227     }
228     df->dwNumObjs = idx;
229
230     newDevice->base.data_format.wine_df = df;
231     IDirectInput_AddRef((LPDIRECTINPUTDEVICE8A)newDevice->base.dinput);
232     return newDevice;
233
234 failed:
235     if (df) HeapFree(GetProcessHeap(), 0, df->rgodf);
236     HeapFree(GetProcessHeap(), 0, df);
237     HeapFree(GetProcessHeap(), 0, newDevice);
238     return NULL;
239 }
240
241
242 static HRESULT keyboarddev_create_deviceA(IDirectInputImpl *dinput, REFGUID rguid, REFIID riid, LPDIRECTINPUTDEVICEA* pdev)
243 {
244   if ((IsEqualGUID(&GUID_SysKeyboard,rguid)) ||          /* Generic Keyboard */
245       (IsEqualGUID(&DInput_Wine_Keyboard_GUID,rguid))) { /* Wine Keyboard */
246     if ((riid == NULL) ||
247         IsEqualGUID(&IID_IDirectInputDeviceA,riid) ||
248         IsEqualGUID(&IID_IDirectInputDevice2A,riid) ||
249         IsEqualGUID(&IID_IDirectInputDevice7A,riid) ||
250         IsEqualGUID(&IID_IDirectInputDevice8A,riid)) {
251       *pdev = (IDirectInputDeviceA*) alloc_device(rguid, &SysKeyboardAvt, dinput);
252       TRACE("Creating a Keyboard device (%p)\n", *pdev);
253       if (!*pdev) return DIERR_OUTOFMEMORY;
254       return DI_OK;
255     } else
256       return DIERR_NOINTERFACE;
257   }
258   return DIERR_DEVICENOTREG;
259 }
260
261 static HRESULT keyboarddev_create_deviceW(IDirectInputImpl *dinput, REFGUID rguid, REFIID riid, LPDIRECTINPUTDEVICEW* pdev)
262 {
263   if ((IsEqualGUID(&GUID_SysKeyboard,rguid)) ||          /* Generic Keyboard */
264       (IsEqualGUID(&DInput_Wine_Keyboard_GUID,rguid))) { /* Wine Keyboard */
265     if ((riid == NULL) ||
266         IsEqualGUID(&IID_IDirectInputDeviceW,riid) ||
267         IsEqualGUID(&IID_IDirectInputDevice2W,riid) ||
268         IsEqualGUID(&IID_IDirectInputDevice7W,riid) ||
269         IsEqualGUID(&IID_IDirectInputDevice8W,riid)) {
270       *pdev = (IDirectInputDeviceW*) alloc_device(rguid, &SysKeyboardWvt, dinput);
271       TRACE("Creating a Keyboard device (%p)\n", *pdev);
272       if (!*pdev) return DIERR_OUTOFMEMORY;
273       return DI_OK;
274     } else
275       return DIERR_NOINTERFACE;
276   }
277   return DIERR_DEVICENOTREG;
278 }
279
280 const struct dinput_device keyboard_device = {
281   "Wine keyboard driver",
282   keyboarddev_enum_deviceA,
283   keyboarddev_enum_deviceW,
284   keyboarddev_create_deviceA,
285   keyboarddev_create_deviceW
286 };
287
288 static HRESULT WINAPI SysKeyboardAImpl_GetDeviceState(
289         LPDIRECTINPUTDEVICE8A iface,DWORD len,LPVOID ptr
290 )
291 {
292     SysKeyboardImpl *This = (SysKeyboardImpl *)iface;
293     TRACE("(%p)->(%d,%p)\n", This, len, ptr);
294
295     if (!This->base.acquired) return DIERR_NOTACQUIRED;
296
297     if (len != This->base.data_format.user_df->dwDataSize )
298         return DIERR_INVALIDPARAM;
299
300     EnterCriticalSection(&This->base.crit);
301
302     if (TRACE_ON(dinput)) {
303         int i;
304         for (i = 0; i < WINE_DINPUT_KEYBOARD_MAX_KEYS; i++) {
305             if (This->DInputKeyState[i] != 0x00)
306                 TRACE(" - %02X: %02x\n", i, This->DInputKeyState[i]);
307         }
308     }
309
310     fill_DataFormat(ptr, len, This->DInputKeyState, &This->base.data_format);
311     LeaveCriticalSection(&This->base.crit);
312
313     return DI_OK;
314 }
315
316 /******************************************************************************
317   *     GetCapabilities : get the device capabilities
318   */
319 static HRESULT WINAPI SysKeyboardAImpl_GetCapabilities(
320         LPDIRECTINPUTDEVICE8A iface,
321         LPDIDEVCAPS lpDIDevCaps)
322 {
323     SysKeyboardImpl *This = (SysKeyboardImpl *)iface;
324     DIDEVCAPS devcaps;
325
326     TRACE("(this=%p,%p)\n",This,lpDIDevCaps);
327
328     if ((lpDIDevCaps->dwSize != sizeof(DIDEVCAPS)) && (lpDIDevCaps->dwSize != sizeof(DIDEVCAPS_DX3))) {
329         WARN("invalid parameter\n");
330         return DIERR_INVALIDPARAM;
331     }
332     
333     devcaps.dwSize = lpDIDevCaps->dwSize;
334     devcaps.dwFlags = DIDC_ATTACHED;
335     if (This->base.dinput->dwVersion >= 0x0800)
336         devcaps.dwDevType = DI8DEVTYPE_KEYBOARD | (DI8DEVTYPEKEYBOARD_UNKNOWN << 8);
337     else
338         devcaps.dwDevType = DIDEVTYPE_KEYBOARD | (DIDEVTYPEKEYBOARD_UNKNOWN << 8);
339     devcaps.dwAxes = 0;
340     devcaps.dwButtons = This->base.data_format.wine_df->dwNumObjs;
341     devcaps.dwPOVs = 0;
342     devcaps.dwFFSamplePeriod = 0;
343     devcaps.dwFFMinTimeResolution = 0;
344     devcaps.dwFirmwareRevision = 100;
345     devcaps.dwHardwareRevision = 100;
346     devcaps.dwFFDriverVersion = 0;
347
348     memcpy(lpDIDevCaps, &devcaps, lpDIDevCaps->dwSize);
349     
350     return DI_OK;
351 }
352
353 /******************************************************************************
354   *     GetObjectInfo : get information about a device object such as a button
355   *                     or axis
356   */
357 static HRESULT WINAPI
358 SysKeyboardAImpl_GetObjectInfo(
359         LPDIRECTINPUTDEVICE8A iface,
360         LPDIDEVICEOBJECTINSTANCEA pdidoi,
361         DWORD dwObj,
362         DWORD dwHow)
363 {
364     HRESULT res;
365
366     res = IDirectInputDevice2AImpl_GetObjectInfo(iface, pdidoi, dwObj, dwHow);
367     if (res != DI_OK) return res;
368
369     if (!GetKeyNameTextA((DIDFT_GETINSTANCE(pdidoi->dwType) & 0x80) << 17 |
370                          (DIDFT_GETINSTANCE(pdidoi->dwType) & 0x7f) << 16,
371                          pdidoi->tszName, sizeof(pdidoi->tszName)))
372         return DIERR_OBJECTNOTFOUND;
373
374     _dump_OBJECTINSTANCEA(pdidoi);
375     return res;
376 }
377
378 static HRESULT WINAPI SysKeyboardWImpl_GetObjectInfo(LPDIRECTINPUTDEVICE8W iface,
379                                                      LPDIDEVICEOBJECTINSTANCEW pdidoi,
380                                                      DWORD dwObj,
381                                                      DWORD dwHow)
382 {
383     HRESULT res;
384
385     res = IDirectInputDevice2WImpl_GetObjectInfo(iface, pdidoi, dwObj, dwHow);
386     if (res != DI_OK) return res;
387
388     if (!GetKeyNameTextW((DIDFT_GETINSTANCE(pdidoi->dwType) & 0x80) << 17 |
389                          (DIDFT_GETINSTANCE(pdidoi->dwType) & 0x7f) << 16,
390                          pdidoi->tszName,
391                          sizeof(pdidoi->tszName)/sizeof(pdidoi->tszName[0])))
392         return DIERR_OBJECTNOTFOUND;
393
394     _dump_OBJECTINSTANCEW(pdidoi);
395     return res;
396 }
397
398 /******************************************************************************
399   *     GetDeviceInfo : get information about a device's identity
400   */
401 static HRESULT WINAPI SysKeyboardAImpl_GetDeviceInfo(
402         LPDIRECTINPUTDEVICE8A iface,
403         LPDIDEVICEINSTANCEA pdidi)
404 {
405     SysKeyboardImpl *This = (SysKeyboardImpl *)iface;
406     TRACE("(this=%p,%p)\n", This, pdidi);
407
408     if (pdidi->dwSize != sizeof(DIDEVICEINSTANCEA)) {
409         WARN(" dinput3 not supported yet...\n");
410         return DI_OK;
411     }
412
413     fill_keyboard_dideviceinstanceA(pdidi, This->base.dinput->dwVersion);
414     
415     return DI_OK;
416 }
417
418 static HRESULT WINAPI SysKeyboardWImpl_GetDeviceInfo(LPDIRECTINPUTDEVICE8W iface, LPDIDEVICEINSTANCEW pdidi) 
419 {
420     SysKeyboardImpl *This = (SysKeyboardImpl *)iface;
421     TRACE("(this=%p,%p)\n", This, pdidi);
422
423     if (pdidi->dwSize != sizeof(DIDEVICEINSTANCEW)) {
424         WARN(" dinput3 not supported yet...\n");
425         return DI_OK;
426     }
427
428     fill_keyboard_dideviceinstanceW(pdidi, This->base.dinput->dwVersion);
429     
430     return DI_OK;
431 }
432
433 /******************************************************************************
434  *      GetProperty : Retrieves information about the input device.
435  */
436 static HRESULT WINAPI SysKeyboardAImpl_GetProperty(LPDIRECTINPUTDEVICE8A iface,
437         REFGUID rguid, LPDIPROPHEADER pdiph)
438 {
439     TRACE("(%p) %s,%p\n", iface, debugstr_guid(rguid), pdiph);
440     _dump_DIPROPHEADER(pdiph);
441
442     if (HIWORD(rguid)) return DI_OK;
443
444     switch (LOWORD(rguid))
445     {
446         case (DWORD_PTR)DIPROP_KEYNAME:
447         {
448             HRESULT hr;
449             LPDIPROPSTRING ps = (LPDIPROPSTRING)pdiph;
450             DIDEVICEOBJECTINSTANCEW didoi;
451
452             if (pdiph->dwSize != sizeof(DIPROPSTRING))
453                 return DIERR_INVALIDPARAM;
454
455             didoi.dwSize = sizeof(DIDEVICEOBJECTINSTANCEW);
456
457             hr = SysKeyboardWImpl_GetObjectInfo((LPDIRECTINPUTDEVICE8W)iface , &didoi,
458                                                  ps->diph.dwObj, ps->diph.dwHow);
459             if (hr == DI_OK)
460                 memcpy(ps->wsz, didoi.tszName, sizeof(ps->wsz));
461             return hr;
462         }
463         default:
464             return IDirectInputDevice2AImpl_GetProperty( iface, rguid, pdiph );
465     }
466     return DI_OK;
467 }
468
469 static const IDirectInputDevice8AVtbl SysKeyboardAvt =
470 {
471         IDirectInputDevice2AImpl_QueryInterface,
472         IDirectInputDevice2AImpl_AddRef,
473         IDirectInputDevice2AImpl_Release,
474         SysKeyboardAImpl_GetCapabilities,
475         IDirectInputDevice2AImpl_EnumObjects,
476         SysKeyboardAImpl_GetProperty,
477         IDirectInputDevice2AImpl_SetProperty,
478         IDirectInputDevice2AImpl_Acquire,
479         IDirectInputDevice2AImpl_Unacquire,
480         SysKeyboardAImpl_GetDeviceState,
481         IDirectInputDevice2AImpl_GetDeviceData,
482         IDirectInputDevice2AImpl_SetDataFormat,
483         IDirectInputDevice2AImpl_SetEventNotification,
484         IDirectInputDevice2AImpl_SetCooperativeLevel,
485         SysKeyboardAImpl_GetObjectInfo,
486         SysKeyboardAImpl_GetDeviceInfo,
487         IDirectInputDevice2AImpl_RunControlPanel,
488         IDirectInputDevice2AImpl_Initialize,
489         IDirectInputDevice2AImpl_CreateEffect,
490         IDirectInputDevice2AImpl_EnumEffects,
491         IDirectInputDevice2AImpl_GetEffectInfo,
492         IDirectInputDevice2AImpl_GetForceFeedbackState,
493         IDirectInputDevice2AImpl_SendForceFeedbackCommand,
494         IDirectInputDevice2AImpl_EnumCreatedEffectObjects,
495         IDirectInputDevice2AImpl_Escape,
496         IDirectInputDevice2AImpl_Poll,
497         IDirectInputDevice2AImpl_SendDeviceData,
498         IDirectInputDevice7AImpl_EnumEffectsInFile,
499         IDirectInputDevice7AImpl_WriteEffectToFile,
500         IDirectInputDevice8AImpl_BuildActionMap,
501         IDirectInputDevice8AImpl_SetActionMap,
502         IDirectInputDevice8AImpl_GetImageInfo
503 };
504
505 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
506 # define XCAST(fun)     (typeof(SysKeyboardWvt.fun))
507 #else
508 # define XCAST(fun)     (void*)
509 #endif
510
511 static const IDirectInputDevice8WVtbl SysKeyboardWvt =
512 {
513         IDirectInputDevice2WImpl_QueryInterface,
514         XCAST(AddRef)IDirectInputDevice2AImpl_AddRef,
515         XCAST(Release)IDirectInputDevice2AImpl_Release,
516         XCAST(GetCapabilities)SysKeyboardAImpl_GetCapabilities,
517         IDirectInputDevice2WImpl_EnumObjects,
518         XCAST(GetProperty)SysKeyboardAImpl_GetProperty,
519         XCAST(SetProperty)IDirectInputDevice2AImpl_SetProperty,
520         XCAST(Acquire)IDirectInputDevice2AImpl_Acquire,
521         XCAST(Unacquire)IDirectInputDevice2AImpl_Unacquire,
522         XCAST(GetDeviceState)SysKeyboardAImpl_GetDeviceState,
523         XCAST(GetDeviceData)IDirectInputDevice2AImpl_GetDeviceData,
524         XCAST(SetDataFormat)IDirectInputDevice2AImpl_SetDataFormat,
525         XCAST(SetEventNotification)IDirectInputDevice2AImpl_SetEventNotification,
526         XCAST(SetCooperativeLevel)IDirectInputDevice2AImpl_SetCooperativeLevel,
527         SysKeyboardWImpl_GetObjectInfo,
528         SysKeyboardWImpl_GetDeviceInfo,
529         XCAST(RunControlPanel)IDirectInputDevice2AImpl_RunControlPanel,
530         XCAST(Initialize)IDirectInputDevice2AImpl_Initialize,
531         XCAST(CreateEffect)IDirectInputDevice2AImpl_CreateEffect,
532         IDirectInputDevice2WImpl_EnumEffects,
533         IDirectInputDevice2WImpl_GetEffectInfo,
534         XCAST(GetForceFeedbackState)IDirectInputDevice2AImpl_GetForceFeedbackState,
535         XCAST(SendForceFeedbackCommand)IDirectInputDevice2AImpl_SendForceFeedbackCommand,
536         XCAST(EnumCreatedEffectObjects)IDirectInputDevice2AImpl_EnumCreatedEffectObjects,
537         XCAST(Escape)IDirectInputDevice2AImpl_Escape,
538         XCAST(Poll)IDirectInputDevice2AImpl_Poll,
539         XCAST(SendDeviceData)IDirectInputDevice2AImpl_SendDeviceData,
540         IDirectInputDevice7WImpl_EnumEffectsInFile,
541         IDirectInputDevice7WImpl_WriteEffectToFile,
542         IDirectInputDevice8WImpl_BuildActionMap,
543         IDirectInputDevice8WImpl_SetActionMap,
544         IDirectInputDevice8WImpl_GetImageInfo
545 };
546 #undef XCAST