sys/dev/misc/mse/mse.c

   1 /*
   2  * Copyright 1992 by the University of Guelph
   3  *
   4  * Permission to use, copy and modify this
   5  * software and its documentation for any purpose and without
   6  * fee is hereby granted, provided that the above copyright
   7  * notice appear in all copies and that both that copyright
   8  * notice and this permission notice appear in supporting
   9  * documentation.
  10  * University of Guelph makes no representations about the suitability of
  11  * this software for any purpose.  It is provided "as is"
  12  * without express or implied warranty.
  13  *
  14  * $FreeBSD: src/sys/i386/isa/mse.c,v 1.49.2.1 2000/03/20 13:58:47 yokota Exp $
  15  * $DragonFly: src/sys/dev/misc/mse/mse.c,v 1.20 2006/12/23 00:26:17 swildner Exp $
  16  */
  17 /*
  18  * Driver for the Logitech and ATI Inport Bus mice for use with 386bsd and
  19  * the X386 port, courtesy of
  20  * Rick Macklem, rick@snowhite.cis.uoguelph.ca
  21  * Caveats: The driver currently uses spltty(), but doesn't use any
  22  * generic tty code. It could use splmse() (that only masks off the
  23  * bus mouse interrupt, but that would require hacking in i386/isa/icu.s.
  24  * (This may be worth the effort, since the Logitech generates 30/60
  25  * interrupts/sec continuously while it is open.)
  26  * NB: The ATI has NOT been tested yet!
  27  */
  28
  29 /*
  30  * Modification history:
  31  * Sep 6, 1994 -- Lars Fredriksen(fredriks@mcs.com)
  32  *   improved probe based on input from Logitech.
  33  *
  34  * Oct 19, 1992 -- E. Stark (stark@cs.sunysb.edu)
  35  *   fixes to make it work with Microsoft InPort busmouse
  36  *
  37  * Jan, 1993 -- E. Stark (stark@cs.sunysb.edu)
  38  *   added patches for new "select" interface
  39  *
  40  * May 4, 1993 -- E. Stark (stark@cs.sunysb.edu)
  41  *   changed position of some spl()'s in mseread
  42  *
  43  * October 8, 1993 -- E. Stark (stark@cs.sunysb.edu)
  44  *   limit maximum negative x/y value to -127 to work around XFree problem
  45  *   that causes spurious button pushes.
  46  */
  47
  48 #include <sys/param.h>
  49 #include <sys/systm.h>
  50 #include <sys/conf.h>
  51 #include <sys/device.h>
  52 #include <sys/kernel.h>
  53 #include <sys/bus.h>
  54 #include <sys/poll.h>
  55 #include <sys/selinfo.h>
  56 #include <sys/uio.h>
  57 #include <sys/rman.h>
  58 #include <sys/thread2.h>
  59
  60 #include <machine/clock.h>
  61 #include <machine/mouse.h>
  62
  63 #include <bus/isa/isavar.h>
  64
  65 /* driver configuration flags (config) */
  66 #define MSE_CONFIG_ACCEL        0x00f0  /* acceleration factor */
  67 #define MSE_CONFIG_FLAGS        (MSE_CONFIG_ACCEL)
  68
  69 /*
  70  * Software control structure for mouse. The sc_enablemouse(),
  71  * sc_disablemouse() and sc_getmouse() routines must be called spl'd().
  72  */
  73 typedef struct mse_softc {
  74         int             sc_flags;
  75         int             sc_mousetype;
  76         struct selinfo  sc_selp;
  77         struct resource *sc_port;
  78         struct resource *sc_intr;
  79         bus_space_tag_t sc_iot;
  80         bus_space_handle_t sc_ioh;
  81         void            *sc_ih;
  82         void            (*sc_enablemouse) (bus_space_tag_t t,
  83                                                bus_space_handle_t h);
  84         void            (*sc_disablemouse) (bus_space_tag_t t,
  85                                                 bus_space_handle_t h);
  86         void            (*sc_getmouse) (bus_space_tag_t t,
  87                                             bus_space_handle_t h,
  88                                             int *dx, int *dy, int *but);
  89         int             sc_deltax;
  90         int             sc_deltay;
  91         int             sc_obuttons;
  92         int             sc_buttons;
  93         int             sc_bytesread;
  94         u_char          sc_bytes[MOUSE_SYS_PACKETSIZE];
  95         struct          callout sc_callout;
  96         int             sc_watchdog;
  97         mousehw_t       hw;
  98         mousemode_t     mode;
  99         mousestatus_t   status;
 100 } mse_softc_t;
 101
 102 static  devclass_t      mse_devclass;
 103
 104 static  int             mse_probe (device_t dev);
 105 static  int             mse_attach (device_t dev);
 106 static  int             mse_detach (device_t dev);
 107
 108 static  device_method_t mse_methods[] = {
 109         DEVMETHOD(device_probe,         mse_probe),
 110         DEVMETHOD(device_attach,        mse_attach),
 111         DEVMETHOD(device_detach,        mse_detach),
 112         { 0, 0 }
 113 };
 114
 115 static  driver_t        mse_driver = {
 116         "mse",
 117         mse_methods,
 118         sizeof(mse_softc_t),
 119 };
 120
 121 DRIVER_MODULE(mse, isa, mse_driver, mse_devclass, 0, 0);
 122
 123 static struct isa_pnp_id mse_ids[] = {
 124         { 0x000fd041, "Bus mouse" },                    /* PNP0F00 */
 125         { 0x020fd041, "InPort mouse" },                 /* PNP0F02 */
 126         { 0x0d0fd041, "InPort mouse compatible" },      /* PNP0F0D */
 127         { 0x110fd041, "Bus mouse compatible" },         /* PNP0F11 */
 128         { 0x150fd041, "Logitech bus mouse" },           /* PNP0F15 */
 129         { 0x180fd041, "Logitech bus mouse compatible" },/* PNP0F18 */
 130         { 0 }
 131 };
 132
 133 static  d_open_t        mseopen;
 134 static  d_close_t       mseclose;
 135 static  d_read_t        mseread;
 136 static  d_ioctl_t       mseioctl;
 137 static  d_poll_t        msepoll;
 138
 139 #define CDEV_MAJOR 27
 140 static struct dev_ops mse_ops = {
 141         { "mse", CDEV_MAJOR, 0 },
 142         .d_open =       mseopen,
 143         .d_close =      mseclose,
 144         .d_read =       mseread,
 145         .d_ioctl =      mseioctl,
 146         .d_poll =       msepoll,
 147 };
 148
 149 static  void            mseintr (void *);
 150 static  timeout_t       msetimeout;
 151
 152 /* Flags */
 153 #define MSESC_OPEN      0x1
 154 #define MSESC_WANT      0x2
 155
 156 /* and Mouse Types */
 157 #define MSE_NONE        0       /* don't move this! */
 158 #define MSE_LOGITECH    0x1
 159 #define MSE_ATIINPORT   0x2
 160 #define MSE_LOGI_SIG    0xA5
 161
 162 #define MSE_PORTA       0
 163 #define MSE_PORTB       1
 164 #define MSE_PORTC       2
 165 #define MSE_PORTD       3
 166 #define MSE_IOSIZE      4
 167
 168 #define MSE_UNIT(dev)           (minor(dev) >> 1)
 169 #define MSE_NBLOCKIO(dev)       (minor(dev) & 0x1)
 170
 171 /*
 172  * Logitech bus mouse definitions
 173  */
 174 #define MSE_SETUP       0x91    /* What does this mean? */
 175                                 /* The definition for the control port */
 176                                 /* is as follows: */
 177
 178                                 /* D7    =  Mode set flag (1 = active)  */
 179                                 /* D6,D5 =  Mode selection (port A)     */
 180                                 /*          00 = Mode 0 = Basic I/O     */
 181                                 /*          01 = Mode 1 = Strobed I/O   */
 182                                 /*          10 = Mode 2 = Bi-dir bus    */
 183                                 /* D4    =  Port A direction (1 = input)*/
 184                                 /* D3    =  Port C (upper 4 bits)       */
 185                                 /*          direction. (1 = input)      */
 186                                 /* D2    =  Mode selection (port B & C) */
 187                                 /*          0 = Mode 0 = Basic I/O      */
 188                                 /*          1 = Mode 1 = Strobed I/O    */
 189                                 /* D1    =  Port B direction (1 = input)*/
 190                                 /* D0    =  Port C (lower 4 bits)       */
 191                                 /*          direction. (1 = input)      */
 192
 193                                 /* So 91 means Basic I/O on all 3 ports,*/
 194                                 /* Port A is an input port, B is an     */
 195                                 /* output port, C is split with upper   */
 196                                 /* 4 bits being an output port and lower*/
 197                                 /* 4 bits an input port, and enable the */
 198                                 /* sucker.                              */
 199                                 /* Courtesy Intel 8255 databook. Lars   */
 200 #define MSE_HOLD        0x80
 201 #define MSE_RXLOW       0x00
 202 #define MSE_RXHIGH      0x20
 203 #define MSE_RYLOW       0x40
 204 #define MSE_RYHIGH      0x60
 205 #define MSE_DISINTR     0x10
 206 #define MSE_INTREN      0x00
 207
 208 static  int             mse_probelogi (device_t dev, mse_softc_t *sc);
 209 static  void            mse_disablelogi (bus_space_tag_t t,
 210                                              bus_space_handle_t h);
 211 static  void            mse_getlogi (bus_space_tag_t t,
 212                                          bus_space_handle_t h,
 213                                          int *dx, int *dy, int *but);
 214 static  void            mse_enablelogi (bus_space_tag_t t,
 215                                             bus_space_handle_t h);
 216
 217 /*
 218  * ATI Inport mouse definitions
 219  */
 220 #define MSE_INPORT_RESET        0x80
 221 #define MSE_INPORT_STATUS       0x00
 222 #define MSE_INPORT_DX           0x01
 223 #define MSE_INPORT_DY           0x02
 224 #define MSE_INPORT_MODE         0x07
 225 #define MSE_INPORT_HOLD         0x20
 226 #define MSE_INPORT_INTREN       0x09
 227
 228 static  int             mse_probeati (device_t dev, mse_softc_t *sc);
 229 static  void            mse_enableati (bus_space_tag_t t,
 230                                            bus_space_handle_t h);
 231 static  void            mse_disableati (bus_space_tag_t t,
 232                                             bus_space_handle_t h);
 233 static  void            mse_getati (bus_space_tag_t t,
 234                                         bus_space_handle_t h,
 235                                         int *dx, int *dy, int *but);
 236
 237 /*
 238  * Table of mouse types.
 239  * Keep the Logitech last, since I haven't figured out how to probe it
 240  * properly yet. (Someday I'll have the documentation.)
 241  */
 242 static struct mse_types {
 243         int     m_type;         /* Type of bus mouse */
 244         int     (*m_probe) (device_t dev, mse_softc_t *sc);
 245                                 /* Probe routine to test for it */
 246         void    (*m_enable) (bus_space_tag_t t, bus_space_handle_t h);
 247                                 /* Start routine */
 248         void    (*m_disable) (bus_space_tag_t t, bus_space_handle_t h);
 249                                 /* Disable interrupts routine */
 250         void    (*m_get) (bus_space_tag_t t, bus_space_handle_t h,
 251                               int *dx, int *dy, int *but);
 252                                 /* and get mouse status */
 253         mousehw_t   m_hw;       /* buttons iftype type model hwid */
 254         mousemode_t m_mode;     /* proto rate res accel level size mask */
 255 } mse_types[] = {
 256         { MSE_ATIINPORT,
 257           mse_probeati, mse_enableati, mse_disableati, mse_getati,
 258           { 2, MOUSE_IF_INPORT, MOUSE_MOUSE, MOUSE_MODEL_GENERIC, 0, },
 259           { MOUSE_PROTO_INPORT, -1, -1, 0, 0, MOUSE_MSC_PACKETSIZE,
 260             { MOUSE_MSC_SYNCMASK, MOUSE_MSC_SYNC, }, }, },
 261         { MSE_LOGITECH,
 262           mse_probelogi, mse_enablelogi, mse_disablelogi, mse_getlogi,
 263           { 2, MOUSE_IF_BUS, MOUSE_MOUSE, MOUSE_MODEL_GENERIC, 0, },
 264           { MOUSE_PROTO_BUS, -1, -1, 0, 0, MOUSE_MSC_PACKETSIZE,
 265             { MOUSE_MSC_SYNCMASK, MOUSE_MSC_SYNC, }, }, },
 266         { 0, },
 267 };
 268
 269 static  int
 270 mse_probe(device_t dev)
 271 {
 272         mse_softc_t *sc;
 273         int error;
 274         int rid;
 275         int i;
 276
 277         /* check PnP IDs */
 278         error = ISA_PNP_PROBE(device_get_parent(dev), dev, mse_ids);
 279         if (error == ENXIO)
 280                 return ENXIO;
 281
 282         sc = device_get_softc(dev);
 283         rid = 0;
 284         sc->sc_port = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid, 0, ~0,
 285                                          MSE_IOSIZE, RF_ACTIVE);
 286         if (sc->sc_port == NULL)
 287                 return ENXIO;
 288         sc->sc_iot = rman_get_bustag(sc->sc_port);
 289         sc->sc_ioh = rman_get_bushandle(sc->sc_port);
 290
 291         /*
 292          * Check for each mouse type in the table.
 293          */
 294         i = 0;
 295         while (mse_types[i].m_type) {
 296                 if ((*mse_types[i].m_probe)(dev, sc)) {
 297                         sc->sc_mousetype = mse_types[i].m_type;
 298                         sc->sc_enablemouse = mse_types[i].m_enable;
 299                         sc->sc_disablemouse = mse_types[i].m_disable;
 300                         sc->sc_getmouse = mse_types[i].m_get;
 301                         sc->hw = mse_types[i].m_hw;
 302                         sc->mode = mse_types[i].m_mode;
 303                         bus_release_resource(dev, SYS_RES_IOPORT, rid,
 304                                              sc->sc_port);
 305                         device_set_desc(dev, "Bus/InPort Mouse");
 306                         return 0;
 307                 }
 308                 i++;
 309         }
 310         bus_release_resource(dev, SYS_RES_IOPORT, rid, sc->sc_port);
 311         return ENXIO;
 312 }
 313
 314 static  int
 315 mse_attach(device_t dev)
 316 {
 317         mse_softc_t *sc;
 318         int flags;
 319         int unit;
 320         int rid;
 321
 322         sc = device_get_softc(dev);
 323         unit = device_get_unit(dev);
 324
 325         rid = 0;
 326         sc->sc_port = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid, 0, ~0,
 327                                          MSE_IOSIZE, RF_ACTIVE);
 328         if (sc->sc_port == NULL)
 329                 return ENXIO;
 330         sc->sc_intr = bus_alloc_resource(dev, SYS_RES_IRQ, &rid, 0, ~0, 1,
 331                                          RF_ACTIVE);
 332         if (sc->sc_intr == NULL) {
 333                 bus_release_resource(dev, SYS_RES_IOPORT, rid, sc->sc_port);
 334                 return ENXIO;
 335         }
 336         sc->sc_iot = rman_get_bustag(sc->sc_port);
 337         sc->sc_ioh = rman_get_bushandle(sc->sc_port);
 338
 339         if (BUS_SETUP_INTR(device_get_parent(dev), dev, sc->sc_intr,
 340                            0, mseintr, sc, &sc->sc_ih, NULL)) {
 341                 bus_release_resource(dev, SYS_RES_IOPORT, rid, sc->sc_port);
 342                 bus_release_resource(dev, SYS_RES_IRQ, rid, sc->sc_intr);
 343                 return ENXIO;
 344         }
 345
 346         flags = device_get_flags(dev);
 347         sc->mode.accelfactor = (flags & MSE_CONFIG_ACCEL) >> 4;
 348         callout_init(&sc->sc_callout);
 349
 350         dev_ops_add(&mse_ops, ~1, unit << 1);
 351         make_dev(&mse_ops, unit << 1, 0, 0, 0600, "mse%d", unit);
 352         make_dev(&mse_ops, (unit<<1)+1, 0, 0, 0600, "nmse%d", unit);
 353
 354         return 0;
 355 }
 356
 357 static  int
 358 mse_detach(device_t dev)
 359 {
 360         mse_softc_t *sc;
 361         int rid;
 362
 363         sc = device_get_softc(dev);
 364         if (sc->sc_flags & MSESC_OPEN)
 365                 return EBUSY;
 366
 367         rid = 0;
 368         BUS_TEARDOWN_INTR(device_get_parent(dev), dev, sc->sc_intr, sc->sc_ih);
 369         bus_release_resource(dev, SYS_RES_IRQ, rid, sc->sc_intr);
 370         bus_release_resource(dev, SYS_RES_IOPORT, rid, sc->sc_port);
 371         dev_ops_remove(&mse_ops, ~1, device_get_unit(dev) << 1);
 372
 373         return 0;
 374 }
 375
 376 /*
 377  * Exclusive open the mouse, initialize it and enable interrupts.
 378  */
 379 static  int
 380 mseopen(struct dev_open_args *ap)
 381 {
 382         cdev_t dev = ap->a_head.a_dev;
 383         mse_softc_t *sc;
 384
 385         sc = devclass_get_softc(mse_devclass, MSE_UNIT(dev));
 386         if (sc == NULL)
 387                 return (ENXIO);
 388         if (sc->sc_mousetype == MSE_NONE)
 389                 return (ENXIO);
 390         if (sc->sc_flags & MSESC_OPEN)
 391                 return (EBUSY);
 392         sc->sc_flags |= MSESC_OPEN;
 393         sc->sc_obuttons = sc->sc_buttons = MOUSE_MSC_BUTTONS;
 394         sc->sc_deltax = sc->sc_deltay = 0;
 395         sc->sc_bytesread = sc->mode.packetsize = MOUSE_MSC_PACKETSIZE;
 396         sc->sc_watchdog = FALSE;
 397         callout_reset(&sc->sc_callout, hz * 2, msetimeout, dev);
 398         sc->mode.level = 0;
 399         sc->status.flags = 0;
 400         sc->status.button = sc->status.obutton = 0;
 401         sc->status.dx = sc->status.dy = sc->status.dz = 0;
 402
 403         /*
 404          * Initialize mouse interface and enable interrupts.
 405          */
 406         crit_enter();
 407         (*sc->sc_enablemouse)(sc->sc_iot, sc->sc_ioh);
 408         crit_exit();
 409         return (0);
 410 }
 411
 412 /*
 413  * mseclose: just turn off mouse innterrupts.
 414  */
 415 static  int
 416 mseclose(struct dev_close_args *ap)
 417 {
 418         cdev_t dev = ap->a_head.a_dev;
 419         mse_softc_t *sc = devclass_get_softc(mse_devclass, MSE_UNIT(dev));
 420
 421         crit_enter();
 422         callout_stop(&sc->sc_callout);
 423         (*sc->sc_disablemouse)(sc->sc_iot, sc->sc_ioh);
 424         sc->sc_flags &= ~MSESC_OPEN;
 425         crit_exit();
 426         return(0);
 427 }
 428
 429 /*
 430  * mseread: return mouse info using the MSC serial protocol, but without
 431  * using bytes 4 and 5.
 432  * (Yes this is cheesy, but it makes the X386 server happy, so...)
 433  */
 434 static  int
 435 mseread(struct dev_read_args *ap)
 436 {
 437         cdev_t dev = ap->a_head.a_dev;
 438         struct uio *uio = ap->a_uio;
 439         mse_softc_t *sc = devclass_get_softc(mse_devclass, MSE_UNIT(dev));
 440         int xfer, error;
 441
 442         /*
 443          * If there are no protocol bytes to be read, set up a new protocol
 444          * packet.
 445          */
 446         crit_enter(); /* XXX Should be its own spl, but where is imlXX() */
 447         if (sc->sc_bytesread >= sc->mode.packetsize) {
 448                 while (sc->sc_deltax == 0 && sc->sc_deltay == 0 &&
 449                        (sc->sc_obuttons ^ sc->sc_buttons) == 0) {
 450                         if (MSE_NBLOCKIO(dev)) {
 451                                 crit_exit();
 452                                 return (0);
 453                         }
 454                         sc->sc_flags |= MSESC_WANT;
 455                         error = tsleep((caddr_t)sc, PCATCH, "mseread", 0);
 456                         if (error) {
 457                                 crit_exit();
 458                                 return (error);
 459                         }
 460                 }
 461
 462                 /*
 463                  * Generate protocol bytes.
 464                  * For some reason X386 expects 5 bytes but never uses
 465                  * the fourth or fifth?
 466                  */
 467                 sc->sc_bytes[0] = sc->mode.syncmask[1]
 468                     | (sc->sc_buttons & ~sc->mode.syncmask[0]);
 469                 if (sc->sc_deltax > 127)
 470                         sc->sc_deltax = 127;
 471                 if (sc->sc_deltax < -127)
 472                         sc->sc_deltax = -127;
 473                 sc->sc_deltay = -sc->sc_deltay; /* Otherwise mousey goes wrong way */
 474                 if (sc->sc_deltay > 127)
 475                         sc->sc_deltay = 127;
 476                 if (sc->sc_deltay < -127)
 477                         sc->sc_deltay = -127;
 478                 sc->sc_bytes[1] = sc->sc_deltax;
 479                 sc->sc_bytes[2] = sc->sc_deltay;
 480                 sc->sc_bytes[3] = sc->sc_bytes[4] = 0;
 481                 sc->sc_bytes[5] = sc->sc_bytes[6] = 0;
 482                 sc->sc_bytes[7] = MOUSE_SYS_EXTBUTTONS;
 483                 sc->sc_obuttons = sc->sc_buttons;
 484                 sc->sc_deltax = sc->sc_deltay = 0;
 485                 sc->sc_bytesread = 0;
 486         }
 487         crit_exit();
 488         xfer = min(uio->uio_resid, sc->mode.packetsize - sc->sc_bytesread);
 489         error = uiomove(&sc->sc_bytes[sc->sc_bytesread], xfer, uio);
 490         if (error)
 491                 return (error);
 492         sc->sc_bytesread += xfer;
 493         return(0);
 494 }
 495
 496 /*
 497  * mseioctl: process ioctl commands.
 498  */
 499 static int
 500 mseioctl(struct dev_ioctl_args *ap)
 501 {
 502         cdev_t dev = ap->a_head.a_dev;
 503         caddr_t addr = ap->a_data;
 504         mse_softc_t *sc = devclass_get_softc(mse_devclass, MSE_UNIT(dev));
 505         mousestatus_t status;
 506         int err = 0;
 507
 508         switch (ap->a_cmd) {
 509         case MOUSE_GETHWINFO:
 510                 crit_enter();
 511                 *(mousehw_t *)addr = sc->hw;
 512                 if (sc->mode.level == 0)
 513                         ((mousehw_t *)addr)->model = MOUSE_MODEL_GENERIC;
 514                 crit_exit();
 515                 break;
 516
 517         case MOUSE_GETMODE:
 518                 crit_enter();
 519                 *(mousemode_t *)addr = sc->mode;
 520                 switch (sc->mode.level) {
 521                 case 0:
 522                         break;
 523                 case 1:
 524                         ((mousemode_t *)addr)->protocol = MOUSE_PROTO_SYSMOUSE;
 525                         ((mousemode_t *)addr)->syncmask[0] = MOUSE_SYS_SYNCMASK;
 526                         ((mousemode_t *)addr)->syncmask[1] = MOUSE_SYS_SYNC;
 527                         break;
 528                 }
 529                 crit_exit();
 530                 break;
 531
 532         case MOUSE_SETMODE:
 533                 switch (((mousemode_t *)addr)->level) {
 534                 case 0:
 535                 case 1:
 536                         break;
 537                 default:
 538                         return (EINVAL);
 539                 }
 540                 if (((mousemode_t *)addr)->accelfactor < -1)
 541                         return (EINVAL);
 542                 else if (((mousemode_t *)addr)->accelfactor >= 0)
 543                         sc->mode.accelfactor =
 544                             ((mousemode_t *)addr)->accelfactor;
 545                 sc->mode.level = ((mousemode_t *)addr)->level;
 546                 switch (sc->mode.level) {
 547                 case 0:
 548                         sc->sc_bytesread = sc->mode.packetsize
 549                             = MOUSE_MSC_PACKETSIZE;
 550                         break;
 551                 case 1:
 552                         sc->sc_bytesread = sc->mode.packetsize
 553                             = MOUSE_SYS_PACKETSIZE;
 554                         break;
 555                 }
 556                 break;
 557
 558         case MOUSE_GETLEVEL:
 559                 *(int *)addr = sc->mode.level;
 560                 break;
 561
 562         case MOUSE_SETLEVEL:
 563                 switch (*(int *)addr) {
 564                 case 0:
 565                         sc->mode.level = *(int *)addr;
 566                         sc->sc_bytesread = sc->mode.packetsize
 567                             = MOUSE_MSC_PACKETSIZE;
 568                         break;
 569                 case 1:
 570                         sc->mode.level = *(int *)addr;
 571                         sc->sc_bytesread = sc->mode.packetsize
 572                             = MOUSE_SYS_PACKETSIZE;
 573                         break;
 574                 default:
 575                         return (EINVAL);
 576                 }
 577                 break;
 578
 579         case MOUSE_GETSTATUS:
 580                 crit_enter();
 581                 status = sc->status;
 582                 sc->status.flags = 0;
 583                 sc->status.obutton = sc->status.button;
 584                 sc->status.button = 0;
 585                 sc->status.dx = 0;
 586                 sc->status.dy = 0;
 587                 sc->status.dz = 0;
 588                 crit_exit();
 589                 *(mousestatus_t *)addr = status;
 590                 break;
 591
 592         case MOUSE_READSTATE:
 593         case MOUSE_READDATA:
 594                 return (ENODEV);
 595
 596 #if (defined(MOUSE_GETVARS))
 597         case MOUSE_GETVARS:
 598         case MOUSE_SETVARS:
 599                 return (ENODEV);
 600 #endif
 601
 602         default:
 603                 return (ENOTTY);
 604         }
 605         return (err);
 606 }
 607
 608 /*
 609  * msepoll: check for mouse input to be processed.
 610  */
 611 static  int
 612 msepoll(struct dev_poll_args *ap)
 613 {
 614         cdev_t dev = ap->a_head.a_dev;
 615         mse_softc_t *sc = devclass_get_softc(mse_devclass, MSE_UNIT(dev));
 616         int revents = 0;
 617
 618         crit_enter();
 619         if (ap->a_events & (POLLIN | POLLRDNORM)) {
 620                 if (sc->sc_bytesread != sc->mode.packetsize ||
 621                     sc->sc_deltax != 0 || sc->sc_deltay != 0 ||
 622                     (sc->sc_obuttons ^ sc->sc_buttons) != 0)
 623                         revents |= ap->a_events & (POLLIN | POLLRDNORM);
 624                 else {
 625                         /*
 626                          * Since this is an exclusive open device, any previous
 627                          * proc pointer is trash now, so we can just assign it.
 628                          */
 629                         selrecord(curthread, &sc->sc_selp);
 630                 }
 631         }
 632         crit_exit();
 633         ap->a_events = revents;
 634         return (0);
 635 }
 636
 637 /*
 638  * msetimeout: watchdog timer routine.
 639  */
 640 static void
 641 msetimeout(void *arg)
 642 {
 643         cdev_t dev;
 644         mse_softc_t *sc;
 645
 646         dev = (cdev_t)arg;
 647         sc = devclass_get_softc(mse_devclass, MSE_UNIT(dev));
 648         if (sc->sc_watchdog) {
 649                 if (bootverbose)
 650                         kprintf("mse%d: lost interrupt?\n", MSE_UNIT(dev));
 651                 mseintr(sc);
 652         }
 653         sc->sc_watchdog = TRUE;
 654         callout_reset(&sc->sc_callout, hz, msetimeout, dev);
 655 }
 656
 657 /*
 658  * mseintr: update mouse status. sc_deltax and sc_deltay are accumulative.
 659  */
 660 static void
 661 mseintr(void *arg)
 662 {
 663         /*
 664          * the table to turn MouseSystem button bits (MOUSE_MSC_BUTTON?UP)
 665          * into `mousestatus' button bits (MOUSE_BUTTON?DOWN).
 666          */
 667         static int butmap[8] = {
 668                 0,
 669                 MOUSE_BUTTON3DOWN,
 670                 MOUSE_BUTTON2DOWN,
 671                 MOUSE_BUTTON2DOWN | MOUSE_BUTTON3DOWN,
 672                 MOUSE_BUTTON1DOWN,
 673                 MOUSE_BUTTON1DOWN | MOUSE_BUTTON3DOWN,
 674                 MOUSE_BUTTON1DOWN | MOUSE_BUTTON2DOWN,
 675                 MOUSE_BUTTON1DOWN | MOUSE_BUTTON2DOWN | MOUSE_BUTTON3DOWN
 676         };
 677         mse_softc_t *sc = arg;
 678         int dx, dy, but;
 679         int sign;
 680
 681 #ifdef DEBUG
 682         static int mse_intrcnt = 0;
 683         if((mse_intrcnt++ % 10000) == 0)
 684                 kprintf("mseintr\n");
 685 #endif /* DEBUG */
 686         if ((sc->sc_flags & MSESC_OPEN) == 0)
 687                 return;
 688
 689         (*sc->sc_getmouse)(sc->sc_iot, sc->sc_ioh, &dx, &dy, &but);
 690         if (sc->mode.accelfactor > 0) {
 691                 sign = (dx < 0);
 692                 dx = dx * dx / sc->mode.accelfactor;
 693                 if (dx == 0)
 694                         dx = 1;
 695                 if (sign)
 696                         dx = -dx;
 697                 sign = (dy < 0);
 698                 dy = dy * dy / sc->mode.accelfactor;
 699                 if (dy == 0)
 700                         dy = 1;
 701                 if (sign)
 702                         dy = -dy;
 703         }
 704         sc->sc_deltax += dx;
 705         sc->sc_deltay += dy;
 706         sc->sc_buttons = but;
 707
 708         but = butmap[~but & MOUSE_MSC_BUTTONS];
 709         sc->status.dx += dx;
 710         sc->status.dy += dy;
 711         sc->status.flags |= ((dx || dy) ? MOUSE_POSCHANGED : 0)
 712             | (sc->status.button ^ but);
 713         sc->status.button = but;
 714
 715         sc->sc_watchdog = FALSE;
 716
 717         /*
 718          * If mouse state has changed, wake up anyone wanting to know.
 719          */
 720         if (sc->sc_deltax != 0 || sc->sc_deltay != 0 ||
 721             (sc->sc_obuttons ^ sc->sc_buttons) != 0) {
 722                 if (sc->sc_flags & MSESC_WANT) {
 723                         sc->sc_flags &= ~MSESC_WANT;
 724                         wakeup((caddr_t)sc);
 725                 }
 726                 selwakeup(&sc->sc_selp);
 727         }
 728 }
 729
 730 /*
 731  * Routines for the Logitech mouse.
 732  */
 733 /*
 734  * Test for a Logitech bus mouse and return 1 if it is.
 735  * (until I know how to use the signature port properly, just disable
 736  *  interrupts and return 1)
 737  */
 738 static int
 739 mse_probelogi(device_t dev, mse_softc_t *sc)
 740 {
 741
 742         int sig;
 743
 744         bus_space_write_1(sc->sc_iot, sc->sc_ioh, MSE_PORTD, MSE_SETUP);
 745                 /* set the signature port */
 746         bus_space_write_1(sc->sc_iot, sc->sc_ioh, MSE_PORTB, MSE_LOGI_SIG);
 747
 748         DELAY(30000); /* 30 ms delay */
 749         sig = bus_space_read_1(sc->sc_iot, sc->sc_ioh, MSE_PORTB) & 0xFF;
 750         if (sig == MSE_LOGI_SIG) {
 751                 bus_space_write_1(sc->sc_iot, sc->sc_ioh, MSE_PORTC,
 752                                   MSE_DISINTR);
 753                 return(1);
 754         } else {
 755                 if (bootverbose)
 756                         device_printf(dev, "wrong signature %x\n", sig);
 757                 return(0);
 758         }
 759 }
 760
 761 /*
 762  * Initialize Logitech mouse and enable interrupts.
 763  */
 764 static void
 765 mse_enablelogi(bus_space_tag_t tag, bus_space_handle_t handle)
 766 {
 767         int dx, dy, but;
 768
 769         bus_space_write_1(tag, handle, MSE_PORTD, MSE_SETUP);
 770         mse_getlogi(tag, handle, &dx, &dy, &but);
 771 }
 772
 773 /*
 774  * Disable interrupts for Logitech mouse.
 775  */
 776 static void
 777 mse_disablelogi(bus_space_tag_t tag, bus_space_handle_t handle)
 778 {
 779
 780         bus_space_write_1(tag, handle, MSE_PORTC, MSE_DISINTR);
 781 }
 782
 783 /*
 784  * Get the current dx, dy and button up/down state.
 785  */
 786 static void
 787 mse_getlogi(bus_space_tag_t tag, bus_space_handle_t handle, int *dx, int *dy,
 788             int *but)
 789 {
 790         char x, y;
 791
 792         bus_space_write_1(tag, handle, MSE_PORTC, MSE_HOLD | MSE_RXLOW);
 793         x = bus_space_read_1(tag, handle, MSE_PORTA);
 794         *but = (x >> 5) & MOUSE_MSC_BUTTONS;
 795         x &= 0xf;
 796         bus_space_write_1(tag, handle, MSE_PORTC, MSE_HOLD | MSE_RXHIGH);
 797         x |= (bus_space_read_1(tag, handle, MSE_PORTA) << 4);
 798         bus_space_write_1(tag, handle, MSE_PORTC, MSE_HOLD | MSE_RYLOW);
 799         y = (bus_space_read_1(tag, handle, MSE_PORTA) & 0xf);
 800         bus_space_write_1(tag, handle, MSE_PORTC, MSE_HOLD | MSE_RYHIGH);
 801         y |= (bus_space_read_1(tag, handle, MSE_PORTA) << 4);
 802         *dx = x;
 803         *dy = y;
 804         bus_space_write_1(tag, handle, MSE_PORTC, MSE_INTREN);
 805 }
 806
 807 /*
 808  * Routines for the ATI Inport bus mouse.
 809  */
 810 /*
 811  * Test for a ATI Inport bus mouse and return 1 if it is.
 812  * (do not enable interrupts)
 813  */
 814 static int
 815 mse_probeati(device_t dev, mse_softc_t *sc)
 816 {
 817         int i;
 818
 819         for (i = 0; i < 2; i++)
 820                 if (bus_space_read_1(sc->sc_iot, sc->sc_ioh, MSE_PORTC) == 0xde)
 821                         return (1);
 822         return (0);
 823 }
 824
 825 /*
 826  * Initialize ATI Inport mouse and enable interrupts.
 827  */
 828 static void
 829 mse_enableati(bus_space_tag_t tag, bus_space_handle_t handle)
 830 {
 831
 832         bus_space_write_1(tag, handle, MSE_PORTA, MSE_INPORT_RESET);
 833         bus_space_write_1(tag, handle, MSE_PORTA, MSE_INPORT_MODE);
 834         bus_space_write_1(tag, handle, MSE_PORTB, MSE_INPORT_INTREN);
 835 }
 836
 837 /*
 838  * Disable interrupts for ATI Inport mouse.
 839  */
 840 static void
 841 mse_disableati(bus_space_tag_t tag, bus_space_handle_t handle)
 842 {
 843
 844         bus_space_write_1(tag, handle, MSE_PORTA, MSE_INPORT_MODE);
 845         bus_space_write_1(tag, handle, MSE_PORTB, 0);
 846 }
 847
 848 /*
 849  * Get current dx, dy and up/down button state.
 850  */
 851 static void
 852 mse_getati(bus_space_tag_t tag, bus_space_handle_t handle, int *dx, int *dy,
 853            int *but)
 854 {
 855         char byte;
 856
 857         bus_space_write_1(tag, handle, MSE_PORTA, MSE_INPORT_MODE);
 858         bus_space_write_1(tag, handle, MSE_PORTB, MSE_INPORT_HOLD);
 859         bus_space_write_1(tag, handle, MSE_PORTA, MSE_INPORT_STATUS);
 860         *but = ~bus_space_read_1(tag, handle, MSE_PORTB) & MOUSE_MSC_BUTTONS;
 861         bus_space_write_1(tag, handle, MSE_PORTA, MSE_INPORT_DX);
 862         byte = bus_space_read_1(tag, handle, MSE_PORTB);
 863         *dx = byte;
 864         bus_space_write_1(tag, handle, MSE_PORTA, MSE_INPORT_DY);
 865         byte = bus_space_read_1(tag, handle, MSE_PORTB);
 866         *dy = byte;
 867         bus_space_write_1(tag, handle, MSE_PORTA, MSE_INPORT_MODE);
 868         bus_space_write_1(tag, handle, MSE_PORTB, MSE_INPORT_INTREN);
 869 }