2 * (C) GraÅžvydas "notaz" Ignotas, 2012
4 * This work is licensed under the terms of any of these licenses
6 * - GNU GPL, version 2 or later.
7 * - GNU LGPL, version 2.1 or later.
9 * See the COPYING file in the top-level directory.
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)
30 keybits_t keystate[SDLK_LAST / KEYBITS_WORD_BITS + 1];
31 // emulator keys should always be processed immediately lest one is lost
32 keybits_t emu_keys[SDLK_LAST / KEYBITS_WORD_BITS + 1];
35 static void (*ext_event_handler)(void *event);
37 static const char * const in_sdl_keys[SDLK_LAST] = {
38 [SDLK_BACKSPACE] = "backspace",
40 [SDLK_CLEAR] = "clear",
41 [SDLK_RETURN] = "return",
42 [SDLK_PAUSE] = "pause",
43 [SDLK_ESCAPE] = "escape",
44 [SDLK_SPACE] = "space",
46 [SDLK_QUOTEDBL] = "\"",
49 [SDLK_AMPERSAND] = "&",
51 [SDLK_LEFTPAREN] = "(",
52 [SDLK_RIGHTPAREN] = ")",
53 [SDLK_ASTERISK] = "*",
70 [SDLK_SEMICOLON] = ";",
74 [SDLK_QUESTION] = "?",
76 [SDLK_LEFTBRACKET] = "[",
77 [SDLK_BACKSLASH] = "\\",
78 [SDLK_RIGHTBRACKET] = "]",
80 [SDLK_UNDERSCORE] = "_",
81 [SDLK_BACKQUOTE] = "`",
108 [SDLK_DELETE] = "delete",
120 [SDLK_KP_PERIOD] = "[.]",
121 [SDLK_KP_DIVIDE] = "[/]",
122 [SDLK_KP_MULTIPLY] = "[*]",
123 [SDLK_KP_MINUS] = "[-]",
124 [SDLK_KP_PLUS] = "[+]",
125 [SDLK_KP_ENTER] = "enter",
126 [SDLK_KP_EQUALS] = "equals",
129 [SDLK_DOWN] = "down",
130 [SDLK_RIGHT] = "right",
131 [SDLK_LEFT] = "left",
132 [SDLK_INSERT] = "insert",
133 [SDLK_HOME] = "home",
135 [SDLK_PAGEUP] = "page up",
136 [SDLK_PAGEDOWN] = "page down",
154 [SDLK_NUMLOCK] = "numlock",
155 [SDLK_CAPSLOCK] = "caps lock",
156 [SDLK_SCROLLOCK] = "scroll lock",
157 [SDLK_RSHIFT] = "right shift",
158 [SDLK_LSHIFT] = "left shift",
159 [SDLK_RCTRL] = "right ctrl",
160 [SDLK_LCTRL] = "left ctrl",
161 [SDLK_RALT] = "right alt",
162 [SDLK_LALT] = "left alt",
163 [SDLK_RMETA] = "right meta",
164 [SDLK_LMETA] = "left meta",
165 [SDLK_LSUPER] = "left super", /* "Windows" keys */
166 [SDLK_RSUPER] = "right super",
167 [SDLK_MODE] = "alt gr",
168 [SDLK_COMPOSE] = "compose",
171 static void in_sdl_probe(const in_drv_t *drv)
173 const struct in_pdata *pdata = drv->pdata;
174 const char * const * key_names = in_sdl_keys;
175 struct in_sdl_state *state;
180 if (pdata->key_names)
181 key_names = pdata->key_names;
183 state = calloc(1, sizeof(*state));
185 fprintf(stderr, "in_sdl: OOM\n");
190 in_register(IN_SDL_PREFIX "keys", -1, state, SDLK_LAST,
193 /* joysticks go here too */
194 SDL_InitSubSystem(SDL_INIT_JOYSTICK);
196 joycount = SDL_NumJoysticks();
197 for (i = 0; i < joycount; i++) {
198 joy = SDL_JoystickOpen(i);
202 state = calloc(1, sizeof(*state));
204 fprintf(stderr, "in_sdl: OOM\n");
211 snprintf(name, sizeof(name), IN_SDL_PREFIX "%s", SDL_JoystickName(i));
212 in_register(name, -1, state, SDLK_LAST, key_names, 0);
216 SDL_JoystickEventState(SDL_ENABLE);
219 static void in_sdl_free(void *drv_data)
221 struct in_sdl_state *state = drv_data;
224 if (state->joy != NULL)
225 SDL_JoystickClose(state->joy);
230 static const char * const *
231 in_sdl_get_key_names(const in_drv_t *drv, int *count)
233 const struct in_pdata *pdata = drv->pdata;
236 if (pdata->key_names)
237 return pdata->key_names;
241 /* could use SDL_GetKeyState, but this gives better packing */
242 static void update_keystate(keybits_t *keystate, int sym, int is_down)
244 keybits_t *ks_word, mask;
247 mask <<= sym & (KEYBITS_WORD_BITS - 1);
248 ks_word = keystate + sym / KEYBITS_WORD_BITS;
255 static int get_keystate(keybits_t *keystate, int sym)
257 keybits_t *ks_word, mask;
260 mask <<= sym & (KEYBITS_WORD_BITS - 1);
261 ks_word = keystate + sym / KEYBITS_WORD_BITS;
262 return !!(*ks_word & mask);
265 static int handle_event(struct in_sdl_state *state, SDL_Event *event,
266 int *kc_out, int *down_out, int *emu_out)
270 if (event->type != SDL_KEYDOWN && event->type != SDL_KEYUP)
273 emu = get_keystate(state->emu_keys, event->key.keysym.sym);
274 update_keystate(state->keystate, event->key.keysym.sym,
275 event->type == SDL_KEYDOWN);
277 *kc_out = event->key.keysym.sym;
278 if (down_out != NULL)
279 *down_out = event->type == SDL_KEYDOWN;
286 static int handle_joy_event(struct in_sdl_state *state, SDL_Event *event,
287 int *kc_out, int *down_out, int *emu_out)
289 int kc = -1, down = 0, emu = 0, ret = 0;
291 /* TODO: remaining axis */
292 switch (event->type) {
293 case SDL_JOYAXISMOTION:
294 if (event->jaxis.which != state->joy_id)
296 if (event->jaxis.axis > 1)
298 if (-16384 <= event->jaxis.value && event->jaxis.value <= 16384) {
299 kc = state->axis_keydown[event->jaxis.axis];
300 state->axis_keydown[event->jaxis.axis] = 0;
303 else if (event->jaxis.value < -16384) {
304 kc = state->axis_keydown[event->jaxis.axis];
306 emu |= get_keystate(state->emu_keys, kc);
307 update_keystate(state->keystate, kc, 0);
309 kc = event->jaxis.axis ? SDLK_UP : SDLK_LEFT;
310 state->axis_keydown[event->jaxis.axis] = kc;
314 else if (event->jaxis.value > 16384) {
315 kc = state->axis_keydown[event->jaxis.axis];
317 emu |= get_keystate(state->emu_keys, kc);
318 update_keystate(state->keystate, kc, 0);
320 kc = event->jaxis.axis ? SDLK_DOWN : SDLK_RIGHT;
321 state->axis_keydown[event->jaxis.axis] = kc;
327 case SDL_JOYBUTTONDOWN:
328 case SDL_JOYBUTTONUP:
329 if (event->jbutton.which != state->joy_id)
331 kc = (int)event->jbutton.button + SDLK_WORLD_0;
332 down = event->jbutton.state == SDL_PRESSED;
340 emu |= get_keystate(state->emu_keys, kc);
341 update_keystate(state->keystate, kc, down);
345 if (down_out != NULL)
353 #define JOY_EVENTS (SDL_JOYAXISMOTIONMASK | SDL_JOYBALLMOTIONMASK | SDL_JOYHATMOTIONMASK \
354 | SDL_JOYBUTTONDOWNMASK | SDL_JOYBUTTONUPMASK)
356 static int collect_events(struct in_sdl_state *state, int *one_kc, int *one_down)
359 Uint32 mask = state->joy ? JOY_EVENTS : (SDL_ALLEVENTS & ~JOY_EVENTS);
360 int count, maxcount, is_emukey = 0;
361 int i, ret, retval = 0;
362 int num_events, num_peeped_events;
365 #ifdef SDL_REDRAW_EVT
368 *one_kc = SDLK_UNKNOWN;
369 if (one_down != NULL)
375 maxcount = (one_kc != NULL) ? 1 : sizeof(events) / sizeof(events[0]);
379 num_events = SDL_PeepEvents(NULL, 0, SDL_PEEKEVENT, mask);
381 for (num_peeped_events = 0; num_peeped_events < num_events; num_peeped_events += count) {
382 count = SDL_PeepEvents(events, maxcount, SDL_GETEVENT, mask);
385 for (i = 0; i < count; i++) {
388 ret = handle_joy_event(state,
389 event, one_kc, one_down, &is_emukey);
391 ret = handle_event(state,
392 event, one_kc, one_down, &is_emukey);
397 SDL_PushEvent(event);
400 if (ext_event_handler != NULL)
401 ext_event_handler(event);
404 #ifdef SDL_REDRAW_EVT
405 if (ret != -2 && event->type == SDL_VIDEORESIZE) {
407 *one_kc = SDLK_UNKNOWN;
408 if (one_down != NULL)
411 is_emukey = 1, ret = 1;
418 if ((is_emukey || one_kc != NULL) && retval)
420 // don't lose events other devices might want to handle
422 SDL_PeepEvents(events+i, count-i, SDL_ADDEVENT, mask);
432 static int in_sdl_update(void *drv_data, const int *binds, int *result)
434 struct in_sdl_state *state = drv_data;
438 collect_events(state, NULL, NULL);
440 for (i = 0; i < SDLK_LAST / KEYBITS_WORD_BITS + 1; i++) {
441 mask = state->keystate[i];
444 for (bit = 0; mask != 0; bit++, mask >>= 1) {
447 sym = i * KEYBITS_WORD_BITS + bit;
449 for (b = 0; b < IN_BINDTYPE_COUNT; b++)
450 result[b] |= binds[IN_BIND_OFFS(sym, b)];
457 static int in_sdl_update_keycode(void *drv_data, int *is_down)
459 struct in_sdl_state *state = drv_data;
460 int ret_kc = -1, ret_down = 0;
462 collect_events(state, &ret_kc, &ret_down);
470 static int in_sdl_menu_translate(void *drv_data, int keycode, char *charcode)
472 struct in_sdl_state *state = drv_data;
473 const struct in_pdata *pdata = state->drv->pdata;
474 const char * const * key_names = in_sdl_keys;
475 const struct menu_keymap *map;
480 if (pdata->key_names)
481 key_names = pdata->key_names;
484 map = pdata->joy_map;
485 map_len = pdata->jmap_size;
487 map = pdata->key_map;
488 map_len = pdata->kmap_size;
495 for (i = 0; i < map_len; i++)
496 if (map[i].pbtn == keycode)
501 #ifdef SDL_REDRAW_EVT
502 if (keycode == SDLK_UNKNOWN)
506 for (i = 0; i < map_len; i++) {
507 if (map[i].key == keycode) {
513 if (charcode != NULL && (unsigned int)keycode < SDLK_LAST &&
514 key_names[keycode] != NULL && key_names[keycode][1] == 0)
517 *charcode = key_names[keycode][0];
524 static int in_sdl_clean_binds(void *drv_data, int *binds, int *def_finds)
526 struct in_sdl_state *state = drv_data;
529 memset(state->emu_keys, 0, sizeof(state->emu_keys));
530 for (t = 0; t < IN_BINDTYPE_COUNT; t++)
531 for (i = 0; i < SDLK_LAST; i++)
532 if (binds[IN_BIND_OFFS(i, t)]) {
533 if (t == IN_BINDTYPE_EMU)
534 update_keystate(state->emu_keys, i, 1);
541 static const in_drv_t in_sdl_drv = {
542 .prefix = IN_SDL_PREFIX,
543 .probe = in_sdl_probe,
545 .get_key_names = in_sdl_get_key_names,
546 .update = in_sdl_update,
547 .update_keycode = in_sdl_update_keycode,
548 .menu_translate = in_sdl_menu_translate,
549 .clean_binds = in_sdl_clean_binds,
552 int in_sdl_init(const struct in_pdata *pdata, void (*handler)(void *event))
555 fprintf(stderr, "in_sdl: Missing input platform data\n");
559 in_register_driver(&in_sdl_drv, pdata->defbinds, pdata);
560 ext_event_handler = handler;