[libpicofe.git] / linux / in_evdev.c

/*
 * (C) Gražvydas "notaz" Ignotas, 2008-2012
 *
 * 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.
 *  - MAME license.
 * See the COPYING file in the top-level directory.
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <sys/ioctl.h>
#include <unistd.h>
#include <linux/input.h>
#include <errno.h>

#include "../input.h"
#include "in_evdev.h"

#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;
	int abs_mult[MAX_ABS_DEVS]; /* 16.16 multiplier to IN_ABS_RANGE */
	int abs_adj[MAX_ABS_DEVS];  /* adjust for centering */
	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))))

#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, // not necessary
	[KEY_RESERVED] = "Reserved",		[KEY_ESC] = "Esc",
	[KEY_1] = "1",				[KEY_2] = "2",
	[KEY_3] = "3",				[KEY_4] = "4",
	[KEY_5] = "5",				[KEY_6] = "6",
	[KEY_7] = "7",				[KEY_8] = "8",
	[KEY_9] = "9",				[KEY_0] = "0",
	[KEY_MINUS] = "Minus",			[KEY_EQUAL] = "Equal",
	[KEY_BACKSPACE] = "Backspace",		[KEY_TAB] = "Tab",
	[KEY_Q] = "Q",				[KEY_W] = "W",
	[KEY_E] = "E",				[KEY_R] = "R",
	[KEY_T] = "T",				[KEY_Y] = "Y",
	[KEY_U] = "U",				[KEY_I] = "I",
	[KEY_O] = "O",				[KEY_P] = "P",
	[KEY_LEFTBRACE] = "LeftBrace",		[KEY_RIGHTBRACE] = "RightBrace",
	[KEY_ENTER] = "Enter",			[KEY_LEFTCTRL] = "LeftControl",
	[KEY_A] = "A",				[KEY_S] = "S",
	[KEY_D] = "D",				[KEY_F] = "F",
	[KEY_G] = "G",				[KEY_H] = "H",
	[KEY_J] = "J",				[KEY_K] = "K",
	[KEY_L] = "L",				[KEY_SEMICOLON] = "Semicolon",
	[KEY_APOSTROPHE] = "Apostrophe",	[KEY_GRAVE] = "Grave",
	[KEY_LEFTSHIFT] = "LeftShift",		[KEY_BACKSLASH] = "BackSlash",
	[KEY_Z] = "Z",				[KEY_X] = "X",
	[KEY_C] = "C",				[KEY_V] = "V",
	[KEY_B] = "B",				[KEY_N] = "N",
	[KEY_M] = "M",				[KEY_COMMA] = "Comma",
	[KEY_DOT] = "Dot",			[KEY_SLASH] = "Slash",
	[KEY_RIGHTSHIFT] = "RightShift",	[KEY_KPASTERISK] = "KPAsterisk",
	[KEY_LEFTALT] = "LeftAlt",		[KEY_SPACE] = "Space",
	[KEY_CAPSLOCK] = "CapsLock",		[KEY_F1] = "F1",
	[KEY_F2] = "F2",			[KEY_F3] = "F3",
	[KEY_F4] = "F4",			[KEY_F5] = "F5",
	[KEY_F6] = "F6",			[KEY_F7] = "F7",
	[KEY_F8] = "F8",			[KEY_F9] = "F9",
	[KEY_F10] = "F10",			[KEY_NUMLOCK] = "NumLock",
	[KEY_SCROLLLOCK] = "ScrollLock",	[KEY_KP7] = "KP7",
	[KEY_KP8] = "KP8",			[KEY_KP9] = "KP9",
	[KEY_KPMINUS] = "KPMinus",		[KEY_KP4] = "KP4",
	[KEY_KP5] = "KP5",			[KEY_KP6] = "KP6",
	[KEY_KPPLUS] = "KPPlus",		[KEY_KP1] = "KP1",
	[KEY_KP2] = "KP2",			[KEY_KP3] = "KP3",
	[KEY_KP0] = "KP0",			[KEY_KPDOT] = "KPDot",
	[KEY_ZENKAKUHANKAKU] = "Zenkaku/Hankaku", [KEY_102ND] = "102nd",
	[KEY_F11] = "F11",			[KEY_F12] = "F12",
	[KEY_KPJPCOMMA] = "KPJpComma",		[KEY_KPENTER] = "KPEnter",
	[KEY_RIGHTCTRL] = "RightCtrl",		[KEY_KPSLASH] = "KPSlash",
	[KEY_SYSRQ] = "SysRq",			[KEY_RIGHTALT] = "RightAlt",
	[KEY_LINEFEED] = "LineFeed",		[KEY_HOME] = "Home",
	[KEY_UP] = "Up",			[KEY_PAGEUP] = "PageUp",
	[KEY_LEFT] = "Left",			[KEY_RIGHT] = "Right",
	[KEY_END] = "End",			[KEY_DOWN] = "Down",
	[KEY_PAGEDOWN] = "PageDown",		[KEY_INSERT] = "Insert",
	[KEY_DELETE] = "Delete",		[KEY_MACRO] = "Macro",
	[KEY_HELP] = "Help",			[KEY_MENU] = "Menu",
	[KEY_COFFEE] = "Coffee",		[KEY_DIRECTION] = "Direction",
	[BTN_0] = "Btn0",			[BTN_1] = "Btn1",
	[BTN_2] = "Btn2",			[BTN_3] = "Btn3",
	[BTN_4] = "Btn4",			[BTN_5] = "Btn5",
	[BTN_6] = "Btn6",			[BTN_7] = "Btn7",
	[BTN_8] = "Btn8",			[BTN_9] = "Btn9",
	[BTN_LEFT] = "LeftBtn",			[BTN_RIGHT] = "RightBtn",
	[BTN_MIDDLE] = "MiddleBtn",		[BTN_SIDE] = "SideBtn",
	[BTN_EXTRA] = "ExtraBtn",		[BTN_FORWARD] = "ForwardBtn",
	[BTN_BACK] = "BackBtn",			[BTN_TASK] = "TaskBtn",
	[BTN_TRIGGER] = "Trigger",		[BTN_THUMB] = "ThumbBtn",
	[BTN_THUMB2] = "ThumbBtn2",		[BTN_TOP] = "TopBtn",
	[BTN_TOP2] = "TopBtn2",			[BTN_PINKIE] = "PinkieBtn",
	[BTN_BASE] = "BaseBtn",			[BTN_BASE2] = "BaseBtn2",
	[BTN_BASE3] = "BaseBtn3",		[BTN_BASE4] = "BaseBtn4",
	[BTN_BASE5] = "BaseBtn5",		[BTN_BASE6] = "BaseBtn6",
	[BTN_DEAD] = "BtnDead",			[BTN_A] = "BtnA",
	[BTN_B] = "BtnB",			[BTN_C] = "BtnC",
	[BTN_X] = "BtnX",			[BTN_Y] = "BtnY",
	[BTN_Z] = "BtnZ",			[BTN_TL] = "BtnTL",
	[BTN_TR] = "BtnTR",			[BTN_TL2] = "BtnTL2",
	[BTN_TR2] = "BtnTR2",			[BTN_SELECT] = "BtnSelect",
	[BTN_START] = "BtnStart",		[BTN_MODE] = "BtnMode",
	[BTN_THUMBL] = "BtnThumbL",		[BTN_THUMBR] = "BtnThumbR",
	[BTN_TOUCH] = "Touch",			[BTN_STYLUS] = "Stylus",
	[BTN_STYLUS2] = "Stylus2",		[BTN_TOOL_DOUBLETAP] = "Tool Doubletap",
	[BTN_TOOL_TRIPLETAP] = "Tool Tripletap", [BTN_GEAR_DOWN] = "WheelBtn",
	[BTN_GEAR_UP] = "Gear up",		[KEY_OK] = "Ok",
};


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 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 (errno == EACCES)
				continue;	/* maybe we can access next one */
			break;
		}

		/* check supported events */
		ret = ioctl(fd, EVIOCGBIT(0, sizeof(support)), &support);
		if (ret == -1) {
			printf("in_evdev: ioctl failed on %s\n", name);
			goto skip;
		}

		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, 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 = 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;
				dev->abs_adj[u] = -(ainfo.maximum + ainfo.minimum + 1) / 2;
				have_abs = 1;
			}
			dev->abs_count = u;
		}

no_abs:
		if (count == 0 && !have_abs) {
			free(dev);
			goto skip;
		}

		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, fd, dev, KEY_CNT, in_evdev_keys, 0);
		continue;

skip:
		close(fd);
	}
}

static void in_evdev_free(void *drv_data)
{
	in_evdev_t *dev = drv_data;
	if (dev == NULL)
		return;
	close(dev->fd);
	free(dev);
}

static const char * const *
in_evdev_get_key_names(int *count)
{
	*count = KEY_CNT;
	return in_evdev_keys;
}

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 */
static int in_evdev_update(void *drv_data, const int *binds, int *result)
{
	struct input_event ev[16];
	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);
			}
		}
	}

	for (u = dev->kc_first; u <= dev->kc_last; u++) {
		if (KEYBITS_BIT(u))
			or_binds(binds, u, result);
	}

	/* 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);
		}
	}

	return 0;
}

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 = (ainfo.value + dev->abs_adj[axis_id]) * dev->abs_mult[axis_id];
	*result >>= 16;
	return 0;
}

static int in_evdev_set_blocking(in_evdev_t *dev, int y)
{
	long flags;
	int ret;

	flags = (long)fcntl(dev->fd, F_GETFL);
	if ((int)flags == -1) {
		perror("in_evdev: F_GETFL fcntl failed");
		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(dev->fd, F_SETFL, flags);
	if (ret == -1) {
		perror("in_evdev: F_SETFL fcntl failed");
		return -1;
	}

	return 0;
}

static int in_evdev_get_config(void *drv_data, int what, int *val)
{
	in_evdev_t *dev = drv_data;

	switch (what) {
	case IN_CFG_ABS_AXIS_COUNT:
		*val = dev->abs_count;
		break;
	default:
		return -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;
	}

	return 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);
			ret_kc = -2;
		}
		goto out;
	}

	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;
}

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, char *charcode)
{
	in_evdev_t *dev = drv_data;
	int ret = 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) {
				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) {
				ret = key_pbtn_map[i].pbtn;
				break;
			}
		}

		if (charcode != NULL && (unsigned int)keycode < KEY_CNT &&
		    in_evdev_keys[keycode] != NULL && in_evdev_keys[keycode][1] == 0)
		{
			char c = in_evdev_keys[keycode][0];
			if ('A' <= c && c <= 'Z')
				c = 'a' + c - 'A';
			ret |= PBTN_CHAR;
			*charcode = c;
		}
	}

	return ret;
}

/* 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;
}

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,
	.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(const struct in_default_bind *defbinds)
{
	in_register_driver(&in_evdev_drv, defbinds);
}
Commit	Line	Data
957a9eac	1	/*
f89d8471	2	* (C) Gražvydas "notaz" Ignotas, 2008-2012
957a9eac	3	*
	4	* This work is licensed under the terms of any of these licenses
	5	* (at your option):
	6	* - GNU GPL, version 2 or later.
	7	* - GNU LGPL, version 2.1 or later.
f89d8471	8	* - MAME license.
957a9eac	9	* See the COPYING file in the top-level directory.
	10	*/
	11
d92ea048	12	#include <stdio.h>
86883f7f	13	#include <stdlib.h>
d92ea048	14	#include <string.h>
	15	#include <sys/types.h>
	16	#include <sys/stat.h>
	17	#include <fcntl.h>
	18	#include <sys/ioctl.h>
	19	#include <unistd.h>
	20	#include <linux/input.h>
	21	#include <errno.h>
	22
a86e9a3e	23	#include "../input.h"
34581c95	24	#include "in_evdev.h"
d92ea048	25
f342bede	26	#define MAX_ABS_DEVS 8
f342bede	27
86883f7f	28	typedef struct {
86883f7f	29	int fd;
0d6fbb2c	30	int *kbits;
f342bede	31	int abs_min_x; /* abs->digital mapping */
e9b29264	32	int abs_max_x;
	33	int abs_min_y;
	34	int abs_max_y;
86883f7f	35	int abs_lzone;
86883f7f	36	int abs_lastx;
86883f7f	37	int abs_lasty;
e9b29264	38	int kc_first;
e9b29264	39	int kc_last;
f342bede	40	unsigned int abs_count;
2f54e52c	41	int abs_mult[MAX_ABS_DEVS]; /* 16.16 multiplier to IN_ABS_RANGE */
2f54e52c	42	int abs_adj[MAX_ABS_DEVS]; /* adjust for centering */
f342bede	43	unsigned int abs_to_digital:1;
86883f7f	44	} in_evdev_t;
86883f7f	45
8e77275e	46	#ifndef KEY_CNT
	47	#define KEY_CNT (KEY_MAX + 1)
	48	#endif
	49
da767bd5	50	#define KEYBITS_BIT(x) (keybits[(x)/sizeof(keybits[0])/8] & \
d92ea048	51	(1 << ((x) & (sizeof(keybits[0])*8-1))))
d92ea048	52
86883f7f	53	#define KEYBITS_BIT_SET(x) (keybits[(x)/sizeof(keybits[0])/8] \|= \
	54	(1 << ((x) & (sizeof(keybits[0])*8-1))))
	55
0d6fbb2c	56	#define KEYBITS_BIT_CLEAR(x) (keybits[(x)/sizeof(keybits[0])/8] &= \
	57	~(1 << ((x) & (sizeof(keybits[0])*8-1))))
	58
0c924681	59	int in_evdev_allow_abs_only;
0c924681	60
9056e81f	61	#define IN_EVDEV_PREFIX "evdev:"
9056e81f	62
8e77275e	63	static const char * const in_evdev_keys[KEY_CNT] = {
cab91943	64	// [0 ... KEY_MAX] = NULL, // not necessary
595491c4	65	[KEY_RESERVED] = "Reserved", [KEY_ESC] = "Esc",
	66	[KEY_1] = "1", [KEY_2] = "2",
	67	[KEY_3] = "3", [KEY_4] = "4",
	68	[KEY_5] = "5", [KEY_6] = "6",
	69	[KEY_7] = "7", [KEY_8] = "8",
	70	[KEY_9] = "9", [KEY_0] = "0",
	71	[KEY_MINUS] = "Minus", [KEY_EQUAL] = "Equal",
	72	[KEY_BACKSPACE] = "Backspace", [KEY_TAB] = "Tab",
	73	[KEY_Q] = "Q", [KEY_W] = "W",
	74	[KEY_E] = "E", [KEY_R] = "R",
	75	[KEY_T] = "T", [KEY_Y] = "Y",
	76	[KEY_U] = "U", [KEY_I] = "I",
	77	[KEY_O] = "O", [KEY_P] = "P",
	78	[KEY_LEFTBRACE] = "LeftBrace", [KEY_RIGHTBRACE] = "RightBrace",
	79	[KEY_ENTER] = "Enter", [KEY_LEFTCTRL] = "LeftControl",
	80	[KEY_A] = "A", [KEY_S] = "S",
	81	[KEY_D] = "D", [KEY_F] = "F",
	82	[KEY_G] = "G", [KEY_H] = "H",
	83	[KEY_J] = "J", [KEY_K] = "K",
	84	[KEY_L] = "L", [KEY_SEMICOLON] = "Semicolon",
	85	[KEY_APOSTROPHE] = "Apostrophe", [KEY_GRAVE] = "Grave",
	86	[KEY_LEFTSHIFT] = "LeftShift", [KEY_BACKSLASH] = "BackSlash",
	87	[KEY_Z] = "Z", [KEY_X] = "X",
	88	[KEY_C] = "C", [KEY_V] = "V",
	89	[KEY_B] = "B", [KEY_N] = "N",
	90	[KEY_M] = "M", [KEY_COMMA] = "Comma",
	91	[KEY_DOT] = "Dot", [KEY_SLASH] = "Slash",
	92	[KEY_RIGHTSHIFT] = "RightShift", [KEY_KPASTERISK] = "KPAsterisk",
	93	[KEY_LEFTALT] = "LeftAlt", [KEY_SPACE] = "Space",
	94	[KEY_CAPSLOCK] = "CapsLock", [KEY_F1] = "F1",
	95	[KEY_F2] = "F2", [KEY_F3] = "F3",
	96	[KEY_F4] = "F4", [KEY_F5] = "F5",
	97	[KEY_F6] = "F6", [KEY_F7] = "F7",
	98	[KEY_F8] = "F8", [KEY_F9] = "F9",
	99	[KEY_F10] = "F10", [KEY_NUMLOCK] = "NumLock",
	100	[KEY_SCROLLLOCK] = "ScrollLock", [KEY_KP7] = "KP7",
	101	[KEY_KP8] = "KP8", [KEY_KP9] = "KP9",
	102	[KEY_KPMINUS] = "KPMinus", [KEY_KP4] = "KP4",
	103	[KEY_KP5] = "KP5", [KEY_KP6] = "KP6",
	104	[KEY_KPPLUS] = "KPPlus", [KEY_KP1] = "KP1",
	105	[KEY_KP2] = "KP2", [KEY_KP3] = "KP3",
	106	[KEY_KP0] = "KP0", [KEY_KPDOT] = "KPDot",
	107	[KEY_ZENKAKUHANKAKU] = "Zenkaku/Hankaku", [KEY_102ND] = "102nd",
	108	[KEY_F11] = "F11", [KEY_F12] = "F12",
	109	[KEY_KPJPCOMMA] = "KPJpComma", [KEY_KPENTER] = "KPEnter",
	110	[KEY_RIGHTCTRL] = "RightCtrl", [KEY_KPSLASH] = "KPSlash",
	111	[KEY_SYSRQ] = "SysRq", [KEY_RIGHTALT] = "RightAlt",
	112	[KEY_LINEFEED] = "LineFeed", [KEY_HOME] = "Home",
	113	[KEY_UP] = "Up", [KEY_PAGEUP] = "PageUp",
	114	[KEY_LEFT] = "Left", [KEY_RIGHT] = "Right",
	115	[KEY_END] = "End", [KEY_DOWN] = "Down",
	116	[KEY_PAGEDOWN] = "PageDown", [KEY_INSERT] = "Insert",
	117	[KEY_DELETE] = "Delete", [KEY_MACRO] = "Macro",
	118	[KEY_HELP] = "Help", [KEY_MENU] = "Menu",
	119	[KEY_COFFEE] = "Coffee", [KEY_DIRECTION] = "Direction",
	120	[BTN_0] = "Btn0", [BTN_1] = "Btn1",
	121	[BTN_2] = "Btn2", [BTN_3] = "Btn3",
	122	[BTN_4] = "Btn4", [BTN_5] = "Btn5",
	123	[BTN_6] = "Btn6", [BTN_7] = "Btn7",
	124	[BTN_8] = "Btn8", [BTN_9] = "Btn9",
	125	[BTN_LEFT] = "LeftBtn", [BTN_RIGHT] = "RightBtn",
	126	[BTN_MIDDLE] = "MiddleBtn", [BTN_SIDE] = "SideBtn",
	127	[BTN_EXTRA] = "ExtraBtn", [BTN_FORWARD] = "ForwardBtn",
	128	[BTN_BACK] = "BackBtn", [BTN_TASK] = "TaskBtn",
129	[BTN_TRIGGER] = "Trigger", [BTN_THUMB] = "ThumbBtn",
130	[BTN_THUMB2] = "ThumbBtn2", [BTN_TOP] = "TopBtn",
131	[BTN_TOP2] = "TopBtn2", [BTN_PINKIE] = "PinkieBtn",
132	[BTN_BASE] = "BaseBtn", [BTN_BASE2] = "BaseBtn2",
133	[BTN_BASE3] = "BaseBtn3", [BTN_BASE4] = "BaseBtn4",
134	[BTN_BASE5] = "BaseBtn5", [BTN_BASE6] = "BaseBtn6",
135	[BTN_DEAD] = "BtnDead", [BTN_A] = "BtnA",
136	[BTN_B] = "BtnB", [BTN_C] = "BtnC",
137	[BTN_X] = "BtnX", [BTN_Y] = "BtnY",
138	[BTN_Z] = "BtnZ", [BTN_TL] = "BtnTL",
139	[BTN_TR] = "BtnTR", [BTN_TL2] = "BtnTL2",
140	[BTN_TR2] = "BtnTR2", [BTN_SELECT] = "BtnSelect",
141	[BTN_START] = "BtnStart", [BTN_MODE] = "BtnMode",
142	[BTN_THUMBL] = "BtnThumbL", [BTN_THUMBR] = "BtnThumbR",
143	[BTN_TOUCH] = "Touch", [BTN_STYLUS] = "Stylus",
144	[BTN_STYLUS2] = "Stylus2", [BTN_TOOL_DOUBLETAP] = "Tool Doubletap",
145	[BTN_TOOL_TRIPLETAP] = "Tool Tripletap", [BTN_GEAR_DOWN] = "WheelBtn",
146	[BTN_GEAR_UP] = "Gear up", [KEY_OK] = "Ok",
147	};
148
149
da767bd5	150	static void in_evdev_probe(void)
d92ea048	151	{
fbe11103	152	long keybits[KEY_CNT / sizeof(long) / 8];
fbe11103	153	long absbits[(ABS_MAX+1) / sizeof(long) / 8];
d92ea048	154	int i;
d92ea048	155
fbe11103	156	// the kernel might support and return less keys then we know about,
	157	// so make sure the buffers are clear.
	158	memset(keybits, 0, sizeof(keybits));
	159	memset(absbits, 0, sizeof(absbits));
	160
2258f158	161	for (i = 0;; i++)
d92ea048	162	{
d92ea048	163	int support = 0, count = 0;
f342bede	164	int u, ret, fd, kc_first = KEY_MAX, kc_last = 0, have_abs = 0;
86883f7f	165	in_evdev_t *dev;
d92ea048	166	char name[64];
	167
	168	snprintf(name, sizeof(name), "/dev/input/event%d", i);
0b3e1198	169	fd = open(name, O_RDONLY\|O_NONBLOCK);
8e77275e	170	if (fd == -1) {
	171	if (errno == EACCES)
	172	continue; /* maybe we can access next one */
d92ea048	173	break;
8e77275e	174	}
d92ea048	175
	176	/* check supported events */
	177	ret = ioctl(fd, EVIOCGBIT(0, sizeof(support)), &support);
	178	if (ret == -1) {
2258f158	179	printf("in_evdev: ioctl failed on %s\n", name);
d92ea048	180	goto skip;
	181	}
	182
0c924681	183	if (support & (1 << EV_KEY)) {
	184	ret = ioctl(fd, EVIOCGBIT(EV_KEY, sizeof(keybits)), keybits);
	185	if (ret == -1) {
	186	printf("in_evdev: ioctl failed on %s\n", name);
	187	goto skip;
	188	}
d92ea048	189
0c924681	190	/* check for interesting keys */
	191	for (u = 0; u < KEY_CNT; u++) {
	192	if (KEYBITS_BIT(u)) {
	193	if (u < kc_first)
	194	kc_first = u;
	195	if (u > kc_last)
	196	kc_last = u;
	197	if (u != KEY_POWER && u != KEY_SLEEP && u != BTN_TOUCH)
	198	count++;
	199	if (u == BTN_TOUCH) /* we can't deal with ts currently */
	200	goto skip;
	201	}
e9b29264	202	}
d92ea048	203	}
d92ea048	204
86883f7f	205	dev = calloc(1, sizeof(*dev));
	206	if (dev == NULL)
	207	goto skip;
	208
0d6fbb2c	209	ret = ioctl(fd, EVIOCGKEY(sizeof(keybits)), keybits);
	210	if (ret == -1) {
	211	printf("Warning: EVIOCGKEY not supported, will have to track state\n");
	212	dev->kbits = calloc(KEY_CNT, sizeof(int));
	213	if (dev->kbits == NULL) {
	214	free(dev);
	215	goto skip;
	216	}
	217	}
	218
86883f7f	219	/* check for abs too */
	220	if (support & (1 << EV_ABS)) {
	221	struct input_absinfo ainfo;
	222	int dist;
	223	ret = ioctl(fd, EVIOCGBIT(EV_ABS, sizeof(absbits)), absbits);
	224	if (ret == -1)
	225	goto no_abs;
	226	if (absbits[0] & (1 << ABS_X)) {
	227	ret = ioctl(fd, EVIOCGABS(ABS_X), &ainfo);
	228	if (ret == -1)
	229	goto no_abs;
	230	dist = ainfo.maximum - ainfo.minimum;
e9b29264	231	dev->abs_lzone = dist / 4;
	232	dev->abs_min_x = ainfo.minimum;
	233	dev->abs_max_x = ainfo.maximum;
86883f7f	234	}
	235	if (absbits[0] & (1 << ABS_Y)) {
	236	ret = ioctl(fd, EVIOCGABS(ABS_Y), &ainfo);
	237	if (ret == -1)
	238	goto no_abs;
	239	dist = ainfo.maximum - ainfo.minimum;
e9b29264	240	dev->abs_min_y = ainfo.minimum;
e9b29264	241	dev->abs_max_y = ainfo.maximum;
86883f7f	242	}
f342bede	243	for (u = 0; u < MAX_ABS_DEVS; u++) {
	244	ret = ioctl(fd, EVIOCGABS(u), &ainfo);
	245	if (ret == -1)
	246	break;
	247	dist = ainfo.maximum - ainfo.minimum;
	248	if (dist != 0)
	249	dev->abs_mult[u] = IN_ABS_RANGE * 2 * 65536 / dist;
2f54e52c	250	dev->abs_adj[u] = -(ainfo.maximum + ainfo.minimum + 1) / 2;
f342bede	251	have_abs = 1;
	252	}
	253	dev->abs_count = u;
86883f7f	254	}
	255
	256	no_abs:
f342bede	257	if (count == 0 && !have_abs) {
0c924681	258	free(dev);
	259	goto skip;
	260	}
	261
86883f7f	262	dev->fd = fd;
e9b29264	263	dev->kc_first = kc_first;
e9b29264	264	dev->kc_last = kc_last;
f342bede	265	if (count > 0 \|\| in_evdev_allow_abs_only)
f342bede	266	dev->abs_to_digital = 1;
9056e81f	267	strcpy(name, IN_EVDEV_PREFIX);
2258f158	268	ioctl(fd, EVIOCGNAME(sizeof(name)-6), name+6);
	269	printf("in_evdev: found \"%s\" with %d events (type %08x)\n",
	270	name+6, count, support);
9056e81f	271	in_register(name, fd, dev, KEY_CNT, in_evdev_keys, 0);
d92ea048	272	continue;
	273
	274	skip:
	275	close(fd);
	276	}
d92ea048	277	}
d92ea048	278
da767bd5	279	static void in_evdev_free(void *drv_data)
2258f158	280	{
86883f7f	281	in_evdev_t *dev = drv_data;
	282	if (dev == NULL)
	283	return;
	284	close(dev->fd);
	285	free(dev);
2258f158	286	}
2258f158	287
090c1b1a	288	static const char * const *
090c1b1a	289	in_evdev_get_key_names(int *count)
d92ea048	290	{
090c1b1a	291	*count = KEY_CNT;
090c1b1a	292	return in_evdev_keys;
d92ea048	293	}
d92ea048	294
8e77275e	295	static void or_binds(const int binds, int key, int result)
	296	{
	297	int t;
	298	for (t = 0; t < IN_BINDTYPE_COUNT; t++)
	299	result[t] \|= binds[IN_BIND_OFFS(key, t)];
	300	}
	301
	302	/* ORs result with binds of pressed buttons
	303	* XXX: should measure performance hit of this func, might need to optimize */
9056e81f	304	static int in_evdev_update(void drv_data, const int binds, int *result)
d92ea048	305	{
d92ea048	306	struct input_event ev[16];
86883f7f	307	struct input_absinfo ainfo;
0d6fbb2c	308	int keybits_[KEY_CNT / sizeof(int)];
0d6fbb2c	309	int *keybits = keybits_;
86883f7f	310	in_evdev_t *dev = drv_data;
e9b29264	311	int rd, ret, u, lzone;
d92ea048	312
0d6fbb2c	313	if (dev->kbits == NULL) {
782b026e	314	ret = ioctl(dev->fd, EVIOCGKEY(sizeof(keybits_)), keybits_);
0d6fbb2c	315	if (ret == -1) {
	316	perror("in_evdev: ioctl failed");
	317	return -1;
d92ea048	318	}
2258f158	319	}
0d6fbb2c	320	else {
	321	keybits = dev->kbits;
	322	while (1) {
	323	rd = read(dev->fd, ev, sizeof(ev));
	324	if (rd < (int)sizeof(ev[0])) {
	325	if (errno != EAGAIN)
	326	perror("in_evdev: read failed");
	327	break;
	328	}
	329	for (u = 0; u < rd / sizeof(ev[0]); u++) {
	330	if (ev[u].type != EV_KEY)
	331	continue;
	332	else if (ev[u].value == 1)
	333	KEYBITS_BIT_SET(ev[u].code);
	334	else if (ev[u].value == 0)
	335	KEYBITS_BIT_CLEAR(ev[u].code);
	336	}
	337	}
2258f158	338	}
d92ea048	339
e9b29264	340	for (u = dev->kc_first; u <= dev->kc_last; u++) {
8e77275e	341	if (KEYBITS_BIT(u))
8e77275e	342	or_binds(binds, u, result);
d92ea048	343	}
d92ea048	344
86883f7f	345	/* map X and Y absolute to UDLR */
e9b29264	346	lzone = dev->abs_lzone;
f342bede	347	if (dev->abs_to_digital && lzone != 0) {
86883f7f	348	ret = ioctl(dev->fd, EVIOCGABS(ABS_X), &ainfo);
86883f7f	349	if (ret != -1) {
e9b29264	350	if (ainfo.value < dev->abs_min_x + lzone) or_binds(binds, KEY_LEFT, result);
e9b29264	351	if (ainfo.value > dev->abs_max_x - lzone) or_binds(binds, KEY_RIGHT, result);
86883f7f	352	}
86883f7f	353	ret = ioctl(dev->fd, EVIOCGABS(ABS_Y), &ainfo);
86883f7f	354	if (ret != -1) {
e9b29264	355	if (ainfo.value < dev->abs_min_y + lzone) or_binds(binds, KEY_UP, result);
e9b29264	356	if (ainfo.value > dev->abs_max_y - lzone) or_binds(binds, KEY_DOWN, result);
86883f7f	357	}
	358	}
	359
8e77275e	360	return 0;
d92ea048	361	}
d92ea048	362
f342bede	363	static int in_evdev_update_analog(void drv_data, int axis_id, int result)
	364	{
	365	struct input_absinfo ainfo;
	366	in_evdev_t *dev = drv_data;
	367	int ret;
	368
	369	if ((unsigned int)axis_id >= MAX_ABS_DEVS)
	370	return -1;
	371
	372	ret = ioctl(dev->fd, EVIOCGABS(axis_id), &ainfo);
	373	if (ret != 0)
	374	return ret;
	375
2f54e52c	376	result = (ainfo.value + dev->abs_adj[axis_id]) dev->abs_mult[axis_id];
2f54e52c	377	*result >>= 16;
f342bede	378	return 0;
	379	}
	380
e9b29264	381	static int in_evdev_set_blocking(in_evdev_t *dev, int y)
34581c95	382	{
34581c95	383	long flags;
595491c4	384	int ret;
34581c95	385
86883f7f	386	flags = (long)fcntl(dev->fd, F_GETFL);
595491c4	387	if ((int)flags == -1) {
595491c4	388	perror("in_evdev: F_GETFL fcntl failed");
e9b29264	389	return -1;
34581c95	390	}
0c2e114e	391
	392	if (flags & O_NONBLOCK) {
	393	/* flush the event queue */
	394	struct input_event ev;
	395	do {
	396	ret = read(dev->fd, &ev, sizeof(ev));
	397	}
	398	while (ret == sizeof(ev));
	399	}
	400
595491c4	401	if (y)
	402	flags &= ~O_NONBLOCK;
	403	else
	404	flags \|= O_NONBLOCK;
86883f7f	405	ret = fcntl(dev->fd, F_SETFL, flags);
e9b29264	406	if (ret == -1) {
595491c4	407	perror("in_evdev: F_SETFL fcntl failed");
e9b29264	408	return -1;
	409	}
	410
	411	return 0;
	412	}
	413
f342bede	414	static int in_evdev_get_config(void drv_data, int what, int val)
	415	{
	416	in_evdev_t *dev = drv_data;
	417
	418	switch (what) {
	419	case IN_CFG_ABS_AXIS_COUNT:
	420	*val = dev->abs_count;
	421	break;
	422	default:
	423	return -1;
	424	}
	425
	426	return 0;
	427	}
	428
e9b29264	429	static int in_evdev_set_config(void *drv_data, int what, int val)
	430	{
	431	in_evdev_t *dev = drv_data;
	432	int tmp;
	433
	434	switch (what) {
	435	case IN_CFG_BLOCKING:
	436	return in_evdev_set_blocking(dev, val);
	437	case IN_CFG_ABS_DEAD_ZONE:
	438	if (val < 1 \|\| val > 99 \|\| dev->abs_lzone == 0)
	439	return -1;
	440	/* XXX: based on X axis only, for now.. */
	441	tmp = (dev->abs_max_x - dev->abs_min_x) / 2;
	442	dev->abs_lzone = tmp - tmp * val / 100;
	443	if (dev->abs_lzone < 1)
	444	dev->abs_lzone = 1;
	445	else if (dev->abs_lzone >= tmp)
	446	dev->abs_lzone = tmp - 1;
	447	break;
	448	default:
	449	return -1;
	450	}
	451
	452	return 0;
595491c4	453	}
595491c4	454
7f022a8d	455	static int in_evdev_update_keycode(void data, int is_down)
595491c4	456	{
e9b29264	457	int ret_kc = -1, ret_down = 0;
7f022a8d	458	in_evdev_t *dev = data;
	459	struct input_event ev;
	460	int rd;
906bdc9f	461
e3068458	462	/* do single event, the caller sometimes wants
	463	* to do select() in blocking mode */
	464	rd = read(dev->fd, &ev, sizeof(ev));
	465	if (rd < (int) sizeof(ev)) {
	466	if (errno != EAGAIN) {
	467	perror("in_evdev: error reading");
090c1b1a	468	//sleep(1);
090c1b1a	469	ret_kc = -2;
74065be8	470	}
e3068458	471	goto out;
e3068458	472	}
e9b29264	473
e3068458	474	if (ev.type == EV_KEY) {
e3068458	475	if (ev.value < 0 \|\| ev.value > 1)
e9b29264	476	goto out;
e3068458	477	ret_kc = ev.code;
	478	ret_down = ev.value;
	479	goto out;
	480	}
f342bede	481	else if (ev.type == EV_ABS && dev->abs_to_digital)
e3068458	482	{
	483	int lzone = dev->abs_lzone, down = 0, *last;
	484
	485	// map absolute to up/down/left/right
	486	if (lzone != 0 && ev.code == ABS_X) {
	487	if (ev.value < dev->abs_min_x + lzone)
	488	down = KEY_LEFT;
	489	else if (ev.value > dev->abs_max_x - lzone)
	490	down = KEY_RIGHT;
	491	last = &dev->abs_lastx;
74065be8	492	}
e3068458	493	else if (lzone != 0 && ev.code == ABS_Y) {
	494	if (ev.value < dev->abs_min_y + lzone)
	495	down = KEY_UP;
	496	else if (ev.value > dev->abs_max_y - lzone)
	497	down = KEY_DOWN;
	498	last = &dev->abs_lasty;
	499	}
	500	else
	501	goto out;
	502
	503	if (down == *last)
	504	goto out;
	505
	506	if (down == 0 \|\| *last != 0) {
	507	/* key up or direction change, return up event for old key */
	508	ret_kc = *last;
	509	ret_down = 0;
	510	*last = 0;
e9b29264	511	goto out;
34581c95	512	}
e3068458	513	ret_kc = *last = down;
	514	ret_down = 1;
	515	goto out;
34581c95	516	}
7f022a8d	517
e9b29264	518	out:
	519	if (is_down != NULL)
	520	*is_down = ret_down;
	521
	522	return ret_kc;
595491c4	523	}
34581c95	524
82abf46f	525	static const struct {
	526	short key;
	527	short pbtn;
	528	} key_pbtn_map[] =
	529	{
	530	{ KEY_UP, PBTN_UP },
	531	{ KEY_DOWN, PBTN_DOWN },
	532	{ KEY_LEFT, PBTN_LEFT },
	533	{ KEY_RIGHT, PBTN_RIGHT },
e9b29264	534	/* XXX: maybe better set this from it's plat code somehow */
e9b29264	535	/* Pandora */
f6eaae4f	536	{ KEY_END, PBTN_MOK },
f6eaae4f	537	{ KEY_PAGEDOWN, PBTN_MBACK },
f6eaae4f	538	{ KEY_HOME, PBTN_MA2 },
f6eaae4f	539	{ KEY_PAGEUP, PBTN_MA3 },
b2c5ee47	540	{ KEY_LEFTCTRL, PBTN_MENU },
f6eaae4f	541	{ KEY_RIGHTSHIFT, PBTN_L },
f6eaae4f	542	{ KEY_RIGHTCTRL, PBTN_R },
e9b29264	543	/* Caanoo */
	544	{ BTN_THUMB2, PBTN_MOK },
	545	{ BTN_THUMB, PBTN_MBACK },
	546	{ BTN_TRIGGER, PBTN_MA2 },
	547	{ BTN_TOP, PBTN_MA3 },
	548	{ BTN_BASE, PBTN_MENU },
	549	{ BTN_TOP2, PBTN_L },
	550	{ BTN_PINKIE, PBTN_R },
	551	/* "normal" keyboards */
	552	{ KEY_ENTER, PBTN_MOK },
	553	{ KEY_ESC, PBTN_MBACK },
	554	{ KEY_A, PBTN_MA2 },
	555	{ KEY_S, PBTN_MA3 },
	556	{ KEY_BACKSLASH, PBTN_MENU },
	557	{ KEY_LEFTBRACE, PBTN_L },
82abf46f	558	{ KEY_RIGHTBRACE, PBTN_R },
	559	};
	560
	561	#define KEY_PBTN_MAP_SIZE (sizeof(key_pbtn_map) / sizeof(key_pbtn_map[0]))
	562
dd1e7172	563	static int in_evdev_menu_translate(void drv_data, int keycode, char charcode)
595491c4	564	{
e9b29264	565	in_evdev_t *dev = drv_data;
dd1e7172	566	int ret = 0;
82abf46f	567	int i;
e9b29264	568
82abf46f	569	if (keycode < 0)
	570	{
	571	/* menu -> kc */
	572	keycode = -keycode;
	573	for (i = 0; i < KEY_PBTN_MAP_SIZE; i++)
e9b29264	574	if (key_pbtn_map[i].pbtn == keycode) {
	575	int k = key_pbtn_map[i].key;
	576	/* should really check EVIOCGBIT, but this is enough for now */
	577	if (dev->kc_first <= k && k <= dev->kc_last)
	578	return k;
	579	}
34581c95	580	}
82abf46f	581	else
82abf46f	582	{
dd1e7172	583	for (i = 0; i < KEY_PBTN_MAP_SIZE; i++) {
	584	if (key_pbtn_map[i].key == keycode) {
	585	ret = key_pbtn_map[i].pbtn;
	586	break;
	587	}
	588	}
	589
	590	if (charcode != NULL && (unsigned int)keycode < KEY_CNT &&
	591	in_evdev_keys[keycode] != NULL && in_evdev_keys[keycode][1] == 0)
	592	{
	593	char c = in_evdev_keys[keycode][0];
	594	if ('A' <= c && c <= 'Z')
	595	c = 'a' + c - 'A';
	596	ret \|= PBTN_CHAR;
	597	*charcode = c;
	598	}
82abf46f	599	}
82abf46f	600
dd1e7172	601	return ret;
595491c4	602	}
34581c95	603
86883f7f	604	/* remove binds of missing keys, count remaining ones */
8e77275e	605	static int in_evdev_clean_binds(void drv_data, int binds, int *def_binds)
da767bd5	606	{
8e77275e	607	int keybits[KEY_CNT / sizeof(int)];
86883f7f	608	in_evdev_t *dev = drv_data;
8e77275e	609	int i, t, ret, offs, count = 0;
da767bd5	610
bde5dcbb	611	memset(keybits, 0, sizeof(keybits));
86883f7f	612	ret = ioctl(dev->fd, EVIOCGBIT(EV_KEY, sizeof(keybits)), keybits);
da767bd5	613	if (ret == -1) {
da767bd5	614	perror("in_evdev: ioctl failed");
bde5dcbb	615	// memset(keybits, 0xff, sizeof(keybits)); /* mark all as good */
da767bd5	616	}
da767bd5	617
f342bede	618	if (dev->abs_to_digital && dev->abs_lzone != 0) {
86883f7f	619	KEYBITS_BIT_SET(KEY_LEFT);
86883f7f	620	KEYBITS_BIT_SET(KEY_RIGHT);
86883f7f	621	KEYBITS_BIT_SET(KEY_UP);
	622	KEYBITS_BIT_SET(KEY_DOWN);
	623	}
	624
8e77275e	625	for (i = 0; i < KEY_CNT; i++) {
	626	for (t = 0; t < IN_BINDTYPE_COUNT; t++) {
	627	offs = IN_BIND_OFFS(i, t);
	628	if (!KEYBITS_BIT(i))
	629	binds[offs] = def_binds[offs] = 0;
	630	if (binds[offs])
	631	count++;
	632	}
da767bd5	633	}
	634
	635	return count;
	636	}
	637
9056e81f	638	static const in_drv_t in_evdev_drv = {
	639	.prefix = IN_EVDEV_PREFIX,
	640	.probe = in_evdev_probe,
	641	.free = in_evdev_free,
	642	.get_key_names = in_evdev_get_key_names,
9056e81f	643	.clean_binds = in_evdev_clean_binds,
f342bede	644	.get_config = in_evdev_get_config,
9056e81f	645	.set_config = in_evdev_set_config,
9056e81f	646	.update = in_evdev_update,
f342bede	647	.update_analog = in_evdev_update_analog,
9056e81f	648	.update_keycode = in_evdev_update_keycode,
	649	.menu_translate = in_evdev_menu_translate,
	650	};
	651
705bdf63	652	void in_evdev_init(const struct in_default_bind *defbinds)
da767bd5	653	{
705bdf63	654	in_register_driver(&in_evdev_drv, defbinds);
da767bd5	655	}
da767bd5	656