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