X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=linux%2Fin_evdev.c;h=7dd631e43e832157af5eb09a965be879f7f64b7e;hb=f342bededbe5d51afd1632e689f5105e50d4f63e;hp=fe4a88602a5cd976c7b7afdd405e47443c0dd32a;hpb=595491c49949ad41ffe2c343f1484ae913b6de5f;p=libpicofe.git diff --git a/linux/in_evdev.c b/linux/in_evdev.c index fe4a886..7dd631e 100644 --- a/linux/in_evdev.c +++ b/linux/in_evdev.c @@ -1,4 +1,15 @@ +/* + * (C) Gražvydas "notaz" Ignotas, 2008-2010 + * + * This work is licensed under the terms of any of these licenses + * (at your option): + * - GNU GPL, version 2 or later. + * - GNU LGPL, version 2.1 or later. + * See the COPYING file in the top-level directory. + */ + #include +#include #include #include #include @@ -8,14 +19,47 @@ #include #include -#include "../common/common.h" #include "../common/input.h" #include "in_evdev.h" -#define BIT(x) (keybits[(x)/sizeof(keybits[0])/8] & \ +#define MAX_ABS_DEVS 8 + +typedef struct { + int fd; + int *kbits; + int abs_min_x; /* abs->digital mapping */ + int abs_max_x; + int abs_min_y; + int abs_max_y; + int abs_lzone; + int abs_lastx; + int abs_lasty; + int kc_first; + int kc_last; + unsigned int abs_count; + /* 16.16 multiplier to IN_ABS_RANGE */ + unsigned int abs_mult[MAX_ABS_DEVS]; + unsigned int abs_to_digital:1; +} 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)))) -static const char *in_evdev_keys[KEY_MAX + 1] = { +#define KEYBITS_BIT_CLEAR(x) (keybits[(x)/sizeof(keybits[0])/8] &= \ + ~(1 << ((x) & (sizeof(keybits[0])*8-1)))) + +int in_evdev_allow_abs_only; + +#define IN_EVDEV_PREFIX "evdev:" + +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", @@ -102,20 +146,31 @@ static const char *in_evdev_keys[KEY_MAX + 1] = { }; -int in_evdev_probe(void) +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/sizeof(int)]; int support = 0, count = 0; + int u, ret, fd, kc_first = KEY_MAX, kc_last = 0, have_abs = 0; + in_evdev_t *dev; 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); @@ -124,179 +179,474 @@ int in_evdev_probe(void) goto skip; } - if (!(support & (1 << EV_KEY))) + if (support & (1 << EV_KEY)) { + ret = ioctl(fd, EVIOCGBIT(EV_KEY, sizeof(keybits)), keybits); + if (ret == -1) { + printf("in_evdev: ioctl failed on %s\n", name); + goto skip; + } + + /* check for interesting keys */ + for (u = 0; u < KEY_CNT; u++) { + if (KEYBITS_BIT(u)) { + if (u < kc_first) + kc_first = u; + if (u > kc_last) + kc_last = u; + if (u != KEY_POWER && u != KEY_SLEEP && u != BTN_TOUCH) + count++; + if (u == BTN_TOUCH) /* we can't deal with ts currently */ + goto skip; + } + } + } + + dev = calloc(1, sizeof(*dev)); + if (dev == NULL) goto skip; - ret = ioctl(fd, EVIOCGBIT(EV_KEY, sizeof(keybits)), keybits); + ret = ioctl(fd, EVIOCGKEY(sizeof(keybits)), keybits); if (ret == -1) { - printf("in_evdev: ioctl failed on %s\n", name); - goto skip; + 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 interesting keys */ - for (u = 0; u < KEY_MAX; u++) { - if (BIT(u) && u != KEY_POWER && u != KEY_SLEEP) - count++; + /* 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 = dist / 4; + dev->abs_min_x = ainfo.minimum; + dev->abs_max_x = ainfo.maximum; + } + 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_min_y = ainfo.minimum; + dev->abs_max_y = ainfo.maximum; + } + for (u = 0; u < MAX_ABS_DEVS; u++) { + ret = ioctl(fd, EVIOCGABS(u), &ainfo); + if (ret == -1) + break; + dist = ainfo.maximum - ainfo.minimum; + if (dist != 0) + dev->abs_mult[u] = IN_ABS_RANGE * 2 * 65536 / dist; + have_abs = 1; + } + dev->abs_count = u; } - if (count == 0) +no_abs: + if (count == 0 && !have_abs) { + free(dev); goto skip; + } - strcpy(name, "evdev:"); + dev->fd = fd; + dev->kc_first = kc_first; + dev->kc_last = kc_last; + if (count > 0 || in_evdev_allow_abs_only) + dev->abs_to_digital = 1; + 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, fd, dev, KEY_CNT, in_evdev_keys, 0); continue; skip: close(fd); } +} - return 0; +static void in_evdev_free(void *drv_data) +{ + in_evdev_t *dev = drv_data; + if (dev == NULL) + return; + close(dev->fd); + free(dev); } -void in_evdev_free(void *drv_data) +static const char * const * +in_evdev_get_key_names(int *count) { - close((int)drv_data); + *count = KEY_CNT; + return in_evdev_keys; } -int in_evdev_bind_count(void) +static void or_binds(const int *binds, int key, int *result) { - return 512; + int t; + for (t = 0; t < IN_BINDTYPE_COUNT; t++) + result[t] |= binds[IN_BIND_OFFS(key, t)]; } -int in_evdev_update(void *drv_data, int *binds) +/* ORs result with binds of pressed buttons + * XXX: should measure performance hit of this func, might need to optimize */ +static int in_evdev_update(void *drv_data, const int *binds, int *result) { struct input_event ev[16]; - int keybits[KEY_MAX/sizeof(int)]; - int fd = (int)drv_data; - int result = 0, changed = 0; - 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; + struct input_absinfo ainfo; + int keybits_[KEY_CNT / sizeof(int)]; + int *keybits = keybits_; + in_evdev_t *dev = drv_data; + int rd, ret, u, lzone; + + 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 = dev->kc_first; u <= dev->kc_last; u++) { + if (KEYBITS_BIT(u)) + or_binds(binds, u, result); } - printf("#%d: ", fd); - for (u = 0; u < KEY_MAX; u++) { - if (BIT(u)) { - printf(" %d", u); - result |= binds[u]; + /* map X and Y absolute to UDLR */ + lzone = dev->abs_lzone; + if (dev->abs_to_digital && lzone != 0) { + ret = ioctl(dev->fd, EVIOCGABS(ABS_X), &ainfo); + if (ret != -1) { + if (ainfo.value < dev->abs_min_x + lzone) or_binds(binds, KEY_LEFT, result); + if (ainfo.value > dev->abs_max_x - lzone) or_binds(binds, KEY_RIGHT, result); + } + ret = ioctl(dev->fd, EVIOCGABS(ABS_Y), &ainfo); + if (ret != -1) { + if (ainfo.value < dev->abs_min_y + lzone) or_binds(binds, KEY_UP, result); + if (ainfo.value > dev->abs_max_y - lzone) or_binds(binds, KEY_DOWN, result); } } - printf("\n"); - return result; + return 0; } -void in_evdev_set_blocking(void *data, int y) +static int in_evdev_update_analog(void *drv_data, int axis_id, int *result) +{ + struct input_absinfo ainfo; + in_evdev_t *dev = drv_data; + int ret; + + if ((unsigned int)axis_id >= MAX_ABS_DEVS) + return -1; + + ret = ioctl(dev->fd, EVIOCGABS(axis_id), &ainfo); + if (ret != 0) + return ret; + + *result = (int)(ainfo.value * dev->abs_mult[axis_id]) >> 16; + return 0; +} + +static int in_evdev_set_blocking(in_evdev_t *dev, int y) { 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; + return -1; } + + 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); - if (ret == -1) + ret = fcntl(dev->fd, F_SETFL, flags); + if (ret == -1) { perror("in_evdev: F_SETFL fcntl failed"); + return -1; + } + + return 0; } -int in_evdev_update_keycode(void **data, int dcount, int *which, int *is_down) +static int in_evdev_get_config(void *drv_data, int what, int *val) { - const int *fds = (const int *)data; - int i, fdmax = -1; + in_evdev_t *dev = drv_data; + + switch (what) { + case IN_CFG_ABS_AXIS_COUNT: + *val = dev->abs_count; + break; + default: + return -1; + } - for (i = 0; i < dcount; i++) - if (fds[i] > fdmax) fdmax = fds[i]; + return 0; +} - 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; - } +static int in_evdev_set_config(void *drv_data, int what, int val) +{ + in_evdev_t *dev = drv_data; + int tmp; + + switch (what) { + case IN_CFG_BLOCKING: + return in_evdev_set_blocking(dev, val); + case IN_CFG_ABS_DEAD_ZONE: + if (val < 1 || val > 99 || dev->abs_lzone == 0) + return -1; + /* XXX: based on X axis only, for now.. */ + tmp = (dev->abs_max_x - dev->abs_min_x) / 2; + dev->abs_lzone = tmp - tmp * val / 100; + if (dev->abs_lzone < 1) + dev->abs_lzone = 1; + else if (dev->abs_lzone >= tmp) + dev->abs_lzone = tmp - 1; + break; + default: + return -1; + } - for (i = 0; i < dcount; i++) - if (FD_ISSET(fds[i], &fdset)) - *which = i, fd = fds[i]; + return 0; +} - rd = read(fd, ev, sizeof(ev[0]) * 64); - if (rd < (int) sizeof(ev[0])) { +static int in_evdev_update_keycode(void *data, int *is_down) +{ + int ret_kc = -1, ret_down = 0; + in_evdev_t *dev = data; + struct input_event ev; + int rd; + + /* do single event, the caller sometimes wants + * to do select() in blocking mode */ + rd = read(dev->fd, &ev, sizeof(ev)); + if (rd < (int) sizeof(ev)) { + if (errno != EAGAIN) { perror("in_evdev: error reading"); - sleep(1); - return 0; + //sleep(1); + ret_kc = -2; } + goto out; + } - 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) + goto out; + ret_kc = ev.code; + ret_down = ev.value; + goto out; + } + else if (ev.type == EV_ABS && dev->abs_to_digital) + { + int lzone = dev->abs_lzone, down = 0, *last; + + // map absolute to up/down/left/right + if (lzone != 0 && ev.code == ABS_X) { + if (ev.value < dev->abs_min_x + lzone) + down = KEY_LEFT; + else if (ev.value > dev->abs_max_x - lzone) + down = KEY_RIGHT; + last = &dev->abs_lastx; } + else if (lzone != 0 && ev.code == ABS_Y) { + if (ev.value < dev->abs_min_y + lzone) + down = KEY_UP; + else if (ev.value > dev->abs_max_y - lzone) + down = KEY_DOWN; + last = &dev->abs_lasty; + } + else + goto out; + + if (down == *last) + goto out; + + if (down == 0 || *last != 0) { + /* key up or direction change, return up event for old key */ + ret_kc = *last; + ret_down = 0; + *last = 0; + goto out; + } + ret_kc = *last = down; + ret_down = 1; + goto out; } + +out: + if (is_down != NULL) + *is_down = ret_down; + + return ret_kc; } -int in_evdev_menu_translate(int keycode) +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 }, + /* XXX: maybe better set this from it's plat code somehow */ + /* Pandora */ + { KEY_END, PBTN_MOK }, + { KEY_PAGEDOWN, PBTN_MBACK }, + { KEY_HOME, PBTN_MA2 }, + { KEY_PAGEUP, PBTN_MA3 }, + { KEY_LEFTCTRL, PBTN_MENU }, + { KEY_RIGHTSHIFT, PBTN_L }, + { KEY_RIGHTCTRL, PBTN_R }, + /* Caanoo */ + { BTN_THUMB2, PBTN_MOK }, + { BTN_THUMB, PBTN_MBACK }, + { BTN_TRIGGER, PBTN_MA2 }, + { BTN_TOP, PBTN_MA3 }, + { BTN_BASE, PBTN_MENU }, + { BTN_TOP2, PBTN_L }, + { BTN_PINKIE, PBTN_R }, + /* "normal" keyboards */ + { KEY_ENTER, PBTN_MOK }, + { KEY_ESC, PBTN_MBACK }, + { KEY_A, PBTN_MA2 }, + { KEY_S, PBTN_MA3 }, + { KEY_BACKSLASH, PBTN_MENU }, + { KEY_LEFTBRACE, PBTN_L }, + { KEY_RIGHTBRACE, PBTN_R }, +}; + +#define KEY_PBTN_MAP_SIZE (sizeof(key_pbtn_map) / sizeof(key_pbtn_map[0])) + +static int in_evdev_menu_translate(void *drv_data, 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; + in_evdev_t *dev = drv_data; + 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) { + int k = key_pbtn_map[i].key; + /* should really check EVIOCGBIT, but this is enough for now */ + if (dev->kc_first <= k && k <= dev->kc_last) + return k; + } + } + 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 void in_evdev_get_def_binds(int *binds) +{ + int i; + + for (i = 0; ; i++) { + if (in_evdev_defbinds[i].bit == 0 && in_evdev_defbinds[i].code == 0) + break; + binds[IN_BIND_OFFS(in_evdev_defbinds[i].code, in_evdev_defbinds[i].btype)] = + 1 << in_evdev_defbinds[i].bit; + } +} + +/* 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_CNT / sizeof(int)]; + in_evdev_t *dev = drv_data; + int i, t, ret, offs, count = 0; + + memset(keybits, 0, sizeof(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 */ + } + + if (dev->abs_to_digital && dev->abs_lzone != 0) { + KEYBITS_BIT_SET(KEY_LEFT); + KEYBITS_BIT_SET(KEY_RIGHT); + 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; } -const char *in_evdev_get_key_name(int keycode) +static const in_drv_t in_evdev_drv = { + .prefix = IN_EVDEV_PREFIX, + .probe = in_evdev_probe, + .free = in_evdev_free, + .get_key_names = in_evdev_get_key_names, + .get_def_binds = in_evdev_get_def_binds, + .clean_binds = in_evdev_clean_binds, + .get_config = in_evdev_get_config, + .set_config = in_evdev_set_config, + .update = in_evdev_update, + .update_analog = in_evdev_update_analog, + .update_keycode = in_evdev_update_keycode, + .menu_translate = in_evdev_menu_translate, +}; + +void in_evdev_init(void) { - const char *name = NULL; - if (keycode >= 0 && keycode < KEY_MAX) - name = in_evdev_keys[keycode]; - if (name == NULL) - name = "Unkn"; - - return name; + in_register_driver(&in_evdev_drv); }