mmdevapi: Children of IAudioClient should hold a reference to their parents.
[wine] / dlls / dinput / device.c
1 /*              DirectInput Device
2  *
3  * Copyright 1998 Marcus Meissner
4  * Copyright 1998,1999 Lionel Ulmer
5  *
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 /* This file contains all the Device specific functions that can be used as stubs
23    by real device implementations.
24
25    It also contains all the helper functions.
26 */
27 #include "config.h"
28
29 #include <stdarg.h>
30 #include <string.h>
31 #include "wine/debug.h"
32 #include "wine/unicode.h"
33 #include "windef.h"
34 #include "winbase.h"
35 #include "winreg.h"
36 #include "winuser.h"
37 #include "winerror.h"
38 #include "dinput.h"
39 #include "device_private.h"
40 #include "dinput_private.h"
41
42 WINE_DEFAULT_DEBUG_CHANNEL(dinput);
43
44 static inline IDirectInputDeviceImpl *impl_from_IDirectInputDevice8A(IDirectInputDevice8A *iface)
45 {
46     return CONTAINING_RECORD(iface, IDirectInputDeviceImpl, IDirectInputDevice8A_iface);
47 }
48 static inline IDirectInputDeviceImpl *impl_from_IDirectInputDevice8W(IDirectInputDevice8W *iface)
49 {
50     return CONTAINING_RECORD(iface, IDirectInputDeviceImpl, IDirectInputDevice8W_iface);
51 }
52
53 static inline IDirectInputDevice8A *IDirectInputDevice8A_from_impl(IDirectInputDeviceImpl *This)
54 {
55     return &This->IDirectInputDevice8A_iface;
56 }
57 static inline IDirectInputDevice8W *IDirectInputDevice8W_from_impl(IDirectInputDeviceImpl *This)
58 {
59     return &This->IDirectInputDevice8W_iface;
60 }
61
62 /******************************************************************************
63  *      Various debugging tools
64  */
65 static void _dump_cooperativelevel_DI(DWORD dwFlags) {
66     if (TRACE_ON(dinput)) {
67         unsigned int   i;
68         static const struct {
69             DWORD       mask;
70             const char  *name;
71         } flags[] = {
72 #define FE(x) { x, #x}
73             FE(DISCL_BACKGROUND),
74             FE(DISCL_EXCLUSIVE),
75             FE(DISCL_FOREGROUND),
76             FE(DISCL_NONEXCLUSIVE),
77             FE(DISCL_NOWINKEY)
78 #undef FE
79         };
80         TRACE(" cooperative level : ");
81         for (i = 0; i < (sizeof(flags) / sizeof(flags[0])); i++)
82             if (flags[i].mask & dwFlags)
83                 TRACE("%s ",flags[i].name);
84         TRACE("\n");
85     }
86 }
87
88 static void _dump_EnumObjects_flags(DWORD dwFlags) {
89     if (TRACE_ON(dinput)) {
90         unsigned int   i;
91         DWORD type, instance;
92         static const struct {
93             DWORD       mask;
94             const char  *name;
95         } flags[] = {
96 #define FE(x) { x, #x}
97             FE(DIDFT_RELAXIS),
98             FE(DIDFT_ABSAXIS),
99             FE(DIDFT_PSHBUTTON),
100             FE(DIDFT_TGLBUTTON),
101             FE(DIDFT_POV),
102             FE(DIDFT_COLLECTION),
103             FE(DIDFT_NODATA),       
104             FE(DIDFT_FFACTUATOR),
105             FE(DIDFT_FFEFFECTTRIGGER),
106             FE(DIDFT_OUTPUT),
107             FE(DIDFT_VENDORDEFINED),
108             FE(DIDFT_ALIAS),
109             FE(DIDFT_OPTIONAL)
110 #undef FE
111         };
112         type = (dwFlags & 0xFF0000FF);
113         instance = ((dwFlags >> 8) & 0xFFFF);
114         TRACE("Type:");
115         if (type == DIDFT_ALL) {
116             TRACE(" DIDFT_ALL");
117         } else {
118             for (i = 0; i < (sizeof(flags) / sizeof(flags[0])); i++) {
119                 if (flags[i].mask & type) {
120                     type &= ~flags[i].mask;
121                     TRACE(" %s",flags[i].name);
122                 }
123             }
124             if (type) {
125                 TRACE(" (unhandled: %08x)", type);
126             }
127         }
128         TRACE(" / Instance: ");
129         if (instance == ((DIDFT_ANYINSTANCE >> 8) & 0xFFFF)) {
130             TRACE("DIDFT_ANYINSTANCE");
131         } else {
132             TRACE("%3d", instance);
133         }
134     }
135 }
136
137 void _dump_DIPROPHEADER(LPCDIPROPHEADER diph) {
138     if (TRACE_ON(dinput)) {
139         TRACE("  - dwObj = 0x%08x\n", diph->dwObj);
140         TRACE("  - dwHow = %s\n",
141             ((diph->dwHow == DIPH_DEVICE) ? "DIPH_DEVICE" :
142             ((diph->dwHow == DIPH_BYOFFSET) ? "DIPH_BYOFFSET" :
143             ((diph->dwHow == DIPH_BYID)) ? "DIPH_BYID" : "unknown")));
144     }
145 }
146
147 void _dump_OBJECTINSTANCEA(const DIDEVICEOBJECTINSTANCEA *ddoi) {
148     TRACE("    - enumerating : %s ('%s') - %2d - 0x%08x - %s\n",
149         debugstr_guid(&ddoi->guidType), _dump_dinput_GUID(&ddoi->guidType), ddoi->dwOfs, ddoi->dwType, ddoi->tszName);
150 }
151
152 void _dump_OBJECTINSTANCEW(const DIDEVICEOBJECTINSTANCEW *ddoi) {
153     TRACE("    - enumerating : %s ('%s'), - %2d - 0x%08x - %s\n",
154         debugstr_guid(&ddoi->guidType), _dump_dinput_GUID(&ddoi->guidType), ddoi->dwOfs, ddoi->dwType, debugstr_w(ddoi->tszName));
155 }
156
157 /* This function is a helper to convert a GUID into any possible DInput GUID out there */
158 const char *_dump_dinput_GUID(const GUID *guid) {
159     unsigned int i;
160     static const struct {
161         const GUID *guid;
162         const char *name;
163     } guids[] = {
164 #define FE(x) { &x, #x}
165         FE(GUID_XAxis),
166         FE(GUID_YAxis),
167         FE(GUID_ZAxis),
168         FE(GUID_RxAxis),
169         FE(GUID_RyAxis),
170         FE(GUID_RzAxis),
171         FE(GUID_Slider),
172         FE(GUID_Button),
173         FE(GUID_Key),
174         FE(GUID_POV),
175         FE(GUID_Unknown),
176         FE(GUID_SysMouse),
177         FE(GUID_SysKeyboard),
178         FE(GUID_Joystick),
179         FE(GUID_ConstantForce),
180         FE(GUID_RampForce),
181         FE(GUID_Square),
182         FE(GUID_Sine),
183         FE(GUID_Triangle),
184         FE(GUID_SawtoothUp),
185         FE(GUID_SawtoothDown),
186         FE(GUID_Spring),
187         FE(GUID_Damper),
188         FE(GUID_Inertia),
189         FE(GUID_Friction),
190         FE(GUID_CustomForce)
191 #undef FE
192     };
193     if (guid == NULL)
194         return "null GUID";
195     for (i = 0; i < (sizeof(guids) / sizeof(guids[0])); i++) {
196         if (IsEqualGUID(guids[i].guid, guid)) {
197             return guids[i].name;
198         }
199     }
200     return debugstr_guid(guid);
201 }
202
203 void _dump_DIDATAFORMAT(const DIDATAFORMAT *df) {
204     unsigned int i;
205
206     TRACE("Dumping DIDATAFORMAT structure:\n");
207     TRACE("  - dwSize: %d\n", df->dwSize);
208     if (df->dwSize != sizeof(DIDATAFORMAT)) {
209         WARN("Non-standard DIDATAFORMAT structure size %d\n", df->dwSize);
210     }
211     TRACE("  - dwObjsize: %d\n", df->dwObjSize);
212     if (df->dwObjSize != sizeof(DIOBJECTDATAFORMAT)) {
213         WARN("Non-standard DIOBJECTDATAFORMAT structure size %d\n", df->dwObjSize);
214     }
215     TRACE("  - dwFlags: 0x%08x (", df->dwFlags);
216     switch (df->dwFlags) {
217         case DIDF_ABSAXIS: TRACE("DIDF_ABSAXIS"); break;
218         case DIDF_RELAXIS: TRACE("DIDF_RELAXIS"); break;
219         default: TRACE("unknown"); break;
220     }
221     TRACE(")\n");
222     TRACE("  - dwDataSize: %d\n", df->dwDataSize);
223     TRACE("  - dwNumObjs: %d\n", df->dwNumObjs);
224     
225     for (i = 0; i < df->dwNumObjs; i++) {
226         TRACE("  - Object %d:\n", i);
227         TRACE("      * GUID: %s ('%s')\n", debugstr_guid(df->rgodf[i].pguid), _dump_dinput_GUID(df->rgodf[i].pguid));
228         TRACE("      * dwOfs: %d\n", df->rgodf[i].dwOfs);
229         TRACE("      * dwType: 0x%08x\n", df->rgodf[i].dwType);
230         TRACE("        "); _dump_EnumObjects_flags(df->rgodf[i].dwType); TRACE("\n");
231         TRACE("      * dwFlags: 0x%08x\n", df->rgodf[i].dwFlags);
232     }
233 }
234
235 /******************************************************************************
236  * Get the default and the app-specific config keys.
237  */
238 BOOL get_app_key(HKEY *defkey, HKEY *appkey)
239 {
240     char buffer[MAX_PATH+16];
241     DWORD len;
242
243     *appkey = 0;
244
245     /* @@ Wine registry key: HKCU\Software\Wine\DirectInput */
246     if (RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\DirectInput", defkey))
247         *defkey = 0;
248
249     len = GetModuleFileNameA(0, buffer, MAX_PATH);
250     if (len && len < MAX_PATH)
251     {
252         HKEY tmpkey;
253
254         /* @@ Wine registry key: HKCU\Software\Wine\AppDefaults\app.exe\DirectInput */
255         if (!RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\AppDefaults", &tmpkey))
256         {
257             char *p, *appname = buffer;
258             if ((p = strrchr(appname, '/'))) appname = p + 1;
259             if ((p = strrchr(appname, '\\'))) appname = p + 1;
260             strcat(appname, "\\DirectInput");
261
262             if (RegOpenKeyA(tmpkey, appname, appkey)) *appkey = 0;
263             RegCloseKey(tmpkey);
264         }
265     }
266
267     return *defkey || *appkey;
268 }
269
270 /******************************************************************************
271  * Get a config key from either the app-specific or the default config
272  */
273 DWORD get_config_key( HKEY defkey, HKEY appkey, const char *name,
274                              char *buffer, DWORD size )
275 {
276     if (appkey && !RegQueryValueExA( appkey, name, 0, NULL, (LPBYTE)buffer, &size ))
277         return 0;
278
279     if (defkey && !RegQueryValueExA( defkey, name, 0, NULL, (LPBYTE)buffer, &size ))
280         return 0;
281
282     return ERROR_FILE_NOT_FOUND;
283 }
284
285 /* Conversion between internal data buffer and external data buffer */
286 void fill_DataFormat(void *out, DWORD size, const void *in, const DataFormat *df)
287 {
288     int i;
289     const char *in_c = in;
290     char *out_c = out;
291
292     memset(out, 0, size);
293     if (df->dt == NULL) {
294         /* This means that the app uses Wine's internal data format */
295         memcpy(out, in, min(size, df->internal_format_size));
296     } else {
297         for (i = 0; i < df->size; i++) {
298             if (df->dt[i].offset_in >= 0) {
299                 switch (df->dt[i].size) {
300                     case 1:
301                         TRACE("Copying (c) to %d from %d (value %d)\n",
302                               df->dt[i].offset_out, df->dt[i].offset_in, *(in_c + df->dt[i].offset_in));
303                         *(out_c + df->dt[i].offset_out) = *(in_c + df->dt[i].offset_in);
304                         break;
305
306                     case 2:
307                         TRACE("Copying (s) to %d from %d (value %d)\n",
308                               df->dt[i].offset_out, df->dt[i].offset_in, *((const short *)(in_c + df->dt[i].offset_in)));
309                         *((short *)(out_c + df->dt[i].offset_out)) = *((const short *)(in_c + df->dt[i].offset_in));
310                         break;
311
312                     case 4:
313                         TRACE("Copying (i) to %d from %d (value %d)\n",
314                               df->dt[i].offset_out, df->dt[i].offset_in, *((const int *)(in_c + df->dt[i].offset_in)));
315                         *((int *)(out_c + df->dt[i].offset_out)) = *((const int *)(in_c + df->dt[i].offset_in));
316                         break;
317
318                     default:
319                         memcpy((out_c + df->dt[i].offset_out), (in_c + df->dt[i].offset_in), df->dt[i].size);
320                         break;
321                 }
322             } else {
323                 switch (df->dt[i].size) {
324                     case 1:
325                         TRACE("Copying (c) to %d default value %d\n",
326                               df->dt[i].offset_out, df->dt[i].value);
327                         *(out_c + df->dt[i].offset_out) = (char) df->dt[i].value;
328                         break;
329                         
330                     case 2:
331                         TRACE("Copying (s) to %d default value %d\n",
332                               df->dt[i].offset_out, df->dt[i].value);
333                         *((short *) (out_c + df->dt[i].offset_out)) = (short) df->dt[i].value;
334                         break;
335                         
336                     case 4:
337                         TRACE("Copying (i) to %d default value %d\n",
338                               df->dt[i].offset_out, df->dt[i].value);
339                         *((int *) (out_c + df->dt[i].offset_out)) = df->dt[i].value;
340                         break;
341                         
342                     default:
343                         memset((out_c + df->dt[i].offset_out), 0, df->dt[i].size);
344                         break;
345                 }
346             }
347         }
348     }
349 }
350
351 void release_DataFormat(DataFormat * format)
352 {
353     TRACE("Deleting DataFormat: %p\n", format);
354
355     HeapFree(GetProcessHeap(), 0, format->dt);
356     format->dt = NULL;
357     HeapFree(GetProcessHeap(), 0, format->offsets);
358     format->offsets = NULL;
359     HeapFree(GetProcessHeap(), 0, format->user_df);
360     format->user_df = NULL;
361 }
362
363 static inline LPDIOBJECTDATAFORMAT dataformat_to_odf(LPCDIDATAFORMAT df, int idx)
364 {
365     if (idx < 0 || idx >= df->dwNumObjs) return NULL;
366     return (LPDIOBJECTDATAFORMAT)((LPBYTE)df->rgodf + idx * df->dwObjSize);
367 }
368
369 static HRESULT create_DataFormat(LPCDIDATAFORMAT asked_format, DataFormat *format)
370 {
371     DataTransform *dt;
372     unsigned int i, j;
373     int same = 1;
374     int *done;
375     int index = 0;
376     DWORD next = 0;
377
378     if (!format->wine_df) return DIERR_INVALIDPARAM;
379     done = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, asked_format->dwNumObjs * sizeof(int));
380     dt = HeapAlloc(GetProcessHeap(), 0, asked_format->dwNumObjs * sizeof(DataTransform));
381     if (!dt || !done) goto failed;
382
383     if (!(format->offsets = HeapAlloc(GetProcessHeap(), 0, format->wine_df->dwNumObjs * sizeof(int))))
384         goto failed;
385
386     if (!(format->user_df = HeapAlloc(GetProcessHeap(), 0, asked_format->dwSize)))
387         goto failed;
388     memcpy(format->user_df, asked_format, asked_format->dwSize);
389
390     TRACE("Creating DataTransform :\n");
391     
392     for (i = 0; i < format->wine_df->dwNumObjs; i++)
393     {
394         format->offsets[i] = -1;
395
396         for (j = 0; j < asked_format->dwNumObjs; j++) {
397             if (done[j] == 1)
398                 continue;
399             
400             if (/* Check if the application either requests any GUID and if not, it if matches
401                  * the GUID of the Wine object.
402                  */
403                 ((asked_format->rgodf[j].pguid == NULL) ||
404                  (format->wine_df->rgodf[i].pguid == NULL) ||
405                  (IsEqualGUID(format->wine_df->rgodf[i].pguid, asked_format->rgodf[j].pguid)))
406                 &&
407                 (/* Then check if it accepts any instance id, and if not, if it matches Wine's
408                   * instance id.
409                   */
410                  ((asked_format->rgodf[j].dwType & DIDFT_INSTANCEMASK) == DIDFT_ANYINSTANCE) ||
411                  (DIDFT_GETINSTANCE(asked_format->rgodf[j].dwType) == 0x00FF) || /* This is mentionned in no DX docs, but it works fine - tested on WinXP */
412                  (DIDFT_GETINSTANCE(asked_format->rgodf[j].dwType) == DIDFT_GETINSTANCE(format->wine_df->rgodf[i].dwType)))
413                 &&
414                 ( /* Then if the asked type matches the one Wine provides */
415                  DIDFT_GETTYPE(asked_format->rgodf[j].dwType) & format->wine_df->rgodf[i].dwType))
416             {
417                 done[j] = 1;
418                 
419                 TRACE("Matching :\n");
420                 TRACE("   - Asked (%d) :\n", j);
421                 TRACE("       * GUID: %s ('%s')\n",
422                       debugstr_guid(asked_format->rgodf[j].pguid),
423                       _dump_dinput_GUID(asked_format->rgodf[j].pguid));
424                 TRACE("       * Offset: %3d\n", asked_format->rgodf[j].dwOfs);
425                 TRACE("       * dwType: %08x\n", asked_format->rgodf[j].dwType);
426                 TRACE("         "); _dump_EnumObjects_flags(asked_format->rgodf[j].dwType); TRACE("\n");
427                 
428                 TRACE("   - Wine  (%d) :\n", i);
429                 TRACE("       * GUID: %s ('%s')\n",
430                       debugstr_guid(format->wine_df->rgodf[i].pguid),
431                       _dump_dinput_GUID(format->wine_df->rgodf[i].pguid));
432                 TRACE("       * Offset: %3d\n", format->wine_df->rgodf[i].dwOfs);
433                 TRACE("       * dwType: %08x\n", format->wine_df->rgodf[i].dwType);
434                 TRACE("         "); _dump_EnumObjects_flags(format->wine_df->rgodf[i].dwType); TRACE("\n");
435                 
436                 if (format->wine_df->rgodf[i].dwType & DIDFT_BUTTON)
437                     dt[index].size = sizeof(BYTE);
438                 else
439                     dt[index].size = sizeof(DWORD);
440                 dt[index].offset_in = format->wine_df->rgodf[i].dwOfs;
441                 dt[index].offset_out = asked_format->rgodf[j].dwOfs;
442                 format->offsets[i]   = asked_format->rgodf[j].dwOfs;
443                 dt[index].value = 0;
444                 next = next + dt[index].size;
445                 
446                 if (format->wine_df->rgodf[i].dwOfs != dt[index].offset_out)
447                     same = 0;
448                 
449                 index++;
450                 break;
451             }
452         }
453     }
454
455     TRACE("Setting to default value :\n");
456     for (j = 0; j < asked_format->dwNumObjs; j++) {
457         if (done[j] == 0) {
458             TRACE("   - Asked (%d) :\n", j);
459             TRACE("       * GUID: %s ('%s')\n",
460                   debugstr_guid(asked_format->rgodf[j].pguid),
461                   _dump_dinput_GUID(asked_format->rgodf[j].pguid));
462             TRACE("       * Offset: %3d\n", asked_format->rgodf[j].dwOfs);
463             TRACE("       * dwType: %08x\n", asked_format->rgodf[j].dwType);
464             TRACE("         "); _dump_EnumObjects_flags(asked_format->rgodf[j].dwType); TRACE("\n");
465             
466             if (asked_format->rgodf[j].dwType & DIDFT_BUTTON)
467                 dt[index].size = sizeof(BYTE);
468             else
469                 dt[index].size = sizeof(DWORD);
470             dt[index].offset_in  = -1;
471             dt[index].offset_out = asked_format->rgodf[j].dwOfs;
472             if (asked_format->rgodf[j].dwType & DIDFT_POV)
473                 dt[index].value = -1;
474             else
475                 dt[index].value = 0;
476             index++;
477
478             same = 0;
479         }
480     }
481     
482     format->internal_format_size = format->wine_df->dwDataSize;
483     format->size = index;
484     if (same) {
485         HeapFree(GetProcessHeap(), 0, dt);
486         dt = NULL;
487     }
488     format->dt = dt;
489
490     HeapFree(GetProcessHeap(), 0, done);
491
492     return DI_OK;
493
494 failed:
495     HeapFree(GetProcessHeap(), 0, done);
496     HeapFree(GetProcessHeap(), 0, dt);
497     format->dt = NULL;
498     HeapFree(GetProcessHeap(), 0, format->offsets);
499     format->offsets = NULL;
500     HeapFree(GetProcessHeap(), 0, format->user_df);
501     format->user_df = NULL;
502
503     return DIERR_OUTOFMEMORY;
504 }
505
506 /* find an object by it's offset in a data format */
507 static int offset_to_object(const DataFormat *df, int offset)
508 {
509     int i;
510
511     if (!df->offsets) return -1;
512
513     for (i = 0; i < df->wine_df->dwNumObjs; i++)
514         if (df->offsets[i] == offset) return i;
515
516     return -1;
517 }
518
519 int id_to_object(LPCDIDATAFORMAT df, int id)
520 {
521     int i;
522
523     id &= 0x00ffffff;
524     for (i = 0; i < df->dwNumObjs; i++)
525         if ((dataformat_to_odf(df, i)->dwType & 0x00ffffff) == id)
526             return i;
527
528     return -1;
529 }
530
531 static int id_to_offset(const DataFormat *df, int id)
532 {
533     int obj = id_to_object(df->wine_df, id);
534
535     return obj >= 0 && df->offsets ? df->offsets[obj] : -1;
536 }
537
538 int find_property(const DataFormat *df, LPCDIPROPHEADER ph)
539 {
540     switch (ph->dwHow)
541     {
542         case DIPH_BYID:     return id_to_object(df->wine_df, ph->dwObj);
543         case DIPH_BYOFFSET: return offset_to_object(df, ph->dwObj);
544     }
545     FIXME("Unhandled ph->dwHow=='%04X'\n", (unsigned int)ph->dwHow);
546
547     return -1;
548 }
549
550 /******************************************************************************
551  *      queue_event - add new event to the ring queue
552  */
553
554 void queue_event(LPDIRECTINPUTDEVICE8A iface, int inst_id, DWORD data, DWORD time, DWORD seq)
555 {
556     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
557     int next_pos, ofs = id_to_offset(&This->data_format, inst_id);
558
559     /* Event is being set regardless of the queue state */
560     if (This->hEvent) SetEvent(This->hEvent);
561
562     if (!This->queue_len || This->overflow || ofs < 0) return;
563
564     next_pos = (This->queue_head + 1) % This->queue_len;
565     if (next_pos == This->queue_tail)
566     {
567         TRACE(" queue overflowed\n");
568         This->overflow = TRUE;
569         return;
570     }
571
572     TRACE(" queueing %d at offset %d (queue head %d / size %d)\n",
573           data, ofs, This->queue_head, This->queue_len);
574
575     This->data_queue[This->queue_head].dwOfs       = ofs;
576     This->data_queue[This->queue_head].dwData      = data;
577     This->data_queue[This->queue_head].dwTimeStamp = time;
578     This->data_queue[This->queue_head].dwSequence  = seq;
579     This->queue_head = next_pos;
580     /* Send event if asked */
581 }
582
583 /******************************************************************************
584  *      Acquire
585  */
586
587 HRESULT WINAPI IDirectInputDevice2WImpl_Acquire(LPDIRECTINPUTDEVICE8W iface)
588 {
589     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
590     HRESULT res;
591
592     if (!This->data_format.user_df) return DIERR_INVALIDPARAM;
593     if (This->dwCoopLevel & DISCL_FOREGROUND && This->win != GetForegroundWindow())
594         return DIERR_OTHERAPPHASPRIO;
595
596     EnterCriticalSection(&This->crit);
597     res = This->acquired ? S_FALSE : DI_OK;
598     This->acquired = 1;
599     if (res == DI_OK)
600     {
601         This->queue_head = This->queue_tail = This->overflow = 0;
602         check_dinput_hooks(iface);
603     }
604     LeaveCriticalSection(&This->crit);
605
606     return res;
607 }
608
609 HRESULT WINAPI IDirectInputDevice2AImpl_Acquire(LPDIRECTINPUTDEVICE8A iface)
610 {
611     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
612     return IDirectInputDevice2WImpl_Acquire(IDirectInputDevice8W_from_impl(This));
613 }
614
615
616 /******************************************************************************
617  *      Unacquire
618  */
619
620 HRESULT WINAPI IDirectInputDevice2WImpl_Unacquire(LPDIRECTINPUTDEVICE8W iface)
621 {
622     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
623     HRESULT res;
624
625     EnterCriticalSection(&This->crit);
626     res = !This->acquired ? DI_NOEFFECT : DI_OK;
627     This->acquired = 0;
628     if (res == DI_OK)
629         check_dinput_hooks(iface);
630     LeaveCriticalSection(&This->crit);
631
632     return res;
633 }
634
635 HRESULT WINAPI IDirectInputDevice2AImpl_Unacquire(LPDIRECTINPUTDEVICE8A iface)
636 {
637     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
638     return IDirectInputDevice2WImpl_Unacquire(IDirectInputDevice8W_from_impl(This));
639 }
640
641 /******************************************************************************
642  *      IDirectInputDeviceA
643  */
644
645 HRESULT WINAPI IDirectInputDevice2WImpl_SetDataFormat(LPDIRECTINPUTDEVICE8W iface, LPCDIDATAFORMAT df)
646 {
647     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
648     HRESULT res = DI_OK;
649
650     if (!df) return E_POINTER;
651     TRACE("(%p) %p\n", This, df);
652     _dump_DIDATAFORMAT(df);
653
654     if (df->dwSize != sizeof(DIDATAFORMAT)) return DIERR_INVALIDPARAM;
655     if (This->acquired) return DIERR_ACQUIRED;
656
657     EnterCriticalSection(&This->crit);
658
659     release_DataFormat(&This->data_format);
660     res = create_DataFormat(df, &This->data_format);
661
662     LeaveCriticalSection(&This->crit);
663     return res;
664 }
665
666 HRESULT WINAPI IDirectInputDevice2AImpl_SetDataFormat(LPDIRECTINPUTDEVICE8A iface, LPCDIDATAFORMAT df)
667 {
668     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
669     return IDirectInputDevice2WImpl_SetDataFormat(IDirectInputDevice8W_from_impl(This), df);
670 }
671
672 /******************************************************************************
673   *     SetCooperativeLevel
674   *
675   *  Set cooperative level and the source window for the events.
676   */
677 HRESULT WINAPI IDirectInputDevice2WImpl_SetCooperativeLevel(LPDIRECTINPUTDEVICE8W iface, HWND hwnd, DWORD dwflags)
678 {
679     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
680
681     TRACE("(%p) %p,0x%08x\n", This, hwnd, dwflags);
682     _dump_cooperativelevel_DI(dwflags);
683
684     if ((dwflags & (DISCL_EXCLUSIVE | DISCL_NONEXCLUSIVE)) == 0 ||
685         (dwflags & (DISCL_EXCLUSIVE | DISCL_NONEXCLUSIVE)) == (DISCL_EXCLUSIVE | DISCL_NONEXCLUSIVE) ||
686         (dwflags & (DISCL_FOREGROUND | DISCL_BACKGROUND)) == 0 ||
687         (dwflags & (DISCL_FOREGROUND | DISCL_BACKGROUND)) == (DISCL_FOREGROUND | DISCL_BACKGROUND))
688         return DIERR_INVALIDPARAM;
689
690     if (dwflags == (DISCL_NONEXCLUSIVE | DISCL_BACKGROUND))
691         hwnd = GetDesktopWindow();
692
693     if (!hwnd) return E_HANDLE;
694
695     /* For security reasons native does not allow exclusive background level
696        for mouse and keyboard only */
697     if (dwflags & DISCL_EXCLUSIVE && dwflags & DISCL_BACKGROUND &&
698         (IsEqualGUID(&This->guid, &GUID_SysMouse) ||
699          IsEqualGUID(&This->guid, &GUID_SysKeyboard)))
700         return DIERR_UNSUPPORTED;
701
702     /* Store the window which asks for the mouse */
703     EnterCriticalSection(&This->crit);
704     This->win = hwnd;
705     This->dwCoopLevel = dwflags;
706     LeaveCriticalSection(&This->crit);
707
708     return DI_OK;
709 }
710
711 HRESULT WINAPI IDirectInputDevice2AImpl_SetCooperativeLevel(LPDIRECTINPUTDEVICE8A iface, HWND hwnd, DWORD dwflags)
712 {
713     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
714     return IDirectInputDevice2WImpl_SetCooperativeLevel(IDirectInputDevice8W_from_impl(This), hwnd, dwflags);
715 }
716
717 /******************************************************************************
718   *     SetEventNotification : specifies event to be sent on state change
719   */
720 HRESULT WINAPI IDirectInputDevice2WImpl_SetEventNotification(LPDIRECTINPUTDEVICE8W iface, HANDLE event)
721 {
722     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
723
724     TRACE("(%p) %p\n", This, event);
725
726     EnterCriticalSection(&This->crit);
727     This->hEvent = event;
728     LeaveCriticalSection(&This->crit);
729     return DI_OK;
730 }
731
732 HRESULT WINAPI IDirectInputDevice2AImpl_SetEventNotification(LPDIRECTINPUTDEVICE8A iface, HANDLE event)
733 {
734     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
735     return IDirectInputDevice2WImpl_SetEventNotification(IDirectInputDevice8W_from_impl(This), event);
736 }
737
738
739 ULONG WINAPI IDirectInputDevice2WImpl_Release(LPDIRECTINPUTDEVICE8W iface)
740 {
741     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
742     ULONG ref;
743
744     ref = InterlockedDecrement(&(This->ref));
745     if (ref) return ref;
746
747     IDirectInputDevice_Unacquire(iface);
748     /* Reset the FF state, free all effects, etc */
749     IDirectInputDevice8_SendForceFeedbackCommand(iface, DISFFC_RESET);
750
751     HeapFree(GetProcessHeap(), 0, This->data_queue);
752
753     /* Free data format */
754     HeapFree(GetProcessHeap(), 0, This->data_format.wine_df->rgodf);
755     HeapFree(GetProcessHeap(), 0, This->data_format.wine_df);
756     release_DataFormat(&This->data_format);
757
758     EnterCriticalSection( &This->dinput->crit );
759     list_remove( &This->entry );
760     LeaveCriticalSection( &This->dinput->crit );
761
762     IDirectInput_Release(&This->dinput->IDirectInput7A_iface);
763     This->crit.DebugInfo->Spare[0] = 0;
764     DeleteCriticalSection(&This->crit);
765
766     HeapFree(GetProcessHeap(), 0, This);
767
768     return DI_OK;
769 }
770
771 ULONG WINAPI IDirectInputDevice2AImpl_Release(LPDIRECTINPUTDEVICE8A iface)
772 {
773     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
774     return IDirectInputDevice2WImpl_Release(IDirectInputDevice8W_from_impl(This));
775 }
776
777 HRESULT WINAPI IDirectInputDevice2AImpl_QueryInterface(
778         LPDIRECTINPUTDEVICE8A iface,REFIID riid,LPVOID *ppobj
779 )
780 {
781     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
782     
783     TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
784     if (IsEqualGUID(&IID_IUnknown,riid)) {
785         IDirectInputDevice2_AddRef(iface);
786         *ppobj = This;
787         return DI_OK;
788     }
789     if (IsEqualGUID(&IID_IDirectInputDeviceA,riid)) {
790         IDirectInputDevice2_AddRef(iface);
791         *ppobj = This;
792         return DI_OK;
793     }
794     if (IsEqualGUID(&IID_IDirectInputDevice2A,riid)) {
795         IDirectInputDevice2_AddRef(iface);
796         *ppobj = This;
797         return DI_OK;
798     }
799     if (IsEqualGUID(&IID_IDirectInputDevice7A,riid)) {
800         IDirectInputDevice7_AddRef(iface);
801         *ppobj = This;
802         return DI_OK;
803     }
804     if (IsEqualGUID(&IID_IDirectInputDevice8A,riid)) {
805         IDirectInputDevice8_AddRef(iface);
806         *ppobj = This;
807         return DI_OK;
808     }
809     TRACE("Unsupported interface !\n");
810     return E_FAIL;
811 }
812
813 HRESULT WINAPI IDirectInputDevice2WImpl_QueryInterface(
814         LPDIRECTINPUTDEVICE8W iface,REFIID riid,LPVOID *ppobj
815 )
816 {
817     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
818
819     TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj);
820     if (IsEqualGUID(&IID_IUnknown,riid)) {
821         IDirectInputDevice2_AddRef(iface);
822         *ppobj = This;
823         return DI_OK;
824     }
825     if (IsEqualGUID(&IID_IDirectInputDeviceW,riid)) {
826         IDirectInputDevice2_AddRef(iface);
827         *ppobj = This;
828         return DI_OK;
829     }
830     if (IsEqualGUID(&IID_IDirectInputDevice2W,riid)) {
831         IDirectInputDevice2_AddRef(iface);
832         *ppobj = This;
833         return DI_OK;
834     }
835     if (IsEqualGUID(&IID_IDirectInputDevice7W,riid)) {
836         IDirectInputDevice7_AddRef(iface);
837         *ppobj = This;
838         return DI_OK;
839     }
840     if (IsEqualGUID(&IID_IDirectInputDevice8W,riid)) {
841         IDirectInputDevice8_AddRef(iface);
842         *ppobj = This;
843         return DI_OK;
844     }
845     TRACE("Unsupported interface !\n");
846     return E_FAIL;
847 }
848
849 ULONG WINAPI IDirectInputDevice2WImpl_AddRef(LPDIRECTINPUTDEVICE8W iface)
850 {
851     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
852     return InterlockedIncrement(&This->ref);
853 }
854
855 ULONG WINAPI IDirectInputDevice2AImpl_AddRef(LPDIRECTINPUTDEVICE8A iface)
856 {
857     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
858     return IDirectInputDevice2WImpl_AddRef(IDirectInputDevice8W_from_impl(This));
859 }
860
861 HRESULT WINAPI IDirectInputDevice2AImpl_EnumObjects(LPDIRECTINPUTDEVICE8A iface,
862         LPDIENUMDEVICEOBJECTSCALLBACKA lpCallback, LPVOID lpvRef, DWORD dwFlags)
863 {
864     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
865     DIDEVICEOBJECTINSTANCEA ddoi;
866     int i;
867
868     TRACE("(%p) %p,%p flags:%08x)\n", iface, lpCallback, lpvRef, dwFlags);
869     TRACE("  - flags = ");
870     _dump_EnumObjects_flags(dwFlags);
871     TRACE("\n");
872
873     /* Only the fields till dwFFMaxForce are relevant */
874     memset(&ddoi, 0, sizeof(ddoi));
875     ddoi.dwSize = FIELD_OFFSET(DIDEVICEOBJECTINSTANCEA, dwFFMaxForce);
876
877     for (i = 0; i < This->data_format.wine_df->dwNumObjs; i++)
878     {
879         LPDIOBJECTDATAFORMAT odf = dataformat_to_odf(This->data_format.wine_df, i);
880
881         if (dwFlags != DIDFT_ALL && !(dwFlags & DIEFT_GETTYPE(odf->dwType))) continue;
882         if (IDirectInputDevice_GetObjectInfo(iface, &ddoi, odf->dwType, DIPH_BYID) != DI_OK)
883             continue;
884
885         if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) break;
886     }
887
888     return DI_OK;
889 }
890
891 HRESULT WINAPI IDirectInputDevice2WImpl_EnumObjects(LPDIRECTINPUTDEVICE8W iface,
892         LPDIENUMDEVICEOBJECTSCALLBACKW lpCallback, LPVOID lpvRef, DWORD dwFlags)
893 {
894     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
895     DIDEVICEOBJECTINSTANCEW ddoi;
896     int i;
897
898     TRACE("(%p) %p,%p flags:%08x)\n", iface, lpCallback, lpvRef, dwFlags);
899     TRACE("  - flags = ");
900     _dump_EnumObjects_flags(dwFlags);
901     TRACE("\n");
902
903     /* Only the fields till dwFFMaxForce are relevant */
904     memset(&ddoi, 0, sizeof(ddoi));
905     ddoi.dwSize = FIELD_OFFSET(DIDEVICEOBJECTINSTANCEW, dwFFMaxForce);
906
907     for (i = 0; i < This->data_format.wine_df->dwNumObjs; i++)
908     {
909         LPDIOBJECTDATAFORMAT odf = dataformat_to_odf(This->data_format.wine_df, i);
910
911         if (dwFlags != DIDFT_ALL && !(dwFlags & DIEFT_GETTYPE(odf->dwType))) continue;
912         if (IDirectInputDevice_GetObjectInfo(iface, &ddoi, odf->dwType, DIPH_BYID) != DI_OK)
913             continue;
914
915         if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) break;
916     }
917
918     return DI_OK;
919 }
920
921 /******************************************************************************
922  *      GetProperty
923  */
924
925 HRESULT WINAPI IDirectInputDevice2WImpl_GetProperty(LPDIRECTINPUTDEVICE8W iface, REFGUID rguid, LPDIPROPHEADER pdiph)
926 {
927     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
928
929     TRACE("(%p) %s,%p\n", iface, debugstr_guid(rguid), pdiph);
930     _dump_DIPROPHEADER(pdiph);
931
932     if (!IS_DIPROP(rguid)) return DI_OK;
933
934     switch (LOWORD(rguid))
935     {
936         case (DWORD_PTR) DIPROP_BUFFERSIZE:
937         {
938             LPDIPROPDWORD pd = (LPDIPROPDWORD)pdiph;
939
940             if (pdiph->dwSize != sizeof(DIPROPDWORD)) return DIERR_INVALIDPARAM;
941
942             pd->dwData = This->queue_len;
943             TRACE("buffersize = %d\n", pd->dwData);
944             break;
945         }
946         default:
947             FIXME("Unknown property %s\n", debugstr_guid(rguid));
948             return DIERR_INVALIDPARAM;
949     }
950
951     return DI_OK;
952 }
953
954 HRESULT WINAPI IDirectInputDevice2AImpl_GetProperty(LPDIRECTINPUTDEVICE8A iface, REFGUID rguid, LPDIPROPHEADER pdiph)
955 {
956     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
957     return IDirectInputDevice2WImpl_GetProperty(IDirectInputDevice8W_from_impl(This), rguid, pdiph);
958 }
959
960 /******************************************************************************
961  *      SetProperty
962  */
963
964 HRESULT WINAPI IDirectInputDevice2WImpl_SetProperty(
965         LPDIRECTINPUTDEVICE8W iface, REFGUID rguid, LPCDIPROPHEADER pdiph)
966 {
967     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
968
969     TRACE("(%p) %s,%p\n", iface, debugstr_guid(rguid), pdiph);
970     _dump_DIPROPHEADER(pdiph);
971
972     if (!IS_DIPROP(rguid)) return DI_OK;
973
974     switch (LOWORD(rguid))
975     {
976         case (DWORD_PTR) DIPROP_AXISMODE:
977         {
978             LPCDIPROPDWORD pd = (LPCDIPROPDWORD)pdiph;
979
980             if (pdiph->dwSize != sizeof(DIPROPDWORD)) return DIERR_INVALIDPARAM;
981             if (pdiph->dwHow == DIPH_DEVICE && pdiph->dwObj) return DIERR_INVALIDPARAM;
982             if (This->acquired) return DIERR_ACQUIRED;
983             if (pdiph->dwHow != DIPH_DEVICE) return DIERR_UNSUPPORTED;
984             if (!This->data_format.user_df) return DI_OK;
985
986             TRACE("Axis mode: %s\n", pd->dwData == DIPROPAXISMODE_ABS ? "absolute" :
987                                                                         "relative");
988
989             EnterCriticalSection(&This->crit);
990             This->data_format.user_df->dwFlags &= ~DIDFT_AXIS;
991             This->data_format.user_df->dwFlags |= pd->dwData == DIPROPAXISMODE_ABS ?
992                                                   DIDF_ABSAXIS : DIDF_RELAXIS;
993             LeaveCriticalSection(&This->crit);
994             break;
995         }
996         case (DWORD_PTR) DIPROP_BUFFERSIZE:
997         {
998             LPCDIPROPDWORD pd = (LPCDIPROPDWORD)pdiph;
999
1000             if (pdiph->dwSize != sizeof(DIPROPDWORD)) return DIERR_INVALIDPARAM;
1001             if (This->acquired) return DIERR_ACQUIRED;
1002
1003             TRACE("buffersize = %d\n", pd->dwData);
1004
1005             EnterCriticalSection(&This->crit);
1006             HeapFree(GetProcessHeap(), 0, This->data_queue);
1007
1008             This->data_queue = !pd->dwData ? NULL : HeapAlloc(GetProcessHeap(), 0,
1009                                 pd->dwData * sizeof(DIDEVICEOBJECTDATA));
1010             This->queue_head = This->queue_tail = This->overflow = 0;
1011             This->queue_len  = pd->dwData;
1012
1013             LeaveCriticalSection(&This->crit);
1014             break;
1015         }
1016         default:
1017             WARN("Unknown property %s\n", debugstr_guid(rguid));
1018             return DIERR_UNSUPPORTED;
1019     }
1020
1021     return DI_OK;
1022 }
1023
1024 HRESULT WINAPI IDirectInputDevice2AImpl_SetProperty(
1025         LPDIRECTINPUTDEVICE8A iface, REFGUID rguid, LPCDIPROPHEADER pdiph)
1026 {
1027     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1028     return IDirectInputDevice2WImpl_SetProperty(IDirectInputDevice8W_from_impl(This), rguid, pdiph);
1029 }
1030
1031 HRESULT WINAPI IDirectInputDevice2AImpl_GetObjectInfo(
1032         LPDIRECTINPUTDEVICE8A iface,
1033         LPDIDEVICEOBJECTINSTANCEA pdidoi,
1034         DWORD dwObj,
1035         DWORD dwHow)
1036 {
1037     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1038     DIDEVICEOBJECTINSTANCEW didoiW;
1039     HRESULT res;
1040
1041     if (!pdidoi ||
1042         (pdidoi->dwSize != sizeof(DIDEVICEOBJECTINSTANCEA) &&
1043          pdidoi->dwSize != sizeof(DIDEVICEOBJECTINSTANCE_DX3A)))
1044         return DIERR_INVALIDPARAM;
1045
1046     didoiW.dwSize = sizeof(didoiW);
1047     res = IDirectInputDevice2WImpl_GetObjectInfo(IDirectInputDevice8W_from_impl(This), &didoiW, dwObj, dwHow);
1048     if (res == DI_OK)
1049     {
1050         DWORD dwSize = pdidoi->dwSize;
1051
1052         memset(pdidoi, 0, pdidoi->dwSize);
1053         pdidoi->dwSize   = dwSize;
1054         pdidoi->guidType = didoiW.guidType;
1055         pdidoi->dwOfs    = didoiW.dwOfs;
1056         pdidoi->dwType   = didoiW.dwType;
1057         pdidoi->dwFlags  = didoiW.dwFlags;
1058     }
1059
1060     return res;
1061 }
1062
1063 HRESULT WINAPI IDirectInputDevice2WImpl_GetObjectInfo(
1064         LPDIRECTINPUTDEVICE8W iface,
1065         LPDIDEVICEOBJECTINSTANCEW pdidoi,
1066         DWORD dwObj,
1067         DWORD dwHow)
1068 {
1069     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
1070     DWORD dwSize;
1071     LPDIOBJECTDATAFORMAT odf;
1072     int idx = -1;
1073
1074     TRACE("(%p) %d(0x%08x) -> %p\n", This, dwHow, dwObj, pdidoi);
1075
1076     if (!pdidoi ||
1077         (pdidoi->dwSize != sizeof(DIDEVICEOBJECTINSTANCEW) &&
1078          pdidoi->dwSize != sizeof(DIDEVICEOBJECTINSTANCE_DX3W)))
1079         return DIERR_INVALIDPARAM;
1080
1081     switch (dwHow)
1082     {
1083     case DIPH_BYOFFSET:
1084         if (!This->data_format.offsets) break;
1085         for (idx = This->data_format.wine_df->dwNumObjs - 1; idx >= 0; idx--)
1086             if (This->data_format.offsets[idx] == dwObj) break;
1087         break;
1088     case DIPH_BYID:
1089         dwObj &= 0x00ffffff;
1090         for (idx = This->data_format.wine_df->dwNumObjs - 1; idx >= 0; idx--)
1091             if ((dataformat_to_odf(This->data_format.wine_df, idx)->dwType & 0x00ffffff) == dwObj)
1092                 break;
1093         break;
1094
1095     case DIPH_BYUSAGE:
1096         FIXME("dwHow = DIPH_BYUSAGE not implemented\n");
1097         break;
1098     default:
1099         WARN("invalid parameter: dwHow = %08x\n", dwHow);
1100         return DIERR_INVALIDPARAM;
1101     }
1102     if (idx < 0) return DIERR_OBJECTNOTFOUND;
1103
1104     odf = dataformat_to_odf(This->data_format.wine_df, idx);
1105     dwSize = pdidoi->dwSize; /* save due to memset below */
1106     memset(pdidoi, 0, pdidoi->dwSize);
1107     pdidoi->dwSize   = dwSize;
1108     if (odf->pguid) pdidoi->guidType = *odf->pguid;
1109     pdidoi->dwOfs    = This->data_format.offsets ? This->data_format.offsets[idx] : odf->dwOfs;
1110     pdidoi->dwType   = odf->dwType;
1111     pdidoi->dwFlags  = odf->dwFlags;
1112
1113     return DI_OK;
1114 }
1115
1116 HRESULT WINAPI IDirectInputDevice2WImpl_GetDeviceData(LPDIRECTINPUTDEVICE8W iface, DWORD dodsize,
1117                                                       LPDIDEVICEOBJECTDATA dod, LPDWORD entries, DWORD flags)
1118 {
1119     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
1120     HRESULT ret = DI_OK;
1121     int len;
1122
1123     TRACE("(%p) %p -> %p(%d) x%d, 0x%08x\n",
1124           This, dod, entries, entries ? *entries : 0, dodsize, flags);
1125
1126     if (!This->acquired)
1127         return DIERR_NOTACQUIRED;
1128     if (!This->queue_len)
1129         return DIERR_NOTBUFFERED;
1130     if (dodsize < sizeof(DIDEVICEOBJECTDATA_DX3))
1131         return DIERR_INVALIDPARAM;
1132
1133     IDirectInputDevice2_Poll(iface);
1134     EnterCriticalSection(&This->crit);
1135
1136     len = This->queue_head - This->queue_tail;
1137     if (len < 0) len += This->queue_len;
1138
1139     if ((*entries != INFINITE) && (len > *entries)) len = *entries;
1140
1141     if (dod)
1142     {
1143         int i;
1144         for (i = 0; i < len; i++)
1145         {
1146             int n = (This->queue_tail + i) % This->queue_len;
1147             memcpy((char *)dod + dodsize * i, This->data_queue + n, dodsize);
1148         }
1149     }
1150     *entries = len;
1151
1152     if (This->overflow)
1153         ret = DI_BUFFEROVERFLOW;
1154
1155     if (!(flags & DIGDD_PEEK))
1156     {
1157         /* Advance reading position */
1158         This->queue_tail = (This->queue_tail + len) % This->queue_len;
1159         This->overflow = FALSE;
1160     }
1161
1162     LeaveCriticalSection(&This->crit);
1163
1164     TRACE("Returning %d events queued\n", *entries);
1165     return ret;
1166 }
1167
1168 HRESULT WINAPI IDirectInputDevice2AImpl_GetDeviceData(LPDIRECTINPUTDEVICE8A iface, DWORD dodsize,
1169                                                       LPDIDEVICEOBJECTDATA dod, LPDWORD entries, DWORD flags)
1170 {
1171     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1172     return IDirectInputDevice2WImpl_GetDeviceData(IDirectInputDevice8W_from_impl(This), dodsize, dod, entries, flags);
1173 }
1174
1175 HRESULT WINAPI IDirectInputDevice2WImpl_RunControlPanel(LPDIRECTINPUTDEVICE8W iface, HWND hwndOwner, DWORD dwFlags)
1176 {
1177     FIXME("(this=%p,%p,0x%08x): stub!\n", iface, hwndOwner, dwFlags);
1178
1179     return DI_OK;
1180 }
1181
1182 HRESULT WINAPI IDirectInputDevice2AImpl_RunControlPanel(LPDIRECTINPUTDEVICE8A iface, HWND hwndOwner, DWORD dwFlags)
1183 {
1184     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1185     return IDirectInputDevice2WImpl_RunControlPanel(IDirectInputDevice8W_from_impl(This), hwndOwner, dwFlags);
1186 }
1187
1188 HRESULT WINAPI IDirectInputDevice2WImpl_Initialize(LPDIRECTINPUTDEVICE8W iface, HINSTANCE hinst, DWORD dwVersion,
1189                                                    REFGUID rguid)
1190 {
1191     FIXME("(this=%p,%p,%d,%s): stub!\n", iface, hinst, dwVersion, debugstr_guid(rguid));
1192     return DI_OK;
1193 }
1194
1195 HRESULT WINAPI IDirectInputDevice2AImpl_Initialize(LPDIRECTINPUTDEVICE8A iface, HINSTANCE hinst, DWORD dwVersion,
1196                                                    REFGUID rguid)
1197 {
1198     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1199     return IDirectInputDevice2WImpl_Initialize(IDirectInputDevice8W_from_impl(This), hinst, dwVersion, rguid);
1200 }
1201
1202 /******************************************************************************
1203  *      IDirectInputDevice2A
1204  */
1205
1206 HRESULT WINAPI IDirectInputDevice2WImpl_CreateEffect(LPDIRECTINPUTDEVICE8W iface, REFGUID rguid, LPCDIEFFECT lpeff,
1207                                                      LPDIRECTINPUTEFFECT *ppdef, LPUNKNOWN pUnkOuter)
1208 {
1209     FIXME("(this=%p,%s,%p,%p,%p): stub!\n", iface, debugstr_guid(rguid), lpeff, ppdef, pUnkOuter);
1210     return DI_OK;
1211 }
1212
1213 HRESULT WINAPI IDirectInputDevice2AImpl_CreateEffect(LPDIRECTINPUTDEVICE8A iface, REFGUID rguid, LPCDIEFFECT lpeff,
1214                                                      LPDIRECTINPUTEFFECT *ppdef, LPUNKNOWN pUnkOuter)
1215 {
1216     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1217     return IDirectInputDevice2WImpl_CreateEffect(IDirectInputDevice8W_from_impl(This), rguid, lpeff, ppdef, pUnkOuter);
1218 }
1219
1220 HRESULT WINAPI IDirectInputDevice2AImpl_EnumEffects(
1221         LPDIRECTINPUTDEVICE8A iface,
1222         LPDIENUMEFFECTSCALLBACKA lpCallback,
1223         LPVOID lpvRef,
1224         DWORD dwFlags)
1225 {
1226     FIXME("(this=%p,%p,%p,0x%08x): stub!\n",
1227           iface, lpCallback, lpvRef, dwFlags);
1228     
1229     return DI_OK;
1230 }
1231
1232 HRESULT WINAPI IDirectInputDevice2WImpl_EnumEffects(
1233         LPDIRECTINPUTDEVICE8W iface,
1234         LPDIENUMEFFECTSCALLBACKW lpCallback,
1235         LPVOID lpvRef,
1236         DWORD dwFlags)
1237 {
1238     FIXME("(this=%p,%p,%p,0x%08x): stub!\n",
1239           iface, lpCallback, lpvRef, dwFlags);
1240     
1241     return DI_OK;
1242 }
1243
1244 HRESULT WINAPI IDirectInputDevice2AImpl_GetEffectInfo(
1245         LPDIRECTINPUTDEVICE8A iface,
1246         LPDIEFFECTINFOA lpdei,
1247         REFGUID rguid)
1248 {
1249     FIXME("(this=%p,%p,%s): stub!\n",
1250           iface, lpdei, debugstr_guid(rguid));
1251     return DI_OK;
1252 }
1253
1254 HRESULT WINAPI IDirectInputDevice2WImpl_GetEffectInfo(
1255         LPDIRECTINPUTDEVICE8W iface,
1256         LPDIEFFECTINFOW lpdei,
1257         REFGUID rguid)
1258 {
1259     FIXME("(this=%p,%p,%s): stub!\n",
1260           iface, lpdei, debugstr_guid(rguid));
1261     return DI_OK;
1262 }
1263
1264 HRESULT WINAPI IDirectInputDevice2WImpl_GetForceFeedbackState(LPDIRECTINPUTDEVICE8W iface, LPDWORD pdwOut)
1265 {
1266     FIXME("(this=%p,%p): stub!\n", iface, pdwOut);
1267     return DI_OK;
1268 }
1269
1270 HRESULT WINAPI IDirectInputDevice2AImpl_GetForceFeedbackState(LPDIRECTINPUTDEVICE8A iface, LPDWORD pdwOut)
1271 {
1272     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1273     return IDirectInputDevice2WImpl_GetForceFeedbackState(IDirectInputDevice8W_from_impl(This), pdwOut);
1274 }
1275
1276 HRESULT WINAPI IDirectInputDevice2WImpl_SendForceFeedbackCommand(LPDIRECTINPUTDEVICE8W iface, DWORD dwFlags)
1277 {
1278     TRACE("(%p) 0x%08x:\n", iface, dwFlags);
1279     return DI_NOEFFECT;
1280 }
1281
1282 HRESULT WINAPI IDirectInputDevice2AImpl_SendForceFeedbackCommand(LPDIRECTINPUTDEVICE8A iface, DWORD dwFlags)
1283 {
1284     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1285     return IDirectInputDevice2WImpl_SendForceFeedbackCommand(IDirectInputDevice8W_from_impl(This), dwFlags);
1286 }
1287
1288 HRESULT WINAPI IDirectInputDevice2WImpl_EnumCreatedEffectObjects(LPDIRECTINPUTDEVICE8W iface,
1289         LPDIENUMCREATEDEFFECTOBJECTSCALLBACK lpCallback, LPVOID lpvRef, DWORD dwFlags)
1290 {
1291     FIXME("(this=%p,%p,%p,0x%08x): stub!\n", iface, lpCallback, lpvRef, dwFlags);
1292     return DI_OK;
1293 }
1294
1295 HRESULT WINAPI IDirectInputDevice2AImpl_EnumCreatedEffectObjects(LPDIRECTINPUTDEVICE8A iface,
1296         LPDIENUMCREATEDEFFECTOBJECTSCALLBACK lpCallback, LPVOID lpvRef, DWORD dwFlags)
1297 {
1298     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1299     return IDirectInputDevice2WImpl_EnumCreatedEffectObjects(IDirectInputDevice8W_from_impl(This), lpCallback, lpvRef, dwFlags);
1300 }
1301
1302 HRESULT WINAPI IDirectInputDevice2WImpl_Escape(LPDIRECTINPUTDEVICE8W iface, LPDIEFFESCAPE lpDIEEsc)
1303 {
1304     FIXME("(this=%p,%p): stub!\n", iface, lpDIEEsc);
1305     return DI_OK;
1306 }
1307
1308 HRESULT WINAPI IDirectInputDevice2AImpl_Escape(LPDIRECTINPUTDEVICE8A iface, LPDIEFFESCAPE lpDIEEsc)
1309 {
1310     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1311     return IDirectInputDevice2WImpl_Escape(IDirectInputDevice8W_from_impl(This), lpDIEEsc);
1312 }
1313
1314 HRESULT WINAPI IDirectInputDevice2WImpl_Poll(LPDIRECTINPUTDEVICE8W iface)
1315 {
1316     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8W(iface);
1317
1318     if (!This->acquired) return DIERR_NOTACQUIRED;
1319     /* Because wine devices do not need to be polled, just return DI_NOEFFECT */
1320     return DI_NOEFFECT;
1321 }
1322
1323 HRESULT WINAPI IDirectInputDevice2AImpl_Poll(LPDIRECTINPUTDEVICE8A iface)
1324 {
1325     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1326     return IDirectInputDevice2WImpl_Poll(IDirectInputDevice8W_from_impl(This));
1327 }
1328
1329 HRESULT WINAPI IDirectInputDevice2WImpl_SendDeviceData(LPDIRECTINPUTDEVICE8W iface, DWORD cbObjectData,
1330                                                        LPCDIDEVICEOBJECTDATA rgdod, LPDWORD pdwInOut,
1331                                                        DWORD dwFlags)
1332 {
1333     FIXME("(this=%p,0x%08x,%p,%p,0x%08x): stub!\n", iface, cbObjectData, rgdod, pdwInOut, dwFlags);
1334
1335     return DI_OK;
1336 }
1337
1338 HRESULT WINAPI IDirectInputDevice2AImpl_SendDeviceData(LPDIRECTINPUTDEVICE8A iface, DWORD cbObjectData,
1339                                                        LPCDIDEVICEOBJECTDATA rgdod, LPDWORD pdwInOut,
1340                                                        DWORD dwFlags)
1341 {
1342     IDirectInputDeviceImpl *This = impl_from_IDirectInputDevice8A(iface);
1343     return IDirectInputDevice2WImpl_SendDeviceData(IDirectInputDevice8W_from_impl(This), cbObjectData, rgdod,
1344                                                    pdwInOut, dwFlags);
1345 }
1346
1347 HRESULT WINAPI IDirectInputDevice7AImpl_EnumEffectsInFile(LPDIRECTINPUTDEVICE8A iface,
1348                                                           LPCSTR lpszFileName,
1349                                                           LPDIENUMEFFECTSINFILECALLBACK pec,
1350                                                           LPVOID pvRef,
1351                                                           DWORD dwFlags)
1352 {
1353     FIXME("(%p)->(%s,%p,%p,%08x): stub !\n", iface, lpszFileName, pec, pvRef, dwFlags);
1354     
1355     return DI_OK;
1356 }
1357
1358 HRESULT WINAPI IDirectInputDevice7WImpl_EnumEffectsInFile(LPDIRECTINPUTDEVICE8W iface,
1359                                                           LPCWSTR lpszFileName,
1360                                                           LPDIENUMEFFECTSINFILECALLBACK pec,
1361                                                           LPVOID pvRef,
1362                                                           DWORD dwFlags)
1363 {
1364     FIXME("(%p)->(%s,%p,%p,%08x): stub !\n", iface, debugstr_w(lpszFileName), pec, pvRef, dwFlags);
1365     
1366     return DI_OK;
1367 }
1368
1369 HRESULT WINAPI IDirectInputDevice7AImpl_WriteEffectToFile(LPDIRECTINPUTDEVICE8A iface,
1370                                                           LPCSTR lpszFileName,
1371                                                           DWORD dwEntries,
1372                                                           LPDIFILEEFFECT rgDiFileEft,
1373                                                           DWORD dwFlags)
1374 {
1375     FIXME("(%p)->(%s,%08x,%p,%08x): stub !\n", iface, lpszFileName, dwEntries, rgDiFileEft, dwFlags);
1376     
1377     return DI_OK;
1378 }
1379
1380 HRESULT WINAPI IDirectInputDevice7WImpl_WriteEffectToFile(LPDIRECTINPUTDEVICE8W iface,
1381                                                           LPCWSTR lpszFileName,
1382                                                           DWORD dwEntries,
1383                                                           LPDIFILEEFFECT rgDiFileEft,
1384                                                           DWORD dwFlags)
1385 {
1386     FIXME("(%p)->(%s,%08x,%p,%08x): stub !\n", iface, debugstr_w(lpszFileName), dwEntries, rgDiFileEft, dwFlags);
1387     
1388     return DI_OK;
1389 }
1390
1391 HRESULT WINAPI IDirectInputDevice8AImpl_BuildActionMap(LPDIRECTINPUTDEVICE8A iface,
1392                                                        LPDIACTIONFORMATA lpdiaf,
1393                                                        LPCSTR lpszUserName,
1394                                                        DWORD dwFlags)
1395 {
1396     FIXME("(%p)->(%p,%s,%08x): stub !\n", iface, lpdiaf, lpszUserName, dwFlags);
1397 #define X(x) if (dwFlags & x) FIXME("\tdwFlags =|"#x"\n");
1398         X(DIDBAM_DEFAULT)
1399         X(DIDBAM_PRESERVE)
1400         X(DIDBAM_INITIALIZE)
1401         X(DIDBAM_HWDEFAULTS)
1402 #undef X
1403     _dump_diactionformatA(lpdiaf);
1404     return DI_OK;
1405 }
1406
1407 HRESULT WINAPI IDirectInputDevice8WImpl_BuildActionMap(LPDIRECTINPUTDEVICE8W iface,
1408                                                        LPDIACTIONFORMATW lpdiaf,
1409                                                        LPCWSTR lpszUserName,
1410                                                        DWORD dwFlags)
1411 {
1412     FIXME("(%p)->(%p,%s,%08x): stub !\n", iface, lpdiaf, debugstr_w(lpszUserName), dwFlags);
1413 #define X(x) if (dwFlags & x) FIXME("\tdwFlags =|"#x"\n");
1414         X(DIDBAM_DEFAULT)
1415         X(DIDBAM_PRESERVE)
1416         X(DIDBAM_INITIALIZE)
1417         X(DIDBAM_HWDEFAULTS)
1418 #undef X
1419   
1420     return DI_OK;
1421 }
1422
1423 HRESULT WINAPI IDirectInputDevice8AImpl_SetActionMap(LPDIRECTINPUTDEVICE8A iface,
1424                                                      LPDIACTIONFORMATA lpdiaf,
1425                                                      LPCSTR lpszUserName,
1426                                                      DWORD dwFlags)
1427 {
1428     FIXME("(%p)->(%p,%s,%08x): stub !\n", iface, lpdiaf, lpszUserName, dwFlags);
1429     
1430     return DI_OK;
1431 }
1432
1433 HRESULT WINAPI IDirectInputDevice8WImpl_SetActionMap(LPDIRECTINPUTDEVICE8W iface,
1434                                                      LPDIACTIONFORMATW lpdiaf,
1435                                                      LPCWSTR lpszUserName,
1436                                                      DWORD dwFlags)
1437 {
1438     FIXME("(%p)->(%p,%s,%08x): stub !\n", iface, lpdiaf, debugstr_w(lpszUserName), dwFlags);
1439     
1440     return DI_OK;
1441 }
1442
1443 HRESULT WINAPI IDirectInputDevice8AImpl_GetImageInfo(LPDIRECTINPUTDEVICE8A iface,
1444                                                      LPDIDEVICEIMAGEINFOHEADERA lpdiDevImageInfoHeader)
1445 {
1446     FIXME("(%p)->(%p): stub !\n", iface, lpdiDevImageInfoHeader);
1447     
1448     return DI_OK;
1449 }
1450
1451 HRESULT WINAPI IDirectInputDevice8WImpl_GetImageInfo(LPDIRECTINPUTDEVICE8W iface,
1452                                                      LPDIDEVICEIMAGEINFOHEADERW lpdiDevImageInfoHeader)
1453 {
1454     FIXME("(%p)->(%p): stub !\n", iface, lpdiDevImageInfoHeader);
1455     
1456     return DI_OK;
1457 }