[deliverable/linux.git] / drivers / input / misc / uinput.c

/*
 *  User level driver support for input subsystem
 *
 * Heavily based on evdev.c by Vojtech Pavlik
 *
 * This program 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 Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program 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 this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
 *
 * Author: Aristeu Sergio Rozanski Filho <aris@cathedrallabs.org>
 *
 * Changes/Revisions:
 *	0.2	16/10/2004 (Micah Dowty <micah@navi.cx>)
 *		- added force feedback support
 *              - added UI_SET_PHYS
 *	0.1	20/06/2002
 *		- first public version
 */
#include <linux/poll.h>
#include <linux/slab.h>
#include <linux/module.h>
#include <linux/init.h>
#include <linux/input.h>
#include <linux/smp_lock.h>
#include <linux/fs.h>
#include <linux/miscdevice.h>
#include <linux/uinput.h>

static int uinput_dev_event(struct input_dev *dev, unsigned int type, unsigned int code, int value)
{
	struct uinput_device	*udev;

	udev = dev->private;

	udev->buff[udev->head].type = type;
	udev->buff[udev->head].code = code;
	udev->buff[udev->head].value = value;
	do_gettimeofday(&udev->buff[udev->head].time);
	udev->head = (udev->head + 1) % UINPUT_BUFFER_SIZE;

	wake_up_interruptible(&udev->waitq);

	return 0;
}

static int uinput_request_alloc_id(struct uinput_device *udev, struct uinput_request *request)
{
	/* Atomically allocate an ID for the given request. Returns 0 on success. */
	int id;
	int err = -1;

	spin_lock(&udev->requests_lock);

	for (id = 0; id < UINPUT_NUM_REQUESTS; id++)
		if (!udev->requests[id]) {
			request->id = id;
			udev->requests[id] = request;
			err = 0;
			break;
		}

	spin_unlock(&udev->requests_lock);
	return err;
}

static struct uinput_request* uinput_request_find(struct uinput_device *udev, int id)
{
	/* Find an input request, by ID. Returns NULL if the ID isn't valid. */
	if (id >= UINPUT_NUM_REQUESTS || id < 0)
		return NULL;
	return udev->requests[id];
}

static inline int uinput_request_reserve_slot(struct uinput_device *udev, struct uinput_request *request)
{
	/* Allocate slot. If none are available right away, wait. */
	return wait_event_interruptible(udev->requests_waitq,
					!uinput_request_alloc_id(udev, request));
}

static void uinput_request_done(struct uinput_device *udev, struct uinput_request *request)
{
	/* Mark slot as available */
	udev->requests[request->id] = NULL;
	wake_up_interruptible(&udev->requests_waitq);

	complete(&request->done);
}

static int uinput_request_submit(struct input_dev *dev, struct uinput_request *request)
{
	int retval;

	/* Tell our userspace app about this new request by queueing an input event */
	uinput_dev_event(dev, EV_UINPUT, request->code, request->id);

	/* Wait for the request to complete */
	retval = wait_for_completion_interruptible(&request->done);
	if (!retval)
		retval = request->retval;

	return retval;
}

static int uinput_dev_upload_effect(struct input_dev *dev, struct ff_effect *effect)
{
	struct uinput_request request;
	int retval;

	if (!test_bit(EV_FF, dev->evbit))
		return -ENOSYS;

	request.id = -1;
	init_completion(&request.done);
	request.code = UI_FF_UPLOAD;
	request.u.effect = effect;

	retval = uinput_request_reserve_slot(dev->private, &request);
	if (!retval)
		retval = uinput_request_submit(dev, &request);

	return retval;
}

static int uinput_dev_erase_effect(struct input_dev *dev, int effect_id)
{
	struct uinput_request request;
	int retval;

	if (!test_bit(EV_FF, dev->evbit))
		return -ENOSYS;

	request.id = -1;
	init_completion(&request.done);
	request.code = UI_FF_ERASE;
	request.u.effect_id = effect_id;

	retval = uinput_request_reserve_slot(dev->private, &request);
	if (!retval)
		retval = uinput_request_submit(dev, &request);

	return retval;
}

static void uinput_destroy_device(struct uinput_device *udev)
{
	const char *name, *phys;

	if (udev->dev) {
		name = udev->dev->name;
		phys = udev->dev->phys;
		if (udev->state == UIST_CREATED)
			input_unregister_device(udev->dev);
		else
			input_free_device(udev->dev);
		kfree(name);
		kfree(phys);
		udev->dev = NULL;
	}

	udev->state = UIST_NEW_DEVICE;
}

static int uinput_create_device(struct uinput_device *udev)
{
	int error;

	if (udev->state != UIST_SETUP_COMPLETE) {
		printk(KERN_DEBUG "%s: write device info first\n", UINPUT_NAME);
		return -EINVAL;
	}

	error = input_register_device(udev->dev);
	if (error) {
		uinput_destroy_device(udev);
		return error;
	}

	udev->state = UIST_CREATED;

	return 0;
}

static int uinput_open(struct inode *inode, struct file *file)
{
	struct uinput_device *newdev;

	newdev = kzalloc(sizeof(struct uinput_device), GFP_KERNEL);
	if (!newdev)
		return -ENOMEM;

	init_MUTEX(&newdev->sem);
	spin_lock_init(&newdev->requests_lock);
	init_waitqueue_head(&newdev->requests_waitq);
	init_waitqueue_head(&newdev->waitq);
	newdev->state = UIST_NEW_DEVICE;

	file->private_data = newdev;

	return 0;
}

static int uinput_validate_absbits(struct input_dev *dev)
{
	unsigned int cnt;
	int retval = 0;

	for (cnt = 0; cnt < ABS_MAX + 1; cnt++) {
		if (!test_bit(cnt, dev->absbit))
			continue;

		if ((dev->absmax[cnt] <= dev->absmin[cnt])) {
			printk(KERN_DEBUG
				"%s: invalid abs[%02x] min:%d max:%d\n",
				UINPUT_NAME, cnt,
				dev->absmin[cnt], dev->absmax[cnt]);
			retval = -EINVAL;
			break;
		}

		if (dev->absflat[cnt] > (dev->absmax[cnt] - dev->absmin[cnt])) {
			printk(KERN_DEBUG
				"%s: absflat[%02x] out of range: %d "
				"(min:%d/max:%d)\n",
				UINPUT_NAME, cnt, dev->absflat[cnt],
				dev->absmin[cnt], dev->absmax[cnt]);
			retval = -EINVAL;
			break;
		}
	}
	return retval;
}

static int uinput_allocate_device(struct uinput_device *udev)
{
	udev->dev = input_allocate_device();
	if (!udev->dev)
		return -ENOMEM;

	udev->dev->event = uinput_dev_event;
	udev->dev->upload_effect = uinput_dev_upload_effect;
	udev->dev->erase_effect = uinput_dev_erase_effect;
	udev->dev->private = udev;

	return 0;
}

static int uinput_setup_device(struct uinput_device *udev, const char __user *buffer, size_t count)
{
	struct uinput_user_dev	*user_dev;
	struct input_dev	*dev;
	char			*name;
	int			size;
	int			retval;

	if (count != sizeof(struct uinput_user_dev))
		return -EINVAL;

	if (!udev->dev) {
		retval = uinput_allocate_device(udev);
		if (retval)
			return retval;
	}

	dev = udev->dev;

	user_dev = kmalloc(sizeof(struct uinput_user_dev), GFP_KERNEL);
	if (!user_dev)
		return -ENOMEM;

	if (copy_from_user(user_dev, buffer, sizeof(struct uinput_user_dev))) {
		retval = -EFAULT;
		goto exit;
	}

	size = strnlen(user_dev->name, UINPUT_MAX_NAME_SIZE) + 1;
	if (!size) {
		retval = -EINVAL;
		goto exit;
	}

	kfree(dev->name);
	dev->name = name = kmalloc(size, GFP_KERNEL);
	if (!name) {
		retval = -ENOMEM;
		goto exit;
	}
	strlcpy(name, user_dev->name, size);

	dev->id.bustype	= user_dev->id.bustype;
	dev->id.vendor	= user_dev->id.vendor;
	dev->id.product	= user_dev->id.product;
	dev->id.version	= user_dev->id.version;
	dev->ff_effects_max = user_dev->ff_effects_max;

	size = sizeof(int) * (ABS_MAX + 1);
	memcpy(dev->absmax, user_dev->absmax, size);
	memcpy(dev->absmin, user_dev->absmin, size);
	memcpy(dev->absfuzz, user_dev->absfuzz, size);
	memcpy(dev->absflat, user_dev->absflat, size);

	/* check if absmin/absmax/absfuzz/absflat are filled as
	 * told in Documentation/input/input-programming.txt */
	if (test_bit(EV_ABS, dev->evbit)) {
		retval = uinput_validate_absbits(dev);
		if (retval < 0)
			goto exit;
	}

	udev->state = UIST_SETUP_COMPLETE;
	retval = count;

 exit:
	kfree(user_dev);
	return retval;
}

static inline ssize_t uinput_inject_event(struct uinput_device *udev, const char __user *buffer, size_t count)
{
	struct input_event ev;

	if (count != sizeof(struct input_event))
		return -EINVAL;

	if (copy_from_user(&ev, buffer, sizeof(struct input_event)))
		return -EFAULT;

	input_event(udev->dev, ev.type, ev.code, ev.value);

	return sizeof(struct input_event);
}

static ssize_t uinput_write(struct file *file, const char __user *buffer, size_t count, loff_t *ppos)
{
	struct uinput_device *udev = file->private_data;
	int retval;

	retval = down_interruptible(&udev->sem);
	if (retval)
		return retval;

	retval = udev->state == UIST_CREATED ?
			uinput_inject_event(udev, buffer, count) :
			uinput_setup_device(udev, buffer, count);

	up(&udev->sem);

	return retval;
}

static ssize_t uinput_read(struct file *file, char __user *buffer, size_t count, loff_t *ppos)
{
	struct uinput_device *udev = file->private_data;
	int retval = 0;

	if (udev->state != UIST_CREATED)
		return -ENODEV;

	if (udev->head == udev->tail && (file->f_flags & O_NONBLOCK))
		return -EAGAIN;

	retval = wait_event_interruptible(udev->waitq,
			udev->head != udev->tail || udev->state != UIST_CREATED);
	if (retval)
		return retval;

	retval = down_interruptible(&udev->sem);
	if (retval)
		return retval;

	if (udev->state != UIST_CREATED) {
		retval = -ENODEV;
		goto out;
	}

	while (udev->head != udev->tail && retval + sizeof(struct input_event) <= count) {
		if (copy_to_user(buffer + retval, &udev->buff[udev->tail], sizeof(struct input_event))) {
			retval = -EFAULT;
			goto out;
		}
		udev->tail = (udev->tail + 1) % UINPUT_BUFFER_SIZE;
		retval += sizeof(struct input_event);
	}

 out:
	up(&udev->sem);

	return retval;
}

static unsigned int uinput_poll(struct file *file, poll_table *wait)
{
	struct uinput_device *udev = file->private_data;

	poll_wait(file, &udev->waitq, wait);

	if (udev->head != udev->tail)
		return POLLIN | POLLRDNORM;

	return 0;
}

static int uinput_release(struct inode *inode, struct file *file)
{
	struct uinput_device *udev = file->private_data;

	uinput_destroy_device(udev);
	kfree(udev);

	return 0;
}

#define uinput_set_bit(_arg, _bit, _max)		\
({							\
	int __ret = 0;					\
	if (udev->state == UIST_CREATED)		\
		__ret =  -EINVAL;			\
	else if ((_arg) > (_max))			\
		__ret = -EINVAL;			\
	else set_bit((_arg), udev->dev->_bit);		\
	__ret;						\
})

static long uinput_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
{
	int			retval;
	struct uinput_device	*udev;
	void __user             *p = (void __user *)arg;
	struct uinput_ff_upload ff_up;
	struct uinput_ff_erase  ff_erase;
	struct uinput_request   *req;
	int                     length;
	char			*phys;

	udev = file->private_data;

	retval = down_interruptible(&udev->sem);
	if (retval)
		return retval;

	if (!udev->dev) {
		retval = uinput_allocate_device(udev);
		if (retval)
			goto out;
	}

	switch (cmd) {
		case UI_DEV_CREATE:
			retval = uinput_create_device(udev);
			break;

		case UI_DEV_DESTROY:
			uinput_destroy_device(udev);
			break;

		case UI_SET_EVBIT:
			retval = uinput_set_bit(arg, evbit, EV_MAX);
			break;

		case UI_SET_KEYBIT:
			retval = uinput_set_bit(arg, keybit, KEY_MAX);
			break;

		case UI_SET_RELBIT:
			retval = uinput_set_bit(arg, relbit, REL_MAX);
			break;

		case UI_SET_ABSBIT:
			retval = uinput_set_bit(arg, absbit, ABS_MAX);
			break;

		case UI_SET_MSCBIT:
			retval = uinput_set_bit(arg, mscbit, MSC_MAX);
			break;

		case UI_SET_LEDBIT:
			retval = uinput_set_bit(arg, ledbit, LED_MAX);
			break;

		case UI_SET_SNDBIT:
			retval = uinput_set_bit(arg, sndbit, SND_MAX);
			break;

		case UI_SET_FFBIT:
			retval = uinput_set_bit(arg, ffbit, FF_MAX);
			break;

		case UI_SET_PHYS:
			if (udev->state == UIST_CREATED) {
				retval = -EINVAL;
				goto out;
			}
			length = strnlen_user(p, 1024);
			if (length <= 0) {
				retval = -EFAULT;
				break;
			}
			kfree(udev->dev->phys);
			udev->dev->phys = phys = kmalloc(length, GFP_KERNEL);
			if (!phys) {
				retval = -ENOMEM;
				break;
			}
			if (copy_from_user(phys, p, length)) {
				udev->dev->phys = NULL;
				kfree(phys);
				retval = -EFAULT;
				break;
			}
			phys[length - 1] = '\0';
			break;

		case UI_BEGIN_FF_UPLOAD:
			if (copy_from_user(&ff_up, p, sizeof(ff_up))) {
				retval = -EFAULT;
				break;
			}
			req = uinput_request_find(udev, ff_up.request_id);
			if (!(req && req->code == UI_FF_UPLOAD && req->u.effect)) {
				retval = -EINVAL;
				break;
			}
			ff_up.retval = 0;
			memcpy(&ff_up.effect, req->u.effect, sizeof(struct ff_effect));
			if (copy_to_user(p, &ff_up, sizeof(ff_up))) {
				retval = -EFAULT;
				break;
			}
			break;

		case UI_BEGIN_FF_ERASE:
			if (copy_from_user(&ff_erase, p, sizeof(ff_erase))) {
				retval = -EFAULT;
				break;
			}
			req = uinput_request_find(udev, ff_erase.request_id);
			if (!(req && req->code == UI_FF_ERASE)) {
				retval = -EINVAL;
				break;
			}
			ff_erase.retval = 0;
			ff_erase.effect_id = req->u.effect_id;
			if (copy_to_user(p, &ff_erase, sizeof(ff_erase))) {
				retval = -EFAULT;
				break;
			}
			break;

		case UI_END_FF_UPLOAD:
			if (copy_from_user(&ff_up, p, sizeof(ff_up))) {
				retval = -EFAULT;
				break;
			}
			req = uinput_request_find(udev, ff_up.request_id);
			if (!(req && req->code == UI_FF_UPLOAD && req->u.effect)) {
				retval = -EINVAL;
				break;
			}
			req->retval = ff_up.retval;
			memcpy(req->u.effect, &ff_up.effect, sizeof(struct ff_effect));
			uinput_request_done(udev, req);
			break;

		case UI_END_FF_ERASE:
			if (copy_from_user(&ff_erase, p, sizeof(ff_erase))) {
				retval = -EFAULT;
				break;
			}
			req = uinput_request_find(udev, ff_erase.request_id);
			if (!(req && req->code == UI_FF_ERASE)) {
				retval = -EINVAL;
				break;
			}
			req->retval = ff_erase.retval;
			uinput_request_done(udev, req);
			break;

		default:
			retval = -EINVAL;
	}

 out:
	up(&udev->sem);
	return retval;
}

static struct file_operations uinput_fops = {
	.owner		= THIS_MODULE,
	.open		= uinput_open,
	.release	= uinput_release,
	.read		= uinput_read,
	.write		= uinput_write,
	.poll		= uinput_poll,
	.unlocked_ioctl	= uinput_ioctl,
};

static struct miscdevice uinput_misc = {
	.fops		= &uinput_fops,
	.minor		= UINPUT_MINOR,
	.name		= UINPUT_NAME,
};

static int __init uinput_init(void)
{
	return misc_register(&uinput_misc);
}

static void __exit uinput_exit(void)
{
	misc_deregister(&uinput_misc);
}

MODULE_AUTHOR("Aristeu Sergio Rozanski Filho");
MODULE_DESCRIPTION("User level driver support for input subsystem");
MODULE_LICENSE("GPL");

module_init(uinput_init);
module_exit(uinput_exit);
Commit	Line	Data
1da177e4 LT	1	/*
	2	* User level driver support for input subsystem
	3	*
	4	* Heavily based on evdev.c by Vojtech Pavlik
	5	*
	6	* This program is free software; you can redistribute it and/or modify
	7	* it under the terms of the GNU General Public License as published by
	8	* the Free Software Foundation; either version 2 of the License, or
	9	* (at your option) any later version.
	10	*
	11	* This program is distributed in the hope that it will be useful,
	12	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	13	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	14	* GNU General Public License for more details.
	15	*
	16	* You should have received a copy of the GNU General Public License
	17	* along with this program; if not, write to the Free Software
	18	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	19	*
	20	* Author: Aristeu Sergio Rozanski Filho <aris@cathedrallabs.org>
	21	*
	22	* Changes/Revisions:
	23	* 0.2 16/10/2004 (Micah Dowty <micah@navi.cx>)
	24	* - added force feedback support
	25	* - added UI_SET_PHYS
	26	* 0.1 20/06/2002
	27	* - first public version
	28	*/
	29	#include <linux/poll.h>
	30	#include <linux/slab.h>
	31	#include <linux/module.h>
	32	#include <linux/init.h>
	33	#include <linux/input.h>
	34	#include <linux/smp_lock.h>
	35	#include <linux/fs.h>
	36	#include <linux/miscdevice.h>
	37	#include <linux/uinput.h>
	38
1da177e4 LT	39	static int uinput_dev_event(struct input_dev *dev, unsigned int type, unsigned int code, int value)
	40	{
	41	struct uinput_device *udev;
	42
	43	udev = dev->private;
	44
	45	udev->buff[udev->head].type = type;
	46	udev->buff[udev->head].code = code;
	47	udev->buff[udev->head].value = value;
	48	do_gettimeofday(&udev->buff[udev->head].time);
	49	udev->head = (udev->head + 1) % UINPUT_BUFFER_SIZE;
	50
	51	wake_up_interruptible(&udev->waitq);
	52
	53	return 0;
	54	}
	55
0048e603	56	static int uinput_request_alloc_id(struct uinput_device udev, struct uinput_request request)
1da177e4 LT	57	{
1da177e4 LT	58	/* Atomically allocate an ID for the given request. Returns 0 on success. */
1da177e4	59	int id;
152c12f5	60	int err = -1;
1da177e4	61
0048e603	62	spin_lock(&udev->requests_lock);
152c12f5 DT	63
152c12f5 DT	64	for (id = 0; id < UINPUT_NUM_REQUESTS; id++)
1da177e4	65	if (!udev->requests[id]) {
1da177e4	66	request->id = id;
0048e603	67	udev->requests[id] = request;
152c12f5 DT	68	err = 0;
152c12f5 DT	69	break;
1da177e4	70	}
152c12f5	71
0048e603	72	spin_unlock(&udev->requests_lock);
152c12f5	73	return err;
1da177e4 LT	74	}
	75
	76	static struct uinput_request* uinput_request_find(struct uinput_device *udev, int id)
	77	{
	78	/* Find an input request, by ID. Returns NULL if the ID isn't valid. */
	79	if (id >= UINPUT_NUM_REQUESTS \|\| id < 0)
	80	return NULL;
1da177e4 LT	81	return udev->requests[id];
	82	}
	83
0048e603	84	static inline int uinput_request_reserve_slot(struct uinput_device udev, struct uinput_request request)
1da177e4	85	{
0048e603 DT	86	/* Allocate slot. If none are available right away, wait. */
	87	return wait_event_interruptible(udev->requests_waitq,
	88	!uinput_request_alloc_id(udev, request));
	89	}
1da177e4	90
0048e603 DT	91	static void uinput_request_done(struct uinput_device udev, struct uinput_request request)
0048e603 DT	92	{
0048e603 DT	93	/* Mark slot as available */
	94	udev->requests[request->id] = NULL;
	95	wake_up_interruptible(&udev->requests_waitq);
e7507ed9 DT	96
e7507ed9 DT	97	complete(&request->done);
1da177e4 LT	98	}
1da177e4 LT	99
0048e603	100	static int uinput_request_submit(struct input_dev dev, struct uinput_request request)
1da177e4	101	{
1da177e4 LT	102	int retval;
	103
	104	/* Tell our userspace app about this new request by queueing an input event */
	105	uinput_dev_event(dev, EV_UINPUT, request->code, request->id);
	106
	107	/* Wait for the request to complete */
0048e603 DT	108	retval = wait_for_completion_interruptible(&request->done);
	109	if (!retval)
	110	retval = request->retval;
1da177e4	111
0048e603	112	return retval;
1da177e4 LT	113	}
	114
	115	static int uinput_dev_upload_effect(struct input_dev dev, struct ff_effect effect)
	116	{
	117	struct uinput_request request;
0048e603	118	int retval;
1da177e4 LT	119
	120	if (!test_bit(EV_FF, dev->evbit))
	121	return -ENOSYS;
	122
0048e603 DT	123	request.id = -1;
	124	init_completion(&request.done);
	125	request.code = UI_FF_UPLOAD;
1da177e4	126	request.u.effect = effect;
0048e603 DT	127
	128	retval = uinput_request_reserve_slot(dev->private, &request);
	129	if (!retval)
	130	retval = uinput_request_submit(dev, &request);
	131
	132	return retval;
1da177e4 LT	133	}
	134
	135	static int uinput_dev_erase_effect(struct input_dev *dev, int effect_id)
	136	{
	137	struct uinput_request request;
0048e603	138	int retval;
1da177e4 LT	139
	140	if (!test_bit(EV_FF, dev->evbit))
	141	return -ENOSYS;
	142
0048e603 DT	143	request.id = -1;
	144	init_completion(&request.done);
	145	request.code = UI_FF_ERASE;
1da177e4	146	request.u.effect_id = effect_id;
0048e603 DT	147
	148	retval = uinput_request_reserve_slot(dev->private, &request);
	149	if (!retval)
	150	retval = uinput_request_submit(dev, &request);
	151
	152	return retval;
1da177e4 LT	153	}
1da177e4 LT	154
29506415	155	static void uinput_destroy_device(struct uinput_device *udev)
1da177e4	156	{
29506415 DT	157	const char name, phys;
	158
	159	if (udev->dev) {
	160	name = udev->dev->name;
	161	phys = udev->dev->phys;
	162	if (udev->state == UIST_CREATED)
	163	input_unregister_device(udev->dev);
	164	else
	165	input_free_device(udev->dev);
	166	kfree(name);
	167	kfree(phys);
	168	udev->dev = NULL;
1da177e4 LT	169	}
1da177e4 LT	170
29506415	171	udev->state = UIST_NEW_DEVICE;
1da177e4 LT	172	}
1da177e4 LT	173
29506415	174	static int uinput_create_device(struct uinput_device *udev)
1da177e4	175	{
29506415 DT	176	int error;
	177
	178	if (udev->state != UIST_SETUP_COMPLETE) {
	179	printk(KERN_DEBUG "%s: write device info first\n", UINPUT_NAME);
1da177e4 LT	180	return -EINVAL;
	181	}
	182
29506415 DT	183	error = input_register_device(udev->dev);
	184	if (error) {
	185	uinput_destroy_device(udev);
	186	return error;
	187	}
1da177e4	188
29506415	189	udev->state = UIST_CREATED;
1da177e4 LT	190
	191	return 0;
	192	}
	193
	194	static int uinput_open(struct inode inode, struct file file)
	195	{
29506415	196	struct uinput_device *newdev;
1da177e4	197
29506415	198	newdev = kzalloc(sizeof(struct uinput_device), GFP_KERNEL);
1da177e4	199	if (!newdev)
29506415 DT	200	return -ENOMEM;
	201
	202	init_MUTEX(&newdev->sem);
0048e603	203	spin_lock_init(&newdev->requests_lock);
1da177e4	204	init_waitqueue_head(&newdev->requests_waitq);
29506415 DT	205	init_waitqueue_head(&newdev->waitq);
29506415 DT	206	newdev->state = UIST_NEW_DEVICE;
1da177e4 LT	207
	208	file->private_data = newdev;
	209
	210	return 0;
1da177e4 LT	211	}
	212
	213	static int uinput_validate_absbits(struct input_dev *dev)
	214	{
	215	unsigned int cnt;
	216	int retval = 0;
	217
	218	for (cnt = 0; cnt < ABS_MAX + 1; cnt++) {
	219	if (!test_bit(cnt, dev->absbit))
	220	continue;
	221
	222	if ((dev->absmax[cnt] <= dev->absmin[cnt])) {
	223	printk(KERN_DEBUG
	224	"%s: invalid abs[%02x] min:%d max:%d\n",
	225	UINPUT_NAME, cnt,
	226	dev->absmin[cnt], dev->absmax[cnt]);
	227	retval = -EINVAL;
	228	break;
	229	}
	230
	231	if (dev->absflat[cnt] > (dev->absmax[cnt] - dev->absmin[cnt])) {
	232	printk(KERN_DEBUG
	233	"%s: absflat[%02x] out of range: %d "
	234	"(min:%d/max:%d)\n",
	235	UINPUT_NAME, cnt, dev->absflat[cnt],
	236	dev->absmin[cnt], dev->absmax[cnt]);
	237	retval = -EINVAL;
	238	break;
	239	}
	240	}
	241	return retval;
	242	}
	243
29506415 DT	244	static int uinput_allocate_device(struct uinput_device *udev)
	245	{
	246	udev->dev = input_allocate_device();
	247	if (!udev->dev)
	248	return -ENOMEM;
	249
	250	udev->dev->event = uinput_dev_event;
	251	udev->dev->upload_effect = uinput_dev_upload_effect;
	252	udev->dev->erase_effect = uinput_dev_erase_effect;
	253	udev->dev->private = udev;
	254
	255	return 0;
	256	}
	257
	258	static int uinput_setup_device(struct uinput_device udev, const char __user buffer, size_t count)
1da177e4 LT	259	{
	260	struct uinput_user_dev *user_dev;
	261	struct input_dev *dev;
5b6271bd	262	char *name;
152c12f5 DT	263	int size;
152c12f5 DT	264	int retval;
1da177e4	265
29506415 DT	266	if (count != sizeof(struct uinput_user_dev))
	267	return -EINVAL;
	268
	269	if (!udev->dev) {
	270	retval = uinput_allocate_device(udev);
	271	if (retval)
	272	return retval;
	273	}
1da177e4	274
1da177e4 LT	275	dev = udev->dev;
1da177e4 LT	276
152c12f5	277	user_dev = kmalloc(sizeof(struct uinput_user_dev), GFP_KERNEL);
29506415 DT	278	if (!user_dev)
29506415 DT	279	return -ENOMEM;
1da177e4 LT	280
	281	if (copy_from_user(user_dev, buffer, sizeof(struct uinput_user_dev))) {
	282	retval = -EFAULT;
	283	goto exit;
	284	}
	285
1da177e4	286	size = strnlen(user_dev->name, UINPUT_MAX_NAME_SIZE) + 1;
29506415 DT	287	if (!size) {
	288	retval = -EINVAL;
	289	goto exit;
	290	}
	291
	292	kfree(dev->name);
5b6271bd DT	293	dev->name = name = kmalloc(size, GFP_KERNEL);
5b6271bd DT	294	if (!name) {
1da177e4 LT	295	retval = -ENOMEM;
	296	goto exit;
	297	}
5b6271bd	298	strlcpy(name, user_dev->name, size);
1da177e4	299
1da177e4 LT	300	dev->id.bustype = user_dev->id.bustype;
	301	dev->id.vendor = user_dev->id.vendor;
	302	dev->id.product = user_dev->id.product;
	303	dev->id.version = user_dev->id.version;
	304	dev->ff_effects_max = user_dev->ff_effects_max;
	305
	306	size = sizeof(int) * (ABS_MAX + 1);
	307	memcpy(dev->absmax, user_dev->absmax, size);
	308	memcpy(dev->absmin, user_dev->absmin, size);
	309	memcpy(dev->absfuzz, user_dev->absfuzz, size);
	310	memcpy(dev->absflat, user_dev->absflat, size);
	311
	312	/* check if absmin/absmax/absfuzz/absflat are filled as
	313	* told in Documentation/input/input-programming.txt */
	314	if (test_bit(EV_ABS, dev->evbit)) {
29506415 DT	315	retval = uinput_validate_absbits(dev);
	316	if (retval < 0)
	317	goto exit;
1da177e4 LT	318	}
1da177e4 LT	319
29506415 DT	320	udev->state = UIST_SETUP_COMPLETE;
	321	retval = count;
	322
	323	exit:
1da177e4 LT	324	kfree(user_dev);
	325	return retval;
	326	}
	327
29506415 DT	328	static inline ssize_t uinput_inject_event(struct uinput_device udev, const char __user buffer, size_t count)
	329	{
	330	struct input_event ev;
	331
	332	if (count != sizeof(struct input_event))
	333	return -EINVAL;
	334
	335	if (copy_from_user(&ev, buffer, sizeof(struct input_event)))
	336	return -EFAULT;
	337
	338	input_event(udev->dev, ev.type, ev.code, ev.value);
	339
	340	return sizeof(struct input_event);
	341	}
	342
1da177e4 LT	343	static ssize_t uinput_write(struct file file, const char __user buffer, size_t count, loff_t *ppos)
	344	{
	345	struct uinput_device *udev = file->private_data;
29506415	346	int retval;
1da177e4	347
29506415 DT	348	retval = down_interruptible(&udev->sem);
	349	if (retval)
	350	return retval;
	351
	352	retval = udev->state == UIST_CREATED ?
	353	uinput_inject_event(udev, buffer, count) :
	354	uinput_setup_device(udev, buffer, count);
1da177e4	355
29506415	356	up(&udev->sem);
1da177e4	357
29506415	358	return retval;
1da177e4 LT	359	}
	360
	361	static ssize_t uinput_read(struct file file, char __user buffer, size_t count, loff_t *ppos)
	362	{
	363	struct uinput_device *udev = file->private_data;
	364	int retval = 0;
	365
29506415	366	if (udev->state != UIST_CREATED)
1da177e4 LT	367	return -ENODEV;
1da177e4 LT	368
152c12f5	369	if (udev->head == udev->tail && (file->f_flags & O_NONBLOCK))
1da177e4 LT	370	return -EAGAIN;
	371
	372	retval = wait_event_interruptible(udev->waitq,
29506415	373	udev->head != udev->tail \|\| udev->state != UIST_CREATED);
1da177e4 LT	374	if (retval)
	375	return retval;
	376
29506415 DT	377	retval = down_interruptible(&udev->sem);
	378	if (retval)
	379	return retval;
	380
	381	if (udev->state != UIST_CREATED) {
	382	retval = -ENODEV;
	383	goto out;
	384	}
1da177e4	385
29506415 DT	386	while (udev->head != udev->tail && retval + sizeof(struct input_event) <= count) {
	387	if (copy_to_user(buffer + retval, &udev->buff[udev->tail], sizeof(struct input_event))) {
	388	retval = -EFAULT;
	389	goto out;
	390	}
1da177e4 LT	391	udev->tail = (udev->tail + 1) % UINPUT_BUFFER_SIZE;
	392	retval += sizeof(struct input_event);
	393	}
	394
29506415 DT	395	out:
	396	up(&udev->sem);
	397
1da177e4 LT	398	return retval;
	399	}
	400
	401	static unsigned int uinput_poll(struct file file, poll_table wait)
	402	{
	403	struct uinput_device *udev = file->private_data;
	404
	405	poll_wait(file, &udev->waitq, wait);
	406
	407	if (udev->head != udev->tail)
	408	return POLLIN \| POLLRDNORM;
	409
	410	return 0;
	411	}
	412
29506415	413	static int uinput_release(struct inode inode, struct file file)
1da177e4	414	{
29506415	415	struct uinput_device *udev = file->private_data;
1da177e4	416
29506415	417	uinput_destroy_device(udev);
1da177e4 LT	418	kfree(udev);
	419
	420	return 0;
	421	}
	422
29506415 DT	423	#define uinput_set_bit(_arg, _bit, _max) \
	424	({ \
	425	int __ret = 0; \
	426	if (udev->state == UIST_CREATED) \
	427	__ret = -EINVAL; \
	428	else if ((_arg) > (_max)) \
	429	__ret = -EINVAL; \
	430	else set_bit((_arg), udev->dev->_bit); \
	431	__ret; \
	432	})
	433
	434	static long uinput_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
1da177e4	435	{
29506415	436	int retval;
1da177e4 LT	437	struct uinput_device *udev;
	438	void __user p = (void __user )arg;
	439	struct uinput_ff_upload ff_up;
	440	struct uinput_ff_erase ff_erase;
	441	struct uinput_request *req;
	442	int length;
5b6271bd	443	char *phys;
1da177e4 LT	444
	445	udev = file->private_data;
	446
29506415 DT	447	retval = down_interruptible(&udev->sem);
	448	if (retval)
	449	return retval;
	450
	451	if (!udev->dev) {
	452	retval = uinput_allocate_device(udev);
	453	if (retval)
	454	goto out;
1da177e4 LT	455	}
	456
	457	switch (cmd) {
	458	case UI_DEV_CREATE:
	459	retval = uinput_create_device(udev);
	460	break;
	461
	462	case UI_DEV_DESTROY:
29506415	463	uinput_destroy_device(udev);
1da177e4 LT	464	break;
	465
	466	case UI_SET_EVBIT:
29506415	467	retval = uinput_set_bit(arg, evbit, EV_MAX);
1da177e4 LT	468	break;
	469
	470	case UI_SET_KEYBIT:
29506415	471	retval = uinput_set_bit(arg, keybit, KEY_MAX);
1da177e4 LT	472	break;
	473
	474	case UI_SET_RELBIT:
29506415	475	retval = uinput_set_bit(arg, relbit, REL_MAX);
1da177e4 LT	476	break;
	477
	478	case UI_SET_ABSBIT:
29506415	479	retval = uinput_set_bit(arg, absbit, ABS_MAX);
1da177e4 LT	480	break;
	481
	482	case UI_SET_MSCBIT:
29506415	483	retval = uinput_set_bit(arg, mscbit, MSC_MAX);
1da177e4 LT	484	break;
	485
	486	case UI_SET_LEDBIT:
29506415	487	retval = uinput_set_bit(arg, ledbit, LED_MAX);
1da177e4 LT	488	break;
	489
	490	case UI_SET_SNDBIT:
29506415	491	retval = uinput_set_bit(arg, sndbit, SND_MAX);
1da177e4 LT	492	break;
	493
	494	case UI_SET_FFBIT:
29506415	495	retval = uinput_set_bit(arg, ffbit, FF_MAX);
1da177e4 LT	496	break;
	497
	498	case UI_SET_PHYS:
29506415 DT	499	if (udev->state == UIST_CREATED) {
	500	retval = -EINVAL;
	501	goto out;
	502	}
1da177e4 LT	503	length = strnlen_user(p, 1024);
	504	if (length <= 0) {
	505	retval = -EFAULT;
	506	break;
	507	}
5b6271bd DT	508	kfree(udev->dev->phys);
	509	udev->dev->phys = phys = kmalloc(length, GFP_KERNEL);
	510	if (!phys) {
1da177e4 LT	511	retval = -ENOMEM;
	512	break;
	513	}
5b6271bd	514	if (copy_from_user(phys, p, length)) {
1da177e4	515	udev->dev->phys = NULL;
5b6271bd DT	516	kfree(phys);
5b6271bd DT	517	retval = -EFAULT;
1da177e4 LT	518	break;
1da177e4 LT	519	}
5b6271bd	520	phys[length - 1] = '\0';
1da177e4 LT	521	break;
	522
	523	case UI_BEGIN_FF_UPLOAD:
	524	if (copy_from_user(&ff_up, p, sizeof(ff_up))) {
	525	retval = -EFAULT;
	526	break;
	527	}
	528	req = uinput_request_find(udev, ff_up.request_id);
152c12f5	529	if (!(req && req->code == UI_FF_UPLOAD && req->u.effect)) {
1da177e4 LT	530	retval = -EINVAL;
	531	break;
	532	}
	533	ff_up.retval = 0;
	534	memcpy(&ff_up.effect, req->u.effect, sizeof(struct ff_effect));
	535	if (copy_to_user(p, &ff_up, sizeof(ff_up))) {
	536	retval = -EFAULT;
	537	break;
	538	}
	539	break;
	540
	541	case UI_BEGIN_FF_ERASE:
	542	if (copy_from_user(&ff_erase, p, sizeof(ff_erase))) {
	543	retval = -EFAULT;
	544	break;
	545	}
	546	req = uinput_request_find(udev, ff_erase.request_id);
152c12f5	547	if (!(req && req->code == UI_FF_ERASE)) {
1da177e4 LT	548	retval = -EINVAL;
	549	break;
	550	}
	551	ff_erase.retval = 0;
	552	ff_erase.effect_id = req->u.effect_id;
	553	if (copy_to_user(p, &ff_erase, sizeof(ff_erase))) {
	554	retval = -EFAULT;
	555	break;
	556	}
	557	break;
	558
	559	case UI_END_FF_UPLOAD:
	560	if (copy_from_user(&ff_up, p, sizeof(ff_up))) {
	561	retval = -EFAULT;
	562	break;
	563	}
	564	req = uinput_request_find(udev, ff_up.request_id);
152c12f5	565	if (!(req && req->code == UI_FF_UPLOAD && req->u.effect)) {
1da177e4 LT	566	retval = -EINVAL;
	567	break;
	568	}
	569	req->retval = ff_up.retval;
	570	memcpy(req->u.effect, &ff_up.effect, sizeof(struct ff_effect));
0048e603	571	uinput_request_done(udev, req);
1da177e4 LT	572	break;
	573
	574	case UI_END_FF_ERASE:
	575	if (copy_from_user(&ff_erase, p, sizeof(ff_erase))) {
	576	retval = -EFAULT;
	577	break;
	578	}
	579	req = uinput_request_find(udev, ff_erase.request_id);
152c12f5	580	if (!(req && req->code == UI_FF_ERASE)) {
1da177e4 LT	581	retval = -EINVAL;
	582	break;
	583	}
	584	req->retval = ff_erase.retval;
0048e603	585	uinput_request_done(udev, req);
1da177e4 LT	586	break;
	587
	588	default:
	589	retval = -EINVAL;
	590	}
29506415 DT	591
	592	out:
	593	up(&udev->sem);
1da177e4 LT	594	return retval;
	595	}
	596
	597	static struct file_operations uinput_fops = {
29506415 DT	598	.owner = THIS_MODULE,
	599	.open = uinput_open,
	600	.release = uinput_release,
	601	.read = uinput_read,
	602	.write = uinput_write,
	603	.poll = uinput_poll,
	604	.unlocked_ioctl = uinput_ioctl,
1da177e4 LT	605	};
	606
	607	static struct miscdevice uinput_misc = {
29506415 DT	608	.fops = &uinput_fops,
	609	.minor = UINPUT_MINOR,
	610	.name = UINPUT_NAME,
1da177e4 LT	611	};
	612
	613	static int __init uinput_init(void)
	614	{
	615	return misc_register(&uinput_misc);
	616	}
	617
	618	static void __exit uinput_exit(void)
	619	{
	620	misc_deregister(&uinput_misc);
	621	}
	622
	623	MODULE_AUTHOR("Aristeu Sergio Rozanski Filho");
	624	MODULE_DESCRIPTION("User level driver support for input subsystem");
	625	MODULE_LICENSE("GPL");
	626
	627	module_init(uinput_init);
	628	module_exit(uinput_exit);
	629