Loading...
1/*
2 * Input driver to ExplorerPS/2 device driver module.
3 *
4 * Copyright (c) 1999-2002 Vojtech Pavlik
5 * Copyright (c) 2004 Dmitry Torokhov
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License version 2 as published by
9 * the Free Software Foundation.
10 */
11
12#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
13
14#define MOUSEDEV_MINOR_BASE 32
15#define MOUSEDEV_MINORS 32
16#define MOUSEDEV_MIX 31
17
18#include <linux/sched.h>
19#include <linux/slab.h>
20#include <linux/poll.h>
21#include <linux/module.h>
22#include <linux/init.h>
23#include <linux/input.h>
24#include <linux/random.h>
25#include <linux/major.h>
26#include <linux/device.h>
27#include <linux/kernel.h>
28#ifdef CONFIG_INPUT_MOUSEDEV_PSAUX
29#include <linux/miscdevice.h>
30#endif
31
32MODULE_AUTHOR("Vojtech Pavlik <vojtech@ucw.cz>");
33MODULE_DESCRIPTION("Mouse (ExplorerPS/2) device interfaces");
34MODULE_LICENSE("GPL");
35
36#ifndef CONFIG_INPUT_MOUSEDEV_SCREEN_X
37#define CONFIG_INPUT_MOUSEDEV_SCREEN_X 1024
38#endif
39#ifndef CONFIG_INPUT_MOUSEDEV_SCREEN_Y
40#define CONFIG_INPUT_MOUSEDEV_SCREEN_Y 768
41#endif
42
43static int xres = CONFIG_INPUT_MOUSEDEV_SCREEN_X;
44module_param(xres, uint, 0644);
45MODULE_PARM_DESC(xres, "Horizontal screen resolution");
46
47static int yres = CONFIG_INPUT_MOUSEDEV_SCREEN_Y;
48module_param(yres, uint, 0644);
49MODULE_PARM_DESC(yres, "Vertical screen resolution");
50
51static unsigned tap_time = 200;
52module_param(tap_time, uint, 0644);
53MODULE_PARM_DESC(tap_time, "Tap time for touchpads in absolute mode (msecs)");
54
55struct mousedev_hw_data {
56 int dx, dy, dz;
57 int x, y;
58 int abs_event;
59 unsigned long buttons;
60};
61
62struct mousedev {
63 int open;
64 int minor;
65 struct input_handle handle;
66 wait_queue_head_t wait;
67 struct list_head client_list;
68 spinlock_t client_lock; /* protects client_list */
69 struct mutex mutex;
70 struct device dev;
71 bool exist;
72
73 struct list_head mixdev_node;
74 int mixdev_open;
75
76 struct mousedev_hw_data packet;
77 unsigned int pkt_count;
78 int old_x[4], old_y[4];
79 int frac_dx, frac_dy;
80 unsigned long touch;
81};
82
83enum mousedev_emul {
84 MOUSEDEV_EMUL_PS2,
85 MOUSEDEV_EMUL_IMPS,
86 MOUSEDEV_EMUL_EXPS
87};
88
89struct mousedev_motion {
90 int dx, dy, dz;
91 unsigned long buttons;
92};
93
94#define PACKET_QUEUE_LEN 16
95struct mousedev_client {
96 struct fasync_struct *fasync;
97 struct mousedev *mousedev;
98 struct list_head node;
99
100 struct mousedev_motion packets[PACKET_QUEUE_LEN];
101 unsigned int head, tail;
102 spinlock_t packet_lock;
103 int pos_x, pos_y;
104
105 signed char ps2[6];
106 unsigned char ready, buffer, bufsiz;
107 unsigned char imexseq, impsseq;
108 enum mousedev_emul mode;
109 unsigned long last_buttons;
110};
111
112#define MOUSEDEV_SEQ_LEN 6
113
114static unsigned char mousedev_imps_seq[] = { 0xf3, 200, 0xf3, 100, 0xf3, 80 };
115static unsigned char mousedev_imex_seq[] = { 0xf3, 200, 0xf3, 200, 0xf3, 80 };
116
117static struct input_handler mousedev_handler;
118
119static struct mousedev *mousedev_table[MOUSEDEV_MINORS];
120static DEFINE_MUTEX(mousedev_table_mutex);
121static struct mousedev *mousedev_mix;
122static LIST_HEAD(mousedev_mix_list);
123
124static void mixdev_open_devices(void);
125static void mixdev_close_devices(void);
126
127#define fx(i) (mousedev->old_x[(mousedev->pkt_count - (i)) & 03])
128#define fy(i) (mousedev->old_y[(mousedev->pkt_count - (i)) & 03])
129
130static void mousedev_touchpad_event(struct input_dev *dev,
131 struct mousedev *mousedev,
132 unsigned int code, int value)
133{
134 int size, tmp;
135 enum { FRACTION_DENOM = 128 };
136
137 switch (code) {
138
139 case ABS_X:
140
141 fx(0) = value;
142 if (mousedev->touch && mousedev->pkt_count >= 2) {
143 size = input_abs_get_max(dev, ABS_X) -
144 input_abs_get_min(dev, ABS_X);
145 if (size == 0)
146 size = 256 * 2;
147
148 tmp = ((value - fx(2)) * 256 * FRACTION_DENOM) / size;
149 tmp += mousedev->frac_dx;
150 mousedev->packet.dx = tmp / FRACTION_DENOM;
151 mousedev->frac_dx =
152 tmp - mousedev->packet.dx * FRACTION_DENOM;
153 }
154 break;
155
156 case ABS_Y:
157 fy(0) = value;
158 if (mousedev->touch && mousedev->pkt_count >= 2) {
159 /* use X size for ABS_Y to keep the same scale */
160 size = input_abs_get_max(dev, ABS_X) -
161 input_abs_get_min(dev, ABS_X);
162 if (size == 0)
163 size = 256 * 2;
164
165 tmp = -((value - fy(2)) * 256 * FRACTION_DENOM) / size;
166 tmp += mousedev->frac_dy;
167 mousedev->packet.dy = tmp / FRACTION_DENOM;
168 mousedev->frac_dy = tmp -
169 mousedev->packet.dy * FRACTION_DENOM;
170 }
171 break;
172 }
173}
174
175static void mousedev_abs_event(struct input_dev *dev, struct mousedev *mousedev,
176 unsigned int code, int value)
177{
178 int min, max, size;
179
180 switch (code) {
181
182 case ABS_X:
183 min = input_abs_get_min(dev, ABS_X);
184 max = input_abs_get_max(dev, ABS_X);
185
186 size = max - min;
187 if (size == 0)
188 size = xres ? : 1;
189
190 value = clamp(value, min, max);
191
192 mousedev->packet.x = ((value - min) * xres) / size;
193 mousedev->packet.abs_event = 1;
194 break;
195
196 case ABS_Y:
197 min = input_abs_get_min(dev, ABS_Y);
198 max = input_abs_get_max(dev, ABS_Y);
199
200 size = max - min;
201 if (size == 0)
202 size = yres ? : 1;
203
204 value = clamp(value, min, max);
205
206 mousedev->packet.y = yres - ((value - min) * yres) / size;
207 mousedev->packet.abs_event = 1;
208 break;
209 }
210}
211
212static void mousedev_rel_event(struct mousedev *mousedev,
213 unsigned int code, int value)
214{
215 switch (code) {
216 case REL_X:
217 mousedev->packet.dx += value;
218 break;
219
220 case REL_Y:
221 mousedev->packet.dy -= value;
222 break;
223
224 case REL_WHEEL:
225 mousedev->packet.dz -= value;
226 break;
227 }
228}
229
230static void mousedev_key_event(struct mousedev *mousedev,
231 unsigned int code, int value)
232{
233 int index;
234
235 switch (code) {
236
237 case BTN_TOUCH:
238 case BTN_0:
239 case BTN_LEFT: index = 0; break;
240
241 case BTN_STYLUS:
242 case BTN_1:
243 case BTN_RIGHT: index = 1; break;
244
245 case BTN_2:
246 case BTN_FORWARD:
247 case BTN_STYLUS2:
248 case BTN_MIDDLE: index = 2; break;
249
250 case BTN_3:
251 case BTN_BACK:
252 case BTN_SIDE: index = 3; break;
253
254 case BTN_4:
255 case BTN_EXTRA: index = 4; break;
256
257 default: return;
258 }
259
260 if (value) {
261 set_bit(index, &mousedev->packet.buttons);
262 set_bit(index, &mousedev_mix->packet.buttons);
263 } else {
264 clear_bit(index, &mousedev->packet.buttons);
265 clear_bit(index, &mousedev_mix->packet.buttons);
266 }
267}
268
269static void mousedev_notify_readers(struct mousedev *mousedev,
270 struct mousedev_hw_data *packet)
271{
272 struct mousedev_client *client;
273 struct mousedev_motion *p;
274 unsigned int new_head;
275 int wake_readers = 0;
276
277 rcu_read_lock();
278 list_for_each_entry_rcu(client, &mousedev->client_list, node) {
279
280 /* Just acquire the lock, interrupts already disabled */
281 spin_lock(&client->packet_lock);
282
283 p = &client->packets[client->head];
284 if (client->ready && p->buttons != mousedev->packet.buttons) {
285 new_head = (client->head + 1) % PACKET_QUEUE_LEN;
286 if (new_head != client->tail) {
287 p = &client->packets[client->head = new_head];
288 memset(p, 0, sizeof(struct mousedev_motion));
289 }
290 }
291
292 if (packet->abs_event) {
293 p->dx += packet->x - client->pos_x;
294 p->dy += packet->y - client->pos_y;
295 client->pos_x = packet->x;
296 client->pos_y = packet->y;
297 }
298
299 client->pos_x += packet->dx;
300 client->pos_x = client->pos_x < 0 ?
301 0 : (client->pos_x >= xres ? xres : client->pos_x);
302 client->pos_y += packet->dy;
303 client->pos_y = client->pos_y < 0 ?
304 0 : (client->pos_y >= yres ? yres : client->pos_y);
305
306 p->dx += packet->dx;
307 p->dy += packet->dy;
308 p->dz += packet->dz;
309 p->buttons = mousedev->packet.buttons;
310
311 if (p->dx || p->dy || p->dz ||
312 p->buttons != client->last_buttons)
313 client->ready = 1;
314
315 spin_unlock(&client->packet_lock);
316
317 if (client->ready) {
318 kill_fasync(&client->fasync, SIGIO, POLL_IN);
319 wake_readers = 1;
320 }
321 }
322 rcu_read_unlock();
323
324 if (wake_readers)
325 wake_up_interruptible(&mousedev->wait);
326}
327
328static void mousedev_touchpad_touch(struct mousedev *mousedev, int value)
329{
330 if (!value) {
331 if (mousedev->touch &&
332 time_before(jiffies,
333 mousedev->touch + msecs_to_jiffies(tap_time))) {
334 /*
335 * Toggle left button to emulate tap.
336 * We rely on the fact that mousedev_mix always has 0
337 * motion packet so we won't mess current position.
338 */
339 set_bit(0, &mousedev->packet.buttons);
340 set_bit(0, &mousedev_mix->packet.buttons);
341 mousedev_notify_readers(mousedev, &mousedev_mix->packet);
342 mousedev_notify_readers(mousedev_mix,
343 &mousedev_mix->packet);
344 clear_bit(0, &mousedev->packet.buttons);
345 clear_bit(0, &mousedev_mix->packet.buttons);
346 }
347 mousedev->touch = mousedev->pkt_count = 0;
348 mousedev->frac_dx = 0;
349 mousedev->frac_dy = 0;
350
351 } else if (!mousedev->touch)
352 mousedev->touch = jiffies;
353}
354
355static void mousedev_event(struct input_handle *handle,
356 unsigned int type, unsigned int code, int value)
357{
358 struct mousedev *mousedev = handle->private;
359
360 switch (type) {
361
362 case EV_ABS:
363 /* Ignore joysticks */
364 if (test_bit(BTN_TRIGGER, handle->dev->keybit))
365 return;
366
367 if (test_bit(BTN_TOOL_FINGER, handle->dev->keybit))
368 mousedev_touchpad_event(handle->dev,
369 mousedev, code, value);
370 else
371 mousedev_abs_event(handle->dev, mousedev, code, value);
372
373 break;
374
375 case EV_REL:
376 mousedev_rel_event(mousedev, code, value);
377 break;
378
379 case EV_KEY:
380 if (value != 2) {
381 if (code == BTN_TOUCH &&
382 test_bit(BTN_TOOL_FINGER, handle->dev->keybit))
383 mousedev_touchpad_touch(mousedev, value);
384 else
385 mousedev_key_event(mousedev, code, value);
386 }
387 break;
388
389 case EV_SYN:
390 if (code == SYN_REPORT) {
391 if (mousedev->touch) {
392 mousedev->pkt_count++;
393 /*
394 * Input system eats duplicate events,
395 * but we need all of them to do correct
396 * averaging so apply present one forward
397 */
398 fx(0) = fx(1);
399 fy(0) = fy(1);
400 }
401
402 mousedev_notify_readers(mousedev, &mousedev->packet);
403 mousedev_notify_readers(mousedev_mix, &mousedev->packet);
404
405 mousedev->packet.dx = mousedev->packet.dy =
406 mousedev->packet.dz = 0;
407 mousedev->packet.abs_event = 0;
408 }
409 break;
410 }
411}
412
413static int mousedev_fasync(int fd, struct file *file, int on)
414{
415 struct mousedev_client *client = file->private_data;
416
417 return fasync_helper(fd, file, on, &client->fasync);
418}
419
420static void mousedev_free(struct device *dev)
421{
422 struct mousedev *mousedev = container_of(dev, struct mousedev, dev);
423
424 input_put_device(mousedev->handle.dev);
425 kfree(mousedev);
426}
427
428static int mousedev_open_device(struct mousedev *mousedev)
429{
430 int retval;
431
432 retval = mutex_lock_interruptible(&mousedev->mutex);
433 if (retval)
434 return retval;
435
436 if (mousedev->minor == MOUSEDEV_MIX)
437 mixdev_open_devices();
438 else if (!mousedev->exist)
439 retval = -ENODEV;
440 else if (!mousedev->open++) {
441 retval = input_open_device(&mousedev->handle);
442 if (retval)
443 mousedev->open--;
444 }
445
446 mutex_unlock(&mousedev->mutex);
447 return retval;
448}
449
450static void mousedev_close_device(struct mousedev *mousedev)
451{
452 mutex_lock(&mousedev->mutex);
453
454 if (mousedev->minor == MOUSEDEV_MIX)
455 mixdev_close_devices();
456 else if (mousedev->exist && !--mousedev->open)
457 input_close_device(&mousedev->handle);
458
459 mutex_unlock(&mousedev->mutex);
460}
461
462/*
463 * Open all available devices so they can all be multiplexed in one.
464 * stream. Note that this function is called with mousedev_mix->mutex
465 * held.
466 */
467static void mixdev_open_devices(void)
468{
469 struct mousedev *mousedev;
470
471 if (mousedev_mix->open++)
472 return;
473
474 list_for_each_entry(mousedev, &mousedev_mix_list, mixdev_node) {
475 if (!mousedev->mixdev_open) {
476 if (mousedev_open_device(mousedev))
477 continue;
478
479 mousedev->mixdev_open = 1;
480 }
481 }
482}
483
484/*
485 * Close all devices that were opened as part of multiplexed
486 * device. Note that this function is called with mousedev_mix->mutex
487 * held.
488 */
489static void mixdev_close_devices(void)
490{
491 struct mousedev *mousedev;
492
493 if (--mousedev_mix->open)
494 return;
495
496 list_for_each_entry(mousedev, &mousedev_mix_list, mixdev_node) {
497 if (mousedev->mixdev_open) {
498 mousedev->mixdev_open = 0;
499 mousedev_close_device(mousedev);
500 }
501 }
502}
503
504
505static void mousedev_attach_client(struct mousedev *mousedev,
506 struct mousedev_client *client)
507{
508 spin_lock(&mousedev->client_lock);
509 list_add_tail_rcu(&client->node, &mousedev->client_list);
510 spin_unlock(&mousedev->client_lock);
511}
512
513static void mousedev_detach_client(struct mousedev *mousedev,
514 struct mousedev_client *client)
515{
516 spin_lock(&mousedev->client_lock);
517 list_del_rcu(&client->node);
518 spin_unlock(&mousedev->client_lock);
519 synchronize_rcu();
520}
521
522static int mousedev_release(struct inode *inode, struct file *file)
523{
524 struct mousedev_client *client = file->private_data;
525 struct mousedev *mousedev = client->mousedev;
526
527 mousedev_detach_client(mousedev, client);
528 kfree(client);
529
530 mousedev_close_device(mousedev);
531 put_device(&mousedev->dev);
532
533 return 0;
534}
535
536static int mousedev_open(struct inode *inode, struct file *file)
537{
538 struct mousedev_client *client;
539 struct mousedev *mousedev;
540 int error;
541 int i;
542
543#ifdef CONFIG_INPUT_MOUSEDEV_PSAUX
544 if (imajor(inode) == MISC_MAJOR)
545 i = MOUSEDEV_MIX;
546 else
547#endif
548 i = iminor(inode) - MOUSEDEV_MINOR_BASE;
549
550 if (i >= MOUSEDEV_MINORS)
551 return -ENODEV;
552
553 error = mutex_lock_interruptible(&mousedev_table_mutex);
554 if (error) {
555 return error;
556 }
557 mousedev = mousedev_table[i];
558 if (mousedev)
559 get_device(&mousedev->dev);
560 mutex_unlock(&mousedev_table_mutex);
561
562 if (!mousedev) {
563 return -ENODEV;
564 }
565
566 client = kzalloc(sizeof(struct mousedev_client), GFP_KERNEL);
567 if (!client) {
568 error = -ENOMEM;
569 goto err_put_mousedev;
570 }
571
572 spin_lock_init(&client->packet_lock);
573 client->pos_x = xres / 2;
574 client->pos_y = yres / 2;
575 client->mousedev = mousedev;
576 mousedev_attach_client(mousedev, client);
577
578 error = mousedev_open_device(mousedev);
579 if (error)
580 goto err_free_client;
581
582 file->private_data = client;
583 return 0;
584
585 err_free_client:
586 mousedev_detach_client(mousedev, client);
587 kfree(client);
588 err_put_mousedev:
589 put_device(&mousedev->dev);
590 return error;
591}
592
593static inline int mousedev_limit_delta(int delta, int limit)
594{
595 return delta > limit ? limit : (delta < -limit ? -limit : delta);
596}
597
598static void mousedev_packet(struct mousedev_client *client,
599 signed char *ps2_data)
600{
601 struct mousedev_motion *p = &client->packets[client->tail];
602
603 ps2_data[0] = 0x08 |
604 ((p->dx < 0) << 4) | ((p->dy < 0) << 5) | (p->buttons & 0x07);
605 ps2_data[1] = mousedev_limit_delta(p->dx, 127);
606 ps2_data[2] = mousedev_limit_delta(p->dy, 127);
607 p->dx -= ps2_data[1];
608 p->dy -= ps2_data[2];
609
610 switch (client->mode) {
611 case MOUSEDEV_EMUL_EXPS:
612 ps2_data[3] = mousedev_limit_delta(p->dz, 7);
613 p->dz -= ps2_data[3];
614 ps2_data[3] = (ps2_data[3] & 0x0f) | ((p->buttons & 0x18) << 1);
615 client->bufsiz = 4;
616 break;
617
618 case MOUSEDEV_EMUL_IMPS:
619 ps2_data[0] |=
620 ((p->buttons & 0x10) >> 3) | ((p->buttons & 0x08) >> 1);
621 ps2_data[3] = mousedev_limit_delta(p->dz, 127);
622 p->dz -= ps2_data[3];
623 client->bufsiz = 4;
624 break;
625
626 case MOUSEDEV_EMUL_PS2:
627 default:
628 ps2_data[0] |=
629 ((p->buttons & 0x10) >> 3) | ((p->buttons & 0x08) >> 1);
630 p->dz = 0;
631 client->bufsiz = 3;
632 break;
633 }
634
635 if (!p->dx && !p->dy && !p->dz) {
636 if (client->tail == client->head) {
637 client->ready = 0;
638 client->last_buttons = p->buttons;
639 } else
640 client->tail = (client->tail + 1) % PACKET_QUEUE_LEN;
641 }
642}
643
644static void mousedev_generate_response(struct mousedev_client *client,
645 int command)
646{
647 client->ps2[0] = 0xfa; /* ACK */
648
649 switch (command) {
650
651 case 0xeb: /* Poll */
652 mousedev_packet(client, &client->ps2[1]);
653 client->bufsiz++; /* account for leading ACK */
654 break;
655
656 case 0xf2: /* Get ID */
657 switch (client->mode) {
658 case MOUSEDEV_EMUL_PS2:
659 client->ps2[1] = 0;
660 break;
661 case MOUSEDEV_EMUL_IMPS:
662 client->ps2[1] = 3;
663 break;
664 case MOUSEDEV_EMUL_EXPS:
665 client->ps2[1] = 4;
666 break;
667 }
668 client->bufsiz = 2;
669 break;
670
671 case 0xe9: /* Get info */
672 client->ps2[1] = 0x60; client->ps2[2] = 3; client->ps2[3] = 200;
673 client->bufsiz = 4;
674 break;
675
676 case 0xff: /* Reset */
677 client->impsseq = client->imexseq = 0;
678 client->mode = MOUSEDEV_EMUL_PS2;
679 client->ps2[1] = 0xaa; client->ps2[2] = 0x00;
680 client->bufsiz = 3;
681 break;
682
683 default:
684 client->bufsiz = 1;
685 break;
686 }
687 client->buffer = client->bufsiz;
688}
689
690static ssize_t mousedev_write(struct file *file, const char __user *buffer,
691 size_t count, loff_t *ppos)
692{
693 struct mousedev_client *client = file->private_data;
694 unsigned char c;
695 unsigned int i;
696
697 for (i = 0; i < count; i++) {
698
699 if (get_user(c, buffer + i))
700 return -EFAULT;
701
702 spin_lock_irq(&client->packet_lock);
703
704 if (c == mousedev_imex_seq[client->imexseq]) {
705 if (++client->imexseq == MOUSEDEV_SEQ_LEN) {
706 client->imexseq = 0;
707 client->mode = MOUSEDEV_EMUL_EXPS;
708 }
709 } else
710 client->imexseq = 0;
711
712 if (c == mousedev_imps_seq[client->impsseq]) {
713 if (++client->impsseq == MOUSEDEV_SEQ_LEN) {
714 client->impsseq = 0;
715 client->mode = MOUSEDEV_EMUL_IMPS;
716 }
717 } else
718 client->impsseq = 0;
719
720 mousedev_generate_response(client, c);
721
722 spin_unlock_irq(&client->packet_lock);
723 }
724
725 kill_fasync(&client->fasync, SIGIO, POLL_IN);
726 wake_up_interruptible(&client->mousedev->wait);
727
728 return count;
729}
730
731static ssize_t mousedev_read(struct file *file, char __user *buffer,
732 size_t count, loff_t *ppos)
733{
734 struct mousedev_client *client = file->private_data;
735 struct mousedev *mousedev = client->mousedev;
736 signed char data[sizeof(client->ps2)];
737 int retval = 0;
738
739 if (!client->ready && !client->buffer && mousedev->exist &&
740 (file->f_flags & O_NONBLOCK))
741 return -EAGAIN;
742
743 retval = wait_event_interruptible(mousedev->wait,
744 !mousedev->exist || client->ready || client->buffer);
745 if (retval)
746 return retval;
747
748 if (!mousedev->exist)
749 return -ENODEV;
750
751 spin_lock_irq(&client->packet_lock);
752
753 if (!client->buffer && client->ready) {
754 mousedev_packet(client, client->ps2);
755 client->buffer = client->bufsiz;
756 }
757
758 if (count > client->buffer)
759 count = client->buffer;
760
761 memcpy(data, client->ps2 + client->bufsiz - client->buffer, count);
762 client->buffer -= count;
763
764 spin_unlock_irq(&client->packet_lock);
765
766 if (copy_to_user(buffer, data, count))
767 return -EFAULT;
768
769 return count;
770}
771
772/* No kernel lock - fine */
773static unsigned int mousedev_poll(struct file *file, poll_table *wait)
774{
775 struct mousedev_client *client = file->private_data;
776 struct mousedev *mousedev = client->mousedev;
777 unsigned int mask;
778
779 poll_wait(file, &mousedev->wait, wait);
780
781 mask = mousedev->exist ? POLLOUT | POLLWRNORM : POLLHUP | POLLERR;
782 if (client->ready || client->buffer)
783 mask |= POLLIN | POLLRDNORM;
784
785 return mask;
786}
787
788static const struct file_operations mousedev_fops = {
789 .owner = THIS_MODULE,
790 .read = mousedev_read,
791 .write = mousedev_write,
792 .poll = mousedev_poll,
793 .open = mousedev_open,
794 .release = mousedev_release,
795 .fasync = mousedev_fasync,
796 .llseek = noop_llseek,
797};
798
799static int mousedev_install_chrdev(struct mousedev *mousedev)
800{
801 mousedev_table[mousedev->minor] = mousedev;
802 return 0;
803}
804
805static void mousedev_remove_chrdev(struct mousedev *mousedev)
806{
807 mutex_lock(&mousedev_table_mutex);
808 mousedev_table[mousedev->minor] = NULL;
809 mutex_unlock(&mousedev_table_mutex);
810}
811
812/*
813 * Mark device non-existent. This disables writes, ioctls and
814 * prevents new users from opening the device. Already posted
815 * blocking reads will stay, however new ones will fail.
816 */
817static void mousedev_mark_dead(struct mousedev *mousedev)
818{
819 mutex_lock(&mousedev->mutex);
820 mousedev->exist = false;
821 mutex_unlock(&mousedev->mutex);
822}
823
824/*
825 * Wake up users waiting for IO so they can disconnect from
826 * dead device.
827 */
828static void mousedev_hangup(struct mousedev *mousedev)
829{
830 struct mousedev_client *client;
831
832 spin_lock(&mousedev->client_lock);
833 list_for_each_entry(client, &mousedev->client_list, node)
834 kill_fasync(&client->fasync, SIGIO, POLL_HUP);
835 spin_unlock(&mousedev->client_lock);
836
837 wake_up_interruptible(&mousedev->wait);
838}
839
840static void mousedev_cleanup(struct mousedev *mousedev)
841{
842 struct input_handle *handle = &mousedev->handle;
843
844 mousedev_mark_dead(mousedev);
845 mousedev_hangup(mousedev);
846 mousedev_remove_chrdev(mousedev);
847
848 /* mousedev is marked dead so no one else accesses mousedev->open */
849 if (mousedev->open)
850 input_close_device(handle);
851}
852
853static struct mousedev *mousedev_create(struct input_dev *dev,
854 struct input_handler *handler,
855 int minor)
856{
857 struct mousedev *mousedev;
858 int error;
859
860 mousedev = kzalloc(sizeof(struct mousedev), GFP_KERNEL);
861 if (!mousedev) {
862 error = -ENOMEM;
863 goto err_out;
864 }
865
866 INIT_LIST_HEAD(&mousedev->client_list);
867 INIT_LIST_HEAD(&mousedev->mixdev_node);
868 spin_lock_init(&mousedev->client_lock);
869 mutex_init(&mousedev->mutex);
870 lockdep_set_subclass(&mousedev->mutex,
871 minor == MOUSEDEV_MIX ? SINGLE_DEPTH_NESTING : 0);
872 init_waitqueue_head(&mousedev->wait);
873
874 if (minor == MOUSEDEV_MIX)
875 dev_set_name(&mousedev->dev, "mice");
876 else
877 dev_set_name(&mousedev->dev, "mouse%d", minor);
878
879 mousedev->minor = minor;
880 mousedev->exist = true;
881 mousedev->handle.dev = input_get_device(dev);
882 mousedev->handle.name = dev_name(&mousedev->dev);
883 mousedev->handle.handler = handler;
884 mousedev->handle.private = mousedev;
885
886 mousedev->dev.class = &input_class;
887 if (dev)
888 mousedev->dev.parent = &dev->dev;
889 mousedev->dev.devt = MKDEV(INPUT_MAJOR, MOUSEDEV_MINOR_BASE + minor);
890 mousedev->dev.release = mousedev_free;
891 device_initialize(&mousedev->dev);
892
893 if (minor != MOUSEDEV_MIX) {
894 error = input_register_handle(&mousedev->handle);
895 if (error)
896 goto err_free_mousedev;
897 }
898
899 error = mousedev_install_chrdev(mousedev);
900 if (error)
901 goto err_unregister_handle;
902
903 error = device_add(&mousedev->dev);
904 if (error)
905 goto err_cleanup_mousedev;
906
907 return mousedev;
908
909 err_cleanup_mousedev:
910 mousedev_cleanup(mousedev);
911 err_unregister_handle:
912 if (minor != MOUSEDEV_MIX)
913 input_unregister_handle(&mousedev->handle);
914 err_free_mousedev:
915 put_device(&mousedev->dev);
916 err_out:
917 return ERR_PTR(error);
918}
919
920static void mousedev_destroy(struct mousedev *mousedev)
921{
922 device_del(&mousedev->dev);
923 mousedev_cleanup(mousedev);
924 if (mousedev->minor != MOUSEDEV_MIX)
925 input_unregister_handle(&mousedev->handle);
926 put_device(&mousedev->dev);
927}
928
929static int mixdev_add_device(struct mousedev *mousedev)
930{
931 int retval;
932
933 retval = mutex_lock_interruptible(&mousedev_mix->mutex);
934 if (retval)
935 return retval;
936
937 if (mousedev_mix->open) {
938 retval = mousedev_open_device(mousedev);
939 if (retval)
940 goto out;
941
942 mousedev->mixdev_open = 1;
943 }
944
945 get_device(&mousedev->dev);
946 list_add_tail(&mousedev->mixdev_node, &mousedev_mix_list);
947
948 out:
949 mutex_unlock(&mousedev_mix->mutex);
950 return retval;
951}
952
953static void mixdev_remove_device(struct mousedev *mousedev)
954{
955 mutex_lock(&mousedev_mix->mutex);
956
957 if (mousedev->mixdev_open) {
958 mousedev->mixdev_open = 0;
959 mousedev_close_device(mousedev);
960 }
961
962 list_del_init(&mousedev->mixdev_node);
963 mutex_unlock(&mousedev_mix->mutex);
964
965 put_device(&mousedev->dev);
966}
967
968static int mousedev_connect(struct input_handler *handler,
969 struct input_dev *dev,
970 const struct input_device_id *id)
971{
972 struct mousedev *mousedev;
973 int minor;
974 int error;
975
976 for (minor = 0; minor < MOUSEDEV_MINORS; minor++)
977 if (!mousedev_table[minor])
978 break;
979
980 if (minor == MOUSEDEV_MINORS) {
981 pr_err("no more free mousedev devices\n");
982 return -ENFILE;
983 }
984
985 mousedev = mousedev_create(dev, handler, minor);
986 if (IS_ERR(mousedev))
987 return PTR_ERR(mousedev);
988
989 error = mixdev_add_device(mousedev);
990 if (error) {
991 mousedev_destroy(mousedev);
992 return error;
993 }
994
995 return 0;
996}
997
998static void mousedev_disconnect(struct input_handle *handle)
999{
1000 struct mousedev *mousedev = handle->private;
1001
1002 mixdev_remove_device(mousedev);
1003 mousedev_destroy(mousedev);
1004}
1005
1006static const struct input_device_id mousedev_ids[] = {
1007 {
1008 .flags = INPUT_DEVICE_ID_MATCH_EVBIT |
1009 INPUT_DEVICE_ID_MATCH_KEYBIT |
1010 INPUT_DEVICE_ID_MATCH_RELBIT,
1011 .evbit = { BIT_MASK(EV_KEY) | BIT_MASK(EV_REL) },
1012 .keybit = { [BIT_WORD(BTN_LEFT)] = BIT_MASK(BTN_LEFT) },
1013 .relbit = { BIT_MASK(REL_X) | BIT_MASK(REL_Y) },
1014 }, /* A mouse like device, at least one button,
1015 two relative axes */
1016 {
1017 .flags = INPUT_DEVICE_ID_MATCH_EVBIT |
1018 INPUT_DEVICE_ID_MATCH_RELBIT,
1019 .evbit = { BIT_MASK(EV_KEY) | BIT_MASK(EV_REL) },
1020 .relbit = { BIT_MASK(REL_WHEEL) },
1021 }, /* A separate scrollwheel */
1022 {
1023 .flags = INPUT_DEVICE_ID_MATCH_EVBIT |
1024 INPUT_DEVICE_ID_MATCH_KEYBIT |
1025 INPUT_DEVICE_ID_MATCH_ABSBIT,
1026 .evbit = { BIT_MASK(EV_KEY) | BIT_MASK(EV_ABS) },
1027 .keybit = { [BIT_WORD(BTN_TOUCH)] = BIT_MASK(BTN_TOUCH) },
1028 .absbit = { BIT_MASK(ABS_X) | BIT_MASK(ABS_Y) },
1029 }, /* A tablet like device, at least touch detection,
1030 two absolute axes */
1031 {
1032 .flags = INPUT_DEVICE_ID_MATCH_EVBIT |
1033 INPUT_DEVICE_ID_MATCH_KEYBIT |
1034 INPUT_DEVICE_ID_MATCH_ABSBIT,
1035 .evbit = { BIT_MASK(EV_KEY) | BIT_MASK(EV_ABS) },
1036 .keybit = { [BIT_WORD(BTN_TOOL_FINGER)] =
1037 BIT_MASK(BTN_TOOL_FINGER) },
1038 .absbit = { BIT_MASK(ABS_X) | BIT_MASK(ABS_Y) |
1039 BIT_MASK(ABS_PRESSURE) |
1040 BIT_MASK(ABS_TOOL_WIDTH) },
1041 }, /* A touchpad */
1042 {
1043 .flags = INPUT_DEVICE_ID_MATCH_EVBIT |
1044 INPUT_DEVICE_ID_MATCH_KEYBIT |
1045 INPUT_DEVICE_ID_MATCH_ABSBIT,
1046 .evbit = { BIT_MASK(EV_KEY) | BIT_MASK(EV_ABS) },
1047 .keybit = { [BIT_WORD(BTN_LEFT)] = BIT_MASK(BTN_LEFT) },
1048 .absbit = { BIT_MASK(ABS_X) | BIT_MASK(ABS_Y) },
1049 }, /* Mouse-like device with absolute X and Y but ordinary
1050 clicks, like hp ILO2 High Performance mouse */
1051
1052 { }, /* Terminating entry */
1053};
1054
1055MODULE_DEVICE_TABLE(input, mousedev_ids);
1056
1057static struct input_handler mousedev_handler = {
1058 .event = mousedev_event,
1059 .connect = mousedev_connect,
1060 .disconnect = mousedev_disconnect,
1061 .fops = &mousedev_fops,
1062 .minor = MOUSEDEV_MINOR_BASE,
1063 .name = "mousedev",
1064 .id_table = mousedev_ids,
1065};
1066
1067#ifdef CONFIG_INPUT_MOUSEDEV_PSAUX
1068static struct miscdevice psaux_mouse = {
1069 PSMOUSE_MINOR, "psaux", &mousedev_fops
1070};
1071static int psaux_registered;
1072#endif
1073
1074static int __init mousedev_init(void)
1075{
1076 int error;
1077
1078 mousedev_mix = mousedev_create(NULL, &mousedev_handler, MOUSEDEV_MIX);
1079 if (IS_ERR(mousedev_mix))
1080 return PTR_ERR(mousedev_mix);
1081
1082 error = input_register_handler(&mousedev_handler);
1083 if (error) {
1084 mousedev_destroy(mousedev_mix);
1085 return error;
1086 }
1087
1088#ifdef CONFIG_INPUT_MOUSEDEV_PSAUX
1089 error = misc_register(&psaux_mouse);
1090 if (error)
1091 pr_warning("could not register psaux device, error: %d\n",
1092 error);
1093 else
1094 psaux_registered = 1;
1095#endif
1096
1097 pr_info("PS/2 mouse device common for all mice\n");
1098
1099 return 0;
1100}
1101
1102static void __exit mousedev_exit(void)
1103{
1104#ifdef CONFIG_INPUT_MOUSEDEV_PSAUX
1105 if (psaux_registered)
1106 misc_deregister(&psaux_mouse);
1107#endif
1108 input_unregister_handler(&mousedev_handler);
1109 mousedev_destroy(mousedev_mix);
1110}
1111
1112module_init(mousedev_init);
1113module_exit(mousedev_exit);
1// SPDX-License-Identifier: GPL-2.0-only
2/*
3 * Input driver to ExplorerPS/2 device driver module.
4 *
5 * Copyright (c) 1999-2002 Vojtech Pavlik
6 * Copyright (c) 2004 Dmitry Torokhov
7 */
8
9#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
10
11#define MOUSEDEV_MINOR_BASE 32
12#define MOUSEDEV_MINORS 31
13#define MOUSEDEV_MIX 63
14
15#include <linux/bitops.h>
16#include <linux/sched.h>
17#include <linux/slab.h>
18#include <linux/poll.h>
19#include <linux/module.h>
20#include <linux/init.h>
21#include <linux/input.h>
22#include <linux/random.h>
23#include <linux/major.h>
24#include <linux/device.h>
25#include <linux/cdev.h>
26#include <linux/kernel.h>
27
28MODULE_AUTHOR("Vojtech Pavlik <vojtech@ucw.cz>");
29MODULE_DESCRIPTION("Mouse (ExplorerPS/2) device interfaces");
30MODULE_LICENSE("GPL");
31
32#ifndef CONFIG_INPUT_MOUSEDEV_SCREEN_X
33#define CONFIG_INPUT_MOUSEDEV_SCREEN_X 1024
34#endif
35#ifndef CONFIG_INPUT_MOUSEDEV_SCREEN_Y
36#define CONFIG_INPUT_MOUSEDEV_SCREEN_Y 768
37#endif
38
39static int xres = CONFIG_INPUT_MOUSEDEV_SCREEN_X;
40module_param(xres, uint, 0644);
41MODULE_PARM_DESC(xres, "Horizontal screen resolution");
42
43static int yres = CONFIG_INPUT_MOUSEDEV_SCREEN_Y;
44module_param(yres, uint, 0644);
45MODULE_PARM_DESC(yres, "Vertical screen resolution");
46
47static unsigned tap_time = 200;
48module_param(tap_time, uint, 0644);
49MODULE_PARM_DESC(tap_time, "Tap time for touchpads in absolute mode (msecs)");
50
51struct mousedev_hw_data {
52 int dx, dy, dz;
53 int x, y;
54 int abs_event;
55 unsigned long buttons;
56};
57
58struct mousedev {
59 int open;
60 struct input_handle handle;
61 wait_queue_head_t wait;
62 struct list_head client_list;
63 spinlock_t client_lock; /* protects client_list */
64 struct mutex mutex;
65 struct device dev;
66 struct cdev cdev;
67 bool exist;
68
69 struct list_head mixdev_node;
70 bool opened_by_mixdev;
71
72 struct mousedev_hw_data packet;
73 unsigned int pkt_count;
74 int old_x[4], old_y[4];
75 int frac_dx, frac_dy;
76 unsigned long touch;
77
78 int (*open_device)(struct mousedev *mousedev);
79 void (*close_device)(struct mousedev *mousedev);
80};
81
82enum mousedev_emul {
83 MOUSEDEV_EMUL_PS2,
84 MOUSEDEV_EMUL_IMPS,
85 MOUSEDEV_EMUL_EXPS
86};
87
88struct mousedev_motion {
89 int dx, dy, dz;
90 unsigned long buttons;
91};
92
93#define PACKET_QUEUE_LEN 16
94struct mousedev_client {
95 struct fasync_struct *fasync;
96 struct mousedev *mousedev;
97 struct list_head node;
98
99 struct mousedev_motion packets[PACKET_QUEUE_LEN];
100 unsigned int head, tail;
101 spinlock_t packet_lock;
102 int pos_x, pos_y;
103
104 u8 ps2[6];
105 unsigned char ready, buffer, bufsiz;
106 unsigned char imexseq, impsseq;
107 enum mousedev_emul mode;
108 unsigned long last_buttons;
109};
110
111#define MOUSEDEV_SEQ_LEN 6
112
113static unsigned char mousedev_imps_seq[] = { 0xf3, 200, 0xf3, 100, 0xf3, 80 };
114static unsigned char mousedev_imex_seq[] = { 0xf3, 200, 0xf3, 200, 0xf3, 80 };
115
116static struct mousedev *mousedev_mix;
117static LIST_HEAD(mousedev_mix_list);
118
119#define fx(i) (mousedev->old_x[(mousedev->pkt_count - (i)) & 03])
120#define fy(i) (mousedev->old_y[(mousedev->pkt_count - (i)) & 03])
121
122static void mousedev_touchpad_event(struct input_dev *dev,
123 struct mousedev *mousedev,
124 unsigned int code, int value)
125{
126 int size, tmp;
127 enum { FRACTION_DENOM = 128 };
128
129 switch (code) {
130
131 case ABS_X:
132
133 fx(0) = value;
134 if (mousedev->touch && mousedev->pkt_count >= 2) {
135 size = input_abs_get_max(dev, ABS_X) -
136 input_abs_get_min(dev, ABS_X);
137 if (size == 0)
138 size = 256 * 2;
139
140 tmp = ((value - fx(2)) * 256 * FRACTION_DENOM) / size;
141 tmp += mousedev->frac_dx;
142 mousedev->packet.dx = tmp / FRACTION_DENOM;
143 mousedev->frac_dx =
144 tmp - mousedev->packet.dx * FRACTION_DENOM;
145 }
146 break;
147
148 case ABS_Y:
149 fy(0) = value;
150 if (mousedev->touch && mousedev->pkt_count >= 2) {
151 /* use X size for ABS_Y to keep the same scale */
152 size = input_abs_get_max(dev, ABS_X) -
153 input_abs_get_min(dev, ABS_X);
154 if (size == 0)
155 size = 256 * 2;
156
157 tmp = -((value - fy(2)) * 256 * FRACTION_DENOM) / size;
158 tmp += mousedev->frac_dy;
159 mousedev->packet.dy = tmp / FRACTION_DENOM;
160 mousedev->frac_dy = tmp -
161 mousedev->packet.dy * FRACTION_DENOM;
162 }
163 break;
164 }
165}
166
167static void mousedev_abs_event(struct input_dev *dev, struct mousedev *mousedev,
168 unsigned int code, int value)
169{
170 int min, max, size;
171
172 switch (code) {
173
174 case ABS_X:
175 min = input_abs_get_min(dev, ABS_X);
176 max = input_abs_get_max(dev, ABS_X);
177
178 size = max - min;
179 if (size == 0)
180 size = xres ? : 1;
181
182 value = clamp(value, min, max);
183
184 mousedev->packet.x = ((value - min) * xres) / size;
185 mousedev->packet.abs_event = 1;
186 break;
187
188 case ABS_Y:
189 min = input_abs_get_min(dev, ABS_Y);
190 max = input_abs_get_max(dev, ABS_Y);
191
192 size = max - min;
193 if (size == 0)
194 size = yres ? : 1;
195
196 value = clamp(value, min, max);
197
198 mousedev->packet.y = yres - ((value - min) * yres) / size;
199 mousedev->packet.abs_event = 1;
200 break;
201 }
202}
203
204static void mousedev_rel_event(struct mousedev *mousedev,
205 unsigned int code, int value)
206{
207 switch (code) {
208 case REL_X:
209 mousedev->packet.dx += value;
210 break;
211
212 case REL_Y:
213 mousedev->packet.dy -= value;
214 break;
215
216 case REL_WHEEL:
217 mousedev->packet.dz -= value;
218 break;
219 }
220}
221
222static void mousedev_key_event(struct mousedev *mousedev,
223 unsigned int code, int value)
224{
225 int index;
226
227 switch (code) {
228
229 case BTN_TOUCH:
230 case BTN_0:
231 case BTN_LEFT: index = 0; break;
232
233 case BTN_STYLUS:
234 case BTN_1:
235 case BTN_RIGHT: index = 1; break;
236
237 case BTN_2:
238 case BTN_FORWARD:
239 case BTN_STYLUS2:
240 case BTN_MIDDLE: index = 2; break;
241
242 case BTN_3:
243 case BTN_BACK:
244 case BTN_SIDE: index = 3; break;
245
246 case BTN_4:
247 case BTN_EXTRA: index = 4; break;
248
249 default: return;
250 }
251
252 if (value) {
253 set_bit(index, &mousedev->packet.buttons);
254 set_bit(index, &mousedev_mix->packet.buttons);
255 } else {
256 clear_bit(index, &mousedev->packet.buttons);
257 clear_bit(index, &mousedev_mix->packet.buttons);
258 }
259}
260
261static void mousedev_notify_readers(struct mousedev *mousedev,
262 struct mousedev_hw_data *packet)
263{
264 struct mousedev_client *client;
265 struct mousedev_motion *p;
266 unsigned int new_head;
267 int wake_readers = 0;
268
269 rcu_read_lock();
270 list_for_each_entry_rcu(client, &mousedev->client_list, node) {
271
272 /* Just acquire the lock, interrupts already disabled */
273 spin_lock(&client->packet_lock);
274
275 p = &client->packets[client->head];
276 if (client->ready && p->buttons != mousedev->packet.buttons) {
277 new_head = (client->head + 1) % PACKET_QUEUE_LEN;
278 if (new_head != client->tail) {
279 p = &client->packets[client->head = new_head];
280 memset(p, 0, sizeof(struct mousedev_motion));
281 }
282 }
283
284 if (packet->abs_event) {
285 p->dx += packet->x - client->pos_x;
286 p->dy += packet->y - client->pos_y;
287 client->pos_x = packet->x;
288 client->pos_y = packet->y;
289 }
290
291 client->pos_x += packet->dx;
292 client->pos_x = clamp_val(client->pos_x, 0, xres);
293
294 client->pos_y += packet->dy;
295 client->pos_y = clamp_val(client->pos_y, 0, yres);
296
297 p->dx += packet->dx;
298 p->dy += packet->dy;
299 p->dz += packet->dz;
300 p->buttons = mousedev->packet.buttons;
301
302 if (p->dx || p->dy || p->dz ||
303 p->buttons != client->last_buttons)
304 client->ready = 1;
305
306 spin_unlock(&client->packet_lock);
307
308 if (client->ready) {
309 kill_fasync(&client->fasync, SIGIO, POLL_IN);
310 wake_readers = 1;
311 }
312 }
313 rcu_read_unlock();
314
315 if (wake_readers)
316 wake_up_interruptible(&mousedev->wait);
317}
318
319static void mousedev_touchpad_touch(struct mousedev *mousedev, int value)
320{
321 if (!value) {
322 if (mousedev->touch &&
323 time_before(jiffies,
324 mousedev->touch + msecs_to_jiffies(tap_time))) {
325 /*
326 * Toggle left button to emulate tap.
327 * We rely on the fact that mousedev_mix always has 0
328 * motion packet so we won't mess current position.
329 */
330 set_bit(0, &mousedev->packet.buttons);
331 set_bit(0, &mousedev_mix->packet.buttons);
332 mousedev_notify_readers(mousedev, &mousedev_mix->packet);
333 mousedev_notify_readers(mousedev_mix,
334 &mousedev_mix->packet);
335 clear_bit(0, &mousedev->packet.buttons);
336 clear_bit(0, &mousedev_mix->packet.buttons);
337 }
338 mousedev->touch = mousedev->pkt_count = 0;
339 mousedev->frac_dx = 0;
340 mousedev->frac_dy = 0;
341
342 } else if (!mousedev->touch)
343 mousedev->touch = jiffies;
344}
345
346static void mousedev_event(struct input_handle *handle,
347 unsigned int type, unsigned int code, int value)
348{
349 struct mousedev *mousedev = handle->private;
350
351 switch (type) {
352
353 case EV_ABS:
354 /* Ignore joysticks */
355 if (test_bit(BTN_TRIGGER, handle->dev->keybit))
356 return;
357
358 if (test_bit(BTN_TOOL_FINGER, handle->dev->keybit))
359 mousedev_touchpad_event(handle->dev,
360 mousedev, code, value);
361 else
362 mousedev_abs_event(handle->dev, mousedev, code, value);
363
364 break;
365
366 case EV_REL:
367 mousedev_rel_event(mousedev, code, value);
368 break;
369
370 case EV_KEY:
371 if (value != 2) {
372 if (code == BTN_TOUCH &&
373 test_bit(BTN_TOOL_FINGER, handle->dev->keybit))
374 mousedev_touchpad_touch(mousedev, value);
375 else
376 mousedev_key_event(mousedev, code, value);
377 }
378 break;
379
380 case EV_SYN:
381 if (code == SYN_REPORT) {
382 if (mousedev->touch) {
383 mousedev->pkt_count++;
384 /*
385 * Input system eats duplicate events,
386 * but we need all of them to do correct
387 * averaging so apply present one forward
388 */
389 fx(0) = fx(1);
390 fy(0) = fy(1);
391 }
392
393 mousedev_notify_readers(mousedev, &mousedev->packet);
394 mousedev_notify_readers(mousedev_mix, &mousedev->packet);
395
396 mousedev->packet.dx = mousedev->packet.dy =
397 mousedev->packet.dz = 0;
398 mousedev->packet.abs_event = 0;
399 }
400 break;
401 }
402}
403
404static int mousedev_fasync(int fd, struct file *file, int on)
405{
406 struct mousedev_client *client = file->private_data;
407
408 return fasync_helper(fd, file, on, &client->fasync);
409}
410
411static void mousedev_free(struct device *dev)
412{
413 struct mousedev *mousedev = container_of(dev, struct mousedev, dev);
414
415 input_put_device(mousedev->handle.dev);
416 kfree(mousedev);
417}
418
419static int mousedev_open_device(struct mousedev *mousedev)
420{
421 int retval;
422
423 retval = mutex_lock_interruptible(&mousedev->mutex);
424 if (retval)
425 return retval;
426
427 if (!mousedev->exist)
428 retval = -ENODEV;
429 else if (!mousedev->open++) {
430 retval = input_open_device(&mousedev->handle);
431 if (retval)
432 mousedev->open--;
433 }
434
435 mutex_unlock(&mousedev->mutex);
436 return retval;
437}
438
439static void mousedev_close_device(struct mousedev *mousedev)
440{
441 mutex_lock(&mousedev->mutex);
442
443 if (mousedev->exist && !--mousedev->open)
444 input_close_device(&mousedev->handle);
445
446 mutex_unlock(&mousedev->mutex);
447}
448
449/*
450 * Open all available devices so they can all be multiplexed in one.
451 * stream. Note that this function is called with mousedev_mix->mutex
452 * held.
453 */
454static int mixdev_open_devices(struct mousedev *mixdev)
455{
456 int error;
457
458 error = mutex_lock_interruptible(&mixdev->mutex);
459 if (error)
460 return error;
461
462 if (!mixdev->open++) {
463 struct mousedev *mousedev;
464
465 list_for_each_entry(mousedev, &mousedev_mix_list, mixdev_node) {
466 if (!mousedev->opened_by_mixdev) {
467 if (mousedev_open_device(mousedev))
468 continue;
469
470 mousedev->opened_by_mixdev = true;
471 }
472 }
473 }
474
475 mutex_unlock(&mixdev->mutex);
476 return 0;
477}
478
479/*
480 * Close all devices that were opened as part of multiplexed
481 * device. Note that this function is called with mousedev_mix->mutex
482 * held.
483 */
484static void mixdev_close_devices(struct mousedev *mixdev)
485{
486 mutex_lock(&mixdev->mutex);
487
488 if (!--mixdev->open) {
489 struct mousedev *mousedev;
490
491 list_for_each_entry(mousedev, &mousedev_mix_list, mixdev_node) {
492 if (mousedev->opened_by_mixdev) {
493 mousedev->opened_by_mixdev = false;
494 mousedev_close_device(mousedev);
495 }
496 }
497 }
498
499 mutex_unlock(&mixdev->mutex);
500}
501
502
503static void mousedev_attach_client(struct mousedev *mousedev,
504 struct mousedev_client *client)
505{
506 spin_lock(&mousedev->client_lock);
507 list_add_tail_rcu(&client->node, &mousedev->client_list);
508 spin_unlock(&mousedev->client_lock);
509}
510
511static void mousedev_detach_client(struct mousedev *mousedev,
512 struct mousedev_client *client)
513{
514 spin_lock(&mousedev->client_lock);
515 list_del_rcu(&client->node);
516 spin_unlock(&mousedev->client_lock);
517 synchronize_rcu();
518}
519
520static int mousedev_release(struct inode *inode, struct file *file)
521{
522 struct mousedev_client *client = file->private_data;
523 struct mousedev *mousedev = client->mousedev;
524
525 mousedev_detach_client(mousedev, client);
526 kfree(client);
527
528 mousedev->close_device(mousedev);
529
530 return 0;
531}
532
533static int mousedev_open(struct inode *inode, struct file *file)
534{
535 struct mousedev_client *client;
536 struct mousedev *mousedev;
537 int error;
538
539#ifdef CONFIG_INPUT_MOUSEDEV_PSAUX
540 if (imajor(inode) == MISC_MAJOR)
541 mousedev = mousedev_mix;
542 else
543#endif
544 mousedev = container_of(inode->i_cdev, struct mousedev, cdev);
545
546 client = kzalloc(sizeof(struct mousedev_client), GFP_KERNEL);
547 if (!client)
548 return -ENOMEM;
549
550 spin_lock_init(&client->packet_lock);
551 client->pos_x = xres / 2;
552 client->pos_y = yres / 2;
553 client->mousedev = mousedev;
554 mousedev_attach_client(mousedev, client);
555
556 error = mousedev->open_device(mousedev);
557 if (error)
558 goto err_free_client;
559
560 file->private_data = client;
561 stream_open(inode, file);
562
563 return 0;
564
565 err_free_client:
566 mousedev_detach_client(mousedev, client);
567 kfree(client);
568 return error;
569}
570
571static void mousedev_packet(struct mousedev_client *client, u8 *ps2_data)
572{
573 struct mousedev_motion *p = &client->packets[client->tail];
574 s8 dx, dy, dz;
575
576 dx = clamp_val(p->dx, -127, 127);
577 p->dx -= dx;
578
579 dy = clamp_val(p->dy, -127, 127);
580 p->dy -= dy;
581
582 ps2_data[0] = BIT(3);
583 ps2_data[0] |= ((dx & BIT(7)) >> 3) | ((dy & BIT(7)) >> 2);
584 ps2_data[0] |= p->buttons & 0x07;
585 ps2_data[1] = dx;
586 ps2_data[2] = dy;
587
588 switch (client->mode) {
589 case MOUSEDEV_EMUL_EXPS:
590 dz = clamp_val(p->dz, -7, 7);
591 p->dz -= dz;
592
593 ps2_data[3] = (dz & 0x0f) | ((p->buttons & 0x18) << 1);
594 client->bufsiz = 4;
595 break;
596
597 case MOUSEDEV_EMUL_IMPS:
598 dz = clamp_val(p->dz, -127, 127);
599 p->dz -= dz;
600
601 ps2_data[0] |= ((p->buttons & 0x10) >> 3) |
602 ((p->buttons & 0x08) >> 1);
603 ps2_data[3] = dz;
604
605 client->bufsiz = 4;
606 break;
607
608 case MOUSEDEV_EMUL_PS2:
609 default:
610 p->dz = 0;
611
612 ps2_data[0] |= ((p->buttons & 0x10) >> 3) |
613 ((p->buttons & 0x08) >> 1);
614
615 client->bufsiz = 3;
616 break;
617 }
618
619 if (!p->dx && !p->dy && !p->dz) {
620 if (client->tail == client->head) {
621 client->ready = 0;
622 client->last_buttons = p->buttons;
623 } else
624 client->tail = (client->tail + 1) % PACKET_QUEUE_LEN;
625 }
626}
627
628static void mousedev_generate_response(struct mousedev_client *client,
629 int command)
630{
631 client->ps2[0] = 0xfa; /* ACK */
632
633 switch (command) {
634
635 case 0xeb: /* Poll */
636 mousedev_packet(client, &client->ps2[1]);
637 client->bufsiz++; /* account for leading ACK */
638 break;
639
640 case 0xf2: /* Get ID */
641 switch (client->mode) {
642 case MOUSEDEV_EMUL_PS2:
643 client->ps2[1] = 0;
644 break;
645 case MOUSEDEV_EMUL_IMPS:
646 client->ps2[1] = 3;
647 break;
648 case MOUSEDEV_EMUL_EXPS:
649 client->ps2[1] = 4;
650 break;
651 }
652 client->bufsiz = 2;
653 break;
654
655 case 0xe9: /* Get info */
656 client->ps2[1] = 0x60; client->ps2[2] = 3; client->ps2[3] = 200;
657 client->bufsiz = 4;
658 break;
659
660 case 0xff: /* Reset */
661 client->impsseq = client->imexseq = 0;
662 client->mode = MOUSEDEV_EMUL_PS2;
663 client->ps2[1] = 0xaa; client->ps2[2] = 0x00;
664 client->bufsiz = 3;
665 break;
666
667 default:
668 client->bufsiz = 1;
669 break;
670 }
671 client->buffer = client->bufsiz;
672}
673
674static ssize_t mousedev_write(struct file *file, const char __user *buffer,
675 size_t count, loff_t *ppos)
676{
677 struct mousedev_client *client = file->private_data;
678 unsigned char c;
679 unsigned int i;
680
681 for (i = 0; i < count; i++) {
682
683 if (get_user(c, buffer + i))
684 return -EFAULT;
685
686 spin_lock_irq(&client->packet_lock);
687
688 if (c == mousedev_imex_seq[client->imexseq]) {
689 if (++client->imexseq == MOUSEDEV_SEQ_LEN) {
690 client->imexseq = 0;
691 client->mode = MOUSEDEV_EMUL_EXPS;
692 }
693 } else
694 client->imexseq = 0;
695
696 if (c == mousedev_imps_seq[client->impsseq]) {
697 if (++client->impsseq == MOUSEDEV_SEQ_LEN) {
698 client->impsseq = 0;
699 client->mode = MOUSEDEV_EMUL_IMPS;
700 }
701 } else
702 client->impsseq = 0;
703
704 mousedev_generate_response(client, c);
705
706 spin_unlock_irq(&client->packet_lock);
707 cond_resched();
708 }
709
710 kill_fasync(&client->fasync, SIGIO, POLL_IN);
711 wake_up_interruptible(&client->mousedev->wait);
712
713 return count;
714}
715
716static ssize_t mousedev_read(struct file *file, char __user *buffer,
717 size_t count, loff_t *ppos)
718{
719 struct mousedev_client *client = file->private_data;
720 struct mousedev *mousedev = client->mousedev;
721 u8 data[sizeof(client->ps2)];
722 int retval = 0;
723
724 if (!client->ready && !client->buffer && mousedev->exist &&
725 (file->f_flags & O_NONBLOCK))
726 return -EAGAIN;
727
728 retval = wait_event_interruptible(mousedev->wait,
729 !mousedev->exist || client->ready || client->buffer);
730 if (retval)
731 return retval;
732
733 if (!mousedev->exist)
734 return -ENODEV;
735
736 spin_lock_irq(&client->packet_lock);
737
738 if (!client->buffer && client->ready) {
739 mousedev_packet(client, client->ps2);
740 client->buffer = client->bufsiz;
741 }
742
743 if (count > client->buffer)
744 count = client->buffer;
745
746 memcpy(data, client->ps2 + client->bufsiz - client->buffer, count);
747 client->buffer -= count;
748
749 spin_unlock_irq(&client->packet_lock);
750
751 if (copy_to_user(buffer, data, count))
752 return -EFAULT;
753
754 return count;
755}
756
757/* No kernel lock - fine */
758static __poll_t mousedev_poll(struct file *file, poll_table *wait)
759{
760 struct mousedev_client *client = file->private_data;
761 struct mousedev *mousedev = client->mousedev;
762 __poll_t mask;
763
764 poll_wait(file, &mousedev->wait, wait);
765
766 mask = mousedev->exist ? EPOLLOUT | EPOLLWRNORM : EPOLLHUP | EPOLLERR;
767 if (client->ready || client->buffer)
768 mask |= EPOLLIN | EPOLLRDNORM;
769
770 return mask;
771}
772
773static const struct file_operations mousedev_fops = {
774 .owner = THIS_MODULE,
775 .read = mousedev_read,
776 .write = mousedev_write,
777 .poll = mousedev_poll,
778 .open = mousedev_open,
779 .release = mousedev_release,
780 .fasync = mousedev_fasync,
781 .llseek = noop_llseek,
782};
783
784/*
785 * Mark device non-existent. This disables writes, ioctls and
786 * prevents new users from opening the device. Already posted
787 * blocking reads will stay, however new ones will fail.
788 */
789static void mousedev_mark_dead(struct mousedev *mousedev)
790{
791 mutex_lock(&mousedev->mutex);
792 mousedev->exist = false;
793 mutex_unlock(&mousedev->mutex);
794}
795
796/*
797 * Wake up users waiting for IO so they can disconnect from
798 * dead device.
799 */
800static void mousedev_hangup(struct mousedev *mousedev)
801{
802 struct mousedev_client *client;
803
804 spin_lock(&mousedev->client_lock);
805 list_for_each_entry(client, &mousedev->client_list, node)
806 kill_fasync(&client->fasync, SIGIO, POLL_HUP);
807 spin_unlock(&mousedev->client_lock);
808
809 wake_up_interruptible(&mousedev->wait);
810}
811
812static void mousedev_cleanup(struct mousedev *mousedev)
813{
814 struct input_handle *handle = &mousedev->handle;
815
816 mousedev_mark_dead(mousedev);
817 mousedev_hangup(mousedev);
818
819 /* mousedev is marked dead so no one else accesses mousedev->open */
820 if (mousedev->open)
821 input_close_device(handle);
822}
823
824static int mousedev_reserve_minor(bool mixdev)
825{
826 int minor;
827
828 if (mixdev) {
829 minor = input_get_new_minor(MOUSEDEV_MIX, 1, false);
830 if (minor < 0)
831 pr_err("failed to reserve mixdev minor: %d\n", minor);
832 } else {
833 minor = input_get_new_minor(MOUSEDEV_MINOR_BASE,
834 MOUSEDEV_MINORS, true);
835 if (minor < 0)
836 pr_err("failed to reserve new minor: %d\n", minor);
837 }
838
839 return minor;
840}
841
842static struct mousedev *mousedev_create(struct input_dev *dev,
843 struct input_handler *handler,
844 bool mixdev)
845{
846 struct mousedev *mousedev;
847 int minor;
848 int error;
849
850 minor = mousedev_reserve_minor(mixdev);
851 if (minor < 0) {
852 error = minor;
853 goto err_out;
854 }
855
856 mousedev = kzalloc(sizeof(struct mousedev), GFP_KERNEL);
857 if (!mousedev) {
858 error = -ENOMEM;
859 goto err_free_minor;
860 }
861
862 INIT_LIST_HEAD(&mousedev->client_list);
863 INIT_LIST_HEAD(&mousedev->mixdev_node);
864 spin_lock_init(&mousedev->client_lock);
865 mutex_init(&mousedev->mutex);
866 lockdep_set_subclass(&mousedev->mutex,
867 mixdev ? SINGLE_DEPTH_NESTING : 0);
868 init_waitqueue_head(&mousedev->wait);
869
870 if (mixdev) {
871 dev_set_name(&mousedev->dev, "mice");
872
873 mousedev->open_device = mixdev_open_devices;
874 mousedev->close_device = mixdev_close_devices;
875 } else {
876 int dev_no = minor;
877 /* Normalize device number if it falls into legacy range */
878 if (dev_no < MOUSEDEV_MINOR_BASE + MOUSEDEV_MINORS)
879 dev_no -= MOUSEDEV_MINOR_BASE;
880 dev_set_name(&mousedev->dev, "mouse%d", dev_no);
881
882 mousedev->open_device = mousedev_open_device;
883 mousedev->close_device = mousedev_close_device;
884 }
885
886 mousedev->exist = true;
887 mousedev->handle.dev = input_get_device(dev);
888 mousedev->handle.name = dev_name(&mousedev->dev);
889 mousedev->handle.handler = handler;
890 mousedev->handle.private = mousedev;
891
892 mousedev->dev.class = &input_class;
893 if (dev)
894 mousedev->dev.parent = &dev->dev;
895 mousedev->dev.devt = MKDEV(INPUT_MAJOR, minor);
896 mousedev->dev.release = mousedev_free;
897 device_initialize(&mousedev->dev);
898
899 if (!mixdev) {
900 error = input_register_handle(&mousedev->handle);
901 if (error)
902 goto err_free_mousedev;
903 }
904
905 cdev_init(&mousedev->cdev, &mousedev_fops);
906
907 error = cdev_device_add(&mousedev->cdev, &mousedev->dev);
908 if (error)
909 goto err_cleanup_mousedev;
910
911 return mousedev;
912
913 err_cleanup_mousedev:
914 mousedev_cleanup(mousedev);
915 if (!mixdev)
916 input_unregister_handle(&mousedev->handle);
917 err_free_mousedev:
918 put_device(&mousedev->dev);
919 err_free_minor:
920 input_free_minor(minor);
921 err_out:
922 return ERR_PTR(error);
923}
924
925static void mousedev_destroy(struct mousedev *mousedev)
926{
927 cdev_device_del(&mousedev->cdev, &mousedev->dev);
928 mousedev_cleanup(mousedev);
929 input_free_minor(MINOR(mousedev->dev.devt));
930 if (mousedev != mousedev_mix)
931 input_unregister_handle(&mousedev->handle);
932 put_device(&mousedev->dev);
933}
934
935static int mixdev_add_device(struct mousedev *mousedev)
936{
937 int retval;
938
939 retval = mutex_lock_interruptible(&mousedev_mix->mutex);
940 if (retval)
941 return retval;
942
943 if (mousedev_mix->open) {
944 retval = mousedev_open_device(mousedev);
945 if (retval)
946 goto out;
947
948 mousedev->opened_by_mixdev = true;
949 }
950
951 get_device(&mousedev->dev);
952 list_add_tail(&mousedev->mixdev_node, &mousedev_mix_list);
953
954 out:
955 mutex_unlock(&mousedev_mix->mutex);
956 return retval;
957}
958
959static void mixdev_remove_device(struct mousedev *mousedev)
960{
961 mutex_lock(&mousedev_mix->mutex);
962
963 if (mousedev->opened_by_mixdev) {
964 mousedev->opened_by_mixdev = false;
965 mousedev_close_device(mousedev);
966 }
967
968 list_del_init(&mousedev->mixdev_node);
969 mutex_unlock(&mousedev_mix->mutex);
970
971 put_device(&mousedev->dev);
972}
973
974static int mousedev_connect(struct input_handler *handler,
975 struct input_dev *dev,
976 const struct input_device_id *id)
977{
978 struct mousedev *mousedev;
979 int error;
980
981 mousedev = mousedev_create(dev, handler, false);
982 if (IS_ERR(mousedev))
983 return PTR_ERR(mousedev);
984
985 error = mixdev_add_device(mousedev);
986 if (error) {
987 mousedev_destroy(mousedev);
988 return error;
989 }
990
991 return 0;
992}
993
994static void mousedev_disconnect(struct input_handle *handle)
995{
996 struct mousedev *mousedev = handle->private;
997
998 mixdev_remove_device(mousedev);
999 mousedev_destroy(mousedev);
1000}
1001
1002static const struct input_device_id mousedev_ids[] = {
1003 {
1004 .flags = INPUT_DEVICE_ID_MATCH_EVBIT |
1005 INPUT_DEVICE_ID_MATCH_KEYBIT |
1006 INPUT_DEVICE_ID_MATCH_RELBIT,
1007 .evbit = { BIT_MASK(EV_KEY) | BIT_MASK(EV_REL) },
1008 .keybit = { [BIT_WORD(BTN_LEFT)] = BIT_MASK(BTN_LEFT) },
1009 .relbit = { BIT_MASK(REL_X) | BIT_MASK(REL_Y) },
1010 }, /* A mouse like device, at least one button,
1011 two relative axes */
1012 {
1013 .flags = INPUT_DEVICE_ID_MATCH_EVBIT |
1014 INPUT_DEVICE_ID_MATCH_RELBIT,
1015 .evbit = { BIT_MASK(EV_KEY) | BIT_MASK(EV_REL) },
1016 .relbit = { BIT_MASK(REL_WHEEL) },
1017 }, /* A separate scrollwheel */
1018 {
1019 .flags = INPUT_DEVICE_ID_MATCH_EVBIT |
1020 INPUT_DEVICE_ID_MATCH_KEYBIT |
1021 INPUT_DEVICE_ID_MATCH_ABSBIT,
1022 .evbit = { BIT_MASK(EV_KEY) | BIT_MASK(EV_ABS) },
1023 .keybit = { [BIT_WORD(BTN_TOUCH)] = BIT_MASK(BTN_TOUCH) },
1024 .absbit = { BIT_MASK(ABS_X) | BIT_MASK(ABS_Y) },
1025 }, /* A tablet like device, at least touch detection,
1026 two absolute axes */
1027 {
1028 .flags = INPUT_DEVICE_ID_MATCH_EVBIT |
1029 INPUT_DEVICE_ID_MATCH_KEYBIT |
1030 INPUT_DEVICE_ID_MATCH_ABSBIT,
1031 .evbit = { BIT_MASK(EV_KEY) | BIT_MASK(EV_ABS) },
1032 .keybit = { [BIT_WORD(BTN_TOOL_FINGER)] =
1033 BIT_MASK(BTN_TOOL_FINGER) },
1034 .absbit = { BIT_MASK(ABS_X) | BIT_MASK(ABS_Y) |
1035 BIT_MASK(ABS_PRESSURE) |
1036 BIT_MASK(ABS_TOOL_WIDTH) },
1037 }, /* A touchpad */
1038 {
1039 .flags = INPUT_DEVICE_ID_MATCH_EVBIT |
1040 INPUT_DEVICE_ID_MATCH_KEYBIT |
1041 INPUT_DEVICE_ID_MATCH_ABSBIT,
1042 .evbit = { BIT_MASK(EV_KEY) | BIT_MASK(EV_ABS) },
1043 .keybit = { [BIT_WORD(BTN_LEFT)] = BIT_MASK(BTN_LEFT) },
1044 .absbit = { BIT_MASK(ABS_X) | BIT_MASK(ABS_Y) },
1045 }, /* Mouse-like device with absolute X and Y but ordinary
1046 clicks, like hp ILO2 High Performance mouse */
1047
1048 { }, /* Terminating entry */
1049};
1050
1051MODULE_DEVICE_TABLE(input, mousedev_ids);
1052
1053static struct input_handler mousedev_handler = {
1054 .event = mousedev_event,
1055 .connect = mousedev_connect,
1056 .disconnect = mousedev_disconnect,
1057 .legacy_minors = true,
1058 .minor = MOUSEDEV_MINOR_BASE,
1059 .name = "mousedev",
1060 .id_table = mousedev_ids,
1061};
1062
1063#ifdef CONFIG_INPUT_MOUSEDEV_PSAUX
1064#include <linux/miscdevice.h>
1065
1066static struct miscdevice psaux_mouse = {
1067 .minor = PSMOUSE_MINOR,
1068 .name = "psaux",
1069 .fops = &mousedev_fops,
1070};
1071
1072static bool psaux_registered;
1073
1074static void __init mousedev_psaux_register(void)
1075{
1076 int error;
1077
1078 error = misc_register(&psaux_mouse);
1079 if (error)
1080 pr_warn("could not register psaux device, error: %d\n",
1081 error);
1082 else
1083 psaux_registered = true;
1084}
1085
1086static void __exit mousedev_psaux_unregister(void)
1087{
1088 if (psaux_registered)
1089 misc_deregister(&psaux_mouse);
1090}
1091#else
1092static inline void mousedev_psaux_register(void) { }
1093static inline void mousedev_psaux_unregister(void) { }
1094#endif
1095
1096static int __init mousedev_init(void)
1097{
1098 int error;
1099
1100 mousedev_mix = mousedev_create(NULL, &mousedev_handler, true);
1101 if (IS_ERR(mousedev_mix))
1102 return PTR_ERR(mousedev_mix);
1103
1104 error = input_register_handler(&mousedev_handler);
1105 if (error) {
1106 mousedev_destroy(mousedev_mix);
1107 return error;
1108 }
1109
1110 mousedev_psaux_register();
1111
1112 pr_info("PS/2 mouse device common for all mice\n");
1113
1114 return 0;
1115}
1116
1117static void __exit mousedev_exit(void)
1118{
1119 mousedev_psaux_unregister();
1120 input_unregister_handler(&mousedev_handler);
1121 mousedev_destroy(mousedev_mix);
1122}
1123
1124module_init(mousedev_init);
1125module_exit(mousedev_exit);