Home | History | Annotate | Line # | Download | only in dev
      1  1.31   thorpej /*	$NetBSD: ams.c,v 1.31 2021/08/07 16:18:57 thorpej Exp $	*/
      2   1.1    tsubai 
      3   1.1    tsubai /*
      4   1.1    tsubai  * Copyright (C) 1998	Colin Wood
      5   1.1    tsubai  * All rights reserved.
      6   1.1    tsubai  *
      7   1.1    tsubai  * Redistribution and use in source and binary forms, with or without
      8   1.1    tsubai  * modification, are permitted provided that the following conditions
      9   1.1    tsubai  * are met:
     10   1.1    tsubai  * 1. Redistributions of source code must retain the above copyright
     11   1.1    tsubai  *    notice, this list of conditions and the following disclaimer.
     12   1.1    tsubai  * 2. Redistributions in binary form must reproduce the above copyright
     13   1.1    tsubai  *    notice, this list of conditions and the following disclaimer in the
     14   1.1    tsubai  *    documentation and/or other materials provided with the distribution.
     15   1.1    tsubai  * 3. All advertising materials mentioning features or use of this software
     16   1.1    tsubai  *    must display the following acknowledgement:
     17   1.1    tsubai  *	This product includes software developed by Colin Wood.
     18   1.1    tsubai  * 4. The name of the author may not be used to endorse or promote products
     19   1.1    tsubai  *    derived from this software without specific prior written permission.
     20   1.1    tsubai  *
     21   1.1    tsubai  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     22   1.1    tsubai  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     23   1.1    tsubai  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     24   1.1    tsubai  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     25   1.1    tsubai  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     26   1.1    tsubai  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     27   1.1    tsubai  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     28   1.1    tsubai  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     29   1.1    tsubai  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
     30   1.1    tsubai  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     31   1.1    tsubai  */
     32  1.16     lukem 
     33  1.16     lukem #include <sys/cdefs.h>
     34  1.31   thorpej __KERNEL_RCSID(0, "$NetBSD: ams.c,v 1.31 2021/08/07 16:18:57 thorpej Exp $");
     35   1.1    tsubai 
     36   1.1    tsubai #include <sys/param.h>
     37   1.1    tsubai #include <sys/device.h>
     38   1.1    tsubai #include <sys/fcntl.h>
     39   1.1    tsubai #include <sys/poll.h>
     40   1.1    tsubai #include <sys/select.h>
     41   1.1    tsubai #include <sys/proc.h>
     42   1.1    tsubai #include <sys/signalvar.h>
     43   1.1    tsubai #include <sys/systm.h>
     44  1.23  macallan #include <sys/sysctl.h>
     45  1.23  macallan #include <sys/sysctl.h>
     46   1.1    tsubai 
     47   1.9    tsubai #include <machine/autoconf.h>
     48   1.9    tsubai 
     49   1.2    tsubai #include <dev/wscons/wsconsio.h>
     50   1.2    tsubai #include <dev/wscons/wsmousevar.h>
     51   1.2    tsubai 
     52   1.1    tsubai #include <macppc/dev/adbvar.h>
     53   1.1    tsubai #include <macppc/dev/aedvar.h>
     54   1.1    tsubai #include <macppc/dev/amsvar.h>
     55   1.1    tsubai 
     56   1.2    tsubai #include "aed.h"
     57   1.2    tsubai 
     58   1.1    tsubai /*
     59   1.1    tsubai  * Function declarations.
     60   1.1    tsubai  */
     61  1.27      matt static int	amsmatch(device_t, cfdata_t, void *);
     62  1.27      matt static void	amsattach(device_t, device_t, void *);
     63  1.20  macallan static void	ems_init(struct ams_softc *);
     64  1.20  macallan static void	ms_processevent(adb_event_t *event, struct ams_softc *);
     65  1.19  macallan static void	init_trackpad(struct ams_softc *);
     66   1.1    tsubai 
     67   1.1    tsubai /* Driver definition. */
     68  1.29       chs CFATTACH_DECL_NEW(ams, sizeof(struct ams_softc),
     69  1.15   thorpej     amsmatch, amsattach, NULL, NULL);
     70   1.1    tsubai 
     71  1.20  macallan int ams_enable(void *);
     72  1.24  christos int ams_ioctl(void *, u_long, void *, int, struct lwp *);
     73  1.20  macallan void ams_disable(void *);
     74   1.2    tsubai 
     75  1.19  macallan /*
     76  1.19  macallan  * handle tapping the trackpad
     77  1.19  macallan  * different pads report different button counts and use slightly different
     78  1.19  macallan  * protocols
     79  1.19  macallan  */
     80  1.19  macallan static void ams_mangle_2(struct ams_softc *, int);
     81  1.19  macallan static void ams_mangle_4(struct ams_softc *, int);
     82  1.23  macallan static int  sysctl_ams_tap(SYSCTLFN_ARGS);
     83  1.19  macallan 
     84   1.2    tsubai const struct wsmouse_accessops ams_accessops = {
     85   1.2    tsubai 	ams_enable,
     86   1.2    tsubai 	ams_ioctl,
     87   1.2    tsubai 	ams_disable,
     88   1.2    tsubai };
     89   1.2    tsubai 
     90   1.1    tsubai static int
     91  1.27      matt amsmatch(device_t parent, cfdata_t cf, void *aux)
     92   1.1    tsubai {
     93  1.11    tsubai 	struct adb_attach_args *aa_args = aux;
     94   1.1    tsubai 
     95   1.1    tsubai 	if (aa_args->origaddr == ADBADDR_MS)
     96   1.1    tsubai 		return 1;
     97   1.1    tsubai 	else
     98   1.1    tsubai 		return 0;
     99   1.1    tsubai }
    100   1.1    tsubai 
    101   1.1    tsubai static void
    102  1.27      matt amsattach(device_t parent, device_t self, void *aux)
    103   1.1    tsubai {
    104   1.1    tsubai 	ADBSetInfoBlock adbinfo;
    105  1.27      matt 	struct ams_softc *sc = device_private(self);
    106  1.11    tsubai 	struct adb_attach_args *aa_args = aux;
    107   1.1    tsubai 	int error;
    108   1.2    tsubai 	struct wsmousedev_attach_args a;
    109   1.1    tsubai 
    110  1.29       chs 	sc->sc_dev = self;
    111   1.1    tsubai 	sc->origaddr = aa_args->origaddr;
    112   1.1    tsubai 	sc->adbaddr = aa_args->adbaddr;
    113   1.1    tsubai 	sc->handler_id = aa_args->handler_id;
    114   1.1    tsubai 
    115   1.1    tsubai 	sc->sc_class = MSCLASS_MOUSE;
    116   1.1    tsubai 	sc->sc_buttons = 1;
    117   1.1    tsubai 	sc->sc_res = 100;
    118   1.1    tsubai 	sc->sc_devid[0] = 0;
    119   1.1    tsubai 	sc->sc_devid[4] = 0;
    120   1.1    tsubai 
    121   1.1    tsubai 	adbinfo.siServiceRtPtr = (Ptr)ms_adbcomplete;
    122  1.24  christos 	adbinfo.siDataAreaAddr = (void *)sc;
    123   1.1    tsubai 
    124   1.1    tsubai 	ems_init(sc);
    125   1.1    tsubai 
    126   1.1    tsubai 	/* print out the type of mouse we have */
    127   1.1    tsubai 	switch (sc->handler_id) {
    128   1.1    tsubai 	case ADBMS_100DPI:
    129   1.1    tsubai 		printf("%d-button, %d dpi mouse\n", sc->sc_buttons,
    130   1.5    tsubai 		    (int)(sc->sc_res));
    131   1.1    tsubai 		break;
    132   1.1    tsubai 	case ADBMS_200DPI:
    133   1.1    tsubai 		sc->sc_res = 200;
    134   1.1    tsubai 		printf("%d-button, %d dpi mouse\n", sc->sc_buttons,
    135   1.5    tsubai 		    (int)(sc->sc_res));
    136   1.1    tsubai 		break;
    137   1.1    tsubai 	case ADBMS_MSA3:
    138   1.1    tsubai 		printf("Mouse Systems A3 mouse, %d-button, %d dpi\n",
    139   1.5    tsubai 		    sc->sc_buttons, (int)(sc->sc_res));
    140   1.1    tsubai 		break;
    141   1.1    tsubai 	case ADBMS_USPEED:
    142   1.1    tsubai 		printf("MicroSpeed mouse, default parameters\n");
    143   1.1    tsubai 		break;
    144   1.5    tsubai 	case ADBMS_UCONTOUR:
    145   1.5    tsubai 		printf("Contour mouse, default parameters\n");
    146   1.5    tsubai 		break;
    147  1.10    tsubai 	case ADBMS_TURBO:
    148  1.10    tsubai 		printf("Kensington Turbo Mouse\n");
    149  1.10    tsubai 		break;
    150   1.1    tsubai 	case ADBMS_EXTENDED:
    151   1.1    tsubai 		if (sc->sc_devid[0] == '\0') {
    152   1.1    tsubai 			printf("Logitech ");
    153   1.1    tsubai 			switch (sc->sc_class) {
    154   1.1    tsubai 			case MSCLASS_MOUSE:
    155   1.1    tsubai 				printf("MouseMan (non-EMP) mouse");
    156   1.1    tsubai 				break;
    157   1.1    tsubai 			case MSCLASS_TRACKBALL:
    158   1.1    tsubai 				printf("TrackMan (non-EMP) trackball");
    159   1.1    tsubai 				break;
    160   1.1    tsubai 			default:
    161   1.1    tsubai 				printf("non-EMP relative positioning device");
    162   1.1    tsubai 				break;
    163   1.1    tsubai 			}
    164   1.1    tsubai 			printf("\n");
    165   1.1    tsubai 		} else {
    166   1.1    tsubai 			printf("EMP ");
    167   1.1    tsubai 			switch (sc->sc_class) {
    168   1.1    tsubai 			case MSCLASS_TABLET:
    169   1.1    tsubai 				printf("tablet");
    170   1.1    tsubai 				break;
    171   1.1    tsubai 			case MSCLASS_MOUSE:
    172   1.1    tsubai 				printf("mouse");
    173   1.1    tsubai 				break;
    174   1.1    tsubai 			case MSCLASS_TRACKBALL:
    175   1.1    tsubai 				printf("trackball");
    176   1.1    tsubai 				break;
    177   1.6    tsubai 			case MSCLASS_TRACKPAD:
    178   1.6    tsubai 				printf("trackpad");
    179  1.19  macallan 				init_trackpad(sc);
    180   1.6    tsubai 				break;
    181   1.1    tsubai 			default:
    182   1.1    tsubai 				printf("unknown device");
    183   1.1    tsubai 				break;
    184   1.1    tsubai 			}
    185   1.1    tsubai 			printf(" <%s> %d-button, %d dpi\n", sc->sc_devid,
    186   1.5    tsubai 			    sc->sc_buttons, (int)(sc->sc_res));
    187   1.1    tsubai 		}
    188   1.1    tsubai 		break;
    189   1.1    tsubai 	default:
    190   1.1    tsubai 		printf("relative positioning device (mouse?) (%d)\n",
    191   1.1    tsubai 			sc->handler_id);
    192   1.1    tsubai 		break;
    193   1.1    tsubai 	}
    194   1.1    tsubai 	error = SetADBInfo(&adbinfo, sc->adbaddr);
    195   1.1    tsubai #ifdef ADB_DEBUG
    196   1.1    tsubai 	if (adb_debug)
    197   1.9    tsubai 		printf("ams: returned %d from SetADBInfo\n", error);
    198   1.1    tsubai #endif
    199   1.1    tsubai 
    200   1.2    tsubai 	a.accessops = &ams_accessops;
    201   1.2    tsubai 	a.accesscookie = sc;
    202  1.31   thorpej 	sc->sc_wsmousedev = config_found(self, &a, wsmousedevprint, CFARGS_NONE);
    203   1.1    tsubai }
    204   1.1    tsubai 
    205   1.1    tsubai 
    206   1.1    tsubai /*
    207   1.1    tsubai  * Initialize extended mouse support -- probes devices as described
    208   1.1    tsubai  * in Inside Macintosh: Devices, Chapter 5 "ADB Manager".
    209   1.1    tsubai  *
    210   1.1    tsubai  * Extended Mouse Protocol is documented in TechNote HW1:
    211   1.1    tsubai  * 	"ADB - The Untold Story:  Space Aliens Ate My Mouse"
    212   1.1    tsubai  *
    213   1.1    tsubai  * Supports: Extended Mouse Protocol, MicroSpeed Mouse Deluxe,
    214   1.1    tsubai  * 	     Mouse Systems A^3 Mouse, Logitech non-EMP MouseMan
    215   1.1    tsubai  */
    216   1.1    tsubai void
    217  1.20  macallan ems_init(struct ams_softc *sc)
    218   1.1    tsubai {
    219   1.9    tsubai 	int adbaddr;
    220   1.1    tsubai 	short cmd;
    221   1.1    tsubai 	u_char buffer[9];
    222   1.1    tsubai 
    223   1.1    tsubai 	adbaddr = sc->adbaddr;
    224   1.1    tsubai 	if (sc->origaddr != ADBADDR_MS)
    225   1.1    tsubai 		return;
    226   1.5    tsubai 	if (sc->handler_id == ADBMS_USPEED ||
    227   1.5    tsubai 	    sc->handler_id == ADBMS_UCONTOUR) {
    228   1.5    tsubai 		/* Found MicroSpeed Mouse Deluxe Mac or Contour Mouse */
    229   1.9    tsubai 		cmd = ADBLISTEN(adbaddr, 1);
    230   1.1    tsubai 
    231   1.1    tsubai 		/*
    232   1.5    tsubai 		 * To setup the MicroSpeed or the Contour, it appears
    233   1.5    tsubai 		 * that we can send the following command to the mouse
    234   1.5    tsubai 		 * and then expect data back in the form:
    235   1.1    tsubai 		 *  buffer[0] = 4 (bytes)
    236   1.1    tsubai 		 *  buffer[1], buffer[2] as std. mouse
    237   1.1    tsubai 		 *  buffer[3] = buffer[4] = 0xff when no buttons
    238   1.1    tsubai 		 *   are down.  When button N down, bit N is clear.
    239   1.1    tsubai 		 * buffer[4]'s locking mask enables a
    240   1.1    tsubai 		 * click to toggle the button down state--sort of
    241   1.1    tsubai 		 * like the "Easy Access" shift/control/etc. keys.
    242   1.6    tsubai 		 * buffer[3]'s alternative speed mask enables using
    243   1.1    tsubai 		 * different speed when the corr. button is down
    244   1.1    tsubai 		 */
    245   1.1    tsubai 		buffer[0] = 4;
    246   1.1    tsubai 		buffer[1] = 0x00;	/* Alternative speed */
    247   1.1    tsubai 		buffer[2] = 0x00;	/* speed = maximum */
    248   1.1    tsubai 		buffer[3] = 0x10;	/* enable extended protocol,
    249   1.1    tsubai 					 * lower bits = alt. speed mask
    250   1.1    tsubai 					 *            = 0000b
    251   1.1    tsubai 					 */
    252   1.1    tsubai 		buffer[4] = 0x07;	/* Locking mask = 0000b,
    253   1.1    tsubai 					 * enable buttons = 0111b
    254   1.1    tsubai 					 */
    255  1.17   nathanw 		adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd);
    256   1.1    tsubai 
    257   1.1    tsubai 		sc->sc_buttons = 3;
    258   1.1    tsubai 		sc->sc_res = 200;
    259   1.1    tsubai 		return;
    260  1.10    tsubai 	}
    261  1.10    tsubai 	if (sc->handler_id == ADBMS_TURBO) {
    262  1.10    tsubai 		/* Found Kensington Turbo Mouse */
    263  1.10    tsubai 		static u_char data1[] =
    264  1.10    tsubai 			{ 8, 0xe7, 0x8c, 0, 0, 0, 0xff, 0xff, 0x94 };
    265  1.10    tsubai 		static u_char data2[] =
    266  1.10    tsubai 			{ 8, 0xa5, 0x14, 0, 0, 0x69, 0xff, 0xff, 0x27 };
    267  1.10    tsubai 
    268  1.10    tsubai 		buffer[0] = 0;
    269  1.17   nathanw 		adb_op_sync((Ptr)buffer, NULL, (Ptr)0, ADBFLUSH(adbaddr));
    270  1.10    tsubai 
    271  1.17   nathanw 		adb_op_sync((Ptr)data1, NULL, (Ptr)0, ADBLISTEN(adbaddr, 2));
    272  1.10    tsubai 
    273  1.10    tsubai 		buffer[0] = 0;
    274  1.17   nathanw 		adb_op_sync((Ptr)buffer, NULL, (Ptr)0, ADBFLUSH(adbaddr));
    275  1.10    tsubai 
    276  1.17   nathanw 		adb_op_sync((Ptr)data2, NULL, (Ptr)0, ADBLISTEN(adbaddr, 2));
    277  1.11    tsubai 		return;
    278   1.1    tsubai 	}
    279   1.6    tsubai 	if ((sc->handler_id == ADBMS_100DPI) ||
    280   1.1    tsubai 	    (sc->handler_id == ADBMS_200DPI)) {
    281   1.1    tsubai 		/* found a mouse */
    282   1.9    tsubai 		cmd = ADBTALK(adbaddr, 3);
    283  1.17   nathanw 		if (adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd)) {
    284   1.1    tsubai #ifdef ADB_DEBUG
    285   1.1    tsubai 			if (adb_debug)
    286   1.9    tsubai 				printf("adb: ems_init timed out\n");
    287   1.1    tsubai #endif
    288   1.1    tsubai 			return;
    289   1.1    tsubai 		}
    290   1.1    tsubai 
    291   1.1    tsubai 		/* Attempt to initialize Extended Mouse Protocol */
    292   1.9    tsubai 		buffer[2] = 4; /* make handler ID 4 */
    293   1.9    tsubai 		cmd = ADBLISTEN(adbaddr, 3);
    294  1.17   nathanw 		if (adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd)) {
    295   1.9    tsubai #ifdef ADB_DEBUG
    296   1.9    tsubai 			if (adb_debug)
    297   1.9    tsubai 				printf("adb: ems_init timed out\n");
    298   1.9    tsubai #endif
    299   1.9    tsubai 			return;
    300   1.9    tsubai 		}
    301   1.1    tsubai 
    302   1.6    tsubai 		/*
    303   1.1    tsubai 		 * Check to see if successful, if not
    304   1.1    tsubai 		 * try to initialize it as other types
    305   1.1    tsubai 		 */
    306   1.9    tsubai 		cmd = ADBTALK(adbaddr, 3);
    307  1.17   nathanw 		if (adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd) == 0 &&
    308   1.9    tsubai 		    buffer[2] == ADBMS_EXTENDED) {
    309   1.1    tsubai 			sc->handler_id = ADBMS_EXTENDED;
    310   1.9    tsubai 			cmd = ADBTALK(adbaddr, 1);
    311  1.17   nathanw 			if (adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd)) {
    312   1.9    tsubai #ifdef ADB_DEBUG
    313   1.9    tsubai 				if (adb_debug)
    314   1.9    tsubai 					printf("adb: ems_init timed out\n");
    315   1.9    tsubai #endif
    316   1.9    tsubai 			} else if (buffer[0] == 8) {
    317   1.1    tsubai 				/* we have a true EMP device */
    318  1.19  macallan #ifdef ADB_PRINT_EMP
    319  1.19  macallan 				printf("EMP: %02x %02x %02x %02x %02x %02x %02x %02x\n",
    320  1.19  macallan 				    buffer[1], buffer[2], buffer[3], buffer[4],
    321  1.19  macallan 				    buffer[5], buffer[6], buffer[7], buffer[8]);
    322  1.19  macallan #endif
    323   1.1    tsubai 				sc->sc_class = buffer[7];
    324   1.1    tsubai 				sc->sc_buttons = buffer[8];
    325   1.1    tsubai 				sc->sc_res = (int)*(short *)&buffer[5];
    326  1.12       wiz 				memcpy(sc->sc_devid, &(buffer[1]), 4);
    327   1.6    tsubai 			} else if (buffer[1] == 0x9a &&
    328   1.1    tsubai 			    ((buffer[2] == 0x20) || (buffer[2] == 0x21))) {
    329   1.6    tsubai 				/*
    330   1.1    tsubai 				 * Set up non-EMP Mouseman/Trackman to put
    331   1.1    tsubai 				 * button bits in 3rd byte instead of sending
    332   1.1    tsubai 				 * via pseudo keyboard device.
    333   1.1    tsubai 				 */
    334   1.9    tsubai 				cmd = ADBLISTEN(adbaddr, 1);
    335   1.1    tsubai 				buffer[0]=2;
    336   1.1    tsubai 				buffer[1]=0x00;
    337   1.1    tsubai 				buffer[2]=0x81;
    338  1.17   nathanw 				adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd);
    339   1.9    tsubai 
    340   1.9    tsubai 				cmd = ADBLISTEN(adbaddr, 1);
    341   1.1    tsubai 				buffer[0]=2;
    342   1.1    tsubai 				buffer[1]=0x01;
    343   1.1    tsubai 				buffer[2]=0x81;
    344  1.17   nathanw 				adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd);
    345   1.9    tsubai 
    346   1.9    tsubai 				cmd = ADBLISTEN(adbaddr, 1);
    347   1.1    tsubai 				buffer[0]=2;
    348   1.1    tsubai 				buffer[1]=0x02;
    349   1.1    tsubai 				buffer[2]=0x81;
    350  1.17   nathanw 				adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd);
    351   1.9    tsubai 
    352   1.9    tsubai 				cmd = ADBLISTEN(adbaddr, 1);
    353   1.1    tsubai 				buffer[0]=2;
    354   1.1    tsubai 				buffer[1]=0x03;
    355   1.1    tsubai 				buffer[2]=0x38;
    356  1.17   nathanw 				adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd);
    357   1.9    tsubai 
    358   1.1    tsubai 				sc->sc_buttons = 3;
    359   1.1    tsubai 				sc->sc_res = 400;
    360   1.1    tsubai 				if (buffer[2] == 0x21)
    361   1.1    tsubai 					sc->sc_class = MSCLASS_TRACKBALL;
    362   1.1    tsubai 				else
    363   1.1    tsubai 					sc->sc_class = MSCLASS_MOUSE;
    364   1.6    tsubai 			} else
    365   1.1    tsubai 				/* unknown device? */;
    366   1.1    tsubai 		} else {
    367   1.1    tsubai 			/* Attempt to initialize as an A3 mouse */
    368   1.1    tsubai 			buffer[2] = 0x03; /* make handler ID 3 */
    369   1.9    tsubai 			cmd = ADBLISTEN(adbaddr, 3);
    370  1.17   nathanw 			if (adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd)) {
    371   1.9    tsubai #ifdef ADB_DEBUG
    372   1.9    tsubai 				if (adb_debug)
    373   1.9    tsubai 					printf("adb: ems_init timed out\n");
    374   1.9    tsubai #endif
    375   1.9    tsubai 				return;
    376   1.9    tsubai 			}
    377   1.6    tsubai 
    378   1.6    tsubai 			/*
    379   1.1    tsubai 			 * Check to see if successful, if not
    380   1.1    tsubai 			 * try to initialize it as other types
    381   1.1    tsubai 			 */
    382   1.9    tsubai 			cmd = ADBTALK(adbaddr, 3);
    383  1.17   nathanw 			if (adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd) == 0
    384   1.9    tsubai 			    && buffer[2] == ADBMS_MSA3) {
    385   1.1    tsubai 				sc->handler_id = ADBMS_MSA3;
    386   1.1    tsubai 				/* Initialize as above */
    387   1.9    tsubai 				cmd = ADBLISTEN(adbaddr, 2);
    388   1.1    tsubai 				/* listen 2 */
    389   1.1    tsubai 				buffer[0] = 3;
    390   1.1    tsubai 				buffer[1] = 0x00;
    391   1.1    tsubai 				/* Irrelevant, buffer has 0x77 */
    392   1.1    tsubai 				buffer[2] = 0x07;
    393   1.6    tsubai 				/*
    394   1.1    tsubai 				 * enable 3 button mode = 0111b,
    395   1.1    tsubai 				 * speed = normal
    396   1.1    tsubai 				 */
    397  1.17   nathanw 				adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd);
    398   1.1    tsubai 				sc->sc_buttons = 3;
    399   1.1    tsubai 				sc->sc_res = 300;
    400   1.1    tsubai 			} else {
    401   1.1    tsubai 				/* No special support for this mouse */
    402   1.1    tsubai 			}
    403   1.6    tsubai 		}
    404   1.1    tsubai 	}
    405   1.1    tsubai }
    406   1.1    tsubai 
    407   1.1    tsubai /*
    408   1.1    tsubai  * Handle putting the mouse data received from the ADB into
    409   1.1    tsubai  * an ADB event record.
    410   1.1    tsubai  */
    411   1.6    tsubai void
    412  1.25   tsutsui ms_adbcomplete(uint8_t *buffer, uint8_t *data_area, int adb_command)
    413   1.1    tsubai {
    414   1.1    tsubai 	adb_event_t event;
    415   1.9    tsubai 	struct ams_softc *sc;
    416   1.1    tsubai 	int adbaddr;
    417   1.1    tsubai #ifdef ADB_DEBUG
    418   1.1    tsubai 	int i;
    419   1.1    tsubai 
    420   1.1    tsubai 	if (adb_debug)
    421   1.1    tsubai 		printf("adb: transaction completion\n");
    422   1.1    tsubai #endif
    423   1.1    tsubai 
    424   1.9    tsubai 	adbaddr = ADB_CMDADDR(adb_command);
    425   1.9    tsubai 	sc = (struct ams_softc *)data_area;
    426   1.1    tsubai 
    427   1.9    tsubai 	if ((sc->handler_id == ADBMS_EXTENDED) && (sc->sc_devid[0] == 0)) {
    428   1.1    tsubai 		/* massage the data to look like EMP data */
    429   1.1    tsubai 		if ((buffer[3] & 0x04) == 0x04)
    430   1.1    tsubai 			buffer[1] &= 0x7f;
    431   1.1    tsubai 		else
    432   1.1    tsubai 			buffer[1] |= 0x80;
    433   1.1    tsubai 		if ((buffer[3] & 0x02) == 0x02)
    434   1.1    tsubai 			buffer[2] &= 0x7f;
    435   1.1    tsubai 		else
    436   1.1    tsubai 			buffer[2] |= 0x80;
    437   1.1    tsubai 		if ((buffer[3] & 0x01) == 0x01)
    438   1.1    tsubai 			buffer[3] = 0x00;
    439   1.1    tsubai 		else
    440   1.1    tsubai 			buffer[3] = 0x80;
    441   1.1    tsubai 	}
    442   1.1    tsubai 
    443   1.1    tsubai 	event.addr = adbaddr;
    444   1.9    tsubai 	event.hand_id = sc->handler_id;
    445   1.9    tsubai 	event.def_addr = sc->origaddr;
    446   1.1    tsubai 	event.byte_count = buffer[0];
    447   1.1    tsubai 	memcpy(event.bytes, buffer + 1, event.byte_count);
    448   1.1    tsubai 
    449   1.1    tsubai #ifdef ADB_DEBUG
    450   1.1    tsubai 	if (adb_debug) {
    451   1.9    tsubai 		printf("ams: from %d at %d (org %d) %d:", event.addr,
    452   1.1    tsubai 		    event.hand_id, event.def_addr, buffer[0]);
    453   1.1    tsubai 		for (i = 1; i <= buffer[0]; i++)
    454   1.1    tsubai 			printf(" %x", buffer[i]);
    455   1.1    tsubai 		printf("\n");
    456   1.1    tsubai 	}
    457   1.1    tsubai #endif
    458   1.1    tsubai 
    459   1.1    tsubai 	microtime(&event.timestamp);
    460   1.1    tsubai 
    461   1.9    tsubai 	ms_processevent(&event, sc);
    462   1.1    tsubai }
    463   1.1    tsubai 
    464   1.1    tsubai /*
    465   1.1    tsubai  * Given a mouse ADB event, record the button settings, calculate the
    466   1.1    tsubai  * x- and y-axis motion, and handoff the event to the appropriate subsystem.
    467   1.1    tsubai  */
    468   1.1    tsubai static void
    469  1.20  macallan ms_processevent(adb_event_t *event, struct ams_softc *sc)
    470   1.1    tsubai {
    471   1.1    tsubai 	adb_event_t new_event;
    472  1.19  macallan 	int i, button_bit, max_byte, mask, buttons, dx, dy;
    473   1.1    tsubai 
    474   1.1    tsubai 	new_event = *event;
    475   1.1    tsubai 	buttons = 0;
    476   1.1    tsubai 
    477   1.1    tsubai 	/*
    478   1.1    tsubai 	 * This should handle both plain ol' Apple mice and mice
    479   1.1    tsubai 	 * that claim to support the Extended Apple Mouse Protocol.
    480   1.1    tsubai 	 */
    481   1.1    tsubai 	max_byte = event->byte_count;
    482   1.1    tsubai 	button_bit = 1;
    483   1.1    tsubai 	switch (event->hand_id) {
    484   1.1    tsubai 	case ADBMS_USPEED:
    485   1.5    tsubai 	case ADBMS_UCONTOUR:
    486   1.5    tsubai 		/* MicroSpeed mouse and Contour mouse */
    487   1.1    tsubai 		if (max_byte == 4)
    488   1.1    tsubai 			buttons = (~event->bytes[2]) & 0xff;
    489   1.1    tsubai 		else
    490   1.1    tsubai 			buttons = (event->bytes[0] & 0x80) ? 0 : 1;
    491   1.1    tsubai 		break;
    492   1.1    tsubai 	case ADBMS_MSA3:
    493   1.1    tsubai 		/* Mouse Systems A3 mouse */
    494   1.1    tsubai 		if (max_byte == 3)
    495   1.1    tsubai 			buttons = (~event->bytes[2]) & 0x07;
    496   1.1    tsubai 		else
    497   1.1    tsubai 			buttons = (event->bytes[0] & 0x80) ? 0 : 1;
    498   1.1    tsubai 		break;
    499  1.19  macallan 	default:
    500   1.1    tsubai 		/* Classic Mouse Protocol (up to 2 buttons) */
    501   1.1    tsubai 		for (i = 0; i < 2; i++, button_bit <<= 1)
    502   1.1    tsubai 			/* 0 when button down */
    503   1.1    tsubai 			if (!(event->bytes[i] & 0x80))
    504   1.1    tsubai 				buttons |= button_bit;
    505   1.1    tsubai 			else
    506   1.1    tsubai 				buttons &= ~button_bit;
    507   1.1    tsubai 		/* Extended Protocol (up to 6 more buttons) */
    508   1.1    tsubai 		for (mask = 0x80; i < max_byte;
    509   1.1    tsubai 		     i += (mask == 0x80), button_bit <<= 1) {
    510   1.1    tsubai 			/* 0 when button down */
    511   1.1    tsubai 			if (!(event->bytes[i] & mask))
    512   1.1    tsubai 				buttons |= button_bit;
    513   1.1    tsubai 			else
    514   1.1    tsubai 				buttons &= ~button_bit;
    515   1.1    tsubai 			mask = ((mask >> 4) & 0xf)
    516   1.1    tsubai 				| ((mask & 0xf) << 4);
    517  1.19  macallan 		}
    518   1.1    tsubai 		break;
    519   1.1    tsubai 	}
    520  1.19  macallan 
    521  1.19  macallan 	dx = ((int)(event->bytes[1] & 0x3f)) -
    522   1.1    tsubai 				((event->bytes[1] & 0x40) ? 64 : 0);
    523  1.19  macallan 	dy = ((int) (event->bytes[0] & 0x3f)) -
    524   1.1    tsubai 				((event->bytes[0] & 0x40) ? 64 : 0);
    525   1.1    tsubai 
    526  1.19  macallan 	if (sc->sc_class == MSCLASS_TRACKPAD) {
    527  1.23  macallan 		if (sc->sc_tapping == 1) {
    528  1.19  macallan 
    529  1.23  macallan 			if (sc->sc_down) {
    530  1.23  macallan 				/* finger is down - collect motion data */
    531  1.23  macallan 				sc->sc_x += dx;
    532  1.23  macallan 				sc->sc_y += dy;
    533  1.23  macallan 			}
    534  1.23  macallan 			switch (sc->sc_buttons) {
    535  1.23  macallan 				case 2:
    536  1.23  macallan 					ams_mangle_2(sc, buttons);
    537  1.23  macallan 					break;
    538  1.23  macallan 				case 4:
    539  1.23  macallan 					ams_mangle_4(sc, buttons);
    540  1.23  macallan 					break;
    541  1.23  macallan 			}
    542  1.19  macallan 		}
    543  1.19  macallan 		/* filter the pseudo-buttons out */
    544  1.19  macallan 		buttons &= 1;
    545  1.19  macallan 	}
    546  1.19  macallan 
    547  1.19  macallan 	new_event.u.m.buttons = sc->sc_mb | buttons;
    548  1.19  macallan 	new_event.u.m.dx = dx;
    549  1.19  macallan 	new_event.u.m.dy = dy;
    550  1.19  macallan 
    551   1.9    tsubai 	if (sc->sc_wsmousedev)
    552   1.9    tsubai 		wsmouse_input(sc->sc_wsmousedev, new_event.u.m.buttons,
    553  1.21    plunky 			      new_event.u.m.dx, -new_event.u.m.dy, 0, 0,
    554   1.8  takemura 			      WSMOUSE_INPUT_DELTA);
    555   1.2    tsubai #if NAED > 0
    556   1.1    tsubai 	aed_input(&new_event);
    557   1.2    tsubai #endif
    558   1.2    tsubai }
    559   1.2    tsubai 
    560  1.19  macallan static void
    561  1.19  macallan ams_mangle_2(struct ams_softc *sc, int buttons)
    562  1.19  macallan {
    563  1.19  macallan 
    564  1.19  macallan 	if (buttons & 4) {
    565  1.19  macallan 		/* finger down on pad */
    566  1.19  macallan 		if (sc->sc_down == 0) {
    567  1.19  macallan 			sc->sc_down = 1;
    568  1.19  macallan 			sc->sc_x = 0;
    569  1.19  macallan 			sc->sc_y = 0;
    570  1.19  macallan 		}
    571  1.19  macallan 	}
    572  1.19  macallan 	if (buttons & 8) {
    573  1.19  macallan 		/* finger up */
    574  1.19  macallan 		if (sc->sc_down) {
    575  1.19  macallan 			if (((sc->sc_x * sc->sc_x +
    576  1.19  macallan 			    sc->sc_y * sc->sc_y) < 20) &&
    577  1.19  macallan 			    (sc->sc_wsmousedev)) {
    578  1.19  macallan 				/*
    579  1.19  macallan 				 * if there wasn't much movement between
    580  1.19  macallan 				 * finger down and up again we assume
    581  1.19  macallan 				 * someone tapped the pad and we just
    582  1.19  macallan 				 * send a mouse button event
    583  1.19  macallan 				 */
    584  1.19  macallan 				wsmouse_input(sc->sc_wsmousedev,
    585  1.22        he 				    1, 0, 0, 0, 0, WSMOUSE_INPUT_DELTA);
    586  1.19  macallan 			}
    587  1.19  macallan 			sc->sc_down = 0;
    588  1.19  macallan 		}
    589  1.19  macallan 	}
    590  1.19  macallan }
    591  1.19  macallan 
    592  1.19  macallan static void
    593  1.19  macallan ams_mangle_4(struct ams_softc *sc, int buttons)
    594  1.19  macallan {
    595  1.19  macallan 
    596  1.19  macallan 	if (buttons & 0x20) {
    597  1.19  macallan 		/* finger down on pad */
    598  1.19  macallan 		if (sc->sc_down == 0) {
    599  1.19  macallan 			sc->sc_down = 1;
    600  1.19  macallan 			sc->sc_x = 0;
    601  1.19  macallan 			sc->sc_y = 0;
    602  1.19  macallan 		}
    603  1.19  macallan 	}
    604  1.19  macallan 	if ((buttons & 0x20) == 0) {
    605  1.19  macallan 		/* finger up */
    606  1.19  macallan 		if (sc->sc_down) {
    607  1.19  macallan 			if (((sc->sc_x * sc->sc_x +
    608  1.19  macallan 			    sc->sc_y * sc->sc_y) < 20) &&
    609  1.19  macallan 			    (sc->sc_wsmousedev)) {
    610  1.19  macallan 				/*
    611  1.19  macallan 				 * if there wasn't much movement between
    612  1.19  macallan 				 * finger down and up again we assume
    613  1.19  macallan 				 * someone tapped the pad and we just
    614  1.19  macallan 				 * send a mouse button event
    615  1.19  macallan 				 */
    616  1.19  macallan 				wsmouse_input(sc->sc_wsmousedev,
    617  1.22        he 				    1, 0, 0, 0, 0, WSMOUSE_INPUT_DELTA);
    618  1.19  macallan 			}
    619  1.19  macallan 			sc->sc_down = 0;
    620  1.19  macallan 		}
    621  1.19  macallan 	}
    622  1.19  macallan }
    623  1.19  macallan 
    624   1.2    tsubai int
    625  1.20  macallan ams_enable(void *v)
    626   1.2    tsubai {
    627   1.2    tsubai 	return 0;
    628   1.2    tsubai }
    629   1.2    tsubai 
    630   1.2    tsubai int
    631  1.24  christos ams_ioctl(void *v, u_long cmd, void *data, int flag, struct lwp *l)
    632   1.2    tsubai {
    633  1.26  macallan 
    634  1.26  macallan 	switch (cmd) {
    635  1.26  macallan 	case WSMOUSEIO_GTYPE:
    636  1.26  macallan 		*(u_int *)data = WSMOUSE_TYPE_ADB;
    637  1.26  macallan 		break;
    638  1.26  macallan 	}
    639  1.13    atatat 	return EPASSTHROUGH;
    640   1.2    tsubai }
    641   1.2    tsubai 
    642   1.2    tsubai void
    643  1.20  macallan ams_disable(void *v)
    644   1.2    tsubai {
    645   1.1    tsubai }
    646  1.19  macallan 
    647  1.19  macallan static void
    648  1.19  macallan init_trackpad(struct ams_softc *sc)
    649  1.19  macallan {
    650  1.23  macallan 	struct sysctlnode *me = NULL, *node = NULL;
    651  1.23  macallan 	int cmd, res, ret;
    652  1.19  macallan 	u_char buffer[10] = {1, 2, 3, 4, 5, 6, 7, 8, 9, 10};
    653  1.19  macallan 	u_char b2[10];
    654  1.19  macallan 	u_char b3[9] = {8, 0x99, 0x94, 0x19, 0xff, 0xb2, 0x8a, 0x1b, 0x50};
    655  1.19  macallan 
    656  1.19  macallan 	cmd = ADBTALK(sc->adbaddr, 1);
    657  1.19  macallan 	res = adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd);
    658  1.19  macallan 
    659  1.19  macallan 	if (buffer[0] != 8)
    660  1.19  macallan 		return;
    661  1.19  macallan 
    662  1.19  macallan 	/* now whack the pad */
    663  1.19  macallan 	cmd = ADBLISTEN(sc->adbaddr, 1);
    664  1.19  macallan 	memcpy(b2, buffer, 10);
    665  1.19  macallan 	b2[7] = 0x0d;
    666  1.19  macallan 	adb_op_sync((Ptr)b2, NULL, (Ptr)0, cmd);
    667  1.19  macallan 
    668  1.19  macallan 	cmd = ADBLISTEN(sc->adbaddr, 2);
    669  1.19  macallan 	adb_op_sync((Ptr)b3, NULL, (Ptr)0, cmd);
    670  1.19  macallan 
    671  1.19  macallan 	cmd = ADBLISTEN(sc->adbaddr, 1);
    672  1.19  macallan 	b2[7] = 0x03;
    673  1.19  macallan 	adb_op_sync((Ptr)b2, NULL, (Ptr)0, cmd);
    674  1.19  macallan 
    675  1.19  macallan 	buffer[0] = 0;
    676  1.19  macallan 	cmd = ADBFLUSH(sc->adbaddr);
    677  1.19  macallan 	adb_op_sync((Ptr)buffer, NULL, (Ptr)0, cmd);
    678  1.23  macallan 
    679  1.23  macallan 	/*
    680  1.28   mbalmer 	 * setup a sysctl node to control whether tapping the pad should
    681  1.23  macallan 	 * trigger mouse button events
    682  1.23  macallan 	 */
    683  1.23  macallan 
    684  1.23  macallan 	sc->sc_tapping = 1;
    685  1.23  macallan 
    686  1.23  macallan 	ret = sysctl_createv(NULL, 0, NULL, (const struct sysctlnode **)&me,
    687  1.23  macallan 	    CTLFLAG_READWRITE,
    688  1.29       chs 	    CTLTYPE_NODE, device_xname(sc->sc_dev), NULL,
    689  1.23  macallan 	    NULL, 0, NULL, 0,
    690  1.23  macallan 	    CTL_MACHDEP, CTL_CREATE, CTL_EOL);
    691  1.23  macallan 
    692  1.23  macallan 	ret=sysctl_createv(NULL, 0, NULL, (const struct sysctlnode **)&node,
    693  1.23  macallan 	    CTLFLAG_READWRITE | CTLFLAG_OWNDESC | CTLFLAG_IMMEDIATE,
    694  1.23  macallan 	    CTLTYPE_INT, "tapping", "tapping the pad causes button events",
    695  1.23  macallan 	    sysctl_ams_tap, 1, NULL, 0,
    696  1.23  macallan 	    CTL_MACHDEP, me->sysctl_num, CTL_CREATE, CTL_EOL);
    697  1.23  macallan 	if (node != NULL) {
    698  1.23  macallan 		node->sysctl_data = sc;
    699  1.23  macallan 	}
    700  1.19  macallan }
    701  1.23  macallan 
    702  1.23  macallan static int
    703  1.23  macallan sysctl_ams_tap(SYSCTLFN_ARGS)
    704  1.23  macallan {
    705  1.23  macallan 	struct sysctlnode node = *rnode;
    706  1.23  macallan 	struct ams_softc *sc = node.sysctl_data;
    707  1.23  macallan 
    708  1.23  macallan 	node.sysctl_idata = sc->sc_tapping;
    709  1.23  macallan 
    710  1.23  macallan 	if (newp) {
    711  1.23  macallan 
    712  1.23  macallan 		/* we're asked to write */
    713  1.23  macallan 		node.sysctl_data = &sc->sc_tapping;
    714  1.23  macallan 		if (sysctl_lookup(SYSCTLFN_CALL(&node)) == 0) {
    715  1.23  macallan 
    716  1.23  macallan 			sc->sc_tapping = (node.sysctl_idata == 0) ? 0 : 1;
    717  1.23  macallan 			return 0;
    718  1.23  macallan 		}
    719  1.23  macallan 		return EINVAL;
    720  1.23  macallan 	} else {
    721  1.23  macallan 
    722  1.23  macallan 		node.sysctl_size = 4;
    723  1.23  macallan 		return (sysctl_lookup(SYSCTLFN_CALL(&node)));
    724  1.23  macallan 	}
    725  1.23  macallan 
    726  1.23  macallan 	return 0;
    727  1.23  macallan }
    728  1.23  macallan 
    729  1.23  macallan SYSCTL_SETUP(sysctl_ams_setup, "sysctl ams subtree setup")
    730  1.23  macallan {
    731  1.23  macallan 
    732  1.23  macallan 	sysctl_createv(NULL, 0, NULL, NULL,
    733  1.23  macallan 		       CTLFLAG_PERMANENT,
    734  1.23  macallan 		       CTLTYPE_NODE, "machdep", NULL,
    735  1.23  macallan 		       NULL, 0, NULL, 0,
    736  1.23  macallan 		       CTL_MACHDEP, CTL_EOL);
    737  1.23  macallan }
    738  1.23  macallan 
    739