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