Loading...
1/*
2 * Event char devices, giving access to raw input device events.
3 *
4 * Copyright (c) 1999-2002 Vojtech Pavlik
5 *
6 * This program is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License version 2 as published by
8 * the Free Software Foundation.
9 */
10
11#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
12
13#define EVDEV_MINOR_BASE 64
14#define EVDEV_MINORS 32
15#define EVDEV_MIN_BUFFER_SIZE 64U
16#define EVDEV_BUF_PACKETS 8
17
18#include <linux/poll.h>
19#include <linux/sched.h>
20#include <linux/slab.h>
21#include <linux/vmalloc.h>
22#include <linux/mm.h>
23#include <linux/module.h>
24#include <linux/init.h>
25#include <linux/input/mt.h>
26#include <linux/major.h>
27#include <linux/device.h>
28#include <linux/cdev.h>
29#include "input-compat.h"
30
31struct evdev {
32 int open;
33 struct input_handle handle;
34 wait_queue_head_t wait;
35 struct evdev_client __rcu *grab;
36 struct list_head client_list;
37 spinlock_t client_lock; /* protects client_list */
38 struct mutex mutex;
39 struct device dev;
40 struct cdev cdev;
41 bool exist;
42};
43
44struct evdev_client {
45 unsigned int head;
46 unsigned int tail;
47 unsigned int packet_head; /* [future] position of the first element of next packet */
48 spinlock_t buffer_lock; /* protects access to buffer, head and tail */
49 struct fasync_struct *fasync;
50 struct evdev *evdev;
51 struct list_head node;
52 int clkid;
53 bool revoked;
54 unsigned int bufsize;
55 struct input_event buffer[];
56};
57
58/* flush queued events of type @type, caller must hold client->buffer_lock */
59static void __evdev_flush_queue(struct evdev_client *client, unsigned int type)
60{
61 unsigned int i, head, num;
62 unsigned int mask = client->bufsize - 1;
63 bool is_report;
64 struct input_event *ev;
65
66 BUG_ON(type == EV_SYN);
67
68 head = client->tail;
69 client->packet_head = client->tail;
70
71 /* init to 1 so a leading SYN_REPORT will not be dropped */
72 num = 1;
73
74 for (i = client->tail; i != client->head; i = (i + 1) & mask) {
75 ev = &client->buffer[i];
76 is_report = ev->type == EV_SYN && ev->code == SYN_REPORT;
77
78 if (ev->type == type) {
79 /* drop matched entry */
80 continue;
81 } else if (is_report && !num) {
82 /* drop empty SYN_REPORT groups */
83 continue;
84 } else if (head != i) {
85 /* move entry to fill the gap */
86 client->buffer[head].time = ev->time;
87 client->buffer[head].type = ev->type;
88 client->buffer[head].code = ev->code;
89 client->buffer[head].value = ev->value;
90 }
91
92 num++;
93 head = (head + 1) & mask;
94
95 if (is_report) {
96 num = 0;
97 client->packet_head = head;
98 }
99 }
100
101 client->head = head;
102}
103
104/* queue SYN_DROPPED event */
105static void evdev_queue_syn_dropped(struct evdev_client *client)
106{
107 unsigned long flags;
108 struct input_event ev;
109 ktime_t time;
110
111 time = ktime_get();
112 if (client->clkid != CLOCK_MONOTONIC)
113 time = ktime_sub(time, ktime_get_monotonic_offset());
114
115 ev.time = ktime_to_timeval(time);
116 ev.type = EV_SYN;
117 ev.code = SYN_DROPPED;
118 ev.value = 0;
119
120 spin_lock_irqsave(&client->buffer_lock, flags);
121
122 client->buffer[client->head++] = ev;
123 client->head &= client->bufsize - 1;
124
125 if (unlikely(client->head == client->tail)) {
126 /* drop queue but keep our SYN_DROPPED event */
127 client->tail = (client->head - 1) & (client->bufsize - 1);
128 client->packet_head = client->tail;
129 }
130
131 spin_unlock_irqrestore(&client->buffer_lock, flags);
132}
133
134static void __pass_event(struct evdev_client *client,
135 const struct input_event *event)
136{
137 client->buffer[client->head++] = *event;
138 client->head &= client->bufsize - 1;
139
140 if (unlikely(client->head == client->tail)) {
141 /*
142 * This effectively "drops" all unconsumed events, leaving
143 * EV_SYN/SYN_DROPPED plus the newest event in the queue.
144 */
145 client->tail = (client->head - 2) & (client->bufsize - 1);
146
147 client->buffer[client->tail].time = event->time;
148 client->buffer[client->tail].type = EV_SYN;
149 client->buffer[client->tail].code = SYN_DROPPED;
150 client->buffer[client->tail].value = 0;
151
152 client->packet_head = client->tail;
153 }
154
155 if (event->type == EV_SYN && event->code == SYN_REPORT) {
156 client->packet_head = client->head;
157 kill_fasync(&client->fasync, SIGIO, POLL_IN);
158 }
159}
160
161static void evdev_pass_values(struct evdev_client *client,
162 const struct input_value *vals, unsigned int count,
163 ktime_t mono, ktime_t real)
164{
165 struct evdev *evdev = client->evdev;
166 const struct input_value *v;
167 struct input_event event;
168 bool wakeup = false;
169
170 if (client->revoked)
171 return;
172
173 event.time = ktime_to_timeval(client->clkid == CLOCK_MONOTONIC ?
174 mono : real);
175
176 /* Interrupts are disabled, just acquire the lock. */
177 spin_lock(&client->buffer_lock);
178
179 for (v = vals; v != vals + count; v++) {
180 event.type = v->type;
181 event.code = v->code;
182 event.value = v->value;
183 __pass_event(client, &event);
184 if (v->type == EV_SYN && v->code == SYN_REPORT)
185 wakeup = true;
186 }
187
188 spin_unlock(&client->buffer_lock);
189
190 if (wakeup)
191 wake_up_interruptible(&evdev->wait);
192}
193
194/*
195 * Pass incoming events to all connected clients.
196 */
197static void evdev_events(struct input_handle *handle,
198 const struct input_value *vals, unsigned int count)
199{
200 struct evdev *evdev = handle->private;
201 struct evdev_client *client;
202 ktime_t time_mono, time_real;
203
204 time_mono = ktime_get();
205 time_real = ktime_sub(time_mono, ktime_get_monotonic_offset());
206
207 rcu_read_lock();
208
209 client = rcu_dereference(evdev->grab);
210
211 if (client)
212 evdev_pass_values(client, vals, count, time_mono, time_real);
213 else
214 list_for_each_entry_rcu(client, &evdev->client_list, node)
215 evdev_pass_values(client, vals, count,
216 time_mono, time_real);
217
218 rcu_read_unlock();
219}
220
221/*
222 * Pass incoming event to all connected clients.
223 */
224static void evdev_event(struct input_handle *handle,
225 unsigned int type, unsigned int code, int value)
226{
227 struct input_value vals[] = { { type, code, value } };
228
229 evdev_events(handle, vals, 1);
230}
231
232static int evdev_fasync(int fd, struct file *file, int on)
233{
234 struct evdev_client *client = file->private_data;
235
236 return fasync_helper(fd, file, on, &client->fasync);
237}
238
239static int evdev_flush(struct file *file, fl_owner_t id)
240{
241 struct evdev_client *client = file->private_data;
242 struct evdev *evdev = client->evdev;
243 int retval;
244
245 retval = mutex_lock_interruptible(&evdev->mutex);
246 if (retval)
247 return retval;
248
249 if (!evdev->exist || client->revoked)
250 retval = -ENODEV;
251 else
252 retval = input_flush_device(&evdev->handle, file);
253
254 mutex_unlock(&evdev->mutex);
255 return retval;
256}
257
258static void evdev_free(struct device *dev)
259{
260 struct evdev *evdev = container_of(dev, struct evdev, dev);
261
262 input_put_device(evdev->handle.dev);
263 kfree(evdev);
264}
265
266/*
267 * Grabs an event device (along with underlying input device).
268 * This function is called with evdev->mutex taken.
269 */
270static int evdev_grab(struct evdev *evdev, struct evdev_client *client)
271{
272 int error;
273
274 if (evdev->grab)
275 return -EBUSY;
276
277 error = input_grab_device(&evdev->handle);
278 if (error)
279 return error;
280
281 rcu_assign_pointer(evdev->grab, client);
282
283 return 0;
284}
285
286static int evdev_ungrab(struct evdev *evdev, struct evdev_client *client)
287{
288 struct evdev_client *grab = rcu_dereference_protected(evdev->grab,
289 lockdep_is_held(&evdev->mutex));
290
291 if (grab != client)
292 return -EINVAL;
293
294 rcu_assign_pointer(evdev->grab, NULL);
295 synchronize_rcu();
296 input_release_device(&evdev->handle);
297
298 return 0;
299}
300
301static void evdev_attach_client(struct evdev *evdev,
302 struct evdev_client *client)
303{
304 spin_lock(&evdev->client_lock);
305 list_add_tail_rcu(&client->node, &evdev->client_list);
306 spin_unlock(&evdev->client_lock);
307}
308
309static void evdev_detach_client(struct evdev *evdev,
310 struct evdev_client *client)
311{
312 spin_lock(&evdev->client_lock);
313 list_del_rcu(&client->node);
314 spin_unlock(&evdev->client_lock);
315 synchronize_rcu();
316}
317
318static int evdev_open_device(struct evdev *evdev)
319{
320 int retval;
321
322 retval = mutex_lock_interruptible(&evdev->mutex);
323 if (retval)
324 return retval;
325
326 if (!evdev->exist)
327 retval = -ENODEV;
328 else if (!evdev->open++) {
329 retval = input_open_device(&evdev->handle);
330 if (retval)
331 evdev->open--;
332 }
333
334 mutex_unlock(&evdev->mutex);
335 return retval;
336}
337
338static void evdev_close_device(struct evdev *evdev)
339{
340 mutex_lock(&evdev->mutex);
341
342 if (evdev->exist && !--evdev->open)
343 input_close_device(&evdev->handle);
344
345 mutex_unlock(&evdev->mutex);
346}
347
348/*
349 * Wake up users waiting for IO so they can disconnect from
350 * dead device.
351 */
352static void evdev_hangup(struct evdev *evdev)
353{
354 struct evdev_client *client;
355
356 spin_lock(&evdev->client_lock);
357 list_for_each_entry(client, &evdev->client_list, node)
358 kill_fasync(&client->fasync, SIGIO, POLL_HUP);
359 spin_unlock(&evdev->client_lock);
360
361 wake_up_interruptible(&evdev->wait);
362}
363
364static int evdev_release(struct inode *inode, struct file *file)
365{
366 struct evdev_client *client = file->private_data;
367 struct evdev *evdev = client->evdev;
368
369 mutex_lock(&evdev->mutex);
370 evdev_ungrab(evdev, client);
371 mutex_unlock(&evdev->mutex);
372
373 evdev_detach_client(evdev, client);
374
375 if (is_vmalloc_addr(client))
376 vfree(client);
377 else
378 kfree(client);
379
380 evdev_close_device(evdev);
381
382 return 0;
383}
384
385static unsigned int evdev_compute_buffer_size(struct input_dev *dev)
386{
387 unsigned int n_events =
388 max(dev->hint_events_per_packet * EVDEV_BUF_PACKETS,
389 EVDEV_MIN_BUFFER_SIZE);
390
391 return roundup_pow_of_two(n_events);
392}
393
394static int evdev_open(struct inode *inode, struct file *file)
395{
396 struct evdev *evdev = container_of(inode->i_cdev, struct evdev, cdev);
397 unsigned int bufsize = evdev_compute_buffer_size(evdev->handle.dev);
398 unsigned int size = sizeof(struct evdev_client) +
399 bufsize * sizeof(struct input_event);
400 struct evdev_client *client;
401 int error;
402
403 client = kzalloc(size, GFP_KERNEL | __GFP_NOWARN);
404 if (!client)
405 client = vzalloc(size);
406 if (!client)
407 return -ENOMEM;
408
409 client->bufsize = bufsize;
410 spin_lock_init(&client->buffer_lock);
411 client->evdev = evdev;
412 evdev_attach_client(evdev, client);
413
414 error = evdev_open_device(evdev);
415 if (error)
416 goto err_free_client;
417
418 file->private_data = client;
419 nonseekable_open(inode, file);
420
421 return 0;
422
423 err_free_client:
424 evdev_detach_client(evdev, client);
425 kfree(client);
426 return error;
427}
428
429static ssize_t evdev_write(struct file *file, const char __user *buffer,
430 size_t count, loff_t *ppos)
431{
432 struct evdev_client *client = file->private_data;
433 struct evdev *evdev = client->evdev;
434 struct input_event event;
435 int retval = 0;
436
437 if (count != 0 && count < input_event_size())
438 return -EINVAL;
439
440 retval = mutex_lock_interruptible(&evdev->mutex);
441 if (retval)
442 return retval;
443
444 if (!evdev->exist || client->revoked) {
445 retval = -ENODEV;
446 goto out;
447 }
448
449 while (retval + input_event_size() <= count) {
450
451 if (input_event_from_user(buffer + retval, &event)) {
452 retval = -EFAULT;
453 goto out;
454 }
455 retval += input_event_size();
456
457 input_inject_event(&evdev->handle,
458 event.type, event.code, event.value);
459 }
460
461 out:
462 mutex_unlock(&evdev->mutex);
463 return retval;
464}
465
466static int evdev_fetch_next_event(struct evdev_client *client,
467 struct input_event *event)
468{
469 int have_event;
470
471 spin_lock_irq(&client->buffer_lock);
472
473 have_event = client->packet_head != client->tail;
474 if (have_event) {
475 *event = client->buffer[client->tail++];
476 client->tail &= client->bufsize - 1;
477 }
478
479 spin_unlock_irq(&client->buffer_lock);
480
481 return have_event;
482}
483
484static ssize_t evdev_read(struct file *file, char __user *buffer,
485 size_t count, loff_t *ppos)
486{
487 struct evdev_client *client = file->private_data;
488 struct evdev *evdev = client->evdev;
489 struct input_event event;
490 size_t read = 0;
491 int error;
492
493 if (count != 0 && count < input_event_size())
494 return -EINVAL;
495
496 for (;;) {
497 if (!evdev->exist || client->revoked)
498 return -ENODEV;
499
500 if (client->packet_head == client->tail &&
501 (file->f_flags & O_NONBLOCK))
502 return -EAGAIN;
503
504 /*
505 * count == 0 is special - no IO is done but we check
506 * for error conditions (see above).
507 */
508 if (count == 0)
509 break;
510
511 while (read + input_event_size() <= count &&
512 evdev_fetch_next_event(client, &event)) {
513
514 if (input_event_to_user(buffer + read, &event))
515 return -EFAULT;
516
517 read += input_event_size();
518 }
519
520 if (read)
521 break;
522
523 if (!(file->f_flags & O_NONBLOCK)) {
524 error = wait_event_interruptible(evdev->wait,
525 client->packet_head != client->tail ||
526 !evdev->exist || client->revoked);
527 if (error)
528 return error;
529 }
530 }
531
532 return read;
533}
534
535/* No kernel lock - fine */
536static unsigned int evdev_poll(struct file *file, poll_table *wait)
537{
538 struct evdev_client *client = file->private_data;
539 struct evdev *evdev = client->evdev;
540 unsigned int mask;
541
542 poll_wait(file, &evdev->wait, wait);
543
544 if (evdev->exist && !client->revoked)
545 mask = POLLOUT | POLLWRNORM;
546 else
547 mask = POLLHUP | POLLERR;
548
549 if (client->packet_head != client->tail)
550 mask |= POLLIN | POLLRDNORM;
551
552 return mask;
553}
554
555#ifdef CONFIG_COMPAT
556
557#define BITS_PER_LONG_COMPAT (sizeof(compat_long_t) * 8)
558#define BITS_TO_LONGS_COMPAT(x) ((((x) - 1) / BITS_PER_LONG_COMPAT) + 1)
559
560#ifdef __BIG_ENDIAN
561static int bits_to_user(unsigned long *bits, unsigned int maxbit,
562 unsigned int maxlen, void __user *p, int compat)
563{
564 int len, i;
565
566 if (compat) {
567 len = BITS_TO_LONGS_COMPAT(maxbit) * sizeof(compat_long_t);
568 if (len > maxlen)
569 len = maxlen;
570
571 for (i = 0; i < len / sizeof(compat_long_t); i++)
572 if (copy_to_user((compat_long_t __user *) p + i,
573 (compat_long_t *) bits +
574 i + 1 - ((i % 2) << 1),
575 sizeof(compat_long_t)))
576 return -EFAULT;
577 } else {
578 len = BITS_TO_LONGS(maxbit) * sizeof(long);
579 if (len > maxlen)
580 len = maxlen;
581
582 if (copy_to_user(p, bits, len))
583 return -EFAULT;
584 }
585
586 return len;
587}
588#else
589static int bits_to_user(unsigned long *bits, unsigned int maxbit,
590 unsigned int maxlen, void __user *p, int compat)
591{
592 int len = compat ?
593 BITS_TO_LONGS_COMPAT(maxbit) * sizeof(compat_long_t) :
594 BITS_TO_LONGS(maxbit) * sizeof(long);
595
596 if (len > maxlen)
597 len = maxlen;
598
599 return copy_to_user(p, bits, len) ? -EFAULT : len;
600}
601#endif /* __BIG_ENDIAN */
602
603#else
604
605static int bits_to_user(unsigned long *bits, unsigned int maxbit,
606 unsigned int maxlen, void __user *p, int compat)
607{
608 int len = BITS_TO_LONGS(maxbit) * sizeof(long);
609
610 if (len > maxlen)
611 len = maxlen;
612
613 return copy_to_user(p, bits, len) ? -EFAULT : len;
614}
615
616#endif /* CONFIG_COMPAT */
617
618static int str_to_user(const char *str, unsigned int maxlen, void __user *p)
619{
620 int len;
621
622 if (!str)
623 return -ENOENT;
624
625 len = strlen(str) + 1;
626 if (len > maxlen)
627 len = maxlen;
628
629 return copy_to_user(p, str, len) ? -EFAULT : len;
630}
631
632#define OLD_KEY_MAX 0x1ff
633static int handle_eviocgbit(struct input_dev *dev,
634 unsigned int type, unsigned int size,
635 void __user *p, int compat_mode)
636{
637 static unsigned long keymax_warn_time;
638 unsigned long *bits;
639 int len;
640
641 switch (type) {
642
643 case 0: bits = dev->evbit; len = EV_MAX; break;
644 case EV_KEY: bits = dev->keybit; len = KEY_MAX; break;
645 case EV_REL: bits = dev->relbit; len = REL_MAX; break;
646 case EV_ABS: bits = dev->absbit; len = ABS_MAX; break;
647 case EV_MSC: bits = dev->mscbit; len = MSC_MAX; break;
648 case EV_LED: bits = dev->ledbit; len = LED_MAX; break;
649 case EV_SND: bits = dev->sndbit; len = SND_MAX; break;
650 case EV_FF: bits = dev->ffbit; len = FF_MAX; break;
651 case EV_SW: bits = dev->swbit; len = SW_MAX; break;
652 default: return -EINVAL;
653 }
654
655 /*
656 * Work around bugs in userspace programs that like to do
657 * EVIOCGBIT(EV_KEY, KEY_MAX) and not realize that 'len'
658 * should be in bytes, not in bits.
659 */
660 if (type == EV_KEY && size == OLD_KEY_MAX) {
661 len = OLD_KEY_MAX;
662 if (printk_timed_ratelimit(&keymax_warn_time, 10 * 1000))
663 pr_warning("(EVIOCGBIT): Suspicious buffer size %u, "
664 "limiting output to %zu bytes. See "
665 "http://userweb.kernel.org/~dtor/eviocgbit-bug.html\n",
666 OLD_KEY_MAX,
667 BITS_TO_LONGS(OLD_KEY_MAX) * sizeof(long));
668 }
669
670 return bits_to_user(bits, len, size, p, compat_mode);
671}
672#undef OLD_KEY_MAX
673
674static int evdev_handle_get_keycode(struct input_dev *dev, void __user *p)
675{
676 struct input_keymap_entry ke = {
677 .len = sizeof(unsigned int),
678 .flags = 0,
679 };
680 int __user *ip = (int __user *)p;
681 int error;
682
683 /* legacy case */
684 if (copy_from_user(ke.scancode, p, sizeof(unsigned int)))
685 return -EFAULT;
686
687 error = input_get_keycode(dev, &ke);
688 if (error)
689 return error;
690
691 if (put_user(ke.keycode, ip + 1))
692 return -EFAULT;
693
694 return 0;
695}
696
697static int evdev_handle_get_keycode_v2(struct input_dev *dev, void __user *p)
698{
699 struct input_keymap_entry ke;
700 int error;
701
702 if (copy_from_user(&ke, p, sizeof(ke)))
703 return -EFAULT;
704
705 error = input_get_keycode(dev, &ke);
706 if (error)
707 return error;
708
709 if (copy_to_user(p, &ke, sizeof(ke)))
710 return -EFAULT;
711
712 return 0;
713}
714
715static int evdev_handle_set_keycode(struct input_dev *dev, void __user *p)
716{
717 struct input_keymap_entry ke = {
718 .len = sizeof(unsigned int),
719 .flags = 0,
720 };
721 int __user *ip = (int __user *)p;
722
723 if (copy_from_user(ke.scancode, p, sizeof(unsigned int)))
724 return -EFAULT;
725
726 if (get_user(ke.keycode, ip + 1))
727 return -EFAULT;
728
729 return input_set_keycode(dev, &ke);
730}
731
732static int evdev_handle_set_keycode_v2(struct input_dev *dev, void __user *p)
733{
734 struct input_keymap_entry ke;
735
736 if (copy_from_user(&ke, p, sizeof(ke)))
737 return -EFAULT;
738
739 if (ke.len > sizeof(ke.scancode))
740 return -EINVAL;
741
742 return input_set_keycode(dev, &ke);
743}
744
745/*
746 * If we transfer state to the user, we should flush all pending events
747 * of the same type from the client's queue. Otherwise, they might end up
748 * with duplicate events, which can screw up client's state tracking.
749 * If bits_to_user fails after flushing the queue, we queue a SYN_DROPPED
750 * event so user-space will notice missing events.
751 *
752 * LOCKING:
753 * We need to take event_lock before buffer_lock to avoid dead-locks. But we
754 * need the even_lock only to guarantee consistent state. We can safely release
755 * it while flushing the queue. This allows input-core to handle filters while
756 * we flush the queue.
757 */
758static int evdev_handle_get_val(struct evdev_client *client,
759 struct input_dev *dev, unsigned int type,
760 unsigned long *bits, unsigned int max,
761 unsigned int size, void __user *p, int compat)
762{
763 int ret;
764 unsigned long *mem;
765
766 mem = kmalloc(sizeof(unsigned long) * max, GFP_KERNEL);
767 if (!mem)
768 return -ENOMEM;
769
770 spin_lock_irq(&dev->event_lock);
771 spin_lock(&client->buffer_lock);
772
773 memcpy(mem, bits, sizeof(unsigned long) * max);
774
775 spin_unlock(&dev->event_lock);
776
777 __evdev_flush_queue(client, type);
778
779 spin_unlock_irq(&client->buffer_lock);
780
781 ret = bits_to_user(mem, max, size, p, compat);
782 if (ret < 0)
783 evdev_queue_syn_dropped(client);
784
785 kfree(mem);
786
787 return ret;
788}
789
790static int evdev_handle_mt_request(struct input_dev *dev,
791 unsigned int size,
792 int __user *ip)
793{
794 const struct input_mt *mt = dev->mt;
795 unsigned int code;
796 int max_slots;
797 int i;
798
799 if (get_user(code, &ip[0]))
800 return -EFAULT;
801 if (!mt || !input_is_mt_value(code))
802 return -EINVAL;
803
804 max_slots = (size - sizeof(__u32)) / sizeof(__s32);
805 for (i = 0; i < mt->num_slots && i < max_slots; i++) {
806 int value = input_mt_get_value(&mt->slots[i], code);
807 if (put_user(value, &ip[1 + i]))
808 return -EFAULT;
809 }
810
811 return 0;
812}
813
814static int evdev_revoke(struct evdev *evdev, struct evdev_client *client,
815 struct file *file)
816{
817 client->revoked = true;
818 evdev_ungrab(evdev, client);
819 input_flush_device(&evdev->handle, file);
820 wake_up_interruptible(&evdev->wait);
821
822 return 0;
823}
824
825static long evdev_do_ioctl(struct file *file, unsigned int cmd,
826 void __user *p, int compat_mode)
827{
828 struct evdev_client *client = file->private_data;
829 struct evdev *evdev = client->evdev;
830 struct input_dev *dev = evdev->handle.dev;
831 struct input_absinfo abs;
832 struct ff_effect effect;
833 int __user *ip = (int __user *)p;
834 unsigned int i, t, u, v;
835 unsigned int size;
836 int error;
837
838 /* First we check for fixed-length commands */
839 switch (cmd) {
840
841 case EVIOCGVERSION:
842 return put_user(EV_VERSION, ip);
843
844 case EVIOCGID:
845 if (copy_to_user(p, &dev->id, sizeof(struct input_id)))
846 return -EFAULT;
847 return 0;
848
849 case EVIOCGREP:
850 if (!test_bit(EV_REP, dev->evbit))
851 return -ENOSYS;
852 if (put_user(dev->rep[REP_DELAY], ip))
853 return -EFAULT;
854 if (put_user(dev->rep[REP_PERIOD], ip + 1))
855 return -EFAULT;
856 return 0;
857
858 case EVIOCSREP:
859 if (!test_bit(EV_REP, dev->evbit))
860 return -ENOSYS;
861 if (get_user(u, ip))
862 return -EFAULT;
863 if (get_user(v, ip + 1))
864 return -EFAULT;
865
866 input_inject_event(&evdev->handle, EV_REP, REP_DELAY, u);
867 input_inject_event(&evdev->handle, EV_REP, REP_PERIOD, v);
868
869 return 0;
870
871 case EVIOCRMFF:
872 return input_ff_erase(dev, (int)(unsigned long) p, file);
873
874 case EVIOCGEFFECTS:
875 i = test_bit(EV_FF, dev->evbit) ?
876 dev->ff->max_effects : 0;
877 if (put_user(i, ip))
878 return -EFAULT;
879 return 0;
880
881 case EVIOCGRAB:
882 if (p)
883 return evdev_grab(evdev, client);
884 else
885 return evdev_ungrab(evdev, client);
886
887 case EVIOCREVOKE:
888 if (p)
889 return -EINVAL;
890 else
891 return evdev_revoke(evdev, client, file);
892
893 case EVIOCSCLOCKID:
894 if (copy_from_user(&i, p, sizeof(unsigned int)))
895 return -EFAULT;
896 if (i != CLOCK_MONOTONIC && i != CLOCK_REALTIME)
897 return -EINVAL;
898 client->clkid = i;
899 return 0;
900
901 case EVIOCGKEYCODE:
902 return evdev_handle_get_keycode(dev, p);
903
904 case EVIOCSKEYCODE:
905 return evdev_handle_set_keycode(dev, p);
906
907 case EVIOCGKEYCODE_V2:
908 return evdev_handle_get_keycode_v2(dev, p);
909
910 case EVIOCSKEYCODE_V2:
911 return evdev_handle_set_keycode_v2(dev, p);
912 }
913
914 size = _IOC_SIZE(cmd);
915
916 /* Now check variable-length commands */
917#define EVIOC_MASK_SIZE(nr) ((nr) & ~(_IOC_SIZEMASK << _IOC_SIZESHIFT))
918 switch (EVIOC_MASK_SIZE(cmd)) {
919
920 case EVIOCGPROP(0):
921 return bits_to_user(dev->propbit, INPUT_PROP_MAX,
922 size, p, compat_mode);
923
924 case EVIOCGMTSLOTS(0):
925 return evdev_handle_mt_request(dev, size, ip);
926
927 case EVIOCGKEY(0):
928 return evdev_handle_get_val(client, dev, EV_KEY, dev->key,
929 KEY_MAX, size, p, compat_mode);
930
931 case EVIOCGLED(0):
932 return evdev_handle_get_val(client, dev, EV_LED, dev->led,
933 LED_MAX, size, p, compat_mode);
934
935 case EVIOCGSND(0):
936 return evdev_handle_get_val(client, dev, EV_SND, dev->snd,
937 SND_MAX, size, p, compat_mode);
938
939 case EVIOCGSW(0):
940 return evdev_handle_get_val(client, dev, EV_SW, dev->sw,
941 SW_MAX, size, p, compat_mode);
942
943 case EVIOCGNAME(0):
944 return str_to_user(dev->name, size, p);
945
946 case EVIOCGPHYS(0):
947 return str_to_user(dev->phys, size, p);
948
949 case EVIOCGUNIQ(0):
950 return str_to_user(dev->uniq, size, p);
951
952 case EVIOC_MASK_SIZE(EVIOCSFF):
953 if (input_ff_effect_from_user(p, size, &effect))
954 return -EFAULT;
955
956 error = input_ff_upload(dev, &effect, file);
957 if (error)
958 return error;
959
960 if (put_user(effect.id, &(((struct ff_effect __user *)p)->id)))
961 return -EFAULT;
962
963 return 0;
964 }
965
966 /* Multi-number variable-length handlers */
967 if (_IOC_TYPE(cmd) != 'E')
968 return -EINVAL;
969
970 if (_IOC_DIR(cmd) == _IOC_READ) {
971
972 if ((_IOC_NR(cmd) & ~EV_MAX) == _IOC_NR(EVIOCGBIT(0, 0)))
973 return handle_eviocgbit(dev,
974 _IOC_NR(cmd) & EV_MAX, size,
975 p, compat_mode);
976
977 if ((_IOC_NR(cmd) & ~ABS_MAX) == _IOC_NR(EVIOCGABS(0))) {
978
979 if (!dev->absinfo)
980 return -EINVAL;
981
982 t = _IOC_NR(cmd) & ABS_MAX;
983 abs = dev->absinfo[t];
984
985 if (copy_to_user(p, &abs, min_t(size_t,
986 size, sizeof(struct input_absinfo))))
987 return -EFAULT;
988
989 return 0;
990 }
991 }
992
993 if (_IOC_DIR(cmd) == _IOC_WRITE) {
994
995 if ((_IOC_NR(cmd) & ~ABS_MAX) == _IOC_NR(EVIOCSABS(0))) {
996
997 if (!dev->absinfo)
998 return -EINVAL;
999
1000 t = _IOC_NR(cmd) & ABS_MAX;
1001
1002 if (copy_from_user(&abs, p, min_t(size_t,
1003 size, sizeof(struct input_absinfo))))
1004 return -EFAULT;
1005
1006 if (size < sizeof(struct input_absinfo))
1007 abs.resolution = 0;
1008
1009 /* We can't change number of reserved MT slots */
1010 if (t == ABS_MT_SLOT)
1011 return -EINVAL;
1012
1013 /*
1014 * Take event lock to ensure that we are not
1015 * changing device parameters in the middle
1016 * of event.
1017 */
1018 spin_lock_irq(&dev->event_lock);
1019 dev->absinfo[t] = abs;
1020 spin_unlock_irq(&dev->event_lock);
1021
1022 return 0;
1023 }
1024 }
1025
1026 return -EINVAL;
1027}
1028
1029static long evdev_ioctl_handler(struct file *file, unsigned int cmd,
1030 void __user *p, int compat_mode)
1031{
1032 struct evdev_client *client = file->private_data;
1033 struct evdev *evdev = client->evdev;
1034 int retval;
1035
1036 retval = mutex_lock_interruptible(&evdev->mutex);
1037 if (retval)
1038 return retval;
1039
1040 if (!evdev->exist || client->revoked) {
1041 retval = -ENODEV;
1042 goto out;
1043 }
1044
1045 retval = evdev_do_ioctl(file, cmd, p, compat_mode);
1046
1047 out:
1048 mutex_unlock(&evdev->mutex);
1049 return retval;
1050}
1051
1052static long evdev_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
1053{
1054 return evdev_ioctl_handler(file, cmd, (void __user *)arg, 0);
1055}
1056
1057#ifdef CONFIG_COMPAT
1058static long evdev_ioctl_compat(struct file *file,
1059 unsigned int cmd, unsigned long arg)
1060{
1061 return evdev_ioctl_handler(file, cmd, compat_ptr(arg), 1);
1062}
1063#endif
1064
1065static const struct file_operations evdev_fops = {
1066 .owner = THIS_MODULE,
1067 .read = evdev_read,
1068 .write = evdev_write,
1069 .poll = evdev_poll,
1070 .open = evdev_open,
1071 .release = evdev_release,
1072 .unlocked_ioctl = evdev_ioctl,
1073#ifdef CONFIG_COMPAT
1074 .compat_ioctl = evdev_ioctl_compat,
1075#endif
1076 .fasync = evdev_fasync,
1077 .flush = evdev_flush,
1078 .llseek = no_llseek,
1079};
1080
1081/*
1082 * Mark device non-existent. This disables writes, ioctls and
1083 * prevents new users from opening the device. Already posted
1084 * blocking reads will stay, however new ones will fail.
1085 */
1086static void evdev_mark_dead(struct evdev *evdev)
1087{
1088 mutex_lock(&evdev->mutex);
1089 evdev->exist = false;
1090 mutex_unlock(&evdev->mutex);
1091}
1092
1093static void evdev_cleanup(struct evdev *evdev)
1094{
1095 struct input_handle *handle = &evdev->handle;
1096
1097 evdev_mark_dead(evdev);
1098 evdev_hangup(evdev);
1099
1100 cdev_del(&evdev->cdev);
1101
1102 /* evdev is marked dead so no one else accesses evdev->open */
1103 if (evdev->open) {
1104 input_flush_device(handle, NULL);
1105 input_close_device(handle);
1106 }
1107}
1108
1109/*
1110 * Create new evdev device. Note that input core serializes calls
1111 * to connect and disconnect.
1112 */
1113static int evdev_connect(struct input_handler *handler, struct input_dev *dev,
1114 const struct input_device_id *id)
1115{
1116 struct evdev *evdev;
1117 int minor;
1118 int dev_no;
1119 int error;
1120
1121 minor = input_get_new_minor(EVDEV_MINOR_BASE, EVDEV_MINORS, true);
1122 if (minor < 0) {
1123 error = minor;
1124 pr_err("failed to reserve new minor: %d\n", error);
1125 return error;
1126 }
1127
1128 evdev = kzalloc(sizeof(struct evdev), GFP_KERNEL);
1129 if (!evdev) {
1130 error = -ENOMEM;
1131 goto err_free_minor;
1132 }
1133
1134 INIT_LIST_HEAD(&evdev->client_list);
1135 spin_lock_init(&evdev->client_lock);
1136 mutex_init(&evdev->mutex);
1137 init_waitqueue_head(&evdev->wait);
1138 evdev->exist = true;
1139
1140 dev_no = minor;
1141 /* Normalize device number if it falls into legacy range */
1142 if (dev_no < EVDEV_MINOR_BASE + EVDEV_MINORS)
1143 dev_no -= EVDEV_MINOR_BASE;
1144 dev_set_name(&evdev->dev, "event%d", dev_no);
1145
1146 evdev->handle.dev = input_get_device(dev);
1147 evdev->handle.name = dev_name(&evdev->dev);
1148 evdev->handle.handler = handler;
1149 evdev->handle.private = evdev;
1150
1151 evdev->dev.devt = MKDEV(INPUT_MAJOR, minor);
1152 evdev->dev.class = &input_class;
1153 evdev->dev.parent = &dev->dev;
1154 evdev->dev.release = evdev_free;
1155 device_initialize(&evdev->dev);
1156
1157 error = input_register_handle(&evdev->handle);
1158 if (error)
1159 goto err_free_evdev;
1160
1161 cdev_init(&evdev->cdev, &evdev_fops);
1162 evdev->cdev.kobj.parent = &evdev->dev.kobj;
1163 error = cdev_add(&evdev->cdev, evdev->dev.devt, 1);
1164 if (error)
1165 goto err_unregister_handle;
1166
1167 error = device_add(&evdev->dev);
1168 if (error)
1169 goto err_cleanup_evdev;
1170
1171 return 0;
1172
1173 err_cleanup_evdev:
1174 evdev_cleanup(evdev);
1175 err_unregister_handle:
1176 input_unregister_handle(&evdev->handle);
1177 err_free_evdev:
1178 put_device(&evdev->dev);
1179 err_free_minor:
1180 input_free_minor(minor);
1181 return error;
1182}
1183
1184static void evdev_disconnect(struct input_handle *handle)
1185{
1186 struct evdev *evdev = handle->private;
1187
1188 device_del(&evdev->dev);
1189 evdev_cleanup(evdev);
1190 input_free_minor(MINOR(evdev->dev.devt));
1191 input_unregister_handle(handle);
1192 put_device(&evdev->dev);
1193}
1194
1195static const struct input_device_id evdev_ids[] = {
1196 { .driver_info = 1 }, /* Matches all devices */
1197 { }, /* Terminating zero entry */
1198};
1199
1200MODULE_DEVICE_TABLE(input, evdev_ids);
1201
1202static struct input_handler evdev_handler = {
1203 .event = evdev_event,
1204 .events = evdev_events,
1205 .connect = evdev_connect,
1206 .disconnect = evdev_disconnect,
1207 .legacy_minors = true,
1208 .minor = EVDEV_MINOR_BASE,
1209 .name = "evdev",
1210 .id_table = evdev_ids,
1211};
1212
1213static int __init evdev_init(void)
1214{
1215 return input_register_handler(&evdev_handler);
1216}
1217
1218static void __exit evdev_exit(void)
1219{
1220 input_unregister_handler(&evdev_handler);
1221}
1222
1223module_init(evdev_init);
1224module_exit(evdev_exit);
1225
1226MODULE_AUTHOR("Vojtech Pavlik <vojtech@ucw.cz>");
1227MODULE_DESCRIPTION("Input driver event char devices");
1228MODULE_LICENSE("GPL");
1/*
2 * Event char devices, giving access to raw input device events.
3 *
4 * Copyright (c) 1999-2002 Vojtech Pavlik
5 *
6 * This program is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License version 2 as published by
8 * the Free Software Foundation.
9 */
10
11#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
12
13#define EVDEV_MINOR_BASE 64
14#define EVDEV_MINORS 32
15#define EVDEV_MIN_BUFFER_SIZE 64U
16#define EVDEV_BUF_PACKETS 8
17
18#include <linux/poll.h>
19#include <linux/sched.h>
20#include <linux/slab.h>
21#include <linux/module.h>
22#include <linux/init.h>
23#include <linux/input/mt.h>
24#include <linux/major.h>
25#include <linux/device.h>
26#include "input-compat.h"
27
28struct evdev {
29 int open;
30 int minor;
31 struct input_handle handle;
32 wait_queue_head_t wait;
33 struct evdev_client __rcu *grab;
34 struct list_head client_list;
35 spinlock_t client_lock; /* protects client_list */
36 struct mutex mutex;
37 struct device dev;
38 bool exist;
39};
40
41struct evdev_client {
42 unsigned int head;
43 unsigned int tail;
44 unsigned int packet_head; /* [future] position of the first element of next packet */
45 spinlock_t buffer_lock; /* protects access to buffer, head and tail */
46 struct fasync_struct *fasync;
47 struct evdev *evdev;
48 struct list_head node;
49 int clkid;
50 unsigned int bufsize;
51 struct input_event buffer[];
52};
53
54static struct evdev *evdev_table[EVDEV_MINORS];
55static DEFINE_MUTEX(evdev_table_mutex);
56
57static void evdev_pass_event(struct evdev_client *client,
58 struct input_event *event,
59 ktime_t mono, ktime_t real)
60{
61 event->time = ktime_to_timeval(client->clkid == CLOCK_MONOTONIC ?
62 mono : real);
63
64 /* Interrupts are disabled, just acquire the lock. */
65 spin_lock(&client->buffer_lock);
66
67 client->buffer[client->head++] = *event;
68 client->head &= client->bufsize - 1;
69
70 if (unlikely(client->head == client->tail)) {
71 /*
72 * This effectively "drops" all unconsumed events, leaving
73 * EV_SYN/SYN_DROPPED plus the newest event in the queue.
74 */
75 client->tail = (client->head - 2) & (client->bufsize - 1);
76
77 client->buffer[client->tail].time = event->time;
78 client->buffer[client->tail].type = EV_SYN;
79 client->buffer[client->tail].code = SYN_DROPPED;
80 client->buffer[client->tail].value = 0;
81
82 client->packet_head = client->tail;
83 }
84
85 if (event->type == EV_SYN && event->code == SYN_REPORT) {
86 client->packet_head = client->head;
87 kill_fasync(&client->fasync, SIGIO, POLL_IN);
88 }
89
90 spin_unlock(&client->buffer_lock);
91}
92
93/*
94 * Pass incoming event to all connected clients.
95 */
96static void evdev_event(struct input_handle *handle,
97 unsigned int type, unsigned int code, int value)
98{
99 struct evdev *evdev = handle->private;
100 struct evdev_client *client;
101 struct input_event event;
102 ktime_t time_mono, time_real;
103
104 time_mono = ktime_get();
105 time_real = ktime_sub(time_mono, ktime_get_monotonic_offset());
106
107 event.type = type;
108 event.code = code;
109 event.value = value;
110
111 rcu_read_lock();
112
113 client = rcu_dereference(evdev->grab);
114
115 if (client)
116 evdev_pass_event(client, &event, time_mono, time_real);
117 else
118 list_for_each_entry_rcu(client, &evdev->client_list, node)
119 evdev_pass_event(client, &event, time_mono, time_real);
120
121 rcu_read_unlock();
122
123 if (type == EV_SYN && code == SYN_REPORT)
124 wake_up_interruptible(&evdev->wait);
125}
126
127static int evdev_fasync(int fd, struct file *file, int on)
128{
129 struct evdev_client *client = file->private_data;
130
131 return fasync_helper(fd, file, on, &client->fasync);
132}
133
134static int evdev_flush(struct file *file, fl_owner_t id)
135{
136 struct evdev_client *client = file->private_data;
137 struct evdev *evdev = client->evdev;
138 int retval;
139
140 retval = mutex_lock_interruptible(&evdev->mutex);
141 if (retval)
142 return retval;
143
144 if (!evdev->exist)
145 retval = -ENODEV;
146 else
147 retval = input_flush_device(&evdev->handle, file);
148
149 mutex_unlock(&evdev->mutex);
150 return retval;
151}
152
153static void evdev_free(struct device *dev)
154{
155 struct evdev *evdev = container_of(dev, struct evdev, dev);
156
157 input_put_device(evdev->handle.dev);
158 kfree(evdev);
159}
160
161/*
162 * Grabs an event device (along with underlying input device).
163 * This function is called with evdev->mutex taken.
164 */
165static int evdev_grab(struct evdev *evdev, struct evdev_client *client)
166{
167 int error;
168
169 if (evdev->grab)
170 return -EBUSY;
171
172 error = input_grab_device(&evdev->handle);
173 if (error)
174 return error;
175
176 rcu_assign_pointer(evdev->grab, client);
177
178 return 0;
179}
180
181static int evdev_ungrab(struct evdev *evdev, struct evdev_client *client)
182{
183 struct evdev_client *grab = rcu_dereference_protected(evdev->grab,
184 lockdep_is_held(&evdev->mutex));
185
186 if (grab != client)
187 return -EINVAL;
188
189 rcu_assign_pointer(evdev->grab, NULL);
190 synchronize_rcu();
191 input_release_device(&evdev->handle);
192
193 return 0;
194}
195
196static void evdev_attach_client(struct evdev *evdev,
197 struct evdev_client *client)
198{
199 spin_lock(&evdev->client_lock);
200 list_add_tail_rcu(&client->node, &evdev->client_list);
201 spin_unlock(&evdev->client_lock);
202}
203
204static void evdev_detach_client(struct evdev *evdev,
205 struct evdev_client *client)
206{
207 spin_lock(&evdev->client_lock);
208 list_del_rcu(&client->node);
209 spin_unlock(&evdev->client_lock);
210 synchronize_rcu();
211}
212
213static int evdev_open_device(struct evdev *evdev)
214{
215 int retval;
216
217 retval = mutex_lock_interruptible(&evdev->mutex);
218 if (retval)
219 return retval;
220
221 if (!evdev->exist)
222 retval = -ENODEV;
223 else if (!evdev->open++) {
224 retval = input_open_device(&evdev->handle);
225 if (retval)
226 evdev->open--;
227 }
228
229 mutex_unlock(&evdev->mutex);
230 return retval;
231}
232
233static void evdev_close_device(struct evdev *evdev)
234{
235 mutex_lock(&evdev->mutex);
236
237 if (evdev->exist && !--evdev->open)
238 input_close_device(&evdev->handle);
239
240 mutex_unlock(&evdev->mutex);
241}
242
243/*
244 * Wake up users waiting for IO so they can disconnect from
245 * dead device.
246 */
247static void evdev_hangup(struct evdev *evdev)
248{
249 struct evdev_client *client;
250
251 spin_lock(&evdev->client_lock);
252 list_for_each_entry(client, &evdev->client_list, node)
253 kill_fasync(&client->fasync, SIGIO, POLL_HUP);
254 spin_unlock(&evdev->client_lock);
255
256 wake_up_interruptible(&evdev->wait);
257}
258
259static int evdev_release(struct inode *inode, struct file *file)
260{
261 struct evdev_client *client = file->private_data;
262 struct evdev *evdev = client->evdev;
263
264 mutex_lock(&evdev->mutex);
265 evdev_ungrab(evdev, client);
266 mutex_unlock(&evdev->mutex);
267
268 evdev_detach_client(evdev, client);
269 kfree(client);
270
271 evdev_close_device(evdev);
272 put_device(&evdev->dev);
273
274 return 0;
275}
276
277static unsigned int evdev_compute_buffer_size(struct input_dev *dev)
278{
279 unsigned int n_events =
280 max(dev->hint_events_per_packet * EVDEV_BUF_PACKETS,
281 EVDEV_MIN_BUFFER_SIZE);
282
283 return roundup_pow_of_two(n_events);
284}
285
286static int evdev_open(struct inode *inode, struct file *file)
287{
288 struct evdev *evdev;
289 struct evdev_client *client;
290 int i = iminor(inode) - EVDEV_MINOR_BASE;
291 unsigned int bufsize;
292 int error;
293
294 if (i >= EVDEV_MINORS)
295 return -ENODEV;
296
297 error = mutex_lock_interruptible(&evdev_table_mutex);
298 if (error)
299 return error;
300 evdev = evdev_table[i];
301 if (evdev)
302 get_device(&evdev->dev);
303 mutex_unlock(&evdev_table_mutex);
304
305 if (!evdev)
306 return -ENODEV;
307
308 bufsize = evdev_compute_buffer_size(evdev->handle.dev);
309
310 client = kzalloc(sizeof(struct evdev_client) +
311 bufsize * sizeof(struct input_event),
312 GFP_KERNEL);
313 if (!client) {
314 error = -ENOMEM;
315 goto err_put_evdev;
316 }
317
318 client->bufsize = bufsize;
319 spin_lock_init(&client->buffer_lock);
320 client->evdev = evdev;
321 evdev_attach_client(evdev, client);
322
323 error = evdev_open_device(evdev);
324 if (error)
325 goto err_free_client;
326
327 file->private_data = client;
328 nonseekable_open(inode, file);
329
330 return 0;
331
332 err_free_client:
333 evdev_detach_client(evdev, client);
334 kfree(client);
335 err_put_evdev:
336 put_device(&evdev->dev);
337 return error;
338}
339
340static ssize_t evdev_write(struct file *file, const char __user *buffer,
341 size_t count, loff_t *ppos)
342{
343 struct evdev_client *client = file->private_data;
344 struct evdev *evdev = client->evdev;
345 struct input_event event;
346 int retval = 0;
347
348 if (count != 0 && count < input_event_size())
349 return -EINVAL;
350
351 retval = mutex_lock_interruptible(&evdev->mutex);
352 if (retval)
353 return retval;
354
355 if (!evdev->exist) {
356 retval = -ENODEV;
357 goto out;
358 }
359
360 while (retval + input_event_size() <= count) {
361
362 if (input_event_from_user(buffer + retval, &event)) {
363 retval = -EFAULT;
364 goto out;
365 }
366 retval += input_event_size();
367
368 input_inject_event(&evdev->handle,
369 event.type, event.code, event.value);
370 }
371
372 out:
373 mutex_unlock(&evdev->mutex);
374 return retval;
375}
376
377static int evdev_fetch_next_event(struct evdev_client *client,
378 struct input_event *event)
379{
380 int have_event;
381
382 spin_lock_irq(&client->buffer_lock);
383
384 have_event = client->packet_head != client->tail;
385 if (have_event) {
386 *event = client->buffer[client->tail++];
387 client->tail &= client->bufsize - 1;
388 }
389
390 spin_unlock_irq(&client->buffer_lock);
391
392 return have_event;
393}
394
395static ssize_t evdev_read(struct file *file, char __user *buffer,
396 size_t count, loff_t *ppos)
397{
398 struct evdev_client *client = file->private_data;
399 struct evdev *evdev = client->evdev;
400 struct input_event event;
401 size_t read = 0;
402 int error;
403
404 if (count != 0 && count < input_event_size())
405 return -EINVAL;
406
407 for (;;) {
408 if (!evdev->exist)
409 return -ENODEV;
410
411 if (client->packet_head == client->tail &&
412 (file->f_flags & O_NONBLOCK))
413 return -EAGAIN;
414
415 /*
416 * count == 0 is special - no IO is done but we check
417 * for error conditions (see above).
418 */
419 if (count == 0)
420 break;
421
422 while (read + input_event_size() <= count &&
423 evdev_fetch_next_event(client, &event)) {
424
425 if (input_event_to_user(buffer + read, &event))
426 return -EFAULT;
427
428 read += input_event_size();
429 }
430
431 if (read)
432 break;
433
434 if (!(file->f_flags & O_NONBLOCK)) {
435 error = wait_event_interruptible(evdev->wait,
436 client->packet_head != client->tail ||
437 !evdev->exist);
438 if (error)
439 return error;
440 }
441 }
442
443 return read;
444}
445
446/* No kernel lock - fine */
447static unsigned int evdev_poll(struct file *file, poll_table *wait)
448{
449 struct evdev_client *client = file->private_data;
450 struct evdev *evdev = client->evdev;
451 unsigned int mask;
452
453 poll_wait(file, &evdev->wait, wait);
454
455 mask = evdev->exist ? POLLOUT | POLLWRNORM : POLLHUP | POLLERR;
456 if (client->packet_head != client->tail)
457 mask |= POLLIN | POLLRDNORM;
458
459 return mask;
460}
461
462#ifdef CONFIG_COMPAT
463
464#define BITS_PER_LONG_COMPAT (sizeof(compat_long_t) * 8)
465#define BITS_TO_LONGS_COMPAT(x) ((((x) - 1) / BITS_PER_LONG_COMPAT) + 1)
466
467#ifdef __BIG_ENDIAN
468static int bits_to_user(unsigned long *bits, unsigned int maxbit,
469 unsigned int maxlen, void __user *p, int compat)
470{
471 int len, i;
472
473 if (compat) {
474 len = BITS_TO_LONGS_COMPAT(maxbit) * sizeof(compat_long_t);
475 if (len > maxlen)
476 len = maxlen;
477
478 for (i = 0; i < len / sizeof(compat_long_t); i++)
479 if (copy_to_user((compat_long_t __user *) p + i,
480 (compat_long_t *) bits +
481 i + 1 - ((i % 2) << 1),
482 sizeof(compat_long_t)))
483 return -EFAULT;
484 } else {
485 len = BITS_TO_LONGS(maxbit) * sizeof(long);
486 if (len > maxlen)
487 len = maxlen;
488
489 if (copy_to_user(p, bits, len))
490 return -EFAULT;
491 }
492
493 return len;
494}
495#else
496static int bits_to_user(unsigned long *bits, unsigned int maxbit,
497 unsigned int maxlen, void __user *p, int compat)
498{
499 int len = compat ?
500 BITS_TO_LONGS_COMPAT(maxbit) * sizeof(compat_long_t) :
501 BITS_TO_LONGS(maxbit) * sizeof(long);
502
503 if (len > maxlen)
504 len = maxlen;
505
506 return copy_to_user(p, bits, len) ? -EFAULT : len;
507}
508#endif /* __BIG_ENDIAN */
509
510#else
511
512static int bits_to_user(unsigned long *bits, unsigned int maxbit,
513 unsigned int maxlen, void __user *p, int compat)
514{
515 int len = BITS_TO_LONGS(maxbit) * sizeof(long);
516
517 if (len > maxlen)
518 len = maxlen;
519
520 return copy_to_user(p, bits, len) ? -EFAULT : len;
521}
522
523#endif /* CONFIG_COMPAT */
524
525static int str_to_user(const char *str, unsigned int maxlen, void __user *p)
526{
527 int len;
528
529 if (!str)
530 return -ENOENT;
531
532 len = strlen(str) + 1;
533 if (len > maxlen)
534 len = maxlen;
535
536 return copy_to_user(p, str, len) ? -EFAULT : len;
537}
538
539#define OLD_KEY_MAX 0x1ff
540static int handle_eviocgbit(struct input_dev *dev,
541 unsigned int type, unsigned int size,
542 void __user *p, int compat_mode)
543{
544 static unsigned long keymax_warn_time;
545 unsigned long *bits;
546 int len;
547
548 switch (type) {
549
550 case 0: bits = dev->evbit; len = EV_MAX; break;
551 case EV_KEY: bits = dev->keybit; len = KEY_MAX; break;
552 case EV_REL: bits = dev->relbit; len = REL_MAX; break;
553 case EV_ABS: bits = dev->absbit; len = ABS_MAX; break;
554 case EV_MSC: bits = dev->mscbit; len = MSC_MAX; break;
555 case EV_LED: bits = dev->ledbit; len = LED_MAX; break;
556 case EV_SND: bits = dev->sndbit; len = SND_MAX; break;
557 case EV_FF: bits = dev->ffbit; len = FF_MAX; break;
558 case EV_SW: bits = dev->swbit; len = SW_MAX; break;
559 default: return -EINVAL;
560 }
561
562 /*
563 * Work around bugs in userspace programs that like to do
564 * EVIOCGBIT(EV_KEY, KEY_MAX) and not realize that 'len'
565 * should be in bytes, not in bits.
566 */
567 if (type == EV_KEY && size == OLD_KEY_MAX) {
568 len = OLD_KEY_MAX;
569 if (printk_timed_ratelimit(&keymax_warn_time, 10 * 1000))
570 pr_warning("(EVIOCGBIT): Suspicious buffer size %u, "
571 "limiting output to %zu bytes. See "
572 "http://userweb.kernel.org/~dtor/eviocgbit-bug.html\n",
573 OLD_KEY_MAX,
574 BITS_TO_LONGS(OLD_KEY_MAX) * sizeof(long));
575 }
576
577 return bits_to_user(bits, len, size, p, compat_mode);
578}
579#undef OLD_KEY_MAX
580
581static int evdev_handle_get_keycode(struct input_dev *dev, void __user *p)
582{
583 struct input_keymap_entry ke = {
584 .len = sizeof(unsigned int),
585 .flags = 0,
586 };
587 int __user *ip = (int __user *)p;
588 int error;
589
590 /* legacy case */
591 if (copy_from_user(ke.scancode, p, sizeof(unsigned int)))
592 return -EFAULT;
593
594 error = input_get_keycode(dev, &ke);
595 if (error)
596 return error;
597
598 if (put_user(ke.keycode, ip + 1))
599 return -EFAULT;
600
601 return 0;
602}
603
604static int evdev_handle_get_keycode_v2(struct input_dev *dev, void __user *p)
605{
606 struct input_keymap_entry ke;
607 int error;
608
609 if (copy_from_user(&ke, p, sizeof(ke)))
610 return -EFAULT;
611
612 error = input_get_keycode(dev, &ke);
613 if (error)
614 return error;
615
616 if (copy_to_user(p, &ke, sizeof(ke)))
617 return -EFAULT;
618
619 return 0;
620}
621
622static int evdev_handle_set_keycode(struct input_dev *dev, void __user *p)
623{
624 struct input_keymap_entry ke = {
625 .len = sizeof(unsigned int),
626 .flags = 0,
627 };
628 int __user *ip = (int __user *)p;
629
630 if (copy_from_user(ke.scancode, p, sizeof(unsigned int)))
631 return -EFAULT;
632
633 if (get_user(ke.keycode, ip + 1))
634 return -EFAULT;
635
636 return input_set_keycode(dev, &ke);
637}
638
639static int evdev_handle_set_keycode_v2(struct input_dev *dev, void __user *p)
640{
641 struct input_keymap_entry ke;
642
643 if (copy_from_user(&ke, p, sizeof(ke)))
644 return -EFAULT;
645
646 if (ke.len > sizeof(ke.scancode))
647 return -EINVAL;
648
649 return input_set_keycode(dev, &ke);
650}
651
652static int evdev_handle_mt_request(struct input_dev *dev,
653 unsigned int size,
654 int __user *ip)
655{
656 const struct input_mt_slot *mt = dev->mt;
657 unsigned int code;
658 int max_slots;
659 int i;
660
661 if (get_user(code, &ip[0]))
662 return -EFAULT;
663 if (!input_is_mt_value(code))
664 return -EINVAL;
665
666 max_slots = (size - sizeof(__u32)) / sizeof(__s32);
667 for (i = 0; i < dev->mtsize && i < max_slots; i++)
668 if (put_user(input_mt_get_value(&mt[i], code), &ip[1 + i]))
669 return -EFAULT;
670
671 return 0;
672}
673
674static long evdev_do_ioctl(struct file *file, unsigned int cmd,
675 void __user *p, int compat_mode)
676{
677 struct evdev_client *client = file->private_data;
678 struct evdev *evdev = client->evdev;
679 struct input_dev *dev = evdev->handle.dev;
680 struct input_absinfo abs;
681 struct ff_effect effect;
682 int __user *ip = (int __user *)p;
683 unsigned int i, t, u, v;
684 unsigned int size;
685 int error;
686
687 /* First we check for fixed-length commands */
688 switch (cmd) {
689
690 case EVIOCGVERSION:
691 return put_user(EV_VERSION, ip);
692
693 case EVIOCGID:
694 if (copy_to_user(p, &dev->id, sizeof(struct input_id)))
695 return -EFAULT;
696 return 0;
697
698 case EVIOCGREP:
699 if (!test_bit(EV_REP, dev->evbit))
700 return -ENOSYS;
701 if (put_user(dev->rep[REP_DELAY], ip))
702 return -EFAULT;
703 if (put_user(dev->rep[REP_PERIOD], ip + 1))
704 return -EFAULT;
705 return 0;
706
707 case EVIOCSREP:
708 if (!test_bit(EV_REP, dev->evbit))
709 return -ENOSYS;
710 if (get_user(u, ip))
711 return -EFAULT;
712 if (get_user(v, ip + 1))
713 return -EFAULT;
714
715 input_inject_event(&evdev->handle, EV_REP, REP_DELAY, u);
716 input_inject_event(&evdev->handle, EV_REP, REP_PERIOD, v);
717
718 return 0;
719
720 case EVIOCRMFF:
721 return input_ff_erase(dev, (int)(unsigned long) p, file);
722
723 case EVIOCGEFFECTS:
724 i = test_bit(EV_FF, dev->evbit) ?
725 dev->ff->max_effects : 0;
726 if (put_user(i, ip))
727 return -EFAULT;
728 return 0;
729
730 case EVIOCGRAB:
731 if (p)
732 return evdev_grab(evdev, client);
733 else
734 return evdev_ungrab(evdev, client);
735
736 case EVIOCSCLOCKID:
737 if (copy_from_user(&i, p, sizeof(unsigned int)))
738 return -EFAULT;
739 if (i != CLOCK_MONOTONIC && i != CLOCK_REALTIME)
740 return -EINVAL;
741 client->clkid = i;
742 return 0;
743
744 case EVIOCGKEYCODE:
745 return evdev_handle_get_keycode(dev, p);
746
747 case EVIOCSKEYCODE:
748 return evdev_handle_set_keycode(dev, p);
749
750 case EVIOCGKEYCODE_V2:
751 return evdev_handle_get_keycode_v2(dev, p);
752
753 case EVIOCSKEYCODE_V2:
754 return evdev_handle_set_keycode_v2(dev, p);
755 }
756
757 size = _IOC_SIZE(cmd);
758
759 /* Now check variable-length commands */
760#define EVIOC_MASK_SIZE(nr) ((nr) & ~(_IOC_SIZEMASK << _IOC_SIZESHIFT))
761 switch (EVIOC_MASK_SIZE(cmd)) {
762
763 case EVIOCGPROP(0):
764 return bits_to_user(dev->propbit, INPUT_PROP_MAX,
765 size, p, compat_mode);
766
767 case EVIOCGMTSLOTS(0):
768 return evdev_handle_mt_request(dev, size, ip);
769
770 case EVIOCGKEY(0):
771 return bits_to_user(dev->key, KEY_MAX, size, p, compat_mode);
772
773 case EVIOCGLED(0):
774 return bits_to_user(dev->led, LED_MAX, size, p, compat_mode);
775
776 case EVIOCGSND(0):
777 return bits_to_user(dev->snd, SND_MAX, size, p, compat_mode);
778
779 case EVIOCGSW(0):
780 return bits_to_user(dev->sw, SW_MAX, size, p, compat_mode);
781
782 case EVIOCGNAME(0):
783 return str_to_user(dev->name, size, p);
784
785 case EVIOCGPHYS(0):
786 return str_to_user(dev->phys, size, p);
787
788 case EVIOCGUNIQ(0):
789 return str_to_user(dev->uniq, size, p);
790
791 case EVIOC_MASK_SIZE(EVIOCSFF):
792 if (input_ff_effect_from_user(p, size, &effect))
793 return -EFAULT;
794
795 error = input_ff_upload(dev, &effect, file);
796
797 if (put_user(effect.id, &(((struct ff_effect __user *)p)->id)))
798 return -EFAULT;
799
800 return error;
801 }
802
803 /* Multi-number variable-length handlers */
804 if (_IOC_TYPE(cmd) != 'E')
805 return -EINVAL;
806
807 if (_IOC_DIR(cmd) == _IOC_READ) {
808
809 if ((_IOC_NR(cmd) & ~EV_MAX) == _IOC_NR(EVIOCGBIT(0, 0)))
810 return handle_eviocgbit(dev,
811 _IOC_NR(cmd) & EV_MAX, size,
812 p, compat_mode);
813
814 if ((_IOC_NR(cmd) & ~ABS_MAX) == _IOC_NR(EVIOCGABS(0))) {
815
816 if (!dev->absinfo)
817 return -EINVAL;
818
819 t = _IOC_NR(cmd) & ABS_MAX;
820 abs = dev->absinfo[t];
821
822 if (copy_to_user(p, &abs, min_t(size_t,
823 size, sizeof(struct input_absinfo))))
824 return -EFAULT;
825
826 return 0;
827 }
828 }
829
830 if (_IOC_DIR(cmd) == _IOC_WRITE) {
831
832 if ((_IOC_NR(cmd) & ~ABS_MAX) == _IOC_NR(EVIOCSABS(0))) {
833
834 if (!dev->absinfo)
835 return -EINVAL;
836
837 t = _IOC_NR(cmd) & ABS_MAX;
838
839 if (copy_from_user(&abs, p, min_t(size_t,
840 size, sizeof(struct input_absinfo))))
841 return -EFAULT;
842
843 if (size < sizeof(struct input_absinfo))
844 abs.resolution = 0;
845
846 /* We can't change number of reserved MT slots */
847 if (t == ABS_MT_SLOT)
848 return -EINVAL;
849
850 /*
851 * Take event lock to ensure that we are not
852 * changing device parameters in the middle
853 * of event.
854 */
855 spin_lock_irq(&dev->event_lock);
856 dev->absinfo[t] = abs;
857 spin_unlock_irq(&dev->event_lock);
858
859 return 0;
860 }
861 }
862
863 return -EINVAL;
864}
865
866static long evdev_ioctl_handler(struct file *file, unsigned int cmd,
867 void __user *p, int compat_mode)
868{
869 struct evdev_client *client = file->private_data;
870 struct evdev *evdev = client->evdev;
871 int retval;
872
873 retval = mutex_lock_interruptible(&evdev->mutex);
874 if (retval)
875 return retval;
876
877 if (!evdev->exist) {
878 retval = -ENODEV;
879 goto out;
880 }
881
882 retval = evdev_do_ioctl(file, cmd, p, compat_mode);
883
884 out:
885 mutex_unlock(&evdev->mutex);
886 return retval;
887}
888
889static long evdev_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
890{
891 return evdev_ioctl_handler(file, cmd, (void __user *)arg, 0);
892}
893
894#ifdef CONFIG_COMPAT
895static long evdev_ioctl_compat(struct file *file,
896 unsigned int cmd, unsigned long arg)
897{
898 return evdev_ioctl_handler(file, cmd, compat_ptr(arg), 1);
899}
900#endif
901
902static const struct file_operations evdev_fops = {
903 .owner = THIS_MODULE,
904 .read = evdev_read,
905 .write = evdev_write,
906 .poll = evdev_poll,
907 .open = evdev_open,
908 .release = evdev_release,
909 .unlocked_ioctl = evdev_ioctl,
910#ifdef CONFIG_COMPAT
911 .compat_ioctl = evdev_ioctl_compat,
912#endif
913 .fasync = evdev_fasync,
914 .flush = evdev_flush,
915 .llseek = no_llseek,
916};
917
918static int evdev_install_chrdev(struct evdev *evdev)
919{
920 /*
921 * No need to do any locking here as calls to connect and
922 * disconnect are serialized by the input core
923 */
924 evdev_table[evdev->minor] = evdev;
925 return 0;
926}
927
928static void evdev_remove_chrdev(struct evdev *evdev)
929{
930 /*
931 * Lock evdev table to prevent race with evdev_open()
932 */
933 mutex_lock(&evdev_table_mutex);
934 evdev_table[evdev->minor] = NULL;
935 mutex_unlock(&evdev_table_mutex);
936}
937
938/*
939 * Mark device non-existent. This disables writes, ioctls and
940 * prevents new users from opening the device. Already posted
941 * blocking reads will stay, however new ones will fail.
942 */
943static void evdev_mark_dead(struct evdev *evdev)
944{
945 mutex_lock(&evdev->mutex);
946 evdev->exist = false;
947 mutex_unlock(&evdev->mutex);
948}
949
950static void evdev_cleanup(struct evdev *evdev)
951{
952 struct input_handle *handle = &evdev->handle;
953
954 evdev_mark_dead(evdev);
955 evdev_hangup(evdev);
956 evdev_remove_chrdev(evdev);
957
958 /* evdev is marked dead so no one else accesses evdev->open */
959 if (evdev->open) {
960 input_flush_device(handle, NULL);
961 input_close_device(handle);
962 }
963}
964
965/*
966 * Create new evdev device. Note that input core serializes calls
967 * to connect and disconnect so we don't need to lock evdev_table here.
968 */
969static int evdev_connect(struct input_handler *handler, struct input_dev *dev,
970 const struct input_device_id *id)
971{
972 struct evdev *evdev;
973 int minor;
974 int error;
975
976 for (minor = 0; minor < EVDEV_MINORS; minor++)
977 if (!evdev_table[minor])
978 break;
979
980 if (minor == EVDEV_MINORS) {
981 pr_err("no more free evdev devices\n");
982 return -ENFILE;
983 }
984
985 evdev = kzalloc(sizeof(struct evdev), GFP_KERNEL);
986 if (!evdev)
987 return -ENOMEM;
988
989 INIT_LIST_HEAD(&evdev->client_list);
990 spin_lock_init(&evdev->client_lock);
991 mutex_init(&evdev->mutex);
992 init_waitqueue_head(&evdev->wait);
993
994 dev_set_name(&evdev->dev, "event%d", minor);
995 evdev->exist = true;
996 evdev->minor = minor;
997
998 evdev->handle.dev = input_get_device(dev);
999 evdev->handle.name = dev_name(&evdev->dev);
1000 evdev->handle.handler = handler;
1001 evdev->handle.private = evdev;
1002
1003 evdev->dev.devt = MKDEV(INPUT_MAJOR, EVDEV_MINOR_BASE + minor);
1004 evdev->dev.class = &input_class;
1005 evdev->dev.parent = &dev->dev;
1006 evdev->dev.release = evdev_free;
1007 device_initialize(&evdev->dev);
1008
1009 error = input_register_handle(&evdev->handle);
1010 if (error)
1011 goto err_free_evdev;
1012
1013 error = evdev_install_chrdev(evdev);
1014 if (error)
1015 goto err_unregister_handle;
1016
1017 error = device_add(&evdev->dev);
1018 if (error)
1019 goto err_cleanup_evdev;
1020
1021 return 0;
1022
1023 err_cleanup_evdev:
1024 evdev_cleanup(evdev);
1025 err_unregister_handle:
1026 input_unregister_handle(&evdev->handle);
1027 err_free_evdev:
1028 put_device(&evdev->dev);
1029 return error;
1030}
1031
1032static void evdev_disconnect(struct input_handle *handle)
1033{
1034 struct evdev *evdev = handle->private;
1035
1036 device_del(&evdev->dev);
1037 evdev_cleanup(evdev);
1038 input_unregister_handle(handle);
1039 put_device(&evdev->dev);
1040}
1041
1042static const struct input_device_id evdev_ids[] = {
1043 { .driver_info = 1 }, /* Matches all devices */
1044 { }, /* Terminating zero entry */
1045};
1046
1047MODULE_DEVICE_TABLE(input, evdev_ids);
1048
1049static struct input_handler evdev_handler = {
1050 .event = evdev_event,
1051 .connect = evdev_connect,
1052 .disconnect = evdev_disconnect,
1053 .fops = &evdev_fops,
1054 .minor = EVDEV_MINOR_BASE,
1055 .name = "evdev",
1056 .id_table = evdev_ids,
1057};
1058
1059static int __init evdev_init(void)
1060{
1061 return input_register_handler(&evdev_handler);
1062}
1063
1064static void __exit evdev_exit(void)
1065{
1066 input_unregister_handler(&evdev_handler);
1067}
1068
1069module_init(evdev_init);
1070module_exit(evdev_exit);
1071
1072MODULE_AUTHOR("Vojtech Pavlik <vojtech@ucw.cz>");
1073MODULE_DESCRIPTION("Input driver event char devices");
1074MODULE_LICENSE("GPL");