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