/*

    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

*/

#include "SDL_config.h"

/* Handle the event stream, converting X11 events into SDL events */

#include <vga.h>

#include <vgamouse.h>

#include <vgakeyboard.h>

#if defined(__LINUX__)

#include <linux/kd.h>

#include <linux/keyboard.h>

#elif defined(__FREEBSD__)

#include <sys/kbio.h>

#else

#error You must choose your operating system here

#endif

#include "../../events/SDL_sysevents.h"

#include "../../events/SDL_events_c.h"

#include "SDL_svgavideo.h"

#include "SDL_svgaevents_c.h"

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

#if defined(linux)

#define NUM_VGAKEYMAPS	(1<<KG_CAPSSHIFT)

static Uint16 vga_keymap[NUM_VGAKEYMAPS][NR_KEYS];

#elif defined(__FREEBSD__)

/* FIXME: Free the keymap when we shut down the video mode */

static keymap_t *vga_keymap = NULL;

#else

#error You must choose your operating system here

#endif

static SDLKey keymap[128];

static SDL_keysym *TranslateKey(int scancode, SDL_keysym *keysym);

/* Ugh, we have to duplicate the kernel's keysym mapping code...

   Oh, it's not so bad. :-)

   FIXME: Add keyboard LED handling code

 */

#if defined(linux)

int SVGA_initkeymaps(int fd)

{

	struct kbentry entry;

	int map, i;

	/* Load all the keysym mappings */

	for ( map=0; map<NUM_VGAKEYMAPS; ++map ) {

		SDL_memset(vga_keymap[map], 0, NR_KEYS*sizeof(Uint16));

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

			entry.kb_table = map;

			entry.kb_index = i;

			if ( ioctl(fd, KDGKBENT, &entry) == 0 ) {

				/* The "Enter" key is a special case */

				if ( entry.kb_value == K_ENTER ) {

					entry.kb_value = K(KT_ASCII,13);

				}

				/* Handle numpad specially as well */

				if ( KTYP(entry.kb_value) == KT_PAD ) {

				    switch ( entry.kb_value ) {

					case K_P0:

					case K_P1:

					case K_P2:

					case K_P3:

					case K_P4:

					case K_P5:

					case K_P6:

					case K_P7:

					case K_P8:

					case K_P9:

					    vga_keymap[map][i]=entry.kb_value;

					    vga_keymap[map][i]+= '0';

					    break;

                                        case K_PPLUS:

					    vga_keymap[map][i]=K(KT_ASCII,'+');

					    break;

                                        case K_PMINUS:

					    vga_keymap[map][i]=K(KT_ASCII,'-');

					    break;

                                        case K_PSTAR:

					    vga_keymap[map][i]=K(KT_ASCII,'*');

					    break;

                                        case K_PSLASH:

					    vga_keymap[map][i]=K(KT_ASCII,'/');

					    break;

                                        case K_PENTER:

					    vga_keymap[map][i]=K(KT_ASCII,'\r');

					    break;

                                        case K_PCOMMA:

					    vga_keymap[map][i]=K(KT_ASCII,',');

					    break;

                                        case K_PDOT:

					    vga_keymap[map][i]=K(KT_ASCII,'.');

					    break;

					default:

					    break;

				    }

				}

				/* Do the normal key translation */

				if ( (KTYP(entry.kb_value) == KT_LATIN) ||

				     (KTYP(entry.kb_value) == KT_ASCII) ||

				     (KTYP(entry.kb_value) == KT_LETTER) ) {

					vga_keymap[map][i] = entry.kb_value;

				}

			}

		}

	}

	return(0);

}

#elif defined(__FREEBSD__)

int SVGA_initkeymaps(int fd)

{

	vga_keymap = SDL_malloc(sizeof(keymap_t));

	if ( ! vga_keymap ) {

		SDL_OutOfMemory();

		return(-1);

	}

	if (ioctl(fd, GIO_KEYMAP, vga_keymap) == -1) {

		SDL_free(vga_keymap);

		vga_keymap = NULL;

		SDL_SetError("Unable to get keyboard map");

		return(-1);

	}

	return(0);

}

#else

#error You must choose your operating system here

#endif

int posted = 0;

void SVGA_mousecallback(int button, int dx, int dy,

                          int u1,int u2,int u3, int u4)

{

	if ( dx || dy ) {

		posted += SDL_PrivateMouseMotion(0, 1, dx, dy);

	}

	if ( button & MOUSE_LEFTBUTTON ) {

		if ( !(SDL_GetMouseState(NULL, NULL) & SDL_BUTTON(1)) ) {

			posted += SDL_PrivateMouseButton(SDL_PRESSED, 1, 0, 0);

		}

	} else {

		if ( (SDL_GetMouseState(NULL, NULL) & SDL_BUTTON(1)) ) {

			posted += SDL_PrivateMouseButton(SDL_RELEASED, 1, 0, 0);

		}

	}

	if ( button & MOUSE_MIDDLEBUTTON ) {

		if ( !(SDL_GetMouseState(NULL, NULL) & SDL_BUTTON(2)) ) {

			posted += SDL_PrivateMouseButton(SDL_PRESSED, 2, 0, 0);

		}

	} else {

		if ( (SDL_GetMouseState(NULL, NULL) & SDL_BUTTON(2)) ) {

			posted += SDL_PrivateMouseButton(SDL_RELEASED, 2, 0, 0);

		}

	}

	if ( button & MOUSE_RIGHTBUTTON ) {

		if ( !(SDL_GetMouseState(NULL, NULL) & SDL_BUTTON(3)) ) {

			posted += SDL_PrivateMouseButton(SDL_PRESSED, 3, 0, 0);

		}

	} else {

		if ( (SDL_GetMouseState(NULL, NULL) & SDL_BUTTON(3)) ) {

			posted += SDL_PrivateMouseButton(SDL_RELEASED, 3, 0, 0);

		}

	}

}

void SVGA_keyboardcallback(int scancode, int pressed)

{

	SDL_keysym keysym;

	if ( pressed ) {

		posted += SDL_PrivateKeyboard(SDL_PRESSED,

			    TranslateKey(scancode, &keysym));

	} else {

		posted += SDL_PrivateKeyboard(SDL_RELEASED,

			    TranslateKey(scancode, &keysym));

	}

}

void SVGA_PumpEvents(_THIS)

{

	do {

		posted = 0;

		mouse_update();

		keyboard_update();

	} while ( posted );

}

void SVGA_InitOSKeymap(_THIS)

{

	int i;

	/* Initialize the BeOS key translation table */

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

		keymap[i] = SDLK_UNKNOWN;

	keymap[SCANCODE_ESCAPE] = SDLK_ESCAPE;

	keymap[SCANCODE_1] = SDLK_1;

	keymap[SCANCODE_2] = SDLK_2;

	keymap[SCANCODE_3] = SDLK_3;

	keymap[SCANCODE_4] = SDLK_4;

	keymap[SCANCODE_5] = SDLK_5;

	keymap[SCANCODE_6] = SDLK_6;

	keymap[SCANCODE_7] = SDLK_7;

	keymap[SCANCODE_8] = SDLK_8;

	keymap[SCANCODE_9] = SDLK_9;

	keymap[SCANCODE_0] = SDLK_0;

	keymap[SCANCODE_MINUS] = SDLK_MINUS;

	keymap[SCANCODE_EQUAL] = SDLK_EQUALS;

	keymap[SCANCODE_BACKSPACE] = SDLK_BACKSPACE;

	keymap[SCANCODE_TAB] = SDLK_TAB;

	keymap[SCANCODE_Q] = SDLK_q;

	keymap[SCANCODE_W] = SDLK_w;

	keymap[SCANCODE_E] = SDLK_e;

	keymap[SCANCODE_R] = SDLK_r;

	keymap[SCANCODE_T] = SDLK_t;

	keymap[SCANCODE_Y] = SDLK_y;

	keymap[SCANCODE_U] = SDLK_u;

	keymap[SCANCODE_I] = SDLK_i;

	keymap[SCANCODE_O] = SDLK_o;

	keymap[SCANCODE_P] = SDLK_p;

	keymap[SCANCODE_BRACKET_LEFT] = SDLK_LEFTBRACKET;

	keymap[SCANCODE_BRACKET_RIGHT] = SDLK_RIGHTBRACKET;

	keymap[SCANCODE_ENTER] = SDLK_RETURN;

	keymap[SCANCODE_LEFTCONTROL] = SDLK_LCTRL;

	keymap[SCANCODE_A] = SDLK_a;

	keymap[SCANCODE_S] = SDLK_s;

	keymap[SCANCODE_D] = SDLK_d;

	keymap[SCANCODE_F] = SDLK_f;

	keymap[SCANCODE_G] = SDLK_g;

	keymap[SCANCODE_H] = SDLK_h;

	keymap[SCANCODE_J] = SDLK_j;

	keymap[SCANCODE_K] = SDLK_k;

	keymap[SCANCODE_L] = SDLK_l;

	keymap[SCANCODE_SEMICOLON] = SDLK_SEMICOLON;

	keymap[SCANCODE_APOSTROPHE] = SDLK_QUOTE;

	keymap[SCANCODE_GRAVE] = SDLK_BACKQUOTE;

	keymap[SCANCODE_LEFTSHIFT] = SDLK_LSHIFT;

	keymap[SCANCODE_BACKSLASH] = SDLK_BACKSLASH;

	keymap[SCANCODE_Z] = SDLK_z;

	keymap[SCANCODE_X] = SDLK_x;

	keymap[SCANCODE_C] = SDLK_c;

	keymap[SCANCODE_V] = SDLK_v;

	keymap[SCANCODE_B] = SDLK_b;

	keymap[SCANCODE_N] = SDLK_n;

	keymap[SCANCODE_M] = SDLK_m;

	keymap[SCANCODE_COMMA] = SDLK_COMMA;

	keymap[SCANCODE_PERIOD] = SDLK_PERIOD;

	keymap[SCANCODE_SLASH] = SDLK_SLASH;

	keymap[SCANCODE_RIGHTSHIFT] = SDLK_RSHIFT;

	keymap[SCANCODE_KEYPADMULTIPLY] = SDLK_KP_MULTIPLY;

	keymap[SCANCODE_LEFTALT] = SDLK_LALT;

	keymap[SCANCODE_SPACE] = SDLK_SPACE;

	keymap[SCANCODE_CAPSLOCK] = SDLK_CAPSLOCK;

	keymap[SCANCODE_F1] = SDLK_F1;

	keymap[SCANCODE_F2] = SDLK_F2;

	keymap[SCANCODE_F3] = SDLK_F3;

	keymap[SCANCODE_F4] = SDLK_F4;

	keymap[SCANCODE_F5] = SDLK_F5;

	keymap[SCANCODE_F6] = SDLK_F6;

	keymap[SCANCODE_F7] = SDLK_F7;

	keymap[SCANCODE_F8] = SDLK_F8;

	keymap[SCANCODE_F9] = SDLK_F9;

	keymap[SCANCODE_F10] = SDLK_F10;

	keymap[SCANCODE_NUMLOCK] = SDLK_NUMLOCK;

	keymap[SCANCODE_SCROLLLOCK] = SDLK_SCROLLOCK;

	keymap[SCANCODE_KEYPAD7] = SDLK_KP7;

	keymap[SCANCODE_CURSORUPLEFT] = SDLK_KP7;

	keymap[SCANCODE_KEYPAD8] = SDLK_KP8;

	keymap[SCANCODE_CURSORUP] = SDLK_KP8;

	keymap[SCANCODE_KEYPAD9] = SDLK_KP9;

	keymap[SCANCODE_CURSORUPRIGHT] = SDLK_KP9;

	keymap[SCANCODE_KEYPADMINUS] = SDLK_KP_MINUS;

	keymap[SCANCODE_KEYPAD4] = SDLK_KP4;

	keymap[SCANCODE_CURSORLEFT] = SDLK_KP4;

	keymap[SCANCODE_KEYPAD5] = SDLK_KP5;

	keymap[SCANCODE_KEYPAD6] = SDLK_KP6;

	keymap[SCANCODE_CURSORRIGHT] = SDLK_KP6;

	keymap[SCANCODE_KEYPADPLUS] = SDLK_KP_PLUS;

	keymap[SCANCODE_KEYPAD1] = SDLK_KP1;

	keymap[SCANCODE_CURSORDOWNLEFT] = SDLK_KP1;

	keymap[SCANCODE_KEYPAD2] = SDLK_KP2;

	keymap[SCANCODE_CURSORDOWN] = SDLK_KP2;

	keymap[SCANCODE_KEYPAD3] = SDLK_KP3;

	keymap[SCANCODE_CURSORDOWNRIGHT] = SDLK_KP3;

	keymap[SCANCODE_KEYPAD0] = SDLK_KP0;

	keymap[SCANCODE_KEYPADPERIOD] = SDLK_KP_PERIOD;

	keymap[SCANCODE_LESS] = SDLK_LESS;

	keymap[SCANCODE_F11] = SDLK_F11;

	keymap[SCANCODE_F12] = SDLK_F12;

	keymap[SCANCODE_KEYPADENTER] = SDLK_KP_ENTER;

	keymap[SCANCODE_RIGHTCONTROL] = SDLK_RCTRL;

	keymap[SCANCODE_CONTROL] = SDLK_RCTRL;

	keymap[SCANCODE_KEYPADDIVIDE] = SDLK_KP_DIVIDE;

	keymap[SCANCODE_PRINTSCREEN] = SDLK_PRINT;

	keymap[SCANCODE_RIGHTALT] = SDLK_RALT;

	keymap[SCANCODE_BREAK] = SDLK_BREAK;

	keymap[SCANCODE_BREAK_ALTERNATIVE] = SDLK_UNKNOWN;

	keymap[SCANCODE_HOME] = SDLK_HOME;

	keymap[SCANCODE_CURSORBLOCKUP] = SDLK_UP;

	keymap[SCANCODE_PAGEUP] = SDLK_PAGEUP;

	keymap[SCANCODE_CURSORBLOCKLEFT] = SDLK_LEFT;

	keymap[SCANCODE_CURSORBLOCKRIGHT] = SDLK_RIGHT;

	keymap[SCANCODE_END] = SDLK_END;

	keymap[SCANCODE_CURSORBLOCKDOWN] = SDLK_DOWN;

	keymap[SCANCODE_PAGEDOWN] = SDLK_PAGEDOWN;

	keymap[SCANCODE_INSERT] = SDLK_INSERT;

	keymap[SCANCODE_REMOVE] = SDLK_DELETE;

	keymap[119] = SDLK_PAUSE;

	keymap[SCANCODE_RIGHTWIN] = SDLK_RSUPER;

	keymap[SCANCODE_LEFTWIN] = SDLK_LSUPER;

	keymap[127] = SDLK_MENU;

}

#if defined(linux)

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

{

	/* Set the keysym information */

	keysym->scancode = scancode;

	keysym->sym = keymap[scancode];

	keysym->mod = KMOD_NONE;

	/* If UNICODE is on, get the UNICODE value for the key */

	keysym->unicode = 0;

	if ( SDL_TranslateUNICODE ) {

		int map;

		SDLMod modstate;

		modstate = SDL_GetModState();

		map = 0;

		if ( modstate & KMOD_SHIFT ) {

			map |= (1<<KG_SHIFT);

		}

		if ( modstate & KMOD_CTRL ) {

			map |= (1<<KG_CTRL);

		}

		if ( modstate & KMOD_ALT ) {

			map |= (1<<KG_ALT);

		}

		if ( modstate & KMOD_MODE ) {

			map |= (1<<KG_ALTGR);

		}

		if ( KTYP(vga_keymap[map][scancode]) == KT_LETTER ) {

			if ( modstate & KMOD_CAPS ) {

				map ^= (1<<KG_SHIFT);

			}

		}

		if ( KTYP(vga_keymap[map][scancode]) == KT_PAD ) {

			if ( modstate & KMOD_NUM ) {

				keysym->unicode=KVAL(vga_keymap[map][scancode]);

			}

		} else {

			keysym->unicode = KVAL(vga_keymap[map][scancode]);

		}

	}

	return(keysym);

}

#elif defined(__FREEBSD__)

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

{

	/* Set the keysym information */

	keysym->scancode = scancode;

	keysym->sym = keymap[scancode];

	keysym->mod = KMOD_NONE;

	/* If UNICODE is on, get the UNICODE value for the key */

	keysym->unicode = 0;

	if ( SDL_TranslateUNICODE && vga_keymap ) {

		int map;

		SDLMod modstate;

		modstate = SDL_GetModState();

		map = 0;

		if ( modstate & KMOD_SHIFT ) {

			map += 1;

		}

		if ( modstate & KMOD_CTRL ) {

			map += 2;

		}

		if ( modstate & KMOD_ALT ) {

			map += 4;

		}

		if ( !(vga_keymap->key[scancode].spcl & (0x80 >> map)) ) {

			keysym->unicode = vga_keymap->key[scancode].map[map];

		}

	}

	return(keysym);

}

#else

#error You must choose your operating system here

#endif