adb_ms.c revision 1.16 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