SDL-mirror/src/joystick/mint/SDL_sysjoystick.c
Sam Lantinga ee411baee8 Added Atari joystick support (thanks Patrice!)
--HG--
extra : convert_revision : svn%3Ac70aab31-4412-0410-b14c-859654838e24/trunk%40303
2002-03-07 20:23:11 +00:00

625 lines
16 KiB
C

/*
SDL - Simple DirectMedia Layer
Copyright (C) 1997, 1998, 1999, 2000, 2001 Sam Lantinga
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation; either
version 2 of the License, or (at your option) any later version.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Library General Public License for more details.
You should have received a copy of the GNU Library General Public
License along with this library; if not, write to the Free
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
Sam Lantinga
slouken@libsdl.org
*/
#ifdef SAVE_RCSID
static char rcsid =
"@(#) $Id$";
#endif
/*
* Atari Joystick/Joypad drivers
*
* Patrice Mandin
*/
#include <stdlib.h>
#include <string.h>
#include <sys/cookie.h>
#include <mint/osbind.h>
#include "SDL_types.h"
#include "SDL_error.h"
#include "SDL_joystick.h"
#include "SDL_sysjoystick.h"
#include "SDL_joystick_c.h"
#include "../video/ataricommon/SDL_ikbdinterrupt_s.h"
/*--- Const ---*/
/* We can have:
1 joystick on IKBD port 1 (port 0 is used by mouse)
2 joypads on ports A,B
or 4 joysticks on joypads ports A,B
or 1 lightpen on joypad port A
or 2 analog paddles on joypads ports A,B
2 joysticks on parallel port
*/
enum {
IKBD_JOY1=0,
PORTA_PAD,
PORTB_PAD,
PORTA_JOY0,
PORTA_JOY1,
PORTB_JOY0,
PORTB_JOY1,
PORTA_LP,
PORTA_ANPAD,
PORTB_ANPAD,
#if 0
PARA_JOY0,
PARA_JOY1,
#endif
MAX_JOYSTICKS
};
enum {
MCH_ST=0,
MCH_STE,
MCH_TT,
MCH_F30
};
/* Joypad buttons
* Procontroller note:
* L,R are connected to 4,6
* X,Y,Z are connected to 7,8,9
*/
enum {
JP_UP=0, JP_DOWN, JP_LEFT, JP_RIGHT,
JP_KPMULT, JP_KP7, JP_KP4, JP_KP1,
JP_KP0, JP_KP8, JP_KP5, JP_KP2,
JP_KPNUM, JP_KP9, JP_KP6, JP_KP3,
JP_PAUSE, JP_FIRE0, JP_UNDEF0, JP_FIRE1,
JP_UNDEF1, JP_FIRE2, JP_UNDEF2, JP_OPTION
};
#define JP_NUM_BUTTONS 17
#define PORT_JS_RIGHT (1<<0)
#define PORT_JS_LEFT (1<<1)
#define PORT_JS_DOWN (1<<2)
#define PORT_JS_UP (1<<3)
#define PORT_JS_FIRE (1<<4)
/*--- Types ---*/
typedef struct {
SDL_bool enabled;
unsigned char *name;
Uint32 prevstate;
} atarijoy_t;
/*--- Variables ---*/
static atarijoy_t atarijoysticks[MAX_JOYSTICKS]={
{SDL_FALSE,"IKBD joystick port 1",0},
{SDL_FALSE,"Joypad port A",0},
{SDL_FALSE,"Joypad port B",0},
{SDL_FALSE,"Joystick 0 port A",0},
{SDL_FALSE,"Joystick 1 port A",0},
{SDL_FALSE,"Joystick 0 port B",0},
{SDL_FALSE,"Joystick 1 port B",0},
{SDL_FALSE,"Lightpen port A",0},
{SDL_FALSE,"Analog paddle port A",0},
{SDL_FALSE,"Analog paddle port B",0}
#if 0
,{SDL_FALSE,"Joystick 0 parallel port",0},
{SDL_FALSE,"Joystick 1 parallel port",0}
#endif
};
static const int jp_buttons[JP_NUM_BUTTONS]={
JP_KPMULT, JP_KP7, JP_KP4, JP_KP1,
JP_KP0, JP_KP8, JP_KP5, JP_KP2,
JP_KPNUM, JP_KP9, JP_KP6, JP_KP3,
JP_PAUSE, JP_FIRE0, JP_FIRE1, JP_FIRE2,
JP_OPTION
};
static SDL_bool joypad_ports_enabled=SDL_FALSE;
/* Updated joypad ports */
static Uint16 jp_paddles[4];
static Uint16 jp_lightpens[2];
static Uint16 jp_directions;
static Uint16 jp_fires;
static Uint32 jp_joypads[2];
/*--- Functions prototypes ---*/
static int GetEnabledAtariJoystick(int index);
static void UpdateJoypads(void);
/*--- Functions ---*/
int SDL_SYS_JoystickInit(void)
{
int i;
unsigned long cookie_mch;
const char *envr=getenv("SDL_JOYSTICK_ATARI");
const char *env_evt=getenv("SDL_ATARI_EVENTSDRIVER");
SDL_bool ikbd_enabled=SDL_FALSE;
#define TEST_JOY_ENABLED(env,idstring,num) \
if (strstr(env,idstring"-off")) { \
atarijoysticks[num].enabled=SDL_FALSE; \
} \
if (strstr(env,idstring"-on")) { \
atarijoysticks[num].enabled=SDL_TRUE; \
}
/* Cookie _MCH present ? if not, assume ST machine */
if (Getcookie(C__MCH, &cookie_mch) != C_FOUND) {
cookie_mch = MCH_ST << 16;
}
/* Enable some default joysticks */
if ((cookie_mch == MCH_ST<<16) || ((cookie_mch>>16) == MCH_STE) ||
(cookie_mch == MCH_TT<<16) || (cookie_mch == MCH_F30<<16)) {
ikbd_enabled=SDL_TRUE;
if (env_evt) {
if (!strcmp(env_evt,"ikbd")) {
ikbd_enabled=SDL_FALSE;
}
}
atarijoysticks[IKBD_JOY1].enabled=ikbd_enabled;
}
if ((cookie_mch == MCH_STE<<16) || (cookie_mch == MCH_F30<<16)) {
atarijoysticks[PORTA_PAD].enabled=SDL_TRUE;
atarijoysticks[PORTB_PAD].enabled=SDL_TRUE;
}
/* Read environment for joysticks to enable */
if (envr) {
/* IKBD on any Atari, maybe clones */
if ((cookie_mch == MCH_ST<<16) || ((cookie_mch>>16) == MCH_STE) ||
(cookie_mch == MCH_TT<<16) || (cookie_mch == MCH_F30<<16)) {
if (env_evt) {
if (strcmp(env_evt,"ikbd")) {
TEST_JOY_ENABLED(envr, "ikbd-joy1", IKBD_JOY1);
}
}
}
/* Joypads ports only on STE and Falcon */
if ((cookie_mch == MCH_STE<<16) || (cookie_mch == MCH_F30<<16)) {
TEST_JOY_ENABLED(envr, "porta-pad", PORTA_PAD);
if (!atarijoysticks[PORTA_PAD].enabled) {
TEST_JOY_ENABLED(envr, "porta-joy0", PORTA_JOY0);
TEST_JOY_ENABLED(envr, "porta-joy1", PORTA_JOY1);
if (!(atarijoysticks[PORTA_JOY0].enabled) && !(atarijoysticks[PORTA_JOY1].enabled)) {
TEST_JOY_ENABLED(envr, "porta-lp", PORTA_LP);
if (!atarijoysticks[PORTA_LP].enabled) {
TEST_JOY_ENABLED(envr, "porta-anpad", PORTA_ANPAD);
}
}
}
TEST_JOY_ENABLED(envr, "portb-pad", PORTB_PAD);
if (!atarijoysticks[PORTB_PAD].enabled) {
TEST_JOY_ENABLED(envr, "portb-joy0", PORTB_JOY0);
TEST_JOY_ENABLED(envr, "portb-joy1", PORTB_JOY1);
if (!(atarijoysticks[PORTB_JOY0].enabled) && !(atarijoysticks[PORTB_JOY1].enabled)) {
TEST_JOY_ENABLED(envr, "portb-anpad", PORTB_ANPAD);
}
}
}
#if 0
/* Parallel port on any Atari, maybe clones */
if ((cookie_mch == MCH_ST<<16) || ((cookie_mch>>16) == MCH_STE) ||
(cookie_mch == MCH_TT<<16) || (cookie_mch == MCH_F30<<16)) {
TEST_JOY_ENABLED(envr, "para-joy0", PARA_JOY0);
TEST_JOY_ENABLED(envr, "para-joy1", PARA_JOY1);
}
#endif
}
/* Need to update joypad ports ? */
joypad_ports_enabled=SDL_FALSE;
for (i=PORTA_PAD;i<=PORTB_ANPAD;i++) {
if (atarijoysticks[i].enabled) {
joypad_ports_enabled=SDL_TRUE;
break;
}
}
SDL_numjoysticks = 0;
for (i=0;i<MAX_JOYSTICKS;i++) {
if (atarijoysticks[i].enabled) {
++SDL_numjoysticks;
}
}
return(SDL_numjoysticks);
}
static int GetEnabledAtariJoystick(int index)
{
int i,j;
/* Return the nth'index' enabled atari joystick */
j=0;
for (i=0;i<MAX_JOYSTICKS;i++) {
if (atarijoysticks[i].enabled) {
if (j==index) {
break;
} else {
j++;
}
}
}
if (i==MAX_JOYSTICKS)
return -1;
return i;
}
const char *SDL_SYS_JoystickName(int index)
{
int numjoystick;
numjoystick=GetEnabledAtariJoystick(index);
if (numjoystick==-1)
return NULL;
return(atarijoysticks[numjoystick].name);
}
int SDL_SYS_JoystickOpen(SDL_Joystick *joystick)
{
int numjoystick;
numjoystick=GetEnabledAtariJoystick(joystick->index);
if (numjoystick==-1)
return -1;
if ((numjoystick==PORTA_PAD) || (numjoystick==PORTB_PAD)) {
joystick->nbuttons=JP_NUM_BUTTONS;
} else if ((numjoystick==PORTA_LP) || (numjoystick==PORTA_ANPAD) ||
(numjoystick==PORTB_ANPAD)) {
joystick->nbuttons=2;
} else {
joystick->nbuttons=1;
}
joystick->naxes=2;
joystick->nballs=0;
joystick->nhats=0;
return(0);
}
void SDL_SYS_JoystickUpdate(SDL_Joystick *joystick)
{
int numjoystick;
Uint32 curstate,prevstate;
Sint16 curaxis;
numjoystick=GetEnabledAtariJoystick(joystick->index);
if (numjoystick==-1)
return;
prevstate = atarijoysticks[numjoystick].prevstate;
if (joypad_ports_enabled) {
Supexec(UpdateJoypads);
}
switch (numjoystick) {
case IKBD_JOY1:
{
curstate = SDL_AtariIkbd_joystick & 0xff;
if (curstate != prevstate) {
/* X axis */
if ((curstate & (IKBD_JOY_LEFT|IKBD_JOY_RIGHT)) != (prevstate & (IKBD_JOY_LEFT|IKBD_JOY_RIGHT))) {
curaxis=0;
if (curstate & IKBD_JOY_LEFT) {
curaxis=-128;
} else if (curstate & IKBD_JOY_RIGHT) {
curaxis=127;
}
SDL_PrivateJoystickAxis(joystick,0,curaxis);
}
/* Y axis */
if ((curstate & (IKBD_JOY_UP|IKBD_JOY_DOWN)) != (prevstate & (IKBD_JOY_UP|IKBD_JOY_DOWN))) {
curaxis=0;
if (curstate & IKBD_JOY_UP) {
curaxis=-128;
} else if (curstate & IKBD_JOY_DOWN) {
curaxis=127;
}
SDL_PrivateJoystickAxis(joystick,1,curaxis);
}
/* Button */
if ((curstate & IKBD_JOY_FIRE) && !(prevstate & IKBD_JOY_FIRE)) {
SDL_PrivateJoystickButton(joystick,0,SDL_PRESSED);
}
if (!(curstate & IKBD_JOY_FIRE) && (prevstate & IKBD_JOY_FIRE)) {
SDL_PrivateJoystickButton(joystick,0,SDL_RELEASED);
}
}
atarijoysticks[IKBD_JOY1].prevstate = curstate;
}
break;
case PORTA_PAD:
case PORTB_PAD:
{
int numjoypad,i;
numjoypad=0;
/* if (numjoystick==PORTA_PAD) numjoypad=0;*/
if (numjoystick==PORTB_PAD) numjoypad=1;
curstate=jp_joypads[numjoypad];
if (curstate!=prevstate) {
/* X axis */
if ((curstate & ((1<<JP_LEFT)|(1<<JP_RIGHT))) != (prevstate & ((1<<JP_LEFT)|(1<<JP_RIGHT)))) {
curaxis=0;
if (curstate & (1<<JP_LEFT)) {
curaxis=-128;
} else if (curstate & (1<<JP_RIGHT)) {
curaxis=127;
}
SDL_PrivateJoystickAxis(joystick,0,curaxis);
}
/* Y axis */
if ((curstate & ((1<<JP_UP)|(1<<JP_DOWN))) != (prevstate & ((1<<JP_UP)|(1<<JP_DOWN)))) {
curaxis=0;
if (curstate & (1<<JP_UP)) {
curaxis=-128;
} else if (curstate & (1<<JP_DOWN)) {
curaxis=127;
}
SDL_PrivateJoystickAxis(joystick,1,curaxis);
}
/* Buttons */
for (i=0;i<JP_NUM_BUTTONS;i++) {
int button;
button=1<<jp_buttons[i];
if ((curstate & button) && !(prevstate & button)) {
SDL_PrivateJoystickButton(joystick,i,SDL_PRESSED);
}
if (!(curstate & button) && (prevstate & button)) {
SDL_PrivateJoystickButton(joystick,i,SDL_RELEASED);
}
}
}
atarijoysticks[numjoystick].prevstate = curstate;
}
break;
case PORTA_JOY0:
case PORTA_JOY1:
case PORTB_JOY0:
case PORTB_JOY1:
{
int fire_shift=0,dir_shift=0;
if (numjoystick==PORTA_JOY0) { fire_shift=0; dir_shift=0; }
if (numjoystick==PORTA_JOY1) { fire_shift=1; dir_shift=4; }
if (numjoystick==PORTB_JOY0) { fire_shift=2; dir_shift=8; }
if (numjoystick==PORTB_JOY1) { fire_shift=3; dir_shift=12; }
curstate = (jp_directions>>dir_shift) & 15;
curstate |= ((jp_fires>>fire_shift) & 1)<<4;
if (curstate != prevstate) {
/* X axis */
if ((curstate & (PORT_JS_LEFT|PORT_JS_RIGHT)) != (prevstate & (PORT_JS_LEFT|PORT_JS_RIGHT))) {
curaxis=0;
if (curstate & PORT_JS_LEFT) {
curaxis=-128;
} else if (curstate & PORT_JS_RIGHT) {
curaxis=127;
}
SDL_PrivateJoystickAxis(joystick,0,curaxis);
}
/* Y axis */
if ((curstate & (PORT_JS_UP|PORT_JS_DOWN)) != (prevstate & (PORT_JS_UP|PORT_JS_DOWN))) {
curaxis=0;
if (curstate & PORT_JS_UP) {
curaxis=-128;
} else if (curstate & PORT_JS_DOWN) {
curaxis=127;
}
SDL_PrivateJoystickAxis(joystick,1,curaxis);
}
/* Button */
if ((curstate & PORT_JS_FIRE) && !(prevstate & PORT_JS_FIRE)) {
SDL_PrivateJoystickButton(joystick,0,SDL_PRESSED);
}
if (!(curstate & PORT_JS_FIRE) && (prevstate & PORT_JS_FIRE)) {
SDL_PrivateJoystickButton(joystick,0,SDL_RELEASED);
}
}
atarijoysticks[numjoystick].prevstate = curstate;
}
break;
case PORTA_LP:
{
int i;
curstate = jp_lightpens[0]>>1;
curstate |= (jp_lightpens[1]>>1)<<15;
curstate |= (jp_fires & 3)<<30;
if (curstate != prevstate) {
/* X axis */
SDL_PrivateJoystickAxis(joystick,0,(jp_lightpens[0]>>8)-128);
/* Y axis */
SDL_PrivateJoystickAxis(joystick,1,(jp_lightpens[1]>>8)-128);
/* Buttons */
for (i=0;i<2;i++) {
int button;
button=1<<(30+i);
if ((curstate & button) && !(prevstate & button)) {
SDL_PrivateJoystickButton(joystick,i,SDL_PRESSED);
}
if (!(curstate & button) && (prevstate & button)) {
SDL_PrivateJoystickButton(joystick,i,SDL_RELEASED);
}
}
}
atarijoysticks[numjoystick].prevstate = curstate;
}
break;
case PORTA_ANPAD:
case PORTB_ANPAD:
{
int numpaddle, i;
numpaddle=0<<1;
if (numjoystick==PORTB_ANPAD) numpaddle=1<<1;
curstate = jp_paddles[numpaddle]>>1;
curstate |= (jp_paddles[numpaddle+1]>>1)<<15;
curstate |= ((jp_fires>>numpaddle) & 3)<<30;
if (curstate != prevstate) {
/* X axis */
SDL_PrivateJoystickAxis(joystick,0,(jp_paddles[numpaddle]>>8)-128);
/* Y axis */
SDL_PrivateJoystickAxis(joystick,1,(jp_paddles[numpaddle+1]>>8)-128);
/* Buttons */
for (i=0;i<2;i++) {
int button;
button=1<<(30+i);
if ((curstate & button) && !(prevstate & button)) {
SDL_PrivateJoystickButton(joystick,i,SDL_PRESSED);
}
if (!(curstate & button) && (prevstate & button)) {
SDL_PrivateJoystickButton(joystick,i,SDL_RELEASED);
}
}
}
atarijoysticks[numjoystick].prevstate = curstate;
}
break;
#if 0
case PARA_JOY0:
case PARA_JOY1:
break;
#endif
};
return;
}
void SDL_SYS_JoystickClose(SDL_Joystick *joystick)
{
return;
}
void SDL_SYS_JoystickQuit(void)
{
SDL_numjoysticks=0;
return;
}
/*--- Joypad I/O read/write interface ---*/
#define JOYPAD_IO_BASE (0xffff9200)
struct JOYPAD_IO_S {
Uint16 fires;
Uint16 directions;
Uint16 dummy1[6];
Uint16 paddles[4];
Uint16 dummy2[4];
Uint16 lightpens[2];
};
#define JOYPAD_IO ((*(volatile struct JOYPAD_IO_S *)JOYPAD_IO_BASE))
static void UpdateJoypads(void)
{
Uint16 tmp;
/*--- This function is called in supervisor mode ---*/
/* Update joysticks */
jp_fires = (~(JOYPAD_IO.fires)) & 15;
jp_directions = (~(JOYPAD_IO.directions));
/* Update lightpen */
tmp = JOYPAD_IO.lightpens[0] & 1023;
jp_lightpens[0] = (tmp<<6) | (tmp>>4);
tmp = JOYPAD_IO.lightpens[1] & 1023;
jp_lightpens[1] = (tmp<<6) | (tmp>>4);
/* Update paddles */
tmp = (JOYPAD_IO.paddles[0] & 255);
jp_paddles[0] = (tmp<<8) | tmp;
tmp = (JOYPAD_IO.paddles[1] & 255);
jp_paddles[1] = (tmp<<8) | tmp;
tmp = (JOYPAD_IO.paddles[2] & 255);
jp_paddles[2] = (tmp<<8) | tmp;
tmp = (JOYPAD_IO.paddles[3] & 255);
jp_paddles[3] = (tmp<<8) | tmp;
/* Update joypad 0 */
JOYPAD_IO.directions=0xfffe;
jp_joypads[0]=((~(JOYPAD_IO.fires)) & 3)<<(16);
JOYPAD_IO.directions=0xfffe;
jp_joypads[0] |= ((~(JOYPAD_IO.directions))>>8) & 15;
JOYPAD_IO.directions=0xfffd;
jp_joypads[0] |= ((~(JOYPAD_IO.fires)) & 3)<<(16+2);
JOYPAD_IO.directions=0xfffd;
jp_joypads[0] |= (((~(JOYPAD_IO.directions))>>8) & 15)<<4;
JOYPAD_IO.directions=0xfffb;
jp_joypads[0] |= ((~(JOYPAD_IO.fires)) & 3)<<(16+4);
JOYPAD_IO.directions=0xfffb;
jp_joypads[0] |= (((~(JOYPAD_IO.directions))>>8) & 15)<<8;
JOYPAD_IO.directions=0xfff7;
jp_joypads[0] |= ((~(JOYPAD_IO.fires)) & 3)<<(16+6);
JOYPAD_IO.directions=0xfff7;
jp_joypads[0] |= (((~(JOYPAD_IO.directions))>>8) & 15)<<12;
/* Update joypad 1 */
JOYPAD_IO.directions=0xffef;
jp_joypads[1]=((~(JOYPAD_IO.fires)) & (3<<2))<<(16-2);
JOYPAD_IO.directions=0xffef;
jp_joypads[1] |= ((~(JOYPAD_IO.directions))>>12) & 15;
JOYPAD_IO.directions=0xffdf;
jp_joypads[1] |= ((~(JOYPAD_IO.fires)) & (3<<2))<<(16);
JOYPAD_IO.directions=0xffdf;
jp_joypads[1] |= (((~(JOYPAD_IO.directions))>>12) & 15)<<4;
JOYPAD_IO.directions=0xffbf;
jp_joypads[1] |= ((~(JOYPAD_IO.fires)) & (3<<2))<<(16+2);
JOYPAD_IO.directions=0xffbf;
jp_joypads[1] |= (((~(JOYPAD_IO.directions))>>12) & 15)<<8;
JOYPAD_IO.directions=0xff7f;
jp_joypads[1] |= ((~(JOYPAD_IO.fires)) & (3<<2))<<(16+4);
JOYPAD_IO.directions=0xff7f;
jp_joypads[1] |= (((~(JOYPAD_IO.directions))>>12) & 15)<<12;
}