2 * (C) GraÅžvydas "notaz" Ignotas, 2008-2011
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.
8 * See the COPYING file in the top-level directory.
20 #error needs update: in_gp2x_init in_gp2x_update
21 #include "../gp2x/in_gp2x.h"
24 #error needs update: in_vk_init in_vk_update
25 #include "../win32/in_vk.h"
35 int *binds; /* total = key_count * bindtypes * 2 */
36 const char * const *key_names;
37 unsigned int probed:1;
38 unsigned int does_combos:1;
41 static in_drv_t *in_drivers;
42 static in_dev_t in_devices[IN_MAX_DEVS];
43 static int in_driver_count = 0;
44 static int in_dev_count = 0; /* probed + bind devices */
45 static int in_have_async_devs = 0;
46 static int in_probe_dev_id;
47 static int menu_key_state = 0;
48 static int menu_last_used_dev = 0;
50 #define DRV(id) in_drivers[id]
53 static int *in_alloc_binds(int drv_id, int key_count)
57 binds = calloc(key_count * IN_BINDTYPE_COUNT * 2, sizeof(binds[0]));
61 DRV(drv_id).get_def_binds(binds + key_count * IN_BINDTYPE_COUNT);
62 memcpy(binds, binds + key_count * IN_BINDTYPE_COUNT,
63 sizeof(binds[0]) * key_count * IN_BINDTYPE_COUNT);
68 static void in_unprobe(in_dev_t *dev)
71 DRV(dev->drv_id).free(dev->drv_data);
76 static void in_free(in_dev_t *dev)
85 /* to be called by drivers
86 * async devices must set drv_fd_hnd to -1 */
87 void in_register(const char *nname, int drv_fd_hnd, void *drv_data,
88 int key_count, const char * const *key_names, int combos)
90 int i, ret, dupe_count = 0, *binds;
91 char name[256], *name_end, *tmp;
93 strncpy(name, nname, sizeof(name));
94 name[sizeof(name)-12] = 0;
95 name_end = name + strlen(name);
97 for (i = 0; i < in_dev_count; i++)
99 if (in_devices[i].name == NULL)
101 if (strcmp(in_devices[i].name, name) == 0)
103 if (in_devices[i].probed) {
105 sprintf(name_end, " [%d]", dupe_count);
112 if (i >= IN_MAX_DEVS)
114 /* try to find unused device */
115 for (i = 0; i < IN_MAX_DEVS; i++)
116 if (!in_devices[i].probed) break;
117 if (i >= IN_MAX_DEVS) {
118 lprintf("input: too many devices, can't add %s\n", name);
121 in_free(&in_devices[i]);
128 binds = in_alloc_binds(in_probe_dev_id, key_count);
134 in_devices[i].name = tmp;
135 in_devices[i].binds = binds;
136 in_devices[i].key_count = key_count;
137 if (i + 1 > in_dev_count)
138 in_dev_count = i + 1;
140 lprintf("input: new device #%d \"%s\"\n", i, name);
142 in_devices[i].probed = 1;
143 in_devices[i].does_combos = combos;
144 in_devices[i].drv_id = in_probe_dev_id;
145 in_devices[i].drv_fd_hnd = drv_fd_hnd;
146 in_devices[i].key_names = key_names;
147 in_devices[i].drv_data = drv_data;
149 if (in_devices[i].binds != NULL) {
150 ret = DRV(in_probe_dev_id).clean_binds(drv_data, in_devices[i].binds,
151 in_devices[i].binds + key_count * IN_BINDTYPE_COUNT);
153 /* no useable binds */
154 free(in_devices[i].binds);
155 in_devices[i].binds = NULL;
160 /* key combo handling, to be called by drivers that support it.
161 * Only care about IN_BINDTYPE_EMU */
162 void in_combos_find(const int *binds, int last_key, int *combo_keys, int *combo_acts)
166 *combo_keys = *combo_acts = 0;
167 for (act = 0; act < sizeof(binds[0]) * 8; act++)
170 for (u = 0; u <= last_key; u++)
171 if (binds[IN_BIND_OFFS(u, IN_BINDTYPE_EMU)] & (1 << act))
176 // loop again and mark those keys and actions as combo
177 for (u = 0; u <= last_key; u++)
179 if (binds[IN_BIND_OFFS(u, IN_BINDTYPE_EMU)] & (1 << act)) {
180 *combo_keys |= 1 << u;
181 *combo_acts |= 1 << act;
188 int in_combos_do(int keys, const int *binds, int last_key, int combo_keys, int combo_acts)
192 for (i = 0; i <= last_key; i++)
196 if (!(keys & (1 << i)))
199 acts = binds[IN_BIND_OFFS(i, IN_BINDTYPE_EMU)];
203 if (!(combo_keys & (1 << i))) {
208 acts_c = acts & combo_acts;
211 // let's try to find the other one
212 for (u = i + 1; u <= last_key; u++)
213 if ( (keys & (1 << u)) && (binds[IN_BIND_OFFS(u, IN_BINDTYPE_EMU)] & acts_c) ) {
214 ret |= acts_c & binds[IN_BIND_OFFS(u, IN_BINDTYPE_EMU)];
215 keys &= ~((1 << i) | (1 << u));
219 // add non-combo actions if combo ones were not found
221 ret |= acts & ~combo_acts;
231 in_have_async_devs = 0;
233 menu_last_used_dev = 0;
235 for (i = 0; i < in_dev_count; i++)
236 in_unprobe(&in_devices[i]);
238 for (i = 0; i < in_driver_count; i++) {
240 in_drivers[i].probe();
243 /* get rid of devs without binds and probes */
244 for (i = 0; i < in_dev_count; i++) {
245 if (!in_devices[i].probed && in_devices[i].binds == NULL) {
247 if (i < in_dev_count) {
248 free(in_devices[i].name);
249 memmove(&in_devices[i], &in_devices[i+1],
250 (in_dev_count - i) * sizeof(in_devices[0]));
256 if (in_devices[i].probed && in_devices[i].drv_fd_hnd == -1)
257 in_have_async_devs = 1;
260 if (in_have_async_devs)
261 lprintf("input: async-only devices detected..\n");
267 int in_update(int *result)
271 for (i = 0; i < in_dev_count; i++) {
272 in_dev_t *dev = &in_devices[i];
273 if (dev->probed && dev->binds != NULL)
274 ret |= DRV(dev->drv_id).update(dev->drv_data, dev->binds, result);
280 static int in_update_kc_async(int *dev_id_out, int *is_down_out, int timeout_ms)
282 int i, is_down, result;
285 ticks = plat_get_ticks_ms();
289 for (i = 0; i < in_dev_count; i++) {
290 in_dev_t *d = &in_devices[i];
294 result = DRV(d->drv_id).update_keycode(d->drv_data, &is_down);
301 *is_down_out = is_down;
305 if (timeout_ms >= 0 && (int)(plat_get_ticks_ms() - ticks) > timeout_ms)
315 * wait for a press, always return some keycode or -1 on timeout or error
317 int in_update_keycode(int *dev_id_out, int *is_down_out, int timeout_ms)
319 int result = -1, dev_id = 0, is_down, result_menu;
320 int fds_hnds[IN_MAX_DEVS];
321 int i, ret, count = 0;
322 in_drv_t *drv = NULL;
325 if (in_have_async_devs) {
326 result = in_update_kc_async(&dev_id, &is_down, timeout_ms);
329 drv = &DRV(in_devices[dev_id].drv_id);
333 ticks = plat_get_ticks_ms();
335 for (i = 0; i < in_dev_count; i++) {
336 if (in_devices[i].probed)
337 fds_hnds[count++] = in_devices[i].drv_fd_hnd;
341 /* don't deadlock, fail */
342 lprintf("input: failed to find devices to read\n");
348 ret = plat_wait_event(fds_hnds, count, timeout_ms);
352 for (i = 0; i < in_dev_count; i++) {
353 if (in_devices[i].drv_fd_hnd == ret) {
359 drv = &DRV(in_devices[dev_id].drv_id);
360 result = drv->update_keycode(in_devices[dev_id].drv_data, &is_down);
365 lprintf("input: \"%s\" errored out, removing.\n", in_devices[dev_id].name);
366 in_unprobe(&in_devices[dev_id]);
370 if (timeout_ms >= 0) {
371 unsigned int ticks2 = plat_get_ticks_ms();
372 timeout_ms -= ticks2 - ticks;
382 /* keep track of menu key state, to allow mixing
383 * in_update_keycode() and in_menu_wait_any() calls */
384 result_menu = drv->menu_translate(in_devices[dev_id].drv_data, result);
385 if (result_menu != 0) {
387 menu_key_state |= result_menu;
389 menu_key_state &= ~result_menu;
392 if (dev_id_out != NULL)
393 *dev_id_out = dev_id;
394 if (is_down_out != NULL)
395 *is_down_out = is_down;
399 /* same as above, only return bitfield of PBTN_* */
400 int in_menu_wait_any(int timeout_ms)
402 int keys_old = menu_key_state;
406 int code, is_down = 0, dev_id = 0;
408 code = in_update_keycode(&dev_id, &is_down, timeout_ms);
412 if (keys_old != menu_key_state) {
413 menu_last_used_dev = dev_id;
418 return menu_key_state;
421 /* wait for menu input, do autorepeat */
422 int in_menu_wait(int interesting, int autorep_delay_ms)
424 static int inp_prev = 0;
425 static int repeats = 0;
426 int ret, release = 0, wait = 450;
429 wait = autorep_delay_ms;
431 ret = in_menu_wait_any(wait);
435 while (!(ret & interesting)) {
436 ret = in_menu_wait_any(-1);
440 if (release || ret != inp_prev)
445 /* we don't need diagonals in menus */
446 if ((ret & PBTN_UP) && (ret & PBTN_LEFT)) ret &= ~PBTN_LEFT;
447 if ((ret & PBTN_UP) && (ret & PBTN_RIGHT)) ret &= ~PBTN_RIGHT;
448 if ((ret & PBTN_DOWN) && (ret & PBTN_LEFT)) ret &= ~PBTN_LEFT;
449 if ((ret & PBTN_DOWN) && (ret & PBTN_RIGHT)) ret &= ~PBTN_RIGHT;
454 const int *in_get_dev_binds(int dev_id)
456 if (dev_id < 0 || dev_id >= IN_MAX_DEVS)
459 return in_devices[dev_id].binds;
462 const int *in_get_dev_def_binds(int dev_id)
464 if (dev_id < 0 || dev_id >= IN_MAX_DEVS)
467 return in_devices[dev_id].binds + in_devices[dev_id].key_count * IN_BINDTYPE_COUNT;
470 int in_get_config(int dev_id, int what, void *val)
475 if (dev_id < 0 || dev_id >= IN_MAX_DEVS || val == NULL)
478 dev = &in_devices[dev_id];
480 case IN_CFG_BIND_COUNT:
481 *ival = dev->key_count;
483 case IN_CFG_DOES_COMBOS:
484 *ival = dev->does_combos;
486 case IN_CFG_BLOCKING:
487 case IN_CFG_KEY_NAMES:
488 return -1; /* not implemented */
490 return DRV(dev->drv_id).get_config(dev->drv_data, what, ival);
496 static int in_set_blocking(int is_blocking)
500 /* have_async_devs means we will have to do all reads async anyway.. */
501 if (!in_have_async_devs) {
502 for (i = 0; i < in_dev_count; i++) {
503 if (in_devices[i].probed)
504 DRV(in_devices[i].drv_id).set_config(in_devices[i].drv_data,
505 IN_CFG_BLOCKING, is_blocking);
513 ret = in_update_keycode(NULL, NULL, 0);
519 int in_set_config(int dev_id, int what, const void *val, int size)
521 const int *ival = val;
524 if (what == IN_CFG_BLOCKING)
525 return in_set_blocking(*ival);
527 if (dev_id < 0 || dev_id >= IN_MAX_DEVS)
530 dev = &in_devices[dev_id];
531 if (what == IN_CFG_KEY_NAMES) {
532 const char * const *names = val;
533 int count = size / sizeof(names[0]);
535 if (count < dev->key_count) {
536 lprintf("input: set_key_names: not enough keys\n");
540 dev->key_names = names;
545 return DRV(dev->drv_id).set_config(dev->drv_data, what, *ival);
550 const char *in_get_dev_name(int dev_id, int must_be_active, int skip_pfix)
552 const char *name, *tmp;
554 if (dev_id < 0 || dev_id >= IN_MAX_DEVS)
557 if (must_be_active && !in_devices[dev_id].probed)
560 name = in_devices[dev_id].name;
561 if (name == NULL || !skip_pfix)
565 tmp = strchr(name, ':');
572 int in_name_to_id(const char *dev_name)
576 for (i = 0; i < in_dev_count; i++)
577 if (strcmp(dev_name, in_devices[i].name) == 0)
580 if (i >= in_dev_count) {
581 lprintf("input: in_name_to_id: no such device: %s\n", dev_name);
588 /* never returns NULL */
589 const char *in_get_key_name(int dev_id, int keycode)
591 const char *name = NULL;
592 static char xname[16];
596 if (dev_id < 0) /* want last used dev? */
597 dev_id = menu_last_used_dev;
599 if (dev_id < 0 || dev_id >= IN_MAX_DEVS)
602 dev = &in_devices[dev_id];
603 drv = &DRV(dev->drv_id);
604 if (keycode < 0) /* want name for menu key? */
605 keycode = drv->menu_translate(dev->drv_data, keycode);
607 if (dev->key_names != NULL && 0 <= keycode && keycode < dev->key_count)
608 name = dev->key_names[keycode];
612 if (drv->get_key_name != NULL)
613 name = drv->get_key_name(keycode);
617 /* assume scancode */
618 if ((keycode >= '0' && keycode <= '9') || (keycode >= 'a' && keycode <= 'z')
619 || (keycode >= 'A' && keycode <= 'Z'))
620 sprintf(xname, "%c", keycode);
622 sprintf(xname, "\\x%02X", keycode);
626 int in_get_key_code(int dev_id, const char *key_name)
631 if (dev_id < 0) /* want last used dev? */
632 dev_id = menu_last_used_dev;
634 if (dev_id < 0 || dev_id >= IN_MAX_DEVS)
637 dev = &in_devices[dev_id];
638 if (dev->key_names == NULL)
641 for (i = 0; i < dev->key_count; i++)
642 if (dev->key_names[i] && strcasecmp(dev->key_names[i], key_name) == 0)
648 int in_bind_key(int dev_id, int keycode, int mask, int bind_type, int force_unbind)
653 if (dev_id < 0 || dev_id >= IN_MAX_DEVS || bind_type >= IN_BINDTYPE_COUNT)
656 dev = &in_devices[dev_id];
657 count = dev->key_count;
659 if (dev->binds == NULL) {
662 dev->binds = in_alloc_binds(dev->drv_id, count);
663 if (dev->binds == NULL)
667 if (keycode < 0 || keycode >= count)
671 dev->binds[IN_BIND_OFFS(keycode, bind_type)] &= ~mask;
673 dev->binds[IN_BIND_OFFS(keycode, bind_type)] ^= mask;
675 ret = DRV(dev->drv_id).clean_binds(dev->drv_data, dev->binds,
676 dev->binds + count * IN_BINDTYPE_COUNT);
686 * Unbind act_mask on binds with type bind_type
687 * - if dev_id_ < 0, affects all devices
688 * else only affects dev_id_
689 * - if act_mask == -1, unbind all keys
690 * else only actions in mask
692 void in_unbind_all(int dev_id_, int act_mask, int bind_type)
694 int dev_id = 0, dev_last = IN_MAX_DEVS - 1;
699 dev_id = dev_last = dev_id_;
701 if (bind_type >= IN_BINDTYPE_COUNT)
704 for (; dev_id <= dev_last; dev_id++) {
705 dev = &in_devices[dev_id];
706 count = dev->key_count;
708 if (dev->binds == NULL)
711 if (act_mask != -1) {
712 for (i = 0; i < count; i++)
713 dev->binds[IN_BIND_OFFS(i, bind_type)] &= ~act_mask;
716 memset(dev->binds, 0, sizeof(dev->binds[0]) * count * IN_BINDTYPE_COUNT);
720 /* returns device id, or -1 on error */
721 int in_config_parse_dev(const char *name)
725 for (i = 0; i < in_driver_count; i++) {
726 int len = strlen(in_drivers[i].prefix);
727 if (strncmp(name, in_drivers[i].prefix, len) == 0) {
734 lprintf("input: missing driver for %s\n", name);
738 for (i = 0; i < in_dev_count; i++)
740 if (in_devices[i].name == NULL)
742 if (strcmp(in_devices[i].name, name) == 0)
746 if (i >= IN_MAX_DEVS)
748 /* try to find unused device */
749 for (i = 0; i < IN_MAX_DEVS; i++)
750 if (in_devices[i].name == NULL) break;
751 if (i >= IN_MAX_DEVS) {
752 lprintf("input: too many devices, can't add %s\n", name);
757 memset(&in_devices[i], 0, sizeof(in_devices[i]));
759 in_devices[i].name = strdup(name);
760 if (in_devices[i].name == NULL)
763 in_devices[i].key_names = DRV(drv_id).get_key_names(&in_devices[i].key_count);
764 in_devices[i].drv_id = drv_id;
766 if (i + 1 > in_dev_count)
767 in_dev_count = i + 1;
772 int in_config_bind_key(int dev_id, const char *key, int acts, int bind_type)
777 if (dev_id < 0 || dev_id >= IN_MAX_DEVS || bind_type >= IN_BINDTYPE_COUNT)
779 dev = &in_devices[dev_id];
781 /* maybe a raw code? */
782 if (key[0] == '\\' && key[1] == 'x') {
784 kc = (int)strtoul(key + 2, &p, 16);
785 if (p == NULL || *p != 0)
789 /* device specific key name */
790 if (dev->binds == NULL) {
791 dev->binds = in_alloc_binds(dev->drv_id, dev->key_count);
792 if (dev->binds == NULL)
797 if (dev->key_names != NULL) {
798 for (i = 0; i < dev->key_count; i++) {
799 const char *k = dev->key_names[i];
800 if (k != NULL && strcasecmp(k, key) == 0) {
808 kc = DRV(dev->drv_id).get_key_code(key);
809 if (kc < 0 && strlen(key) == 1) {
810 /* assume scancode */
815 if (kc < 0 || kc >= dev->key_count) {
816 lprintf("input: bad key: %s\n", key);
820 if (bind_type == IN_BINDTYPE_NONE) {
821 for (i = 0; i < IN_BINDTYPE_COUNT; i++)
822 dev->binds[IN_BIND_OFFS(kc, i)] = 0;
826 offs = IN_BIND_OFFS(kc, bind_type);
827 if (dev->binds[offs] == -1)
828 dev->binds[offs] = 0;
829 dev->binds[offs] |= acts;
833 void in_clean_binds(void)
837 for (i = 0; i < IN_MAX_DEVS; i++) {
838 int ret, count, *binds, *def_binds;
839 in_dev_t *dev = &in_devices[i];
841 if (dev->binds == NULL || dev->drv_data == NULL)
844 count = dev->key_count;
846 def_binds = binds + count * IN_BINDTYPE_COUNT;
848 ret = DRV(dev->drv_id).clean_binds(dev->drv_data, binds, def_binds);
850 /* no useable binds */
857 void in_debug_dump(void)
861 lprintf("# drv probed binds name\n");
862 for (i = 0; i < IN_MAX_DEVS; i++) {
863 in_dev_t *d = &in_devices[i];
864 if (!d->probed && d->name == NULL && d->binds == NULL)
866 lprintf("%d %3d %6c %5c %s\n", i, d->drv_id, d->probed ? 'y' : 'n',
867 d->binds ? 'y' : 'n', d->name);
871 /* stubs for drivers that choose not to implement something */
873 static void in_def_free(void *drv_data) {}
874 static void in_def_get_def_binds(int *binds) {}
875 static int in_def_clean_binds(void *drv_data, int *b, int *db) { return 1; }
876 static int in_def_get_config(void *drv_data, int what, int *val) { return -1; }
877 static int in_def_set_config(void *drv_data, int what, int val) { return -1; }
878 static int in_def_update_keycode(void *drv_data, int *is_down) { return 0; }
879 static int in_def_menu_translate(void *drv_data, int keycode) { return 0; }
880 static int in_def_get_key_code(const char *key_name) { return -1; }
881 static const char *in_def_get_key_name(int keycode) { return NULL; }
883 #define CHECK_ADD_STUB(d, f) \
884 if (d.f == NULL) d.f = in_def_##f
886 /* to be called by drivers */
887 int in_register_driver(const in_drv_t *drv)
889 int count_new = in_driver_count + 1;
890 in_drv_t *new_drivers;
892 new_drivers = realloc(in_drivers, count_new * sizeof(in_drivers[0]));
893 if (new_drivers == NULL) {
894 lprintf("input: in_register_driver OOM\n");
898 memcpy(&new_drivers[in_driver_count], drv, sizeof(new_drivers[0]));
900 CHECK_ADD_STUB(new_drivers[in_driver_count], free);
901 CHECK_ADD_STUB(new_drivers[in_driver_count], get_def_binds);
902 CHECK_ADD_STUB(new_drivers[in_driver_count], clean_binds);
903 CHECK_ADD_STUB(new_drivers[in_driver_count], get_config);
904 CHECK_ADD_STUB(new_drivers[in_driver_count], set_config);
905 CHECK_ADD_STUB(new_drivers[in_driver_count], update_keycode);
906 CHECK_ADD_STUB(new_drivers[in_driver_count], menu_translate);
907 CHECK_ADD_STUB(new_drivers[in_driver_count], get_key_code);
908 CHECK_ADD_STUB(new_drivers[in_driver_count], get_key_name);
909 in_drivers = new_drivers;
910 in_driver_count = count_new;
918 memset(in_devices, 0, sizeof(in_devices));
936 ret = in_update_keycode(&dev, &down);
937 lprintf("#%i: %i %i (%s)\n", dev, down, ret, in_get_key_name(dev, ret));
941 ret = in_menu_wait_any();
942 lprintf("%08x\n", ret);