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