2 * Event char devices, giving access to raw input device events.
4 * Copyright (c) 1999-2002 Vojtech Pavlik
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.
11 #define EVDEV_MINOR_BASE 64
12 #define EVDEV_MINORS 32
13 #define EVDEV_BUFFER_SIZE 64
16 #include "dde26_input.h"
18 #include <l4/re/env.h>
19 #include <l4/sys/kdebug.h>
22 #include <linux/poll.h>
23 #include <linux/slab.h>
24 #include <linux/module.h>
25 #include <linux/init.h>
26 #include <linux/input.h>
27 #include <linux/major.h>
28 #include <linux/device.h>
29 #include "input-compat.h"
36 struct input_handle handle;
37 wait_queue_head_t wait;
38 struct evdev_client *grab;
39 struct list_head client_list;
40 spinlock_t client_lock; /* protects client_list */
46 struct input_event buffer[EVDEV_BUFFER_SIZE];
49 spinlock_t buffer_lock; /* protects access to buffer, head and tail */
50 struct fasync_struct *fasync;
52 struct list_head node;
55 static struct evdev *evdev_table[EVDEV_MINORS];
56 static DEFINE_MUTEX(evdev_table_mutex);
58 static void evdev_pass_event(struct evdev_client *client,
59 struct input_event *event)
63 * Interrupts are disabled, just acquire the lock
65 spin_lock(&client->buffer_lock);
66 client->buffer[client->head++] = *event;
67 client->head &= EVDEV_BUFFER_SIZE - 1;
68 spin_unlock(&client->buffer_lock);
70 kill_fasync(&client->fasync, SIGIO, POLL_IN);
76 long (*panic_blink)(long time);
78 /** SOME EVENTS ARE FILTERED OUT **/
79 static inline int filter_event(struct input_handle *handle, unsigned int type,
80 unsigned int code, int value)
82 /* filter sound driver events */
83 if (test_bit(EV_SND, handle->dev->evbit)) return 1;
85 /* filter sync events */
86 if ((type == EV_SYN)) return 1;
88 /* filter misc event: scancode -- no handlers yet */
89 if ((type == EV_MSC) && (code == MSC_SCAN)) return 1;
97 * Pass incoming event to all connected clients.
99 static void evdev_event(struct input_handle *handle,
100 unsigned int type, unsigned int code, int value)
102 struct evdev *evdev = handle->private;
103 struct evdev_client *client;
104 struct input_event event;
107 do_gettimeofday(&event.time);
114 client = rcu_dereference(evdev->grab);
116 evdev_pass_event(client, &event);
118 list_for_each_entry_rcu(client, &evdev->client_list, node)
119 evdev_pass_event(client, &event);
123 wake_up_interruptible(&evdev->wait);
126 ev.time = l4re_kip()->clock;
127 if (filter_event(handle, type, code, value))
134 l4dde26_do_ev_callback(&ev);
138 static int evdev_fasync(int fd, struct file *file, int on)
141 struct evdev_client *client = file->private_data;
144 retval = fasync_helper(fd, file, on, &client->fasync);
146 return retval < 0 ? retval : 0;
151 static int evdev_flush(struct file *file, fl_owner_t id)
153 struct evdev_client *client = file->private_data;
154 struct evdev *evdev = client->evdev;
157 retval = mutex_lock_interruptible(&evdev->mutex);
164 retval = input_flush_device(&evdev->handle, file);
166 mutex_unlock(&evdev->mutex);
170 static void evdev_free(struct device *dev)
172 struct evdev *evdev = container_of(dev, struct evdev, dev);
174 input_put_device(evdev->handle.dev);
179 * Grabs an event device (along with underlying input device).
180 * This function is called with evdev->mutex taken.
182 static int evdev_grab(struct evdev *evdev, struct evdev_client *client)
189 error = input_grab_device(&evdev->handle);
193 rcu_assign_pointer(evdev->grab, client);
199 static int evdev_ungrab(struct evdev *evdev, struct evdev_client *client)
201 if (evdev->grab != client)
204 rcu_assign_pointer(evdev->grab, NULL);
206 input_release_device(&evdev->handle);
211 static void evdev_attach_client(struct evdev *evdev,
212 struct evdev_client *client)
214 spin_lock(&evdev->client_lock);
215 list_add_tail_rcu(&client->node, &evdev->client_list);
216 spin_unlock(&evdev->client_lock);
220 static void evdev_detach_client(struct evdev *evdev,
221 struct evdev_client *client)
223 spin_lock(&evdev->client_lock);
224 list_del_rcu(&client->node);
225 spin_unlock(&evdev->client_lock);
229 static int evdev_open_device(struct evdev *evdev)
233 retval = mutex_lock_interruptible(&evdev->mutex);
239 else if (!evdev->open++) {
240 retval = input_open_device(&evdev->handle);
245 mutex_unlock(&evdev->mutex);
249 static void evdev_close_device(struct evdev *evdev)
251 mutex_lock(&evdev->mutex);
253 if (evdev->exist && !--evdev->open)
254 input_close_device(&evdev->handle);
256 mutex_unlock(&evdev->mutex);
260 * Wake up users waiting for IO so they can disconnect from
263 static void evdev_hangup(struct evdev *evdev)
266 struct evdev_client *client;
268 spin_lock(&evdev->client_lock);
269 list_for_each_entry(client, &evdev->client_list, node)
270 kill_fasync(&client->fasync, SIGIO, POLL_HUP);
271 spin_unlock(&evdev->client_lock);
274 wake_up_interruptible(&evdev->wait);
277 static int evdev_release(struct inode *inode, struct file *file)
279 struct evdev_client *client = file->private_data;
280 struct evdev *evdev = client->evdev;
282 mutex_lock(&evdev->mutex);
283 if (evdev->grab == client)
284 evdev_ungrab(evdev, client);
285 mutex_unlock(&evdev->mutex);
287 evdev_detach_client(evdev, client);
290 evdev_close_device(evdev);
291 put_device(&evdev->dev);
296 static int evdev_open(struct inode *inode, struct file *file)
299 struct evdev_client *client;
300 int i = iminor(inode) - EVDEV_MINOR_BASE;
303 if (i >= EVDEV_MINORS)
306 error = mutex_lock_interruptible(&evdev_table_mutex);
309 evdev = evdev_table[i];
311 get_device(&evdev->dev);
312 mutex_unlock(&evdev_table_mutex);
317 client = kzalloc(sizeof(struct evdev_client), GFP_KERNEL);
323 spin_lock_init(&client->buffer_lock);
324 client->evdev = evdev;
325 evdev_attach_client(evdev, client);
327 error = evdev_open_device(evdev);
329 goto err_free_client;
331 file->private_data = client;
335 evdev_detach_client(evdev, client);
338 put_device(&evdev->dev);
342 int dde_evdev_open(int i)
344 struct evdev_client *list;
346 if (!evdev_table[i] || !evdev_table[i]->exist)
349 if (!(list = kzalloc(sizeof(struct evdev_client), GFP_KERNEL)))
352 list->evdev = evdev_table[i];
353 list_add_tail(&list->node, &evdev_table[i]->client_list);
355 if (!list->evdev->open++)
356 if (list->evdev->exist)
357 input_open_device(&list->evdev->handle);
362 static ssize_t evdev_write(struct file *file, const char __user *buffer,
363 size_t count, loff_t *ppos)
365 struct evdev_client *client = file->private_data;
366 struct evdev *evdev = client->evdev;
367 struct input_event event;
370 retval = mutex_lock_interruptible(&evdev->mutex);
379 while (retval < count) {
381 if (input_event_from_user(buffer + retval, &event)) {
386 input_inject_event(&evdev->handle,
387 event.type, event.code, event.value);
388 retval += input_event_size();
392 mutex_unlock(&evdev->mutex);
396 static int evdev_fetch_next_event(struct evdev_client *client,
397 struct input_event *event)
401 spin_lock_irq(&client->buffer_lock);
403 have_event = client->head != client->tail;
405 *event = client->buffer[client->tail++];
406 client->tail &= EVDEV_BUFFER_SIZE - 1;
409 spin_unlock_irq(&client->buffer_lock);
414 static ssize_t evdev_read(struct file *file, char __user *buffer,
415 size_t count, loff_t *ppos)
417 struct evdev_client *client = file->private_data;
418 struct evdev *evdev = client->evdev;
419 struct input_event event;
422 if (count < input_event_size())
425 if (client->head == client->tail && evdev->exist &&
426 (file->f_flags & O_NONBLOCK))
429 retval = wait_event_interruptible(evdev->wait,
430 client->head != client->tail || !evdev->exist);
437 while (retval + input_event_size() <= count &&
438 evdev_fetch_next_event(client, &event)) {
440 if (input_event_to_user(buffer + retval, &event))
443 retval += input_event_size();
449 /* No kernel lock - fine */
450 static unsigned int evdev_poll(struct file *file, poll_table *wait)
452 struct evdev_client *client = file->private_data;
453 struct evdev *evdev = client->evdev;
455 poll_wait(file, &evdev->wait, wait);
456 return ((client->head == client->tail) ? 0 : (POLLIN | POLLRDNORM)) |
457 (evdev->exist ? 0 : (POLLHUP | POLLERR));
462 #define BITS_PER_LONG_COMPAT (sizeof(compat_long_t) * 8)
463 #define BITS_TO_LONGS_COMPAT(x) ((((x) - 1) / BITS_PER_LONG_COMPAT) + 1)
466 static int bits_to_user(unsigned long *bits, unsigned int maxbit,
467 unsigned int maxlen, void __user *p, int compat)
472 len = BITS_TO_LONGS_COMPAT(maxbit) * sizeof(compat_long_t);
476 for (i = 0; i < len / sizeof(compat_long_t); i++)
477 if (copy_to_user((compat_long_t __user *) p + i,
478 (compat_long_t *) bits +
479 i + 1 - ((i % 2) << 1),
480 sizeof(compat_long_t)))
483 len = BITS_TO_LONGS(maxbit) * sizeof(long);
487 if (copy_to_user(p, bits, len))
494 static int bits_to_user(unsigned long *bits, unsigned int maxbit,
495 unsigned int maxlen, void __user *p, int compat)
498 BITS_TO_LONGS_COMPAT(maxbit) * sizeof(compat_long_t) :
499 BITS_TO_LONGS(maxbit) * sizeof(long);
504 return copy_to_user(p, bits, len) ? -EFAULT : len;
506 #endif /* __BIG_ENDIAN */
510 static int bits_to_user(unsigned long *bits, unsigned int maxbit,
511 unsigned int maxlen, void __user *p, int compat)
513 int len = BITS_TO_LONGS(maxbit) * sizeof(long);
518 return copy_to_user(p, bits, len) ? -EFAULT : len;
521 #endif /* CONFIG_COMPAT */
523 static int str_to_user(const char *str, unsigned int maxlen, void __user *p)
530 len = strlen(str) + 1;
534 return copy_to_user(p, str, len) ? -EFAULT : len;
537 #define OLD_KEY_MAX 0x1ff
538 static int handle_eviocgbit(struct input_dev *dev, unsigned int cmd, void __user *p, int compat_mode)
540 static unsigned long keymax_warn_time;
544 switch (_IOC_NR(cmd) & EV_MAX) {
546 case 0: bits = dev->evbit; len = EV_MAX; break;
547 case EV_KEY: bits = dev->keybit; len = KEY_MAX; break;
548 case EV_REL: bits = dev->relbit; len = REL_MAX; break;
549 case EV_ABS: bits = dev->absbit; len = ABS_MAX; break;
550 case EV_MSC: bits = dev->mscbit; len = MSC_MAX; break;
551 case EV_LED: bits = dev->ledbit; len = LED_MAX; break;
552 case EV_SND: bits = dev->sndbit; len = SND_MAX; break;
553 case EV_FF: bits = dev->ffbit; len = FF_MAX; break;
554 case EV_SW: bits = dev->swbit; len = SW_MAX; break;
555 default: return -EINVAL;
560 * Work around bugs in userspace programs that like to do
561 * EVIOCGBIT(EV_KEY, KEY_MAX) and not realize that 'len'
562 * should be in bytes, not in bits.
564 if ((_IOC_NR(cmd) & EV_MAX) == EV_KEY && _IOC_SIZE(cmd) == OLD_KEY_MAX) {
566 if (printk_timed_ratelimit(&keymax_warn_time, 10 * 1000))
568 "evdev.c(EVIOCGBIT): Suspicious buffer size %u, "
569 "limiting output to %zu bytes. See "
570 "http://userweb.kernel.org/~dtor/eviocgbit-bug.html\n",
572 BITS_TO_LONGS(OLD_KEY_MAX) * sizeof(long));
576 return bits_to_user(bits, len, _IOC_SIZE(cmd), p, compat_mode);
580 static long evdev_do_ioctl(struct file *file, unsigned int cmd,
581 void __user *p, int compat_mode)
583 struct evdev_client *client = file->private_data;
584 struct evdev *evdev = client->evdev;
585 struct input_dev *dev = evdev->handle.dev;
586 struct input_absinfo abs;
587 struct ff_effect effect;
588 int __user *ip = (int __user *)p;
595 return put_user(EV_VERSION, ip);
598 if (copy_to_user(p, &dev->id, sizeof(struct input_id)))
603 if (!test_bit(EV_REP, dev->evbit))
605 if (put_user(dev->rep[REP_DELAY], ip))
607 if (put_user(dev->rep[REP_PERIOD], (ip + 1)))
612 if (!test_bit(EV_REP, dev->evbit))
616 if (get_user(v, ip + 1))
619 input_inject_event(&evdev->handle, EV_REP, REP_DELAY, u);
620 input_inject_event(&evdev->handle, EV_REP, REP_PERIOD, v);
628 error = input_get_keycode(dev, t, &v);
632 if (put_user(v, (ip + 1)))
638 if (get_user(t, ip) || get_user(v, ip + 1))
641 return input_set_keycode(dev, t, v);
645 return input_ff_erase(dev, (int)(unsigned long) p, file);
649 i = test_bit(EV_FF, dev->evbit) ?
650 dev->ff->max_effects : 0;
657 return evdev_grab(evdev, client);
659 return evdev_ungrab(evdev, client);
663 if (_IOC_TYPE(cmd) != 'E')
666 if (_IOC_DIR(cmd) == _IOC_READ) {
668 if ((_IOC_NR(cmd) & ~EV_MAX) == _IOC_NR(EVIOCGBIT(0,0)))
669 return handle_eviocgbit(dev, cmd, p, compat_mode);
671 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGKEY(0)))
672 return bits_to_user(dev->key, KEY_MAX, _IOC_SIZE(cmd),
675 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGLED(0)))
676 return bits_to_user(dev->led, LED_MAX, _IOC_SIZE(cmd),
679 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGSND(0)))
680 return bits_to_user(dev->snd, SND_MAX, _IOC_SIZE(cmd),
683 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGSW(0)))
684 return bits_to_user(dev->sw, SW_MAX, _IOC_SIZE(cmd),
687 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGNAME(0)))
688 return str_to_user(dev->name, _IOC_SIZE(cmd), p);
690 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGPHYS(0)))
691 return str_to_user(dev->phys, _IOC_SIZE(cmd), p);
693 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGUNIQ(0)))
694 return str_to_user(dev->uniq, _IOC_SIZE(cmd), p);
696 if ((_IOC_NR(cmd) & ~ABS_MAX) == _IOC_NR(EVIOCGABS(0))) {
698 t = _IOC_NR(cmd) & ABS_MAX;
700 abs.value = dev->abs[t];
701 abs.minimum = dev->absmin[t];
702 abs.maximum = dev->absmax[t];
703 abs.fuzz = dev->absfuzz[t];
704 abs.flat = dev->absflat[t];
706 if (copy_to_user(p, &abs, sizeof(struct input_absinfo)))
714 if (_IOC_DIR(cmd) == _IOC_WRITE) {
716 if (_IOC_NR(cmd) == _IOC_NR(EVIOCSFF)) {
718 if (input_ff_effect_from_user(p, _IOC_SIZE(cmd), &effect))
721 error = input_ff_upload(dev, &effect, file);
723 if (put_user(effect.id, &(((struct ff_effect __user *)p)->id)))
729 if ((_IOC_NR(cmd) & ~ABS_MAX) == _IOC_NR(EVIOCSABS(0))) {
731 t = _IOC_NR(cmd) & ABS_MAX;
733 if (copy_from_user(&abs, p,
734 sizeof(struct input_absinfo)))
738 * Take event lock to ensure that we are not
739 * changing device parameters in the middle
742 spin_lock_irq(&dev->event_lock);
744 dev->abs[t] = abs.value;
745 dev->absmin[t] = abs.minimum;
746 dev->absmax[t] = abs.maximum;
747 dev->absfuzz[t] = abs.fuzz;
748 dev->absflat[t] = abs.flat;
750 spin_unlock_irq(&dev->event_lock);
759 static long evdev_ioctl_handler(struct file *file, unsigned int cmd,
760 void __user *p, int compat_mode)
762 struct evdev_client *client = file->private_data;
763 struct evdev *evdev = client->evdev;
766 retval = mutex_lock_interruptible(&evdev->mutex);
775 retval = evdev_do_ioctl(file, cmd, p, compat_mode);
778 mutex_unlock(&evdev->mutex);
782 static long evdev_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
784 return evdev_ioctl_handler(file, cmd, (void __user *)arg, 0);
788 static long evdev_ioctl_compat(struct file *file,
789 unsigned int cmd, unsigned long arg)
791 return evdev_ioctl_handler(file, cmd, compat_ptr(arg), 1);
795 static const struct file_operations evdev_fops = {
796 .owner = THIS_MODULE,
798 .write = evdev_write,
801 .release = evdev_release,
802 .unlocked_ioctl = evdev_ioctl,
804 .compat_ioctl = evdev_ioctl_compat,
806 .fasync = evdev_fasync,
810 static int evdev_install_chrdev(struct evdev *evdev)
813 * No need to do any locking here as calls to connect and
814 * disconnect are serialized by the input core
816 evdev_table[evdev->minor] = evdev;
820 static void evdev_remove_chrdev(struct evdev *evdev)
823 * Lock evdev table to prevent race with evdev_open()
825 mutex_lock(&evdev_table_mutex);
826 evdev_table[evdev->minor] = NULL;
827 mutex_unlock(&evdev_table_mutex);
831 * Mark device non-existent. This disables writes, ioctls and
832 * prevents new users from opening the device. Already posted
833 * blocking reads will stay, however new ones will fail.
835 static void evdev_mark_dead(struct evdev *evdev)
837 mutex_lock(&evdev->mutex);
839 mutex_unlock(&evdev->mutex);
842 static void evdev_cleanup(struct evdev *evdev)
844 struct input_handle *handle = &evdev->handle;
846 evdev_mark_dead(evdev);
848 evdev_remove_chrdev(evdev);
850 /* evdev is marked dead so no one else accesses evdev->open */
852 input_flush_device(handle, NULL);
853 input_close_device(handle);
858 * Create new evdev device. Note that input core serializes calls
859 * to connect and disconnect so we don't need to lock evdev_table here.
861 static int evdev_connect(struct input_handler *handler, struct input_dev *dev,
862 const struct input_device_id *id)
868 for (minor = 0; minor < EVDEV_MINORS; minor++)
869 if (!evdev_table[minor])
872 if (minor == EVDEV_MINORS) {
873 printk(KERN_ERR "evdev: no more free evdev devices\n");
877 evdev = kzalloc(sizeof(struct evdev), GFP_KERNEL);
881 INIT_LIST_HEAD(&evdev->client_list);
882 spin_lock_init(&evdev->client_lock);
883 mutex_init(&evdev->mutex);
884 init_waitqueue_head(&evdev->wait);
886 snprintf(evdev->name, sizeof(evdev->name), "event%d", minor);
888 evdev->minor = minor;
890 evdev->handle.dev = input_get_device(dev);
891 evdev->handle.name = evdev->name;
892 evdev->handle.handler = handler;
893 evdev->handle.private = evdev;
895 dev_set_name(&evdev->dev, evdev->name);
896 evdev->dev.devt = MKDEV(INPUT_MAJOR, EVDEV_MINOR_BASE + minor);
897 evdev->dev.class = &input_class;
898 evdev->dev.parent = &dev->dev;
899 evdev->dev.release = evdev_free;
900 device_initialize(&evdev->dev);
902 error = input_register_handle(&evdev->handle);
906 error = evdev_install_chrdev(evdev);
908 goto err_unregister_handle;
910 error = device_add(&evdev->dev);
912 goto err_cleanup_evdev;
915 dde_evdev_open(minor);
921 evdev_cleanup(evdev);
922 err_unregister_handle:
923 input_unregister_handle(&evdev->handle);
925 put_device(&evdev->dev);
929 static void evdev_disconnect(struct input_handle *handle)
931 struct evdev *evdev = handle->private;
933 device_del(&evdev->dev);
934 evdev_cleanup(evdev);
935 input_unregister_handle(handle);
936 put_device(&evdev->dev);
939 static const struct input_device_id evdev_ids[] = {
940 { .driver_info = 1 }, /* Matches all devices */
941 { }, /* Terminating zero entry */
944 MODULE_DEVICE_TABLE(input, evdev_ids);
946 static struct input_handler evdev_handler = {
947 .event = evdev_event,
948 .connect = evdev_connect,
949 .disconnect = evdev_disconnect,
951 .minor = EVDEV_MINOR_BASE,
953 .id_table = evdev_ids,
956 static int __init evdev_init(void)
958 return input_register_handler(&evdev_handler);
961 static void __exit evdev_exit(void)
963 input_unregister_handler(&evdev_handler);
966 module_init(evdev_init);
967 module_exit(evdev_exit);
969 MODULE_AUTHOR("Vojtech Pavlik <vojtech@ucw.cz>");
970 MODULE_DESCRIPTION("Input driver event char devices");
971 MODULE_LICENSE("GPL");