[libpicofe.git] / linux / in_evdev.c

#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 "../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_CNT] = {
	[0 ... KEY_MAX] = NULL,
	[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)
{
	int i;

	for (i = 0;; i++)
	{
		int keybits[KEY_CNT / sizeof(int)], absbits[(ABS_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 (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)))
			goto skip;

		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) && 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, fd, dev, KEY_CNT, 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 int in_evdev_get_bind_count(void)
{
	return KEY_CNT;
}

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];
	struct input_absinfo ainfo;
	int keybits_[KEY_CNT / sizeof(int)];
	int *keybits = keybits_;
	in_evdev_t *dev = drv_data;
	int rd, ret, u;

	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 = 0; u < KEY_CNT; u++) {
		if (KEYBITS_BIT(u))
			or_binds(binds, u, result);
	}

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

	return 0;
}

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

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

static int in_evdev_update_keycode(void *data, int *is_down)
{
	in_evdev_t *dev = data;
	struct input_event ev;
	int rd;

	if (is_down != NULL)
		*is_down = 0;

	rd = read(dev->fd, &ev, sizeof(ev));
	if (rd < (int) sizeof(ev)) {
		if (errno != EAGAIN) {
			perror("in_evdev: error reading");
			sleep(1);
		}
		return -1;
	}

	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 },
	{ BTN_A,	PBTN_MOK },
	{ BTN_TRIGGER,	PBTN_MOK },
	{ KEY_ESC,	PBTN_MBACK },
	{ BTN_B,	PBTN_MBACK },
	{ BTN_THUMB,	PBTN_MBACK },
	{ KEY_A,	PBTN_MA2 },
	{ KEY_S,	PBTN_MA3 },
	{ KEY_BACKSLASH,  PBTN_MENU },
	{ KEY_MENU,	  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(int keycode)
{
	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_CNT; i++) {
		const char *k = in_evdev_keys[i];
		if (k != NULL && strcasecmp(k, key_name) == 0)
			return i;
	}

	return -1;
}

static const char *in_evdev_get_key_name(int keycode)
{
	const char *name = NULL;
	if (keycode >= 0 && keycode <= KEY_MAX)
		name = in_evdev_keys[keycode];
	if (name == NULL)
		name = "Unkn";
	
	return name;
}

static const struct {
	short code;
	char btype;
	char bit;
} in_evdev_def_binds[] =
{
	/* MXYZ SACB RLDU */
	{ 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 */
	{ BTN_B,	IN_BINDTYPE_PLAYER12, 4 },
	{ KEY_D,	IN_BINDTYPE_PLAYER12, 5 },	/* C */
	{ BTN_A,	IN_BINDTYPE_PLAYER12, 5 },
	{ KEY_A,	IN_BINDTYPE_PLAYER12, 6 },	/* A */
	{ BTN_Y,	IN_BINDTYPE_PLAYER12, 6 },
	{ KEY_ENTER,	IN_BINDTYPE_PLAYER12, 7 },
	{ BTN_START,	IN_BINDTYPE_PLAYER12, 7 },
	{ BTN_TL,	IN_BINDTYPE_EMU, PEVB_STATE_LOAD },
	{ BTN_TR,	IN_BINDTYPE_EMU, PEVB_STATE_SAVE },
};

#define DEF_BIND_COUNT (sizeof(in_evdev_def_binds) / sizeof(in_evdev_def_binds[0]))

static void in_evdev_get_def_binds(int *binds)
{
	int i;

	for (i = 0; i < DEF_BIND_COUNT; i++)
		binds[IN_BIND_OFFS(in_evdev_def_binds[i].code, in_evdev_def_binds[i].btype)] =
			1 << in_evdev_def_binds[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;

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

void in_evdev_init(void *vdrv)
{
	in_drv_t *drv = vdrv;

	drv->prefix = in_evdev_prefix;
	drv->probe = in_evdev_probe;
	drv->free = in_evdev_free;
	drv->get_bind_count = in_evdev_get_bind_count;
	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;
}
Commit	Line	Data
d92ea048	1	#include <stdio.h>
86883f7f	2	#include <stdlib.h>
d92ea048	3	#include <string.h>
	4	#include <sys/types.h>
	5	#include <sys/stat.h>
	6	#include <fcntl.h>
	7	#include <sys/ioctl.h>
	8	#include <unistd.h>
	9	#include <linux/input.h>
	10	#include <errno.h>
	11
2258f158	12	#include "../common/input.h"
34581c95	13	#include "in_evdev.h"
d92ea048	14
86883f7f	15	typedef struct {
86883f7f	16	int fd;
0d6fbb2c	17	int *kbits;
86883f7f	18	int abs_lzone;
	19	int abs_rzone;
	20	int abs_tzone;
	21	int abs_bzone;
	22	int abs_lastx;
	23	int abs_lasty;
	24	} in_evdev_t;
	25
8e77275e	26	#ifndef KEY_CNT
	27	#define KEY_CNT (KEY_MAX + 1)
	28	#endif
	29
da767bd5	30	#define KEYBITS_BIT(x) (keybits[(x)/sizeof(keybits[0])/8] & \
d92ea048	31	(1 << ((x) & (sizeof(keybits[0])*8-1))))
d92ea048	32
86883f7f	33	#define KEYBITS_BIT_SET(x) (keybits[(x)/sizeof(keybits[0])/8] \|= \
	34	(1 << ((x) & (sizeof(keybits[0])*8-1))))
	35
0d6fbb2c	36	#define KEYBITS_BIT_CLEAR(x) (keybits[(x)/sizeof(keybits[0])/8] &= \
	37	~(1 << ((x) & (sizeof(keybits[0])*8-1))))
	38
da767bd5	39	static const char * const in_evdev_prefix = "evdev:";
8e77275e	40	static const char * const in_evdev_keys[KEY_CNT] = {
595491c4	41	[0 ... KEY_MAX] = NULL,
	42	[KEY_RESERVED] = "Reserved", [KEY_ESC] = "Esc",
	43	[KEY_1] = "1", [KEY_2] = "2",
	44	[KEY_3] = "3", [KEY_4] = "4",
	45	[KEY_5] = "5", [KEY_6] = "6",
	46	[KEY_7] = "7", [KEY_8] = "8",
	47	[KEY_9] = "9", [KEY_0] = "0",
	48	[KEY_MINUS] = "Minus", [KEY_EQUAL] = "Equal",
	49	[KEY_BACKSPACE] = "Backspace", [KEY_TAB] = "Tab",
	50	[KEY_Q] = "Q", [KEY_W] = "W",
	51	[KEY_E] = "E", [KEY_R] = "R",
	52	[KEY_T] = "T", [KEY_Y] = "Y",
	53	[KEY_U] = "U", [KEY_I] = "I",
	54	[KEY_O] = "O", [KEY_P] = "P",
	55	[KEY_LEFTBRACE] = "LeftBrace", [KEY_RIGHTBRACE] = "RightBrace",
	56	[KEY_ENTER] = "Enter", [KEY_LEFTCTRL] = "LeftControl",
	57	[KEY_A] = "A", [KEY_S] = "S",
	58	[KEY_D] = "D", [KEY_F] = "F",
	59	[KEY_G] = "G", [KEY_H] = "H",
	60	[KEY_J] = "J", [KEY_K] = "K",
	61	[KEY_L] = "L", [KEY_SEMICOLON] = "Semicolon",
	62	[KEY_APOSTROPHE] = "Apostrophe", [KEY_GRAVE] = "Grave",
	63	[KEY_LEFTSHIFT] = "LeftShift", [KEY_BACKSLASH] = "BackSlash",
	64	[KEY_Z] = "Z", [KEY_X] = "X",
	65	[KEY_C] = "C", [KEY_V] = "V",
	66	[KEY_B] = "B", [KEY_N] = "N",
	67	[KEY_M] = "M", [KEY_COMMA] = "Comma",
	68	[KEY_DOT] = "Dot", [KEY_SLASH] = "Slash",
	69	[KEY_RIGHTSHIFT] = "RightShift", [KEY_KPASTERISK] = "KPAsterisk",
	70	[KEY_LEFTALT] = "LeftAlt", [KEY_SPACE] = "Space",
	71	[KEY_CAPSLOCK] = "CapsLock", [KEY_F1] = "F1",
	72	[KEY_F2] = "F2", [KEY_F3] = "F3",
	73	[KEY_F4] = "F4", [KEY_F5] = "F5",
	74	[KEY_F6] = "F6", [KEY_F7] = "F7",
	75	[KEY_F8] = "F8", [KEY_F9] = "F9",
	76	[KEY_F10] = "F10", [KEY_NUMLOCK] = "NumLock",
	77	[KEY_SCROLLLOCK] = "ScrollLock", [KEY_KP7] = "KP7",
	78	[KEY_KP8] = "KP8", [KEY_KP9] = "KP9",
	79	[KEY_KPMINUS] = "KPMinus", [KEY_KP4] = "KP4",
	80	[KEY_KP5] = "KP5", [KEY_KP6] = "KP6",
	81	[KEY_KPPLUS] = "KPPlus", [KEY_KP1] = "KP1",
	82	[KEY_KP2] = "KP2", [KEY_KP3] = "KP3",
	83	[KEY_KP0] = "KP0", [KEY_KPDOT] = "KPDot",
	84	[KEY_ZENKAKUHANKAKU] = "Zenkaku/Hankaku", [KEY_102ND] = "102nd",
	85	[KEY_F11] = "F11", [KEY_F12] = "F12",
	86	[KEY_KPJPCOMMA] = "KPJpComma", [KEY_KPENTER] = "KPEnter",
	87	[KEY_RIGHTCTRL] = "RightCtrl", [KEY_KPSLASH] = "KPSlash",
	88	[KEY_SYSRQ] = "SysRq", [KEY_RIGHTALT] = "RightAlt",
	89	[KEY_LINEFEED] = "LineFeed", [KEY_HOME] = "Home",
	90	[KEY_UP] = "Up", [KEY_PAGEUP] = "PageUp",
	91	[KEY_LEFT] = "Left", [KEY_RIGHT] = "Right",
	92	[KEY_END] = "End", [KEY_DOWN] = "Down",
	93	[KEY_PAGEDOWN] = "PageDown", [KEY_INSERT] = "Insert",
	94	[KEY_DELETE] = "Delete", [KEY_MACRO] = "Macro",
	95	[KEY_HELP] = "Help", [KEY_MENU] = "Menu",
	96	[KEY_COFFEE] = "Coffee", [KEY_DIRECTION] = "Direction",
	97	[BTN_0] = "Btn0", [BTN_1] = "Btn1",
	98	[BTN_2] = "Btn2", [BTN_3] = "Btn3",
	99	[BTN_4] = "Btn4", [BTN_5] = "Btn5",
	100	[BTN_6] = "Btn6", [BTN_7] = "Btn7",
	101	[BTN_8] = "Btn8", [BTN_9] = "Btn9",
	102	[BTN_LEFT] = "LeftBtn", [BTN_RIGHT] = "RightBtn",
	103	[BTN_MIDDLE] = "MiddleBtn", [BTN_SIDE] = "SideBtn",
	104	[BTN_EXTRA] = "ExtraBtn", [BTN_FORWARD] = "ForwardBtn",
105	[BTN_BACK] = "BackBtn", [BTN_TASK] = "TaskBtn",
106	[BTN_TRIGGER] = "Trigger", [BTN_THUMB] = "ThumbBtn",
107	[BTN_THUMB2] = "ThumbBtn2", [BTN_TOP] = "TopBtn",
108	[BTN_TOP2] = "TopBtn2", [BTN_PINKIE] = "PinkieBtn",
109	[BTN_BASE] = "BaseBtn", [BTN_BASE2] = "BaseBtn2",
110	[BTN_BASE3] = "BaseBtn3", [BTN_BASE4] = "BaseBtn4",
111	[BTN_BASE5] = "BaseBtn5", [BTN_BASE6] = "BaseBtn6",
112	[BTN_DEAD] = "BtnDead", [BTN_A] = "BtnA",
113	[BTN_B] = "BtnB", [BTN_C] = "BtnC",
114	[BTN_X] = "BtnX", [BTN_Y] = "BtnY",
115	[BTN_Z] = "BtnZ", [BTN_TL] = "BtnTL",
116	[BTN_TR] = "BtnTR", [BTN_TL2] = "BtnTL2",
117	[BTN_TR2] = "BtnTR2", [BTN_SELECT] = "BtnSelect",
118	[BTN_START] = "BtnStart", [BTN_MODE] = "BtnMode",
119	[BTN_THUMBL] = "BtnThumbL", [BTN_THUMBR] = "BtnThumbR",
120	[BTN_TOUCH] = "Touch", [BTN_STYLUS] = "Stylus",
121	[BTN_STYLUS2] = "Stylus2", [BTN_TOOL_DOUBLETAP] = "Tool Doubletap",
122	[BTN_TOOL_TRIPLETAP] = "Tool Tripletap", [BTN_GEAR_DOWN] = "WheelBtn",
123	[BTN_GEAR_UP] = "Gear up", [KEY_OK] = "Ok",
124	};
125
126
da767bd5	127	static void in_evdev_probe(void)
d92ea048	128	{
	129	int i;
	130
2258f158	131	for (i = 0;; i++)
d92ea048	132	{
8e77275e	133	int keybits[KEY_CNT / sizeof(int)], absbits[(ABS_MAX+1)/sizeof(int)];
d92ea048	134	int support = 0, count = 0;
86883f7f	135	in_evdev_t *dev;
86883f7f	136	int u, ret, fd;
d92ea048	137	char name[64];
	138
	139	snprintf(name, sizeof(name), "/dev/input/event%d", i);
0b3e1198	140	fd = open(name, O_RDONLY\|O_NONBLOCK);
8e77275e	141	if (fd == -1) {
	142	if (errno == EACCES)
	143	continue; /* maybe we can access next one */
d92ea048	144	break;
8e77275e	145	}
d92ea048	146
	147	/* check supported events */
	148	ret = ioctl(fd, EVIOCGBIT(0, sizeof(support)), &support);
	149	if (ret == -1) {
2258f158	150	printf("in_evdev: ioctl failed on %s\n", name);
d92ea048	151	goto skip;
	152	}
	153
	154	if (!(support & (1 << EV_KEY)))
	155	goto skip;
	156
	157	ret = ioctl(fd, EVIOCGBIT(EV_KEY, sizeof(keybits)), keybits);
	158	if (ret == -1) {
2258f158	159	printf("in_evdev: ioctl failed on %s\n", name);
d92ea048	160	goto skip;
	161	}
	162
d92ea048	163	/* check for interesting keys */
8e77275e	164	for (u = 0; u < KEY_CNT; u++) {
0d6fbb2c	165	if (KEYBITS_BIT(u) && u != KEY_POWER &&
0d6fbb2c	166	u != KEY_SLEEP && u != BTN_TOUCH)
d92ea048	167	count++;
	168	}
	169
	170	if (count == 0)
	171	goto skip;
	172
86883f7f	173	dev = calloc(1, sizeof(*dev));
	174	if (dev == NULL)
	175	goto skip;
	176
0d6fbb2c	177	ret = ioctl(fd, EVIOCGKEY(sizeof(keybits)), keybits);
	178	if (ret == -1) {
	179	printf("Warning: EVIOCGKEY not supported, will have to track state\n");
	180	dev->kbits = calloc(KEY_CNT, sizeof(int));
	181	if (dev->kbits == NULL) {
	182	free(dev);
	183	goto skip;
	184	}
	185	}
	186
86883f7f	187	/* check for abs too */
	188	if (support & (1 << EV_ABS)) {
	189	struct input_absinfo ainfo;
	190	int dist;
	191	ret = ioctl(fd, EVIOCGBIT(EV_ABS, sizeof(absbits)), absbits);
	192	if (ret == -1)
	193	goto no_abs;
	194	if (absbits[0] & (1 << ABS_X)) {
	195	ret = ioctl(fd, EVIOCGABS(ABS_X), &ainfo);
	196	if (ret == -1)
	197	goto no_abs;
	198	dist = ainfo.maximum - ainfo.minimum;
	199	dev->abs_lzone = ainfo.minimum + dist / 4;
	200	dev->abs_rzone = ainfo.maximum - dist / 4;
	201	}
	202	if (absbits[0] & (1 << ABS_Y)) {
	203	ret = ioctl(fd, EVIOCGABS(ABS_Y), &ainfo);
	204	if (ret == -1)
	205	goto no_abs;
	206	dist = ainfo.maximum - ainfo.minimum;
	207	dev->abs_tzone = ainfo.minimum + dist / 4;
	208	dev->abs_bzone = ainfo.maximum - dist / 4;
	209	}
	210	}
	211
	212	no_abs:
	213	dev->fd = fd;
da767bd5	214	strcpy(name, in_evdev_prefix);
2258f158	215	ioctl(fd, EVIOCGNAME(sizeof(name)-6), name+6);
	216	printf("in_evdev: found \"%s\" with %d events (type %08x)\n",
	217	name+6, count, support);
8e77275e	218	in_register(name, IN_DRVID_EVDEV, fd, dev, KEY_CNT, 0);
d92ea048	219	continue;
	220
	221	skip:
	222	close(fd);
	223	}
d92ea048	224	}
d92ea048	225
da767bd5	226	static void in_evdev_free(void *drv_data)
2258f158	227	{
86883f7f	228	in_evdev_t *dev = drv_data;
	229	if (dev == NULL)
	230	return;
	231	close(dev->fd);
	232	free(dev);
2258f158	233	}
2258f158	234
da767bd5	235	static int in_evdev_get_bind_count(void)
d92ea048	236	{
8e77275e	237	return KEY_CNT;
d92ea048	238	}
d92ea048	239
8e77275e	240	static void or_binds(const int binds, int key, int result)
	241	{
	242	int t;
	243	for (t = 0; t < IN_BINDTYPE_COUNT; t++)
	244	result[t] \|= binds[IN_BIND_OFFS(key, t)];
	245	}
	246
	247	/* ORs result with binds of pressed buttons
	248	* XXX: should measure performance hit of this func, might need to optimize */
	249	int in_evdev_update(void drv_data, const int binds, int *result)
d92ea048	250	{
d92ea048	251	struct input_event ev[16];
86883f7f	252	struct input_absinfo ainfo;
0d6fbb2c	253	int keybits_[KEY_CNT / sizeof(int)];
0d6fbb2c	254	int *keybits = keybits_;
86883f7f	255	in_evdev_t *dev = drv_data;
2258f158	256	int rd, ret, u;
d92ea048	257
0d6fbb2c	258	if (dev->kbits == NULL) {
782b026e	259	ret = ioctl(dev->fd, EVIOCGKEY(sizeof(keybits_)), keybits_);
0d6fbb2c	260	if (ret == -1) {
	261	perror("in_evdev: ioctl failed");
	262	return -1;
d92ea048	263	}
2258f158	264	}
0d6fbb2c	265	else {
	266	keybits = dev->kbits;
	267	while (1) {
	268	rd = read(dev->fd, ev, sizeof(ev));
	269	if (rd < (int)sizeof(ev[0])) {
	270	if (errno != EAGAIN)
	271	perror("in_evdev: read failed");
	272	break;
	273	}
	274	for (u = 0; u < rd / sizeof(ev[0]); u++) {
	275	if (ev[u].type != EV_KEY)
	276	continue;
	277	else if (ev[u].value == 1)
	278	KEYBITS_BIT_SET(ev[u].code);
	279	else if (ev[u].value == 0)
	280	KEYBITS_BIT_CLEAR(ev[u].code);
	281	}
	282	}
2258f158	283	}
d92ea048	284
8e77275e	285	for (u = 0; u < KEY_CNT; u++) {
	286	if (KEYBITS_BIT(u))
	287	or_binds(binds, u, result);
d92ea048	288	}
d92ea048	289
86883f7f	290	/* map X and Y absolute to UDLR */
	291	if (dev->abs_lzone != 0) {
	292	ret = ioctl(dev->fd, EVIOCGABS(ABS_X), &ainfo);
	293	if (ret != -1) {
8e77275e	294	if (ainfo.value < dev->abs_lzone) or_binds(binds, KEY_LEFT, result);
8e77275e	295	if (ainfo.value > dev->abs_rzone) or_binds(binds, KEY_RIGHT, result);
86883f7f	296	}
	297	}
	298	if (dev->abs_tzone != 0) {
	299	ret = ioctl(dev->fd, EVIOCGABS(ABS_Y), &ainfo);
	300	if (ret != -1) {
8e77275e	301	if (ainfo.value < dev->abs_tzone) or_binds(binds, KEY_UP, result);
8e77275e	302	if (ainfo.value > dev->abs_bzone) or_binds(binds, KEY_DOWN, result);
86883f7f	303	}
	304	}
	305
8e77275e	306	return 0;
d92ea048	307	}
d92ea048	308
86883f7f	309	static void in_evdev_set_blocking(void *drv_data, int y)
34581c95	310	{
86883f7f	311	in_evdev_t *dev = drv_data;
34581c95	312	long flags;
595491c4	313	int ret;
34581c95	314
86883f7f	315	flags = (long)fcntl(dev->fd, F_GETFL);
595491c4	316	if ((int)flags == -1) {
	317	perror("in_evdev: F_GETFL fcntl failed");
	318	return;
34581c95	319	}
595491c4	320	if (y)
	321	flags &= ~O_NONBLOCK;
	322	else
	323	flags \|= O_NONBLOCK;
86883f7f	324	ret = fcntl(dev->fd, F_SETFL, flags);
595491c4	325	if (ret == -1)
	326	perror("in_evdev: F_SETFL fcntl failed");
	327	}
	328
7f022a8d	329	static int in_evdev_update_keycode(void data, int is_down)
595491c4	330	{
7f022a8d	331	in_evdev_t *dev = data;
	332	struct input_event ev;
	333	int rd;
906bdc9f	334
	335	if (is_down != NULL)
	336	*is_down = 0;
	337
7f022a8d	338	rd = read(dev->fd, &ev, sizeof(ev));
7f022a8d	339	if (rd < (int) sizeof(ev)) {
13b692eb	340	if (errno != EAGAIN) {
	341	perror("in_evdev: error reading");
	342	sleep(1);
	343	}
	344	return -1;
7f022a8d	345	}
34581c95	346
7f022a8d	347	if (ev.type == EV_KEY) {
7f022a8d	348	if (ev.value < 0 \|\| ev.value > 1)
13b692eb	349	return -1;
7f022a8d	350	if (is_down != NULL)
	351	*is_down = ev.value;
	352	return ev.code;
	353	}
	354	else if (ev.type == EV_ABS)
	355	{
	356	int down = 0;
	357	if (dev->abs_lzone != 0 && ev.code == ABS_X) {
	358	if (ev.value < dev->abs_lzone) {
	359	down = 1;
	360	dev->abs_lastx = KEY_LEFT;
	361	}
	362	else if (ev.value > dev->abs_rzone) {
	363	down = 1;
	364	dev->abs_lastx = KEY_RIGHT;
	365	}
54563d71	366	if (is_down != NULL)
7f022a8d	367	*is_down = down;
7f022a8d	368	return dev->abs_lastx;
54563d71	369	}
7f022a8d	370	if (dev->abs_tzone != 0 && ev.code == ABS_Y) {
	371	if (ev.value < dev->abs_tzone) {
	372	down = 1;
	373	dev->abs_lasty = KEY_UP;
86883f7f	374	}
7f022a8d	375	else if (ev.value > dev->abs_bzone) {
	376	down = 1;
	377	dev->abs_lasty = KEY_DOWN;
86883f7f	378	}
7f022a8d	379	if (is_down != NULL)
	380	*is_down = down;
	381	return dev->abs_lasty;
34581c95	382	}
34581c95	383	}
7f022a8d	384
13b692eb	385	return -1;
595491c4	386	}
34581c95	387
82abf46f	388	static const struct {
	389	short key;
	390	short pbtn;
	391	} key_pbtn_map[] =
	392	{
	393	{ KEY_UP, PBTN_UP },
	394	{ KEY_DOWN, PBTN_DOWN },
	395	{ KEY_LEFT, PBTN_LEFT },
	396	{ KEY_RIGHT, PBTN_RIGHT },
	397	{ KEY_ENTER, PBTN_MOK },
	398	{ BTN_A, PBTN_MOK },
	399	{ BTN_TRIGGER, PBTN_MOK },
	400	{ KEY_ESC, PBTN_MBACK },
	401	{ BTN_B, PBTN_MBACK },
	402	{ BTN_THUMB, PBTN_MBACK },
	403	{ KEY_A, PBTN_MA2 },
	404	{ KEY_S, PBTN_MA3 },
	405	{ KEY_BACKSLASH, PBTN_MENU },
	406	{ KEY_MENU, PBTN_MENU },
	407	{ KEY_LEFTBRACE, PBTN_L },
	408	{ KEY_RIGHTBRACE, PBTN_R },
	409	};
	410
	411	#define KEY_PBTN_MAP_SIZE (sizeof(key_pbtn_map) / sizeof(key_pbtn_map[0]))
	412
da767bd5	413	static int in_evdev_menu_translate(int keycode)
595491c4	414	{
82abf46f	415	int i;
	416	if (keycode < 0)
	417	{
	418	/* menu -> kc */
	419	keycode = -keycode;
	420	for (i = 0; i < KEY_PBTN_MAP_SIZE; i++)
	421	if (key_pbtn_map[i].pbtn == keycode)
	422	return key_pbtn_map[i].key;
34581c95	423	}
82abf46f	424	else
	425	{
	426	for (i = 0; i < KEY_PBTN_MAP_SIZE; i++)
	427	if (key_pbtn_map[i].key == keycode)
	428	return key_pbtn_map[i].pbtn;
	429	}
	430
	431	return 0;
595491c4	432	}
34581c95	433
da767bd5	434	static int in_evdev_get_key_code(const char *key_name)
	435	{
	436	int i;
	437
8e77275e	438	for (i = 0; i < KEY_CNT; i++) {
da767bd5	439	const char *k = in_evdev_keys[i];
13b692eb	440	if (k != NULL && strcasecmp(k, key_name) == 0)
da767bd5	441	return i;
	442	}
	443
	444	return -1;
	445	}
	446
	447	static const char *in_evdev_get_key_name(int keycode)
595491c4	448	{
595491c4	449	const char *name = NULL;
da767bd5	450	if (keycode >= 0 && keycode <= KEY_MAX)
595491c4	451	name = in_evdev_keys[keycode];
	452	if (name == NULL)
	453	name = "Unkn";
	454
	455	return name;
34581c95	456	}
34581c95	457
da767bd5	458	static const struct {
da767bd5	459	short code;
8e77275e	460	char btype;
8e77275e	461	char bit;
da767bd5	462	} in_evdev_def_binds[] =
	463	{
	464	/* MXYZ SACB RLDU */
8e77275e	465	{ KEY_UP, IN_BINDTYPE_PLAYER12, 0 },
	466	{ KEY_DOWN, IN_BINDTYPE_PLAYER12, 1 },
	467	{ KEY_LEFT, IN_BINDTYPE_PLAYER12, 2 },
	468	{ KEY_RIGHT, IN_BINDTYPE_PLAYER12, 3 },
	469	{ KEY_S, IN_BINDTYPE_PLAYER12, 4 }, /* B */
	470	{ BTN_B, IN_BINDTYPE_PLAYER12, 4 },
	471	{ KEY_D, IN_BINDTYPE_PLAYER12, 5 }, /* C */
	472	{ BTN_A, IN_BINDTYPE_PLAYER12, 5 },
	473	{ KEY_A, IN_BINDTYPE_PLAYER12, 6 }, /* A */
	474	{ BTN_Y, IN_BINDTYPE_PLAYER12, 6 },
	475	{ KEY_ENTER, IN_BINDTYPE_PLAYER12, 7 },
	476	{ BTN_START, IN_BINDTYPE_PLAYER12, 7 },
	477	{ BTN_TL, IN_BINDTYPE_EMU, PEVB_STATE_LOAD },
	478	{ BTN_TR, IN_BINDTYPE_EMU, PEVB_STATE_SAVE },
da767bd5	479	};
	480
	481	#define DEF_BIND_COUNT (sizeof(in_evdev_def_binds) / sizeof(in_evdev_def_binds[0]))
	482
	483	static void in_evdev_get_def_binds(int *binds)
	484	{
	485	int i;
	486
	487	for (i = 0; i < DEF_BIND_COUNT; i++)
8e77275e	488	binds[IN_BIND_OFFS(in_evdev_def_binds[i].code, in_evdev_def_binds[i].btype)] =
8e77275e	489	1 << in_evdev_def_binds[i].bit;
da767bd5	490	}
da767bd5	491
86883f7f	492	/* remove binds of missing keys, count remaining ones */
8e77275e	493	static int in_evdev_clean_binds(void drv_data, int binds, int *def_binds)
da767bd5	494	{
8e77275e	495	int keybits[KEY_CNT / sizeof(int)];
86883f7f	496	in_evdev_t *dev = drv_data;
8e77275e	497	int i, t, ret, offs, count = 0;
da767bd5	498
86883f7f	499	ret = ioctl(dev->fd, EVIOCGBIT(EV_KEY, sizeof(keybits)), keybits);
da767bd5	500	if (ret == -1) {
	501	perror("in_evdev: ioctl failed");
	502	memset(keybits, 0xff, sizeof(keybits)); /* mark all as good */
	503	}
	504
86883f7f	505	if (dev->abs_lzone != 0) {
	506	KEYBITS_BIT_SET(KEY_LEFT);
	507	KEYBITS_BIT_SET(KEY_RIGHT);
	508	}
	509	if (dev->abs_tzone != 0) {
	510	KEYBITS_BIT_SET(KEY_UP);
	511	KEYBITS_BIT_SET(KEY_DOWN);
	512	}
	513
8e77275e	514	for (i = 0; i < KEY_CNT; i++) {
	515	for (t = 0; t < IN_BINDTYPE_COUNT; t++) {
	516	offs = IN_BIND_OFFS(i, t);
	517	if (!KEYBITS_BIT(i))
	518	binds[offs] = def_binds[offs] = 0;
	519	if (binds[offs])
	520	count++;
	521	}
da767bd5	522	}
	523
	524	return count;
	525	}
	526
	527	void in_evdev_init(void *vdrv)
	528	{
	529	in_drv_t *drv = vdrv;
	530
	531	drv->prefix = in_evdev_prefix;
	532	drv->probe = in_evdev_probe;
	533	drv->free = in_evdev_free;
	534	drv->get_bind_count = in_evdev_get_bind_count;
	535	drv->get_def_binds = in_evdev_get_def_binds;
	536	drv->clean_binds = in_evdev_clean_binds;
	537	drv->set_blocking = in_evdev_set_blocking;
7f022a8d	538	drv->update_keycode = in_evdev_update_keycode;
da767bd5	539	drv->menu_translate = in_evdev_menu_translate;
	540	drv->get_key_code = in_evdev_get_key_code;
	541	drv->get_key_name = in_evdev_get_key_name;
	542	}
	543