123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336 |
- #include "u.h"
- #include "../port/lib.h"
- #include "mem.h"
- #include "dat.h"
- #include "fns.h"
- #include "../port/error.h"
- #include "io.h"
- #define Image IMAGE
- #include <draw.h>
- #include <memdraw.h>
- #include <cursor.h>
- #include "screen.h"
- /*
- * mouse types
- */
- enum
- {
- Mouseother= 0,
- Mouseserial= 1,
- MousePS2= 2,
- };
- static QLock mousectlqlock;
- static int mousetype;
- static int intellimouse;
- static int packetsize;
- static int resolution;
- static int accelerated;
- static int mousehwaccel;
- static char mouseport[5];
- enum
- {
- CMaccelerated,
- CMhwaccel,
- CMintellimouse,
- CMlinear,
- CMps2,
- CMps2intellimouse,
- CMres,
- CMreset,
- CMserial,
- };
- static Cmdtab mousectlmsg[] =
- {
- CMaccelerated, "accelerated", 0,
- CMhwaccel, "hwaccel", 2,
- CMintellimouse, "intellimouse", 1,
- CMlinear, "linear", 1,
- CMps2, "ps2", 1,
- CMps2intellimouse, "ps2intellimouse", 1,
- CMres, "res", 0,
- CMreset, "reset", 1,
- CMserial, "serial", 0,
- };
- /*
- * ps/2 mouse message is three bytes
- *
- * byte 0 - 0 0 SDY SDX 1 M R L
- * byte 1 - DX
- * byte 2 - DY
- *
- * shift & right button is the same as middle button
- *
- * Intellimouse and AccuPoint with extra buttons deliver
- * byte 3 - 00 or 01 or FF according to extra button state.
- * extra buttons are mapped in this code to buttons 4 and 5.
- * AccuPoint generates repeated events for these buttons;
- * it and Intellimouse generate 'down' events only, so
- * user-level code is required to generate button 'up' events
- * if they are needed by the application.
- * Also on laptops with AccuPoint AND external mouse, the
- * controller may deliver 3 or 4 bytes according to the type
- * of the external mouse; code must adapt.
- *
- * On the NEC Versa series (and perhaps others?) we seem to
- * lose a byte from the packet every once in a while, which
- * means we lose where we are in the instruction stream.
- * To resynchronize, if we get a byte more than two seconds
- * after the previous byte, we assume it's the first in a packet.
- */
- static void
- ps2mouseputc(int c, int shift)
- {
- static short msg[4];
- static int nb;
- static uchar b[] = {0, 1, 4, 5, 2, 3, 6, 7, 0, 1, 2, 3, 2, 3, 6, 7 };
- static ulong lasttick;
- ulong m;
- int buttons, dx, dy;
- /*
- * Resynchronize in stream with timing; see comment above.
- */
- m = MACHP(0)->ticks;
- if(TK2SEC(m - lasttick) > 2)
- nb = 0;
- lasttick = m;
- /*
- * check byte 0 for consistency
- */
- if(nb==0 && (c&0xc8)!=0x08)
- if(intellimouse && (c==0x00 || c==0x01 || c==0xFF)){
- /* last byte of 4-byte packet */
- packetsize = 4;
- return;
- }
- msg[nb] = c;
- if(++nb == packetsize){
- nb = 0;
- if(msg[0] & 0x10)
- msg[1] |= 0xFF00;
- if(msg[0] & 0x20)
- msg[2] |= 0xFF00;
- buttons = b[(msg[0]&7) | (shift ? 8 : 0)];
- if(intellimouse && packetsize==4){
- if((msg[3]&0xc8) == 0x08){
- /* first byte of 3-byte packet */
- packetsize = 3;
- msg[0] = msg[3];
- nb = 1;
- /* fall through to emit previous packet */
- }else{
- /* The AccuPoint on the Toshiba 34[48]0CT
- * encodes extra buttons as 4 and 5. They repeat
- * and don't release, however, so user-level
- * timing code is required. Furthermore,
- * intellimice with 3buttons + scroll give a
- * two's complement number in the lower 4 bits
- * (bit 4 is sign extension) that describes
- * the amount the scroll wheel has moved during
- * the last sample. Here we use only the sign to
- * decide whether the wheel is moving up or down
- * and generate a single button 4 or 5 click
- * accordingly.
- */
- if((msg[3] >> 3) & 1)
- buttons |= 1<<3;
- else if(msg[3] & 0x7)
- buttons |= 1<<4;
- }
- }
- dx = msg[1];
- dy = -msg[2];
- mousetrack(dx, dy, buttons, TK2MS(MACHP(0)->ticks));
- }
- return;
- }
- /*
- * set up a ps2 mouse
- */
- static void
- ps2mouse(void)
- {
- if(mousetype == MousePS2)
- return;
- i8042auxenable(ps2mouseputc);
- /* make mouse streaming, enabled */
- i8042auxcmd(0xEA);
- i8042auxcmd(0xF4);
- mousetype = MousePS2;
- packetsize = 3;
- mousehwaccel = 1;
- }
- /*
- * The PS/2 Trackpoint multiplexor on the IBM Thinkpad T23 ignores
- * acceleration commands. It is supposed to pass them on
- * to the attached device, but my Logitech mouse is simply
- * not behaving any differently. For such devices, we allow
- * the user to use "hwaccel off" to tell us to back off to
- * software acceleration even if we're using the PS/2 port.
- * (Serial mice are always software accelerated.)
- * For more information on the Thinkpad multiplexor, see
- * http://wwwcssrv.almaden.ibm.com/trackpoint/
- */
- static void
- setaccelerated(int x)
- {
- accelerated = x;
- if(mousehwaccel){
- switch(mousetype){
- case MousePS2:
- i8042auxcmd(0xE7);
- return;
- }
- }
- mouseaccelerate(x);
- }
- static void
- setlinear(void)
- {
- accelerated = 0;
- if(mousehwaccel){
- switch(mousetype){
- case MousePS2:
- i8042auxcmd(0xE6);
- return;
- }
- }
- mouseaccelerate(0);
- }
- static void
- setres(int n)
- {
- resolution = n;
- switch(mousetype){
- case MousePS2:
- i8042auxcmd(0xE8);
- i8042auxcmd(n);
- break;
- }
- }
- static void
- setintellimouse(void)
- {
- intellimouse = 1;
- packetsize = 4;
- switch(mousetype){
- case MousePS2:
- i8042auxcmd(0xF3); /* set sample */
- i8042auxcmd(0xC8);
- i8042auxcmd(0xF3); /* set sample */
- i8042auxcmd(0x64);
- i8042auxcmd(0xF3); /* set sample */
- i8042auxcmd(0x50);
- break;
- case Mouseserial:
- i8250setmouseputc(mouseport, m5mouseputc);
- break;
- }
- }
- static void
- resetmouse(void)
- {
- packetsize = 3;
- switch(mousetype){
- case MousePS2:
- i8042auxcmd(0xF6);
- i8042auxcmd(0xEA); /* streaming */
- i8042auxcmd(0xE8); /* set resolution */
- i8042auxcmd(3);
- i8042auxcmd(0xF4); /* enabled */
- break;
- }
- }
- void
- mousectl(Cmdbuf *cb)
- {
- Cmdtab *ct;
- qlock(&mousectlqlock);
- if(waserror()){
- qunlock(&mousectlqlock);
- nexterror();
- }
- ct = lookupcmd(cb, mousectlmsg, nelem(mousectlmsg));
- switch(ct->index){
- case CMaccelerated:
- setaccelerated(cb->nf == 1 ? 1 : atoi(cb->f[1]));
- break;
- case CMintellimouse:
- setintellimouse();
- break;
- case CMlinear:
- setlinear();
- break;
- case CMps2:
- intellimouse = 0;
- ps2mouse();
- break;
- case CMps2intellimouse:
- ps2mouse();
- setintellimouse();
- break;
- case CMres:
- if(cb->nf >= 2)
- setres(atoi(cb->f[1]));
- else
- setres(1);
- break;
- case CMreset:
- resetmouse();
- if(accelerated)
- setaccelerated(accelerated);
- if(resolution)
- setres(resolution);
- if(intellimouse)
- setintellimouse();
- break;
- case CMserial:
- if(mousetype == Mouseserial)
- error(Emouseset);
- if(cb->nf > 2){
- if(strcmp(cb->f[2], "M") == 0)
- i8250mouse(cb->f[1], m3mouseputc, 0);
- else if(strcmp(cb->f[2], "MI") == 0)
- i8250mouse(cb->f[1], m5mouseputc, 0);
- else
- i8250mouse(cb->f[1], mouseputc, cb->nf == 1);
- } else
- i8250mouse(cb->f[1], mouseputc, cb->nf == 1);
- mousetype = Mouseserial;
- strncpy(mouseport, cb->f[1], sizeof(mouseport)-1);
- packetsize = 3;
- break;
- case CMhwaccel:
- if(strcmp(cb->f[1], "on")==0)
- mousehwaccel = 1;
- else if(strcmp(cb->f[1], "off")==0)
- mousehwaccel = 0;
- else
- cmderror(cb, "bad mouse control message");
- }
- qunlock(&mousectlqlock);
- poperror();
- }
|