user32/tests: Add more systematic tests to validate the DDE client-side A<->W convers...
[wine/hacks.git] / dlls / winejoystick.drv / joystick.c
blob9a6902e62b31cab3bf83a5ff315a9acd199554f2
1 /*
2 * joystick functions
4 * Copyright 1997 Andreas Mohr
5 * Copyright 2000 Wolfgang Schwotzer
6 * Copyright 2002 David Hagood
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.
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.
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
22 * NOTES:
24 * - nearly all joystick functions can be regarded as obsolete,
25 * as Linux (2.1.x) now supports extended joysticks with a completely
26 * new joystick driver interface
27 * New driver's documentation says:
28 * "For backward compatibility the old interface is still included,
29 * but will be dropped in the future."
30 * Thus we should implement the new interface and at most keep the old
31 * routines for backward compatibility.
32 * - better support of enhanced joysticks (Linux 2.2 interface is available)
33 * - support more joystick drivers (like the XInput extension)
34 * - should load joystick DLL as any other driver (instead of hardcoding)
35 * the driver's name, and load it as any low lever driver.
38 #include "config.h"
39 #include "wine/port.h"
41 #ifdef HAVE_UNISTD_H
42 # include <unistd.h>
43 #endif
44 #include <stdarg.h>
45 #include <stdio.h>
46 #include <stdlib.h>
47 #include <string.h>
48 #include <fcntl.h>
49 #ifdef HAVE_SYS_IOCTL_H
50 #include <sys/ioctl.h>
51 #endif
52 #ifdef HAVE_LINUX_IOCTL_H
53 #include <linux/ioctl.h>
54 #endif
55 #ifdef HAVE_LINUX_JOYSTICK_H
56 #include <linux/joystick.h>
57 #ifdef SW_MAX
58 #undef SW_MAX
59 #endif
60 #define JOYDEV_NEW "/dev/input/js%d"
61 #define JOYDEV_OLD "/dev/js%d"
62 #endif
63 #ifdef HAVE_SYS_ERRNO_H
64 #include <sys/errno.h>
65 #endif
67 #include "windef.h"
68 #include "winbase.h"
69 #include "wingdi.h"
70 #include "winuser.h"
71 #include "winnls.h"
72 #include "mmddk.h"
73 #include "wine/debug.h"
75 #include "wine/unicode.h"
77 WINE_DEFAULT_DEBUG_CHANNEL(joystick);
79 #ifdef HAVE_LINUX_JOYSTICK_H
81 #define MAXJOYSTICK (JOYSTICKID2 + 30)
83 typedef struct tagWINE_JSTCK {
84 int joyIntf;
85 int in_use;
86 /* Some extra info we need to make this actually work under the
87 Linux 2.2 event api.
88 First of all, we cannot keep closing and reopening the device file -
89 that blows away the state of the stick device, and we lose events. So, we
90 need to open the low-level device once, and close it when we are done.
92 Secondly, the event API only gives us what's changed. However, Windows apps
93 want the whole state every time, so we have to cache the data.
96 int dev; /* Linux level device file descriptor */
97 int x;
98 int y;
99 int z;
100 int r;
101 int u;
102 int v;
103 int pov_x;
104 int pov_y;
105 int buttons;
106 char axesMap[ABS_MAX + 1];
107 } WINE_JSTCK;
109 static WINE_JSTCK JSTCK_Data[MAXJOYSTICK];
111 /**************************************************************************
112 * JSTCK_drvGet [internal]
114 static WINE_JSTCK *JSTCK_drvGet(DWORD_PTR dwDevID)
116 int p;
118 if ((dwDevID - (DWORD_PTR)JSTCK_Data) % sizeof(JSTCK_Data[0]) != 0)
119 return NULL;
120 p = (dwDevID - (DWORD_PTR)JSTCK_Data) / sizeof(JSTCK_Data[0]);
121 if (p < 0 || p >= MAXJOYSTICK || !((WINE_JSTCK*)dwDevID)->in_use)
122 return NULL;
124 return (WINE_JSTCK*)dwDevID;
127 /**************************************************************************
128 * JSTCK_drvOpen [internal]
130 static LRESULT JSTCK_drvOpen(LPSTR str, DWORD dwIntf)
132 if (dwIntf >= MAXJOYSTICK || JSTCK_Data[dwIntf].in_use)
133 return 0;
135 JSTCK_Data[dwIntf].joyIntf = dwIntf;
136 JSTCK_Data[dwIntf].in_use = 1;
137 return (LRESULT)&JSTCK_Data[dwIntf];
140 /**************************************************************************
141 * JSTCK_drvClose [internal]
143 static LRESULT JSTCK_drvClose(DWORD_PTR dwDevID)
145 WINE_JSTCK* jstck = JSTCK_drvGet(dwDevID);
147 if (jstck == NULL)
148 return 0;
149 jstck->in_use = 0;
150 if (jstck->dev > 0)
152 close(jstck->dev);
153 jstck->dev = 0;
155 return 1;
158 struct js_status
160 int buttons;
161 int x;
162 int y;
165 /**************************************************************************
166 * JSTCK_OpenDevice [internal]
168 static int JSTCK_OpenDevice(WINE_JSTCK* jstick)
170 char buf[20];
171 int flags;
173 if (jstick->dev > 0)
174 return jstick->dev;
176 sprintf(buf, JOYDEV_NEW, jstick->joyIntf);
177 #ifdef HAVE_LINUX_22_JOYSTICK_API
178 flags = O_RDONLY | O_NONBLOCK;
179 #else
180 flags = O_RDONLY;
181 #endif
182 if ((jstick->dev = open(buf, flags)) < 0) {
183 sprintf(buf, JOYDEV_OLD, jstick->joyIntf);
184 if ((jstick->dev = open(buf, flags)) < 0)
185 return jstick->dev;
187 #ifdef HAVE_LINUX_22_JOYSTICK_API
188 ioctl(jstick->dev, JSIOCGAXMAP, jstick->axesMap);
189 #endif
190 return jstick->dev;
194 /**************************************************************************
195 * JoyGetDevCaps [MMSYSTEM.102]
197 static LRESULT JSTCK_GetDevCaps(DWORD_PTR dwDevID, LPJOYCAPSW lpCaps, DWORD dwSize)
199 WINE_JSTCK* jstck;
200 #ifdef HAVE_LINUX_22_JOYSTICK_API
201 int dev;
202 char nrOfAxes;
203 char nrOfButtons;
204 char identString[MAXPNAMELEN];
205 int i;
206 int driverVersion;
207 #else
208 static const WCHAR ini[] = {'W','i','n','e',' ','J','o','y','s','t','i','c','k',' ','D','r','i','v','e','r',0};
209 #endif
211 if ((jstck = JSTCK_drvGet(dwDevID)) == NULL)
212 return MMSYSERR_NODRIVER;
214 #ifdef HAVE_LINUX_22_JOYSTICK_API
215 if ((dev = JSTCK_OpenDevice(jstck)) < 0) return JOYERR_PARMS;
216 ioctl(dev, JSIOCGAXES, &nrOfAxes);
217 ioctl(dev, JSIOCGBUTTONS, &nrOfButtons);
218 ioctl(dev, JSIOCGVERSION, &driverVersion);
219 ioctl(dev, JSIOCGNAME(sizeof(identString)), identString);
220 TRACE("Driver: 0x%06x, Name: %s, #Axes: %d, #Buttons: %d\n",
221 driverVersion, identString, nrOfAxes, nrOfButtons);
222 lpCaps->wMid = MM_MICROSOFT;
223 lpCaps->wPid = MM_PC_JOYSTICK;
224 MultiByteToWideChar(CP_UNIXCP, 0, identString, -1, lpCaps->szPname, MAXPNAMELEN);
225 lpCaps->szPname[MAXPNAMELEN-1] = '\0';
226 lpCaps->wXmin = 0;
227 lpCaps->wXmax = 0xFFFF;
228 lpCaps->wYmin = 0;
229 lpCaps->wYmax = 0xFFFF;
230 lpCaps->wZmin = 0;
231 lpCaps->wZmax = (nrOfAxes >= 3) ? 0xFFFF : 0;
232 #ifdef BODGE_THE_HAT
233 /* HalfLife won't allow you to map an axis event to things like
234 "next weapon" and "use". Linux reports the hat on my stick as
235 axis U and V. So, IFF BODGE_THE_HAT is defined, lie through our
236 teeth and say we have 32 buttons, and we will map the axises to
237 the high buttons. Really, perhaps this should be a registry entry,
238 or even a parameter to the Linux joystick driver (which would completely
239 remove the need for this.)
241 lpCaps->wNumButtons = 32;
242 #else
243 lpCaps->wNumButtons = nrOfButtons;
244 #endif
245 if (dwSize == sizeof(JOYCAPSW)) {
246 /* complete 95 structure */
247 lpCaps->wRmin = 0;
248 lpCaps->wRmax = 0xFFFF;
249 lpCaps->wUmin = 0;
250 lpCaps->wUmax = 0xFFFF;
251 lpCaps->wVmin = 0;
252 lpCaps->wVmax = 0xFFFF;
253 lpCaps->wMaxAxes = 6; /* same as MS Joystick Driver */
254 lpCaps->wNumAxes = 0; /* nr of axes in use */
255 lpCaps->wMaxButtons = 32; /* same as MS Joystick Driver */
256 lpCaps->szRegKey[0] = 0;
257 lpCaps->szOEMVxD[0] = 0;
258 lpCaps->wCaps = 0;
259 for (i = 0; i < nrOfAxes; i++) {
260 switch (jstck->axesMap[i]) {
261 case 0: /* X */
262 case 1: /* Y */
263 lpCaps->wNumAxes++;
264 break;
265 case 2: /* Z */
266 case 6: /* Throttle */
267 lpCaps->wNumAxes++;
268 lpCaps->wCaps |= JOYCAPS_HASZ;
269 break;
270 case 5: /* Rz */
271 case 7: /* Rudder */
272 lpCaps->wNumAxes++;
273 lpCaps->wCaps |= JOYCAPS_HASR;
274 break;
275 case 3: /* Rx */
276 lpCaps->wNumAxes++;
277 lpCaps->wCaps |= JOYCAPS_HASU;
278 break;
279 case 4: /* Ry */
280 lpCaps->wNumAxes++;
281 lpCaps->wCaps |= JOYCAPS_HASV;
282 break;
283 case 16: /* Hat 0 X */
284 case 17: /* Hat 0 Y */
285 lpCaps->wCaps |= JOYCAPS_HASPOV | JOYCAPS_POV4DIR;
286 /* TODO: JOYCAPS_POVCTS handling */
287 break;
288 default:
289 WARN("Unknown axis %hhu(%hhu). Skipped.\n", jstck->axesMap[i], i);
293 #else
294 lpCaps->wMid = MM_MICROSOFT;
295 lpCaps->wPid = MM_PC_JOYSTICK;
296 strcpyW(lpCaps->szPname, ini); /* joystick product name */
297 lpCaps->wXmin = 0;
298 lpCaps->wXmax = 0xFFFF;
299 lpCaps->wYmin = 0;
300 lpCaps->wYmax = 0xFFFF;
301 lpCaps->wZmin = 0;
302 lpCaps->wZmax = 0;
303 lpCaps->wNumButtons = 2;
304 if (dwSize == sizeof(JOYCAPSW)) {
305 /* complete 95 structure */
306 lpCaps->wRmin = 0;
307 lpCaps->wRmax = 0;
308 lpCaps->wUmin = 0;
309 lpCaps->wUmax = 0;
310 lpCaps->wVmin = 0;
311 lpCaps->wVmax = 0;
312 lpCaps->wCaps = 0;
313 lpCaps->wMaxAxes = 2;
314 lpCaps->wNumAxes = 2;
315 lpCaps->wMaxButtons = 4;
316 lpCaps->szRegKey[0] = 0;
317 lpCaps->szOEMVxD[0] = 0;
319 #endif
321 return JOYERR_NOERROR;
324 /**************************************************************************
325 * JSTCK_GetPos [internal]
327 static LRESULT JSTCK_GetPosEx(DWORD_PTR dwDevID, LPJOYINFOEX lpInfo)
329 WINE_JSTCK* jstck;
330 int dev;
331 #ifdef HAVE_LINUX_22_JOYSTICK_API
332 struct js_event ev;
333 #else
334 struct js_status js;
335 int dev_stat;
336 #endif
338 if ((jstck = JSTCK_drvGet(dwDevID)) == NULL)
339 return MMSYSERR_NODRIVER;
341 if ((dev = JSTCK_OpenDevice(jstck)) < 0) return JOYERR_PARMS;
343 #ifdef HAVE_LINUX_22_JOYSTICK_API
344 while ((read(dev, &ev, sizeof(struct js_event))) > 0) {
345 if (ev.type == (JS_EVENT_AXIS)) {
346 switch (jstck->axesMap[ev.number]) {
347 case 0: /* X */
348 jstck->x = ev.value;
349 break;
350 case 1: /* Y */
351 jstck->y = ev.value;
352 break;
353 case 2: /* Z */
354 case 6: /* Throttle */
355 jstck->z = ev.value;
356 break;
357 case 5: /* Rz */
358 case 7: /* Rudder */
359 jstck->r = ev.value;
360 break;
361 case 3: /* Rx */
362 jstck->u = ev.value;
363 break;
364 case 4: /* Ry */
365 jstck->v = ev.value;
366 break;
367 case 16: /* Hat 0 X */
368 jstck->pov_x = ev.value;
369 break;
370 case 17: /* Hat 0 Y */
371 jstck->pov_y = ev.value;
372 break;
373 default:
374 FIXME("Unknown joystick event '%d'\n", ev.number);
376 } else if (ev.type == (JS_EVENT_BUTTON)) {
377 if (ev.value) {
378 jstck->buttons |= (1 << ev.number);
379 /* FIXME: what to do for this field when
380 * multiple buttons are depressed ?
382 if (lpInfo->dwFlags & JOY_RETURNBUTTONS)
383 lpInfo->dwButtonNumber = ev.number + 1;
385 else
386 jstck->buttons &= ~(1 << ev.number);
389 /* EAGAIN is returned when the queue is empty */
390 if (errno != EAGAIN) {
391 /* FIXME: error should not be ignored */
392 ERR("Error while reading joystick state (%s)\n", strerror(errno));
394 /* Now, copy the cached values into Window's structure... */
395 if (lpInfo->dwFlags & JOY_RETURNBUTTONS)
396 lpInfo->dwButtons = jstck->buttons;
397 if (lpInfo->dwFlags & JOY_RETURNX)
398 lpInfo->dwXpos = jstck->x + 32767;
399 if (lpInfo->dwFlags & JOY_RETURNY)
400 lpInfo->dwYpos = jstck->y + 32767;
401 if (lpInfo->dwFlags & JOY_RETURNZ)
402 lpInfo->dwZpos = jstck->z + 32767;
403 if (lpInfo->dwFlags & JOY_RETURNR)
404 lpInfo->dwRpos = jstck->r + 32767;
405 # ifdef BODGE_THE_HAT
406 else if (lpInfo->dwFlags & JOY_RETURNBUTTONS)
408 if (jstck->r > 0)
409 lpInfo->dwButtons |= 1<<7;
410 else if (jstck->r < 0)
411 lpInfo->dwButtons |= 1<<8;
413 # endif
414 if (lpInfo->dwFlags & JOY_RETURNU)
415 lpInfo->dwUpos = jstck->u + 32767;
416 # ifdef BODGE_THE_HAT
417 else if (lpInfo->dwFlags & JOY_RETURNBUTTONS)
419 if (jstck->u > 0)
420 lpInfo->dwButtons |= 1<<9;
421 else if (jstck->u < 0)
422 lpInfo->dwButtons |= 1<<10;
424 # endif
425 if (lpInfo->dwFlags & JOY_RETURNV)
426 lpInfo->dwVpos = jstck->v + 32767;
427 if (lpInfo->dwFlags & JOY_RETURNPOV) {
428 if (jstck->pov_y > 0) {
429 if (jstck->pov_x < 0)
430 lpInfo->dwPOV = 22500; /* SW */
431 else if (jstck->pov_x > 0)
432 lpInfo->dwPOV = 13500; /* SE */
433 else
434 lpInfo->dwPOV = 18000; /* S, JOY_POVBACKWARD */
435 } else if (jstck->pov_y < 0) {
436 if (jstck->pov_x < 0)
437 lpInfo->dwPOV = 31500; /* NW */
438 else if (jstck->pov_x > 0)
439 lpInfo->dwPOV = 4500; /* NE */
440 else
441 lpInfo->dwPOV = 0; /* N, JOY_POVFORWARD */
442 } else if (jstck->pov_x < 0)
443 lpInfo->dwPOV = 27000; /* W, JOY_POVLEFT */
444 else if (jstck->pov_x > 0)
445 lpInfo->dwPOV = 9000; /* E, JOY_POVRIGHT */
446 else
447 lpInfo->dwPOV = JOY_POVCENTERED; /* Center */
450 #else
451 dev_stat = read(dev, &js, sizeof(js));
452 if (dev_stat != sizeof(js)) {
453 return JOYERR_UNPLUGGED; /* FIXME: perhaps wrong, but what should I return else ? */
455 js.x = js.x<<8;
456 js.y = js.y<<8;
457 if (lpInfo->dwFlags & JOY_RETURNX)
458 lpInfo->dwXpos = js.x; /* FIXME: perhaps multiply it somehow ? */
459 if (lpInfo->dwFlags & JOY_RETURNY)
460 lpInfo->dwYpos = js.y;
461 if (lpInfo->dwFlags & JOY_RETURNBUTTONS)
462 lpInfo->dwButtons = js.buttons;
463 #endif
465 TRACE("x: %d, y: %d, z: %d, r: %d, u: %d, v: %d, buttons: 0x%04x, flags: 0x%04x (fd %d)\n",
466 lpInfo->dwXpos, lpInfo->dwYpos, lpInfo->dwZpos,
467 lpInfo->dwRpos, lpInfo->dwUpos, lpInfo->dwVpos,
468 lpInfo->dwButtons, lpInfo->dwFlags, dev
471 return JOYERR_NOERROR;
474 /**************************************************************************
475 * JSTCK_GetPos [internal]
477 static LRESULT JSTCK_GetPos(DWORD_PTR dwDevID, LPJOYINFO lpInfo)
479 JOYINFOEX ji;
480 LONG ret;
482 memset(&ji, 0, sizeof(ji));
484 ji.dwSize = sizeof(ji);
485 ji.dwFlags = JOY_RETURNX | JOY_RETURNY | JOY_RETURNZ | JOY_RETURNBUTTONS;
486 ret = JSTCK_GetPosEx(dwDevID, &ji);
487 if (ret == JOYERR_NOERROR) {
488 lpInfo->wXpos = ji.dwXpos;
489 lpInfo->wYpos = ji.dwYpos;
490 lpInfo->wZpos = ji.dwZpos;
491 lpInfo->wButtons = ji.dwButtons;
494 return ret;
497 /**************************************************************************
498 * DriverProc (JOYSTICK.@)
500 LRESULT CALLBACK JSTCK_DriverProc(DWORD_PTR dwDevID, HDRVR hDriv, UINT wMsg,
501 LPARAM dwParam1, LPARAM dwParam2)
503 /* EPP TRACE("(%08lX, %04X, %08lX, %08lX, %08lX)\n", */
504 /* EPP dwDevID, hDriv, wMsg, dwParam1, dwParam2); */
506 switch(wMsg) {
507 case DRV_LOAD: return 1;
508 case DRV_FREE: return 1;
509 case DRV_OPEN: return JSTCK_drvOpen((LPSTR)dwParam1, dwParam2);
510 case DRV_CLOSE: return JSTCK_drvClose(dwDevID);
511 case DRV_ENABLE: return 1;
512 case DRV_DISABLE: return 1;
513 case DRV_QUERYCONFIGURE: return 1;
514 case DRV_CONFIGURE: MessageBoxA(0, "JoyStick MultiMedia Driver !", "JoyStick Driver", MB_OK); return 1;
515 case DRV_INSTALL: return DRVCNF_RESTART;
516 case DRV_REMOVE: return DRVCNF_RESTART;
518 case JDD_GETNUMDEVS: return 1;
519 case JDD_GETDEVCAPS: return JSTCK_GetDevCaps(dwDevID, (LPJOYCAPSW)dwParam1, dwParam2);
520 case JDD_GETPOS: return JSTCK_GetPos(dwDevID, (LPJOYINFO)dwParam1);
521 case JDD_SETCALIBRATION:
522 case JDD_CONFIGCHANGED: return JOYERR_NOCANDO;
523 case JDD_GETPOSEX: return JSTCK_GetPosEx(dwDevID, (LPJOYINFOEX)dwParam1);
524 default:
525 return DefDriverProc(dwDevID, hDriv, wMsg, dwParam1, dwParam2);
529 #else
531 /**************************************************************************
532 * DriverProc (JOYSTICK.@)
534 LRESULT CALLBACK JSTCK_DriverProc(DWORD_PTR dwDevID, HDRVR hDriv, UINT wMsg,
535 LPARAM dwParam1, LPARAM dwParam2)
537 /* EPP TRACE("(%08lX, %04X, %08lX, %08lX, %08lX)\n", */
538 /* EPP dwDevID, hDriv, wMsg, dwParam1, dwParam2); */
540 switch(wMsg) {
541 case DRV_LOAD:
542 case DRV_FREE:
543 case DRV_OPEN:
544 case DRV_CLOSE:
545 case DRV_ENABLE:
546 case DRV_DISABLE:
547 case DRV_QUERYCONFIGURE: return 0;
548 case DRV_CONFIGURE: MessageBoxA(0, "JoyStick MultiMedia Driver !", "JoyStick Driver", MB_OK); return 1;
549 case DRV_INSTALL: return DRVCNF_RESTART;
550 case DRV_REMOVE: return DRVCNF_RESTART;
551 default:
552 return DefDriverProc(dwDevID, hDriv, wMsg, dwParam1, dwParam2);
556 #endif