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