[libpicofe.git] / in_sdl.c

/*
 * (C) Gražvydas "notaz" Ignotas, 2012
 *
 * This work is licensed under the terms of any of these licenses
 * (at your option):
 *  - GNU GPL, version 2 or later.
 *  - GNU LGPL, version 2.1 or later.
 *  - MAME license.
 * See the COPYING file in the top-level directory.
 */

#include <stdio.h>
#include <SDL.h>
#include "input.h"
#include "in_sdl.h"

#define IN_SDL_PREFIX "sdl:"
/* should be machine word for best performace */
typedef unsigned long keybits_t;
#define KEYBITS_WORD_BITS (sizeof(keybits_t) * 8)

struct in_sdl_state {
	SDL_Joystick *joy;
	int joy_id;
	int axis_keydown[2];
	keybits_t keystate[SDLK_LAST / KEYBITS_WORD_BITS + 1];
};

static const char * const in_sdl_keys[SDLK_LAST] = {
	[SDLK_BACKSPACE] = "backspace",
	[SDLK_TAB] = "tab",
	[SDLK_CLEAR] = "clear",
	[SDLK_RETURN] = "return",
	[SDLK_PAUSE] = "pause",
	[SDLK_ESCAPE] = "escape",
	[SDLK_SPACE] = "space",
	[SDLK_EXCLAIM]  = "!",
	[SDLK_QUOTEDBL]  = "\"",
	[SDLK_HASH]  = "#",
	[SDLK_DOLLAR]  = "$",
	[SDLK_AMPERSAND]  = "&",
	[SDLK_QUOTE] = "'",
	[SDLK_LEFTPAREN] = "(",
	[SDLK_RIGHTPAREN] = ")",
	[SDLK_ASTERISK] = "*",
	[SDLK_PLUS] = "+",
	[SDLK_COMMA] = ",",
	[SDLK_MINUS] = "-",
	[SDLK_PERIOD] = ".",
	[SDLK_SLASH] = "/",
	[SDLK_0] = "0",
	[SDLK_1] = "1",
	[SDLK_2] = "2",
	[SDLK_3] = "3",
	[SDLK_4] = "4",
	[SDLK_5] = "5",
	[SDLK_6] = "6",
	[SDLK_7] = "7",
	[SDLK_8] = "8",
	[SDLK_9] = "9",
	[SDLK_COLON] = ":",
	[SDLK_SEMICOLON] = ",",
	[SDLK_LESS] = "<",
	[SDLK_EQUALS] = "=",
	[SDLK_GREATER] = ">",
	[SDLK_QUESTION] = "?",
	[SDLK_AT] = "@",
	[SDLK_LEFTBRACKET] = "[",
	[SDLK_BACKSLASH] = "\\",
	[SDLK_RIGHTBRACKET] = "]",
	[SDLK_CARET] = "^",
	[SDLK_UNDERSCORE] = "_",
	[SDLK_BACKQUOTE] = "`",
	[SDLK_a] = "a",
	[SDLK_b] = "b",
	[SDLK_c] = "c",
	[SDLK_d] = "d",
	[SDLK_e] = "e",
	[SDLK_f] = "f",
	[SDLK_g] = "g",
	[SDLK_h] = "h",
	[SDLK_i] = "i",
	[SDLK_j] = "j",
	[SDLK_k] = "k",
	[SDLK_l] = "l",
	[SDLK_m] = "m",
	[SDLK_n] = "n",
	[SDLK_o] = "o",
	[SDLK_p] = "p",
	[SDLK_q] = "q",
	[SDLK_r] = "r",
	[SDLK_s] = "s",
	[SDLK_t] = "t",
	[SDLK_u] = "u",
	[SDLK_v] = "v",
	[SDLK_w] = "w",
	[SDLK_x] = "x",
	[SDLK_y] = "y",
	[SDLK_z] = "z",
	[SDLK_DELETE] = "delete",

	[SDLK_KP0] = "[0]",
	[SDLK_KP1] = "[1]",
	[SDLK_KP2] = "[2]",
	[SDLK_KP3] = "[3]",
	[SDLK_KP4] = "[4]",
	[SDLK_KP5] = "[5]",
	[SDLK_KP6] = "[6]",
	[SDLK_KP7] = "[7]",
	[SDLK_KP8] = "[8]",
	[SDLK_KP9] = "[9]",
	[SDLK_KP_PERIOD] = "[.]",
	[SDLK_KP_DIVIDE] = "[/]",
	[SDLK_KP_MULTIPLY] = "[*]",
	[SDLK_KP_MINUS] = "[-]",
	[SDLK_KP_PLUS] = "[+]",
	[SDLK_KP_ENTER] = "enter",
	[SDLK_KP_EQUALS] = "equals",

	[SDLK_UP] = "up",
	[SDLK_DOWN] = "down",
	[SDLK_RIGHT] = "right",
	[SDLK_LEFT] = "left",
	[SDLK_DOWN] = "down",
	[SDLK_INSERT] = "insert",
	[SDLK_HOME] = "home",
	[SDLK_END] = "end",
	[SDLK_PAGEUP] = "page up",
	[SDLK_PAGEDOWN] = "page down",

	[SDLK_F1] = "f1",
	[SDLK_F2] = "f2",
	[SDLK_F3] = "f3",
	[SDLK_F4] = "f4",
	[SDLK_F5] = "f5",
	[SDLK_F6] = "f6",
	[SDLK_F7] = "f7",
	[SDLK_F8] = "f8",
	[SDLK_F9] = "f9",
	[SDLK_F10] = "f10",
	[SDLK_F11] = "f11",
	[SDLK_F12] = "f12",
	[SDLK_F13] = "f13",
	[SDLK_F14] = "f14",
	[SDLK_F15] = "f15",

	[SDLK_NUMLOCK] = "numlock",
	[SDLK_CAPSLOCK] = "caps lock",
	[SDLK_SCROLLOCK] = "scroll lock",
	[SDLK_RSHIFT] = "right shift",
	[SDLK_LSHIFT] = "left shift",
	[SDLK_RCTRL] = "right ctrl",
	[SDLK_LCTRL] = "left ctrl",
	[SDLK_RALT] = "right alt",
	[SDLK_LALT] = "left alt",
	[SDLK_RMETA] = "right meta",
	[SDLK_LMETA] = "left meta",
	[SDLK_LSUPER] = "left super",	/* "Windows" keys */
	[SDLK_RSUPER] = "right super",	
	[SDLK_MODE] = "alt gr",
	[SDLK_COMPOSE] = "compose",
};

static void in_sdl_probe(void)
{
	struct in_sdl_state *state;
	SDL_Joystick *joy;
	int i, joycount;
	char name[256];

	state = calloc(1, sizeof(*state));
	if (state == NULL) {
		fprintf(stderr, "in_sdl: OOM\n");
		return;
	}

	in_register(IN_SDL_PREFIX "keys", -1, state, SDLK_LAST,
		in_sdl_keys, 0);

	/* joysticks go here too */
	SDL_InitSubSystem(SDL_INIT_JOYSTICK);

	joycount = SDL_NumJoysticks();
	for (i = 0; i < joycount; i++) {
		joy = SDL_JoystickOpen(i);
		if (joy == NULL)
			continue;

		state = calloc(1, sizeof(*state));
		if (state == NULL) {
			fprintf(stderr, "in_sdl: OOM\n");
			break;
		}
		state->joy = joy;
		state->joy_id = i;

		snprintf(name, sizeof(name), IN_SDL_PREFIX "%s", SDL_JoystickName(i));
		in_register(name, -1, state, SDLK_LAST, in_sdl_keys, 0);
	}

	if (joycount > 0)
		SDL_JoystickEventState(SDL_ENABLE);
}

static void in_sdl_free(void *drv_data)
{
	struct in_sdl_state *state = drv_data;

	if (state != NULL) {
		if (state->joy != NULL)
			SDL_JoystickClose(state->joy);
		free(state);
	}
}

static const char * const *
in_sdl_get_key_names(int *count)
{
	*count = SDLK_LAST;
	return in_sdl_keys;
}

/* could use SDL_GetKeyState, but this gives better packing */
static void update_keystate(keybits_t *keystate, int sym, int is_down)
{
	keybits_t *ks_word, mask;

	mask = 1;
	mask <<= sym & (KEYBITS_WORD_BITS - 1);
	ks_word = keystate + sym / KEYBITS_WORD_BITS;
	if (is_down)
		*ks_word |= mask;
	else
		*ks_word &= ~mask;
}

static int handle_event(struct in_sdl_state *state, SDL_Event *event,
	int *kc_out, int *down_out)
{
	if (event->type != SDL_KEYDOWN && event->type != SDL_KEYUP)
		return 0;

	update_keystate(state->keystate, event->key.keysym.sym,
		event->type == SDL_KEYDOWN);
	if (kc_out != NULL)
		*kc_out = event->key.keysym.sym;
	if (down_out != NULL)
		*down_out = event->type == SDL_KEYDOWN;

	return 1;
}

static int handle_joy_event(struct in_sdl_state *state, SDL_Event *event,
	int *kc_out, int *down_out)
{
	int kc = -1, down = 0, ret = 0;

	/* FIXME: should ckeck .which */
	/* TODO: remaining axis */
	switch (event->type) {
	case SDL_JOYAXISMOTION:
		if (event->jaxis.axis > 1)
			break;
		if (-16384 <= event->jaxis.value && event->jaxis.value <= 16384) {
			kc = state->axis_keydown[event->jaxis.axis];
			state->axis_keydown[event->jaxis.axis] = 0;
			ret = 1;
		}
		else if (event->jaxis.value < -16384) {
			kc = state->axis_keydown[event->jaxis.axis];
			if (kc)
				update_keystate(state->keystate, kc, 0);
			kc = event->jaxis.axis ? SDLK_UP : SDLK_LEFT;
			state->axis_keydown[event->jaxis.axis] = kc;
			down = 1;
			ret = 1;
		}
		else if (event->jaxis.value > 16384) {
			kc = state->axis_keydown[event->jaxis.axis];
			if (kc)
				update_keystate(state->keystate, kc, 0);
			kc = event->jaxis.axis ? SDLK_DOWN : SDLK_RIGHT;
			state->axis_keydown[event->jaxis.axis] = kc;
			down = 1;
			ret = 1;
		}
		break;

	case SDL_JOYBUTTONDOWN:
	case SDL_JOYBUTTONUP:
		kc = (int)event->jbutton.button + SDLK_WORLD_0;
		down = event->jbutton.state == SDL_PRESSED;
		ret = 1;
		break;
	}

	if (ret)
		update_keystate(state->keystate, kc, down);
	if (kc_out != NULL)
		*kc_out = kc;
	if (down_out != NULL)
		*down_out = down;

	return ret;
}

#define JOY_EVENTS (SDL_JOYAXISMOTIONMASK | SDL_JOYBALLMOTIONMASK | SDL_JOYHATMOTIONMASK \
		    | SDL_JOYBUTTONDOWNMASK | SDL_JOYBUTTONUPMASK)

static int collect_events(struct in_sdl_state *state, int *one_kc, int *one_down)
{
	SDL_Event events[4];
	Uint32 mask = state->joy ? JOY_EVENTS : (SDL_ALLEVENTS & ~JOY_EVENTS);
	int count, maxcount;
	int i, ret, retval = 0;

	maxcount = (one_kc != NULL) ? 1 : sizeof(events) / sizeof(events[0]);

	SDL_PumpEvents();
	while (1) {
		count = SDL_PeepEvents(events, maxcount, SDL_GETEVENT, mask);
		if (count <= 0)
			break;
		for (i = 0; i < count; i++) {
			if (state->joy)
				ret = handle_joy_event(state,
					&events[i], one_kc, one_down);
			else
				ret = handle_event(state,
					&events[i], one_kc, one_down);
			retval |= ret;
			if (one_kc != NULL && ret)
				goto out;
		}
	}

out:
	return retval;
}

static int in_sdl_update(void *drv_data, const int *binds, int *result)
{
	struct in_sdl_state *state = drv_data;
	keybits_t mask;
	int i, sym, bit, b;

	collect_events(state, NULL, NULL);

	for (i = 0; i < SDLK_LAST / KEYBITS_WORD_BITS + 1; i++) {
		mask = state->keystate[i];
		if (mask == 0)
			continue;
		for (bit = 0; mask != 0; bit++, mask >>= 1) {
			if ((mask & 1) == 0)
				continue;
			sym = i * KEYBITS_WORD_BITS + bit;

			for (b = 0; b < IN_BINDTYPE_COUNT; b++)
				result[b] |= binds[IN_BIND_OFFS(sym, b)];
		}
	}

	return 0;
}

static int in_sdl_update_keycode(void *drv_data, int *is_down)
{
	struct in_sdl_state *state = drv_data;
	int ret_kc = -1, ret_down = 0;

	collect_events(state, &ret_kc, &ret_down);

	if (is_down != NULL)
		*is_down = ret_down;

	return ret_kc;
}

struct menu_keymap {
	short key;
	short pbtn;
};

static const struct menu_keymap key_pbtn_map[] =
{
	{ SDLK_UP,	PBTN_UP },
	{ SDLK_DOWN,	PBTN_DOWN },
	{ SDLK_LEFT,	PBTN_LEFT },
	{ SDLK_RIGHT,	PBTN_RIGHT },
	/* XXX: maybe better set this from it's plat code somehow */
	{ SDLK_RETURN,	PBTN_MOK },
	{ SDLK_ESCAPE,	PBTN_MBACK },
	{ SDLK_a,	PBTN_MA2 },
	{ SDLK_s,	PBTN_MA3 },
	{ SDLK_BACKSLASH,    PBTN_MENU },
	{ SDLK_LEFTBRACKET,  PBTN_L },
	{ SDLK_RIGHTBRACKET, PBTN_R },
};
#define KEY_PBTN_MAP_SIZE (sizeof(key_pbtn_map) / sizeof(key_pbtn_map[0]))

static const struct menu_keymap joybtn_pbtn_map[] =
{
	{ SDLK_UP,	PBTN_UP },
	{ SDLK_DOWN,	PBTN_DOWN },
	{ SDLK_LEFT,	PBTN_LEFT },
	{ SDLK_RIGHT,	PBTN_RIGHT },
	/* joystick */
	{ SDLK_WORLD_0,	PBTN_MOK },
	{ SDLK_WORLD_1,	PBTN_MBACK },
	{ SDLK_WORLD_2,	PBTN_MA2 },
	{ SDLK_WORLD_3,	PBTN_MA3 },
};
#define JOYBTN_PBTN_MAP_SIZE (sizeof(joybtn_pbtn_map) / sizeof(joybtn_pbtn_map[0]))

static int in_sdl_menu_translate(void *drv_data, int keycode, char *charcode)
{
	struct in_sdl_state *state = drv_data;
	const struct menu_keymap *map;
	int map_len;
	int ret = 0;
	int i;

	map = state->joy ? joybtn_pbtn_map : key_pbtn_map;
	map_len = state->joy ? JOYBTN_PBTN_MAP_SIZE : KEY_PBTN_MAP_SIZE;

	if (keycode < 0)
	{
		/* menu -> kc */
		keycode = -keycode;
		for (i = 0; i < map_len; i++)
			if (map[i].pbtn == keycode)
				return map[i].key;
	}
	else
	{
		for (i = 0; i < map_len; i++) {
			if (map[i].key == keycode) {
				ret = map[i].pbtn;
				break;
			}
		}

		if (charcode != NULL && (unsigned int)keycode < SDLK_LAST &&
		    in_sdl_keys[keycode] != NULL && in_sdl_keys[keycode][1] == 0)
		{
			ret |= PBTN_CHAR;
			*charcode = in_sdl_keys[keycode][0];
		}
	}

	return ret;
}

static const in_drv_t in_sdl_drv = {
	.prefix         = IN_SDL_PREFIX,
	.probe          = in_sdl_probe,
	.free           = in_sdl_free,
	.get_key_names  = in_sdl_get_key_names,
	.update         = in_sdl_update,
	.update_keycode = in_sdl_update_keycode,
	.menu_translate = in_sdl_menu_translate,
};

void in_sdl_init(const struct in_default_bind *defbinds)
{
	in_register_driver(&in_sdl_drv, defbinds);
}
Commit	Line	Data
d1dc092f	1	/*
	2	* (C) Gražvydas "notaz" Ignotas, 2012
	3	*
	4	* This work is licensed under the terms of any of these licenses
	5	* (at your option):
	6	* - GNU GPL, version 2 or later.
	7	* - GNU LGPL, version 2.1 or later.
f89d8471	8	* - MAME license.
d1dc092f	9	* See the COPYING file in the top-level directory.
	10	*/
	11
	12	#include <stdio.h>
	13	#include <SDL.h>
	14	#include "input.h"
	15	#include "in_sdl.h"
	16
	17	#define IN_SDL_PREFIX "sdl:"
	18	/* should be machine word for best performace */
	19	typedef unsigned long keybits_t;
	20	#define KEYBITS_WORD_BITS (sizeof(keybits_t) * 8)
	21
6407ad5b	22	struct in_sdl_state {
	23	SDL_Joystick *joy;
	24	int joy_id;
	25	int axis_keydown[2];
	26	keybits_t keystate[SDLK_LAST / KEYBITS_WORD_BITS + 1];
	27	};
	28
d1dc092f	29	static const char * const in_sdl_keys[SDLK_LAST] = {
	30	[SDLK_BACKSPACE] = "backspace",
	31	[SDLK_TAB] = "tab",
	32	[SDLK_CLEAR] = "clear",
	33	[SDLK_RETURN] = "return",
	34	[SDLK_PAUSE] = "pause",
	35	[SDLK_ESCAPE] = "escape",
	36	[SDLK_SPACE] = "space",
	37	[SDLK_EXCLAIM] = "!",
	38	[SDLK_QUOTEDBL] = "\"",
	39	[SDLK_HASH] = "#",
	40	[SDLK_DOLLAR] = "$",
	41	[SDLK_AMPERSAND] = "&",
	42	[SDLK_QUOTE] = "'",
	43	[SDLK_LEFTPAREN] = "(",
	44	[SDLK_RIGHTPAREN] = ")",
	45	[SDLK_ASTERISK] = "*",
	46	[SDLK_PLUS] = "+",
	47	[SDLK_COMMA] = ",",
	48	[SDLK_MINUS] = "-",
	49	[SDLK_PERIOD] = ".",
	50	[SDLK_SLASH] = "/",
	51	[SDLK_0] = "0",
	52	[SDLK_1] = "1",
	53	[SDLK_2] = "2",
	54	[SDLK_3] = "3",
	55	[SDLK_4] = "4",
	56	[SDLK_5] = "5",
	57	[SDLK_6] = "6",
	58	[SDLK_7] = "7",
	59	[SDLK_8] = "8",
	60	[SDLK_9] = "9",
	61	[SDLK_COLON] = ":",
	62	[SDLK_SEMICOLON] = ",",
	63	[SDLK_LESS] = "<",
	64	[SDLK_EQUALS] = "=",
	65	[SDLK_GREATER] = ">",
	66	[SDLK_QUESTION] = "?",
	67	[SDLK_AT] = "@",
	68	[SDLK_LEFTBRACKET] = "[",
	69	[SDLK_BACKSLASH] = "\\",
	70	[SDLK_RIGHTBRACKET] = "]",
	71	[SDLK_CARET] = "^",
	72	[SDLK_UNDERSCORE] = "_",
	73	[SDLK_BACKQUOTE] = "`",
	74	[SDLK_a] = "a",
	75	[SDLK_b] = "b",
	76	[SDLK_c] = "c",
	77	[SDLK_d] = "d",
	78	[SDLK_e] = "e",
	79	[SDLK_f] = "f",
	80	[SDLK_g] = "g",
	81	[SDLK_h] = "h",
	82	[SDLK_i] = "i",
	83	[SDLK_j] = "j",
	84	[SDLK_k] = "k",
	85	[SDLK_l] = "l",
	86	[SDLK_m] = "m",
	87	[SDLK_n] = "n",
	88	[SDLK_o] = "o",
	89	[SDLK_p] = "p",
	90	[SDLK_q] = "q",
	91	[SDLK_r] = "r",
	92	[SDLK_s] = "s",
93	[SDLK_t] = "t",
94	[SDLK_u] = "u",
95	[SDLK_v] = "v",
96	[SDLK_w] = "w",
97	[SDLK_x] = "x",
98	[SDLK_y] = "y",
99	[SDLK_z] = "z",
100	[SDLK_DELETE] = "delete",
101
102	[SDLK_KP0] = "[0]",
103	[SDLK_KP1] = "[1]",
104	[SDLK_KP2] = "[2]",
105	[SDLK_KP3] = "[3]",
106	[SDLK_KP4] = "[4]",
107	[SDLK_KP5] = "[5]",
108	[SDLK_KP6] = "[6]",
109	[SDLK_KP7] = "[7]",
110	[SDLK_KP8] = "[8]",
111	[SDLK_KP9] = "[9]",
112	[SDLK_KP_PERIOD] = "[.]",
113	[SDLK_KP_DIVIDE] = "[/]",
114	[SDLK_KP_MULTIPLY] = "[*]",
115	[SDLK_KP_MINUS] = "[-]",
116	[SDLK_KP_PLUS] = "[+]",
117	[SDLK_KP_ENTER] = "enter",
118	[SDLK_KP_EQUALS] = "equals",
119
120	[SDLK_UP] = "up",
121	[SDLK_DOWN] = "down",
122	[SDLK_RIGHT] = "right",
123	[SDLK_LEFT] = "left",
124	[SDLK_DOWN] = "down",
125	[SDLK_INSERT] = "insert",
126	[SDLK_HOME] = "home",
127	[SDLK_END] = "end",
128	[SDLK_PAGEUP] = "page up",
129	[SDLK_PAGEDOWN] = "page down",
130
131	[SDLK_F1] = "f1",
132	[SDLK_F2] = "f2",
133	[SDLK_F3] = "f3",
134	[SDLK_F4] = "f4",
135	[SDLK_F5] = "f5",
136	[SDLK_F6] = "f6",
137	[SDLK_F7] = "f7",
138	[SDLK_F8] = "f8",
139	[SDLK_F9] = "f9",
140	[SDLK_F10] = "f10",
141	[SDLK_F11] = "f11",
142	[SDLK_F12] = "f12",
143	[SDLK_F13] = "f13",
144	[SDLK_F14] = "f14",
145	[SDLK_F15] = "f15",
146
147	[SDLK_NUMLOCK] = "numlock",
148	[SDLK_CAPSLOCK] = "caps lock",
149	[SDLK_SCROLLOCK] = "scroll lock",
150	[SDLK_RSHIFT] = "right shift",
151	[SDLK_LSHIFT] = "left shift",
152	[SDLK_RCTRL] = "right ctrl",
153	[SDLK_LCTRL] = "left ctrl",
154	[SDLK_RALT] = "right alt",
155	[SDLK_LALT] = "left alt",
156	[SDLK_RMETA] = "right meta",
157	[SDLK_LMETA] = "left meta",
158	[SDLK_LSUPER] = "left super", /* "Windows" keys */
159	[SDLK_RSUPER] = "right super",
160	[SDLK_MODE] = "alt gr",
161	[SDLK_COMPOSE] = "compose",
162	};
163
164	static void in_sdl_probe(void)
165	{
6407ad5b	166	struct in_sdl_state *state;
	167	SDL_Joystick *joy;
	168	int i, joycount;
	169	char name[256];
d1dc092f	170
6407ad5b	171	state = calloc(1, sizeof(*state));
6407ad5b	172	if (state == NULL) {
d1dc092f	173	fprintf(stderr, "in_sdl: OOM\n");
	174	return;
	175	}
	176
6407ad5b	177	in_register(IN_SDL_PREFIX "keys", -1, state, SDLK_LAST,
d1dc092f	178	in_sdl_keys, 0);
6407ad5b	179
	180	/* joysticks go here too */
	181	SDL_InitSubSystem(SDL_INIT_JOYSTICK);
	182
	183	joycount = SDL_NumJoysticks();
	184	for (i = 0; i < joycount; i++) {
	185	joy = SDL_JoystickOpen(i);
	186	if (joy == NULL)
	187	continue;
	188
	189	state = calloc(1, sizeof(*state));
	190	if (state == NULL) {
	191	fprintf(stderr, "in_sdl: OOM\n");
	192	break;
	193	}
	194	state->joy = joy;
	195	state->joy_id = i;
	196
	197	snprintf(name, sizeof(name), IN_SDL_PREFIX "%s", SDL_JoystickName(i));
	198	in_register(name, -1, state, SDLK_LAST, in_sdl_keys, 0);
	199	}
	200
	201	if (joycount > 0)
	202	SDL_JoystickEventState(SDL_ENABLE);
d1dc092f	203	}
	204
	205	static void in_sdl_free(void *drv_data)
	206	{
6407ad5b	207	struct in_sdl_state *state = drv_data;
d1dc092f	208
6407ad5b	209	if (state != NULL) {
	210	if (state->joy != NULL)
	211	SDL_JoystickClose(state->joy);
	212	free(state);
	213	}
d1dc092f	214	}
	215
	216	static const char * const *
	217	in_sdl_get_key_names(int *count)
	218	{
	219	*count = SDLK_LAST;
	220	return in_sdl_keys;
	221	}
	222
	223	/* could use SDL_GetKeyState, but this gives better packing */
	224	static void update_keystate(keybits_t *keystate, int sym, int is_down)
	225	{
	226	keybits_t *ks_word, mask;
	227
	228	mask = 1;
	229	mask <<= sym & (KEYBITS_WORD_BITS - 1);
	230	ks_word = keystate + sym / KEYBITS_WORD_BITS;
	231	if (is_down)
	232	*ks_word \|= mask;
	233	else
	234	*ks_word &= ~mask;
	235	}
	236
6407ad5b	237	static int handle_event(struct in_sdl_state state, SDL_Event event,
6407ad5b	238	int kc_out, int down_out)
d1dc092f	239	{
6407ad5b	240	if (event->type != SDL_KEYDOWN && event->type != SDL_KEYUP)
6407ad5b	241	return 0;
d1dc092f	242
6407ad5b	243	update_keystate(state->keystate, event->key.keysym.sym,
	244	event->type == SDL_KEYDOWN);
	245	if (kc_out != NULL)
	246	*kc_out = event->key.keysym.sym;
	247	if (down_out != NULL)
	248	*down_out = event->type == SDL_KEYDOWN;
	249
	250	return 1;
	251	}
d1dc092f	252
6407ad5b	253	static int handle_joy_event(struct in_sdl_state state, SDL_Event event,
	254	int kc_out, int down_out)
	255	{
	256	int kc = -1, down = 0, ret = 0;
	257
	258	/* FIXME: should ckeck .which */
	259	/* TODO: remaining axis */
	260	switch (event->type) {
	261	case SDL_JOYAXISMOTION:
	262	if (event->jaxis.axis > 1)
	263	break;
	264	if (-16384 <= event->jaxis.value && event->jaxis.value <= 16384) {
	265	kc = state->axis_keydown[event->jaxis.axis];
	266	state->axis_keydown[event->jaxis.axis] = 0;
	267	ret = 1;
	268	}
	269	else if (event->jaxis.value < -16384) {
	270	kc = state->axis_keydown[event->jaxis.axis];
	271	if (kc)
	272	update_keystate(state->keystate, kc, 0);
	273	kc = event->jaxis.axis ? SDLK_UP : SDLK_LEFT;
	274	state->axis_keydown[event->jaxis.axis] = kc;
	275	down = 1;
	276	ret = 1;
	277	}
	278	else if (event->jaxis.value > 16384) {
	279	kc = state->axis_keydown[event->jaxis.axis];
	280	if (kc)
	281	update_keystate(state->keystate, kc, 0);
	282	kc = event->jaxis.axis ? SDLK_DOWN : SDLK_RIGHT;
	283	state->axis_keydown[event->jaxis.axis] = kc;
	284	down = 1;
	285	ret = 1;
	286	}
	287	break;
	288
	289	case SDL_JOYBUTTONDOWN:
	290	case SDL_JOYBUTTONUP:
	291	kc = (int)event->jbutton.button + SDLK_WORLD_0;
	292	down = event->jbutton.state == SDL_PRESSED;
	293	ret = 1;
	294	break;
d1dc092f	295	}
d1dc092f	296
6407ad5b	297	if (ret)
	298	update_keystate(state->keystate, kc, down);
	299	if (kc_out != NULL)
	300	*kc_out = kc;
	301	if (down_out != NULL)
	302	*down_out = down;
	303
	304	return ret;
	305	}
	306
	307	#define JOY_EVENTS (SDL_JOYAXISMOTIONMASK \| SDL_JOYBALLMOTIONMASK \| SDL_JOYHATMOTIONMASK \
	308	\| SDL_JOYBUTTONDOWNMASK \| SDL_JOYBUTTONUPMASK)
	309
	310	static int collect_events(struct in_sdl_state state, int one_kc, int *one_down)
	311	{
	312	SDL_Event events[4];
	313	Uint32 mask = state->joy ? JOY_EVENTS : (SDL_ALLEVENTS & ~JOY_EVENTS);
	314	int count, maxcount;
	315	int i, ret, retval = 0;
	316
	317	maxcount = (one_kc != NULL) ? 1 : sizeof(events) / sizeof(events[0]);
	318
	319	SDL_PumpEvents();
	320	while (1) {
	321	count = SDL_PeepEvents(events, maxcount, SDL_GETEVENT, mask);
	322	if (count <= 0)
	323	break;
	324	for (i = 0; i < count; i++) {
	325	if (state->joy)
	326	ret = handle_joy_event(state,
	327	&events[i], one_kc, one_down);
	328	else
	329	ret = handle_event(state,
	330	&events[i], one_kc, one_down);
	331	retval \|= ret;
	332	if (one_kc != NULL && ret)
	333	goto out;
	334	}
	335	}
	336
	337	out:
	338	return retval;
	339	}
	340
	341	static int in_sdl_update(void drv_data, const int binds, int *result)
	342	{
	343	struct in_sdl_state *state = drv_data;
	344	keybits_t mask;
	345	int i, sym, bit, b;
	346
	347	collect_events(state, NULL, NULL);
	348
d1dc092f	349	for (i = 0; i < SDLK_LAST / KEYBITS_WORD_BITS + 1; i++) {
6407ad5b	350	mask = state->keystate[i];
d1dc092f	351	if (mask == 0)
	352	continue;
	353	for (bit = 0; mask != 0; bit++, mask >>= 1) {
	354	if ((mask & 1) == 0)
	355	continue;
	356	sym = i * KEYBITS_WORD_BITS + bit;
	357
	358	for (b = 0; b < IN_BINDTYPE_COUNT; b++)
	359	result[b] \|= binds[IN_BIND_OFFS(sym, b)];
	360	}
	361	}
	362
	363	return 0;
	364	}
	365
	366	static int in_sdl_update_keycode(void drv_data, int is_down)
	367	{
6407ad5b	368	struct in_sdl_state *state = drv_data;
	369	int ret_kc = -1, ret_down = 0;
	370
	371	collect_events(state, &ret_kc, &ret_down);
	372
d1dc092f	373	if (is_down != NULL)
	374	*is_down = ret_down;
	375
	376	return ret_kc;
	377	}
	378
6407ad5b	379	struct menu_keymap {
d1dc092f	380	short key;
d1dc092f	381	short pbtn;
6407ad5b	382	};
	383
	384	static const struct menu_keymap key_pbtn_map[] =
d1dc092f	385	{
	386	{ SDLK_UP, PBTN_UP },
	387	{ SDLK_DOWN, PBTN_DOWN },
	388	{ SDLK_LEFT, PBTN_LEFT },
	389	{ SDLK_RIGHT, PBTN_RIGHT },
	390	/* XXX: maybe better set this from it's plat code somehow */
	391	{ SDLK_RETURN, PBTN_MOK },
	392	{ SDLK_ESCAPE, PBTN_MBACK },
	393	{ SDLK_a, PBTN_MA2 },
	394	{ SDLK_s, PBTN_MA3 },
	395	{ SDLK_BACKSLASH, PBTN_MENU },
	396	{ SDLK_LEFTBRACKET, PBTN_L },
	397	{ SDLK_RIGHTBRACKET, PBTN_R },
	398	};
d1dc092f	399	#define KEY_PBTN_MAP_SIZE (sizeof(key_pbtn_map) / sizeof(key_pbtn_map[0]))
d1dc092f	400
6407ad5b	401	static const struct menu_keymap joybtn_pbtn_map[] =
	402	{
	403	{ SDLK_UP, PBTN_UP },
	404	{ SDLK_DOWN, PBTN_DOWN },
	405	{ SDLK_LEFT, PBTN_LEFT },
	406	{ SDLK_RIGHT, PBTN_RIGHT },
	407	/* joystick */
	408	{ SDLK_WORLD_0, PBTN_MOK },
	409	{ SDLK_WORLD_1, PBTN_MBACK },
	410	{ SDLK_WORLD_2, PBTN_MA2 },
	411	{ SDLK_WORLD_3, PBTN_MA3 },
	412	};
	413	#define JOYBTN_PBTN_MAP_SIZE (sizeof(joybtn_pbtn_map) / sizeof(joybtn_pbtn_map[0]))
	414
d1dc092f	415	static int in_sdl_menu_translate(void drv_data, int keycode, char charcode)
d1dc092f	416	{
6407ad5b	417	struct in_sdl_state *state = drv_data;
	418	const struct menu_keymap *map;
	419	int map_len;
d1dc092f	420	int ret = 0;
	421	int i;
	422
6407ad5b	423	map = state->joy ? joybtn_pbtn_map : key_pbtn_map;
	424	map_len = state->joy ? JOYBTN_PBTN_MAP_SIZE : KEY_PBTN_MAP_SIZE;
	425
d1dc092f	426	if (keycode < 0)
	427	{
	428	/* menu -> kc */
	429	keycode = -keycode;
6407ad5b	430	for (i = 0; i < map_len; i++)
	431	if (map[i].pbtn == keycode)
	432	return map[i].key;
d1dc092f	433	}
	434	else
	435	{
6407ad5b	436	for (i = 0; i < map_len; i++) {
	437	if (map[i].key == keycode) {
	438	ret = map[i].pbtn;
d1dc092f	439	break;
	440	}
	441	}
	442
	443	if (charcode != NULL && (unsigned int)keycode < SDLK_LAST &&
	444	in_sdl_keys[keycode] != NULL && in_sdl_keys[keycode][1] == 0)
	445	{
	446	ret \|= PBTN_CHAR;
	447	*charcode = in_sdl_keys[keycode][0];
	448	}
	449	}
	450
	451	return ret;
	452	}
	453
	454	static const in_drv_t in_sdl_drv = {
	455	.prefix = IN_SDL_PREFIX,
	456	.probe = in_sdl_probe,
	457	.free = in_sdl_free,
	458	.get_key_names = in_sdl_get_key_names,
	459	.update = in_sdl_update,
	460	.update_keycode = in_sdl_update_keycode,
	461	.menu_translate = in_sdl_menu_translate,
	462	};
	463
	464	void in_sdl_init(const struct in_default_bind *defbinds)
	465	{
	466	in_register_driver(&in_sdl_drv, defbinds);
	467	}
	468