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
15 #include <linux/poll.h>
16 #include <linux/slab.h>
17 #include <linux/module.h>
18 #include <linux/init.h>
19 #include <linux/input.h>
20 #include <linux/major.h>
21 #include <linux/smp_lock.h>
22 #include <linux/device.h>
23 #include <linux/devfs_fs_kernel.h>
24 #include <linux/compat.h>
31 struct input_handle handle;
32 wait_queue_head_t wait;
33 struct evdev_list *grab;
34 struct list_head list;
38 struct input_event buffer[EVDEV_BUFFER_SIZE];
41 struct fasync_struct *fasync;
43 struct list_head node;
46 static struct evdev *evdev_table[EVDEV_MINORS];
48 static void evdev_event(struct input_handle *handle, unsigned int type, unsigned int code, int value)
50 struct evdev *evdev = handle->private;
51 struct evdev_list *list;
56 do_gettimeofday(&list->buffer[list->head].time);
57 list->buffer[list->head].type = type;
58 list->buffer[list->head].code = code;
59 list->buffer[list->head].value = value;
60 list->head = (list->head + 1) & (EVDEV_BUFFER_SIZE - 1);
62 kill_fasync(&list->fasync, SIGIO, POLL_IN);
64 list_for_each_entry(list, &evdev->list, node) {
66 do_gettimeofday(&list->buffer[list->head].time);
67 list->buffer[list->head].type = type;
68 list->buffer[list->head].code = code;
69 list->buffer[list->head].value = value;
70 list->head = (list->head + 1) & (EVDEV_BUFFER_SIZE - 1);
72 kill_fasync(&list->fasync, SIGIO, POLL_IN);
75 wake_up_interruptible(&evdev->wait);
78 static int evdev_fasync(int fd, struct file *file, int on)
81 struct evdev_list *list = file->private_data;
82 retval = fasync_helper(fd, file, on, &list->fasync);
83 return retval < 0 ? retval : 0;
86 static int evdev_flush(struct file * file)
88 struct evdev_list *list = file->private_data;
89 if (!list->evdev->exist) return -ENODEV;
90 return input_flush_device(&list->evdev->handle, file);
93 static void evdev_free(struct evdev *evdev)
95 evdev_table[evdev->minor] = NULL;
99 static int evdev_release(struct inode * inode, struct file * file)
101 struct evdev_list *list = file->private_data;
103 if (list->evdev->grab == list) {
104 input_release_device(&list->evdev->handle);
105 list->evdev->grab = NULL;
108 evdev_fasync(-1, file, 0);
109 list_del(&list->node);
111 if (!--list->evdev->open) {
112 if (list->evdev->exist)
113 input_close_device(&list->evdev->handle);
115 evdev_free(list->evdev);
122 static int evdev_open(struct inode * inode, struct file * file)
124 struct evdev_list *list;
125 int i = iminor(inode) - EVDEV_MINOR_BASE;
128 if (i >= EVDEV_MINORS || !evdev_table[i] || !evdev_table[i]->exist)
131 if ((accept_err = input_accept_process(&(evdev_table[i]->handle), file)))
134 if (!(list = kmalloc(sizeof(struct evdev_list), GFP_KERNEL)))
136 memset(list, 0, sizeof(struct evdev_list));
138 list->evdev = evdev_table[i];
139 list_add_tail(&list->node, &evdev_table[i]->list);
140 file->private_data = list;
142 if (!list->evdev->open++)
143 if (list->evdev->exist)
144 input_open_device(&list->evdev->handle);
150 struct input_event_compat {
151 struct compat_timeval time;
158 # define COMPAT_TEST test_thread_flag(TIF_IA32)
159 #elif defined(CONFIG_IA64)
160 # define COMPAT_TEST IS_IA32_PROCESS(ia64_task_regs(current))
161 #elif defined(CONFIG_ARCH_S390)
162 # define COMPAT_TEST test_thread_flag(TIF_31BIT)
164 # define COMPAT_TEST test_thread_flag(TIF_32BIT)
167 static ssize_t evdev_write_compat(struct file * file, const char __user * buffer, size_t count, loff_t *ppos)
169 struct evdev_list *list = file->private_data;
170 struct input_event_compat event;
173 while (retval < count) {
174 if (copy_from_user(&event, buffer + retval, sizeof(struct input_event_compat)))
176 input_event(list->evdev->handle.dev, event.type, event.code, event.value);
177 retval += sizeof(struct input_event_compat);
184 static ssize_t evdev_write(struct file * file, const char __user * buffer, size_t count, loff_t *ppos)
186 struct evdev_list *list = file->private_data;
187 struct input_event event;
190 if (!list->evdev->exist) return -ENODEV;
194 return evdev_write_compat(file, buffer, count, ppos);
197 while (retval < count) {
199 if (copy_from_user(&event, buffer + retval, sizeof(struct input_event)))
201 input_event(list->evdev->handle.dev, event.type, event.code, event.value);
202 retval += sizeof(struct input_event);
209 static ssize_t evdev_read_compat(struct file * file, char __user * buffer, size_t count, loff_t *ppos)
211 struct evdev_list *list = file->private_data;
214 if (count < sizeof(struct input_event_compat))
217 if (list->head == list->tail && list->evdev->exist && (file->f_flags & O_NONBLOCK))
220 retval = wait_event_interruptible(list->evdev->wait,
221 list->head != list->tail || (!list->evdev->exist));
226 if (!list->evdev->exist)
229 while (list->head != list->tail && retval + sizeof(struct input_event_compat) <= count) {
230 struct input_event *event = (struct input_event *) list->buffer + list->tail;
231 struct input_event_compat event_compat;
232 event_compat.time.tv_sec = event->time.tv_sec;
233 event_compat.time.tv_usec = event->time.tv_usec;
234 event_compat.type = event->type;
235 event_compat.code = event->code;
236 event_compat.value = event->value;
238 if (copy_to_user(buffer + retval, &event_compat,
239 sizeof(struct input_event_compat))) return -EFAULT;
240 list->tail = (list->tail + 1) & (EVDEV_BUFFER_SIZE - 1);
241 retval += sizeof(struct input_event_compat);
248 static ssize_t evdev_read(struct file * file, char __user * buffer, size_t count, loff_t *ppos)
250 struct evdev_list *list = file->private_data;
255 return evdev_read_compat(file, buffer, count, ppos);
258 if (count < sizeof(struct input_event))
261 if (list->head == list->tail && list->evdev->exist && (file->f_flags & O_NONBLOCK))
264 retval = wait_event_interruptible(list->evdev->wait,
265 list->head != list->tail || (!list->evdev->exist));
270 if (!list->evdev->exist)
273 while (list->head != list->tail && retval + sizeof(struct input_event) <= count) {
274 if (copy_to_user(buffer + retval, list->buffer + list->tail,
275 sizeof(struct input_event))) return -EFAULT;
276 list->tail = (list->tail + 1) & (EVDEV_BUFFER_SIZE - 1);
277 retval += sizeof(struct input_event);
283 /* No kernel lock - fine */
284 static unsigned int evdev_poll(struct file *file, poll_table *wait)
286 struct evdev_list *list = file->private_data;
287 poll_wait(file, &list->evdev->wait, wait);
288 return ((list->head == list->tail) ? 0 : (POLLIN | POLLRDNORM)) |
289 (list->evdev->exist ? 0 : (POLLHUP | POLLERR));
292 static long evdev_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
294 struct evdev_list *list = file->private_data;
295 struct evdev *evdev = list->evdev;
296 struct input_dev *dev = evdev->handle.dev;
297 struct input_absinfo abs;
298 void __user *p = (void __user *)arg;
299 int __user *ip = (int __user *)arg;
302 if (!evdev->exist) return -ENODEV;
307 return put_user(EV_VERSION, ip);
310 return copy_to_user(p, &dev->id, sizeof(struct input_id)) ? -EFAULT : 0;
313 if (get_user(t, ip)) return -EFAULT;
314 if (t < 0 || t >= dev->keycodemax || !dev->keycodesize) return -EINVAL;
315 if (put_user(INPUT_KEYCODE(dev, t), ip + 1)) return -EFAULT;
319 if (get_user(t, ip)) return -EFAULT;
320 if (t < 0 || t >= dev->keycodemax || !dev->keycodesize) return -EINVAL;
321 if (get_user(v, ip + 1)) return -EFAULT;
322 if (v < 0 || v > KEY_MAX) return -EINVAL;
323 if (v >> (dev->keycodesize * 8)) return -EINVAL;
324 u = SET_INPUT_KEYCODE(dev, t, v);
325 clear_bit(u, dev->keybit);
326 set_bit(v, dev->keybit);
327 for (i = 0; i < dev->keycodemax; i++)
328 if (INPUT_KEYCODE(dev,i) == u)
329 set_bit(u, dev->keybit);
333 if (dev->upload_effect) {
334 struct ff_effect effect;
337 if (copy_from_user(&effect, p, sizeof(effect)))
339 err = dev->upload_effect(dev, &effect);
340 if (put_user(effect.id, &(((struct ff_effect __user *)arg)->id)))
347 if (dev->erase_effect) {
348 return dev->erase_effect(dev, (int)arg);
353 if (put_user(dev->ff_effects_max, ip))
361 if (input_grab_device(&evdev->handle))
366 if (evdev->grab != list)
368 input_release_device(&evdev->handle);
375 if (_IOC_TYPE(cmd) != 'E')
378 if (_IOC_DIR(cmd) == _IOC_READ) {
380 if ((_IOC_NR(cmd) & ~EV_MAX) == _IOC_NR(EVIOCGBIT(0,0))) {
385 switch (_IOC_NR(cmd) & EV_MAX) {
386 case 0: bits = dev->evbit; len = EV_MAX; break;
387 case EV_KEY: bits = dev->keybit; len = KEY_MAX; break;
388 case EV_REL: bits = dev->relbit; len = REL_MAX; break;
389 case EV_ABS: bits = dev->absbit; len = ABS_MAX; break;
390 case EV_MSC: bits = dev->mscbit; len = MSC_MAX; break;
391 case EV_LED: bits = dev->ledbit; len = LED_MAX; break;
392 case EV_SND: bits = dev->sndbit; len = SND_MAX; break;
393 case EV_FF: bits = dev->ffbit; len = FF_MAX; break;
394 default: return -EINVAL;
396 len = NBITS(len) * sizeof(long);
397 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd);
398 return copy_to_user(p, bits, len) ? -EFAULT : len;
401 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGKEY(0))) {
403 len = NBITS(KEY_MAX) * sizeof(long);
404 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd);
405 return copy_to_user(p, dev->key, len) ? -EFAULT : len;
408 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGLED(0))) {
410 len = NBITS(LED_MAX) * sizeof(long);
411 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd);
412 return copy_to_user(p, dev->led, len) ? -EFAULT : len;
415 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGSND(0))) {
417 len = NBITS(SND_MAX) * sizeof(long);
418 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd);
419 return copy_to_user(p, dev->snd, len) ? -EFAULT : len;
422 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGNAME(0))) {
424 if (!dev->name) return -ENOENT;
425 len = strlen(dev->name) + 1;
426 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd);
427 return copy_to_user(p, dev->name, len) ? -EFAULT : len;
430 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGPHYS(0))) {
432 if (!dev->phys) return -ENOENT;
433 len = strlen(dev->phys) + 1;
434 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd);
435 return copy_to_user(p, dev->phys, len) ? -EFAULT : len;
438 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGUNIQ(0))) {
440 if (!dev->uniq) return -ENOENT;
441 len = strlen(dev->uniq) + 1;
442 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd);
443 return copy_to_user(p, dev->uniq, len) ? -EFAULT : len;
446 if ((_IOC_NR(cmd) & ~ABS_MAX) == _IOC_NR(EVIOCGABS(0))) {
448 int t = _IOC_NR(cmd) & ABS_MAX;
450 abs.value = dev->abs[t];
451 abs.minimum = dev->absmin[t];
452 abs.maximum = dev->absmax[t];
453 abs.fuzz = dev->absfuzz[t];
454 abs.flat = dev->absflat[t];
456 if (copy_to_user(p, &abs, sizeof(struct input_absinfo)))
464 if (_IOC_DIR(cmd) == _IOC_WRITE) {
466 if ((_IOC_NR(cmd) & ~ABS_MAX) == _IOC_NR(EVIOCSABS(0))) {
468 int t = _IOC_NR(cmd) & ABS_MAX;
470 if (copy_from_user(&abs, p, sizeof(struct input_absinfo)))
473 dev->abs[t] = abs.value;
474 dev->absmin[t] = abs.minimum;
475 dev->absmax[t] = abs.maximum;
476 dev->absfuzz[t] = abs.fuzz;
477 dev->absflat[t] = abs.flat;
488 #define BITS_PER_LONG_COMPAT (sizeof(compat_long_t) * 8)
489 #define NBITS_COMPAT(x) ((((x)-1)/BITS_PER_LONG_COMPAT)+1)
490 #define OFF_COMPAT(x) ((x)%BITS_PER_LONG_COMPAT)
491 #define BIT_COMPAT(x) (1UL<<OFF_COMPAT(x))
492 #define LONG_COMPAT(x) ((x)/BITS_PER_LONG_COMPAT)
493 #define test_bit_compat(bit, array) ((array[LONG_COMPAT(bit)] >> OFF_COMPAT(bit)) & 1)
496 #define bit_to_user(bit, max) \
499 int len = NBITS_COMPAT((max)) * sizeof(compat_long_t); \
500 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd); \
501 for (i = 0; i < len / sizeof(compat_long_t); i++) \
502 if (copy_to_user((compat_long_t*) p + i, \
503 (compat_long_t*) (bit) + i + 1 - ((i % 2) << 1), \
504 sizeof(compat_long_t))) \
509 #define bit_to_user(bit, max) \
511 int len = NBITS_COMPAT((max)) * sizeof(compat_long_t); \
512 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd); \
513 return copy_to_user(p, (bit), len) ? -EFAULT : len; \
517 static long evdev_ioctl_compat(struct file *file, unsigned int cmd, unsigned long arg)
519 struct evdev_list *list = file->private_data;
520 struct evdev *evdev = list->evdev;
521 struct input_dev *dev = evdev->handle.dev;
522 struct input_absinfo abs;
523 void __user *p = compat_ptr(arg);
525 if (!evdev->exist) return -ENODEV;
537 return evdev_ioctl(file, cmd, (unsigned long) p);
541 if (_IOC_TYPE(cmd) != 'E')
544 if (_IOC_DIR(cmd) == _IOC_READ) {
546 if ((_IOC_NR(cmd) & ~EV_MAX) == _IOC_NR(EVIOCGBIT(0,0))) {
550 switch (_IOC_NR(cmd) & EV_MAX) {
551 case 0: bits = dev->evbit; max = EV_MAX; break;
552 case EV_KEY: bits = dev->keybit; max = KEY_MAX; break;
553 case EV_REL: bits = dev->relbit; max = REL_MAX; break;
554 case EV_ABS: bits = dev->absbit; max = ABS_MAX; break;
555 case EV_MSC: bits = dev->mscbit; max = MSC_MAX; break;
556 case EV_LED: bits = dev->ledbit; max = LED_MAX; break;
557 case EV_SND: bits = dev->sndbit; max = SND_MAX; break;
558 case EV_FF: bits = dev->ffbit; max = FF_MAX; break;
559 default: return -EINVAL;
561 bit_to_user(bits, max);
564 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGKEY(0)))
565 bit_to_user(dev->key, KEY_MAX);
567 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGLED(0)))
568 bit_to_user(dev->led, LED_MAX);
570 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGSND(0)))
571 bit_to_user(dev->snd, SND_MAX);
573 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGNAME(0))) {
575 if (!dev->name) return -ENOENT;
576 len = strlen(dev->name) + 1;
577 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd);
578 return copy_to_user(p, dev->name, len) ? -EFAULT : len;
581 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGPHYS(0))) {
583 if (!dev->phys) return -ENOENT;
584 len = strlen(dev->phys) + 1;
585 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd);
586 return copy_to_user(p, dev->phys, len) ? -EFAULT : len;
589 if (_IOC_NR(cmd) == _IOC_NR(EVIOCGUNIQ(0))) {
591 if (!dev->uniq) return -ENOENT;
592 len = strlen(dev->uniq) + 1;
593 if (len > _IOC_SIZE(cmd)) len = _IOC_SIZE(cmd);
594 return copy_to_user(p, dev->uniq, len) ? -EFAULT : len;
597 if ((_IOC_NR(cmd) & ~ABS_MAX) == _IOC_NR(EVIOCGABS(0))) {
599 int t = _IOC_NR(cmd) & ABS_MAX;
601 abs.value = dev->abs[t];
602 abs.minimum = dev->absmin[t];
603 abs.maximum = dev->absmax[t];
604 abs.fuzz = dev->absfuzz[t];
605 abs.flat = dev->absflat[t];
607 if (copy_to_user(p, &abs, sizeof(struct input_absinfo)))
614 if (_IOC_DIR(cmd) == _IOC_WRITE) {
616 if ((_IOC_NR(cmd) & ~ABS_MAX) == _IOC_NR(EVIOCSABS(0))) {
618 int t = _IOC_NR(cmd) & ABS_MAX;
620 if (copy_from_user(&abs, p, sizeof(struct input_absinfo)))
623 dev->abs[t] = abs.value;
624 dev->absmin[t] = abs.minimum;
625 dev->absmax[t] = abs.maximum;
626 dev->absfuzz[t] = abs.fuzz;
627 dev->absflat[t] = abs.flat;
637 static struct file_operations evdev_fops = {
638 .owner = THIS_MODULE,
640 .write = evdev_write,
643 .release = evdev_release,
644 .unlocked_ioctl = evdev_ioctl,
646 .compat_ioctl = evdev_ioctl_compat,
648 .fasync = evdev_fasync,
652 static struct input_handle *evdev_connect(struct input_handler *handler, struct input_dev *dev, struct input_device_id *id)
657 for (minor = 0; minor < EVDEV_MINORS && evdev_table[minor]; minor++);
658 if (minor == EVDEV_MINORS) {
659 printk(KERN_ERR "evdev: no more free evdev devices\n");
663 if (!(evdev = kmalloc(sizeof(struct evdev), GFP_KERNEL)))
665 memset(evdev, 0, sizeof(struct evdev));
667 INIT_LIST_HEAD(&evdev->list);
668 init_waitqueue_head(&evdev->wait);
671 evdev->minor = minor;
672 evdev->handle.dev = dev;
673 evdev->handle.name = evdev->name;
674 evdev->handle.handler = handler;
675 evdev->handle.private = evdev;
676 sprintf(evdev->name, "event%d", minor);
678 evdev_table[minor] = evdev;
680 devfs_mk_cdev(MKDEV(INPUT_MAJOR, EVDEV_MINOR_BASE + minor),
681 S_IFCHR|S_IRUGO|S_IWUSR, "input/event%d", minor);
682 class_device_create(input_class,
683 MKDEV(INPUT_MAJOR, EVDEV_MINOR_BASE + minor),
684 dev->dev, "event%d", minor);
686 return &evdev->handle;
689 static void evdev_disconnect(struct input_handle *handle)
691 struct evdev *evdev = handle->private;
692 struct evdev_list *list;
694 class_device_destroy(input_class,
695 MKDEV(INPUT_MAJOR, EVDEV_MINOR_BASE + evdev->minor));
696 devfs_remove("input/event%d", evdev->minor);
700 input_close_device(handle);
701 wake_up_interruptible(&evdev->wait);
702 list_for_each_entry(list, &evdev->list, node)
703 kill_fasync(&list->fasync, SIGIO, POLL_HUP);
708 static struct input_device_id evdev_ids[] = {
709 { .driver_info = 1 }, /* Matches all devices */
710 { }, /* Terminating zero entry */
713 MODULE_DEVICE_TABLE(input, evdev_ids);
715 static struct input_handler evdev_handler = {
716 .event = evdev_event,
717 .connect = evdev_connect,
718 .disconnect = evdev_disconnect,
720 .minor = EVDEV_MINOR_BASE,
722 .id_table = evdev_ids,
725 static int __init evdev_init(void)
727 input_register_handler(&evdev_handler);
731 static void __exit evdev_exit(void)
733 input_unregister_handler(&evdev_handler);
736 module_init(evdev_init);
737 module_exit(evdev_exit);
739 MODULE_AUTHOR("Vojtech Pavlik <vojtech@ucw.cz>");
740 MODULE_DESCRIPTION("Input driver event char devices");
741 MODULE_LICENSE("GPL");