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