xref: /netbsd-src/sys/dev/adb/adb_ms.c (revision deb6f0161a9109e7de9b519dc8dfb9478668dcdd)
1 /*	$NetBSD: adb_ms.c,v 1.16 2014/10/29 00:48:12 macallan Exp $	*/
2 
3 /*
4  * Copyright (C) 1998	Colin Wood
5  * Copyright (C) 2006, 2007 Michael Lorenz
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. All advertising materials mentioning features or use of this software
17  *    must display the following acknowledgement:
18  *	This product includes software developed by Colin Wood.
19  * 4. The name of the author may not be used to endorse or promote products
20  *    derived from this software without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
31  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32  */
33 
34 #include <sys/cdefs.h>
35 __KERNEL_RCSID(0, "$NetBSD: adb_ms.c,v 1.16 2014/10/29 00:48:12 macallan Exp $");
36 
37 #include <sys/param.h>
38 #include <sys/device.h>
39 #include <sys/fcntl.h>
40 #include <sys/poll.h>
41 #include <sys/select.h>
42 #include <sys/proc.h>
43 #include <sys/signalvar.h>
44 #include <sys/systm.h>
45 #include <sys/kernel.h>
46 #include <sys/sysctl.h>
47 
48 #include <machine/autoconf.h>
49 
50 #include <dev/wscons/wsconsio.h>
51 #include <dev/wscons/wsmousevar.h>
52 
53 #include <machine/adbsys.h>
54 #include <dev/adb/adbvar.h>
55 
56 #include "adbdebug.h"
57 
58 #ifdef ADBMS_DEBUG
59 #define DPRINTF printf
60 #else
61 #define DPRINTF while (0) printf
62 #endif
63 
64 /*
65  * State info, per mouse instance.
66  */
67 struct adbms_softc {
68 	device_t	sc_dev;
69 	struct adb_device *sc_adbdev;
70 	struct adb_bus_accessops *sc_ops;
71 
72 	/* Extended Mouse Protocol info, faked for non-EMP mice */
73 	u_int8_t	sc_class;	/* mouse class (mouse, trackball) */
74 	u_int8_t	sc_buttons;	/* number of buttons */
75 	u_int32_t	sc_res;		/* mouse resolution (dpi) */
76 	char		sc_devid[5];	/* device indentifier */
77 	uint8_t		sc_us;		/* cmd to watch for */
78 	int		sc_mb;		/* current button state */
79 	device_t	sc_wsmousedev;
80 	/* helpers for trackpads */
81 	int		sc_down;
82 	/*
83 	 * trackpad protocol variant. Known so far:
84 	 * 2 buttons - PowerBook 3400, single events on button 3 and 4 indicate
85 	 *             finger down and up
86 	 * 4 buttons - iBook G4, button 6 indicates finger down, button 4 is
87 	 *             always down
88 	 */
89 	int		sc_x, sc_y;
90 	int		sc_tapping;
91 	/* buffers */
92 	int		sc_poll;
93 	int		sc_msg_len;
94 	int		sc_event;
95 	uint8_t		sc_buffer[16];
96 };
97 
98 /* EMP device classes */
99 #define MSCLASS_TABLET		0
100 #define MSCLASS_MOUSE		1
101 #define MSCLASS_TRACKBALL	2
102 #define MSCLASS_TRACKPAD	3
103 
104 /*
105  * Function declarations.
106  */
107 static int	adbms_match(device_t, cfdata_t, void *);
108 static void	adbms_attach(device_t, device_t, void *);
109 static void	ems_init(struct adbms_softc *);
110 static void	init_trackpad(struct adbms_softc *);
111 static void	adbms_init_mouse(struct adbms_softc *);
112 static void	adbms_init_turbo(struct adbms_softc *);
113 static void	adbms_init_uspeed(struct adbms_softc *);
114 static void	adbms_process_event(struct adbms_softc *, int, uint8_t *);
115 static int	adbms_send_sync(struct adbms_softc *, uint8_t, int, uint8_t *);
116 
117 /* Driver definition. */
118 CFATTACH_DECL_NEW(adbms, sizeof(struct adbms_softc),
119     adbms_match, adbms_attach, NULL, NULL);
120 
121 static int adbms_enable(void *);
122 static int adbms_ioctl(void *, u_long, void *, int, struct lwp *);
123 static void adbms_disable(void *);
124 
125 /*
126  * handle tapping the trackpad
127  * different pads report different button counts and use slightly different
128  * protocols
129  */
130 static void adbms_mangle_2(struct adbms_softc *, int);
131 static void adbms_mangle_4(struct adbms_softc *, int);
132 static void adbms_handler(void *, int, uint8_t *);
133 static int  adbms_wait(struct adbms_softc *, int);
134 static int  sysctl_adbms_tap(SYSCTLFN_ARGS);
135 
136 const struct wsmouse_accessops adbms_accessops = {
137 	adbms_enable,
138 	adbms_ioctl,
139 	adbms_disable,
140 };
141 
142 static int
143 adbms_match(device_t parent, cfdata_t cf, void *aux)
144 {
145 	struct adb_attach_args *aaa = aux;
146 
147 	if (aaa->dev->original_addr == ADBADDR_MS)
148 		return 1;
149 	else
150 		return 0;
151 }
152 
153 static void
154 adbms_attach(device_t parent, device_t self, void *aux)
155 {
156 	struct adbms_softc *sc = device_private(self);
157 	struct adb_attach_args *aaa = aux;
158 	struct wsmousedev_attach_args a;
159 
160 	sc->sc_dev = self;
161 	sc->sc_ops = aaa->ops;
162 	sc->sc_adbdev = aaa->dev;
163 	sc->sc_adbdev->cookie = sc;
164 	sc->sc_adbdev->handler = adbms_handler;
165 	sc->sc_us = ADBTALK(sc->sc_adbdev->current_addr, 0);
166 	printf(" addr %d: ", sc->sc_adbdev->current_addr);
167 
168 	sc->sc_class = MSCLASS_MOUSE;
169 	sc->sc_buttons = 1;
170 	sc->sc_res = 100;
171 	sc->sc_devid[0] = 0;
172 	sc->sc_devid[4] = 0;
173 	sc->sc_poll = 0;
174 	sc->sc_msg_len = 0;
175 	sc->sc_tapping = 1;
176 
177 	ems_init(sc);
178 
179 	/* print out the type of mouse we have */
180 	switch (sc->sc_adbdev->handler_id) {
181 	case ADBMS_100DPI:
182 		printf("%d-button, %u dpi mouse\n", sc->sc_buttons,
183 		    sc->sc_res);
184 		break;
185 	case ADBMS_200DPI:
186 		sc->sc_res = 200;
187 		printf("%d-button, %u dpi mouse\n", sc->sc_buttons,
188 		    sc->sc_res);
189 		break;
190 	case ADBMS_MSA3:
191 		printf("Mouse Systems A3 mouse, %d-button, %u dpi\n",
192 		    sc->sc_buttons, sc->sc_res);
193 		break;
194 	case ADBMS_USPEED:
195 		printf("MicroSpeed mouse, default parameters\n");
196 		break;
197 	case ADBMS_UCONTOUR:
198 		printf("Contour mouse, default parameters\n");
199 		break;
200 	case ADBMS_TURBO:
201 		printf("Kensington Turbo Mouse\n");
202 		break;
203 	case ADBMS_EXTENDED:
204 		if (sc->sc_devid[0] == '\0') {
205 			printf("Logitech ");
206 			switch (sc->sc_class) {
207 			case MSCLASS_MOUSE:
208 				printf("MouseMan (non-EMP) mouse");
209 				break;
210 			case MSCLASS_TRACKBALL:
211 				printf("TrackMan (non-EMP) trackball");
212 				break;
213 			default:
214 				printf("non-EMP relative positioning device");
215 				break;
216 			}
217 			printf("\n");
218 		} else {
219 			printf("EMP ");
220 			switch (sc->sc_class) {
221 			case MSCLASS_TABLET:
222 				printf("tablet");
223 				break;
224 			case MSCLASS_MOUSE:
225 				printf("mouse");
226 				break;
227 			case MSCLASS_TRACKBALL:
228 				printf("trackball");
229 				break;
230 			case MSCLASS_TRACKPAD:
231 				printf("trackpad");
232 				init_trackpad(sc);
233 				break;
234 			default:
235 				printf("unknown device");
236 				break;
237 			}
238 			printf(" <%s> %d-button, %u dpi\n", sc->sc_devid,
239 			    sc->sc_buttons, sc->sc_res);
240 		}
241 		break;
242 	default:
243 		printf("relative positioning device (mouse?) (%d)\n",
244 			sc->sc_adbdev->handler_id);
245 		break;
246 	}
247 
248 	a.accessops = &adbms_accessops;
249 	a.accesscookie = sc;
250 	sc->sc_wsmousedev = config_found(self, &a, wsmousedevprint);
251 }
252 
253 
254 /*
255  * Initialize extended mouse support -- probes devices as described
256  * in Inside Macintosh: Devices, Chapter 5 "ADB Manager".
257  *
258  * Extended Mouse Protocol is documented in TechNote HW1:
259  * 	"ADB - The Untold Story:  Space Aliens Ate My Mouse"
260  *
261  * Supports: Extended Mouse Protocol, MicroSpeed Mouse Deluxe,
262  * 	     Mouse Systems A^3 Mouse, Logitech non-EMP MouseMan
263  */
264 void
265 ems_init(struct adbms_softc *sc)
266 {
267 
268 	DPRINTF("ems_init %d\n", sc->sc_adbdev->handler_id);
269 
270 	switch (sc->sc_adbdev->handler_id) {
271 		case ADBMS_USPEED:
272 		case ADBMS_UCONTOUR:
273 			adbms_init_uspeed(sc);
274 			return;
275 		case ADBMS_TURBO:
276 			adbms_init_turbo(sc);
277 			return;
278 		case ADBMS_100DPI:
279 		case ADBMS_200DPI:
280 			adbms_init_mouse(sc);
281 	}
282 }
283 
284 static void
285 adbms_init_uspeed(struct adbms_softc *sc)
286 {
287 	uint8_t cmd, addr, buffer[4];
288 
289 	addr = sc->sc_adbdev->current_addr;
290 
291 	/* Found MicroSpeed Mouse Deluxe Mac or Contour Mouse */
292 	cmd = ADBLISTEN(addr, 1);
293 
294 	/*
295 	 * To setup the MicroSpeed or the Contour, it appears
296 	 * that we can send the following command to the mouse
297 	 * and then expect data back in the form:
298 	 *  buffer[0] = 4 (bytes)
299 	 *  buffer[1], buffer[2] as std. mouse
300 	 *  buffer[3] = buffer[4] = 0xff when no buttons
301 	 *   are down.  When button N down, bit N is clear.
302 	 * buffer[4]'s locking mask enables a
303 	 * click to toggle the button down state--sort of
304 	 * like the "Easy Access" shift/control/etc. keys.
305 	 * buffer[3]'s alternative speed mask enables using
306 	 * different speed when the corr. button is down
307 	 */
308 	buffer[0] = 0x00;	/* Alternative speed */
309 	buffer[1] = 0x00;	/* speed = maximum */
310 	buffer[2] = 0x10;	/* enable extended protocol,
311 				 * lower bits = alt. speed mask
312 				 *            = 0000b
313 				 */
314 	buffer[3] = 0x07;	/* Locking mask = 0000b,
315 				 * enable buttons = 0111b
316 				 */
317 	adbms_send_sync(sc, cmd, 4, buffer);
318 
319 	sc->sc_buttons = 3;
320 	sc->sc_res = 200;
321 }
322 
323 static void
324 adbms_init_turbo(struct adbms_softc *sc)
325 {
326 	uint8_t addr;
327 
328 	/* Found Kensington Turbo Mouse */
329 	static u_char data1[] =
330 		{ 0xe7, 0x8c, 0, 0, 0, 0xff, 0xff, 0x94 };
331 	static u_char data2[] =
332 		{ 0xa5, 0x14, 0, 0, 0x69, 0xff, 0xff, 0x27 };
333 
334 	addr = sc->sc_adbdev->current_addr;
335 
336 	adbms_send_sync(sc, ADBFLUSH(addr), 0, NULL);
337 	adbms_send_sync(sc, ADBLISTEN(addr, 2), 8, data1);
338 	adbms_send_sync(sc, ADBFLUSH(addr), 0, NULL);
339 	adbms_send_sync(sc, ADBLISTEN(addr, 2), 8, data2);
340 }
341 
342 static void
343 adbms_init_mouse(struct adbms_softc *sc)
344 {
345 	int len;
346 	uint8_t cmd, addr, buffer[16];
347 
348 	addr = sc->sc_adbdev->current_addr;
349 	/* found a mouse */
350 	cmd = ADBTALK(addr, 3);
351 	if (!adbms_send_sync(sc, cmd, 0, NULL)) {
352 #ifdef ADBMS_DEBUG
353 		printf("adb: ems_init timed out\n");
354 #endif
355 		return;
356 	}
357 
358 	/* Attempt to initialize Extended Mouse Protocol */
359 	len = sc->sc_msg_len;
360 	memcpy(buffer, sc->sc_buffer, len);
361 	DPRINTF("buffer: %02x %02x\n", buffer[0], buffer[1]);
362 	buffer[1] = 4; /* make handler ID 4 */
363 	cmd = ADBLISTEN(addr, 3);
364 	if (!adbms_send_sync(sc, cmd, len, buffer)) {
365 #ifdef ADBMS_DEBUG
366 		printf("adb: ems_init timed out\n");
367 #endif
368 		return;
369 	}
370 
371 	/*
372 	 * Check to see if successful, if not
373 	 * try to initialize it as other types
374 	 */
375 	cmd = ADBTALK(addr, 3);
376 	if (!adbms_send_sync(sc, cmd, 0, NULL)) {
377 		DPRINTF("timeout checking for EMP switch\n");
378 		return;
379 	}
380 	DPRINTF("new handler ID: %02x\n", sc->sc_buffer[1]);
381 	if (sc->sc_buffer[1] == ADBMS_EXTENDED) {
382 		sc->sc_adbdev->handler_id = ADBMS_EXTENDED;
383 		cmd = ADBTALK(addr, 1);
384 		if(!adbms_send_sync(sc, cmd, 0, NULL)) {
385 			DPRINTF("adb: ems_init timed out\n");
386 			return;
387 		}
388 
389 		len = sc->sc_msg_len;
390 		memcpy(buffer, sc->sc_buffer, len);
391 
392 		if (sc->sc_msg_len == 8) {
393 			uint16_t res;
394 			/* we have a true EMP device */
395 #ifdef ADB_PRINT_EMP
396 
397 			printf("EMP: %02x %02x %02x %02x %02x %02x %02x %02x\n",
398 			    buffer[0], buffer[1], buffer[2], buffer[3],
399 			    buffer[4], buffer[5], buffer[6], buffer[7]);
400 #endif
401 			memcpy(sc->sc_devid, &buffer[0], 4);
402 			memcpy(&res, &buffer[4], sizeof(res));
403 			sc->sc_res = res;
404 			sc->sc_class = buffer[6];
405 			sc->sc_buttons = buffer[7];
406 		} else if (buffer[0] == 0x9a &&
407 		    ((buffer[1] == 0x20) || (buffer[1] == 0x21))) {
408 			/*
409 			 * Set up non-EMP Mouseman/Trackman to put
410 			 * button bits in 3rd byte instead of sending
411 			 * via pseudo keyboard device.
412 			 */
413 			if (buffer[1] == 0x21)
414 				sc->sc_class = MSCLASS_TRACKBALL;
415 			else
416 				sc->sc_class = MSCLASS_MOUSE;
417 
418 			cmd = ADBLISTEN(addr, 1);
419 			buffer[0]=0x00;
420 			buffer[1]=0x81;
421 			adbms_send_sync(sc, cmd, 2, buffer);
422 
423 			cmd = ADBLISTEN(addr, 1);
424 			buffer[0]=0x01;
425 			buffer[1]=0x81;
426 			adbms_send_sync(sc, cmd, 2, buffer);
427 
428 			cmd = ADBLISTEN(addr, 1);
429 			buffer[0]=0x02;
430 			buffer[1]=0x81;
431 			adbms_send_sync(sc, cmd, 2, buffer);
432 
433 			cmd = ADBLISTEN(addr, 1);
434 			buffer[0]=0x03;
435 			buffer[1]=0x38;
436 			adbms_send_sync(sc, cmd, 2, buffer);
437 
438 			sc->sc_buttons = 3;
439 			sc->sc_res = 400;
440 		}
441 	} else {
442 		/* Attempt to initialize as an A3 mouse */
443 		buffer[1] = 0x03; /* make handler ID 3 */
444 		cmd = ADBLISTEN(addr, 3);
445 		if (!adbms_send_sync(sc, cmd, len, buffer)) {
446 #ifdef ADBMS_DEBUG
447 			printf("adb: ems_init timed out\n");
448 #endif
449 			return;
450 		}
451 
452 		/*
453 		 * Check to see if successful, if not
454 		 * try to initialize it as other types
455 		 */
456 		cmd = ADBTALK(addr, 3);
457 		if(adbms_send_sync(sc, cmd, 0, NULL)) {
458 			len = sc->sc_msg_len;
459 			memcpy(buffer, sc->sc_buffer, len);
460 			if (buffer[1] == ADBMS_MSA3) {
461 				sc->sc_adbdev->handler_id = ADBMS_MSA3;
462 				/* Initialize as above */
463 				cmd = ADBLISTEN(addr, 2);
464 				/* listen 2 */
465 				buffer[0] = 0x00;
466 				/* Irrelevant, buffer has 0x77 */
467 				buffer[2] = 0x07;
468 				/*
469 				 * enable 3 button mode = 0111b,
470 				 * speed = normal
471 				 */
472 				adbms_send_sync(sc, cmd, 3, buffer);
473 				sc->sc_buttons = 3;
474 				sc->sc_res = 300;
475 			}
476 		}
477 	}
478 }
479 
480 static void
481 adbms_handler(void *cookie, int len, uint8_t *data)
482 {
483 	struct adbms_softc *sc = cookie;
484 
485 #ifdef ADBMS_DEBUG
486 	int i;
487 	printf("%s: %02x - ", device_xname(sc->sc_dev), sc->sc_us);
488 	for (i = 0; i < len; i++) {
489 		printf(" %02x", data[i]);
490 	}
491 	printf("\n");
492 #endif
493 	if (len >= 2) {
494 		memcpy(sc->sc_buffer, &data[2], len - 2);
495 		sc->sc_msg_len = len - 2;
496 		if (data[1] == sc->sc_us) {
497 			/* make sense of the mouse message */
498 			adbms_process_event(sc, sc->sc_msg_len, sc->sc_buffer);
499 			return;
500 		}
501 		wakeup(&sc->sc_event);
502 	} else {
503 		DPRINTF("bogus message\n");
504 	}
505 }
506 
507 static void
508 adbms_process_event(struct adbms_softc *sc, int len, uint8_t *buffer)
509 {
510 	int buttons = 0, mask, dx, dy, i;
511 	int button_bit = 1;
512 
513 	if ((sc->sc_adbdev->handler_id == ADBMS_EXTENDED) && (sc->sc_devid[0] == 0)) {
514 		/* massage the data to look like EMP data */
515 		if ((buffer[2] & 0x04) == 0x04)
516 			buffer[0] &= 0x7f;
517 		else
518 			buffer[0] |= 0x80;
519 		if ((buffer[2] & 0x02) == 0x02)
520 			buffer[1] &= 0x7f;
521 		else
522 			buffer[1] |= 0x80;
523 		if ((buffer[2] & 0x01) == 0x01)
524 			buffer[2] = 0x00;
525 		else
526 			buffer[2] = 0x80;
527 	}
528 
529 	switch (sc->sc_adbdev->handler_id) {
530 		case ADBMS_USPEED:
531 		case ADBMS_UCONTOUR:
532 			/* MicroSpeed mouse and Contour mouse */
533 			if (len == 4)
534 				buttons = (~buffer[3]) & 0xff;
535 			else
536 				buttons = (buffer[1] & 0x80) ? 0 : 1;
537 			break;
538 		case ADBMS_MSA3:
539 			/* Mouse Systems A3 mouse */
540 			if (len == 3)
541 				buttons = (~buffer[2]) & 0x07;
542 			else
543 				buttons = (buffer[0] & 0x80) ? 0 : 1;
544 			break;
545 		default:
546 			/* Classic Mouse Protocol (up to 2 buttons) */
547 			for (i = 0; i < 2; i++, button_bit <<= 1)
548 				/* 0 when button down */
549 				if (!(buffer[i] & 0x80))
550 					buttons |= button_bit;
551 				else
552 					buttons &= ~button_bit;
553 			/* Extended Protocol (up to 6 more buttons) */
554 			for (mask = 0x80; i < len;
555 			     i += (mask == 0x80), button_bit <<= 1) {
556 				/* 0 when button down */
557 				if (!(buffer[i] & mask))
558 					buttons |= button_bit;
559 				else
560 					buttons &= ~button_bit;
561 				mask = ((mask >> 4) & 0xf)
562 					| ((mask & 0xf) << 4);
563 			}
564 			break;
565 	}
566 
567 	if (sc->sc_adbdev->handler_id != ADBMS_EXTENDED) {
568 		dx = ((int)(buffer[1] & 0x3f)) - ((buffer[1] & 0x40) ? 64 : 0);
569 		dy = ((int)(buffer[0] & 0x3f)) - ((buffer[0] & 0x40) ? 64 : 0);
570 	} else {
571 		/* EMP crap, additional motion bits */
572 		int shift = 7, ddx, ddy, sign, smask;
573 
574 #ifdef ADBMS_DEBUG
575 		printf("EMP packet:");
576 		for (i = 0; i < len; i++)
577 			printf(" %02x", buffer[i]);
578 		printf("\n");
579 #endif
580 		dx = (int)buffer[1] & 0x7f;
581 		dy = (int)buffer[0] & 0x7f;
582 		for (i = 2; i < len; i++) {
583 			ddx = (buffer[i] & 0x07);
584 			ddy = (buffer[i] & 0x70) >> 4;
585 			dx |= (ddx << shift);
586 			dy |= (ddy << shift);
587 			shift += 3;
588 		}
589 		sign = 1 << (shift - 1);
590 		smask = 0xffffffff << shift;
591 		if (dx & sign)
592 			dx |= smask;
593 		if (dy & sign)
594 			dy |= smask;
595 #ifdef ADBMS_DEBUG
596 		printf("%d %d %08x %d\n", dx, dy, smask, shift);
597 #endif
598 	}
599 
600 	if (sc->sc_class == MSCLASS_TRACKPAD) {
601 
602 		if (sc->sc_tapping == 1) {
603 			if (sc->sc_down) {
604 				/* finger is down - collect motion data */
605 				sc->sc_x += dx;
606 				sc->sc_y += dy;
607 			}
608 			DPRINTF("buttons: %02x\n", buttons);
609 			switch (sc->sc_buttons) {
610 				case 2:
611 					buttons |= ((buttons & 2) >> 1);
612 					adbms_mangle_2(sc, buttons);
613 					break;
614 				case 4:
615 					adbms_mangle_4(sc, buttons);
616 					break;
617 			}
618 		}
619 		/* filter the pseudo-buttons out */
620 		buttons &= 1;
621 	}
622 
623 	if (sc->sc_wsmousedev)
624 		wsmouse_input(sc->sc_wsmousedev, sc->sc_mb | buttons,
625 			      dx, -dy, 0, 0,
626 			      WSMOUSE_INPUT_DELTA);
627 #if NAED > 0
628 	aed_input(&new_event);
629 #endif
630 }
631 
632 static void
633 adbms_mangle_2(struct adbms_softc *sc, int buttons)
634 {
635 
636 	if (buttons & 4) {
637 		/* finger down on pad */
638 		if (sc->sc_down == 0) {
639 			sc->sc_down = 1;
640 			sc->sc_x = 0;
641 			sc->sc_y = 0;
642 		}
643 	}
644 	if (buttons & 8) {
645 		/* finger up */
646 		if (sc->sc_down) {
647 			if (((sc->sc_x * sc->sc_x +
648 			    sc->sc_y * sc->sc_y) < 3) &&
649 			    (sc->sc_wsmousedev)) {
650 				/*
651 				 * if there wasn't much movement between
652 				 * finger down and up again we assume
653 				 * someone tapped the pad and we just
654 				 * send a mouse button event
655 				 */
656 				wsmouse_input(sc->sc_wsmousedev,
657 				    1, 0, 0, 0, 0, WSMOUSE_INPUT_DELTA);
658 			}
659 			sc->sc_down = 0;
660 		}
661 	}
662 }
663 
664 static void
665 adbms_mangle_4(struct adbms_softc *sc, int buttons)
666 {
667 
668 	if (buttons & 0x20) {
669 		/* finger down on pad */
670 		if (sc->sc_down == 0) {
671 			sc->sc_down = 1;
672 			sc->sc_x = 0;
673 			sc->sc_y = 0;
674 		}
675 	}
676 	if ((buttons & 0x20) == 0) {
677 		/* finger up */
678 		if (sc->sc_down) {
679 			if (((sc->sc_x * sc->sc_x +
680 			    sc->sc_y * sc->sc_y) < 3) &&
681 			    (sc->sc_wsmousedev)) {
682 				/*
683 				 * if there wasn't much movement between
684 				 * finger down and up again we assume
685 				 * someone tapped the pad and we just
686 				 * send a mouse button event
687 				 */
688 				wsmouse_input(sc->sc_wsmousedev,
689 				    1, 0, 0, 0, 0, WSMOUSE_INPUT_DELTA);
690 			}
691 			sc->sc_down = 0;
692 		}
693 	}
694 }
695 
696 static int
697 adbms_enable(void *v)
698 {
699 	return 0;
700 }
701 
702 static int
703 adbms_ioctl(void *v, u_long cmd, void *data, int flag, struct lwp *l)
704 {
705 
706 	switch (cmd) {
707 	case WSMOUSEIO_GTYPE:
708 		*(u_int *)data = WSMOUSE_TYPE_ADB;
709 		break;
710 
711 	default:
712 		return (EPASSTHROUGH);
713 	}
714 	return (0);
715 }
716 
717 static void
718 adbms_disable(void *v)
719 {
720 }
721 
722 static void
723 init_trackpad(struct adbms_softc *sc)
724 {
725 	const struct sysctlnode *me = NULL, *node = NULL;
726 	int cmd, addr, ret;
727 	uint8_t buffer[16];
728 	uint8_t b2[] = {0x99, 0x94, 0x19, 0xff, 0xb2, 0x8a, 0x1b, 0x50};
729 
730 	addr = sc->sc_adbdev->current_addr;
731 	cmd = ADBTALK(addr, 1);
732 	if (!adbms_send_sync(sc, cmd, 0, NULL))
733 		return;
734 
735 	if (sc->sc_msg_len != 8)
736 		return;
737 
738 	memcpy(buffer, sc->sc_buffer, 8);
739 
740 	/* now whack the pad */
741 	cmd = ADBLISTEN(addr, 1);
742 	buffer[6] = 0x0d;
743 	adbms_send_sync(sc, cmd, 8, buffer);
744 
745 	delay(1000);
746 	cmd = ADBLISTEN(addr, 2);
747 	adbms_send_sync(sc, cmd, 8, b2);
748 
749 	delay(1000);
750 	cmd = ADBLISTEN(addr, 1);
751 	buffer[6] = 0x03;
752 	adbms_send_sync(sc, cmd, 8, buffer);
753 
754 	cmd = ADBFLUSH(addr);
755 	adbms_send_sync(sc, cmd, 0, NULL);
756 	delay(1000);
757 
758 	/*
759 	 * setup a sysctl node to control whether tapping the pad should
760 	 * trigger mouse button events
761 	 */
762 
763 	sc->sc_tapping = 1;
764 
765 	ret = sysctl_createv(NULL, 0, NULL, &me,
766 	    CTLFLAG_READWRITE,
767 	    CTLTYPE_NODE, device_xname(sc->sc_dev), NULL,
768 	    NULL, 0, NULL, 0,
769 	    CTL_MACHDEP, CTL_CREATE, CTL_EOL);
770 
771 	ret = sysctl_createv(NULL, 0, NULL, &node,
772 	    CTLFLAG_READWRITE | CTLFLAG_OWNDESC,
773 	    CTLTYPE_INT, "tapping", "tapping the pad causes button events",
774 	    sysctl_adbms_tap, 1, (void *)sc, 0,
775 	    CTL_MACHDEP, me->sysctl_num, CTL_CREATE, CTL_EOL);
776 
777 	(void)ret;
778 }
779 
780 static int
781 adbms_wait(struct adbms_softc *sc, int timeout)
782 {
783 	int cnt = 0;
784 
785 	if (sc->sc_poll) {
786 		while (sc->sc_msg_len == -1) {
787 			sc->sc_ops->poll(sc->sc_ops->cookie);
788 		}
789 	} else {
790 		while ((sc->sc_msg_len == -1) && (cnt < timeout)) {
791 			tsleep(&sc->sc_event, 0, "adbmsio", hz);
792 			cnt++;
793 		}
794 	}
795 	return (sc->sc_msg_len > 0);
796 }
797 
798 static int
799 adbms_send_sync(struct adbms_softc *sc, uint8_t cmd, int len, uint8_t *msg)
800 {
801 	int i;
802 
803 	sc->sc_msg_len = -1;
804 	DPRINTF("send: %02x", cmd);
805 	for (i = 0; i < len; i++)
806 		DPRINTF(" %02x", msg[i]);
807 	DPRINTF("\n");
808 	sc->sc_ops->send(sc->sc_ops->cookie, sc->sc_poll, cmd, len, msg);
809 	adbms_wait(sc, 1000);
810 	return (sc->sc_msg_len != -1);
811 }
812 
813 static int
814 sysctl_adbms_tap(SYSCTLFN_ARGS)
815 {
816 	struct sysctlnode node = *rnode;
817 	struct adbms_softc *sc = node.sysctl_data;
818 
819 	node.sysctl_idata = sc->sc_tapping;
820 
821 	if (newp) {
822 
823 		/* we're asked to write */
824 		node.sysctl_data = &sc->sc_tapping;
825 		if (sysctl_lookup(SYSCTLFN_CALL(&node)) == 0) {
826 
827 			sc->sc_tapping = (*(int *)node.sysctl_data == 0) ? 0 : 1;
828 			return 0;
829 		}
830 		return EINVAL;
831 	} else {
832 
833 		node.sysctl_data = &sc->sc_tapping;
834 		node.sysctl_size = 4;
835 		return (sysctl_lookup(SYSCTLFN_CALL(&node)));
836 	}
837 
838 	return 0;
839 }
840 
841 SYSCTL_SETUP(sysctl_ams_setup, "sysctl ams subtree setup")
842 {
843 
844 	sysctl_createv(NULL, 0, NULL, NULL,
845 		       CTLFLAG_PERMANENT,
846 		       CTLTYPE_NODE, "machdep", NULL,
847 		       NULL, 0, NULL, 0,
848 		       CTL_MACHDEP, CTL_EOL);
849 }
850