tweaking pandora frontend
[libpicofe.git] / linux / in_evdev.c
index cfb31b6..8a00296 100644 (file)
@@ -1,4 +1,5 @@
 #include <stdio.h>
+#include <stdlib.h>
 #include <string.h>
 #include <sys/types.h>
 #include <sys/stat.h>
@@ -8,15 +9,35 @@
 #include <linux/input.h>
 #include <errno.h>
 
-#include "../common/common.h"
 #include "../common/input.h"
 #include "in_evdev.h"
 
+typedef struct {
+       int fd;
+       int *kbits;
+       int abs_lzone;
+       int abs_rzone;
+       int abs_tzone;
+       int abs_bzone;
+       int abs_lastx;
+       int abs_lasty;
+} in_evdev_t;
+
+#ifndef KEY_CNT
+#define KEY_CNT (KEY_MAX + 1)
+#endif
+
 #define KEYBITS_BIT(x) (keybits[(x)/sizeof(keybits[0])/8] & \
        (1 << ((x) & (sizeof(keybits[0])*8-1))))
 
+#define KEYBITS_BIT_SET(x) (keybits[(x)/sizeof(keybits[0])/8] |= \
+       (1 << ((x) & (sizeof(keybits[0])*8-1))))
+
+#define KEYBITS_BIT_CLEAR(x) (keybits[(x)/sizeof(keybits[0])/8] &= \
+       ~(1 << ((x) & (sizeof(keybits[0])*8-1))))
+
 static const char * const in_evdev_prefix = "evdev:";
-static const char * const in_evdev_keys[KEY_MAX + 1] = {
+static const char * const in_evdev_keys[KEY_CNT] = {
        [0 ... KEY_MAX] = NULL,
        [KEY_RESERVED] = "Reserved",            [KEY_ESC] = "Esc",
        [KEY_1] = "1",                          [KEY_2] = "2",
@@ -105,18 +126,29 @@ static const char * const in_evdev_keys[KEY_MAX + 1] = {
 
 static void in_evdev_probe(void)
 {
+       long keybits[KEY_CNT / sizeof(long) / 8];
+       long absbits[(ABS_MAX+1) / sizeof(long) / 8];
        int i;
 
+       // the kernel might support and return less keys then we know about,
+       // so make sure the buffers are clear.
+       memset(keybits, 0, sizeof(keybits));
+       memset(absbits, 0, sizeof(absbits));
+
        for (i = 0;; i++)
        {
-               int u, ret, fd, keybits[(KEY_MAX+1)/sizeof(int)];
                int support = 0, count = 0;
+               in_evdev_t *dev;
+               int u, ret, fd;
                char name[64];
 
                snprintf(name, sizeof(name), "/dev/input/event%d", i);
                fd = open(name, O_RDONLY|O_NONBLOCK);
-               if (fd == -1)
+               if (fd == -1) {
+                       if (errno == EACCES)
+                               continue;       /* maybe we can access next one */
                        break;
+               }
 
                /* check supported events */
                ret = ioctl(fd, EVIOCGBIT(0, sizeof(support)), &support);
@@ -135,19 +167,61 @@ static void in_evdev_probe(void)
                }
 
                /* check for interesting keys */
-               for (u = 0; u < KEY_MAX + 1; u++) {
-                       if (KEYBITS_BIT(u) && u != KEY_POWER && u != KEY_SLEEP)
+               for (u = 0; u < KEY_CNT; u++) {
+                       if (KEYBITS_BIT(u) && u != KEY_POWER &&
+                                       u != KEY_SLEEP && u != BTN_TOUCH)
                                count++;
                }
 
                if (count == 0)
                        goto skip;
 
+               dev = calloc(1, sizeof(*dev));
+               if (dev == NULL)
+                       goto skip;
+
+               ret = ioctl(fd, EVIOCGKEY(sizeof(keybits)), keybits);
+               if (ret == -1) {
+                       printf("Warning: EVIOCGKEY not supported, will have to track state\n");
+                       dev->kbits = calloc(KEY_CNT, sizeof(int));
+                       if (dev->kbits == NULL) {
+                               free(dev);
+                               goto skip;
+                       }
+               }
+
+               /* check for abs too */
+               if (support & (1 << EV_ABS)) {
+                       struct input_absinfo ainfo;
+                       int dist;
+                       ret = ioctl(fd, EVIOCGBIT(EV_ABS, sizeof(absbits)), absbits);
+                       if (ret == -1)
+                               goto no_abs;
+                       if (absbits[0] & (1 << ABS_X)) {
+                               ret = ioctl(fd, EVIOCGABS(ABS_X), &ainfo);
+                               if (ret == -1)
+                                       goto no_abs;
+                               dist = ainfo.maximum - ainfo.minimum;
+                               dev->abs_lzone = ainfo.minimum + dist / 4;
+                               dev->abs_rzone = ainfo.maximum - dist / 4;
+                       }
+                       if (absbits[0] & (1 << ABS_Y)) {
+                               ret = ioctl(fd, EVIOCGABS(ABS_Y), &ainfo);
+                               if (ret == -1)
+                                       goto no_abs;
+                               dist = ainfo.maximum - ainfo.minimum;
+                               dev->abs_tzone = ainfo.minimum + dist / 4;
+                               dev->abs_bzone = ainfo.maximum - dist / 4;
+                       }
+               }
+
+no_abs:
+               dev->fd = fd;
                strcpy(name, in_evdev_prefix);
                ioctl(fd, EVIOCGNAME(sizeof(name)-6), name+6);
                printf("in_evdev: found \"%s\" with %d events (type %08x)\n",
                        name+6, count, support);
-               in_register(name, IN_DRVID_EVDEV, (void *)fd);
+               in_register(name, IN_DRVID_EVDEV, fd, dev, KEY_CNT, 0);
                continue;
 
 skip:
@@ -157,145 +231,233 @@ skip:
 
 static void in_evdev_free(void *drv_data)
 {
-       close((int)drv_data);
+       in_evdev_t *dev = drv_data;
+       if (dev == NULL)
+               return;
+       close(dev->fd);
+       free(dev);
 }
 
 static int in_evdev_get_bind_count(void)
 {
-       return KEY_MAX + 1;
+       return KEY_CNT;
 }
 
-int in_evdev_update(void *drv_data, int *binds)
+static void or_binds(const int *binds, int key, int *result)
+{
+       int t;
+       for (t = 0; t < IN_BINDTYPE_COUNT; t++)
+               result[t] |= binds[IN_BIND_OFFS(key, t)];
+}
+
+/* ORs result with binds of pressed buttons
+ * XXX: should measure performance hit of this func, might need to optimize */
+int in_evdev_update(void *drv_data, const int *binds, int *result)
 {
        struct input_event ev[16];
-       int keybits[(KEY_MAX+1)/sizeof(int)];
-       int fd = (int)drv_data;
-       int result = 0, changed = 0;
+       struct input_absinfo ainfo;
+       int keybits_[KEY_CNT / sizeof(int)];
+       int *keybits = keybits_;
+       in_evdev_t *dev = drv_data;
        int rd, ret, u;
 
-       while (1) {
-               rd = read(fd, ev, sizeof(ev));
-               if (rd < (int)sizeof(ev[0])) {
-                       if (errno != EAGAIN)
-                               perror("in_evdev: read failed");
-                       break;
+       if (dev->kbits == NULL) {
+               ret = ioctl(dev->fd, EVIOCGKEY(sizeof(keybits_)), keybits_);
+               if (ret == -1) {
+                       perror("in_evdev: ioctl failed");
+                       return -1;
+               }
+       }
+       else {
+               keybits = dev->kbits;
+               while (1) {
+                       rd = read(dev->fd, ev, sizeof(ev));
+                       if (rd < (int)sizeof(ev[0])) {
+                               if (errno != EAGAIN)
+                                       perror("in_evdev: read failed");
+                               break;
+                       }
+                       for (u = 0; u < rd / sizeof(ev[0]); u++) {
+                               if (ev[u].type != EV_KEY)
+                                       continue;
+                               else if (ev[u].value == 1)
+                                       KEYBITS_BIT_SET(ev[u].code);
+                               else if (ev[u].value == 0)
+                                       KEYBITS_BIT_CLEAR(ev[u].code);
+                       }
                }
-
-               changed = 1;
        }
 
-/*
-       if (!changed)
-               return 0;
-*/
-       ret = ioctl(fd, EVIOCGKEY(sizeof(keybits)), keybits);
-       if (ret == -1) {
-               perror("in_evdev: ioctl failed");
-               return 0;
+       for (u = 0; u < KEY_CNT; u++) {
+               if (KEYBITS_BIT(u))
+                       or_binds(binds, u, result);
        }
 
-       printf("#%d: ", fd);
-       for (u = 0; u < KEY_MAX + 1; u++) {
-               if (KEYBITS_BIT(u)) {
-                       printf(" %d", u);
-                       result |= binds[u];
+       /* map X and Y absolute to UDLR */
+       if (dev->abs_lzone != 0) {
+               ret = ioctl(dev->fd, EVIOCGABS(ABS_X), &ainfo);
+               if (ret != -1) {
+                       if (ainfo.value < dev->abs_lzone) or_binds(binds, KEY_LEFT, result);
+                       if (ainfo.value > dev->abs_rzone) or_binds(binds, KEY_RIGHT, result);
+               }
+       }
+       if (dev->abs_tzone != 0) {
+               ret = ioctl(dev->fd, EVIOCGABS(ABS_Y), &ainfo);
+               if (ret != -1) {
+                       if (ainfo.value < dev->abs_tzone) or_binds(binds, KEY_UP, result);
+                       if (ainfo.value > dev->abs_bzone) or_binds(binds, KEY_DOWN, result);
                }
        }
-       printf("\n");
 
-       return result;
+       return 0;
 }
 
-static void in_evdev_set_blocking(void *data, int y)
+static void in_evdev_set_blocking(void *drv_data, int y)
 {
+       in_evdev_t *dev = drv_data;
        long flags;
        int ret;
 
-       flags = (long)fcntl((int)data, F_GETFL);
+       flags = (long)fcntl(dev->fd, F_GETFL);
        if ((int)flags == -1) {
                perror("in_evdev: F_GETFL fcntl failed");
                return;
        }
+
+       if (flags & O_NONBLOCK) {
+               /* flush the event queue */
+               struct input_event ev;
+               do {
+                       ret = read(dev->fd, &ev, sizeof(ev));
+               }
+               while (ret == sizeof(ev));
+       }
+
        if (y)
                flags &= ~O_NONBLOCK;
        else
                flags |=  O_NONBLOCK;
-       ret = fcntl((int)data, F_SETFL, flags);
+       ret = fcntl(dev->fd, F_SETFL, flags);
        if (ret == -1)
                perror("in_evdev: F_SETFL fcntl failed");
 }
 
-int in_evdev_update_keycode(void **data, int dcount, int *which, int *is_down)
+static int in_evdev_update_keycode(void *data, int *is_down)
 {
-       const int *fds = (const int *)data;
-       int i, fdmax = -1;
-
-       for (i = 0; i < dcount; i++)
-               if (fds[i] > fdmax) fdmax = fds[i];
-
-       while (1)
-       {
-               struct input_event ev[64];
-               int ret, fd = -1, rd;
-               fd_set fdset;
-
-               FD_ZERO(&fdset);
-               for (i = 0; i < dcount; i++)
-                       FD_SET(fds[i], &fdset);
-
-               ret = select(fdmax + 1, &fdset, NULL, NULL, NULL);
-               if (ret == -1)
-               {
-                       perror("in_evdev: select failed");
-                       sleep(1);
-                       return 0;
-               }
+       in_evdev_t *dev = data;
+       struct input_event ev;
+       int rd;
 
-               for (i = 0; i < dcount; i++)
-                       if (FD_ISSET(fds[i], &fdset))
-                               *which = i, fd = fds[i];
+       if (is_down != NULL)
+               *is_down = 0;
 
-               rd = read(fd, ev, sizeof(ev[0]) * 64);
-               if (rd < (int) sizeof(ev[0])) {
+       rd = read(dev->fd, &ev, sizeof(ev));
+       if (rd < (int) sizeof(ev)) {
+               if (errno != EAGAIN) {
                        perror("in_evdev: error reading");
                        sleep(1);
-                       return 0;
                }
+               return -1;
+       }
 
-               for (i = 0; i < rd / sizeof(ev[0]); i++)
-               {
-                       if (ev[i].type != EV_KEY || ev[i].value < 0 || ev[i].value > 1)
-                               continue;
-
-                       if (is_down)
-                               *is_down = ev[i].value;
-                       return ev[i].code;
+       if (ev.type == EV_KEY) {
+               if (ev.value < 0 || ev.value > 1)
+                       return -1;
+               if (is_down != NULL)
+                       *is_down = ev.value;
+               return ev.code;
+       }
+       else if (ev.type == EV_ABS)
+       {
+               int down = 0;
+               if (dev->abs_lzone != 0 && ev.code == ABS_X) {
+                       if (ev.value < dev->abs_lzone) {
+                               down = 1;
+                               dev->abs_lastx = KEY_LEFT;
+                       }
+                       else if (ev.value > dev->abs_rzone) {
+                               down = 1;
+                               dev->abs_lastx = KEY_RIGHT;
+                       }
+                       if (is_down != NULL)
+                               *is_down = down;
+                       return dev->abs_lastx;
+               }
+               if (dev->abs_tzone != 0 && ev.code == ABS_Y) {
+                       if (ev.value < dev->abs_tzone) {
+                               down = 1;
+                               dev->abs_lasty = KEY_UP;
+                       }
+                       else if (ev.value > dev->abs_bzone) {
+                               down = 1;
+                               dev->abs_lasty = KEY_DOWN;
+                       }
+                       if (is_down != NULL)
+                               *is_down = down;
+                       return dev->abs_lasty;
                }
        }
+
+       return -1;
 }
 
+static const struct {
+       short key;
+       short pbtn;
+} key_pbtn_map[] =
+{
+       { KEY_UP,       PBTN_UP },
+       { KEY_DOWN,     PBTN_DOWN },
+       { KEY_LEFT,     PBTN_LEFT },
+       { KEY_RIGHT,    PBTN_RIGHT },
+       { KEY_ENTER,    PBTN_MOK },
+       { KEY_END,      PBTN_MOK },
+       { BTN_TRIGGER,  PBTN_MOK },
+       { KEY_ESC,      PBTN_MBACK },
+       { KEY_PAGEDOWN, PBTN_MBACK },
+       { BTN_THUMB,    PBTN_MBACK },
+       { KEY_A,        PBTN_MA2 },
+       { KEY_HOME,     PBTN_MA2 },
+       { KEY_S,        PBTN_MA3 },
+       { KEY_PAGEUP,   PBTN_MA3 },
+       { KEY_BACKSLASH,  PBTN_MENU },
+       { KEY_LEFTCTRL,   PBTN_MENU },
+       { KEY_RIGHTSHIFT, PBTN_L },
+       { KEY_LEFTBRACE,  PBTN_L },
+       { KEY_RIGHTCTRL,  PBTN_R },
+       { KEY_RIGHTBRACE, PBTN_R },
+};
+
+#define KEY_PBTN_MAP_SIZE (sizeof(key_pbtn_map) / sizeof(key_pbtn_map[0]))
+
 static int in_evdev_menu_translate(int keycode)
 {
-       switch (keycode) {
-               /* keyboards */
-               case KEY_UP:    return PBTN_UP;
-               case KEY_DOWN:  return PBTN_DOWN;
-               case KEY_LEFT:  return PBTN_LEFT;
-               case KEY_RIGHT: return PBTN_RIGHT;
-               case KEY_ENTER: return PBTN_EAST;
-               case KEY_ESC:   return PBTN_SOUTH;
-               default:        return 0;
+       int i;
+       if (keycode < 0)
+       {
+               /* menu -> kc */
+               keycode = -keycode;
+               for (i = 0; i < KEY_PBTN_MAP_SIZE; i++)
+                       if (key_pbtn_map[i].pbtn == keycode)
+                               return key_pbtn_map[i].key;
+       }
+       else
+       {
+               for (i = 0; i < KEY_PBTN_MAP_SIZE; i++)
+                       if (key_pbtn_map[i].key == keycode)
+                               return key_pbtn_map[i].pbtn;
        }
+
+       return 0;
 }
 
 static int in_evdev_get_key_code(const char *key_name)
 {
        int i;
 
-       for (i = 0; i < KEY_MAX + 1; i++) {
+       for (i = 0; i < KEY_CNT; i++) {
                const char *k = in_evdev_keys[i];
-               if (k != NULL && k[0] == key_name[0] &&
-                               strcasecmp(k, key_name) == 0)
+               if (k != NULL && strcasecmp(k, key_name) == 0)
                        return i;
        }
 
@@ -315,18 +477,26 @@ static const char *in_evdev_get_key_name(int keycode)
 
 static const struct {
        short code;
-       short bit;
+       char btype;
+       char bit;
 } in_evdev_def_binds[] =
 {
        /* MXYZ SACB RLDU */
-       { KEY_UP,       0 },
-       { KEY_DOWN,     1 },
-       { KEY_LEFT,     2 },
-       { KEY_RIGHT,    3 },
-       { KEY_S,        4 },    /* B */
-       { KEY_D,        5 },    /* C */
-       { KEY_A,        6 },    /* A */
-       { KEY_ENTER,    7 },
+       { KEY_UP,       IN_BINDTYPE_PLAYER12, 0 },
+       { KEY_DOWN,     IN_BINDTYPE_PLAYER12, 1 },
+       { KEY_LEFT,     IN_BINDTYPE_PLAYER12, 2 },
+       { KEY_RIGHT,    IN_BINDTYPE_PLAYER12, 3 },
+       { KEY_S,        IN_BINDTYPE_PLAYER12, 4 },      /* B */
+       { KEY_PAGEDOWN, IN_BINDTYPE_PLAYER12, 4 },
+       { KEY_D,        IN_BINDTYPE_PLAYER12, 5 },      /* C */
+       { KEY_END,      IN_BINDTYPE_PLAYER12, 5 },
+       { KEY_A,        IN_BINDTYPE_PLAYER12, 6 },      /* A */
+       { KEY_HOME,     IN_BINDTYPE_PLAYER12, 6 },
+       { KEY_ENTER,    IN_BINDTYPE_PLAYER12, 7 },
+       { KEY_LEFTALT,  IN_BINDTYPE_PLAYER12, 7 },
+       { KEY_RIGHTSHIFT,IN_BINDTYPE_EMU, PEVB_STATE_SAVE },
+       { KEY_RIGHTCTRL, IN_BINDTYPE_EMU, PEVB_STATE_LOAD },
+       { KEY_LEFTCTRL,  IN_BINDTYPE_EMU, PEVB_MENU },
 };
 
 #define DEF_BIND_COUNT (sizeof(in_evdev_def_binds) / sizeof(in_evdev_def_binds[0]))
@@ -336,26 +506,40 @@ static void in_evdev_get_def_binds(int *binds)
        int i;
 
        for (i = 0; i < DEF_BIND_COUNT; i++)
-               binds[in_evdev_def_binds[i].code] = 1 << in_evdev_def_binds[i].bit;
+               binds[IN_BIND_OFFS(in_evdev_def_binds[i].code, in_evdev_def_binds[i].btype)] =
+                       1 << in_evdev_def_binds[i].bit;
 }
 
-/* remove bad binds, count good ones */
-static int in_evdev_clean_binds(void *drv_data, int *binds)
+/* remove binds of missing keys, count remaining ones */
+static int in_evdev_clean_binds(void *drv_data, int *binds, int *def_binds)
 {
-       int keybits[(KEY_MAX+1)/sizeof(int)];
-       int i, ret, count = 0;
+       int keybits[KEY_CNT / sizeof(int)];
+       in_evdev_t *dev = drv_data;
+       int i, t, ret, offs, count = 0;
 
-       ret = ioctl((int)drv_data, EVIOCGBIT(EV_KEY, sizeof(keybits)), keybits);
+       ret = ioctl(dev->fd, EVIOCGBIT(EV_KEY, sizeof(keybits)), keybits);
        if (ret == -1) {
                perror("in_evdev: ioctl failed");
                memset(keybits, 0xff, sizeof(keybits)); /* mark all as good */
        }
 
-       for (i = 0; i < KEY_MAX + 1; i++) {
-               if (!KEYBITS_BIT(i))
-                       binds[i] = binds[i + KEY_MAX + 1] = 0;
-               if (binds[i])
-                       count++;
+       if (dev->abs_lzone != 0) {
+               KEYBITS_BIT_SET(KEY_LEFT);
+               KEYBITS_BIT_SET(KEY_RIGHT);
+       }
+       if (dev->abs_tzone != 0) {
+               KEYBITS_BIT_SET(KEY_UP);
+               KEYBITS_BIT_SET(KEY_DOWN);
+       }
+
+       for (i = 0; i < KEY_CNT; i++) {
+               for (t = 0; t < IN_BINDTYPE_COUNT; t++) {
+                       offs = IN_BIND_OFFS(i, t);
+                       if (!KEYBITS_BIT(i))
+                               binds[offs] = def_binds[offs] = 0;
+                       if (binds[offs])
+                               count++;
+               }
        }
 
        return count;
@@ -372,6 +556,7 @@ void in_evdev_init(void *vdrv)
        drv->get_def_binds = in_evdev_get_def_binds;
        drv->clean_binds = in_evdev_clean_binds;
        drv->set_blocking = in_evdev_set_blocking;
+       drv->update_keycode = in_evdev_update_keycode;
        drv->menu_translate = in_evdev_menu_translate;
        drv->get_key_code = in_evdev_get_key_code;
        drv->get_key_name = in_evdev_get_key_name;