frontend: generic: preliminary SDL support

2 files changed, 310 insertions, 0 deletions

diff --git a/frontend/common/in_sdl.c b/frontend/common/in_sdl.c
new file mode 100644
index 0000000..27c183b
--- /dev/null
+++ b/frontend/common/in_sdl.c
@@ -0,0 +1,309 @@
+/*
+ * (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.
+ * 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)
+
+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)
+{
+	keybits_t *keystate;
+
+	keystate = calloc(SDLK_LAST / KEYBITS_WORD_BITS + 1, 1);
+	if (keystate == NULL) {
+		fprintf(stderr, "in_sdl: OOM\n");
+		return;
+	}
+
+	in_register(IN_SDL_PREFIX "keys", -1, keystate, SDLK_LAST,
+		in_sdl_keys, 0);
+}
+
+static void in_sdl_free(void *drv_data)
+{
+	keybits_t *keystate = drv_data;
+
+	if (keystate != NULL)
+		free(keystate);
+}
+
+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 in_sdl_update(void *drv_data, const int *binds, int *result)
+{
+	keybits_t *keystate = drv_data, mask;
+	SDL_Event event;
+	int i, sym, bit, b;
+
+	while (SDL_PollEvent(&event)) {
+		if (event.type != SDL_KEYDOWN && event.type != SDL_KEYUP)
+			continue;
+
+		update_keystate(keystate, event.key.keysym.sym,
+			event.type == SDL_KEYDOWN);
+	}
+
+	for (i = 0; i < SDLK_LAST / KEYBITS_WORD_BITS + 1; i++) {
+		mask = 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)
+{
+	int ret, ret_kc = -1, ret_down = 0;
+	SDL_Event event;
+
+	ret = SDL_PollEvent(&event);
+	if (ret == 0)
+		goto out;
+	if (event.type != SDL_KEYDOWN && event.type != SDL_KEYUP)
+		goto out;
+
+	if (event.key.type == SDL_KEYDOWN)
+		ret_down = 1;
+	ret_kc = event.key.keysym.sym;
+	update_keystate(drv_data, ret_kc, ret_down);
+out:
+	if (is_down != NULL)
+		*is_down = ret_down;
+
+	return ret_kc;
+}
+
+static const struct {
+	short key;
+	short pbtn;
+} 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 int in_sdl_menu_translate(void *drv_data, int keycode)
+{
+	int i;
+
+	if (keycode < 0)
+	{
+		/* menu -> kc */
+		keycode = -keycode;
+		for (i = 0; i < KEY_PBTN_MAP_SIZE; i++)
+			if (key_pbtn_map[i].pbtn == keycode)
+				return key_pbtn_map[i].key;
+	}
+	else
+	{
+		for (i = 0; i < KEY_PBTN_MAP_SIZE; i++)
+			if (key_pbtn_map[i].key == keycode)
+				return key_pbtn_map[i].pbtn;
+	}
+
+	return 0;
+}
+
+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(void)
+{
+	in_register_driver(&in_sdl_drv);
+}
+
diff --git a/frontend/common/in_sdl.h b/frontend/common/in_sdl.h
new file mode 100644
index 0000000..9c9d406
--- /dev/null
+++ b/frontend/common/in_sdl.h
@@ -0,0 +1 @@
+void in_sdl_init(void);