Home | History | Annotate | Line # | Download | only in iomd
qms.c revision 1.21
      1 /*	$NetBSD: qms.c,v 1.21 2021/08/07 16:18:44 thorpej Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2001 Reinoud Zandijk
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Reinoud Zandijk
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 /*
     32  * Quadrature mouse driver for the wscons as used in the IOMD
     33  */
     34 
     35 #include <sys/param.h>
     36 
     37 __KERNEL_RCSID(0, "$NetBSD: qms.c,v 1.21 2021/08/07 16:18:44 thorpej Exp $");
     38 
     39 #include <sys/callout.h>
     40 #include <sys/device.h>
     41 #include <sys/errno.h>
     42 #include <sys/ioctl.h>
     43 #include <sys/kernel.h>
     44 #include <sys/malloc.h>
     45 #include <sys/proc.h>
     46 #include <sys/tty.h>
     47 #include <sys/types.h>
     48 #include <sys/syslog.h>
     49 #include <sys/systm.h>
     50 #include <sys/select.h>
     51 
     52 #include <sys/bus.h>
     53 #include <machine/intr.h>
     54 
     55 #include <arm/iomd/iomdvar.h>
     56 
     57 #include <dev/wscons/wsconsio.h>
     58 #include <dev/wscons/wsmousevar.h>
     59 
     60 struct qms_softc {
     61 	device_t sc_dev;
     62 	device_t sc_wsmousedev;
     63 
     64 	bus_space_tag_t sc_iot;		/* bus tag */
     65 	bus_space_handle_t sc_ioh;	/* bus handle for XY */
     66 	bus_space_handle_t sc_butioh;	/* bus handle for buttons */
     67 
     68 	struct callout sc_callout;
     69 
     70 	uint16_t lastx;
     71 	uint16_t lasty;
     72 	int lastb;
     73 };
     74 
     75 /* Offsets of hardware registers */
     76 #define QMS_MOUSEX	0		/* 16 bits X register */
     77 #define QMS_MOUSEY	1		/* 16 bits Y register */
     78 #define QMS_BUTTONS	0 		/* mouse buttons in bits 4,5,6 */
     79 
     80 static int  qms_match(device_t , cfdata_t , void *);
     81 static void qms_attach(device_t , device_t , void *);
     82 
     83 static int qms_enable(void *);
     84 static int qms_ioctl(void *, u_long, void *, int, struct lwp *);
     85 static void qms_disable(void *cookie);
     86 static void qms_intr(void *arg);
     87 
     88 CFATTACH_DECL_NEW(qms, sizeof(struct qms_softc),
     89     qms_match, qms_attach, NULL, NULL);
     90 
     91 static struct wsmouse_accessops qms_accessops = {
     92 	qms_enable, qms_ioctl, qms_disable
     93 };
     94 
     95 
     96 static int
     97 qms_match(device_t parent, cfdata_t cf, void *aux)
     98 {
     99 	struct qms_attach_args *qa = aux;
    100 
    101 	if (strcmp(qa->qa_name, "qms") == 0)
    102 		return 1;
    103 
    104 	return 0;
    105 }
    106 
    107 
    108 static void
    109 qms_attach(device_t parent, device_t self, void *aux)
    110 {
    111 	struct qms_softc *sc = device_private(self);
    112 	struct qms_attach_args *qa = aux;
    113 	struct wsmousedev_attach_args wsmouseargs;
    114 
    115 	sc->sc_dev = self;
    116 	sc->sc_iot = qa->qa_iot;
    117 	sc->sc_ioh = qa->qa_ioh;
    118 	sc->sc_butioh = qa->qa_ioh_but;
    119 
    120 	/* set up wsmouse attach arguments */
    121 	wsmouseargs.accessops = &qms_accessops;
    122 	wsmouseargs.accesscookie = sc;
    123 
    124 	aprint_normal("\n");
    125 
    126 	sc->sc_wsmousedev =
    127 	    config_found(sc->sc_dev, &wsmouseargs, wsmousedevprint, CFARGS_NONE);
    128 
    129 	callout_init(&sc->sc_callout, 0);
    130 }
    131 
    132 
    133 static int
    134 qms_enable(void *cookie)
    135 {
    136 	struct qms_softc *sc = cookie;
    137 	int b;
    138 
    139 	/* We don't want the mouse to warp on open. */
    140 	sc->lastx = bus_space_read_4(sc->sc_iot, sc->sc_ioh, QMS_MOUSEX);
    141 	sc->lasty = bus_space_read_4(sc->sc_iot, sc->sc_ioh, QMS_MOUSEY);
    142 	b = bus_space_read_1(sc->sc_iot, sc->sc_butioh, QMS_BUTTONS) & 0x70;
    143 
    144 	/* patch up the buttons */
    145 	b >>= 4;
    146 	sc->lastb = ~( ((b & 1)<<2) | (b & 2) | ((b & 4)>>2));
    147 
    148 	callout_reset(&sc->sc_callout, hz / 100, qms_intr, sc);
    149 	return 0;
    150 }
    151 
    152 
    153 static void
    154 qms_disable(void *cookie)
    155 {
    156 	struct qms_softc *sc = cookie;
    157 
    158 	callout_stop(&sc->sc_callout);
    159 }
    160 
    161 
    162 static int
    163 qms_ioctl(void *cookie, u_long cmd, void *data, int flag, struct lwp *l)
    164 {
    165 
    166 	switch (cmd) {
    167 	case WSMOUSEIO_GTYPE:
    168 		*(int *)data = WSMOUSE_TYPE_ARCHIMEDES;
    169 		return 0;
    170 	}
    171 
    172 	return EPASSTHROUGH;
    173 }
    174 
    175 
    176 static void
    177 qms_intr(void *arg)
    178 {
    179 	struct qms_softc *sc = arg;
    180 	int b;
    181 	uint16_t x, y;
    182 	int16_t dx, dy;
    183 
    184 	x = bus_space_read_4(sc->sc_iot, sc->sc_ioh, QMS_MOUSEX);
    185 	y = bus_space_read_4(sc->sc_iot, sc->sc_ioh, QMS_MOUSEY);
    186 	b = bus_space_read_1(sc->sc_iot, sc->sc_butioh, QMS_BUTTONS) & 0x70;
    187 
    188 	/* patch up the buttons */
    189 	b >>= 4;
    190 	b = ~( ((b & 1)<<2) | (b & 2) | ((b & 4)>>2));
    191 
    192 	if ((x != sc->lastx) || (y != sc->lasty) || (b != sc->lastb)) {
    193 		/* This assumes that int16_t is two's complement. */
    194 		dx = x - sc->lastx;
    195 		dy = y - sc->lasty;
    196 		wsmouse_input(sc->sc_wsmousedev,
    197 				b,
    198 				dx, dy, 0, 0,
    199 				WSMOUSE_INPUT_DELTA);
    200 
    201 		/* save old values */
    202 		sc->lastx = x;
    203 		sc->lasty = y;
    204 		sc->lastb = b;
    205 	}
    206 	callout_reset(&sc->sc_callout, hz / 100, qms_intr, sc);
    207 }
    208 
    209 
    210 /* end of qms.c */
    211