adb_kbd.c revision 1.32 1 1.32 thorpej /* $NetBSD: adb_kbd.c,v 1.32 2021/08/07 16:19:09 thorpej Exp $ */
2 1.1 macallan
3 1.1 macallan /*
4 1.1 macallan * Copyright (C) 1998 Colin Wood
5 1.4 macallan * Copyright (C) 2006, 2007 Michael Lorenz
6 1.1 macallan * All rights reserved.
7 1.1 macallan *
8 1.1 macallan * Redistribution and use in source and binary forms, with or without
9 1.1 macallan * modification, are permitted provided that the following conditions
10 1.1 macallan * are met:
11 1.1 macallan * 1. Redistributions of source code must retain the above copyright
12 1.1 macallan * notice, this list of conditions and the following disclaimer.
13 1.1 macallan * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 macallan * notice, this list of conditions and the following disclaimer in the
15 1.1 macallan * documentation and/or other materials provided with the distribution.
16 1.1 macallan * 3. All advertising materials mentioning features or use of this software
17 1.1 macallan * must display the following acknowledgement:
18 1.1 macallan * This product includes software developed by Colin Wood.
19 1.1 macallan * 4. The name of the author may not be used to endorse or promote products
20 1.1 macallan * derived from this software without specific prior written permission.
21 1.1 macallan *
22 1.1 macallan * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23 1.1 macallan * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 1.1 macallan * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25 1.1 macallan * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26 1.1 macallan * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27 1.1 macallan * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28 1.1 macallan * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29 1.1 macallan * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30 1.1 macallan * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
31 1.1 macallan * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 1.1 macallan */
33 1.1 macallan
34 1.1 macallan #include <sys/cdefs.h>
35 1.32 thorpej __KERNEL_RCSID(0, "$NetBSD: adb_kbd.c,v 1.32 2021/08/07 16:19:09 thorpej Exp $");
36 1.29 christos
37 1.29 christos #ifdef _KERNEL_OPT
38 1.29 christos #include "opt_ddb.h"
39 1.29 christos #endif
40 1.1 macallan
41 1.1 macallan #include <sys/param.h>
42 1.1 macallan #include <sys/device.h>
43 1.1 macallan #include <sys/fcntl.h>
44 1.1 macallan #include <sys/poll.h>
45 1.1 macallan #include <sys/select.h>
46 1.1 macallan #include <sys/proc.h>
47 1.1 macallan #include <sys/systm.h>
48 1.1 macallan #include <sys/kernel.h>
49 1.1 macallan #include <sys/sysctl.h>
50 1.1 macallan
51 1.1 macallan #include <dev/wscons/wsconsio.h>
52 1.1 macallan #include <dev/wscons/wskbdvar.h>
53 1.1 macallan #include <dev/wscons/wsksymdef.h>
54 1.1 macallan #include <dev/wscons/wsksymvar.h>
55 1.1 macallan #include <dev/wscons/wsmousevar.h>
56 1.1 macallan
57 1.3 macallan #include <dev/sysmon/sysmonvar.h>
58 1.3 macallan #include <dev/sysmon/sysmon_taskq.h>
59 1.3 macallan
60 1.1 macallan #include <machine/autoconf.h>
61 1.1 macallan #include <machine/keyboard.h>
62 1.1 macallan #include <machine/adbsys.h>
63 1.1 macallan
64 1.1 macallan #include <dev/adb/adbvar.h>
65 1.1 macallan #include <dev/adb/adb_keymap.h>
66 1.1 macallan
67 1.27 riastrad #include "ioconf.h"
68 1.27 riastrad
69 1.8 macallan #include "opt_wsdisplay_compat.h"
70 1.19 macallan #include "opt_adbkbd.h"
71 1.1 macallan #include "adbdebug.h"
72 1.11 macallan #include "wsmouse.h"
73 1.1 macallan
74 1.1 macallan struct adbkbd_softc {
75 1.12 matt device_t sc_dev;
76 1.1 macallan struct adb_device *sc_adbdev;
77 1.1 macallan struct adb_bus_accessops *sc_ops;
78 1.12 matt device_t sc_wskbddev;
79 1.11 macallan #if NWSMOUSE > 0
80 1.12 matt device_t sc_wsmousedev;
81 1.11 macallan #endif
82 1.3 macallan struct sysmon_pswitch sc_sm_pbutton;
83 1.1 macallan int sc_leds;
84 1.1 macallan int sc_have_led_control;
85 1.16 macallan int sc_power_button_delay;
86 1.1 macallan int sc_msg_len;
87 1.1 macallan int sc_event;
88 1.1 macallan int sc_poll;
89 1.1 macallan int sc_polled_chars;
90 1.1 macallan int sc_trans[3];
91 1.1 macallan int sc_capslock;
92 1.10 macallan uint32_t sc_timestamp;
93 1.1 macallan #ifdef WSDISPLAY_COMPAT_RAWKBD
94 1.1 macallan int sc_rawkbd;
95 1.1 macallan #endif
96 1.18 macallan bool sc_emul_usb;
97 1.25 macallan bool sc_power_dbg;
98 1.18 macallan
99 1.21 macallan uint32_t sc_power;
100 1.1 macallan uint8_t sc_buffer[16];
101 1.1 macallan uint8_t sc_pollbuf[16];
102 1.21 macallan uint8_t sc_us, sc_pe;
103 1.1 macallan };
104 1.1 macallan
105 1.1 macallan /*
106 1.1 macallan * Function declarations.
107 1.1 macallan */
108 1.12 matt static int adbkbd_match(device_t, cfdata_t, void *);
109 1.12 matt static void adbkbd_attach(device_t, device_t, void *);
110 1.1 macallan
111 1.1 macallan static void adbkbd_initleds(struct adbkbd_softc *);
112 1.1 macallan static void adbkbd_keys(struct adbkbd_softc *, uint8_t, uint8_t);
113 1.1 macallan static inline void adbkbd_key(struct adbkbd_softc *, uint8_t);
114 1.1 macallan static int adbkbd_wait(struct adbkbd_softc *, int);
115 1.1 macallan
116 1.1 macallan /* Driver definition. */
117 1.12 matt CFATTACH_DECL_NEW(adbkbd, sizeof(struct adbkbd_softc),
118 1.1 macallan adbkbd_match, adbkbd_attach, NULL, NULL);
119 1.1 macallan
120 1.1 macallan static int adbkbd_enable(void *, int);
121 1.5 christos static int adbkbd_ioctl(void *, u_long, void *, int, struct lwp *);
122 1.1 macallan static void adbkbd_set_leds(void *, int);
123 1.1 macallan static void adbkbd_handler(void *, int, uint8_t *);
124 1.9 macallan static void adbkbd_powerbutton(void *);
125 1.1 macallan
126 1.1 macallan struct wskbd_accessops adbkbd_accessops = {
127 1.1 macallan adbkbd_enable,
128 1.1 macallan adbkbd_set_leds,
129 1.1 macallan adbkbd_ioctl,
130 1.1 macallan };
131 1.1 macallan
132 1.1 macallan static void adbkbd_cngetc(void *, u_int *, int *);
133 1.1 macallan static void adbkbd_cnpollc(void *, int);
134 1.1 macallan
135 1.1 macallan struct wskbd_consops adbkbd_consops = {
136 1.1 macallan adbkbd_cngetc,
137 1.1 macallan adbkbd_cnpollc,
138 1.1 macallan };
139 1.1 macallan
140 1.1 macallan struct wskbd_mapdata adbkbd_keymapdata = {
141 1.1 macallan akbd_keydesctab,
142 1.30 macallan #ifdef ADBKBD_LAYOUT
143 1.30 macallan ADBKBD_LAYOUT,
144 1.1 macallan #else
145 1.30 macallan KB_US | KB_APPLE,
146 1.1 macallan #endif
147 1.1 macallan };
148 1.1 macallan
149 1.11 macallan #if NWSMOUSE > 0
150 1.1 macallan static int adbkms_enable(void *);
151 1.5 christos static int adbkms_ioctl(void *, u_long, void *, int, struct lwp *);
152 1.1 macallan static void adbkms_disable(void *);
153 1.1 macallan
154 1.1 macallan const struct wsmouse_accessops adbkms_accessops = {
155 1.1 macallan adbkms_enable,
156 1.1 macallan adbkms_ioctl,
157 1.1 macallan adbkms_disable,
158 1.1 macallan };
159 1.1 macallan
160 1.14 macallan static int adbkbd_sysctl_mid(SYSCTLFN_ARGS);
161 1.14 macallan static int adbkbd_sysctl_right(SYSCTLFN_ARGS);
162 1.18 macallan static int adbkbd_sysctl_usb(SYSCTLFN_ARGS);
163 1.1 macallan
164 1.11 macallan #endif /* NWSMOUSE > 0 */
165 1.11 macallan
166 1.20 he static void adbkbd_setup_sysctl(struct adbkbd_softc *);
167 1.20 he
168 1.1 macallan #ifdef ADBKBD_DEBUG
169 1.1 macallan #define DPRINTF printf
170 1.1 macallan #else
171 1.1 macallan #define DPRINTF while (0) printf
172 1.1 macallan #endif
173 1.1 macallan
174 1.1 macallan static int adbkbd_is_console = 0;
175 1.1 macallan static int adbkbd_console_attached = 0;
176 1.1 macallan
177 1.1 macallan static int
178 1.12 matt adbkbd_match(device_t parent, cfdata_t cf, void *aux)
179 1.1 macallan {
180 1.1 macallan struct adb_attach_args *aaa = aux;
181 1.1 macallan
182 1.1 macallan if (aaa->dev->original_addr == ADBADDR_KBD)
183 1.1 macallan return 1;
184 1.1 macallan else
185 1.1 macallan return 0;
186 1.1 macallan }
187 1.1 macallan
188 1.1 macallan static void
189 1.12 matt adbkbd_attach(device_t parent, device_t self, void *aux)
190 1.1 macallan {
191 1.12 matt struct adbkbd_softc *sc = device_private(self);
192 1.1 macallan struct adb_attach_args *aaa = aux;
193 1.1 macallan short cmd;
194 1.1 macallan struct wskbddev_attach_args a;
195 1.11 macallan #if NWSMOUSE > 0
196 1.1 macallan struct wsmousedev_attach_args am;
197 1.11 macallan #endif
198 1.23 macallan uint8_t buffer[2];
199 1.1 macallan
200 1.12 matt sc->sc_dev = self;
201 1.1 macallan sc->sc_ops = aaa->ops;
202 1.1 macallan sc->sc_adbdev = aaa->dev;
203 1.1 macallan sc->sc_adbdev->cookie = sc;
204 1.1 macallan sc->sc_adbdev->handler = adbkbd_handler;
205 1.1 macallan sc->sc_us = ADBTALK(sc->sc_adbdev->current_addr, 0);
206 1.1 macallan
207 1.1 macallan sc->sc_leds = 0; /* initially off */
208 1.1 macallan sc->sc_have_led_control = 0;
209 1.16 macallan
210 1.16 macallan /*
211 1.16 macallan * If this is != 0 then pushing the power button will not immadiately
212 1.16 macallan * send a shutdown event to sysmon but instead require another key
213 1.16 macallan * press within 5 seconds with a gap of at least two seconds. The
214 1.16 macallan * reason to do this is the fact that some PowerBook keyboards,
215 1.16 macallan * like the 2400, 3400 and original G3 have their power buttons
216 1.16 macallan * right next to the backspace key and it's extremely easy to hit
217 1.16 macallan * it by accident.
218 1.16 macallan * On most other keyboards the power button is sufficiently far out
219 1.16 macallan * of the way so we don't need this.
220 1.16 macallan */
221 1.16 macallan sc->sc_power_button_delay = 0;
222 1.1 macallan sc->sc_msg_len = 0;
223 1.1 macallan sc->sc_poll = 0;
224 1.1 macallan sc->sc_capslock = 0;
225 1.1 macallan sc->sc_trans[1] = 103; /* F11 */
226 1.1 macallan sc->sc_trans[2] = 111; /* F12 */
227 1.21 macallan
228 1.21 macallan /*
229 1.21 macallan * Most ADB keyboards send 0x7f 0x7f when the power button is pressed.
230 1.21 macallan * Some older PowerBooks, like the 3400c, will send a single scancode
231 1.21 macallan * 0x7e instead. Unfortunately Fn-Command on some more recent *Books
232 1.21 macallan * sends the same scancode, so by default sc_power is set to a value
233 1.21 macallan * that can't occur as a scancode and only set to 0x7e on hardware that
234 1.21 macallan * needs it
235 1.21 macallan */
236 1.21 macallan sc->sc_power = 0xffff;
237 1.10 macallan sc->sc_timestamp = 0;
238 1.18 macallan sc->sc_emul_usb = FALSE;
239 1.28 macallan #ifdef ADBKBD_POWER_DDB
240 1.28 macallan sc->sc_power_dbg = TRUE;
241 1.28 macallan #else
242 1.25 macallan sc->sc_power_dbg = FALSE;
243 1.28 macallan #endif
244 1.1 macallan
245 1.24 macallan aprint_normal(" addr %d: ", sc->sc_adbdev->current_addr);
246 1.1 macallan
247 1.1 macallan switch (sc->sc_adbdev->handler_id) {
248 1.1 macallan case ADB_STDKBD:
249 1.24 macallan aprint_normal("standard keyboard\n");
250 1.1 macallan break;
251 1.1 macallan case ADB_ISOKBD:
252 1.24 macallan aprint_normal("standard keyboard (ISO layout)\n");
253 1.1 macallan break;
254 1.1 macallan case ADB_EXTKBD:
255 1.1 macallan cmd = ADBTALK(sc->sc_adbdev->current_addr, 1);
256 1.1 macallan sc->sc_msg_len = 0;
257 1.1 macallan sc->sc_ops->send(sc->sc_ops->cookie, sc->sc_poll, cmd, 0, NULL);
258 1.1 macallan adbkbd_wait(sc, 10);
259 1.1 macallan
260 1.1 macallan /* Ignore Logitech MouseMan/Trackman pseudo keyboard */
261 1.1 macallan /* XXX needs testing */
262 1.1 macallan if (sc->sc_buffer[2] == 0x9a && sc->sc_buffer[3] == 0x20) {
263 1.24 macallan aprint_normal("Mouseman (non-EMP) pseudo keyboard\n");
264 1.1 macallan return;
265 1.1 macallan } else if (sc->sc_buffer[2] == 0x9a &&
266 1.1 macallan sc->sc_buffer[3] == 0x21) {
267 1.24 macallan aprint_normal("Trackman (non-EMP) pseudo keyboard\n");
268 1.1 macallan return;
269 1.1 macallan } else {
270 1.24 macallan aprint_normal("extended keyboard\n");
271 1.1 macallan adbkbd_initleds(sc);
272 1.1 macallan }
273 1.1 macallan break;
274 1.1 macallan case ADB_EXTISOKBD:
275 1.24 macallan aprint_normal("extended keyboard (ISO layout)\n");
276 1.1 macallan adbkbd_initleds(sc);
277 1.1 macallan break;
278 1.1 macallan case ADB_KBDII:
279 1.24 macallan aprint_normal("keyboard II\n");
280 1.1 macallan break;
281 1.1 macallan case ADB_ISOKBDII:
282 1.24 macallan aprint_normal("keyboard II (ISO layout)\n");
283 1.1 macallan break;
284 1.1 macallan case ADB_PBKBD:
285 1.24 macallan aprint_normal("PowerBook keyboard\n");
286 1.6 macallan sc->sc_power = 0x7e;
287 1.16 macallan sc->sc_power_button_delay = 1;
288 1.1 macallan break;
289 1.1 macallan case ADB_PBISOKBD:
290 1.24 macallan aprint_normal("PowerBook keyboard (ISO layout)\n");
291 1.6 macallan sc->sc_power = 0x7e;
292 1.16 macallan sc->sc_power_button_delay = 1;
293 1.1 macallan break;
294 1.1 macallan case ADB_ADJKPD:
295 1.24 macallan aprint_normal("adjustable keypad\n");
296 1.1 macallan break;
297 1.1 macallan case ADB_ADJKBD:
298 1.24 macallan aprint_normal("adjustable keyboard\n");
299 1.1 macallan break;
300 1.1 macallan case ADB_ADJISOKBD:
301 1.24 macallan aprint_normal("adjustable keyboard (ISO layout)\n");
302 1.1 macallan break;
303 1.1 macallan case ADB_ADJJAPKBD:
304 1.24 macallan aprint_normal("adjustable keyboard (Japanese layout)\n");
305 1.1 macallan break;
306 1.1 macallan case ADB_PBEXTISOKBD:
307 1.24 macallan aprint_normal("PowerBook extended keyboard (ISO layout)\n");
308 1.16 macallan sc->sc_power_button_delay = 1;
309 1.6 macallan sc->sc_power = 0x7e;
310 1.1 macallan break;
311 1.1 macallan case ADB_PBEXTJAPKBD:
312 1.24 macallan aprint_normal("PowerBook extended keyboard (Japanese layout)\n");
313 1.16 macallan sc->sc_power_button_delay = 1;
314 1.6 macallan sc->sc_power = 0x7e;
315 1.1 macallan break;
316 1.1 macallan case ADB_JPKBDII:
317 1.24 macallan aprint_normal("keyboard II (Japanese layout)\n");
318 1.1 macallan break;
319 1.1 macallan case ADB_PBEXTKBD:
320 1.24 macallan aprint_normal("PowerBook extended keyboard\n");
321 1.16 macallan sc->sc_power_button_delay = 1;
322 1.6 macallan sc->sc_power = 0x7e;
323 1.1 macallan break;
324 1.1 macallan case ADB_DESIGNKBD:
325 1.24 macallan aprint_normal("extended keyboard\n");
326 1.1 macallan adbkbd_initleds(sc);
327 1.1 macallan break;
328 1.1 macallan case ADB_PBJPKBD:
329 1.24 macallan aprint_normal("PowerBook keyboard (Japanese layout)\n");
330 1.16 macallan sc->sc_power_button_delay = 1;
331 1.6 macallan sc->sc_power = 0x7e;
332 1.1 macallan break;
333 1.1 macallan case ADB_PBG3KBD:
334 1.24 macallan aprint_normal("PowerBook G3 keyboard\n");
335 1.1 macallan break;
336 1.1 macallan case ADB_PBG3JPKBD:
337 1.24 macallan aprint_normal("PowerBook G3 keyboard (Japanese layout)\n");
338 1.1 macallan break;
339 1.1 macallan case ADB_IBOOKKBD:
340 1.24 macallan aprint_normal("iBook keyboard\n");
341 1.1 macallan break;
342 1.1 macallan default:
343 1.24 macallan aprint_normal("mapped device (%d)\n", sc->sc_adbdev->handler_id);
344 1.1 macallan break;
345 1.1 macallan }
346 1.1 macallan
347 1.23 macallan /*
348 1.23 macallan * try to switch to extended protocol
349 1.23 macallan * as in, tell the keyboard to distinguish between left and right
350 1.23 macallan * Shift, Control and Alt keys
351 1.23 macallan */
352 1.23 macallan cmd = ADBLISTEN(sc->sc_adbdev->current_addr, 3);
353 1.23 macallan buffer[0] = sc->sc_adbdev->current_addr;
354 1.23 macallan buffer[1] = 3;
355 1.23 macallan sc->sc_msg_len = 0;
356 1.23 macallan sc->sc_ops->send(sc->sc_ops->cookie, sc->sc_poll, cmd, 2, buffer);
357 1.23 macallan adbkbd_wait(sc, 10);
358 1.23 macallan
359 1.23 macallan cmd = ADBTALK(sc->sc_adbdev->current_addr, 3);
360 1.23 macallan sc->sc_msg_len = 0;
361 1.23 macallan sc->sc_ops->send(sc->sc_ops->cookie, sc->sc_poll, cmd, 0, NULL);
362 1.23 macallan adbkbd_wait(sc, 10);
363 1.23 macallan if ((sc->sc_msg_len == 4) && (sc->sc_buffer[3] == 3)) {
364 1.24 macallan aprint_verbose_dev(sc->sc_dev, "extended protocol enabled\n");
365 1.23 macallan }
366 1.23 macallan
367 1.25 macallan #ifdef ADBKBD_DEBUG
368 1.25 macallan cmd = ADBTALK(sc->sc_adbdev->current_addr, 1);
369 1.25 macallan sc->sc_msg_len = 0;
370 1.25 macallan sc->sc_ops->send(sc->sc_ops->cookie, sc->sc_poll, cmd, 0, NULL);
371 1.25 macallan adbkbd_wait(sc, 10);
372 1.25 macallan printf("buffer: %02x %02x\n", sc->sc_buffer[0], sc->sc_buffer[1]);
373 1.25 macallan #endif
374 1.25 macallan
375 1.1 macallan if (adbkbd_is_console && (adbkbd_console_attached == 0)) {
376 1.1 macallan wskbd_cnattach(&adbkbd_consops, sc, &adbkbd_keymapdata);
377 1.1 macallan adbkbd_console_attached = 1;
378 1.1 macallan a.console = 1;
379 1.1 macallan } else {
380 1.1 macallan a.console = 0;
381 1.1 macallan }
382 1.1 macallan a.keymap = &adbkbd_keymapdata;
383 1.1 macallan a.accessops = &adbkbd_accessops;
384 1.1 macallan a.accesscookie = sc;
385 1.1 macallan
386 1.31 thorpej sc->sc_wskbddev = config_found(self, &a, wskbddevprint,
387 1.32 thorpej CFARGS(.iattr = "wskbddev"));
388 1.19 macallan #ifdef ADBKBD_EMUL_USB
389 1.19 macallan sc->sc_emul_usb = TRUE;
390 1.19 macallan wskbd_set_evtrans(sc->sc_wskbddev, adb_to_usb, 128);
391 1.19 macallan #endif /* ADBKBD_EMUL_USB */
392 1.1 macallan
393 1.11 macallan #if NWSMOUSE > 0
394 1.1 macallan /* attach the mouse device */
395 1.1 macallan am.accessops = &adbkms_accessops;
396 1.1 macallan am.accesscookie = sc;
397 1.31 thorpej sc->sc_wsmousedev = config_found(self, &am, wsmousedevprint,
398 1.32 thorpej CFARGS(.iattr = "wsmousedev"));
399 1.11 macallan #endif
400 1.18 macallan adbkbd_setup_sysctl(sc);
401 1.3 macallan
402 1.3 macallan /* finally register the power button */
403 1.3 macallan sysmon_task_queue_init();
404 1.3 macallan memset(&sc->sc_sm_pbutton, 0, sizeof(struct sysmon_pswitch));
405 1.12 matt sc->sc_sm_pbutton.smpsw_name = device_xname(sc->sc_dev);
406 1.3 macallan sc->sc_sm_pbutton.smpsw_type = PSWITCH_TYPE_POWER;
407 1.3 macallan if (sysmon_pswitch_register(&sc->sc_sm_pbutton) != 0)
408 1.12 matt aprint_error_dev(sc->sc_dev,
409 1.12 matt "unable to register power button with sysmon\n");
410 1.1 macallan }
411 1.1 macallan
412 1.1 macallan static void
413 1.1 macallan adbkbd_handler(void *cookie, int len, uint8_t *data)
414 1.1 macallan {
415 1.1 macallan struct adbkbd_softc *sc = cookie;
416 1.1 macallan
417 1.1 macallan #ifdef ADBKBD_DEBUG
418 1.1 macallan int i;
419 1.12 matt printf("%s: %02x - ", device_xname(sc->sc_dev), sc->sc_us);
420 1.1 macallan for (i = 0; i < len; i++) {
421 1.1 macallan printf(" %02x", data[i]);
422 1.1 macallan }
423 1.1 macallan printf("\n");
424 1.1 macallan #endif
425 1.1 macallan if (len >= 2) {
426 1.1 macallan if (data[1] == sc->sc_us) {
427 1.1 macallan adbkbd_keys(sc, data[2], data[3]);
428 1.1 macallan return;
429 1.1 macallan } else {
430 1.1 macallan memcpy(sc->sc_buffer, data, len);
431 1.1 macallan }
432 1.1 macallan sc->sc_msg_len = len;
433 1.1 macallan wakeup(&sc->sc_event);
434 1.1 macallan } else {
435 1.1 macallan DPRINTF("bogus message\n");
436 1.1 macallan }
437 1.1 macallan }
438 1.1 macallan
439 1.1 macallan static int
440 1.1 macallan adbkbd_wait(struct adbkbd_softc *sc, int timeout)
441 1.1 macallan {
442 1.1 macallan int cnt = 0;
443 1.1 macallan
444 1.1 macallan if (sc->sc_poll) {
445 1.1 macallan while (sc->sc_msg_len == 0) {
446 1.1 macallan sc->sc_ops->poll(sc->sc_ops->cookie);
447 1.1 macallan }
448 1.1 macallan } else {
449 1.1 macallan while ((sc->sc_msg_len == 0) && (cnt < timeout)) {
450 1.1 macallan tsleep(&sc->sc_event, 0, "adbkbdio", hz);
451 1.1 macallan cnt++;
452 1.1 macallan }
453 1.1 macallan }
454 1.1 macallan return (sc->sc_msg_len > 0);
455 1.1 macallan }
456 1.1 macallan
457 1.1 macallan static void
458 1.1 macallan adbkbd_keys(struct adbkbd_softc *sc, uint8_t k1, uint8_t k2)
459 1.1 macallan {
460 1.3 macallan
461 1.1 macallan /* keyboard event processing */
462 1.3 macallan
463 1.1 macallan DPRINTF("[%02x %02x]", k1, k2);
464 1.3 macallan
465 1.6 macallan if (((k1 == k2) && (k1 == 0x7f)) || (k1 == sc->sc_power)) {
466 1.10 macallan uint32_t now = time_second;
467 1.10 macallan uint32_t diff = now - sc->sc_timestamp;
468 1.3 macallan
469 1.10 macallan sc->sc_timestamp = now;
470 1.16 macallan if (((diff > 1) && (diff < 5)) ||
471 1.16 macallan (sc->sc_power_button_delay == 0)) {
472 1.29 christos #ifdef DDB
473 1.28 macallan if (sc->sc_power_dbg) {
474 1.28 macallan Debugger();
475 1.29 christos return;
476 1.28 macallan }
477 1.29 christos #endif
478 1.29 christos /* power button, report to sysmon */
479 1.29 christos sc->sc_pe = k1;
480 1.29 christos sysmon_task_queue_sched(0, adbkbd_powerbutton, sc);
481 1.10 macallan }
482 1.1 macallan } else {
483 1.3 macallan
484 1.1 macallan adbkbd_key(sc, k1);
485 1.1 macallan if (k2 != 0xff)
486 1.1 macallan adbkbd_key(sc, k2);
487 1.1 macallan }
488 1.1 macallan }
489 1.1 macallan
490 1.9 macallan static void
491 1.9 macallan adbkbd_powerbutton(void *cookie)
492 1.9 macallan {
493 1.9 macallan struct adbkbd_softc *sc = cookie;
494 1.9 macallan
495 1.28 macallan sysmon_pswitch_event(&sc->sc_sm_pbutton,
496 1.28 macallan ADBK_PRESS(sc->sc_pe) ? PSWITCH_EVENT_PRESSED :
497 1.28 macallan PSWITCH_EVENT_RELEASED);
498 1.28 macallan
499 1.9 macallan }
500 1.9 macallan
501 1.1 macallan static inline void
502 1.1 macallan adbkbd_key(struct adbkbd_softc *sc, uint8_t k)
503 1.1 macallan {
504 1.1 macallan
505 1.1 macallan if (sc->sc_poll) {
506 1.1 macallan if (sc->sc_polled_chars >= 16) {
507 1.12 matt aprint_error_dev(sc->sc_dev,"polling buffer is full\n");
508 1.1 macallan }
509 1.1 macallan sc->sc_pollbuf[sc->sc_polled_chars] = k;
510 1.1 macallan sc->sc_polled_chars++;
511 1.1 macallan return;
512 1.1 macallan }
513 1.1 macallan
514 1.11 macallan #if NWSMOUSE > 0
515 1.1 macallan /* translate some keys to mouse events */
516 1.1 macallan if (sc->sc_wsmousedev != NULL) {
517 1.1 macallan if (ADBK_KEYVAL(k) == sc->sc_trans[1]) {
518 1.1 macallan wsmouse_input(sc->sc_wsmousedev, ADBK_PRESS(k) ? 2 : 0,
519 1.1 macallan 0, 0, 0, 0,
520 1.1 macallan WSMOUSE_INPUT_DELTA);
521 1.1 macallan return;
522 1.1 macallan }
523 1.1 macallan if (ADBK_KEYVAL(k) == sc->sc_trans[2]) {
524 1.1 macallan wsmouse_input(sc->sc_wsmousedev, ADBK_PRESS(k) ? 4 : 0,
525 1.1 macallan 0, 0, 0, 0,
526 1.1 macallan WSMOUSE_INPUT_DELTA);
527 1.1 macallan return;
528 1.1 macallan }
529 1.1 macallan }
530 1.11 macallan #endif
531 1.11 macallan
532 1.1 macallan #ifdef WSDISPLAY_COMPAT_RAWKBD
533 1.1 macallan if (sc->sc_rawkbd) {
534 1.1 macallan char cbuf[2];
535 1.1 macallan int s;
536 1.1 macallan
537 1.8 macallan cbuf[0] = k;
538 1.1 macallan
539 1.1 macallan s = spltty();
540 1.8 macallan wskbd_rawinput(sc->sc_wskbddev, cbuf, 1);
541 1.1 macallan splx(s);
542 1.1 macallan } else {
543 1.1 macallan #endif
544 1.1 macallan
545 1.1 macallan if (ADBK_KEYVAL(k) == 0x39) {
546 1.1 macallan /* caps lock - send up and down */
547 1.1 macallan if (ADBK_PRESS(k) != sc->sc_capslock) {
548 1.1 macallan sc->sc_capslock = ADBK_PRESS(k);
549 1.1 macallan wskbd_input(sc->sc_wskbddev,
550 1.1 macallan WSCONS_EVENT_KEY_DOWN, 0x39);
551 1.1 macallan wskbd_input(sc->sc_wskbddev,
552 1.1 macallan WSCONS_EVENT_KEY_UP, 0x39);
553 1.1 macallan }
554 1.1 macallan } else {
555 1.1 macallan /* normal event */
556 1.1 macallan int type;
557 1.1 macallan
558 1.1 macallan type = ADBK_PRESS(k) ?
559 1.1 macallan WSCONS_EVENT_KEY_DOWN : WSCONS_EVENT_KEY_UP;
560 1.1 macallan wskbd_input(sc->sc_wskbddev, type, ADBK_KEYVAL(k));
561 1.1 macallan }
562 1.1 macallan #ifdef WSDISPLAY_COMPAT_RAWKBD
563 1.1 macallan }
564 1.1 macallan #endif
565 1.1 macallan }
566 1.1 macallan
567 1.1 macallan /*
568 1.1 macallan * Set the keyboard LED's.
569 1.1 macallan *
570 1.1 macallan * Automatically translates from ioctl/softc format to the
571 1.1 macallan * actual keyboard register format
572 1.1 macallan */
573 1.1 macallan static void
574 1.1 macallan adbkbd_set_leds(void *cookie, int leds)
575 1.1 macallan {
576 1.1 macallan struct adbkbd_softc *sc = cookie;
577 1.1 macallan int aleds;
578 1.1 macallan short cmd;
579 1.1 macallan uint8_t buffer[2];
580 1.1 macallan
581 1.1 macallan DPRINTF("adbkbd_set_leds: %02x\n", leds);
582 1.1 macallan if ((leds & 0x07) == (sc->sc_leds & 0x07))
583 1.1 macallan return;
584 1.1 macallan
585 1.1 macallan if (sc->sc_have_led_control) {
586 1.1 macallan
587 1.1 macallan aleds = (~leds & 0x04) | 3;
588 1.1 macallan if (leds & 1)
589 1.1 macallan aleds &= ~2;
590 1.1 macallan if (leds & 2)
591 1.1 macallan aleds &= ~1;
592 1.1 macallan
593 1.1 macallan buffer[0] = 0xff;
594 1.1 macallan buffer[1] = aleds | 0xf8;
595 1.1 macallan
596 1.1 macallan cmd = ADBLISTEN(sc->sc_adbdev->current_addr, 2);
597 1.11 macallan sc->sc_ops->send(sc->sc_ops->cookie, sc->sc_poll, cmd, 2,
598 1.11 macallan buffer);
599 1.1 macallan }
600 1.1 macallan
601 1.1 macallan sc->sc_leds = leds & 7;
602 1.1 macallan }
603 1.1 macallan
604 1.1 macallan static void
605 1.1 macallan adbkbd_initleds(struct adbkbd_softc *sc)
606 1.1 macallan {
607 1.1 macallan short cmd;
608 1.1 macallan
609 1.1 macallan /* talk R2 */
610 1.1 macallan cmd = ADBTALK(sc->sc_adbdev->current_addr, 2);
611 1.1 macallan sc->sc_msg_len = 0;
612 1.1 macallan sc->sc_ops->send(sc->sc_ops->cookie, sc->sc_poll, cmd, 0, NULL);
613 1.1 macallan if (!adbkbd_wait(sc, 10)) {
614 1.24 macallan aprint_error_dev(sc->sc_dev, "unable to read LED state\n");
615 1.1 macallan return;
616 1.1 macallan }
617 1.1 macallan sc->sc_have_led_control = 1;
618 1.1 macallan DPRINTF("have LED control\n");
619 1.1 macallan return;
620 1.1 macallan }
621 1.1 macallan
622 1.1 macallan static int
623 1.1 macallan adbkbd_enable(void *v, int on)
624 1.1 macallan {
625 1.1 macallan return 0;
626 1.1 macallan }
627 1.1 macallan
628 1.1 macallan static int
629 1.5 christos adbkbd_ioctl(void *v, u_long cmd, void *data, int flag, struct lwp *l)
630 1.1 macallan {
631 1.1 macallan struct adbkbd_softc *sc = (struct adbkbd_softc *) v;
632 1.1 macallan
633 1.1 macallan switch (cmd) {
634 1.1 macallan
635 1.1 macallan case WSKBDIO_GTYPE:
636 1.18 macallan if (sc->sc_emul_usb) {
637 1.18 macallan *(int *)data = WSKBD_TYPE_USB;
638 1.18 macallan } else {
639 1.18 macallan *(int *)data = WSKBD_TYPE_ADB;
640 1.18 macallan }
641 1.1 macallan return 0;
642 1.1 macallan case WSKBDIO_SETLEDS:
643 1.1 macallan adbkbd_set_leds(sc, *(int *)data);
644 1.1 macallan return 0;
645 1.1 macallan case WSKBDIO_GETLEDS:
646 1.1 macallan *(int *)data = sc->sc_leds;
647 1.1 macallan return 0;
648 1.1 macallan #ifdef WSDISPLAY_COMPAT_RAWKBD
649 1.1 macallan case WSKBDIO_SETMODE:
650 1.1 macallan sc->sc_rawkbd = *(int *)data == WSKBD_RAW;
651 1.1 macallan return 0;
652 1.1 macallan #endif
653 1.1 macallan }
654 1.1 macallan
655 1.1 macallan return EPASSTHROUGH;
656 1.1 macallan }
657 1.1 macallan
658 1.1 macallan int
659 1.13 cegger adbkbd_cnattach(void)
660 1.1 macallan {
661 1.1 macallan
662 1.1 macallan adbkbd_is_console = 1;
663 1.1 macallan return 0;
664 1.1 macallan }
665 1.1 macallan
666 1.1 macallan static void
667 1.1 macallan adbkbd_cngetc(void *v, u_int *type, int *data)
668 1.1 macallan {
669 1.1 macallan struct adbkbd_softc *sc = v;
670 1.1 macallan int key, press, val;
671 1.1 macallan int s;
672 1.1 macallan
673 1.1 macallan s = splhigh();
674 1.1 macallan
675 1.1 macallan KASSERT(sc->sc_poll);
676 1.1 macallan
677 1.1 macallan DPRINTF("polling...");
678 1.1 macallan while (sc->sc_polled_chars == 0) {
679 1.1 macallan sc->sc_ops->poll(sc->sc_ops->cookie);
680 1.1 macallan }
681 1.1 macallan DPRINTF(" got one\n");
682 1.1 macallan splx(s);
683 1.1 macallan
684 1.1 macallan key = sc->sc_pollbuf[0];
685 1.1 macallan sc->sc_polled_chars--;
686 1.1 macallan memmove(sc->sc_pollbuf, sc->sc_pollbuf + 1,
687 1.1 macallan sc->sc_polled_chars);
688 1.1 macallan
689 1.1 macallan press = ADBK_PRESS(key);
690 1.1 macallan val = ADBK_KEYVAL(key);
691 1.1 macallan
692 1.1 macallan *data = val;
693 1.1 macallan *type = press ? WSCONS_EVENT_KEY_DOWN : WSCONS_EVENT_KEY_UP;
694 1.1 macallan }
695 1.1 macallan
696 1.1 macallan static void
697 1.1 macallan adbkbd_cnpollc(void *v, int on)
698 1.1 macallan {
699 1.1 macallan struct adbkbd_softc *sc = v;
700 1.1 macallan
701 1.1 macallan sc->sc_poll = on;
702 1.1 macallan if (!on) {
703 1.1 macallan int i;
704 1.1 macallan
705 1.1 macallan /* feed the poll buffer's content to wskbd */
706 1.1 macallan for (i = 0; i < sc->sc_polled_chars; i++) {
707 1.1 macallan adbkbd_key(sc, sc->sc_pollbuf[i]);
708 1.1 macallan }
709 1.1 macallan sc->sc_polled_chars = 0;
710 1.1 macallan }
711 1.1 macallan }
712 1.1 macallan
713 1.11 macallan #if NWSMOUSE > 0
714 1.1 macallan /* stuff for the pseudo mouse */
715 1.1 macallan static int
716 1.1 macallan adbkms_enable(void *v)
717 1.1 macallan {
718 1.1 macallan return 0;
719 1.1 macallan }
720 1.1 macallan
721 1.1 macallan static int
722 1.5 christos adbkms_ioctl(void *v, u_long cmd, void *data, int flag, struct lwp *l)
723 1.1 macallan {
724 1.1 macallan
725 1.1 macallan switch (cmd) {
726 1.1 macallan case WSMOUSEIO_GTYPE:
727 1.1 macallan *(u_int *)data = WSMOUSE_TYPE_PSEUDO;
728 1.1 macallan break;
729 1.1 macallan
730 1.1 macallan default:
731 1.1 macallan return (EPASSTHROUGH);
732 1.1 macallan }
733 1.1 macallan return (0);
734 1.1 macallan }
735 1.1 macallan
736 1.1 macallan static void
737 1.1 macallan adbkms_disable(void *v)
738 1.1 macallan {
739 1.1 macallan }
740 1.1 macallan
741 1.1 macallan static int
742 1.14 macallan adbkbd_sysctl_mid(SYSCTLFN_ARGS)
743 1.1 macallan {
744 1.1 macallan struct sysctlnode node = *rnode;
745 1.1 macallan struct adbkbd_softc *sc=(struct adbkbd_softc *)node.sysctl_data;
746 1.1 macallan const int *np = newp;
747 1.14 macallan int reg;
748 1.1 macallan
749 1.14 macallan DPRINTF("adbkbd_sysctl_mid\n");
750 1.14 macallan reg = sc->sc_trans[1];
751 1.1 macallan if (np) {
752 1.1 macallan /* we're asked to write */
753 1.1 macallan node.sysctl_data = ®
754 1.1 macallan if (sysctl_lookup(SYSCTLFN_CALL(&node)) == 0) {
755 1.1 macallan
756 1.14 macallan sc->sc_trans[1] = *(int *)node.sysctl_data;
757 1.1 macallan return 0;
758 1.1 macallan }
759 1.1 macallan return EINVAL;
760 1.1 macallan } else {
761 1.14 macallan node.sysctl_data = ®
762 1.14 macallan node.sysctl_size = 4;
763 1.14 macallan return (sysctl_lookup(SYSCTLFN_CALL(&node)));
764 1.14 macallan }
765 1.14 macallan }
766 1.14 macallan
767 1.14 macallan static int
768 1.14 macallan adbkbd_sysctl_right(SYSCTLFN_ARGS)
769 1.14 macallan {
770 1.14 macallan struct sysctlnode node = *rnode;
771 1.14 macallan struct adbkbd_softc *sc=(struct adbkbd_softc *)node.sysctl_data;
772 1.14 macallan const int *np = newp;
773 1.14 macallan int reg;
774 1.14 macallan
775 1.14 macallan DPRINTF("adbkbd_sysctl_right\n");
776 1.14 macallan reg = sc->sc_trans[2];
777 1.14 macallan if (np) {
778 1.14 macallan /* we're asked to write */
779 1.14 macallan node.sysctl_data = ®
780 1.14 macallan if (sysctl_lookup(SYSCTLFN_CALL(&node)) == 0) {
781 1.14 macallan
782 1.14 macallan sc->sc_trans[2] = *(int *)node.sysctl_data;
783 1.14 macallan return 0;
784 1.14 macallan }
785 1.14 macallan return EINVAL;
786 1.14 macallan } else {
787 1.14 macallan node.sysctl_data = ®
788 1.1 macallan node.sysctl_size = 4;
789 1.1 macallan return (sysctl_lookup(SYSCTLFN_CALL(&node)));
790 1.1 macallan }
791 1.1 macallan }
792 1.1 macallan
793 1.18 macallan #endif /* NWSMOUSE > 0 */
794 1.18 macallan
795 1.18 macallan static int
796 1.18 macallan adbkbd_sysctl_usb(SYSCTLFN_ARGS)
797 1.18 macallan {
798 1.18 macallan struct sysctlnode node = *rnode;
799 1.18 macallan struct adbkbd_softc *sc=(struct adbkbd_softc *)node.sysctl_data;
800 1.18 macallan const int *np = newp;
801 1.18 macallan bool reg;
802 1.18 macallan
803 1.18 macallan DPRINTF("%s\n", __func__);
804 1.18 macallan reg = sc->sc_emul_usb;
805 1.18 macallan if (np) {
806 1.18 macallan /* we're asked to write */
807 1.18 macallan node.sysctl_data = ®
808 1.18 macallan if (sysctl_lookup(SYSCTLFN_CALL(&node)) == 0) {
809 1.18 macallan
810 1.18 macallan sc->sc_emul_usb = *(bool *)node.sysctl_data;
811 1.18 macallan if (sc->sc_emul_usb) {
812 1.18 macallan wskbd_set_evtrans(sc->sc_wskbddev,
813 1.18 macallan adb_to_usb, 128);
814 1.18 macallan } else {
815 1.18 macallan wskbd_set_evtrans(sc->sc_wskbddev, NULL, 0);
816 1.18 macallan }
817 1.18 macallan return 0;
818 1.18 macallan }
819 1.18 macallan return EINVAL;
820 1.18 macallan } else {
821 1.18 macallan node.sysctl_data = ®
822 1.18 macallan node.sysctl_size = sizeof(reg);
823 1.18 macallan return (sysctl_lookup(SYSCTLFN_CALL(&node)));
824 1.18 macallan }
825 1.18 macallan }
826 1.18 macallan
827 1.25 macallan static int
828 1.25 macallan adbkbd_sysctl_dbg(SYSCTLFN_ARGS)
829 1.25 macallan {
830 1.25 macallan struct sysctlnode node = *rnode;
831 1.25 macallan struct adbkbd_softc *sc=(struct adbkbd_softc *)node.sysctl_data;
832 1.25 macallan const int *np = newp;
833 1.25 macallan bool reg;
834 1.25 macallan
835 1.25 macallan DPRINTF("%s\n", __func__);
836 1.25 macallan reg = sc->sc_power_dbg;
837 1.25 macallan if (np) {
838 1.25 macallan /* we're asked to write */
839 1.25 macallan node.sysctl_data = ®
840 1.25 macallan if (sysctl_lookup(SYSCTLFN_CALL(&node)) == 0) {
841 1.25 macallan
842 1.25 macallan sc->sc_power_dbg = *(bool *)node.sysctl_data;
843 1.25 macallan return 0;
844 1.25 macallan }
845 1.25 macallan return EINVAL;
846 1.25 macallan } else {
847 1.25 macallan node.sysctl_data = ®
848 1.25 macallan node.sysctl_size = sizeof(reg);
849 1.25 macallan return (sysctl_lookup(SYSCTLFN_CALL(&node)));
850 1.25 macallan }
851 1.25 macallan }
852 1.25 macallan
853 1.18 macallan static void
854 1.18 macallan adbkbd_setup_sysctl(struct adbkbd_softc *sc)
855 1.18 macallan {
856 1.18 macallan const struct sysctlnode *me, *node;
857 1.18 macallan int ret;
858 1.18 macallan
859 1.18 macallan DPRINTF("%s: sysctl setup\n", device_xname(sc->sc_dev));
860 1.18 macallan ret = sysctl_createv(NULL, 0, NULL, &me,
861 1.18 macallan CTLFLAG_READWRITE,
862 1.18 macallan CTLTYPE_NODE, device_xname(sc->sc_dev), NULL,
863 1.18 macallan NULL, 0, NULL, 0,
864 1.18 macallan CTL_MACHDEP, CTL_CREATE, CTL_EOL);
865 1.18 macallan ret = sysctl_createv(NULL, 0, NULL,
866 1.18 macallan (void *)&node,
867 1.18 macallan CTLFLAG_READWRITE | CTLFLAG_OWNDESC,
868 1.18 macallan CTLTYPE_BOOL, "emulate_usb", "USB keyboard emulation",
869 1.18 macallan adbkbd_sysctl_usb, 1, (void *)sc, 0, CTL_MACHDEP,
870 1.18 macallan me->sysctl_num, CTL_CREATE, CTL_EOL);
871 1.25 macallan ret = sysctl_createv(NULL, 0, NULL,
872 1.25 macallan (void *)&node,
873 1.25 macallan CTLFLAG_READWRITE | CTLFLAG_OWNDESC,
874 1.25 macallan CTLTYPE_BOOL, "power_ddb", "power button triggers ddb",
875 1.25 macallan adbkbd_sysctl_dbg, 1, (void *)sc, 0, CTL_MACHDEP,
876 1.25 macallan me->sysctl_num, CTL_CREATE, CTL_EOL);
877 1.18 macallan #if NWSMOUSE > 0
878 1.18 macallan if (sc->sc_wsmousedev != NULL) {
879 1.18 macallan ret = sysctl_createv(NULL, 0, NULL,
880 1.18 macallan (void *)&node,
881 1.18 macallan CTLFLAG_READWRITE | CTLFLAG_OWNDESC,
882 1.18 macallan CTLTYPE_INT, "middle", "middle mouse button",
883 1.18 macallan adbkbd_sysctl_mid, 1, (void *)sc, 0, CTL_MACHDEP,
884 1.18 macallan me->sysctl_num, CTL_CREATE, CTL_EOL);
885 1.18 macallan
886 1.18 macallan ret = sysctl_createv(NULL, 0, NULL,
887 1.18 macallan (void *)&node,
888 1.18 macallan CTLFLAG_READWRITE | CTLFLAG_OWNDESC,
889 1.18 macallan CTLTYPE_INT, "right", "right mouse button",
890 1.18 macallan adbkbd_sysctl_right, 2, (void *)sc, 0, CTL_MACHDEP,
891 1.18 macallan me->sysctl_num, CTL_CREATE, CTL_EOL);
892 1.18 macallan }
893 1.18 macallan #endif /* NWSMOUSE > 0 */
894 1.22 nisimura
895 1.22 nisimura (void)ret;
896 1.18 macallan }
897 1.18 macallan
898 1.1 macallan SYSCTL_SETUP(sysctl_adbkbdtrans_setup, "adbkbd translator setup")
899 1.1 macallan {
900 1.1 macallan
901 1.1 macallan sysctl_createv(NULL, 0, NULL, NULL,
902 1.1 macallan CTLFLAG_PERMANENT,
903 1.1 macallan CTLTYPE_NODE, "machdep", NULL,
904 1.1 macallan NULL, 0, NULL, 0,
905 1.1 macallan CTL_MACHDEP, CTL_EOL);
906 1.1 macallan }
907