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)
27 keybits_t keystate[SDLK_LAST / KEYBITS_WORD_BITS + 1];
28 // emulator keys should always be processed immediately lest one is lost
29 keybits_t emu_keys[SDLK_LAST / KEYBITS_WORD_BITS + 1];
32 static void (*ext_event_handler)(void *event);
34 static const char * const in_sdl_keys[SDLK_LAST] = {
35 [SDLK_BACKSPACE] = "backspace",
37 [SDLK_CLEAR] = "clear",
38 [SDLK_RETURN] = "return",
39 [SDLK_PAUSE] = "pause",
40 [SDLK_ESCAPE] = "escape",
41 [SDLK_SPACE] = "space",
43 [SDLK_QUOTEDBL] = "\"",
46 [SDLK_AMPERSAND] = "&",
48 [SDLK_LEFTPAREN] = "(",
49 [SDLK_RIGHTPAREN] = ")",
50 [SDLK_ASTERISK] = "*",
67 [SDLK_SEMICOLON] = ";",
71 [SDLK_QUESTION] = "?",
73 [SDLK_LEFTBRACKET] = "[",
74 [SDLK_BACKSLASH] = "\\",
75 [SDLK_RIGHTBRACKET] = "]",
77 [SDLK_UNDERSCORE] = "_",
78 [SDLK_BACKQUOTE] = "`",
105 [SDLK_DELETE] = "delete",
117 [SDLK_KP_PERIOD] = "[.]",
118 [SDLK_KP_DIVIDE] = "[/]",
119 [SDLK_KP_MULTIPLY] = "[*]",
120 [SDLK_KP_MINUS] = "[-]",
121 [SDLK_KP_PLUS] = "[+]",
122 [SDLK_KP_ENTER] = "enter",
123 [SDLK_KP_EQUALS] = "equals",
126 [SDLK_DOWN] = "down",
127 [SDLK_RIGHT] = "right",
128 [SDLK_LEFT] = "left",
129 [SDLK_INSERT] = "insert",
130 [SDLK_HOME] = "home",
132 [SDLK_PAGEUP] = "page up",
133 [SDLK_PAGEDOWN] = "page down",
151 [SDLK_NUMLOCK] = "numlock",
152 [SDLK_CAPSLOCK] = "caps lock",
153 [SDLK_SCROLLOCK] = "scroll lock",
154 [SDLK_RSHIFT] = "right shift",
155 [SDLK_LSHIFT] = "left shift",
156 [SDLK_RCTRL] = "right ctrl",
157 [SDLK_LCTRL] = "left ctrl",
158 [SDLK_RALT] = "right alt",
159 [SDLK_LALT] = "left alt",
160 [SDLK_RMETA] = "right meta",
161 [SDLK_LMETA] = "left meta",
162 [SDLK_LSUPER] = "left super", /* "Windows" keys */
163 [SDLK_RSUPER] = "right super",
164 [SDLK_MODE] = "alt gr",
165 [SDLK_COMPOSE] = "compose",
168 static void in_sdl_probe(const in_drv_t *drv)
170 const struct in_pdata *pdata = drv->pdata;
171 const char * const * key_names = in_sdl_keys;
172 struct in_sdl_state *state;
177 if (pdata->key_names)
178 key_names = pdata->key_names;
180 state = calloc(1, sizeof(*state));
182 fprintf(stderr, "in_sdl: OOM\n");
187 in_register(IN_SDL_PREFIX "keys", -1, state, SDLK_LAST,
190 /* joysticks go here too */
191 SDL_InitSubSystem(SDL_INIT_JOYSTICK);
193 joycount = SDL_NumJoysticks();
194 for (i = 0; i < joycount; i++) {
195 joy = SDL_JoystickOpen(i);
199 state = calloc(1, sizeof(*state));
201 fprintf(stderr, "in_sdl: OOM\n");
208 snprintf(name, sizeof(name), IN_SDL_PREFIX "%s", SDL_JoystickName(i));
209 in_register(name, -1, state, SDLK_LAST, key_names, 0);
213 SDL_JoystickEventState(SDL_ENABLE);
216 static void in_sdl_free(void *drv_data)
218 struct in_sdl_state *state = drv_data;
221 if (state->joy != NULL)
222 SDL_JoystickClose(state->joy);
227 static const char * const *
228 in_sdl_get_key_names(const in_drv_t *drv, int *count)
230 const struct in_pdata *pdata = drv->pdata;
233 if (pdata->key_names)
234 return pdata->key_names;
238 /* could use SDL_GetKeyState, but this gives better packing */
239 static void update_keystate(keybits_t *keystate, int sym, int is_down)
241 keybits_t *ks_word, mask;
244 mask <<= sym & (KEYBITS_WORD_BITS - 1);
245 ks_word = keystate + sym / KEYBITS_WORD_BITS;
252 static int get_keystate(keybits_t *keystate, int sym)
254 keybits_t *ks_word, mask;
257 mask <<= sym & (KEYBITS_WORD_BITS - 1);
258 ks_word = keystate + sym / KEYBITS_WORD_BITS;
259 return !!(*ks_word & mask);
262 static int handle_event(struct in_sdl_state *state, SDL_Event *event,
263 int *kc_out, int *down_out, int *emu_out)
267 if (event->type != SDL_KEYDOWN && event->type != SDL_KEYUP)
270 emu = get_keystate(state->emu_keys, event->key.keysym.sym);
271 update_keystate(state->keystate, event->key.keysym.sym,
272 event->type == SDL_KEYDOWN);
274 *kc_out = event->key.keysym.sym;
275 if (down_out != NULL)
276 *down_out = event->type == SDL_KEYDOWN;
283 static int handle_joy_event(struct in_sdl_state *state, SDL_Event *event,
284 int *kc_out, int *down_out, int *emu_out)
286 int kc = -1, down = 0, emu = 0, ret = 0;
288 /* TODO: remaining axis */
289 switch (event->type) {
290 case SDL_JOYAXISMOTION:
291 if (event->jaxis.which != state->joy_id)
293 if (event->jaxis.axis > 1)
295 if (-16384 <= event->jaxis.value && event->jaxis.value <= 16384) {
296 kc = state->axis_keydown[event->jaxis.axis];
297 state->axis_keydown[event->jaxis.axis] = 0;
300 else if (event->jaxis.value < -16384) {
301 kc = state->axis_keydown[event->jaxis.axis];
303 emu |= get_keystate(state->emu_keys, kc);
304 update_keystate(state->keystate, kc, 0);
306 kc = event->jaxis.axis ? SDLK_UP : SDLK_LEFT;
307 state->axis_keydown[event->jaxis.axis] = kc;
311 else if (event->jaxis.value > 16384) {
312 kc = state->axis_keydown[event->jaxis.axis];
314 emu |= get_keystate(state->emu_keys, kc);
315 update_keystate(state->keystate, kc, 0);
317 kc = event->jaxis.axis ? SDLK_DOWN : SDLK_RIGHT;
318 state->axis_keydown[event->jaxis.axis] = kc;
324 case SDL_JOYBUTTONDOWN:
325 case SDL_JOYBUTTONUP:
326 if (event->jbutton.which != state->joy_id)
328 kc = (int)event->jbutton.button + SDLK_WORLD_0;
329 down = event->jbutton.state == SDL_PRESSED;
337 emu |= get_keystate(state->emu_keys, kc);
338 update_keystate(state->keystate, kc, down);
342 if (down_out != NULL)
350 #define JOY_EVENTS (SDL_JOYAXISMOTIONMASK | SDL_JOYBALLMOTIONMASK | SDL_JOYHATMOTIONMASK \
351 | SDL_JOYBUTTONDOWNMASK | SDL_JOYBUTTONUPMASK)
353 static int collect_events(struct in_sdl_state *state, int *one_kc, int *one_down)
356 Uint32 mask = state->joy ? JOY_EVENTS : (SDL_ALLEVENTS & ~JOY_EVENTS);
357 int count, maxcount, is_emukey;
358 int i, ret, retval = 0;
359 int num_events, num_peeped_events;
362 maxcount = (one_kc != NULL) ? 1 : sizeof(events) / sizeof(events[0]);
366 num_events = SDL_PeepEvents(NULL, 0, SDL_PEEKEVENT, mask);
368 for (num_peeped_events = 0; num_peeped_events < num_events; num_peeped_events += count) {
369 count = SDL_PeepEvents(events, maxcount, SDL_GETEVENT, mask);
372 for (i = 0; i < count; i++) {
375 ret = handle_joy_event(state,
376 event, one_kc, one_down, &is_emukey);
378 ret = handle_event(state,
379 event, one_kc, one_down, &is_emukey);
384 SDL_PushEvent(event);
387 if (ext_event_handler != NULL)
388 ext_event_handler(event);
395 if ((is_emukey || one_kc != NULL) && ret)
397 // don't lose events other devices might want to handle
399 SDL_PeepEvents(events+i, count-i, SDL_ADDEVENT, mask);
409 static int in_sdl_update(void *drv_data, const int *binds, int *result)
411 struct in_sdl_state *state = drv_data;
415 collect_events(state, NULL, NULL);
417 for (i = 0; i < SDLK_LAST / KEYBITS_WORD_BITS + 1; i++) {
418 mask = state->keystate[i];
421 for (bit = 0; mask != 0; bit++, mask >>= 1) {
424 sym = i * KEYBITS_WORD_BITS + bit;
426 for (b = 0; b < IN_BINDTYPE_COUNT; b++)
427 result[b] |= binds[IN_BIND_OFFS(sym, b)];
434 static int in_sdl_update_keycode(void *drv_data, int *is_down)
436 struct in_sdl_state *state = drv_data;
437 int ret_kc = -1, ret_down = 0;
439 collect_events(state, &ret_kc, &ret_down);
447 static int in_sdl_menu_translate(void *drv_data, int keycode, char *charcode)
449 struct in_sdl_state *state = drv_data;
450 const struct in_pdata *pdata = state->drv->pdata;
451 const char * const * key_names = in_sdl_keys;
452 const struct menu_keymap *map;
457 if (pdata->key_names)
458 key_names = pdata->key_names;
461 map = pdata->joy_map;
462 map_len = pdata->jmap_size;
464 map = pdata->key_map;
465 map_len = pdata->kmap_size;
472 for (i = 0; i < map_len; i++)
473 if (map[i].pbtn == keycode)
478 for (i = 0; i < map_len; i++) {
479 if (map[i].key == keycode) {
485 if (charcode != NULL && (unsigned int)keycode < SDLK_LAST &&
486 key_names[keycode] != NULL && key_names[keycode][1] == 0)
489 *charcode = key_names[keycode][0];
496 static int in_sdl_clean_binds(void *drv_data, int *binds, int *def_finds)
498 struct in_sdl_state *state = drv_data;
501 memset(state->emu_keys, 0, sizeof(state->emu_keys));
502 for (t = 0; t < IN_BINDTYPE_COUNT; t++)
503 for (i = 0; i < SDLK_LAST; i++)
504 if (binds[IN_BIND_OFFS(i, t)]) {
505 if (t == IN_BINDTYPE_EMU)
506 update_keystate(state->emu_keys, i, 1);
513 static const in_drv_t in_sdl_drv = {
514 .prefix = IN_SDL_PREFIX,
515 .probe = in_sdl_probe,
517 .get_key_names = in_sdl_get_key_names,
518 .update = in_sdl_update,
519 .update_keycode = in_sdl_update_keycode,
520 .menu_translate = in_sdl_menu_translate,
521 .clean_binds = in_sdl_clean_binds,
524 int in_sdl_init(const struct in_pdata *pdata, void (*handler)(void *event))
527 fprintf(stderr, "in_sdl: Missing input platform data\n");
531 in_register_driver(&in_sdl_drv, pdata->defbinds, pdata);
532 ext_event_handler = handler;