drivers/input/mousedev.c

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