xserver git update 15/5/2010

1 files changed, 1030 insertions, 1030 deletions

diff --git a/xorg-server/hw/kdrive/linux/mouse.c b/xorg-server/hw/kdrive/linux/mouse.c
index 007263e4b..2e39d240e 100644
--- a/xorg-server/hw/kdrive/linux/mouse.c
+++ b/xorg-server/hw/kdrive/linux/mouse.c
@@ -1,1030 +1,1030 @@
-/*
- * Copyright © 2001 Keith Packard
- *
- * Permission to use, copy, modify, distribute, and sell this software and its
- * documentation for any purpose is hereby granted without fee, provided that
- * the above copyright notice appear in all copies and that both that
- * copyright notice and this permission notice appear in supporting
- * documentation, and that the name of Keith Packard not be used in
- * advertising or publicity pertaining to distribution of the software without
- * specific, written prior permission.  Keith Packard makes no
- * representations about the suitability of this software for any purpose.  It
- * is provided "as is" without express or implied warranty.
- *
- * KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
- * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
- * EVENT SHALL KEITH PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR
- * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
- * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
- * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
- * PERFORMANCE OF THIS SOFTWARE.
- */
-
-#ifdef HAVE_CONFIG_H
-#include <kdrive-config.h>
-#endif
-#include <errno.h>
-#include <termios.h>
-#include <X11/X.h>
-#include <X11/Xproto.h>
-#include <X11/Xpoll.h>
-#include "inputstr.h"
-#include "scrnintstr.h"
-#include "kdrive.h"
-
-#undef DEBUG
-#undef DEBUG_BYTES
-#define KBUFIO_SIZE 256
-#define MOUSE_TIMEOUT	100
-
-typedef struct _kbufio {
-    int		    fd;
-    unsigned char   buf[KBUFIO_SIZE];
-    int		    avail;
-    int		    used;
-} Kbufio;
-
-static Bool
-MouseWaitForReadable (int fd, int timeout)
-{
-    fd_set	    set;
-    struct timeval  tv, *tp;
-    int		    n;
-    CARD32	    done;
-
-    done = GetTimeInMillis () + timeout;
-    for (;;)
-    {
-	FD_ZERO (&set);
-	FD_SET (fd, &set);
-	if (timeout == -1)
-	    tp = 0;
-	else
-	{
-	    tv.tv_sec = timeout / 1000;
-	    tv.tv_usec = (timeout % 1000) * 1000;
-	    tp = &tv;
-	}
-	n = select (fd + 1, &set, 0, 0, tp);
-	if (n > 0)
-	    return TRUE;
-	if (n < 0 && (errno == EAGAIN || errno == EINTR))
-	{
-	    timeout = (int) (done - GetTimeInMillis ());
-	    if (timeout > 0)
-		continue;
-	}
-	break;
-    }
-    return FALSE;
-}
-
-static int
-MouseReadByte (Kbufio *b, int timeout)
-{
-    int	n;
-    if (b->avail <= b->used)
-    {
-	if (timeout && !MouseWaitForReadable (b->fd, timeout))
-	{
-#ifdef DEBUG_BYTES
-	    ErrorF ("\tTimeout %d\n", timeout);
-#endif
-	    return -1;
-	}
-	n = read (b->fd, b->buf, KBUFIO_SIZE);
-	if (n <= 0)
-	    return -1;
-        b->avail = n;
-        b->used = 0;
-    }
-#ifdef DEBUG_BYTES
-    ErrorF ("\tget %02x\n", b->buf[b->used]);
-#endif
-    return b->buf[b->used++];
-}
-
-#if NOTUSED
-static int
-MouseFlush (Kbufio *b, char *buf, int size)
-{
-    CARD32  now = GetTimeInMillis ();
-    CARD32  done = now + 100;
-    int	    c;
-    int	    n = 0;
-
-    while ((c = MouseReadByte (b, done - now)) != -1)
-    {
-	if (buf)
-	{
-	    if (n == size)
-	    {
-		memmove (buf, buf + 1, size - 1);
-		n--;
-	    }
-	    buf[n++] = c;
-	}
-	now = GetTimeInMillis ();
-	if ((INT32) (now - done) >= 0)
-	    break;
-    }
-    return n;
-}
-
-static int
-MousePeekByte (Kbufio *b, int timeout)
-{
-    int	    c;
-
-    c = MouseReadByte (b, timeout);
-    if (c != -1)
-	--b->used;
-    return c;
-}
-#endif /* NOTUSED */
-
-static Bool
-MouseWaitForWritable (int fd, int timeout)
-{
-    fd_set	    set;
-    struct timeval  tv, *tp;
-    int		    n;
-
-    FD_ZERO (&set);
-    FD_SET (fd, &set);
-    if (timeout == -1)
-	tp = 0;
-    else
-    {
-	tv.tv_sec = timeout / 1000;
-	tv.tv_usec = (timeout % 1000) * 1000;
-	tp = &tv;
-    }
-    n = select (fd + 1, 0, &set, 0, tp);
-    if (n > 0)
-	return TRUE;
-    return FALSE;
-}
-
-static Bool
-MouseWriteByte (int fd, unsigned char c, int timeout)
-{
-    int	ret;
-
-#ifdef DEBUG_BYTES
-    ErrorF ("\tput %02x\n", c);
-#endif
-    for (;;)
-    {
-	ret = write (fd, &c, 1);
-	if (ret == 1)
-	    return TRUE;
-	if (ret == 0)
-	    return FALSE;
-	if (errno != EWOULDBLOCK)
-	    return FALSE;
-	if (!MouseWaitForWritable (fd, timeout))
-	    return FALSE;
-    }
-}
-
-static Bool
-MouseWriteBytes (int fd, unsigned char *c, int n, int timeout)
-{
-    while (n--)
-	if (!MouseWriteByte (fd, *c++, timeout))
-	    return FALSE;
-    return TRUE;
-}
-
-#define MAX_MOUSE   10	    /* maximum length of mouse protocol */
-#define MAX_SKIP    16	    /* number of error bytes before switching */
-#define MAX_VALID   4	    /* number of valid packets before accepting */
-
-typedef struct _kmouseProt {
-    char	    *name;
-    Bool	    (*Complete) (KdPointerInfo *pi, unsigned char *ev, int ne);
-    int		    (*Valid) (KdPointerInfo *pi, unsigned char *ev, int ne);
-    Bool	    (*Parse) (KdPointerInfo *pi, unsigned char *ev, int ne);
-    Bool	    (*Init) (KdPointerInfo *pi);
-    unsigned char   headerMask, headerValid;
-    unsigned char   dataMask, dataValid;
-    Bool	    tty;
-    unsigned int    c_iflag;
-    unsigned int    c_oflag;
-    unsigned int    c_lflag;
-    unsigned int    c_cflag;
-    unsigned int    speed;
-    unsigned char   *init;
-    unsigned long   state;
-} KmouseProt;
-
-typedef enum _kmouseStage {
-    MouseBroken, MouseTesting, MouseWorking
-} KmouseStage;
-
-typedef struct _kmouse {
-    Kbufio		iob;
-    const KmouseProt	*prot;
-    int			i_prot;
-    KmouseStage		stage;	/* protocol verification stage */
-    Bool		tty;	/* mouse device is a tty */
-    int			valid;	/* sequential valid events */
-    int			tested;	/* bytes scanned during Testing phase */
-    int			invalid;/* total invalid bytes for this protocol */
-    unsigned long	state;	/* private per protocol, init to prot->state */
-} Kmouse;
-
-static int mouseValid (KdPointerInfo *pi, unsigned char *ev, int ne)
-{
-    Kmouse		*km = pi->driverPrivate;
-    const KmouseProt	*prot = km->prot;
-    int	    i;
-
-    for (i = 0; i < ne; i++)
-	if ((ev[i] & prot->headerMask) == prot->headerValid)
-	    break;
-    if (i != 0)
-	return i;
-    for (i = 1; i < ne; i++)
-	if ((ev[i] & prot->dataMask) != prot->dataValid)
-	    return -1;
-    return 0;
-}
-
-static Bool threeComplete (KdPointerInfo *pi, unsigned char *ev, int ne)
-{
-    return ne == 3;
-}
-
-static Bool fourComplete (KdPointerInfo *pi, unsigned char *ev, int ne)
-{
-    return ne == 4;
-}
-
-static Bool fiveComplete (KdPointerInfo *pi, unsigned char *ev, int ne)
-{
-    return ne == 5;
-}
-
-static Bool MouseReasonable (KdPointerInfo *pi, unsigned long flags, int dx, int dy)
-{
-    Kmouse		*km = pi->driverPrivate;
-
-    if (km->stage == MouseWorking)
-	return TRUE;
-    if (dx < -50 || dx > 50)
-    {
-#ifdef DEBUG
-	ErrorF ("Large X %d\n", dx);
-#endif
-	return FALSE;
-    }
-    if (dy < -50 || dy > 50)
-    {
-#ifdef DEBUG
-	ErrorF ("Large Y %d\n", dy);
-#endif
-	return FALSE;
-    }
-    return TRUE;
-}
-
-/*
- * Standard PS/2 mouse protocol
- */
-static Bool ps2Parse (KdPointerInfo *pi, unsigned char *ev, int ne)
-{
-    Kmouse	    *km = pi->driverPrivate;
-    int		    dx, dy, dz;
-    unsigned long   flags;
-    unsigned long   flagsrelease = 0;
-
-    flags = KD_MOUSE_DELTA;
-    if (ev[0] & 4)
-	flags |= KD_BUTTON_2;
-    if (ev[0] & 2)
-	flags |= KD_BUTTON_3;
-    if (ev[0] & 1)
-	flags |= KD_BUTTON_1;
-
-    if (ne > 3)
-    {
-	dz = (int) (signed char) ev[3];
-	if (dz < 0)
-	{
-	    flags |= KD_BUTTON_4;
-	    flagsrelease = KD_BUTTON_4;
-	}
-	else if (dz > 0)
-	{
-	    flags |= KD_BUTTON_5;
-	    flagsrelease = KD_BUTTON_5;
-	}
-    }
-
-    dx = ev[1];
-    if (ev[0] & 0x10)
-	dx -= 256;
-    dy = ev[2];
-    if (ev[0] & 0x20)
-	dy -= 256;
-    dy = -dy;
-    if (!MouseReasonable (pi, flags, dx, dy))
-	return FALSE;
-    if (km->stage == MouseWorking)
-    {
-	KdEnqueuePointerEvent (pi, flags, dx, dy, 0);
-	if (flagsrelease)
-	{
-	    flags &= ~flagsrelease;
-	    KdEnqueuePointerEvent (pi, flags, dx, dy, 0);
-	}
-    }
-    return TRUE;
-}
-
-static Bool ps2Init (KdPointerInfo *pi);
-
-static const KmouseProt ps2Prot = {
-    "ps/2",
-    threeComplete, mouseValid, ps2Parse, ps2Init,
-    0x08, 0x08, 0x00, 0x00,
-    FALSE
-};
-
-static const KmouseProt imps2Prot = {
-    "imps/2",
-    fourComplete, mouseValid, ps2Parse, ps2Init,
-    0x08, 0x08, 0x00, 0x00,
-    FALSE
-};
-
-static const KmouseProt exps2Prot = {
-    "exps/2",
-    fourComplete, mouseValid, ps2Parse, ps2Init,
-    0x08, 0x08, 0x00, 0x00,
-    FALSE
-};
-
-/*
- * Once the mouse is known to speak ps/2 protocol, go and find out
- * what advanced capabilities it has and turn them on
- */
-
-/* these extracted from FreeBSD 4.3 sys/dev/kbd/atkbdcreg.h */
-
-/* aux device commands (sent to KBD_DATA_PORT) */
-#define PSMC_SET_SCALING11      0x00e6
-#define PSMC_SET_SCALING21      0x00e7
-#define PSMC_SET_RESOLUTION     0x00e8
-#define PSMC_SEND_DEV_STATUS    0x00e9
-#define PSMC_SET_STREAM_MODE    0x00ea
-#define PSMC_SEND_DEV_DATA      0x00eb
-#define PSMC_SET_REMOTE_MODE    0x00f0
-#define PSMC_SEND_DEV_ID        0x00f2
-#define PSMC_SET_SAMPLING_RATE  0x00f3
-#define PSMC_ENABLE_DEV         0x00f4
-#define PSMC_DISABLE_DEV        0x00f5
-#define PSMC_SET_DEFAULTS       0x00f6
-#define PSMC_RESET_DEV          0x00ff
-
-/* PSMC_SET_RESOLUTION argument */
-#define PSMD_RES_LOW            0       /* typically 25ppi */
-#define PSMD_RES_MEDIUM_LOW     1       /* typically 50ppi */
-#define PSMD_RES_MEDIUM_HIGH    2       /* typically 100ppi (default) */
-#define PSMD_RES_HIGH           3       /* typically 200ppi */
-#define PSMD_MAX_RESOLUTION     PSMD_RES_HIGH
-
-/* PSMC_SET_SAMPLING_RATE */
-#define PSMD_MAX_RATE           255     /* FIXME: not sure if it's possible */
-
-/* aux device ID */
-#define PSM_MOUSE_ID            0
-#define PSM_BALLPOINT_ID        2
-#define PSM_INTELLI_ID          3
-#define PSM_EXPLORER_ID         4
-#define PSM_4DMOUSE_ID          6
-#define PSM_4DPLUS_ID           8
-
-static unsigned char	ps2_init[] = {
-    PSMC_ENABLE_DEV,
-    0,
-};
-
-#define NINIT_PS2   1
-
-static unsigned char    wheel_3button_init[] = {
-    PSMC_SET_SAMPLING_RATE, 200,
-    PSMC_SET_SAMPLING_RATE, 100,
-    PSMC_SET_SAMPLING_RATE,  80,
-    PSMC_SEND_DEV_ID,
-    0,
-};
-
-#define NINIT_IMPS2 4
-
-static unsigned char    wheel_5button_init[] = {
-    PSMC_SET_SAMPLING_RATE, 200,
-    PSMC_SET_SAMPLING_RATE, 100,
-    PSMC_SET_SAMPLING_RATE,  80,
-    PSMC_SET_SAMPLING_RATE, 200,
-    PSMC_SET_SAMPLING_RATE, 200,
-    PSMC_SET_SAMPLING_RATE,  80,
-    PSMC_SEND_DEV_ID,
-    0
-};
-
-#define NINIT_EXPS2 7
-
-static unsigned char	intelli_init[] = {
-    PSMC_SET_SAMPLING_RATE, 200,
-    PSMC_SET_SAMPLING_RATE, 100,
-    PSMC_SET_SAMPLING_RATE,  80,
-    0
-};
-
-#define NINIT_INTELLI	3
-
-static int
-ps2SkipInit (KdPointerInfo *pi, int ninit, Bool ret_next)
-{
-    Kmouse  *km = pi->driverPrivate;
-    int	    c = -1;
-    int	    skipping;
-    Bool    waiting;
-
-    skipping = 0;
-    waiting = FALSE;
-    while (ninit || ret_next)
-    {
-	c = MouseReadByte (&km->iob, MOUSE_TIMEOUT);
-	if (c == -1)
-	    break;
-	/* look for ACK */
-	if (c == 0xfa)
-	{
-	    ninit--;
-	    if (ret_next)
-		waiting = TRUE;
-	}
-	/* look for packet start -- not the response */
-	else if ((c & 0x08) == 0x08)
-	    waiting = FALSE;
-	else if (waiting)
-	    break;
-    }
-    return c;
-}
-
-static Bool
-ps2Init (KdPointerInfo *pi)
-{
-    Kmouse	    *km = pi->driverPrivate;
-    int		    skipping;
-    Bool	    waiting;
-    int		    id;
-    unsigned char   *init;
-    int		    ninit;
-
-    /* Send Intellimouse initialization sequence */
-    MouseWriteBytes (km->iob.fd, intelli_init, strlen ((char *) intelli_init), 100);
-    /*
-     * Send ID command
-     */
-    if (!MouseWriteByte (km->iob.fd, PSMC_SEND_DEV_ID, 100))
-	return FALSE;
-    skipping = 0;
-    waiting = FALSE;
-    id = ps2SkipInit (pi, 0, TRUE);
-    switch (id) {
-    case 3:
-	init = wheel_3button_init;
-	ninit = NINIT_IMPS2;
-	km->prot = &imps2Prot;
-	break;
-    case 4:
-	init = wheel_5button_init;
-	ninit = NINIT_EXPS2;
-	km->prot = &exps2Prot;
-	break;
-    default:
-	init = ps2_init;
-	ninit = NINIT_PS2;
-	km->prot = &ps2Prot;
-	break;
-    }
-    if (init)
-	MouseWriteBytes (km->iob.fd, init, strlen ((char *) init), 100);
-    /*
-     * Flush out the available data to eliminate responses to the
-     * initialization string.  Make sure any partial event is
-     * skipped
-     */
-    (void) ps2SkipInit (pi, ninit, FALSE);
-    return TRUE;
-}
-
-static Bool busParse (KdPointerInfo *pi, unsigned char *ev, int ne)
-{
-    Kmouse	    *km = pi->driverPrivate;
-    int		    dx, dy;
-    unsigned long   flags;
-
-    flags = KD_MOUSE_DELTA;
-    dx = (signed char) ev[1];
-    dy = -(signed char) ev[2];
-    if ((ev[0] & 4) == 0)
-	flags |= KD_BUTTON_1;
-    if ((ev[0] & 2) == 0)
-	flags |= KD_BUTTON_2;
-    if ((ev[0] & 1) == 0)
-	flags |= KD_BUTTON_3;
-    if (!MouseReasonable (pi, flags, dx, dy))
-	return FALSE;
-    if (km->stage == MouseWorking)
-	KdEnqueuePointerEvent (pi, flags, dx, dy, 0);
-    return TRUE;
-}
-
-static const KmouseProt busProt = {
-    "bus",
-    threeComplete, mouseValid, busParse, 0,
-    0xf8, 0x00, 0x00, 0x00,
-    FALSE
-};
-
-/*
- * Standard MS serial protocol, three bytes
- */
-
-static Bool msParse (KdPointerInfo *pi, unsigned char *ev, int ne)
-{
-    Kmouse	    *km = pi->driverPrivate;
-    int		    dx, dy;
-    unsigned long   flags;
-
-    flags = KD_MOUSE_DELTA;
-
-    if (ev[0] & 0x20)
-	flags |= KD_BUTTON_1;
-    if (ev[0] & 0x10)
-	flags |= KD_BUTTON_3;
-
-    dx = (signed char)(((ev[0] & 0x03) << 6) | (ev[1] & 0x3F));
-    dy = (signed char)(((ev[0] & 0x0C) << 4) | (ev[2] & 0x3F));
-    if (!MouseReasonable (pi, flags, dx, dy))
-	return FALSE;
-    if (km->stage == MouseWorking)
-	KdEnqueuePointerEvent (pi, flags, dx, dy, 0);
-    return TRUE;
-}
-
-static const KmouseProt msProt = {
-    "ms",
-    threeComplete, mouseValid, msParse, 0,
-    0xc0, 0x40, 0xc0, 0x00,
-    TRUE,
-    IGNPAR,
-    0,
-    0,
-    CS7 | CSTOPB | CREAD | CLOCAL,
-    B1200,
-};
-
-/*
- * Logitech mice send 3 or 4 bytes, the only way to tell is to look at the
- * first byte of a synchronized protocol stream and see if it's got
- * any bits turned on that can't occur in that fourth byte
- */
-static Bool logiComplete (KdPointerInfo *pi, unsigned char *ev, int ne)
-{
-    Kmouse		*km = pi->driverPrivate;
-
-    if ((ev[0] & 0x40) == 0x40)
-	return ne == 3;
-    if (km->stage != MouseBroken && (ev[0] & ~0x23) == 0)
-	return ne == 1;
-    return FALSE;
-}
-
-static int logiValid (KdPointerInfo *pi, unsigned char *ev, int ne)
-{
-    Kmouse		*km = pi->driverPrivate;
-    const KmouseProt	*prot = km->prot;
-    int	    i;
-
-    for (i = 0; i < ne; i++)
-    {
-	if ((ev[i] & 0x40) == 0x40)
-	    break;
-	if (km->stage != MouseBroken && (ev[i] & ~0x23) == 0)
-	    break;
-    }
-    if (i != 0)
-	return i;
-    for (i = 1; i < ne; i++)
-	if ((ev[i] & prot->dataMask) != prot->dataValid)
-	    return -1;
-    return 0;
-}
-
-static Bool logiParse (KdPointerInfo *pi, unsigned char *ev, int ne)
-{
-    Kmouse	    *km = pi->driverPrivate;
-    int		    dx, dy;
-    unsigned long   flags;
-
-    flags = KD_MOUSE_DELTA;
-
-    if (ne == 3)
-    {
-	if (ev[0] & 0x20)
-	    flags |= KD_BUTTON_1;
-	if (ev[0] & 0x10)
-	    flags |= KD_BUTTON_3;
-
-	dx = (signed char)(((ev[0] & 0x03) << 6) | (ev[1] & 0x3F));
-	dy = (signed char)(((ev[0] & 0x0C) << 4) | (ev[2] & 0x3F));
-	flags |= km->state & KD_BUTTON_2;
-    }
-    else
-    {
-	if (ev[0] & 0x20)
-	    flags |= KD_BUTTON_2;
-	dx = 0;
-	dy = 0;
-	flags |= km->state & (KD_BUTTON_1|KD_BUTTON_3);
-    }
-
-    if (!MouseReasonable (pi, flags, dx, dy))
-	return FALSE;
-    if (km->stage == MouseWorking)
-	KdEnqueuePointerEvent (pi, flags, dx, dy, 0);
-    return TRUE;
-}
-
-static const KmouseProt logiProt = {
-    "logitech",
-    logiComplete, logiValid, logiParse, 0,
-    0xc0, 0x40, 0xc0, 0x00,
-    TRUE,
-    IGNPAR,
-    0,
-    0,
-    CS7 | CSTOPB | CREAD | CLOCAL,
-    B1200,
-};
-
-/*
- * Mouse systems protocol, 5 bytes
- */
-static Bool mscParse (KdPointerInfo *pi, unsigned char *ev, int ne)
-{
-    Kmouse	    *km = pi->driverPrivate;
-    int		    dx, dy;
-    unsigned long   flags;
-
-    flags = KD_MOUSE_DELTA;
-
-    if (!(ev[0] & 0x4))
-	flags |= KD_BUTTON_1;
-    if (!(ev[0] & 0x2))
-	flags |= KD_BUTTON_2;
-    if (!(ev[0] & 0x1))
-	flags |= KD_BUTTON_3;
-    dx =    (signed char)(ev[1]) + (signed char)(ev[3]);
-    dy = - ((signed char)(ev[2]) + (signed char)(ev[4]));
-
-    if (!MouseReasonable (pi, flags, dx, dy))
-	return FALSE;
-    if (km->stage == MouseWorking)
-	KdEnqueuePointerEvent (pi, flags, dx, dy, 0);
-    return TRUE;
-}
-
-static const KmouseProt mscProt = {
-    "msc",
-    fiveComplete, mouseValid, mscParse, 0,
-    0xf8, 0x80, 0x00, 0x00,
-    TRUE,
-    IGNPAR,
-    0,
-    0,
-    CS8 | CSTOPB | CREAD | CLOCAL,
-    B1200,
-};
-
-/*
- * Use logitech before ms -- they're the same except that
- * logitech sometimes has a fourth byte
- */
-static const KmouseProt *kmouseProts[] = {
-    &ps2Prot, &imps2Prot, &exps2Prot, &busProt, &logiProt, &msProt, &mscProt,
-};
-
-#define NUM_PROT    (sizeof (kmouseProts) / sizeof (kmouseProts[0]))
-
-static void
-MouseInitProtocol (Kmouse *km)
-{
-    int		    ret;
-    struct termios  t;
-
-    if (km->prot->tty)
-    {
-	ret = tcgetattr (km->iob.fd, &t);
-
-	if (ret >= 0)
-	{
-	    t.c_iflag = km->prot->c_iflag;
-	    t.c_oflag = km->prot->c_oflag;
-	    t.c_lflag = km->prot->c_lflag;
-	    t.c_cflag = km->prot->c_cflag;
-	    cfsetispeed (&t, km->prot->speed);
-	    cfsetospeed (&t, km->prot->speed);
-	    ret = tcsetattr (km->iob.fd, TCSANOW, &t);
-	}
-    }
-    km->stage = MouseBroken;
-    km->valid = 0;
-    km->tested = 0;
-    km->invalid = 0;
-    km->state = km->prot->state;
-}
-
-static void
-MouseFirstProtocol (Kmouse *km, char *prot)
-{
-    if (prot)
-    {
-	for (km->i_prot = 0; km->i_prot < NUM_PROT; km->i_prot++)
-	    if (!strcmp (prot, kmouseProts[km->i_prot]->name))
-		break;
-	if (km->i_prot == NUM_PROT)
-	{
-	    int	i;
-	    ErrorF ("Unknown mouse protocol \"%s\". Pick one of:", prot);
-	    for (i = 0; i < NUM_PROT; i++)
-		ErrorF (" %s", kmouseProts[i]->name);
-	    ErrorF ("\n");
-	}
-	else
-	{
-	    km->prot = kmouseProts[km->i_prot];
-	    if (km->tty && !km->prot->tty)
-		ErrorF ("Mouse device is serial port, protocol %s is not serial protocol\n",
-			prot);
-	    else if (!km->tty && km->prot->tty)
-		ErrorF ("Mouse device is not serial port, protocol %s is serial protocol\n",
-			prot);
-	}
-    }
-    if (!km->prot)
-    {
-	for (km->i_prot = 0; kmouseProts[km->i_prot]->tty != km->tty; km->i_prot++)
-	    ;
-	km->prot = kmouseProts[km->i_prot];
-    }
-    MouseInitProtocol (km);
-}
-
-static void
-MouseNextProtocol (Kmouse *km)
-{
-    do
-    {
-	if (!km->prot)
-	    km->i_prot = 0;
-	else
-	    if (++km->i_prot == NUM_PROT) km->i_prot = 0;
-	km->prot = kmouseProts[km->i_prot];
-    } while (km->prot->tty != km->tty);
-    MouseInitProtocol (km);
-    ErrorF ("Switching to mouse protocol \"%s\"\n", km->prot->name);
-}
-
-static void
-MouseRead (int mousePort, void *closure)
-{
-    KdPointerInfo   *pi = closure;
-    Kmouse	    *km = pi->driverPrivate;
-    unsigned char   event[MAX_MOUSE];
-    int		    ne;
-    int		    c;
-    int		    i;
-    int		    timeout;
-
-    timeout = 0;
-    ne = 0;
-    for(;;)
-    {
-	c = MouseReadByte (&km->iob, timeout);
-	if (c == -1)
-	{
-	    if (ne)
-	    {
-		km->invalid += ne + km->tested;
-		km->valid = 0;
-		km->tested = 0;
-		km->stage = MouseBroken;
-	    }
-	    break;
-	}
-	event[ne++] = c;
-	i = (*km->prot->Valid) (pi, event, ne);
-	if (i != 0)
-	{
-#ifdef DEBUG
-	    ErrorF ("Mouse protocol %s broken %d of %d bytes bad\n",
-		    km->prot->name, i > 0 ? i : ne, ne);
-#endif
-	    if (i > 0 && i < ne)
-	    {
-		ne -= i;
-		memmove (event, event + i, ne);
-	    }
-	    else
-	    {
-		i = ne;
-		ne = 0;
-	    }
-	    km->invalid += i + km->tested;
-	    km->valid = 0;
-	    km->tested = 0;
-	    if (km->stage == MouseWorking)
-		km->i_prot--;
-	    km->stage = MouseBroken;
-	    if (km->invalid > MAX_SKIP)
-	    {
-		MouseNextProtocol (km);
-		ne = 0;
-	    }
-	    timeout = 0;
-	}
-	else
-	{
-	    if ((*km->prot->Complete) (pi, event, ne))
-	    {
-		if ((*km->prot->Parse) (pi, event, ne))
-		{
-		    switch (km->stage)
-		    {
-		    case MouseBroken:
-#ifdef DEBUG
-			ErrorF ("Mouse protocol %s seems OK\n",
-				km->prot->name);
-#endif
-			/* do not zero invalid to accumulate invalid bytes */
-			km->valid = 0;
-			km->tested = 0;
-			km->stage = MouseTesting;
-			/* fall through ... */
-		    case MouseTesting:
-			km->valid++;
-			km->tested += ne;
-			if (km->valid > MAX_VALID)
-			{
-#ifdef DEBUG
-			    ErrorF ("Mouse protocol %s working\n",
-				    km->prot->name);
-#endif
-			    km->stage = MouseWorking;
-			    km->invalid = 0;
-			    km->tested = 0;
-			    km->valid = 0;
-			    if (km->prot->Init && !(*km->prot->Init) (pi))
-				km->stage = MouseBroken;
-			}
-			break;
-		    case MouseWorking:
-			break;
-		    }
-		}
-		else
-		{
-		    km->invalid += ne + km->tested;
-		    km->valid = 0;
-		    km->tested = 0;
-		    km->stage = MouseBroken;
-		}
-		ne = 0;
-		timeout = 0;
-	    }
-	    else
-		timeout = MOUSE_TIMEOUT;
-	}
-    }
-}
-
-int MouseInputType;
-
-char *kdefaultMouse[] =  {
-    "/dev/input/mice",
-    "/dev/mouse",
-    "/dev/psaux",
-    "/dev/adbmouse",
-    "/dev/ttyS0",
-    "/dev/ttyS1",
-};
-
-#define NUM_DEFAULT_MOUSE    (sizeof (kdefaultMouse) / sizeof (kdefaultMouse[0]))
-
-static Status
-MouseInit (KdPointerInfo *pi)
-{
-    int		i;
-    int		fd;
-    Kmouse	*km;
-
-    if (!pi)
-        return BadImplementation;
-
-    if (!pi->path || strcmp(pi->path, "auto") == 0) {
-        for (i = 0; i < NUM_DEFAULT_MOUSE; i++) {
-            fd = open (kdefaultMouse[i], 2);
-            if (fd >= 0) {
-                pi->path = strdup (kdefaultMouse[i]);
-                break;
-            }
-        }
-    }
-    else {
-        fd = open (pi->path, 2);
-    }
-
-    if (fd < 0)
-        return BadMatch;
-
-    close(fd);
-
-    km = (Kmouse *) xalloc (sizeof (Kmouse));
-    if (km) {
-        km->iob.avail = km->iob.used = 0;
-        MouseFirstProtocol(km, pi->protocol ? pi->protocol : "exps/2");
-        /* MouseFirstProtocol sets state to MouseBroken for later protocol
-         * checks. Skip these checks if a protocol was supplied */
-        if (pi->protocol)
-                km->state = MouseWorking;
-        km->i_prot = 0;
-        km->tty = isatty (fd);
-        km->iob.fd = -1;
-        pi->driverPrivate = km;
-    }
-    else {
-        close (fd);
-        return BadAlloc;
-    }
-
-    return Success;
-}
-
-static Status
-MouseEnable (KdPointerInfo *pi)
-{
-    Kmouse *km;
-
-    if (!pi || !pi->driverPrivate || !pi->path)
-        return BadImplementation;
-
-    km = pi->driverPrivate;
-
-    km->iob.fd = open(pi->path, 2);
-    if (km->iob.fd < 0)
-        return BadMatch;
-
-    if (!KdRegisterFd (km->iob.fd, MouseRead, pi))
-    {
-        close(km->iob.fd);
-        return BadAlloc;
-    }
-
-    return Success;
-}
-
-static void
-MouseDisable (KdPointerInfo *pi)
-{
-    Kmouse *km;
-    if (!pi || !pi->driverPrivate)
-        return;
-
-    km = pi->driverPrivate;
-    KdUnregisterFd (pi, km->iob.fd, TRUE);
-}
-
-static void
-MouseFini (KdPointerInfo *pi)
-{
-    xfree (pi->driverPrivate);
-    pi->driverPrivate = NULL;
-}
-
-KdPointerDriver LinuxMouseDriver = {
-    "mouse",
-    MouseInit,
-    MouseEnable,
-    MouseDisable,
-    MouseFini,
-    NULL,
-};
+/*

+ * Copyright © 2001 Keith Packard

+ *

+ * Permission to use, copy, modify, distribute, and sell this software and its

+ * documentation for any purpose is hereby granted without fee, provided that

+ * the above copyright notice appear in all copies and that both that

+ * copyright notice and this permission notice appear in supporting

+ * documentation, and that the name of Keith Packard not be used in

+ * advertising or publicity pertaining to distribution of the software without

+ * specific, written prior permission.  Keith Packard makes no

+ * representations about the suitability of this software for any purpose.  It

+ * is provided "as is" without express or implied warranty.

+ *

+ * KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,

+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO

+ * EVENT SHALL KEITH PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR

+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,

+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER

+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR

+ * PERFORMANCE OF THIS SOFTWARE.

+ */

+

+#ifdef HAVE_CONFIG_H

+#include <kdrive-config.h>

+#endif

+#include <errno.h>

+#include <termios.h>

+#include <X11/X.h>

+#include <X11/Xproto.h>

+#include <X11/Xpoll.h>

+#include "inputstr.h"

+#include "scrnintstr.h"

+#include "kdrive.h"

+

+#undef DEBUG

+#undef DEBUG_BYTES

+#define KBUFIO_SIZE 256

+#define MOUSE_TIMEOUT	100

+

+typedef struct _kbufio {

+    int		    fd;

+    unsigned char   buf[KBUFIO_SIZE];

+    int		    avail;

+    int		    used;

+} Kbufio;

+

+static Bool

+MouseWaitForReadable (int fd, int timeout)

+{

+    fd_set	    set;

+    struct timeval  tv, *tp;

+    int		    n;

+    CARD32	    done;

+

+    done = GetTimeInMillis () + timeout;

+    for (;;)

+    {

+	FD_ZERO (&set);

+	FD_SET (fd, &set);

+	if (timeout == -1)

+	    tp = 0;

+	else

+	{

+	    tv.tv_sec = timeout / 1000;

+	    tv.tv_usec = (timeout % 1000) * 1000;

+	    tp = &tv;

+	}

+	n = select (fd + 1, &set, 0, 0, tp);

+	if (n > 0)

+	    return TRUE;

+	if (n < 0 && (errno == EAGAIN || errno == EINTR))

+	{

+	    timeout = (int) (done - GetTimeInMillis ());

+	    if (timeout > 0)

+		continue;

+	}

+	break;

+    }

+    return FALSE;

+}

+

+static int

+MouseReadByte (Kbufio *b, int timeout)

+{

+    int	n;

+    if (b->avail <= b->used)

+    {

+	if (timeout && !MouseWaitForReadable (b->fd, timeout))

+	{

+#ifdef DEBUG_BYTES

+	    ErrorF ("\tTimeout %d\n", timeout);

+#endif

+	    return -1;

+	}

+	n = read (b->fd, b->buf, KBUFIO_SIZE);

+	if (n <= 0)

+	    return -1;

+        b->avail = n;

+        b->used = 0;

+    }

+#ifdef DEBUG_BYTES

+    ErrorF ("\tget %02x\n", b->buf[b->used]);

+#endif

+    return b->buf[b->used++];

+}

+

+#if NOTUSED

+static int

+MouseFlush (Kbufio *b, char *buf, int size)

+{

+    CARD32  now = GetTimeInMillis ();

+    CARD32  done = now + 100;

+    int	    c;

+    int	    n = 0;

+

+    while ((c = MouseReadByte (b, done - now)) != -1)

+    {

+	if (buf)

+	{

+	    if (n == size)

+	    {

+		memmove (buf, buf + 1, size - 1);

+		n--;

+	    }

+	    buf[n++] = c;

+	}

+	now = GetTimeInMillis ();

+	if ((INT32) (now - done) >= 0)

+	    break;

+    }

+    return n;

+}

+

+static int

+MousePeekByte (Kbufio *b, int timeout)

+{

+    int	    c;

+

+    c = MouseReadByte (b, timeout);

+    if (c != -1)

+	--b->used;

+    return c;

+}

+#endif /* NOTUSED */

+

+static Bool

+MouseWaitForWritable (int fd, int timeout)

+{

+    fd_set	    set;

+    struct timeval  tv, *tp;

+    int		    n;

+

+    FD_ZERO (&set);

+    FD_SET (fd, &set);

+    if (timeout == -1)

+	tp = 0;

+    else

+    {

+	tv.tv_sec = timeout / 1000;

+	tv.tv_usec = (timeout % 1000) * 1000;

+	tp = &tv;

+    }

+    n = select (fd + 1, 0, &set, 0, tp);

+    if (n > 0)

+	return TRUE;

+    return FALSE;

+}

+

+static Bool

+MouseWriteByte (int fd, unsigned char c, int timeout)

+{

+    int	ret;

+

+#ifdef DEBUG_BYTES

+    ErrorF ("\tput %02x\n", c);

+#endif

+    for (;;)

+    {

+	ret = write (fd, &c, 1);

+	if (ret == 1)

+	    return TRUE;

+	if (ret == 0)

+	    return FALSE;

+	if (errno != EWOULDBLOCK)

+	    return FALSE;

+	if (!MouseWaitForWritable (fd, timeout))

+	    return FALSE;

+    }

+}

+

+static Bool

+MouseWriteBytes (int fd, unsigned char *c, int n, int timeout)

+{

+    while (n--)

+	if (!MouseWriteByte (fd, *c++, timeout))

+	    return FALSE;

+    return TRUE;

+}

+

+#define MAX_MOUSE   10	    /* maximum length of mouse protocol */

+#define MAX_SKIP    16	    /* number of error bytes before switching */

+#define MAX_VALID   4	    /* number of valid packets before accepting */

+

+typedef struct _kmouseProt {

+    char	    *name;

+    Bool	    (*Complete) (KdPointerInfo *pi, unsigned char *ev, int ne);

+    int		    (*Valid) (KdPointerInfo *pi, unsigned char *ev, int ne);

+    Bool	    (*Parse) (KdPointerInfo *pi, unsigned char *ev, int ne);

+    Bool	    (*Init) (KdPointerInfo *pi);

+    unsigned char   headerMask, headerValid;

+    unsigned char   dataMask, dataValid;

+    Bool	    tty;

+    unsigned int    c_iflag;

+    unsigned int    c_oflag;

+    unsigned int    c_lflag;

+    unsigned int    c_cflag;

+    unsigned int    speed;

+    unsigned char   *init;

+    unsigned long   state;

+} KmouseProt;

+

+typedef enum _kmouseStage {

+    MouseBroken, MouseTesting, MouseWorking

+} KmouseStage;

+

+typedef struct _kmouse {

+    Kbufio		iob;

+    const KmouseProt	*prot;

+    int			i_prot;

+    KmouseStage		stage;	/* protocol verification stage */

+    Bool		tty;	/* mouse device is a tty */

+    int			valid;	/* sequential valid events */

+    int			tested;	/* bytes scanned during Testing phase */

+    int			invalid;/* total invalid bytes for this protocol */

+    unsigned long	state;	/* private per protocol, init to prot->state */

+} Kmouse;

+

+static int mouseValid (KdPointerInfo *pi, unsigned char *ev, int ne)

+{

+    Kmouse		*km = pi->driverPrivate;

+    const KmouseProt	*prot = km->prot;

+    int	    i;

+

+    for (i = 0; i < ne; i++)

+	if ((ev[i] & prot->headerMask) == prot->headerValid)

+	    break;

+    if (i != 0)

+	return i;

+    for (i = 1; i < ne; i++)

+	if ((ev[i] & prot->dataMask) != prot->dataValid)

+	    return -1;

+    return 0;

+}

+

+static Bool threeComplete (KdPointerInfo *pi, unsigned char *ev, int ne)

+{

+    return ne == 3;

+}

+

+static Bool fourComplete (KdPointerInfo *pi, unsigned char *ev, int ne)

+{

+    return ne == 4;

+}

+

+static Bool fiveComplete (KdPointerInfo *pi, unsigned char *ev, int ne)

+{

+    return ne == 5;

+}

+

+static Bool MouseReasonable (KdPointerInfo *pi, unsigned long flags, int dx, int dy)

+{

+    Kmouse		*km = pi->driverPrivate;

+

+    if (km->stage == MouseWorking)

+	return TRUE;

+    if (dx < -50 || dx > 50)

+    {

+#ifdef DEBUG

+	ErrorF ("Large X %d\n", dx);

+#endif

+	return FALSE;

+    }

+    if (dy < -50 || dy > 50)

+    {

+#ifdef DEBUG

+	ErrorF ("Large Y %d\n", dy);

+#endif

+	return FALSE;

+    }

+    return TRUE;

+}

+

+/*

+ * Standard PS/2 mouse protocol

+ */

+static Bool ps2Parse (KdPointerInfo *pi, unsigned char *ev, int ne)

+{

+    Kmouse	    *km = pi->driverPrivate;

+    int		    dx, dy, dz;

+    unsigned long   flags;

+    unsigned long   flagsrelease = 0;

+

+    flags = KD_MOUSE_DELTA;

+    if (ev[0] & 4)

+	flags |= KD_BUTTON_2;

+    if (ev[0] & 2)

+	flags |= KD_BUTTON_3;

+    if (ev[0] & 1)

+	flags |= KD_BUTTON_1;

+

+    if (ne > 3)

+    {

+	dz = (int) (signed char) ev[3];

+	if (dz < 0)

+	{

+	    flags |= KD_BUTTON_4;

+	    flagsrelease = KD_BUTTON_4;

+	}

+	else if (dz > 0)

+	{

+	    flags |= KD_BUTTON_5;

+	    flagsrelease = KD_BUTTON_5;

+	}

+    }

+

+    dx = ev[1];

+    if (ev[0] & 0x10)

+	dx -= 256;

+    dy = ev[2];

+    if (ev[0] & 0x20)

+	dy -= 256;

+    dy = -dy;

+    if (!MouseReasonable (pi, flags, dx, dy))

+	return FALSE;

+    if (km->stage == MouseWorking)

+    {

+	KdEnqueuePointerEvent (pi, flags, dx, dy, 0);

+	if (flagsrelease)

+	{

+	    flags &= ~flagsrelease;

+	    KdEnqueuePointerEvent (pi, flags, dx, dy, 0);

+	}

+    }

+    return TRUE;

+}

+

+static Bool ps2Init (KdPointerInfo *pi);

+

+static const KmouseProt ps2Prot = {

+    "ps/2",

+    threeComplete, mouseValid, ps2Parse, ps2Init,

+    0x08, 0x08, 0x00, 0x00,

+    FALSE

+};

+

+static const KmouseProt imps2Prot = {

+    "imps/2",

+    fourComplete, mouseValid, ps2Parse, ps2Init,

+    0x08, 0x08, 0x00, 0x00,

+    FALSE

+};

+

+static const KmouseProt exps2Prot = {

+    "exps/2",

+    fourComplete, mouseValid, ps2Parse, ps2Init,

+    0x08, 0x08, 0x00, 0x00,

+    FALSE

+};

+

+/*

+ * Once the mouse is known to speak ps/2 protocol, go and find out

+ * what advanced capabilities it has and turn them on

+ */

+

+/* these extracted from FreeBSD 4.3 sys/dev/kbd/atkbdcreg.h */

+

+/* aux device commands (sent to KBD_DATA_PORT) */

+#define PSMC_SET_SCALING11      0x00e6

+#define PSMC_SET_SCALING21      0x00e7

+#define PSMC_SET_RESOLUTION     0x00e8

+#define PSMC_SEND_DEV_STATUS    0x00e9

+#define PSMC_SET_STREAM_MODE    0x00ea

+#define PSMC_SEND_DEV_DATA      0x00eb

+#define PSMC_SET_REMOTE_MODE    0x00f0

+#define PSMC_SEND_DEV_ID        0x00f2

+#define PSMC_SET_SAMPLING_RATE  0x00f3

+#define PSMC_ENABLE_DEV         0x00f4

+#define PSMC_DISABLE_DEV        0x00f5

+#define PSMC_SET_DEFAULTS       0x00f6

+#define PSMC_RESET_DEV          0x00ff

+

+/* PSMC_SET_RESOLUTION argument */

+#define PSMD_RES_LOW            0       /* typically 25ppi */

+#define PSMD_RES_MEDIUM_LOW     1       /* typically 50ppi */

+#define PSMD_RES_MEDIUM_HIGH    2       /* typically 100ppi (default) */

+#define PSMD_RES_HIGH           3       /* typically 200ppi */

+#define PSMD_MAX_RESOLUTION     PSMD_RES_HIGH

+

+/* PSMC_SET_SAMPLING_RATE */

+#define PSMD_MAX_RATE           255     /* FIXME: not sure if it's possible */

+

+/* aux device ID */

+#define PSM_MOUSE_ID            0

+#define PSM_BALLPOINT_ID        2

+#define PSM_INTELLI_ID          3

+#define PSM_EXPLORER_ID         4

+#define PSM_4DMOUSE_ID          6

+#define PSM_4DPLUS_ID           8

+

+static unsigned char	ps2_init[] = {

+    PSMC_ENABLE_DEV,

+    0,

+};

+

+#define NINIT_PS2   1

+

+static unsigned char    wheel_3button_init[] = {

+    PSMC_SET_SAMPLING_RATE, 200,

+    PSMC_SET_SAMPLING_RATE, 100,

+    PSMC_SET_SAMPLING_RATE,  80,

+    PSMC_SEND_DEV_ID,

+    0,

+};

+

+#define NINIT_IMPS2 4

+

+static unsigned char    wheel_5button_init[] = {

+    PSMC_SET_SAMPLING_RATE, 200,

+    PSMC_SET_SAMPLING_RATE, 100,

+    PSMC_SET_SAMPLING_RATE,  80,

+    PSMC_SET_SAMPLING_RATE, 200,

+    PSMC_SET_SAMPLING_RATE, 200,

+    PSMC_SET_SAMPLING_RATE,  80,

+    PSMC_SEND_DEV_ID,

+    0

+};

+

+#define NINIT_EXPS2 7

+

+static unsigned char	intelli_init[] = {

+    PSMC_SET_SAMPLING_RATE, 200,

+    PSMC_SET_SAMPLING_RATE, 100,

+    PSMC_SET_SAMPLING_RATE,  80,

+    0

+};

+

+#define NINIT_INTELLI	3

+

+static int

+ps2SkipInit (KdPointerInfo *pi, int ninit, Bool ret_next)

+{

+    Kmouse  *km = pi->driverPrivate;

+    int	    c = -1;

+    int	    skipping;

+    Bool    waiting;

+

+    skipping = 0;

+    waiting = FALSE;

+    while (ninit || ret_next)

+    {

+	c = MouseReadByte (&km->iob, MOUSE_TIMEOUT);

+	if (c == -1)

+	    break;

+	/* look for ACK */

+	if (c == 0xfa)

+	{

+	    ninit--;

+	    if (ret_next)

+		waiting = TRUE;

+	}

+	/* look for packet start -- not the response */

+	else if ((c & 0x08) == 0x08)

+	    waiting = FALSE;

+	else if (waiting)

+	    break;

+    }

+    return c;

+}

+

+static Bool

+ps2Init (KdPointerInfo *pi)

+{

+    Kmouse	    *km = pi->driverPrivate;

+    int		    skipping;

+    Bool	    waiting;

+    int		    id;

+    unsigned char   *init;

+    int		    ninit;

+

+    /* Send Intellimouse initialization sequence */

+    MouseWriteBytes (km->iob.fd, intelli_init, strlen ((char *) intelli_init), 100);

+    /*

+     * Send ID command

+     */

+    if (!MouseWriteByte (km->iob.fd, PSMC_SEND_DEV_ID, 100))

+	return FALSE;

+    skipping = 0;

+    waiting = FALSE;

+    id = ps2SkipInit (pi, 0, TRUE);

+    switch (id) {

+    case 3:

+	init = wheel_3button_init;

+	ninit = NINIT_IMPS2;

+	km->prot = &imps2Prot;

+	break;

+    case 4:

+	init = wheel_5button_init;

+	ninit = NINIT_EXPS2;

+	km->prot = &exps2Prot;

+	break;

+    default:

+	init = ps2_init;

+	ninit = NINIT_PS2;

+	km->prot = &ps2Prot;

+	break;

+    }

+    if (init)

+	MouseWriteBytes (km->iob.fd, init, strlen ((char *) init), 100);

+    /*

+     * Flush out the available data to eliminate responses to the

+     * initialization string.  Make sure any partial event is

+     * skipped

+     */

+    (void) ps2SkipInit (pi, ninit, FALSE);

+    return TRUE;

+}

+

+static Bool busParse (KdPointerInfo *pi, unsigned char *ev, int ne)

+{

+    Kmouse	    *km = pi->driverPrivate;

+    int		    dx, dy;

+    unsigned long   flags;

+

+    flags = KD_MOUSE_DELTA;

+    dx = (signed char) ev[1];

+    dy = -(signed char) ev[2];

+    if ((ev[0] & 4) == 0)

+	flags |= KD_BUTTON_1;

+    if ((ev[0] & 2) == 0)

+	flags |= KD_BUTTON_2;

+    if ((ev[0] & 1) == 0)

+	flags |= KD_BUTTON_3;

+    if (!MouseReasonable (pi, flags, dx, dy))

+	return FALSE;

+    if (km->stage == MouseWorking)

+	KdEnqueuePointerEvent (pi, flags, dx, dy, 0);

+    return TRUE;

+}

+

+static const KmouseProt busProt = {

+    "bus",

+    threeComplete, mouseValid, busParse, 0,

+    0xf8, 0x00, 0x00, 0x00,

+    FALSE

+};

+

+/*

+ * Standard MS serial protocol, three bytes

+ */

+

+static Bool msParse (KdPointerInfo *pi, unsigned char *ev, int ne)

+{

+    Kmouse	    *km = pi->driverPrivate;

+    int		    dx, dy;

+    unsigned long   flags;

+

+    flags = KD_MOUSE_DELTA;

+

+    if (ev[0] & 0x20)

+	flags |= KD_BUTTON_1;

+    if (ev[0] & 0x10)

+	flags |= KD_BUTTON_3;

+

+    dx = (signed char)(((ev[0] & 0x03) << 6) | (ev[1] & 0x3F));

+    dy = (signed char)(((ev[0] & 0x0C) << 4) | (ev[2] & 0x3F));

+    if (!MouseReasonable (pi, flags, dx, dy))

+	return FALSE;

+    if (km->stage == MouseWorking)

+	KdEnqueuePointerEvent (pi, flags, dx, dy, 0);

+    return TRUE;

+}

+

+static const KmouseProt msProt = {

+    "ms",

+    threeComplete, mouseValid, msParse, 0,

+    0xc0, 0x40, 0xc0, 0x00,

+    TRUE,

+    IGNPAR,

+    0,

+    0,

+    CS7 | CSTOPB | CREAD | CLOCAL,

+    B1200,

+};

+

+/*

+ * Logitech mice send 3 or 4 bytes, the only way to tell is to look at the

+ * first byte of a synchronized protocol stream and see if it's got

+ * any bits turned on that can't occur in that fourth byte

+ */

+static Bool logiComplete (KdPointerInfo *pi, unsigned char *ev, int ne)

+{

+    Kmouse		*km = pi->driverPrivate;

+

+    if ((ev[0] & 0x40) == 0x40)

+	return ne == 3;

+    if (km->stage != MouseBroken && (ev[0] & ~0x23) == 0)

+	return ne == 1;

+    return FALSE;

+}

+

+static int logiValid (KdPointerInfo *pi, unsigned char *ev, int ne)

+{

+    Kmouse		*km = pi->driverPrivate;

+    const KmouseProt	*prot = km->prot;

+    int	    i;

+

+    for (i = 0; i < ne; i++)

+    {

+	if ((ev[i] & 0x40) == 0x40)

+	    break;

+	if (km->stage != MouseBroken && (ev[i] & ~0x23) == 0)

+	    break;

+    }

+    if (i != 0)

+	return i;

+    for (i = 1; i < ne; i++)

+	if ((ev[i] & prot->dataMask) != prot->dataValid)

+	    return -1;

+    return 0;

+}

+

+static Bool logiParse (KdPointerInfo *pi, unsigned char *ev, int ne)

+{

+    Kmouse	    *km = pi->driverPrivate;

+    int		    dx, dy;

+    unsigned long   flags;

+

+    flags = KD_MOUSE_DELTA;

+

+    if (ne == 3)

+    {

+	if (ev[0] & 0x20)

+	    flags |= KD_BUTTON_1;

+	if (ev[0] & 0x10)

+	    flags |= KD_BUTTON_3;

+

+	dx = (signed char)(((ev[0] & 0x03) << 6) | (ev[1] & 0x3F));

+	dy = (signed char)(((ev[0] & 0x0C) << 4) | (ev[2] & 0x3F));

+	flags |= km->state & KD_BUTTON_2;

+    }

+    else

+    {

+	if (ev[0] & 0x20)

+	    flags |= KD_BUTTON_2;

+	dx = 0;

+	dy = 0;

+	flags |= km->state & (KD_BUTTON_1|KD_BUTTON_3);

+    }

+

+    if (!MouseReasonable (pi, flags, dx, dy))

+	return FALSE;

+    if (km->stage == MouseWorking)

+	KdEnqueuePointerEvent (pi, flags, dx, dy, 0);

+    return TRUE;

+}

+

+static const KmouseProt logiProt = {

+    "logitech",

+    logiComplete, logiValid, logiParse, 0,

+    0xc0, 0x40, 0xc0, 0x00,

+    TRUE,

+    IGNPAR,

+    0,

+    0,

+    CS7 | CSTOPB | CREAD | CLOCAL,

+    B1200,

+};

+

+/*

+ * Mouse systems protocol, 5 bytes

+ */

+static Bool mscParse (KdPointerInfo *pi, unsigned char *ev, int ne)

+{

+    Kmouse	    *km = pi->driverPrivate;

+    int		    dx, dy;

+    unsigned long   flags;

+

+    flags = KD_MOUSE_DELTA;

+

+    if (!(ev[0] & 0x4))

+	flags |= KD_BUTTON_1;

+    if (!(ev[0] & 0x2))

+	flags |= KD_BUTTON_2;

+    if (!(ev[0] & 0x1))

+	flags |= KD_BUTTON_3;

+    dx =    (signed char)(ev[1]) + (signed char)(ev[3]);

+    dy = - ((signed char)(ev[2]) + (signed char)(ev[4]));

+

+    if (!MouseReasonable (pi, flags, dx, dy))

+	return FALSE;

+    if (km->stage == MouseWorking)

+	KdEnqueuePointerEvent (pi, flags, dx, dy, 0);

+    return TRUE;

+}

+

+static const KmouseProt mscProt = {

+    "msc",

+    fiveComplete, mouseValid, mscParse, 0,

+    0xf8, 0x80, 0x00, 0x00,

+    TRUE,

+    IGNPAR,

+    0,

+    0,

+    CS8 | CSTOPB | CREAD | CLOCAL,

+    B1200,

+};

+

+/*

+ * Use logitech before ms -- they're the same except that

+ * logitech sometimes has a fourth byte

+ */

+static const KmouseProt *kmouseProts[] = {

+    &ps2Prot, &imps2Prot, &exps2Prot, &busProt, &logiProt, &msProt, &mscProt,

+};

+

+#define NUM_PROT    (sizeof (kmouseProts) / sizeof (kmouseProts[0]))

+

+static void

+MouseInitProtocol (Kmouse *km)

+{

+    int		    ret;

+    struct termios  t;

+

+    if (km->prot->tty)

+    {

+	ret = tcgetattr (km->iob.fd, &t);

+

+	if (ret >= 0)

+	{

+	    t.c_iflag = km->prot->c_iflag;

+	    t.c_oflag = km->prot->c_oflag;

+	    t.c_lflag = km->prot->c_lflag;

+	    t.c_cflag = km->prot->c_cflag;

+	    cfsetispeed (&t, km->prot->speed);

+	    cfsetospeed (&t, km->prot->speed);

+	    ret = tcsetattr (km->iob.fd, TCSANOW, &t);

+	}

+    }

+    km->stage = MouseBroken;

+    km->valid = 0;

+    km->tested = 0;

+    km->invalid = 0;

+    km->state = km->prot->state;

+}

+

+static void

+MouseFirstProtocol (Kmouse *km, char *prot)

+{

+    if (prot)

+    {

+	for (km->i_prot = 0; km->i_prot < NUM_PROT; km->i_prot++)

+	    if (!strcmp (prot, kmouseProts[km->i_prot]->name))

+		break;

+	if (km->i_prot == NUM_PROT)

+	{

+	    int	i;

+	    ErrorF ("Unknown mouse protocol \"%s\". Pick one of:", prot);

+	    for (i = 0; i < NUM_PROT; i++)

+		ErrorF (" %s", kmouseProts[i]->name);

+	    ErrorF ("\n");

+	}

+	else

+	{

+	    km->prot = kmouseProts[km->i_prot];

+	    if (km->tty && !km->prot->tty)

+		ErrorF ("Mouse device is serial port, protocol %s is not serial protocol\n",

+			prot);

+	    else if (!km->tty && km->prot->tty)

+		ErrorF ("Mouse device is not serial port, protocol %s is serial protocol\n",

+			prot);

+	}

+    }

+    if (!km->prot)

+    {

+	for (km->i_prot = 0; kmouseProts[km->i_prot]->tty != km->tty; km->i_prot++)

+	    ;

+	km->prot = kmouseProts[km->i_prot];

+    }

+    MouseInitProtocol (km);

+}

+

+static void

+MouseNextProtocol (Kmouse *km)

+{

+    do

+    {

+	if (!km->prot)

+	    km->i_prot = 0;

+	else

+	    if (++km->i_prot == NUM_PROT) km->i_prot = 0;

+	km->prot = kmouseProts[km->i_prot];

+    } while (km->prot->tty != km->tty);

+    MouseInitProtocol (km);

+    ErrorF ("Switching to mouse protocol \"%s\"\n", km->prot->name);

+}

+

+static void

+MouseRead (int mousePort, void *closure)

+{

+    KdPointerInfo   *pi = closure;

+    Kmouse	    *km = pi->driverPrivate;

+    unsigned char   event[MAX_MOUSE];

+    int		    ne;

+    int		    c;

+    int		    i;

+    int		    timeout;

+

+    timeout = 0;

+    ne = 0;

+    for(;;)

+    {

+	c = MouseReadByte (&km->iob, timeout);

+	if (c == -1)

+	{

+	    if (ne)

+	    {

+		km->invalid += ne + km->tested;

+		km->valid = 0;

+		km->tested = 0;

+		km->stage = MouseBroken;

+	    }

+	    break;

+	}

+	event[ne++] = c;

+	i = (*km->prot->Valid) (pi, event, ne);

+	if (i != 0)

+	{

+#ifdef DEBUG

+	    ErrorF ("Mouse protocol %s broken %d of %d bytes bad\n",

+		    km->prot->name, i > 0 ? i : ne, ne);

+#endif

+	    if (i > 0 && i < ne)

+	    {

+		ne -= i;

+		memmove (event, event + i, ne);

+	    }

+	    else

+	    {

+		i = ne;

+		ne = 0;

+	    }

+	    km->invalid += i + km->tested;

+	    km->valid = 0;

+	    km->tested = 0;

+	    if (km->stage == MouseWorking)

+		km->i_prot--;

+	    km->stage = MouseBroken;

+	    if (km->invalid > MAX_SKIP)

+	    {

+		MouseNextProtocol (km);

+		ne = 0;

+	    }

+	    timeout = 0;

+	}

+	else

+	{

+	    if ((*km->prot->Complete) (pi, event, ne))

+	    {

+		if ((*km->prot->Parse) (pi, event, ne))

+		{

+		    switch (km->stage)

+		    {

+		    case MouseBroken:

+#ifdef DEBUG

+			ErrorF ("Mouse protocol %s seems OK\n",

+				km->prot->name);

+#endif

+			/* do not zero invalid to accumulate invalid bytes */

+			km->valid = 0;

+			km->tested = 0;

+			km->stage = MouseTesting;

+			/* fall through ... */

+		    case MouseTesting:

+			km->valid++;

+			km->tested += ne;

+			if (km->valid > MAX_VALID)

+			{

+#ifdef DEBUG

+			    ErrorF ("Mouse protocol %s working\n",

+				    km->prot->name);

+#endif

+			    km->stage = MouseWorking;

+			    km->invalid = 0;

+			    km->tested = 0;

+			    km->valid = 0;

+			    if (km->prot->Init && !(*km->prot->Init) (pi))

+				km->stage = MouseBroken;

+			}

+			break;

+		    case MouseWorking:

+			break;

+		    }

+		}

+		else

+		{

+		    km->invalid += ne + km->tested;

+		    km->valid = 0;

+		    km->tested = 0;

+		    km->stage = MouseBroken;

+		}

+		ne = 0;

+		timeout = 0;

+	    }

+	    else

+		timeout = MOUSE_TIMEOUT;

+	}

+    }

+}

+

+int MouseInputType;

+

+char *kdefaultMouse[] =  {

+    "/dev/input/mice",

+    "/dev/mouse",

+    "/dev/psaux",

+    "/dev/adbmouse",

+    "/dev/ttyS0",

+    "/dev/ttyS1",

+};

+

+#define NUM_DEFAULT_MOUSE    (sizeof (kdefaultMouse) / sizeof (kdefaultMouse[0]))

+

+static Status

+MouseInit (KdPointerInfo *pi)

+{

+    int		i;

+    int		fd;

+    Kmouse	*km;

+

+    if (!pi)

+        return BadImplementation;

+

+    if (!pi->path || strcmp(pi->path, "auto") == 0) {

+        for (i = 0; i < NUM_DEFAULT_MOUSE; i++) {

+            fd = open (kdefaultMouse[i], 2);

+            if (fd >= 0) {

+                pi->path = strdup (kdefaultMouse[i]);

+                break;

+            }

+        }

+    }

+    else {

+        fd = open (pi->path, 2);

+    }

+

+    if (fd < 0)

+        return BadMatch;

+

+    close(fd);

+

+    km = (Kmouse *) malloc(sizeof (Kmouse));

+    if (km) {

+        km->iob.avail = km->iob.used = 0;

+        MouseFirstProtocol(km, pi->protocol ? pi->protocol : "exps/2");

+        /* MouseFirstProtocol sets state to MouseBroken for later protocol

+         * checks. Skip these checks if a protocol was supplied */

+        if (pi->protocol)

+                km->state = MouseWorking;

+        km->i_prot = 0;

+        km->tty = isatty (fd);

+        km->iob.fd = -1;

+        pi->driverPrivate = km;

+    }

+    else {

+        close (fd);

+        return BadAlloc;

+    }

+

+    return Success;

+}

+

+static Status

+MouseEnable (KdPointerInfo *pi)

+{

+    Kmouse *km;

+

+    if (!pi || !pi->driverPrivate || !pi->path)

+        return BadImplementation;

+

+    km = pi->driverPrivate;

+

+    km->iob.fd = open(pi->path, 2);

+    if (km->iob.fd < 0)

+        return BadMatch;

+

+    if (!KdRegisterFd (km->iob.fd, MouseRead, pi))

+    {

+        close(km->iob.fd);

+        return BadAlloc;

+    }

+

+    return Success;

+}

+

+static void

+MouseDisable (KdPointerInfo *pi)

+{

+    Kmouse *km;

+    if (!pi || !pi->driverPrivate)

+        return;

+

+    km = pi->driverPrivate;

+    KdUnregisterFd (pi, km->iob.fd, TRUE);

+}

+

+static void

+MouseFini (KdPointerInfo *pi)

+{

+    free(pi->driverPrivate);

+    pi->driverPrivate = NULL;

+}

+

+KdPointerDriver LinuxMouseDriver = {

+    "mouse",

+    MouseInit,

+    MouseEnable,

+    MouseDisable,

+    MouseFini,

+    NULL,

+};