/* RetroArch - A frontend for libretro. * Copyright (C) 2010-2014 - Hans-Kristian Arntzen * * RetroArch is free software: you can redistribute it and/or modify it under the terms * of the GNU General Public License as published by the Free Software Found- * ation, either version 3 of the License, or (at your option) any later version. * * RetroArch is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; * without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR * PURPOSE. See the GNU General Public License for more details. * * You should have received a copy of the GNU General Public License along with RetroArch. * If not, see . */ #include "input_common.h" #include "keyboard_line.h" #include "../general.h" #include "../conf/config_file.h" #include "../file_path.h" #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #ifdef HAVE_CONFIG_H #include "../config.h" #endif // Need libxkbcommon to translate raw evdev events to characters // which can be passed to keyboard callback in a sensible way. #ifdef HAVE_XKBCOMMON #include #endif typedef struct udev_input udev_input_t; struct input_device; typedef void (*device_handle_cb)(udev_input_t *udev, const struct input_event *event, struct input_device *dev); struct input_device { int fd; dev_t dev; device_handle_cb handle_cb; char devnode[PATH_MAX]; union { // keyboard // mouse struct { float x, y; float mod_x, mod_y; struct input_absinfo info_x; struct input_absinfo info_y; bool touch; } touchpad; } state; }; struct udev_input { struct udev *udev; struct udev_monitor *monitor; #ifdef HAVE_XKBCOMMON struct xkb_context *xkb_ctx; struct xkb_keymap *xkb_map; struct xkb_state *xkb_state; struct { xkb_mod_index_t index; uint16_t bit; } mod_map[5]; #endif const rarch_joypad_driver_t *joypad; uint8_t key_state[(KEY_MAX + 7) / 8]; int epfd; struct input_device **devices; unsigned num_devices; int16_t mouse_x; int16_t mouse_y; bool mouse_l, mouse_r, mouse_m, mouse_wu, mouse_wd; }; static inline bool get_bit(const uint8_t *buf, unsigned bit) { return buf[bit >> 3] & (1 << (bit & 7)); } static inline void clear_bit(uint8_t *buf, unsigned bit) { buf[bit >> 3] &= ~(1 << (bit & 7)); } static inline void set_bit(uint8_t *buf, unsigned bit) { buf[bit >> 3] |= 1 << (bit & 7); } #ifdef HAVE_XKBCOMMON // FIXME: Don't handle composed and dead-keys properly. Waiting for support in libxkbcommon ... static void handle_xkb(udev_input_t *udev, int code, int value) { unsigned i; int xk_code = code + 8; // Convert Linux evdev to X11 (xkbcommon docs say so at least ...) if (value == 2) // Repeat, release first explicitly. xkb_state_update_key(udev->xkb_state, xk_code, XKB_KEY_UP); const xkb_keysym_t *syms = NULL; unsigned num_syms = 0; if (value) num_syms = xkb_state_key_get_syms(udev->xkb_state, xk_code, &syms); xkb_state_update_key(udev->xkb_state, xk_code, value ? XKB_KEY_DOWN : XKB_KEY_UP); // Build mod state. uint16_t mod = 0; for (i = 0; i < ARRAY_SIZE(udev->mod_map); i++) if (udev->mod_map[i].index != XKB_MOD_INVALID) mod |= xkb_state_mod_index_is_active(udev->xkb_state, udev->mod_map[i].index, XKB_STATE_MODS_EFFECTIVE) > 0 ? udev->mod_map[i].bit : 0; input_keyboard_event(value, input_translate_keysym_to_rk(code), num_syms ? xkb_keysym_to_utf32(syms[0]) : 0, mod); for (i = 1; i < num_syms; i++) input_keyboard_event(value, RETROK_UNKNOWN, xkb_keysym_to_utf32(syms[i]), mod); } #endif static void udev_handle_keyboard(udev_input_t *udev, const struct input_event *event, struct input_device *dev) { switch (event->type) { case EV_KEY: if (event->value) set_bit(udev->key_state, event->code); else clear_bit(udev->key_state, event->code); #ifdef HAVE_XKBCOMMON if (udev->xkb_state) handle_xkb(udev, event->code, event->value); #endif break; default: break; } } static void udev_handle_touchpad(udev_input_t *udev, const struct input_event *event, struct input_device *dev) { switch (event->type) { case EV_ABS: switch (event->code) { case ABS_X: { int x = event->value - dev->state.touchpad.info_x.minimum; int range = dev->state.touchpad.info_x.maximum - dev->state.touchpad.info_x.minimum; float x_norm = (float)x / range; float rel_x = x_norm - dev->state.touchpad.x; if (dev->state.touchpad.touch) udev->mouse_x += (int16_t)roundf(dev->state.touchpad.mod_x * rel_x); dev->state.touchpad.x = x_norm; // Some factor, not sure what's good to do here ... dev->state.touchpad.mod_x = 500.0f; break; } case ABS_Y: { int y = event->value - dev->state.touchpad.info_y.minimum; int range = dev->state.touchpad.info_y.maximum - dev->state.touchpad.info_y.minimum; float y_norm = (float)y / range; float rel_y = y_norm - dev->state.touchpad.y; if (dev->state.touchpad.touch) udev->mouse_y += (int16_t)roundf(dev->state.touchpad.mod_y * rel_y); dev->state.touchpad.y = y_norm; // Some factor, not sure what's good to do here ... dev->state.touchpad.mod_y = 500.0f; break; } default: break; } break; case EV_KEY: switch (event->code) { case BTN_TOUCH: dev->state.touchpad.touch = event->value; dev->state.touchpad.mod_x = 0.0f; // First ABS event is not a relative one. dev->state.touchpad.mod_y = 0.0f; break; default: break; } } } static void udev_handle_mouse(udev_input_t *udev, const struct input_event *event, struct input_device *dev) { switch (event->type) { case EV_KEY: /* TODO: mouse wheel up/down */ switch (event->code) { case BTN_LEFT: udev->mouse_l = event->value; break; case BTN_RIGHT: udev->mouse_r = event->value; break; case BTN_MIDDLE: udev->mouse_m = event->value; break; default: break; } break; case EV_REL: switch (event->code) { case REL_X: udev->mouse_x += event->value; break; case REL_Y: udev->mouse_y += event->value; break; default: break; } break; default: break; } } static bool hotplug_available(udev_input_t *udev) { if (!udev->monitor) return false; struct pollfd fds = {0}; fds.fd = udev_monitor_get_fd(udev->monitor); fds.events = POLLIN; return (poll(&fds, 1, 0) == 1) && (fds.revents & POLLIN); } static bool add_device(udev_input_t *udev, const char *devnode, device_handle_cb cb) { struct stat st; if (stat(devnode, &st) < 0) return false; int fd = open(devnode, O_RDONLY | O_NONBLOCK); if (fd < 0) return false; struct input_device *device = (struct input_device*)calloc(1, sizeof(*device)); if (!device) { close(fd); return false; } device->fd = fd; device->dev = st.st_dev; device->handle_cb = cb; strlcpy(device->devnode, devnode, sizeof(device->devnode)); // Touchpads report in absolute coords. if (cb == udev_handle_touchpad && (ioctl(fd, EVIOCGABS(ABS_X), &device->state.touchpad.info_x) < 0 || ioctl(fd, EVIOCGABS(ABS_Y), &device->state.touchpad.info_y) < 0)) { free(device); close(fd); return false; } struct input_device **tmp = (struct input_device**)realloc(udev->devices, (udev->num_devices + 1) * sizeof(*udev->devices)); if (!tmp) { close(fd); free(device); return false; } tmp[udev->num_devices++] = device; udev->devices = tmp; struct epoll_event event = {0}; event.events = EPOLLIN; event.data.ptr = device; if (epoll_ctl(udev->epfd, EPOLL_CTL_ADD, fd, &event) < 0) // Shouldn't happen, but just check it. RARCH_ERR("Failed to add FD (%d) to epoll list (%s).\n", fd, strerror(errno)); return true; } static void remove_device(udev_input_t *udev, const char *devnode) { unsigned i; for (i = 0; i < udev->num_devices; i++) { if (!strcmp(devnode, udev->devices[i]->devnode)) { close(udev->devices[i]->fd); free(udev->devices[i]); memmove(udev->devices + i, udev->devices + i + 1, (udev->num_devices - (i + 1)) * sizeof(*udev->devices)); udev->num_devices--; } } } static void handle_hotplug(udev_input_t *udev) { struct udev_device *dev = udev_monitor_receive_device(udev->monitor); if (!dev) return; const char *val_keyboard = udev_device_get_property_value(dev, "ID_INPUT_KEYBOARD"); const char *val_mouse = udev_device_get_property_value(dev, "ID_INPUT_MOUSE"); const char *val_touchpad = udev_device_get_property_value(dev, "ID_INPUT_TOUCHPAD"); const char *action = udev_device_get_action(dev); const char *devnode = udev_device_get_devnode(dev); bool is_keyboard = val_keyboard && !strcmp(val_keyboard, "1") && devnode; bool is_mouse = val_mouse && !strcmp(val_mouse, "1") && devnode; bool is_touchpad = val_touchpad && !strcmp(val_touchpad, "1") && devnode; device_handle_cb cb = NULL; const char *devtype = NULL; if (!is_keyboard && !is_mouse && !is_touchpad) goto end; if (is_keyboard) { cb = udev_handle_keyboard; devtype = "keyboard"; } else if (is_touchpad) { cb = udev_handle_touchpad; devtype = "touchpad"; } else if (is_mouse) { cb = udev_handle_mouse; devtype = "mouse"; } if (!strcmp(action, "add")) { RARCH_LOG("[udev]: Hotplug add %s: %s.\n", devtype, devnode); add_device(udev, devnode, cb); } else if (!strcmp(action, "remove")) { RARCH_LOG("[udev]: Hotplug remove %s: %s.\n", devtype, devnode); remove_device(udev, devnode); } end: udev_device_unref(dev); } static void udev_input_poll(void *data) { udev_input_t *udev = (udev_input_t*)data; udev->mouse_x = udev->mouse_y = 0; while (hotplug_available(udev)) handle_hotplug(udev); int i; struct epoll_event events[32]; int ret = epoll_wait(udev->epfd, events, ARRAY_SIZE(events), 0); for (i = 0; i < ret; i++) { if (events[i].events & EPOLLIN) { struct input_device *device = (struct input_device*)events[i].data.ptr; struct input_event events[32]; int j, len; while ((len = read(device->fd, events, sizeof(events))) > 0) { len /= sizeof(*events); for (j = 0; j < len; j++) device->handle_cb(udev, &events[j], device); } } } input_joypad_poll(udev->joypad); } static int16_t udev_mouse_state(udev_input_t *udev, unsigned id) { switch (id) { case RETRO_DEVICE_ID_MOUSE_X: return udev->mouse_x; case RETRO_DEVICE_ID_MOUSE_Y: return udev->mouse_y; case RETRO_DEVICE_ID_MOUSE_LEFT: return udev->mouse_l; case RETRO_DEVICE_ID_MOUSE_RIGHT: return udev->mouse_r; case RETRO_DEVICE_ID_MOUSE_MIDDLE: return udev->mouse_m; default: return 0; } } static int16_t udev_lightgun_state(udev_input_t *udev, unsigned id) { switch (id) { case RETRO_DEVICE_ID_LIGHTGUN_X: return udev->mouse_x; case RETRO_DEVICE_ID_LIGHTGUN_Y: return udev->mouse_y; case RETRO_DEVICE_ID_LIGHTGUN_TRIGGER: return udev->mouse_l; case RETRO_DEVICE_ID_LIGHTGUN_CURSOR: return udev->mouse_m; case RETRO_DEVICE_ID_LIGHTGUN_TURBO: return udev->mouse_r; case RETRO_DEVICE_ID_LIGHTGUN_START: return udev->mouse_m && udev->mouse_r; case RETRO_DEVICE_ID_LIGHTGUN_PAUSE: return udev->mouse_m && udev->mouse_l; default: return 0; } } static bool udev_is_pressed(udev_input_t *udev, const struct retro_keybind *binds, unsigned id) { if (id < RARCH_BIND_LIST_END) { const struct retro_keybind *bind = &binds[id]; return bind->valid && get_bit(udev->key_state, input_translate_rk_to_keysym(binds[id].key)); } else return false; } static int16_t udev_analog_pressed(udev_input_t *udev, const struct retro_keybind *binds, unsigned index, unsigned id) { unsigned id_minus = 0; unsigned id_plus = 0; input_conv_analog_id_to_bind_id(index, id, &id_minus, &id_plus); int16_t pressed_minus = udev_is_pressed(udev, binds, id_minus) ? -0x7fff : 0; int16_t pressed_plus = udev_is_pressed(udev, binds, id_plus) ? 0x7fff : 0; return pressed_plus + pressed_minus; } static int16_t udev_input_state(void *data, const struct retro_keybind **binds, unsigned port, unsigned device, unsigned index, unsigned id) { udev_input_t *udev = (udev_input_t*)data; int16_t ret; switch (device) { case RETRO_DEVICE_JOYPAD: return udev_is_pressed(udev, binds[port], id) || input_joypad_pressed(udev->joypad, port, binds[port], id); case RETRO_DEVICE_ANALOG: ret = udev_analog_pressed(udev, binds[port], index, id); if (!ret) ret = input_joypad_analog(udev->joypad, port, index, id, binds[port]); return ret; case RETRO_DEVICE_KEYBOARD: return id < RETROK_LAST && get_bit(udev->key_state, input_translate_rk_to_keysym((enum retro_key)id)); case RETRO_DEVICE_MOUSE: return udev_mouse_state(udev, id); case RETRO_DEVICE_LIGHTGUN: return udev_lightgun_state(udev, id); default: return 0; } } static bool udev_bind_button_pressed(void *data, int key) { udev_input_t *udev = (udev_input_t*)data; return udev_is_pressed(udev, g_settings.input.binds[0], key) || input_joypad_pressed(udev->joypad, 0, g_settings.input.binds[0], key); } static void udev_input_free(void *data) { if (!data) return; unsigned i; udev_input_t *udev = (udev_input_t*)data; if (udev->joypad) udev->joypad->destroy(); if (udev->epfd >= 0) close(udev->epfd); for (i = 0; i < udev->num_devices; i++) { close(udev->devices[i]->fd); free(udev->devices[i]); } free(udev->devices); if (udev->monitor) udev_monitor_unref(udev->monitor); if (udev->udev) udev_unref(udev->udev); #ifdef HAVE_XKBCOMMON if (udev->xkb_map) xkb_keymap_unref(udev->xkb_map); if (udev->xkb_ctx) xkb_context_unref(udev->xkb_ctx); if (udev->xkb_state) xkb_state_unref(udev->xkb_state); #endif free(udev); } static bool open_devices(udev_input_t *udev, const char *type, device_handle_cb cb) { struct udev_list_entry *devs; struct udev_list_entry *item; struct udev_enumerate *enumerate = udev_enumerate_new(udev->udev); if (!enumerate) return false; udev_enumerate_add_match_property(enumerate, type, "1"); udev_enumerate_scan_devices(enumerate); devs = udev_enumerate_get_list_entry(enumerate); for (item = devs; item; item = udev_list_entry_get_next(item)) { const char *name = udev_list_entry_get_name(item); struct udev_device *dev = udev_device_new_from_syspath(udev->udev, name); const char *devnode = udev_device_get_devnode(dev); int fd = devnode ? open(devnode, O_RDONLY | O_NONBLOCK) : -1; if (devnode) { RARCH_LOG("[udev] Adding device %s as type %s.\n", devnode, type); if (!add_device(udev, devnode, cb)) RARCH_ERR("[udev] Failed to open device: %s (%s).\n", devnode, strerror(errno)); } udev_device_unref(dev); } udev_enumerate_unref(enumerate); return true; } static long oldkbmd = 0xffff; static struct termios oldterm, newterm; static void restore_terminal_input(void) { if (oldkbmd != 0xffff) { ioctl(0, KDSKBMODE, oldkbmd); tcsetattr(0, TCSAFLUSH, &oldterm); oldkbmd = 0xffff; } } static void restore_terminal_signal(int sig) { restore_terminal_input(); kill(getpid(), sig); } static void disable_terminal_input(void) { struct sigaction sa; // Avoid accidentally typing stuff if (!isatty(0) || oldkbmd != 0xffff) return; if (tcgetattr(0, &oldterm) < 0) return; newterm = oldterm; newterm.c_lflag &= ~(ECHO | ICANON | ISIG); newterm.c_iflag &= ~(ISTRIP | IGNCR | ICRNL | INLCR | IXOFF | IXON); newterm.c_cc[VMIN] = 0; newterm.c_cc[VTIME] = 0; // Be careful about recovering the terminal ... if (ioctl(0, KDGKBMODE, &oldkbmd) < 0) return; if (tcsetattr(0, TCSAFLUSH, &newterm) < 0) return; if (ioctl(0, KDSKBMODE, K_MEDIUMRAW) < 0) { tcsetattr(0, TCSAFLUSH, &oldterm); return; } memset(&sa, 0, sizeof(sa)); sa.sa_handler = restore_terminal_signal; sa.sa_flags = SA_RESTART | SA_RESETHAND; sigemptyset(&sa.sa_mask); // Trap some fatal signals. sigaction(SIGABRT, &sa, NULL); sigaction(SIGBUS, &sa, NULL); sigaction(SIGFPE, &sa, NULL); sigaction(SIGILL, &sa, NULL); sigaction(SIGQUIT, &sa, NULL); sigaction(SIGSEGV, &sa, NULL); atexit(restore_terminal_input); } static void *udev_input_init(void) { udev_input_t *udev = (udev_input_t*)calloc(1, sizeof(*udev)); if (!udev) return NULL; udev->udev = udev_new(); if (!udev->udev) { RARCH_ERR("Failed to create udev handle.\n"); goto error; } udev->monitor = udev_monitor_new_from_netlink(udev->udev, "udev"); if (udev->monitor) { udev_monitor_filter_add_match_subsystem_devtype(udev->monitor, "input", NULL); udev_monitor_enable_receiving(udev->monitor); } #ifdef HAVE_XKBCOMMON udev->xkb_ctx = xkb_context_new(XKB_CONTEXT_NO_FLAGS); if (udev->xkb_ctx) { struct xkb_rule_names rule = {0}; rule.rules = "evdev"; struct string_list *list = NULL; if (*g_settings.input.keyboard_layout) { list = string_split(g_settings.input.keyboard_layout, ":"); if (list && list->size >= 2) rule.variant = list->elems[1].data; if (list && list->size >= 1) rule.layout = list->elems[0].data; } udev->xkb_map = xkb_keymap_new_from_names(udev->xkb_ctx, &rule, XKB_MAP_COMPILE_NO_FLAGS); if (list) string_list_free(list); } if (udev->xkb_map) { udev->xkb_state = xkb_state_new(udev->xkb_map); udev->mod_map[0].index = xkb_keymap_mod_get_index(udev->xkb_map, XKB_MOD_NAME_CAPS); udev->mod_map[0].bit = RETROKMOD_CAPSLOCK; udev->mod_map[1].index = xkb_keymap_mod_get_index(udev->xkb_map, XKB_MOD_NAME_SHIFT); udev->mod_map[1].bit = RETROKMOD_SHIFT; udev->mod_map[2].index = xkb_keymap_mod_get_index(udev->xkb_map, XKB_MOD_NAME_CTRL); udev->mod_map[2].bit = RETROKMOD_CTRL; udev->mod_map[3].index = xkb_keymap_mod_get_index(udev->xkb_map, XKB_MOD_NAME_ALT); udev->mod_map[3].bit = RETROKMOD_ALT; udev->mod_map[4].index = xkb_keymap_mod_get_index(udev->xkb_map, XKB_MOD_NAME_LOGO); udev->mod_map[4].bit = RETROKMOD_META; } #endif udev->epfd = epoll_create(32); if (udev->epfd < 0) { RARCH_ERR("Failed to create epoll FD.\n"); goto error; } if (!open_devices(udev, "ID_INPUT_KEYBOARD", udev_handle_keyboard)) { RARCH_ERR("Failed to open keyboard.\n"); goto error; } if (!open_devices(udev, "ID_INPUT_MOUSE", udev_handle_mouse)) { RARCH_ERR("Failed to open mouse.\n"); goto error; } if (!open_devices(udev, "ID_INPUT_TOUCHPAD", udev_handle_touchpad)) { RARCH_ERR("Failed to open touchpads.\n"); goto error; } // If using KMS and we forgot this, we could lock ourselves out completely. if (!udev->num_devices) RARCH_WARN("[udev]: Couldn't open any keyboard, mouse or touchpad. Are permissions set correctly for /dev/input/event*?\n"); udev->joypad = input_joypad_init_driver(g_settings.input.joypad_driver); input_init_keyboard_lut(rarch_key_map_linux); disable_terminal_input(); return udev; error: udev_input_free(udev); return NULL; } static uint64_t udev_input_get_capabilities(void *data) { (void)data; return (1 << RETRO_DEVICE_JOYPAD) | (1 << RETRO_DEVICE_ANALOG) | (1 << RETRO_DEVICE_KEYBOARD) | (1 << RETRO_DEVICE_MOUSE) | (1 << RETRO_DEVICE_LIGHTGUN); } static void udev_input_grab_mouse(void *data, bool state) { // Dummy for now. Might be useful in the future. (void)data; (void)state; } static bool udev_input_set_rumble(void *data, unsigned port, enum retro_rumble_effect effect, uint16_t strength) { udev_input_t *udev = (udev_input_t*)data; return input_joypad_set_rumble(udev->joypad, port, effect, strength); } static const rarch_joypad_driver_t *udev_input_get_joypad_driver(void *data) { udev_input_t *udev = (udev_input_t*)data; return udev->joypad; } const input_driver_t input_udev = { udev_input_init, udev_input_poll, udev_input_state, udev_bind_button_pressed, udev_input_free, NULL, NULL, NULL, udev_input_get_capabilities, NULL, "udev", udev_input_grab_mouse, udev_input_set_rumble, udev_input_get_joypad_driver, };