key combos for new input code
[libpicofe.git] / common / input.c
index 2fd38d8..1416acb 100644 (file)
@@ -2,24 +2,31 @@
 #include <stdlib.h>
 #include <string.h>
 
+#include "common.h"
 #include "input.h"
+#include "plat.h"
 #include "../linux/in_evdev.h"
+#include "../gp2x/in_gp2x.h"
 
 typedef struct
 {
        int drv_id;
+       int drv_fd_hnd;
        void *drv_data;
-       int *binds;
        char *name;
+       int *binds;
        int probed:1;
+       int does_combos:1;
 } in_dev_t;
 
 static in_drv_t in_drivers[IN_DRVID_COUNT];
 static in_dev_t in_devices[IN_MAX_DEVS];
 static int in_dev_count = 0;
+static int in_have_async_devs = 0;
 
 #define DRV(id) in_drivers[(unsigned)(id) < IN_DRVID_COUNT ? (id) : 0]
 
+
 static int in_bind_count(int drv_id)
 {
        int count = DRV(drv_id).get_bind_count();
@@ -59,8 +66,9 @@ static void in_free(in_dev_t *dev)
        dev->binds = NULL;
 }
 
-/* to be called by drivers */
-void in_register(const char *nname, int drv_id, void *drv_data)
+/* to be called by drivers
+ * async devices must set drv_fd_hnd to -1 */
+void in_register(const char *nname, int drv_id, int drv_fd_hnd, void *drv_data, int combos)
 {
        int i, ret, dupe_count = 0, *binds;
        char name[256], *name_end, *tmp;
@@ -114,7 +122,9 @@ void in_register(const char *nname, int drv_id, void *drv_data)
        printf("input: new device #%d \"%s\"\n", i, name);
 update:
        in_devices[i].probed = 1;
+       in_devices[i].does_combos = combos;
        in_devices[i].drv_id = drv_id;
+       in_devices[i].drv_fd_hnd = drv_fd_hnd;
        in_devices[i].drv_data = drv_data;
 
        if (in_devices[i].binds != NULL) {
@@ -127,9 +137,75 @@ update:
        }
 }
 
+/* key combo handling, to be called by drivers that support it */
+void in_combos_find(int *binds, int last_key, int *combo_keys, int *combo_acts)
+{
+       int act, u;
+
+       *combo_keys = *combo_acts = 0;
+       for (act = 0; act < sizeof(binds[0]) * 8; act++)
+       {
+               int keyc = 0;
+               for (u = 0; u <= last_key; u++)
+                       if (binds[u] & (1 << act))
+                               keyc++;
+
+               if (keyc > 1)
+               {
+                       // loop again and mark those keys and actions as combo
+                       for (u = 0; u <= last_key; u++)
+                       {
+                               if (binds[u] & (1 << act)) {
+                                       *combo_keys |= 1 << u;
+                                       *combo_acts |= 1 << act;
+                               }
+                       }
+               }
+       }
+}
+
+int in_combos_do(int keys, int *binds, int last_key, int combo_keys, int combo_acts)
+{
+       int i, ret = 0;
+
+       for (i = 0; i <= last_key; i++)
+       {
+               int acts;
+               if (!(keys & (1 << i)))
+                       continue;
+
+               acts = binds[i];
+               if (!acts)
+                       continue;
+
+               if (combo_keys & (1 << i))
+               {
+                       int acts_c = acts & combo_acts;
+                       int u = last_key;
+                       if (acts_c) {
+                               // let's try to find the other one
+                               for (u = i + 1; u <= last_key; u++)
+                                       if ( (keys & (1 << u)) && (binds[u] & acts_c) ) {
+                                               ret |= acts_c & binds[u];
+                                               keys &= ~((1 << i) | (1 << u));
+                                               break;
+                                       }
+                       }
+                       // add non-combo actions if combo ones were not found
+                       if (u >= last_key)
+                               ret |= acts & ~combo_acts;
+               } else
+                       ret |= acts;
+       }
+
+       return ret;
+}
+
 void in_probe(void)
 {
        int i;
+
+       in_have_async_devs = 0;
        for (i = 0; i < in_dev_count; i++)
                in_devices[i].probed = 0;
 
@@ -145,20 +221,35 @@ void in_probe(void)
                                memmove(&in_devices[i], &in_devices[i+1],
                                        (in_dev_count - i) * sizeof(in_devices[0]));
                        }
+
+                       continue;
                }
+
+               if (in_devices[i].probed && in_devices[i].drv_fd_hnd == -1)
+                       in_have_async_devs = 1;
        }
+
+       if (in_have_async_devs)
+               printf("input: async-only devices detected..\n");
 }
 
+/* async update */
 int in_update(void)
 {
        int i, result = 0;
 
        for (i = 0; i < in_dev_count; i++) {
-               if (in_devices[i].probed && in_devices[i].binds != NULL) {
-                       switch (in_devices[i].drv_id) {
+               in_dev_t *dev = &in_devices[i];
+               if (dev->probed && dev->binds != NULL) {
+                       switch (dev->drv_id) {
 #ifdef IN_EVDEV
                        case IN_DRVID_EVDEV:
-                               result |= in_evdev_update(in_devices[i].drv_data, in_devices[i].binds);
+                               result |= in_evdev_update(dev->drv_data, dev->binds);
+                               break;
+#endif
+#ifdef IN_GP2X
+                       case IN_DRVID_GP2X:
+                               result |= in_gp2x_update(dev->drv_data, dev->binds);
                                break;
 #endif
                        }
@@ -168,89 +259,199 @@ int in_update(void)
        return result;
 }
 
-static void **in_collect_drvdata(int drv_id, int *count)
+static int menu_key_state = 0;
+
+void in_set_blocking(int is_blocking)
 {
-       static void *data[IN_MAX_DEVS];
-       int i;
+       int i, ret;
 
-       for (*count = i = 0; i < in_dev_count; i++) {
-               if (in_devices[i].drv_id == drv_id && in_devices[i].probed)
-                       data[(*count)++] = in_devices[i].drv_data;
+       /* have_async_devs means we will have to do all reads async anyway.. */
+       if (!in_have_async_devs) {
+               for (i = 0; i < in_dev_count; i++) {
+                       if (in_devices[i].probed)
+                               DRV(in_devices[i].drv_id).set_blocking(in_devices[i].drv_data, is_blocking);
+               }
        }
 
-       return data;
+       menu_key_state = 0;
+
+       /* flush events */
+       do {
+               ret = in_update_keycode(NULL, NULL, 0);
+       } while (ret >= 0);
 }
 
-void in_set_blocking(int is_blocking)
+static int in_update_kc_async(int *dev_id_out, int *is_down_out, int timeout_ms)
 {
-       int i;
+       int i, is_down, result;
+       unsigned int ticks;
 
-       for (i = 0; i < in_dev_count; i++) {
-               if (in_devices[i].probed)
-                       DRV(in_devices[i].drv_id).set_blocking(in_devices[i].drv_data, is_blocking);
+       ticks = plat_get_ticks_ms();
+
+       while (1)
+       {
+               for (i = 0; i < in_dev_count; i++) {
+                       in_dev_t *d = &in_devices[i];
+                       if (!d->probed)
+                               continue;
+
+                       result = DRV(d->drv_id).update_keycode(d->drv_data, &is_down);
+                       if (result == -1)
+                               continue;
+
+                       if (dev_id_out)
+                               *dev_id_out = i;
+                       if (is_down_out)
+                               *is_down_out = is_down;
+                       return result;
+               }
+
+               if (timeout_ms >= 0 && (int)(plat_get_ticks_ms() - ticks) > timeout_ms)
+                       break;
+
+               plat_sleep_ms(10);
        }
+
+       return -1;
 }
 
 /* 
- * update with wait for a press, return keycode
- * only can use 1 drv here..
+ * wait for a press, always return some keycode or -1 on timeout or error
  */
-int in_update_keycode(int *dev_id, int *is_down)
+int in_update_keycode(int *dev_id_out, int *is_down_out, int timeout_ms)
 {
-       int result = 0;
-#ifdef IN_EVDEV
-       void **data;
-       int i, id = 0, count = 0;
+       int result = -1, dev_id = 0, is_down, result_menu;
+       int fds_hnds[IN_MAX_DEVS];
+       int i, ret, count = 0;
+       in_drv_t *drv = NULL;
+       unsigned int ticks;
+
+       if (in_have_async_devs) {
+               result = in_update_kc_async(&dev_id, &is_down, timeout_ms);
+               if (result == -1)
+                       return -1;
+               drv = &DRV(in_devices[dev_id].drv_id);
+               goto finish;
+       }
+
+       ticks = plat_get_ticks_ms();
+
+       for (i = 0; i < in_dev_count; i++) {
+               if (in_devices[i].probed)
+                       fds_hnds[count++] = in_devices[i].drv_fd_hnd;
+       }
 
-       data = in_collect_drvdata(IN_DRVID_EVDEV, &count);
        if (count == 0) {
                /* don't deadlock, fail */
                printf("input: failed to find devices to read\n");
                exit(1);
        }
 
-       result = in_evdev_update_keycode(data, count, &id, is_down);
+       while (1)
+       {
+               ret = plat_wait_event(fds_hnds, count, timeout_ms);
+               if (ret < 0)
+                       break;
 
-       if (dev_id != NULL) {
-               for (i = id; i < in_dev_count; i++) {
-                       if (in_devices[i].drv_data == data[id]) {
-                               *dev_id = i;
+               for (i = 0; i < in_dev_count; i++) {
+                       if (in_devices[i].drv_fd_hnd == ret) {
+                               dev_id = i;
                                break;
                        }
                }
+
+               drv = &DRV(in_devices[dev_id].drv_id);
+               result = drv->update_keycode(in_devices[dev_id].drv_data, &is_down);
+
+               /* update_keycode() might return -1 when some not interesting
+                * event happened, like sync event for evdev. */
+               if (result >= 0)
+                       break;
+
+               if (timeout_ms >= 0) {
+                       unsigned int ticks2 = plat_get_ticks_ms();
+                       timeout_ms -= ticks2 - ticks;
+                       ticks = ticks2;
+                       if (timeout_ms <= 0)
+                               break;
+               }
        }
-#else
-#error no menu read handlers
-#endif
 
+       if (result == -1)
+               return -1;
+finish:
+       /* keep track of menu key state, to allow mixing
+        * in_update_keycode() and in_menu_wait_any() calls */
+       result_menu = drv->menu_translate(result);
+       if (result_menu != 0) {
+               if (is_down)
+                       menu_key_state |=  result_menu;
+               else
+                       menu_key_state &= ~result_menu;
+       }
+
+       if (dev_id_out != NULL)
+               *dev_id_out = dev_id;
+       if (is_down_out != NULL)
+               *is_down_out = is_down;
        return result;
 }
 
-/* 
- * same as above, only return bitfield of BTN_*
- */
-int in_update_menu(void)
+/* same as above, only return bitfield of PBTN_*  */
+int in_menu_wait_any(int timeout_ms)
 {
-       static int keys_active = 0;
-       int keys_old = keys_active;
+       int keys_old = menu_key_state;
 
        while (1)
        {
                int code, is_down = 0, dev_id = 0;
-               code = in_update_keycode(&dev_id, &is_down);
-               code = DRV(in_devices[dev_id].drv_id).menu_translate(code);
-               if (code == 0) continue;
 
-               if (is_down)
-                       keys_active |=  code;
-               else
-                       keys_active &= ~code;
+               code = in_update_keycode(&dev_id, &is_down, timeout_ms);
+               if (code >= 0)
+                       code = DRV(in_devices[dev_id].drv_id).menu_translate(code);
 
-               if (keys_old != keys_active)
+               if (timeout_ms >= 0)
                        break;
+               if (code < 0)
+                       continue;
+               if (keys_old != menu_key_state)
+                       break;
+       }
+
+       return menu_key_state;
+}
+
+/* wait for menu input, do autorepeat */
+int in_menu_wait(int interesting, int autorep_delay_ms)
+{
+       static int inp_prev = 0;
+       static int repeats = 0;
+       int ret, release = 0, wait = 450;
+
+       if (repeats)
+               wait = autorep_delay_ms;
+
+       ret = in_menu_wait_any(wait);
+       if (ret == inp_prev)
+               repeats++;
+
+       while (!(ret & interesting)) {
+               ret = in_menu_wait_any(-1);
+               release = 1;
        }
 
-       return keys_active;
+       if (release || ret != inp_prev)
+               repeats = 0;
+
+       inp_prev = ret;
+
+       /* we don't need diagonals in menus */
+       if ((ret & PBTN_UP)   && (ret & PBTN_LEFT))  ret &= ~PBTN_LEFT;
+       if ((ret & PBTN_UP)   && (ret & PBTN_RIGHT)) ret &= ~PBTN_RIGHT;
+       if ((ret & PBTN_DOWN) && (ret & PBTN_LEFT))  ret &= ~PBTN_LEFT;
+       if ((ret & PBTN_DOWN) && (ret & PBTN_RIGHT)) ret &= ~PBTN_RIGHT;
+
+       return ret;
 }
 
 const int *in_get_dev_binds(int dev_id)
@@ -272,28 +473,98 @@ const int *in_get_dev_def_binds(int dev_id)
        return in_devices[dev_id].binds + count;
 }
 
-int in_get_dev_bind_count(int dev_id)
+int in_get_dev_info(int dev_id, int what)
 {
        if (dev_id < 0 || dev_id >= IN_MAX_DEVS)
                return 0;
 
-       return in_bind_count(in_devices[dev_id].drv_id);
+       switch (what) {
+       case IN_INFO_BIND_COUNT:
+               return in_bind_count(in_devices[dev_id].drv_id);
+       case IN_INFO_DOES_COMBOS:
+               return in_devices[dev_id].does_combos;
+       }
+
+       return 0;
 }
 
-const char *in_get_dev_name(int dev_id)
+const char *in_get_dev_name(int dev_id, int must_be_active, int skip_pfix)
 {
+       const char *name, *tmp;
+
        if (dev_id < 0 || dev_id >= IN_MAX_DEVS)
                return NULL;
 
-       return in_devices[dev_id].name;
+       if (must_be_active && !in_devices[dev_id].probed)
+               return NULL;
+
+       name = in_devices[dev_id].name;
+       if (name == NULL || !skip_pfix)
+               return name;
+
+       /* skip prefix */
+       tmp = strchr(name, ':');
+       if (tmp != NULL)
+               name = tmp + 1;
+
+       return name;
 }
 
+/* never returns NULL */
 const char *in_get_key_name(int dev_id, int keycode)
 {
+       static char xname[16];
+       const char *name;
+
        if (dev_id < 0 || dev_id >= IN_MAX_DEVS)
                return "Unkn0";
 
-       return DRV(in_devices[dev_id].drv_id).get_key_name(keycode);
+       name = DRV(in_devices[dev_id].drv_id).get_key_name(keycode);
+       if (name != NULL)
+               return name;
+
+       /* assume scancode */
+       if ((keycode >= '0' && keycode <= '9') || (keycode >= 'a' && keycode <= 'z')
+                       || (keycode >= 'A' && keycode <= 'Z'))
+               sprintf(xname, "%c", keycode);
+       else
+               sprintf(xname, "\\x%02X", keycode);
+       return xname;
+}
+
+int in_bind_key(int dev_id, int keycode, int mask, int force_unbind)
+{
+       int ret, count;
+       in_dev_t *dev;
+
+       if (dev_id < 0 || dev_id >= IN_MAX_DEVS)
+               return -1;
+       dev = &in_devices[dev_id];
+
+       if (dev->binds == NULL) {
+               if (force_unbind)
+                       return 0;
+               dev->binds = in_alloc_binds(dev->drv_id);
+               if (dev->binds == NULL)
+                       return -1;
+       }
+
+       count = in_bind_count(dev->drv_id);
+       if (keycode < 0 || keycode >= count)
+               return -1;
+       
+       if (force_unbind)
+               dev->binds[keycode] &= ~mask;
+       else
+               dev->binds[keycode] ^=  mask;
+       
+       ret = DRV(dev->drv_id).clean_binds(dev->drv_data, dev->binds);
+       if (ret == 0) {
+               free(dev->binds);
+               dev->binds = NULL;
+       }
+
+       return 0;
 }
 
 /* returns device id, or -1 on error */
@@ -346,6 +617,11 @@ int in_config_parse_dev(const char *name)
        return i;
 }
 
+/*
+ * To reduce size of game specific configs, default binds are not saved.
+ * So we mark default binds in in_config_start(), override them in in_config_bind_key(),
+ * and restore whatever default binds are left in in_config_end().
+ */
 void in_config_start(void)
 {
        int i;
@@ -354,11 +630,11 @@ void in_config_start(void)
        for (i = 0; i < IN_MAX_DEVS; i++) {
                int n, count, *binds, *def_binds;
 
-               if (in_devices[i].binds == NULL)
+               binds = in_devices[i].binds;
+               if (binds == NULL)
                        continue;
 
                count = in_bind_count(in_devices[i].drv_id);
-               binds = in_devices[i].binds;
                def_binds = binds + count;
 
                for (n = 0; n < count; n++)
@@ -369,27 +645,46 @@ void in_config_start(void)
 
 int in_config_bind_key(int dev_id, const char *key, int binds)
 {
-       int kc;
+       int count, kc;
+       in_dev_t *dev;
 
        if (dev_id < 0 || dev_id >= IN_MAX_DEVS)
                return -1;
+       dev = &in_devices[dev_id];
 
-       if (in_devices[dev_id].binds == NULL) {
-               in_devices[dev_id].binds = in_alloc_binds(in_devices[dev_id].drv_id);
-               if (in_devices[dev_id].binds == NULL)
-                       return -1;
-               in_config_start();
+       count = in_bind_count(dev->drv_id);
+
+       /* maybe a raw code? */
+       if (key[0] == '\\' && key[1] == 'x') {
+               char *p = NULL;
+               kc = (int)strtoul(key + 2, &p, 16);
+               if (p == NULL || *p != 0)
+                       kc = -1;
+       }
+       else {
+               /* device specific key name */
+               if (dev->binds == NULL) {
+                       dev->binds = in_alloc_binds(dev->drv_id);
+                       if (dev->binds == NULL)
+                               return -1;
+                       in_config_start();
+               }
+
+               kc = DRV(dev->drv_id).get_key_code(key);
+               if (kc < 0 && strlen(key) == 1) {
+                       /* assume scancode */
+                       kc = key[0];
+               }
        }
 
-       kc = DRV(in_devices[dev_id].drv_id).get_key_code(key);
-       if (kc < 0) {
+       if (kc < 0 || kc >= count) {
                printf("input: bad key: %s\n", key);
                return -1;
        }
 
-       if (in_devices[dev_id].binds[kc] == -1)
-               in_devices[dev_id].binds[kc] = 0;
-       in_devices[dev_id].binds[kc] |= binds;
+       if (dev->binds[kc] == -1)
+               dev->binds[kc] = 0;
+       dev->binds[kc] |= binds;
 
        return 0;
 }
@@ -400,26 +695,27 @@ void in_config_end(void)
 
        for (i = 0; i < IN_MAX_DEVS; i++) {
                int n, ret, count, *binds, *def_binds;
+               in_dev_t *dev = &in_devices[i];
 
-               if (in_devices[i].binds == NULL)
+               if (dev->binds == NULL)
                        continue;
 
-               count = in_bind_count(in_devices[i].drv_id);
-               binds = in_devices[i].binds;
+               count = in_bind_count(dev->drv_id);
+               binds = dev->binds;
                def_binds = binds + count;
 
                for (n = 0; n < count; n++)
                        if (binds[n] == -1)
                                binds[n] = def_binds[n];
 
-               if (in_devices[i].drv_data == NULL)
+               if (dev->drv_data == NULL)
                        continue;
 
-               ret = DRV(in_devices[i].drv_id).clean_binds(in_devices[i].drv_data, binds);
+               ret = DRV(dev->drv_id).clean_binds(dev->drv_data, binds);
                if (ret == 0) {
                        /* no useable binds */
-                       free(binds);
-                       in_devices[i].binds = NULL;
+                       free(dev->binds);
+                       dev->binds = NULL;
                }
        }
 }
@@ -446,6 +742,7 @@ static int  in_def_get_bind_count(void) { return 0; }
 static void in_def_get_def_binds(int *binds) {}
 static int  in_def_clean_binds(void *drv_data, int *binds) { return 0; }
 static void in_def_set_blocking(void *data, int y) {}
+static int  in_def_update_keycode(void *drv_data, int *is_down) { return 0; }
 static int  in_def_menu_translate(int keycode) { return keycode; }
 static int  in_def_get_key_code(const char *key_name) { return 0; }
 static const char *in_def_get_key_name(int keycode) { return NULL; }
@@ -466,11 +763,15 @@ void in_init(void)
                in_drivers[i].get_def_binds = in_def_get_def_binds;
                in_drivers[i].clean_binds = in_def_clean_binds;
                in_drivers[i].set_blocking = in_def_set_blocking;
+               in_drivers[i].update_keycode = in_def_update_keycode;
                in_drivers[i].menu_translate = in_def_menu_translate;
                in_drivers[i].get_key_code = in_def_get_key_code;
                in_drivers[i].get_key_name = in_def_get_key_name;
        }
 
+#ifdef IN_GP2X
+       in_gp2x_init(&in_drivers[IN_DRVID_GP2X]);
+#endif
 #ifdef IN_EVDEV
        in_evdev_init(&in_drivers[IN_DRVID_EVDEV]);
 #endif
@@ -494,7 +795,7 @@ int main(void)
        }
 #else
        while (1) {
-               ret = in_update_menu();
+               ret = in_menu_wait_any();
                printf("%08x\n", ret);
        }
 #endif