/*

SDL - Simple DirectMedia Layer

Copyright (C) 1997-2006 Sam Lantinga

This library is free software; you can redistribute it and/or

modify it under the terms of the GNU Lesser General Public

License as published by the Free Software Foundation; either

version 2.1 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

Lesser General Public License for more details.

You should have received a copy of the GNU Lesser General Public

License along with this library; if not, write to the Free Software

Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA

Sam Lantinga

slouken@libsdl.org

*/

/*

* Atari keyboard events manager, using hardware IKBD

*

* Patrice Mandin

*/

#include <string.h>

/* Mint includes */

#include <mint/osbind.h>

#include "SDL.h"

#include "SDL_sysevents.h"

#include "SDL_events_c.h"

#include "SDL_atarikeys.h"

#include "SDL_atarievents_c.h"

#include "SDL_ikbdinterrupt_s.h"

/* Special keys state */

enum {

K_RSHIFT=0,

K_LSHIFT,

K_CTRL,

K_ALT,

K_CAPSLOCK,

K_CLRHOME,

K_INSERT

};

#define ATARIBIOS_MAXKEYS 128

#define KEY_PRESSED 0xff

#define KEY_UNDEFINED 0x80

#define KEY_RELEASED 0x00

/* The translation tables from a console scancode to a SDL keysym */

#define KT_NOCHANGE -1

enum {

KT_UNSHIFT=0,

KT_SHIFT=1,

KT_CAPS=2

};

static Uint16 atari_prevmouseb; /* save state of mouse buttons */

static int caps_state; /* caps lock state */

_KEYTAB *curtables;

static unsigned char *tab_unshift, *tab_shift, *tab_caps;

static SDLKey keymap[ATARIBIOS_MAXKEYS];

static SDL_keysym *TranslateKey(int scancode, int numkeytable, SDL_keysym *keysym,

SDL_bool pressed);

void AtariIkbd_InitOSKeymap(_THIS)

{

int i;

SDL_memset(SDL_AtariIkbd_keyboard, KEY_UNDEFINED, ATARIBIOS_MAXKEYS);

/* Initialize keymap */

for ( i=0; i<sizeof(keymap); i++ )

keymap[i] = SDLK_UNKNOWN;

/* Functions keys */

for ( i = 0; i<10; i++ )

keymap[SCANCODE_F1 + i] = SDLK_F1+i;

/* Cursor keypad */

keymap[SCANCODE_HELP] = SDLK_HELP;

keymap[SCANCODE_UNDO] = SDLK_UNDO;

keymap[SCANCODE_INSERT] = SDLK_INSERT;

keymap[SCANCODE_CLRHOME] = SDLK_HOME;

keymap[SCANCODE_UP] = SDLK_UP;

keymap[SCANCODE_DOWN] = SDLK_DOWN;

keymap[SCANCODE_RIGHT] = SDLK_RIGHT;

keymap[SCANCODE_LEFT] = SDLK_LEFT;

/* Special keys */

keymap[SCANCODE_ESCAPE] = SDLK_ESCAPE;

keymap[SCANCODE_BACKSPACE] = SDLK_BACKSPACE;

keymap[SCANCODE_TAB] = SDLK_TAB;

keymap[SCANCODE_ENTER] = SDLK_RETURN;

keymap[SCANCODE_DELETE] = SDLK_DELETE;

keymap[SCANCODE_LEFTCONTROL] = SDLK_LCTRL;

keymap[SCANCODE_LEFTSHIFT] = SDLK_LSHIFT;

keymap[SCANCODE_RIGHTSHIFT] = SDLK_RSHIFT;

keymap[SCANCODE_LEFTALT] = SDLK_LALT;

keymap[SCANCODE_CAPSLOCK] = SDLK_CAPSLOCK;

/* Read XBIOS tables for scancode -> ascii translation */

curtables=Keytbl(KT_NOCHANGE, KT_NOCHANGE, KT_NOCHANGE);

tab_unshift=curtables->unshift;

tab_shift=curtables->shift;

tab_caps=curtables->caps;

/* Set Caps lock initial state */

caps_state=(Kbshift(-1) & (1<<K_CAPSLOCK));

/* Now install our handler */

SDL_AtariIkbd_mouseb = SDL_AtariIkbd_mousex = SDL_AtariIkbd_mousey = 0;

atari_prevmouseb = 0;

Supexec(SDL_AtariIkbdInstall);

}

static int atari_GetButton(int button)

{

switch(button)

{

case 0:

return SDL_BUTTON_RIGHT;

break;

case 1:

default:

return SDL_BUTTON_LEFT;

break;

}

}

void AtariIkbd_PumpEvents(_THIS)

{

int i;

SDL_keysym keysym;

int specialkeys;

/*--- Send keyboard events ---*/

/* Update caps lock state */

if (SDL_AtariIkbd_keyboard[SCANCODE_CAPSLOCK]==KEY_PRESSED) {

caps_state ^= 1;

}

/* Choose the translation table */

specialkeys=KT_UNSHIFT;

if ((SDL_AtariIkbd_keyboard[SCANCODE_LEFTSHIFT]==KEY_PRESSED)

|| (SDL_AtariIkbd_keyboard[SCANCODE_RIGHTSHIFT]==KEY_PRESSED))

{

specialkeys = KT_SHIFT;

}

if (caps_state) {

specialkeys = KT_CAPS;

}

/* Now generate events */

for (i=0; i<ATARIBIOS_MAXKEYS; i++) {

/* Key pressed ? */

if (SDL_AtariIkbd_keyboard[i]==KEY_PRESSED) {

SDL_PrivateKeyboard(SDL_PRESSED,

TranslateKey(i, specialkeys, &keysym, SDL_TRUE));

SDL_AtariIkbd_keyboard[i]=KEY_UNDEFINED;

}

/* Key released ? */

if (SDL_AtariIkbd_keyboard[i]==KEY_RELEASED) {

SDL_PrivateKeyboard(SDL_RELEASED,

TranslateKey(i, specialkeys, &keysym, SDL_FALSE));

SDL_AtariIkbd_keyboard[i]=KEY_UNDEFINED;

}

}

/*--- Send mouse events ---*/

/* Mouse motion ? */

if (SDL_AtariIkbd_mousex || SDL_AtariIkbd_mousey) {

SDL_PrivateMouseMotion(0, 1, SDL_AtariIkbd_mousex, SDL_AtariIkbd_mousey);

SDL_AtariIkbd_mousex = SDL_AtariIkbd_mousey = 0;

}

/* Mouse button ? */

if (SDL_AtariIkbd_mouseb != atari_prevmouseb) {

for (i=0;i<2;i++) {

int curbutton, prevbutton;

curbutton = SDL_AtariIkbd_mouseb & (1<<i);

prevbutton = atari_prevmouseb & (1<<i);

if (curbutton && !prevbutton) {

SDL_PrivateMouseButton(SDL_PRESSED, atari_GetButton(i), 0, 0);

}

if (!curbutton && prevbutton) {

SDL_PrivateMouseButton(SDL_RELEASED, atari_GetButton(i), 0, 0);

}

}

atari_prevmouseb = SDL_AtariIkbd_mouseb;

}

}

static SDL_keysym *TranslateKey(int scancode, int numkeytable, SDL_keysym *keysym,

SDL_bool pressed)

{

unsigned char asciicode;

/* Set the keysym information */

keysym->scancode = scancode;

asciicode=0;

switch(numkeytable) {

case KT_UNSHIFT:

asciicode=tab_unshift[scancode];

break;

case KT_SHIFT:

asciicode=tab_shift[scancode];

break;

case KT_CAPS:

asciicode=tab_caps[scancode];

break;

}

if (asciicode)

keysym->sym = asciicode;

else

keysym->sym = keymap[scancode];

keysym->mod = KMOD_NONE;

keysym->unicode = 0;

if (SDL_TranslateUNICODE && pressed) {

keysym->unicode = SDL_AtariToUnicodeTable[asciicode];

}

return(keysym);

}

void AtariIkbd_ShutdownEvents(void)

{

Supexec(SDL_AtariIkbdUninstall);

}