| 1 | /* $Id: joy.cpp,v 1.7 2000-02-17 14:09:30 sandervl Exp $ */ | 
|---|
| 2 | /* | 
|---|
| 3 | * Odin Joystick apis | 
|---|
| 4 | * | 
|---|
| 5 | * Copyright 1999 Przemyslaw Dobrowolski <dobrawka@asua.org.pl> | 
|---|
| 6 | * | 
|---|
| 7 | * | 
|---|
| 8 | * Project Odin Software License can be found in LICENSE.TXT | 
|---|
| 9 | * | 
|---|
| 10 | */ | 
|---|
| 11 |  | 
|---|
| 12 | /**************************************************************************** | 
|---|
| 13 | * Includes                                                                 * | 
|---|
| 14 | ****************************************************************************/ | 
|---|
| 15 |  | 
|---|
| 16 | #include <os2win.h> | 
|---|
| 17 | #include <mmsystem.h> | 
|---|
| 18 | #include <odinwrap.h> | 
|---|
| 19 | #include <misc.h> | 
|---|
| 20 | #include <string.h> | 
|---|
| 21 | #include <stdlib.h> | 
|---|
| 22 | #include <process.h> | 
|---|
| 23 |  | 
|---|
| 24 | #include "winmm.h" | 
|---|
| 25 | #include "os2timer.h" | 
|---|
| 26 | #include "joyos2.h" | 
|---|
| 27 |  | 
|---|
| 28 | #define DBG_LOCALLOG    DBG_joy | 
|---|
| 29 | #include "dbglocal.h" | 
|---|
| 30 |  | 
|---|
| 31 | ODINDEBUGCHANNEL(WINMM-JOY) | 
|---|
| 32 |  | 
|---|
| 33 |  | 
|---|
| 34 | #define MAXJOYDRIVERS 2 | 
|---|
| 35 |  | 
|---|
| 36 | static INT  aJoyThreshold[MAXJOYDRIVERS] = {0,0}; | 
|---|
| 37 | static BOOL aJoyCaptured[MAXJOYDRIVERS]  = {FALSE,FALSE}; | 
|---|
| 38 |  | 
|---|
| 39 | void _Optlink joySendMessages(void *pData); | 
|---|
| 40 |  | 
|---|
| 41 | LONG JoyGetPos(HANDLE hGame, UINT wID, LPJOYINFO lpInfo) | 
|---|
| 42 | { | 
|---|
| 43 | GAME_STATUS_STRUCT gs; | 
|---|
| 44 |  | 
|---|
| 45 | if (wID >= MAXJOYDRIVERS) return (JOYERR_PARMS); | 
|---|
| 46 |  | 
|---|
| 47 | if (hGame==0) return (JOYERR_NOCANDO); | 
|---|
| 48 |  | 
|---|
| 49 | JoyGetStatus( hGame, &gs ); | 
|---|
| 50 |  | 
|---|
| 51 | if (wID==JOYSTICKID1) | 
|---|
| 52 | { | 
|---|
| 53 | if (gs.curdata.A.x < 1024) | 
|---|
| 54 | lpInfo->wXpos    = gs.curdata.A.x * 64; | 
|---|
| 55 | else | 
|---|
| 56 | lpInfo->wXpos    = 65535; // _NOT_ 65536!!! ;-) | 
|---|
| 57 |  | 
|---|
| 58 | if (gs.curdata.A.y < 1024) | 
|---|
| 59 | lpInfo->wYpos    = gs.curdata.A.y * 64; | 
|---|
| 60 | else | 
|---|
| 61 | lpInfo->wYpos    = 65535; // _NOT_ 65536!!! ;-) | 
|---|
| 62 |  | 
|---|
| 63 | lpInfo->wZpos    = 0; | 
|---|
| 64 | lpInfo->wButtons = 0; | 
|---|
| 65 | if ( (gs.curdata.butMask & JOY_BUT1_BIT) == 0 ) | 
|---|
| 66 | lpInfo->wButtons |= JOY_BUTTON1; | 
|---|
| 67 |  | 
|---|
| 68 | if ( (gs.curdata.butMask & JOY_BUT2_BIT) == 0 ) | 
|---|
| 69 | lpInfo->wButtons |= JOY_BUTTON2; | 
|---|
| 70 | } | 
|---|
| 71 |  | 
|---|
| 72 | if (wID==JOYSTICKID2) | 
|---|
| 73 | { | 
|---|
| 74 | if (gs.curdata.B.x < 1024) | 
|---|
| 75 | lpInfo->wXpos    = gs.curdata.A.x * 64; | 
|---|
| 76 | else | 
|---|
| 77 | lpInfo->wXpos    = 65535; // _NOT_ 65536!!! | 
|---|
| 78 |  | 
|---|
| 79 | if (gs.curdata.B.y < 1024) | 
|---|
| 80 | lpInfo->wYpos    = gs.curdata.A.x * 64; | 
|---|
| 81 | else | 
|---|
| 82 | lpInfo->wYpos    = 65535; // _NOT_ 65536!!! | 
|---|
| 83 |  | 
|---|
| 84 | lpInfo->wZpos    = 0; | 
|---|
| 85 | lpInfo->wButtons = 0; | 
|---|
| 86 | if ( (gs.curdata.butMask & JOY_BUT3_BIT) == 0 ) | 
|---|
| 87 | lpInfo->wButtons |= JOY_BUTTON1; | 
|---|
| 88 |  | 
|---|
| 89 | if ( (gs.curdata.butMask & JOY_BUT4_BIT) == 0 ) | 
|---|
| 90 | lpInfo->wButtons |= JOY_BUTTON2; | 
|---|
| 91 | } | 
|---|
| 92 |  | 
|---|
| 93 | return (0); | 
|---|
| 94 | } | 
|---|
| 95 |  | 
|---|
| 96 | /***************************************************************************** | 
|---|
| 97 | ODINFUNCTION0(*, : | 
|---|
| 98 | ODINFUNCTION0(INT, joyGetNumDevs* Purpose   : Get number of installed joysticks | 
|---|
| 99 | * Status    : Done | 
|---|
| 100 | * | 
|---|
| 101 | * Author    : Przemyslaw Dobrowolski [Tue, 1999/06/29 10:00] | 
|---|
| 102 | *****************************************************************************/ | 
|---|
| 103 | ODINFUNCTION0(UINT, joyGetNumDevs) | 
|---|
| 104 | { | 
|---|
| 105 | HANDLE            hJoy; | 
|---|
| 106 | GAME_PARM_STRUCT  gameInfo; | 
|---|
| 107 | WORD              rc; | 
|---|
| 108 | INT               joy_count = 0; | 
|---|
| 109 |  | 
|---|
| 110 | rc=JoyOpen(&hJoy); | 
|---|
| 111 | if ( rc==0 ) | 
|---|
| 112 | { | 
|---|
| 113 | JoyGetParams(hJoy,&gameInfo); | 
|---|
| 114 | JoyClose(hJoy); | 
|---|
| 115 | if ((gameInfo.useA == FALSE) && (gameInfo.useB == FALSE)) | 
|---|
| 116 | joy_count = 0; | 
|---|
| 117 | else if (gameInfo.useA == FALSE) | 
|---|
| 118 | joy_count = 1; | 
|---|
| 119 | else if (gameInfo.useB == FALSE) | 
|---|
| 120 | joy_count = 1; | 
|---|
| 121 | else | 
|---|
| 122 | joy_count = 2; | 
|---|
| 123 |  | 
|---|
| 124 | dprintf(("WINMM:joyGetNumDevs = %d\n",joy_count)); | 
|---|
| 125 | } | 
|---|
| 126 | else | 
|---|
| 127 | // No GAMEDD$ driver | 
|---|
| 128 | dprintf(("WINMM: joyGetNumDevs - No GAMEDD$ driver\n")); | 
|---|
| 129 |  | 
|---|
| 130 | return(joy_count); | 
|---|
| 131 | } | 
|---|
| 132 |  | 
|---|
| 133 | /***************************************************************************** | 
|---|
| 134 | ODINFUNCTION1(*, :, | 
|---|
| 135 | ODINFUNCTION1(UINT,, *, | 
|---|
| 136 | Purpose, :Get Joystick capatibities (Unicode) | 
|---|
| 137 | * Status    : Done | 
|---|
| 138 | * | 
|---|
| 139 | * Author    : Przemyslaw Dobrowolski [Tue, 1999/06/29 09:40] | 
|---|
| 140 | *****************************************************************************/ | 
|---|
| 141 | ODINFUNCTION3(MMRESULT, joyGetDevCapsW, | 
|---|
| 142 | UINT, wID, | 
|---|
| 143 | LPJOYCAPSW, lpCaps, | 
|---|
| 144 | UINT, wSize) | 
|---|
| 145 | { | 
|---|
| 146 | if (wID >= MAXJOYDRIVERS) return JOYERR_PARMS; | 
|---|
| 147 |  | 
|---|
| 148 | if (JoyInstalled(wID) == 0) | 
|---|
| 149 | { | 
|---|
| 150 | lpCaps->wMid = MM_MICROSOFT; | 
|---|
| 151 | lpCaps->wPid = MM_PC_JOYSTICK; | 
|---|
| 152 | AsciiToUnicode("OS/2 Joystick", lpCaps->szPname); | 
|---|
| 153 | lpCaps->wXmin = 0; | 
|---|
| 154 | lpCaps->wXmax = 0xffff; | 
|---|
| 155 | lpCaps->wYmin = 0; | 
|---|
| 156 | lpCaps->wYmax = 0xffff; | 
|---|
| 157 | // OS/2 Joystick unknown Z-axes | 
|---|
| 158 | lpCaps->wZmin = 0; | 
|---|
| 159 | lpCaps->wZmax = 0; | 
|---|
| 160 | lpCaps->wNumButtons = 2; // FIXME: OS/2 can use Joysticks with 4 buttons? | 
|---|
| 161 | lpCaps->wPeriodMin = 10; | 
|---|
| 162 | lpCaps->wPeriodMax = 1000; | 
|---|
| 163 | lpCaps->wRmin = 0; | 
|---|
| 164 | lpCaps->wRmax = 0; | 
|---|
| 165 | lpCaps->wUmin = 0; | 
|---|
| 166 | lpCaps->wUmax = 0; | 
|---|
| 167 | lpCaps->wVmin = 0; | 
|---|
| 168 | lpCaps->wVmax = 0; | 
|---|
| 169 | lpCaps->wCaps = 0; | 
|---|
| 170 | lpCaps->wMaxAxes = 4; | 
|---|
| 171 | lpCaps->wNumAxes = 2; | 
|---|
| 172 | lpCaps->wMaxButtons = 2; | 
|---|
| 173 | AsciiToUnicode("",lpCaps->szRegKey); | 
|---|
| 174 | AsciiToUnicode("",lpCaps->szOEMVxD); | 
|---|
| 175 | dprintf(("OK!!!\n")); | 
|---|
| 176 | return JOYERR_NOERROR; | 
|---|
| 177 | } | 
|---|
| 178 | else | 
|---|
| 179 | return MMSYSERR_NODRIVER; | 
|---|
| 180 | } | 
|---|
| 181 |  | 
|---|
| 182 | /***************************************************************************** | 
|---|
| 183 | ODINFUNCTION1(*, :, | 
|---|
| 184 | ODINFUNCTION1(UINT,, *, | 
|---|
| 185 | Purpose, :Get Joystick capatibities (Unicode) | 
|---|
| 186 | * Status    : Done | 
|---|
| 187 | * | 
|---|
| 188 | * Author    : Przemyslaw Dobrowolski [Tue, 1999/06/29 09:00] | 
|---|
| 189 | *****************************************************************************/ | 
|---|
| 190 | ODINFUNCTION3(MMRESULT, joyGetDevCapsA, | 
|---|
| 191 | UINT, wID, | 
|---|
| 192 | LPJOYCAPSA, lpCaps, | 
|---|
| 193 | UINT, wSize) | 
|---|
| 194 | { | 
|---|
| 195 | if (wID >= MAXJOYDRIVERS) return JOYERR_PARMS; | 
|---|
| 196 |  | 
|---|
| 197 | if (JoyInstalled(wID) == 0) | 
|---|
| 198 | { | 
|---|
| 199 | lpCaps->wMid = MM_MICROSOFT; | 
|---|
| 200 | lpCaps->wPid = MM_PC_JOYSTICK; | 
|---|
| 201 | strcpy(lpCaps->szPname, "OS/2 Joystick"); /* joystick product name */ | 
|---|
| 202 | lpCaps->wXmin = 0; | 
|---|
| 203 | lpCaps->wXmax = 0xffff; | 
|---|
| 204 | lpCaps->wYmin = 0; | 
|---|
| 205 | lpCaps->wYmax = 0xffff; | 
|---|
| 206 | // OS/2 Joystick unknown Z-axes | 
|---|
| 207 | lpCaps->wZmin = 0; | 
|---|
| 208 | lpCaps->wZmax = 0; | 
|---|
| 209 | lpCaps->wNumButtons = 2; // FIXME: OS/2 can use Joysticks with 4 buttons? | 
|---|
| 210 | lpCaps->wPeriodMin = 10; | 
|---|
| 211 | lpCaps->wPeriodMax = 1000; | 
|---|
| 212 | lpCaps->wRmin = 0; | 
|---|
| 213 | lpCaps->wRmax = 0; | 
|---|
| 214 | lpCaps->wUmin = 0; | 
|---|
| 215 | lpCaps->wUmax = 0; | 
|---|
| 216 | lpCaps->wVmin = 0; | 
|---|
| 217 | lpCaps->wVmax = 0; | 
|---|
| 218 | lpCaps->wCaps = 0; | 
|---|
| 219 | lpCaps->wMaxAxes = 4; | 
|---|
| 220 | lpCaps->wNumAxes = 2; | 
|---|
| 221 | lpCaps->wMaxButtons = 2; | 
|---|
| 222 | strcpy(lpCaps->szRegKey,""); | 
|---|
| 223 | strcpy(lpCaps->szOEMVxD,""); | 
|---|
| 224 | return JOYERR_NOERROR; | 
|---|
| 225 | } | 
|---|
| 226 | else | 
|---|
| 227 | return MMSYSERR_NODRIVER; | 
|---|
| 228 | } | 
|---|
| 229 |  | 
|---|
| 230 | /***************************************************************************** | 
|---|
| 231 | ODINFUNCTION1(*, :, | 
|---|
| 232 | ODINFUNCTION1(MMRESULT,, *, | 
|---|
| 233 | Purpose, :Get the extended actual joystick position | 
|---|
| 234 | * Status    : Done (but not all functions are functionally but Quake2 | 
|---|
| 235 | *             running with this function) | 
|---|
| 236 | * | 
|---|
| 237 | * Author    : Przemyslaw Dobrowolski [Tue, 1999/06/29 23:42] | 
|---|
| 238 | *****************************************************************************/ | 
|---|
| 239 | ODINFUNCTION2(MMRESULT, joyGetPosEx, | 
|---|
| 240 | UINT, uJoyID, | 
|---|
| 241 | LPJOYINFOEX, pji) | 
|---|
| 242 | { | 
|---|
| 243 | JOYINFO            ji; | 
|---|
| 244 | HANDLE             hGamePort; | 
|---|
| 245 | GAME_CALIB_STRUCT  gc; | 
|---|
| 246 | DWORD              rc; | 
|---|
| 247 |  | 
|---|
| 248 | if (uJoyID >= MAXJOYDRIVERS) return JOYERR_PARMS; | 
|---|
| 249 |  | 
|---|
| 250 | rc=JoyInstalled(uJoyID); | 
|---|
| 251 |  | 
|---|
| 252 | if (rc) return (rc); | 
|---|
| 253 |  | 
|---|
| 254 | rc=JoyOpen(&hGamePort); | 
|---|
| 255 |  | 
|---|
| 256 | if (rc) return (MMSYSERR_NODRIVER); | 
|---|
| 257 |  | 
|---|
| 258 | JoyGetPos(hGamePort,uJoyID,&ji); | 
|---|
| 259 | JoyGetCalValues(hGamePort,&gc); | 
|---|
| 260 |  | 
|---|
| 261 | JoyClose(hGamePort); | 
|---|
| 262 |  | 
|---|
| 263 | if (pji->dwSize>11) pji->dwXpos         =  0; | 
|---|
| 264 | if (pji->dwSize>15) pji->dwYpos         =  0; | 
|---|
| 265 | if (pji->dwSize>19) pji->dwZpos         =  0;// not supported for OS/2 driver! | 
|---|
| 266 | if (pji->dwSize>23) pji->dwRpos         =  0;// not supported for OS/2 driver! | 
|---|
| 267 | if (pji->dwSize>27) pji->dwUpos         =  0;// not supported for OS/2 driver! | 
|---|
| 268 | if (pji->dwSize>31) pji->dwVpos         =  0;// not supported for OS/2 driver! | 
|---|
| 269 | if (pji->dwSize>35) pji->dwButtons      =  0; | 
|---|
| 270 | if (pji->dwSize>35) pji->dwButtonNumber =  0; | 
|---|
| 271 | if (pji->dwSize>43) pji->dwPOV          = -1;// FIXME: Win98 returns that code!!! Wrong? | 
|---|
| 272 | if (pji->dwSize>47) pji->dwReserved1    =  0;// FIXME! | 
|---|
| 273 | if (pji->dwSize>51) pji->dwReserved2    =  0;// FIXME! | 
|---|
| 274 |  | 
|---|
| 275 | if (pji->dwFlags & JOY_RETURNCENTERED) | 
|---|
| 276 | { | 
|---|
| 277 | if (uJoyID==JOYSTICKID1) | 
|---|
| 278 | { | 
|---|
| 279 | if (pji->dwSize>11) | 
|---|
| 280 | if (gc.Ax.centre < 1024) | 
|---|
| 281 | pji->dwXpos    = gc.Ax.centre * 64; | 
|---|
| 282 | else | 
|---|
| 283 | pji->dwXpos    = 65535; // _NOT_ 65536!!! ;-) | 
|---|
| 284 |  | 
|---|
| 285 | if (pji->dwSize>15) | 
|---|
| 286 | if (gc.Ay.centre < 1024) | 
|---|
| 287 | pji->dwYpos    = gc.Ay.centre * 64; | 
|---|
| 288 | else | 
|---|
| 289 | pji->dwYpos    = 65535; // _NOT_ 65536!!! ;-) | 
|---|
| 290 | } | 
|---|
| 291 | if (uJoyID==JOYSTICKID2) | 
|---|
| 292 | { | 
|---|
| 293 | if (pji->dwSize>11) | 
|---|
| 294 | if (gc.Ax.centre < 1024) | 
|---|
| 295 | pji->dwXpos    = gc.Bx.centre * 64; | 
|---|
| 296 | else | 
|---|
| 297 | pji->dwXpos    = 65535; // _NOT_ 65536!!! ;-) | 
|---|
| 298 |  | 
|---|
| 299 | if (pji->dwSize>15) | 
|---|
| 300 | if (gc.Ay.centre < 1024) | 
|---|
| 301 | pji->dwYpos    = gc.By.centre * 64; | 
|---|
| 302 | else | 
|---|
| 303 | pji->dwYpos    = 65535; // _NOT_ 65536!!! ;-) | 
|---|
| 304 | } | 
|---|
| 305 | } | 
|---|
| 306 |  | 
|---|
| 307 | if (pji->dwFlags & JOY_RETURNBUTTONS) | 
|---|
| 308 | { | 
|---|
| 309 | if (pji->dwSize>35) pji->dwButtons      =  ji.wButtons; | 
|---|
| 310 | if (pji->dwSize>35) pji->dwButtonNumber = (ji.wButtons & 2) ? 2 : 1; | 
|---|
| 311 | } | 
|---|
| 312 |  | 
|---|
| 313 | if (pji->dwFlags & JOY_RETURNX) | 
|---|
| 314 | if (pji->dwSize>11) pji->dwXpos         =  ji.wXpos; | 
|---|
| 315 |  | 
|---|
| 316 | if (pji->dwFlags & JOY_RETURNY) | 
|---|
| 317 | if (pji->dwSize>11) pji->dwYpos         =  ji.wXpos; | 
|---|
| 318 |  | 
|---|
| 319 | return JOYERR_NOERROR; | 
|---|
| 320 | } | 
|---|
| 321 |  | 
|---|
| 322 | /***************************************************************************** | 
|---|
| 323 | ODINFUNCTION2(*, :, | 
|---|
| 324 | ODINFUNCTION6(MMRESULT,, joyGetPos, | 
|---|
| 325 | *,, Purpose:, | 
|---|
| 326 | Get, the, | 
|---|
| 327 | actual, joystick, | 
|---|
| 328 | position *, Status, | 
|---|
| 329 | :, Done, | 
|---|
| 330 | * *, Author: Przemyslaw Dobrowolski [Tue, 1999/06/29 09:00] | 
|---|
| 331 | *****************************************************************************/ | 
|---|
| 332 | ODINFUNCTION2(MMRESULT, joyGetPos, | 
|---|
| 333 | UINT, uJoyID, | 
|---|
| 334 | LPJOYINFO, pji) | 
|---|
| 335 | { | 
|---|
| 336 | HANDLE   hGame; | 
|---|
| 337 | MMRESULT rc; | 
|---|
| 338 | if (uJoyID >= MAXJOYDRIVERS) return JOYERR_PARMS; | 
|---|
| 339 |  | 
|---|
| 340 | rc=JoyInstalled(uJoyID); | 
|---|
| 341 |  | 
|---|
| 342 | if (rc) return (rc); | 
|---|
| 343 |  | 
|---|
| 344 | if (JoyOpen(&hGame)) return (MMSYSERR_NODRIVER); | 
|---|
| 345 |  | 
|---|
| 346 | rc=JoyGetPos(hGame,uJoyID,pji); | 
|---|
| 347 |  | 
|---|
| 348 | JoyClose(hGame); | 
|---|
| 349 |  | 
|---|
| 350 | return JOYERR_NOERROR; | 
|---|
| 351 | } | 
|---|
| 352 | /***************************************************************************** | 
|---|
| 353 | ODINFUNCTION2(*, :, | 
|---|
| 354 | ODINFUNCTION2(MMRESULT,, joyGetThreshold, | 
|---|
| 355 | *,, Status:, | 
|---|
| 356 | Done *, *Author    : Przemyslaw Dobrowolski [Tue, 1999/06/29 09:00] | 
|---|
| 357 | *****************************************************************************/ | 
|---|
| 358 | ODINFUNCTION2(MMRESULT, joyGetThreshold, | 
|---|
| 359 | UINT, wID, | 
|---|
| 360 | LPUINT, lpThreshold) | 
|---|
| 361 | { | 
|---|
| 362 | dprintf(("WINMM:joyGetThreshold %d %X\n",wID, lpThreshold)); | 
|---|
| 363 |  | 
|---|
| 364 | if (wID >= MAXJOYDRIVERS) return JOYERR_PARMS; | 
|---|
| 365 |  | 
|---|
| 366 | *lpThreshold = aJoyThreshold[wID]; | 
|---|
| 367 |  | 
|---|
| 368 | return JOYERR_NOERROR; | 
|---|
| 369 | } | 
|---|
| 370 |  | 
|---|
| 371 | /***************************************************************************** | 
|---|
| 372 | ODINFUNCTION2(*, :, | 
|---|
| 373 | ODINFUNCTION2(MMRESULT,, joySetThreshold, | 
|---|
| 374 | *,, Status:, | 
|---|
| 375 | Done *, *Author    : Przemyslaw Dobrowolski [Tue, 1999/06/29 09:00] | 
|---|
| 376 | *****************************************************************************/ | 
|---|
| 377 | ODINFUNCTION2(MMRESULT, joySetThreshold, | 
|---|
| 378 | UINT, wID, | 
|---|
| 379 | UINT, wThreshold) | 
|---|
| 380 | { | 
|---|
| 381 | if (wID >= MAXJOYDRIVERS) return JOYERR_PARMS; | 
|---|
| 382 |  | 
|---|
| 383 | aJoyThreshold[wID] = wThreshold; | 
|---|
| 384 |  | 
|---|
| 385 | return JOYERR_NOERROR; | 
|---|
| 386 | } | 
|---|
| 387 |  | 
|---|
| 388 | typedef struct _JOYTHREADOPT | 
|---|
| 389 | { | 
|---|
| 390 | HWND   hWnd; | 
|---|
| 391 | UINT   wID; | 
|---|
| 392 | UINT   wPeriod; | 
|---|
| 393 | BOOL   bChanged; | 
|---|
| 394 | } JOYTHREADOPT; | 
|---|
| 395 | typedef JOYTHREADOPT *PJOYTHREADOPT; | 
|---|
| 396 |  | 
|---|
| 397 | /***************************************************************************** | 
|---|
| 398 | ODINFUNCTION4(*, :, | 
|---|
| 399 | ODINFUNCTION4(MMRESULT,, joySetCapture, | 
|---|
| 400 | *,, Purpose, | 
|---|
| 401 | :,, Start, | 
|---|
| 402 | joystick,, movescapturing, | 
|---|
| 403 | *, Status: Done | 
|---|
| 404 | * | 
|---|
| 405 | * Author    : Przemyslaw Dobrowolski [Tue, 1999/06/29 09:00] | 
|---|
| 406 | *****************************************************************************/ | 
|---|
| 407 | ODINFUNCTION4(MMRESULT, joySetCapture, | 
|---|
| 408 | HWND, hWnd, | 
|---|
| 409 | UINT, wID, | 
|---|
| 410 | UINT, wPeriod, | 
|---|
| 411 | BOOL, bChanged) | 
|---|
| 412 | { | 
|---|
| 413 | JOYTHREADOPT *newthr; | 
|---|
| 414 | INT          iThreadId; | 
|---|
| 415 | DWORD        rc; | 
|---|
| 416 |  | 
|---|
| 417 | if (wID >= MAXJOYDRIVERS) return JOYERR_PARMS; | 
|---|
| 418 |  | 
|---|
| 419 | rc=JoyInstalled(wID); | 
|---|
| 420 | if (rc != JOYERR_NOERROR) return (rc); | 
|---|
| 421 |  | 
|---|
| 422 | newthr=(PJOYTHREADOPT)malloc(sizeof(JOYTHREADOPT)); | 
|---|
| 423 | newthr->hWnd     = hWnd; | 
|---|
| 424 | newthr->wID      = wID; | 
|---|
| 425 | newthr->wPeriod  = wPeriod; | 
|---|
| 426 | newthr->bChanged = bChanged; | 
|---|
| 427 | aJoyCaptured[wID] = TRUE; | 
|---|
| 428 | iThreadId = _beginthread(joySendMessages, NULL, 0x4000, (void *)newthr); | 
|---|
| 429 | if (iThreadId!=0) | 
|---|
| 430 | { | 
|---|
| 431 | dprintf(("WINMM:joySetCapture ThreadID = %d\n", iThreadId)); | 
|---|
| 432 | return JOYERR_NOERROR; | 
|---|
| 433 | } | 
|---|
| 434 | else | 
|---|
| 435 | dprintf(("WINMM:joySetCapture Thread not created!!!!\n")); | 
|---|
| 436 |  | 
|---|
| 437 | return JOYERR_NOCANDO; /* FIXME: what should be returned ? */ | 
|---|
| 438 | } | 
|---|
| 439 |  | 
|---|
| 440 | /***************************************************************************** | 
|---|
| 441 | ODINFUNCTION1(*, :, | 
|---|
| 442 | ODINFUNCTION1(MMRESULT,, *, | 
|---|
| 443 | Purpose, :Stop capturing joystick moves | 
|---|
| 444 | * Status    : Done (but must be rewriting) | 
|---|
| 445 | * | 
|---|
| 446 | * Author    : Przemyslaw Dobrowolski [Tue, 1999/06/29 09:00] | 
|---|
| 447 | *****************************************************************************/ | 
|---|
| 448 | ODINFUNCTION1(MMRESULT, joyReleaseCapture, | 
|---|
| 449 | UINT, wID) | 
|---|
| 450 | { | 
|---|
| 451 | // TODO: Semaphores or waiting for thread... | 
|---|
| 452 | if (wID >= MAXJOYDRIVERS) return JOYERR_PARMS; | 
|---|
| 453 |  | 
|---|
| 454 | if (aJoyCaptured[wID] != TRUE) return JOYERR_NOCANDO; | 
|---|
| 455 |  | 
|---|
| 456 | aJoyCaptured[wID] = FALSE; | 
|---|
| 457 |  | 
|---|
| 458 | return JOYERR_NOERROR; | 
|---|
| 459 | } | 
|---|
| 460 |  | 
|---|
| 461 | /***************************************************************************** | 
|---|
| 462 | ODINFUNCTION1(*, :, | 
|---|
| 463 | ODINFUNCTION4(MMRESULT,, *, | 
|---|
| 464 | Status, :, | 
|---|
| 465 | Stub, but, | 
|---|
| 466 | done, ;-, | 
|---|
| 467 | * *, Author) | 
|---|
| 468 | : Przemyslaw Dobrowolski [Tue, 1999/06/29 09:00] | 
|---|
| 469 | *****************************************************************************/ | 
|---|
| 470 | ODINFUNCTION1(MMRESULT, joyConfigChanged, | 
|---|
| 471 | DWORD, dwFlags) | 
|---|
| 472 | { | 
|---|
| 473 | return JOYERR_NOERROR; | 
|---|
| 474 | } | 
|---|
| 475 |  | 
|---|
| 476 |  | 
|---|
| 477 | // *************************************************************************** | 
|---|
| 478 | // * [Internal] | 
|---|
| 479 | // * Name      : _Optlink joySendMessages | 
|---|
| 480 | // * Purpose   : Capturing thread | 
|---|
| 481 | // * Status    : Done | 
|---|
| 482 | // * | 
|---|
| 483 | // * Author    : Przemyslaw Dobrowolski [Tue, 1999/06/29 09:00] | 
|---|
| 484 | // *************************************************************************** | 
|---|
| 485 | void _Optlink joySendMessages(void *pData) | 
|---|
| 486 | { | 
|---|
| 487 | PJOYTHREADOPT      opt = (PJOYTHREADOPT) pData; | 
|---|
| 488 | JOYINFO            ji; | 
|---|
| 489 | JOYINFO            jiOld; | 
|---|
| 490 | HANDLE             hGame; | 
|---|
| 491 | DWORD               wTest; | 
|---|
| 492 | INT                rc; | 
|---|
| 493 |  | 
|---|
| 494 | rc=JoyOpen(&hGame); | 
|---|
| 495 |  | 
|---|
| 496 | if (rc) aJoyCaptured[opt->wID]=FALSE; | 
|---|
| 497 |  | 
|---|
| 498 | rc=JoyGetPos( hGame, opt->wID, &ji ); | 
|---|
| 499 |  | 
|---|
| 500 | if (rc) aJoyCaptured[opt->wID]=FALSE; | 
|---|
| 501 |  | 
|---|
| 502 | jiOld=ji; | 
|---|
| 503 |  | 
|---|
| 504 | while (aJoyCaptured[opt->wID]) | 
|---|
| 505 | { | 
|---|
| 506 | rc=JoyGetPos( hGame, opt->wID, &ji ); | 
|---|
| 507 |  | 
|---|
| 508 | if (rc) aJoyCaptured[opt->wID]=FALSE; | 
|---|
| 509 |  | 
|---|
| 510 | wTest=MAKELONG(ji.wXpos, ji.wYpos); | 
|---|
| 511 | if ((ji.wXpos!=jiOld.wXpos) || (ji.wYpos!=jiOld.wXpos)) | 
|---|
| 512 | PostMessageA(opt->hWnd, MM_JOY1MOVE + opt->wID, ji.wButtons, wTest); | 
|---|
| 513 |  | 
|---|
| 514 | if (ji.wButtons != jiOld.wButtons) | 
|---|
| 515 | { UINT ButtonChanged = (ji.wButtons ^ jiOld.wButtons)<<8; | 
|---|
| 516 |  | 
|---|
| 517 | if (jiOld.wButtons < ji.wButtons) | 
|---|
| 518 | PostMessageA(opt->hWnd, MM_JOY1BUTTONDOWN + opt->wID, ButtonChanged, MAKELONG(ji.wXpos, ji.wYpos)); | 
|---|
| 519 | else if (jiOld.wButtons > ji.wButtons) | 
|---|
| 520 | PostMessageA(opt->hWnd, MM_JOY1BUTTONUP + opt->wID, ButtonChanged, MAKELONG(ji.wXpos, ji.wYpos)); | 
|---|
| 521 |  | 
|---|
| 522 | } | 
|---|
| 523 | Sleep(opt->wPeriod+1); // Fixme!!! | 
|---|
| 524 | jiOld=ji; | 
|---|
| 525 | } | 
|---|
| 526 | free(opt); | 
|---|
| 527 | dprintf(("WINMM:Joystick-internal->joySendMessages ended!\n")); | 
|---|
| 528 | // Huh... We must close thread ;-) | 
|---|
| 529 | _endthread(); | 
|---|
| 530 | } | 
|---|
| 531 |  | 
|---|