--- /dev/null
+/*
+ * (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, sizeof(keybits_t));
+ 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, char *charcode)
+{
+ int ret = 0;
+ 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) {
+ ret = key_pbtn_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);
+}
+