wskbd.c revision 1.118 1 /* $NetBSD: wskbd.c,v 1.118 2008/05/01 20:18:19 cegger Exp $ */
2
3 /*
4 * Copyright (c) 1996, 1997 Christopher G. Demetriou. All rights reserved.
5 *
6 * Keysym translator:
7 * Contributed to The NetBSD Foundation by Juergen Hannken-Illjes.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 * must display the following acknowledgement:
19 * This product includes software developed by Christopher G. Demetriou
20 * for the NetBSD Project.
21 * 4. The name of the author may not be used to endorse or promote products
22 * derived from this software without specific prior written permission
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
25 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
26 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
27 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
28 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
29 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
30 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
32 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
33 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 */
35
36 /*
37 * Copyright (c) 1992, 1993
38 * The Regents of the University of California. All rights reserved.
39 *
40 * This software was developed by the Computer Systems Engineering group
41 * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
42 * contributed to Berkeley.
43 *
44 * All advertising materials mentioning features or use of this software
45 * must display the following acknowledgement:
46 * This product includes software developed by the University of
47 * California, Lawrence Berkeley Laboratory.
48 *
49 * Redistribution and use in source and binary forms, with or without
50 * modification, are permitted provided that the following conditions
51 * are met:
52 * 1. Redistributions of source code must retain the above copyright
53 * notice, this list of conditions and the following disclaimer.
54 * 2. Redistributions in binary form must reproduce the above copyright
55 * notice, this list of conditions and the following disclaimer in the
56 * documentation and/or other materials provided with the distribution.
57 * 3. Neither the name of the University nor the names of its contributors
58 * may be used to endorse or promote products derived from this software
59 * without specific prior written permission.
60 *
61 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
62 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
63 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
64 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
65 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
66 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
67 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
68 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
69 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
70 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
71 * SUCH DAMAGE.
72 *
73 * @(#)kbd.c 8.2 (Berkeley) 10/30/93
74 */
75
76 /*
77 * Keyboard driver (/dev/wskbd*). Translates incoming bytes to ASCII or
78 * to `wscons_events' and passes them up to the appropriate reader.
79 */
80
81 #include <sys/cdefs.h>
82 __KERNEL_RCSID(0, "$NetBSD: wskbd.c,v 1.118 2008/05/01 20:18:19 cegger Exp $");
83
84 #include "opt_ddb.h"
85 #include "opt_kgdb.h"
86 #include "opt_wsdisplay_compat.h"
87
88 #include "wsdisplay.h"
89 #include "wskbd.h"
90 #include "wsmux.h"
91
92 #include <sys/param.h>
93 #include <sys/conf.h>
94 #include <sys/device.h>
95 #include <sys/ioctl.h>
96 #include <sys/poll.h>
97 #include <sys/kernel.h>
98 #include <sys/proc.h>
99 #include <sys/syslog.h>
100 #include <sys/systm.h>
101 #include <sys/callout.h>
102 #include <sys/malloc.h>
103 #include <sys/tty.h>
104 #include <sys/signalvar.h>
105 #include <sys/errno.h>
106 #include <sys/fcntl.h>
107 #include <sys/vnode.h>
108 #include <sys/kauth.h>
109
110 #include <dev/wscons/wsconsio.h>
111 #include <dev/wscons/wskbdvar.h>
112 #include <dev/wscons/wsksymdef.h>
113 #include <dev/wscons/wsksymvar.h>
114 #include <dev/wscons/wsdisplayvar.h>
115 #include <dev/wscons/wseventvar.h>
116 #include <dev/wscons/wscons_callbacks.h>
117
118 #ifdef KGDB
119 #include <sys/kgdb.h>
120 #endif
121
122 #ifdef WSKBD_DEBUG
123 #define DPRINTF(x) if (wskbddebug) printf x
124 int wskbddebug = 0;
125 #else
126 #define DPRINTF(x)
127 #endif
128
129 #include <dev/wscons/wsmuxvar.h>
130
131 struct wskbd_internal {
132 const struct wskbd_mapdata *t_keymap;
133
134 const struct wskbd_consops *t_consops;
135 void *t_consaccesscookie;
136
137 int t_modifiers;
138 int t_composelen; /* remaining entries in t_composebuf */
139 keysym_t t_composebuf[2];
140
141 int t_flags;
142 #define WSKFL_METAESC 1
143
144 #define MAXKEYSYMSPERKEY 2 /* ESC <key> at max */
145 keysym_t t_symbols[MAXKEYSYMSPERKEY];
146
147 struct wskbd_softc *t_sc; /* back pointer */
148 };
149
150 struct wskbd_softc {
151 struct wsevsrc sc_base;
152
153 struct wskbd_internal *id;
154
155 const struct wskbd_accessops *sc_accessops;
156 void *sc_accesscookie;
157
158 int sc_ledstate;
159
160 int sc_isconsole;
161
162 struct wskbd_bell_data sc_bell_data;
163 struct wskbd_keyrepeat_data sc_keyrepeat_data;
164 #ifdef WSDISPLAY_SCROLLSUPPORT
165 struct wskbd_scroll_data sc_scroll_data;
166 #endif
167
168 int sc_repeating; /* we've called timeout() */
169 callout_t sc_repeat_ch;
170 u_int sc_repeat_type;
171 int sc_repeat_value;
172
173 int sc_translating; /* xlate to chars for emulation */
174
175 int sc_maplen; /* number of entries in sc_map */
176 struct wscons_keymap *sc_map; /* current translation map */
177 kbd_t sc_layout; /* current layout */
178
179 int sc_refcnt;
180 u_char sc_dying; /* device is being detached */
181
182 wskbd_hotkey_plugin *sc_hotkey;
183 void *sc_hotkeycookie;
184 };
185
186 #define MOD_SHIFT_L (1 << 0)
187 #define MOD_SHIFT_R (1 << 1)
188 #define MOD_SHIFTLOCK (1 << 2)
189 #define MOD_CAPSLOCK (1 << 3)
190 #define MOD_CONTROL_L (1 << 4)
191 #define MOD_CONTROL_R (1 << 5)
192 #define MOD_META_L (1 << 6)
193 #define MOD_META_R (1 << 7)
194 #define MOD_MODESHIFT (1 << 8)
195 #define MOD_NUMLOCK (1 << 9)
196 #define MOD_COMPOSE (1 << 10)
197 #define MOD_HOLDSCREEN (1 << 11)
198 #define MOD_COMMAND (1 << 12)
199 #define MOD_COMMAND1 (1 << 13)
200 #define MOD_COMMAND2 (1 << 14)
201
202 #define MOD_ANYSHIFT (MOD_SHIFT_L | MOD_SHIFT_R | MOD_SHIFTLOCK)
203 #define MOD_ANYCONTROL (MOD_CONTROL_L | MOD_CONTROL_R)
204 #define MOD_ANYMETA (MOD_META_L | MOD_META_R)
205
206 #define MOD_ONESET(id, mask) (((id)->t_modifiers & (mask)) != 0)
207 #define MOD_ALLSET(id, mask) (((id)->t_modifiers & (mask)) == (mask))
208
209 #define GETMODSTATE(src, dst) \
210 do { \
211 dst |= (src & MOD_SHIFT_L) ? MOD_SHIFT_L : 0; \
212 dst |= (src & MOD_SHIFT_R) ? MOD_SHIFT_R : 0; \
213 dst |= (src & MOD_CONTROL_L) ? MOD_CONTROL_L : 0; \
214 dst |= (src & MOD_CONTROL_R) ? MOD_CONTROL_R : 0; \
215 dst |= (src & MOD_META_L) ? MOD_META_L : 0; \
216 dst |= (src & MOD_META_R) ? MOD_META_R : 0; \
217 } while (0)
218
219 static int wskbd_match(device_t, cfdata_t, void *);
220 static void wskbd_attach(device_t, device_t, void *);
221 static int wskbd_detach(device_t, int);
222 static int wskbd_activate(device_t, enum devact);
223
224 static int wskbd_displayioctl(device_t, u_long, void *, int,
225 struct lwp *);
226 #if NWSDISPLAY > 0
227 static int wskbd_set_display(device_t, struct wsevsrc *);
228 #else
229 #define wskbd_set_display NULL
230 #endif
231
232 static inline void update_leds(struct wskbd_internal *);
233 static inline void update_modifier(struct wskbd_internal *, u_int, int, int);
234 static int internal_command(struct wskbd_softc *, u_int *, keysym_t, keysym_t);
235 static int wskbd_translate(struct wskbd_internal *, u_int, int);
236 static int wskbd_enable(struct wskbd_softc *, int);
237 #if NWSDISPLAY > 0
238 static void change_displayparam(struct wskbd_softc *, int, int, int);
239 static void wskbd_holdscreen(struct wskbd_softc *, int);
240 #endif
241
242 static int wskbd_do_ioctl_sc(struct wskbd_softc *, u_long, void *, int,
243 struct lwp *);
244 static void wskbd_deliver_event(struct wskbd_softc *sc, u_int type, int value);
245
246 #if NWSMUX > 0
247 static int wskbd_mux_open(struct wsevsrc *, struct wseventvar *);
248 static int wskbd_mux_close(struct wsevsrc *);
249 #else
250 #define wskbd_mux_open NULL
251 #define wskbd_mux_close NULL
252 #endif
253
254 static int wskbd_do_open(struct wskbd_softc *, struct wseventvar *);
255 static int wskbd_do_ioctl(device_t, u_long, void *, int, struct lwp *);
256
257 CFATTACH_DECL_NEW(wskbd, sizeof (struct wskbd_softc),
258 wskbd_match, wskbd_attach, wskbd_detach, wskbd_activate);
259
260 extern struct cfdriver wskbd_cd;
261
262 dev_type_open(wskbdopen);
263 dev_type_close(wskbdclose);
264 dev_type_read(wskbdread);
265 dev_type_ioctl(wskbdioctl);
266 dev_type_poll(wskbdpoll);
267 dev_type_kqfilter(wskbdkqfilter);
268
269 const struct cdevsw wskbd_cdevsw = {
270 wskbdopen, wskbdclose, wskbdread, nowrite, wskbdioctl,
271 nostop, notty, wskbdpoll, nommap, wskbdkqfilter, D_OTHER
272 };
273
274 #ifndef WSKBD_DEFAULT_BELL_PITCH
275 #define WSKBD_DEFAULT_BELL_PITCH 1500 /* 1500Hz */
276 #endif
277 #ifndef WSKBD_DEFAULT_BELL_PERIOD
278 #define WSKBD_DEFAULT_BELL_PERIOD 100 /* 100ms */
279 #endif
280 #ifndef WSKBD_DEFAULT_BELL_VOLUME
281 #define WSKBD_DEFAULT_BELL_VOLUME 50 /* 50% volume */
282 #endif
283
284 struct wskbd_bell_data wskbd_default_bell_data = {
285 WSKBD_BELL_DOALL,
286 WSKBD_DEFAULT_BELL_PITCH,
287 WSKBD_DEFAULT_BELL_PERIOD,
288 WSKBD_DEFAULT_BELL_VOLUME,
289 };
290
291 #ifdef WSDISPLAY_SCROLLSUPPORT
292 struct wskbd_scroll_data wskbd_default_scroll_data = {
293 WSKBD_SCROLL_DOALL,
294 WSKBD_SCROLL_MODE_NORMAL,
295 #ifdef WSDISPLAY_SCROLLCOMBO
296 WSDISPLAY_SCROLLCOMBO,
297 #else
298 MOD_SHIFT_L,
299 #endif
300 };
301 #endif
302
303 #ifndef WSKBD_DEFAULT_KEYREPEAT_DEL1
304 #define WSKBD_DEFAULT_KEYREPEAT_DEL1 400 /* 400ms to start repeating */
305 #endif
306 #ifndef WSKBD_DEFAULT_KEYREPEAT_DELN
307 #define WSKBD_DEFAULT_KEYREPEAT_DELN 100 /* 100ms to between repeats */
308 #endif
309
310 struct wskbd_keyrepeat_data wskbd_default_keyrepeat_data = {
311 WSKBD_KEYREPEAT_DOALL,
312 WSKBD_DEFAULT_KEYREPEAT_DEL1,
313 WSKBD_DEFAULT_KEYREPEAT_DELN,
314 };
315
316 #if NWSDISPLAY > 0 || NWSMUX > 0
317 struct wssrcops wskbd_srcops = {
318 WSMUX_KBD,
319 wskbd_mux_open, wskbd_mux_close, wskbd_do_ioctl,
320 wskbd_displayioctl, wskbd_set_display
321 };
322 #endif
323
324 static bool wskbd_suspend(device_t dv PMF_FN_PROTO);
325 static void wskbd_repeat(void *v);
326
327 static int wskbd_console_initted;
328 static struct wskbd_softc *wskbd_console_device;
329 static struct wskbd_internal wskbd_console_data;
330
331 static void wskbd_update_layout(struct wskbd_internal *, kbd_t);
332
333 static void
334 wskbd_update_layout(struct wskbd_internal *id, kbd_t enc)
335 {
336
337 if (enc & KB_METAESC)
338 id->t_flags |= WSKFL_METAESC;
339 else
340 id->t_flags &= ~WSKFL_METAESC;
341 }
342
343 /*
344 * Print function (for parent devices).
345 */
346 int
347 wskbddevprint(void *aux, const char *pnp)
348 {
349 #if 0
350 struct wskbddev_attach_args *ap = aux;
351 #endif
352
353 if (pnp)
354 aprint_normal("wskbd at %s", pnp);
355 #if 0
356 aprint_normal(" console %d", ap->console);
357 #endif
358
359 return (UNCONF);
360 }
361
362 int
363 wskbd_match(device_t parent, cfdata_t match, void *aux)
364 {
365 struct wskbddev_attach_args *ap = aux;
366
367 if (match->wskbddevcf_console != WSKBDDEVCF_CONSOLE_UNK) {
368 /*
369 * If console-ness of device specified, either match
370 * exactly (at high priority), or fail.
371 */
372 if (match->wskbddevcf_console != 0 && ap->console != 0)
373 return (10);
374 else
375 return (0);
376 }
377
378 /* If console-ness unspecified, it wins. */
379 return (1);
380 }
381
382 void
383 wskbd_attach(device_t parent, device_t self, void *aux)
384 {
385 struct wskbd_softc *sc = device_private(self);
386 struct wskbddev_attach_args *ap = aux;
387 #if NWSMUX > 0
388 int mux, error;
389 #endif
390
391 sc->sc_base.me_dv = self;
392 sc->sc_isconsole = ap->console;
393 sc->sc_hotkey = NULL;
394 sc->sc_hotkeycookie = NULL;
395
396 #if NWSMUX > 0 || NWSDISPLAY > 0
397 sc->sc_base.me_ops = &wskbd_srcops;
398 #endif
399 #if NWSMUX > 0
400 mux = device_cfdata(sc->sc_base.me_dv)->wskbddevcf_mux;
401 if (ap->console) {
402 /* Ignore mux for console; it always goes to the console mux. */
403 /* printf(" (mux %d ignored for console)", mux); */
404 mux = -1;
405 }
406 if (mux >= 0)
407 aprint_normal(" mux %d", mux);
408 #else
409 if (device_cfdata(sc->sc_base.me_dv)->wskbddevcf_mux >= 0)
410 aprint_normal(" (mux ignored)");
411 #endif
412
413 if (ap->console) {
414 sc->id = &wskbd_console_data;
415 } else {
416 sc->id = malloc(sizeof(struct wskbd_internal),
417 M_DEVBUF, M_WAITOK|M_ZERO);
418 sc->id->t_keymap = ap->keymap;
419 wskbd_update_layout(sc->id, ap->keymap->layout);
420 }
421
422 callout_init(&sc->sc_repeat_ch, 0);
423 callout_setfunc(&sc->sc_repeat_ch, wskbd_repeat, sc);
424
425 sc->id->t_sc = sc;
426
427 sc->sc_accessops = ap->accessops;
428 sc->sc_accesscookie = ap->accesscookie;
429 sc->sc_repeating = 0;
430 sc->sc_translating = 1;
431 sc->sc_ledstate = -1; /* force update */
432
433 if (wskbd_load_keymap(sc->id->t_keymap,
434 &sc->sc_map, &sc->sc_maplen) != 0)
435 panic("cannot load keymap");
436
437 sc->sc_layout = sc->id->t_keymap->layout;
438
439 /* set default bell and key repeat data */
440 sc->sc_bell_data = wskbd_default_bell_data;
441 sc->sc_keyrepeat_data = wskbd_default_keyrepeat_data;
442
443 #ifdef WSDISPLAY_SCROLLSUPPORT
444 sc->sc_scroll_data = wskbd_default_scroll_data;
445 #endif
446
447 if (ap->console) {
448 KASSERT(wskbd_console_initted);
449 KASSERT(wskbd_console_device == NULL);
450
451 wskbd_console_device = sc;
452
453 aprint_naive(": console keyboard");
454 aprint_normal(": console keyboard");
455
456 #if NWSDISPLAY > 0
457 wsdisplay_set_console_kbd(&sc->sc_base); /* sets me_dispv */
458 if (sc->sc_base.me_dispdv != NULL)
459 aprint_normal(", using %s",
460 device_xname(sc->sc_base.me_dispdv));
461 #endif
462 }
463 aprint_naive("\n");
464 aprint_normal("\n");
465
466 #if NWSMUX > 0
467 if (mux >= 0) {
468 error = wsmux_attach_sc(wsmux_getmux(mux), &sc->sc_base);
469 if (error)
470 aprint_error_dev(sc->sc_base.me_dv,
471 "attach error=%d\n", error);
472 }
473 #endif
474
475 if (!pmf_device_register(self, wskbd_suspend, NULL))
476 aprint_error_dev(self, "couldn't establish power handler\n");
477 else if (!pmf_class_input_register(self))
478 aprint_error_dev(self, "couldn't register as input device\n");
479 }
480
481 static bool
482 wskbd_suspend(device_t dv PMF_FN_ARGS)
483 {
484 struct wskbd_softc *sc = device_private(dv);
485
486 sc->sc_repeating = 0;
487 callout_stop(&sc->sc_repeat_ch);
488
489 return true;
490 }
491
492 void
493 wskbd_cnattach(const struct wskbd_consops *consops, void *conscookie,
494 const struct wskbd_mapdata *mapdata)
495 {
496 KASSERT(!wskbd_console_initted);
497
498 wskbd_console_data.t_keymap = mapdata;
499 wskbd_update_layout(&wskbd_console_data, mapdata->layout);
500
501 wskbd_console_data.t_consops = consops;
502 wskbd_console_data.t_consaccesscookie = conscookie;
503
504 #if NWSDISPLAY > 0
505 wsdisplay_set_cons_kbd(wskbd_cngetc, wskbd_cnpollc, wskbd_cnbell);
506 #endif
507
508 wskbd_console_initted = 1;
509 }
510
511 void
512 wskbd_cndetach(void)
513 {
514 KASSERT(wskbd_console_initted);
515
516 wskbd_console_data.t_keymap = 0;
517
518 wskbd_console_data.t_consops = 0;
519 wskbd_console_data.t_consaccesscookie = 0;
520
521 #if NWSDISPLAY > 0
522 wsdisplay_unset_cons_kbd();
523 #endif
524
525 wskbd_console_initted = 0;
526 }
527
528 static void
529 wskbd_repeat(void *v)
530 {
531 struct wskbd_softc *sc = (struct wskbd_softc *)v;
532 int s = spltty();
533
534 if (!sc->sc_repeating) {
535 /*
536 * race condition: a "key up" event came in when wskbd_repeat()
537 * was already called but not yet spltty()'d
538 */
539 splx(s);
540 return;
541 }
542 if (sc->sc_translating) {
543 /* deliver keys */
544 #if NWSDISPLAY > 0
545 if (sc->sc_base.me_dispdv != NULL) {
546 int i;
547 for (i = 0; i < sc->sc_repeating; i++)
548 wsdisplay_kbdinput(sc->sc_base.me_dispdv,
549 sc->id->t_symbols[i]);
550 }
551 #endif
552 } else {
553 #if defined(WSKBD_EVENT_AUTOREPEAT)
554 /* queue event */
555 wskbd_deliver_event(sc, sc->sc_repeat_type,
556 sc->sc_repeat_value);
557 #endif /* defined(WSKBD_EVENT_AUTOREPEAT) */
558 }
559 callout_schedule(&sc->sc_repeat_ch, mstohz(sc->sc_keyrepeat_data.delN));
560 splx(s);
561 }
562
563 int
564 wskbd_activate(device_t self, enum devact act)
565 {
566 struct wskbd_softc *sc = device_private(self);
567
568 if (act == DVACT_DEACTIVATE)
569 sc->sc_dying = 1;
570 return (0);
571 }
572
573 /*
574 * Detach a keyboard. To keep track of users of the softc we keep
575 * a reference count that's incremented while inside, e.g., read.
576 * If the keyboard is active and the reference count is > 0 (0 is the
577 * normal state) we post an event and then wait for the process
578 * that had the reference to wake us up again. Then we blow away the
579 * vnode and return (which will deallocate the softc).
580 */
581 int
582 wskbd_detach(device_t self, int flags)
583 {
584 struct wskbd_softc *sc = device_private(self);
585 struct wseventvar *evar;
586 int maj, mn;
587 int s;
588
589 #if NWSMUX > 0
590 /* Tell parent mux we're leaving. */
591 if (sc->sc_base.me_parent != NULL)
592 wsmux_detach_sc(&sc->sc_base);
593 #endif
594
595 callout_stop(&sc->sc_repeat_ch);
596 callout_destroy(&sc->sc_repeat_ch);
597
598 if (sc->sc_isconsole) {
599 KASSERT(wskbd_console_device == sc);
600 wskbd_console_device = NULL;
601 }
602
603 pmf_device_deregister(self);
604
605 evar = sc->sc_base.me_evp;
606 if (evar != NULL && evar->io != NULL) {
607 s = spltty();
608 if (--sc->sc_refcnt >= 0) {
609 struct wscons_event event;
610
611 /* Wake everyone by generating a dummy event. */
612 event.type = 0;
613 event.value = 0;
614 if (wsevent_inject(evar, &event, 1) != 0)
615 wsevent_wakeup(evar);
616
617 /* Wait for processes to go away. */
618 if (tsleep(sc, PZERO, "wskdet", hz * 60))
619 aprint_error("wskbd_detach: %s didn't detach\n",
620 device_xname(self));
621 }
622 splx(s);
623 }
624
625 /* locate the major number */
626 maj = cdevsw_lookup_major(&wskbd_cdevsw);
627
628 /* Nuke the vnodes for any open instances. */
629 mn = device_unit(self);
630 vdevgone(maj, mn, mn, VCHR);
631
632 return (0);
633 }
634
635 void
636 wskbd_input(device_t dev, u_int type, int value)
637 {
638 struct wskbd_softc *sc = device_private(dev);
639 #if NWSDISPLAY > 0
640 int num, i;
641 #endif
642
643 if (sc->sc_repeating) {
644 sc->sc_repeating = 0;
645 callout_stop(&sc->sc_repeat_ch);
646 }
647
648 device_active(dev, DVA_HARDWARE);
649
650 #if NWSDISPLAY > 0
651 /*
652 * If /dev/wskbdN is not connected in event mode translate and
653 * send upstream.
654 */
655 if (sc->sc_translating) {
656 num = wskbd_translate(sc->id, type, value);
657 if (num > 0) {
658 if (sc->sc_base.me_dispdv != NULL) {
659 #ifdef WSDISPLAY_SCROLLSUPPORT
660 if (sc->id->t_symbols [0] != KS_Print_Screen) {
661 wsdisplay_scroll(sc->sc_base.
662 me_dispdv, WSDISPLAY_SCROLL_RESET);
663 }
664 #endif
665 for (i = 0; i < num; i++)
666 wsdisplay_kbdinput(
667 sc->sc_base.me_dispdv,
668 sc->id->t_symbols[i]);
669 }
670
671 if (sc->sc_keyrepeat_data.del1 != 0) {
672 sc->sc_repeating = num;
673 callout_schedule(&sc->sc_repeat_ch,
674 mstohz(sc->sc_keyrepeat_data.del1));
675 }
676 }
677 return;
678 }
679 #endif
680
681 wskbd_deliver_event(sc, type, value);
682
683 #if defined(WSKBD_EVENT_AUTOREPEAT)
684 /* Repeat key presses if set. */
685 if (type == WSCONS_EVENT_KEY_DOWN && sc->sc_keyrepeat_data.del1 != 0) {
686 sc->sc_repeat_type = type;
687 sc->sc_repeat_value = value;
688 sc->sc_repeating = 1;
689 callout_schedule(&sc->sc_repeat_ch,
690 mstohz(sc->sc_keyrepeat_data.del1));
691 }
692 #endif /* defined(WSKBD_EVENT_AUTOREPEAT) */
693 }
694
695 /*
696 * Keyboard is generating events. Turn this keystroke into an
697 * event and put it in the queue. If the queue is full, the
698 * keystroke is lost (sorry!).
699 */
700 static void
701 wskbd_deliver_event(struct wskbd_softc *sc, u_int type, int value)
702 {
703 struct wseventvar *evar;
704 struct wscons_event event;
705
706 evar = sc->sc_base.me_evp;
707
708 if (evar == NULL) {
709 DPRINTF(("wskbd_input: not open\n"));
710 return;
711 }
712
713 #ifdef DIAGNOSTIC
714 if (evar->q == NULL) {
715 printf("wskbd_input: evar->q=NULL\n");
716 return;
717 }
718 #endif
719
720 event.type = type;
721 event.value = value;
722 if (wsevent_inject(evar, &event, 1) != 0)
723 log(LOG_WARNING, "%s: event queue overflow\n",
724 device_xname(sc->sc_base.me_dv));
725 }
726
727 #ifdef WSDISPLAY_COMPAT_RAWKBD
728 void
729 wskbd_rawinput(device_t dev, u_char *tbuf, int len)
730 {
731 #if NWSDISPLAY > 0
732 struct wskbd_softc *sc = device_private(dev);
733 int i;
734
735 if (sc->sc_base.me_dispdv != NULL)
736 for (i = 0; i < len; i++)
737 wsdisplay_kbdinput(sc->sc_base.me_dispdv, tbuf[i]);
738 /* this is KS_GROUP_Ascii */
739 #endif
740 }
741 #endif /* WSDISPLAY_COMPAT_RAWKBD */
742
743 #if NWSDISPLAY > 0
744 static void
745 wskbd_holdscreen(struct wskbd_softc *sc, int hold)
746 {
747 int new_state;
748
749 if (sc->sc_base.me_dispdv != NULL) {
750 wsdisplay_kbdholdscreen(sc->sc_base.me_dispdv, hold);
751 new_state = sc->sc_ledstate;
752 if (hold) {
753 #ifdef WSDISPLAY_SCROLLSUPPORT
754 sc->sc_scroll_data.mode = WSKBD_SCROLL_MODE_HOLD;
755 #endif
756 new_state |= WSKBD_LED_SCROLL;
757 } else {
758 #ifdef WSDISPLAY_SCROLLSUPPORT
759 sc->sc_scroll_data.mode = WSKBD_SCROLL_MODE_NORMAL;
760 #endif
761 new_state &= ~WSKBD_LED_SCROLL;
762 }
763 if (new_state != sc->sc_ledstate) {
764 (*sc->sc_accessops->set_leds)(sc->sc_accesscookie,
765 new_state);
766 sc->sc_ledstate = new_state;
767 #ifdef WSDISPLAY_SCROLLSUPPORT
768 if (!hold)
769 wsdisplay_scroll(sc->sc_base.me_dispdv,
770 WSDISPLAY_SCROLL_RESET);
771 #endif
772 }
773 }
774 }
775 #endif
776
777 static int
778 wskbd_enable(struct wskbd_softc *sc, int on)
779 {
780 int error;
781
782 #if 0
783 /* I don't understand the purpose of this code. And it seems to
784 * break things, so it's out. -- Lennart
785 */
786 if (!on && (!sc->sc_translating
787 #if NWSDISPLAY > 0
788 || sc->sc_base.me_dispdv
789 #endif
790 ))
791 return (EBUSY);
792 #endif
793 #if NWSDISPLAY > 0
794 if (sc->sc_base.me_dispdv != NULL)
795 return (0);
796 #endif
797
798 /* Always cancel auto repeat when fiddling with the kbd. */
799 if (sc->sc_repeating) {
800 sc->sc_repeating = 0;
801 callout_stop(&sc->sc_repeat_ch);
802 }
803
804 error = (*sc->sc_accessops->enable)(sc->sc_accesscookie, on);
805 DPRINTF(("wskbd_enable: sc=%p on=%d res=%d\n", sc, on, error));
806 return (error);
807 }
808
809 #if NWSMUX > 0
810 int
811 wskbd_mux_open(struct wsevsrc *me, struct wseventvar *evp)
812 {
813 struct wskbd_softc *sc = (struct wskbd_softc *)me;
814
815 if (sc->sc_dying)
816 return (EIO);
817
818 if (sc->sc_base.me_evp != NULL)
819 return (EBUSY);
820
821 return (wskbd_do_open(sc, evp));
822 }
823 #endif
824
825 int
826 wskbdopen(dev_t dev, int flags, int mode, struct lwp *l)
827 {
828 struct wskbd_softc *sc = device_lookup_private(&wskbd_cd, minor(dev));
829 struct wseventvar *evar;
830 int error;
831
832 if (sc == NULL)
833 return (ENXIO);
834
835 #if NWSMUX > 0
836 DPRINTF(("wskbdopen: %s mux=%p l=%p\n",
837 device_xname(sc->sc_base.me_dv), sc->sc_base.me_parent, l));
838 #endif
839
840 if (sc->sc_dying)
841 return (EIO);
842
843 if ((flags & (FREAD | FWRITE)) == FWRITE)
844 /* Not opening for read, only ioctl is available. */
845 return (0);
846
847 #if NWSMUX > 0
848 if (sc->sc_base.me_parent != NULL) {
849 /* Grab the keyboard out of the greedy hands of the mux. */
850 DPRINTF(("wskbdopen: detach\n"));
851 wsmux_detach_sc(&sc->sc_base);
852 }
853 #endif
854
855 if (sc->sc_base.me_evp != NULL)
856 return (EBUSY);
857
858 evar = &sc->sc_base.me_evar;
859 wsevent_init(evar, l->l_proc);
860
861 error = wskbd_do_open(sc, evar);
862 if (error) {
863 DPRINTF(("wskbdopen: %s open failed\n",
864 device_xname(sc->sc_base.me_dv)));
865 sc->sc_base.me_evp = NULL;
866 wsevent_fini(evar);
867 }
868 return (error);
869 }
870
871 int
872 wskbd_do_open(struct wskbd_softc *sc, struct wseventvar *evp)
873 {
874 sc->sc_base.me_evp = evp;
875 sc->sc_translating = 0;
876
877 return (wskbd_enable(sc, 1));
878 }
879
880 int
881 wskbdclose(dev_t dev, int flags, int mode,
882 struct lwp *l)
883 {
884 struct wskbd_softc *sc =
885 device_lookup_private(&wskbd_cd, minor(dev));
886 struct wseventvar *evar = sc->sc_base.me_evp;
887
888 if (evar == NULL)
889 /* not open for read */
890 return (0);
891
892 sc->sc_base.me_evp = NULL;
893 sc->sc_translating = 1;
894 (void)wskbd_enable(sc, 0);
895 wsevent_fini(evar);
896
897 return (0);
898 }
899
900 #if NWSMUX > 0
901 int
902 wskbd_mux_close(struct wsevsrc *me)
903 {
904 struct wskbd_softc *sc = (struct wskbd_softc *)me;
905
906 sc->sc_base.me_evp = NULL;
907 sc->sc_translating = 1;
908 (void)wskbd_enable(sc, 0);
909
910 return (0);
911 }
912 #endif
913
914 int
915 wskbdread(dev_t dev, struct uio *uio, int flags)
916 {
917 struct wskbd_softc *sc =
918 device_lookup_private(&wskbd_cd, minor(dev));
919 int error;
920
921 if (sc->sc_dying)
922 return (EIO);
923
924 #ifdef DIAGNOSTIC
925 if (sc->sc_base.me_evp == NULL) {
926 printf("wskbdread: evp == NULL\n");
927 return (EINVAL);
928 }
929 #endif
930
931 sc->sc_refcnt++;
932 error = wsevent_read(sc->sc_base.me_evp, uio, flags);
933 if (--sc->sc_refcnt < 0) {
934 wakeup(sc);
935 error = EIO;
936 }
937 return (error);
938 }
939
940 int
941 wskbdioctl(dev_t dev, u_long cmd, void *data, int flag, struct lwp *l)
942 {
943 return (wskbd_do_ioctl(device_lookup(&wskbd_cd, minor(dev)),
944 cmd, data, flag,l));
945 }
946
947 /* A wrapper around the ioctl() workhorse to make reference counting easy. */
948 int
949 wskbd_do_ioctl(device_t dv, u_long cmd, void *data, int flag,
950 struct lwp *l)
951 {
952 struct wskbd_softc *sc = device_private(dv);
953 int error;
954
955 sc->sc_refcnt++;
956 error = wskbd_do_ioctl_sc(sc, cmd, data, flag, l);
957 if (--sc->sc_refcnt < 0)
958 wakeup(sc);
959 return (error);
960 }
961
962 int
963 wskbd_do_ioctl_sc(struct wskbd_softc *sc, u_long cmd, void *data, int flag,
964 struct lwp *l)
965 {
966
967 /*
968 * Try the generic ioctls that the wskbd interface supports.
969 */
970 switch (cmd) {
971 case FIONBIO: /* we will remove this someday (soon???) */
972 return (0);
973
974 case FIOASYNC:
975 if (sc->sc_base.me_evp == NULL)
976 return (EINVAL);
977 sc->sc_base.me_evp->async = *(int *)data != 0;
978 return (0);
979
980 case FIOSETOWN:
981 if (sc->sc_base.me_evp == NULL)
982 return (EINVAL);
983 if (-*(int *)data != sc->sc_base.me_evp->io->p_pgid
984 && *(int *)data != sc->sc_base.me_evp->io->p_pid)
985 return (EPERM);
986 return (0);
987
988 case TIOCSPGRP:
989 if (sc->sc_base.me_evp == NULL)
990 return (EINVAL);
991 if (*(int *)data != sc->sc_base.me_evp->io->p_pgid)
992 return (EPERM);
993 return (0);
994 }
995
996 /*
997 * Try the keyboard driver for WSKBDIO ioctls. It returns EPASSTHROUGH
998 * if it didn't recognize the request.
999 */
1000 return (wskbd_displayioctl(sc->sc_base.me_dv, cmd, data, flag, l));
1001 }
1002
1003 /*
1004 * WSKBDIO ioctls, handled in both emulation mode and in ``raw'' mode.
1005 * Some of these have no real effect in raw mode, however.
1006 */
1007 static int
1008 wskbd_displayioctl(device_t dev, u_long cmd, void *data, int flag,
1009 struct lwp *l)
1010 {
1011 #ifdef WSDISPLAY_SCROLLSUPPORT
1012 struct wskbd_scroll_data *usdp, *ksdp;
1013 #endif
1014 struct wskbd_softc *sc = device_private(dev);
1015 struct wskbd_bell_data *ubdp, *kbdp;
1016 struct wskbd_keyrepeat_data *ukdp, *kkdp;
1017 struct wskbd_map_data *umdp;
1018 struct wskbd_mapdata md;
1019 struct proc *p = l ? l->l_proc : NULL;
1020 kbd_t enc;
1021 void *tbuf;
1022 int len, error;
1023
1024 switch (cmd) {
1025 #define SETBELL(dstp, srcp, dfltp) \
1026 do { \
1027 (dstp)->pitch = ((srcp)->which & WSKBD_BELL_DOPITCH) ? \
1028 (srcp)->pitch : (dfltp)->pitch; \
1029 (dstp)->period = ((srcp)->which & WSKBD_BELL_DOPERIOD) ? \
1030 (srcp)->period : (dfltp)->period; \
1031 (dstp)->volume = ((srcp)->which & WSKBD_BELL_DOVOLUME) ? \
1032 (srcp)->volume : (dfltp)->volume; \
1033 (dstp)->which = WSKBD_BELL_DOALL; \
1034 } while (0)
1035
1036 case WSKBDIO_BELL:
1037 if ((flag & FWRITE) == 0)
1038 return (EACCES);
1039 return ((*sc->sc_accessops->ioctl)(sc->sc_accesscookie,
1040 WSKBDIO_COMPLEXBELL, (void *)&sc->sc_bell_data, flag, l));
1041
1042 case WSKBDIO_COMPLEXBELL:
1043 if ((flag & FWRITE) == 0)
1044 return (EACCES);
1045 ubdp = (struct wskbd_bell_data *)data;
1046 SETBELL(ubdp, ubdp, &sc->sc_bell_data);
1047 return ((*sc->sc_accessops->ioctl)(sc->sc_accesscookie,
1048 WSKBDIO_COMPLEXBELL, (void *)ubdp, flag, l));
1049
1050 case WSKBDIO_SETBELL:
1051 if ((flag & FWRITE) == 0)
1052 return (EACCES);
1053 kbdp = &sc->sc_bell_data;
1054 setbell:
1055 ubdp = (struct wskbd_bell_data *)data;
1056 SETBELL(kbdp, ubdp, kbdp);
1057 return (0);
1058
1059 case WSKBDIO_GETBELL:
1060 kbdp = &sc->sc_bell_data;
1061 getbell:
1062 ubdp = (struct wskbd_bell_data *)data;
1063 SETBELL(ubdp, kbdp, kbdp);
1064 return (0);
1065
1066 case WSKBDIO_SETDEFAULTBELL:
1067 if (p && (error = kauth_authorize_generic(l->l_cred,
1068 KAUTH_GENERIC_ISSUSER, NULL)) != 0)
1069 return (error);
1070 kbdp = &wskbd_default_bell_data;
1071 goto setbell;
1072
1073
1074 case WSKBDIO_GETDEFAULTBELL:
1075 kbdp = &wskbd_default_bell_data;
1076 goto getbell;
1077
1078 #undef SETBELL
1079
1080 #define SETKEYREPEAT(dstp, srcp, dfltp) \
1081 do { \
1082 (dstp)->del1 = ((srcp)->which & WSKBD_KEYREPEAT_DODEL1) ? \
1083 (srcp)->del1 : (dfltp)->del1; \
1084 (dstp)->delN = ((srcp)->which & WSKBD_KEYREPEAT_DODELN) ? \
1085 (srcp)->delN : (dfltp)->delN; \
1086 (dstp)->which = WSKBD_KEYREPEAT_DOALL; \
1087 } while (0)
1088
1089 case WSKBDIO_SETKEYREPEAT:
1090 if ((flag & FWRITE) == 0)
1091 return (EACCES);
1092 kkdp = &sc->sc_keyrepeat_data;
1093 setkeyrepeat:
1094 ukdp = (struct wskbd_keyrepeat_data *)data;
1095 SETKEYREPEAT(kkdp, ukdp, kkdp);
1096 return (0);
1097
1098 case WSKBDIO_GETKEYREPEAT:
1099 kkdp = &sc->sc_keyrepeat_data;
1100 getkeyrepeat:
1101 ukdp = (struct wskbd_keyrepeat_data *)data;
1102 SETKEYREPEAT(ukdp, kkdp, kkdp);
1103 return (0);
1104
1105 case WSKBDIO_SETDEFAULTKEYREPEAT:
1106 if ((error = kauth_authorize_generic(l->l_cred,
1107 KAUTH_GENERIC_ISSUSER, NULL)) != 0)
1108 return (error);
1109 kkdp = &wskbd_default_keyrepeat_data;
1110 goto setkeyrepeat;
1111
1112
1113 case WSKBDIO_GETDEFAULTKEYREPEAT:
1114 kkdp = &wskbd_default_keyrepeat_data;
1115 goto getkeyrepeat;
1116
1117 #ifdef WSDISPLAY_SCROLLSUPPORT
1118 #define SETSCROLLMOD(dstp, srcp, dfltp) \
1119 do { \
1120 (dstp)->mode = ((srcp)->which & WSKBD_SCROLL_DOMODE) ? \
1121 (srcp)->mode : (dfltp)->mode; \
1122 (dstp)->modifier = ((srcp)->which & WSKBD_SCROLL_DOMODIFIER) ? \
1123 (srcp)->modifier : (dfltp)->modifier; \
1124 (dstp)->which = WSKBD_SCROLL_DOALL; \
1125 } while (0)
1126
1127 case WSKBDIO_SETSCROLL:
1128 usdp = (struct wskbd_scroll_data *)data;
1129 ksdp = &sc->sc_scroll_data;
1130 SETSCROLLMOD(ksdp, usdp, ksdp);
1131 return (0);
1132
1133 case WSKBDIO_GETSCROLL:
1134 usdp = (struct wskbd_scroll_data *)data;
1135 ksdp = &sc->sc_scroll_data;
1136 SETSCROLLMOD(usdp, ksdp, ksdp);
1137 return (0);
1138 #else
1139 case WSKBDIO_GETSCROLL:
1140 case WSKBDIO_SETSCROLL:
1141 return ENODEV;
1142 #endif
1143
1144 #undef SETKEYREPEAT
1145
1146 case WSKBDIO_SETMAP:
1147 if ((flag & FWRITE) == 0)
1148 return (EACCES);
1149 umdp = (struct wskbd_map_data *)data;
1150 if (umdp->maplen > WSKBDIO_MAXMAPLEN)
1151 return (EINVAL);
1152
1153 len = umdp->maplen*sizeof(struct wscons_keymap);
1154 tbuf = malloc(len, M_TEMP, M_WAITOK);
1155 error = copyin(umdp->map, tbuf, len);
1156 if (error == 0) {
1157 wskbd_init_keymap(umdp->maplen,
1158 &sc->sc_map, &sc->sc_maplen);
1159 memcpy(sc->sc_map, tbuf, len);
1160 /* drop the variant bits handled by the map */
1161 sc->sc_layout = KB_USER |
1162 (KB_VARIANT(sc->sc_layout) & KB_HANDLEDBYWSKBD);
1163 wskbd_update_layout(sc->id, sc->sc_layout);
1164 }
1165 free(tbuf, M_TEMP);
1166 return(error);
1167
1168 case WSKBDIO_GETMAP:
1169 umdp = (struct wskbd_map_data *)data;
1170 if (umdp->maplen > sc->sc_maplen)
1171 umdp->maplen = sc->sc_maplen;
1172 error = copyout(sc->sc_map, umdp->map,
1173 umdp->maplen*sizeof(struct wscons_keymap));
1174 return(error);
1175
1176 case WSKBDIO_GETENCODING:
1177 *((kbd_t *) data) = sc->sc_layout;
1178 return(0);
1179
1180 case WSKBDIO_SETENCODING:
1181 if ((flag & FWRITE) == 0)
1182 return (EACCES);
1183 enc = *((kbd_t *)data);
1184 if (KB_ENCODING(enc) == KB_USER) {
1185 /* user map must already be loaded */
1186 if (KB_ENCODING(sc->sc_layout) != KB_USER)
1187 return (EINVAL);
1188 /* map variants make no sense */
1189 if (KB_VARIANT(enc) & ~KB_HANDLEDBYWSKBD)
1190 return (EINVAL);
1191 } else {
1192 md = *(sc->id->t_keymap); /* structure assignment */
1193 md.layout = enc;
1194 error = wskbd_load_keymap(&md, &sc->sc_map,
1195 &sc->sc_maplen);
1196 if (error)
1197 return (error);
1198 }
1199 sc->sc_layout = enc;
1200 wskbd_update_layout(sc->id, enc);
1201 return (0);
1202 }
1203
1204 /*
1205 * Try the keyboard driver for WSKBDIO ioctls. It returns -1
1206 * if it didn't recognize the request, and in turn we return
1207 * -1 if we didn't recognize the request.
1208 */
1209 /* printf("kbdaccess\n"); */
1210 error = (*sc->sc_accessops->ioctl)(sc->sc_accesscookie, cmd, data,
1211 flag, l);
1212 #ifdef WSDISPLAY_COMPAT_RAWKBD
1213 if (!error && cmd == WSKBDIO_SETMODE && *(int *)data == WSKBD_RAW) {
1214 int s = spltty();
1215 sc->id->t_modifiers &= ~(MOD_SHIFT_L | MOD_SHIFT_R
1216 | MOD_CONTROL_L | MOD_CONTROL_R
1217 | MOD_META_L | MOD_META_R
1218 | MOD_COMMAND
1219 | MOD_COMMAND1 | MOD_COMMAND2);
1220 if (sc->sc_repeating) {
1221 sc->sc_repeating = 0;
1222 callout_stop(&sc->sc_repeat_ch);
1223 }
1224 splx(s);
1225 }
1226 #endif
1227 return (error);
1228 }
1229
1230 int
1231 wskbdpoll(dev_t dev, int events, struct lwp *l)
1232 {
1233 struct wskbd_softc *sc =
1234 device_lookup_private(&wskbd_cd, minor(dev));
1235
1236 if (sc->sc_base.me_evp == NULL)
1237 return (POLLERR);
1238 return (wsevent_poll(sc->sc_base.me_evp, events, l));
1239 }
1240
1241 int
1242 wskbdkqfilter(dev_t dev, struct knote *kn)
1243 {
1244 struct wskbd_softc *sc =
1245 device_lookup_private(&wskbd_cd, minor(dev));
1246
1247 if (sc->sc_base.me_evp == NULL)
1248 return (1);
1249 return (wsevent_kqfilter(sc->sc_base.me_evp, kn));
1250 }
1251
1252 #if NWSDISPLAY > 0
1253
1254 int
1255 wskbd_pickfree(void)
1256 {
1257 int i;
1258 struct wskbd_softc *sc;
1259
1260 for (i = 0; i < wskbd_cd.cd_ndevs; i++) {
1261 if ((sc = device_private(wskbd_cd.cd_devs[i])) == NULL)
1262 continue;
1263 if (sc->sc_base.me_dispdv == NULL)
1264 return (i);
1265 }
1266 return (-1);
1267 }
1268
1269 struct wsevsrc *
1270 wskbd_set_console_display(device_t displaydv, struct wsevsrc *me)
1271 {
1272 struct wskbd_softc *sc = wskbd_console_device;
1273
1274 if (sc == NULL)
1275 return (NULL);
1276 sc->sc_base.me_dispdv = displaydv;
1277 #if NWSMUX > 0
1278 (void)wsmux_attach_sc((struct wsmux_softc *)me, &sc->sc_base);
1279 #endif
1280 return (&sc->sc_base);
1281 }
1282
1283 int
1284 wskbd_set_display(device_t dv, struct wsevsrc *me)
1285 {
1286 struct wskbd_softc *sc = device_private(dv);
1287 device_t displaydv = me != NULL ? me->me_dispdv : NULL;
1288 device_t odisplaydv;
1289 int error;
1290
1291 DPRINTF(("wskbd_set_display: %s me=%p odisp=%p disp=%p cons=%d\n",
1292 device_xname(dv), me, sc->sc_base.me_dispdv, displaydv,
1293 sc->sc_isconsole));
1294
1295 if (sc->sc_isconsole)
1296 return (EBUSY);
1297
1298 if (displaydv != NULL) {
1299 if (sc->sc_base.me_dispdv != NULL)
1300 return (EBUSY);
1301 } else {
1302 if (sc->sc_base.me_dispdv == NULL)
1303 return (ENXIO);
1304 }
1305
1306 odisplaydv = sc->sc_base.me_dispdv;
1307 sc->sc_base.me_dispdv = NULL;
1308 error = wskbd_enable(sc, displaydv != NULL);
1309 sc->sc_base.me_dispdv = displaydv;
1310 if (error) {
1311 sc->sc_base.me_dispdv = odisplaydv;
1312 return (error);
1313 }
1314
1315 if (displaydv)
1316 aprint_verbose_dev(sc->sc_base.me_dv, "connecting to %s\n",
1317 device_xname(displaydv));
1318 else
1319 aprint_verbose_dev(sc->sc_base.me_dv, "disconnecting from %s\n",
1320 device_xname(odisplaydv));
1321
1322 return (0);
1323 }
1324
1325 #endif /* NWSDISPLAY > 0 */
1326
1327 #if NWSMUX > 0
1328 int
1329 wskbd_add_mux(int unit, struct wsmux_softc *muxsc)
1330 {
1331 struct wskbd_softc *sc = device_lookup_private(&wskbd_cd, unit);
1332
1333 if (sc == NULL)
1334 return (ENXIO);
1335
1336 if (sc->sc_base.me_parent != NULL || sc->sc_base.me_evp != NULL)
1337 return (EBUSY);
1338
1339 return (wsmux_attach_sc(muxsc, &sc->sc_base));
1340 }
1341 #endif
1342
1343 /*
1344 * Console interface.
1345 */
1346 int
1347 wskbd_cngetc(dev_t dev)
1348 {
1349 static int num = 0;
1350 static int pos;
1351 u_int type;
1352 int data;
1353 keysym_t ks;
1354
1355 if (!wskbd_console_initted)
1356 return 0;
1357
1358 if (wskbd_console_device != NULL &&
1359 !wskbd_console_device->sc_translating)
1360 return 0;
1361
1362 for(;;) {
1363 if (num-- > 0) {
1364 ks = wskbd_console_data.t_symbols[pos++];
1365 if (KS_GROUP(ks) == KS_GROUP_Ascii)
1366 return (KS_VALUE(ks));
1367 } else {
1368 (*wskbd_console_data.t_consops->getc)
1369 (wskbd_console_data.t_consaccesscookie,
1370 &type, &data);
1371 if (type == WSCONS_EVENT_ASCII) {
1372 /*
1373 * We assume that when the driver falls back
1374 * to deliver pure ASCII it is in a state that
1375 * it can not track press/release events
1376 * reliable - so we clear all previously
1377 * accumulated modifier state.
1378 */
1379 wskbd_console_data.t_modifiers = 0;
1380 return(data);
1381 }
1382 num = wskbd_translate(&wskbd_console_data, type, data);
1383 pos = 0;
1384 }
1385 }
1386 }
1387
1388 void
1389 wskbd_cnpollc(dev_t dev, int poll)
1390 {
1391
1392 if (!wskbd_console_initted)
1393 return;
1394
1395 if (wskbd_console_device != NULL &&
1396 !wskbd_console_device->sc_translating)
1397 return;
1398
1399 (*wskbd_console_data.t_consops->pollc)
1400 (wskbd_console_data.t_consaccesscookie, poll);
1401 }
1402
1403 void
1404 wskbd_cnbell(dev_t dev, u_int pitch, u_int period, u_int volume)
1405 {
1406
1407 if (!wskbd_console_initted)
1408 return;
1409
1410 if (wskbd_console_data.t_consops->bell != NULL)
1411 (*wskbd_console_data.t_consops->bell)
1412 (wskbd_console_data.t_consaccesscookie, pitch, period,
1413 volume);
1414 }
1415
1416 static inline void
1417 update_leds(struct wskbd_internal *id)
1418 {
1419 int new_state;
1420
1421 new_state = 0;
1422 if (id->t_modifiers & (MOD_SHIFTLOCK | MOD_CAPSLOCK))
1423 new_state |= WSKBD_LED_CAPS;
1424 if (id->t_modifiers & MOD_NUMLOCK)
1425 new_state |= WSKBD_LED_NUM;
1426 if (id->t_modifiers & MOD_COMPOSE)
1427 new_state |= WSKBD_LED_COMPOSE;
1428 if (id->t_modifiers & MOD_HOLDSCREEN)
1429 new_state |= WSKBD_LED_SCROLL;
1430
1431 if (id->t_sc && new_state != id->t_sc->sc_ledstate) {
1432 (*id->t_sc->sc_accessops->set_leds)
1433 (id->t_sc->sc_accesscookie, new_state);
1434 id->t_sc->sc_ledstate = new_state;
1435 }
1436 }
1437
1438 static inline void
1439 update_modifier(struct wskbd_internal *id, u_int type, int toggle, int mask)
1440 {
1441 if (toggle) {
1442 if (type == WSCONS_EVENT_KEY_DOWN)
1443 id->t_modifiers ^= mask;
1444 } else {
1445 if (type == WSCONS_EVENT_KEY_DOWN)
1446 id->t_modifiers |= mask;
1447 else
1448 id->t_modifiers &= ~mask;
1449 }
1450 }
1451
1452 #if NWSDISPLAY > 0
1453 static void
1454 change_displayparam(struct wskbd_softc *sc, int param, int updown,
1455 int wraparound)
1456 {
1457 int res;
1458 struct wsdisplay_param dp;
1459
1460 dp.param = param;
1461 res = wsdisplay_param(sc->sc_base.me_dispdv, WSDISPLAYIO_GETPARAM, &dp);
1462
1463 if (res == EINVAL)
1464 return; /* no such parameter */
1465
1466 dp.curval += updown;
1467 if (dp.max < dp.curval)
1468 dp.curval = wraparound ? dp.min : dp.max;
1469 else
1470 if (dp.curval < dp.min)
1471 dp.curval = wraparound ? dp.max : dp.min;
1472 wsdisplay_param(sc->sc_base.me_dispdv, WSDISPLAYIO_SETPARAM, &dp);
1473 }
1474 #endif
1475
1476 static int
1477 internal_command(struct wskbd_softc *sc, u_int *type, keysym_t ksym,
1478 keysym_t ksym2)
1479 {
1480 #ifdef WSDISPLAY_SCROLLSUPPORT
1481 u_int state = 0;
1482 #endif
1483 switch (ksym) {
1484 case KS_Cmd_VolumeToggle:
1485 if (*type == WSCONS_EVENT_KEY_DOWN)
1486 pmf_event_inject(NULL, PMFE_AUDIO_VOLUME_TOGGLE);
1487 break;
1488 case KS_Cmd_VolumeUp:
1489 if (*type == WSCONS_EVENT_KEY_DOWN)
1490 pmf_event_inject(NULL, PMFE_AUDIO_VOLUME_UP);
1491 break;
1492 case KS_Cmd_VolumeDown:
1493 if (*type == WSCONS_EVENT_KEY_DOWN)
1494 pmf_event_inject(NULL, PMFE_AUDIO_VOLUME_DOWN);
1495 break;
1496 #ifdef WSDISPLAY_SCROLLSUPPORT
1497 case KS_Cmd_ScrollFastUp:
1498 case KS_Cmd_ScrollFastDown:
1499 if (*type == WSCONS_EVENT_KEY_DOWN) {
1500 GETMODSTATE(sc->id->t_modifiers, state);
1501 if ((sc->sc_scroll_data.mode == WSKBD_SCROLL_MODE_HOLD
1502 && MOD_ONESET(sc->id, MOD_HOLDSCREEN))
1503 || (sc->sc_scroll_data.mode == WSKBD_SCROLL_MODE_NORMAL
1504 && sc->sc_scroll_data.modifier == state)) {
1505 update_modifier(sc->id, *type, 0, MOD_COMMAND);
1506 wsdisplay_scroll(sc->sc_base.me_dispdv,
1507 (ksym == KS_Cmd_ScrollFastUp) ?
1508 WSDISPLAY_SCROLL_BACKWARD :
1509 WSDISPLAY_SCROLL_FORWARD);
1510 return (1);
1511 } else {
1512 return (0);
1513 }
1514 }
1515
1516 case KS_Cmd_ScrollSlowUp:
1517 case KS_Cmd_ScrollSlowDown:
1518 if (*type == WSCONS_EVENT_KEY_DOWN) {
1519 GETMODSTATE(sc->id->t_modifiers, state);
1520 if ((sc->sc_scroll_data.mode == WSKBD_SCROLL_MODE_HOLD
1521 && MOD_ONESET(sc->id, MOD_HOLDSCREEN))
1522 || (sc->sc_scroll_data.mode == WSKBD_SCROLL_MODE_NORMAL
1523 && sc->sc_scroll_data.modifier == state)) {
1524 update_modifier(sc->id, *type, 0, MOD_COMMAND);
1525 wsdisplay_scroll(sc->sc_base.me_dispdv,
1526 (ksym == KS_Cmd_ScrollSlowUp) ?
1527 WSDISPLAY_SCROLL_BACKWARD | WSDISPLAY_SCROLL_LOW:
1528 WSDISPLAY_SCROLL_FORWARD | WSDISPLAY_SCROLL_LOW);
1529 return (1);
1530 } else {
1531 return (0);
1532 }
1533 }
1534 #endif
1535
1536 case KS_Cmd:
1537 update_modifier(sc->id, *type, 0, MOD_COMMAND);
1538 ksym = ksym2;
1539 break;
1540
1541 case KS_Cmd1:
1542 update_modifier(sc->id, *type, 0, MOD_COMMAND1);
1543 break;
1544
1545 case KS_Cmd2:
1546 update_modifier(sc->id, *type, 0, MOD_COMMAND2);
1547 break;
1548 }
1549
1550 if (*type != WSCONS_EVENT_KEY_DOWN ||
1551 (! MOD_ONESET(sc->id, MOD_COMMAND) &&
1552 ! MOD_ALLSET(sc->id, MOD_COMMAND1 | MOD_COMMAND2)))
1553 return (0);
1554
1555 #if defined(DDB) || defined(KGDB)
1556 if (ksym == KS_Cmd_Debugger) {
1557 if (sc->sc_isconsole) {
1558 #ifdef DDB
1559 console_debugger();
1560 #endif
1561 #ifdef KGDB
1562 kgdb_connect(1);
1563 #endif
1564 }
1565 /* discard this key (ddb discarded command modifiers) */
1566 *type = WSCONS_EVENT_KEY_UP;
1567 return (1);
1568 }
1569 #endif
1570
1571 #if NWSDISPLAY > 0
1572 if (sc->sc_base.me_dispdv == NULL)
1573 return (0);
1574
1575 switch (ksym) {
1576 case KS_Cmd_Screen0:
1577 case KS_Cmd_Screen1:
1578 case KS_Cmd_Screen2:
1579 case KS_Cmd_Screen3:
1580 case KS_Cmd_Screen4:
1581 case KS_Cmd_Screen5:
1582 case KS_Cmd_Screen6:
1583 case KS_Cmd_Screen7:
1584 case KS_Cmd_Screen8:
1585 case KS_Cmd_Screen9:
1586 wsdisplay_switch(sc->sc_base.me_dispdv, ksym - KS_Cmd_Screen0, 0);
1587 return (1);
1588 case KS_Cmd_ResetEmul:
1589 wsdisplay_reset(sc->sc_base.me_dispdv, WSDISPLAY_RESETEMUL);
1590 return (1);
1591 case KS_Cmd_ResetClose:
1592 wsdisplay_reset(sc->sc_base.me_dispdv, WSDISPLAY_RESETCLOSE);
1593 return (1);
1594 case KS_Cmd_BacklightOn:
1595 case KS_Cmd_BacklightOff:
1596 case KS_Cmd_BacklightToggle:
1597 change_displayparam(sc, WSDISPLAYIO_PARAM_BACKLIGHT,
1598 ksym == KS_Cmd_BacklightOff ? -1 : 1,
1599 ksym == KS_Cmd_BacklightToggle ? 1 : 0);
1600 return (1);
1601 case KS_Cmd_BrightnessUp:
1602 case KS_Cmd_BrightnessDown:
1603 case KS_Cmd_BrightnessRotate:
1604 change_displayparam(sc, WSDISPLAYIO_PARAM_BRIGHTNESS,
1605 ksym == KS_Cmd_BrightnessDown ? -1 : 1,
1606 ksym == KS_Cmd_BrightnessRotate ? 1 : 0);
1607 return (1);
1608 case KS_Cmd_ContrastUp:
1609 case KS_Cmd_ContrastDown:
1610 case KS_Cmd_ContrastRotate:
1611 change_displayparam(sc, WSDISPLAYIO_PARAM_CONTRAST,
1612 ksym == KS_Cmd_ContrastDown ? -1 : 1,
1613 ksym == KS_Cmd_ContrastRotate ? 1 : 0);
1614 return (1);
1615 }
1616 #endif
1617
1618 return (0);
1619 }
1620
1621 device_t
1622 wskbd_hotkey_register(device_t self, void *cookie, wskbd_hotkey_plugin *hotkey)
1623 {
1624 struct wskbd_softc *sc = device_private(self);
1625
1626 sc->sc_hotkey = hotkey;
1627 sc->sc_hotkeycookie = cookie;
1628 return sc->sc_base.me_dv;
1629 }
1630
1631 static int
1632 wskbd_translate(struct wskbd_internal *id, u_int type, int value)
1633 {
1634 struct wskbd_softc *sc = id->t_sc;
1635 keysym_t ksym, res, *group;
1636 struct wscons_keymap kpbuf, *kp;
1637 int iscommand = 0;
1638 int ishotkey = 0;
1639
1640 if (type == WSCONS_EVENT_ALL_KEYS_UP) {
1641 id->t_modifiers &= ~(MOD_SHIFT_L | MOD_SHIFT_R
1642 | MOD_CONTROL_L | MOD_CONTROL_R
1643 | MOD_META_L | MOD_META_R
1644 | MOD_MODESHIFT
1645 | MOD_COMMAND | MOD_COMMAND1 | MOD_COMMAND2);
1646 update_leds(id);
1647 return (0);
1648 }
1649
1650 if (sc != NULL) {
1651 if (sc->sc_hotkey != NULL)
1652 ishotkey = sc->sc_hotkey(sc, sc->sc_hotkeycookie,
1653 type, value);
1654 if (ishotkey)
1655 return 0;
1656
1657 if (value < 0 || value >= sc->sc_maplen) {
1658 #ifdef DEBUG
1659 printf("%s: keycode %d out of range\n",
1660 __func__, value);
1661 #endif
1662 return (0);
1663 }
1664 kp = sc->sc_map + value;
1665 } else {
1666 kp = &kpbuf;
1667 wskbd_get_mapentry(id->t_keymap, value, kp);
1668 }
1669
1670 /* if this key has a command, process it first */
1671 if (sc != NULL && kp->command != KS_voidSymbol)
1672 iscommand = internal_command(sc, &type, kp->command,
1673 kp->group1[0]);
1674
1675 /* Now update modifiers */
1676 switch (kp->group1[0]) {
1677 case KS_Shift_L:
1678 update_modifier(id, type, 0, MOD_SHIFT_L);
1679 break;
1680
1681 case KS_Shift_R:
1682 update_modifier(id, type, 0, MOD_SHIFT_R);
1683 break;
1684
1685 case KS_Shift_Lock:
1686 update_modifier(id, type, 1, MOD_SHIFTLOCK);
1687 break;
1688
1689 case KS_Caps_Lock:
1690 update_modifier(id, type, 1, MOD_CAPSLOCK);
1691 break;
1692
1693 case KS_Control_L:
1694 update_modifier(id, type, 0, MOD_CONTROL_L);
1695 break;
1696
1697 case KS_Control_R:
1698 update_modifier(id, type, 0, MOD_CONTROL_R);
1699 break;
1700
1701 case KS_Alt_L:
1702 update_modifier(id, type, 0, MOD_META_L);
1703 break;
1704
1705 case KS_Alt_R:
1706 update_modifier(id, type, 0, MOD_META_R);
1707 break;
1708
1709 case KS_Mode_switch:
1710 update_modifier(id, type, 0, MOD_MODESHIFT);
1711 break;
1712
1713 case KS_Num_Lock:
1714 update_modifier(id, type, 1, MOD_NUMLOCK);
1715 break;
1716
1717 #if NWSDISPLAY > 0
1718 case KS_Hold_Screen:
1719 if (sc != NULL) {
1720 update_modifier(id, type, 1, MOD_HOLDSCREEN);
1721 wskbd_holdscreen(sc, id->t_modifiers & MOD_HOLDSCREEN);
1722 }
1723 break;
1724 #endif
1725 }
1726
1727 /* If this is a key release or we are in command mode, we are done */
1728 if (type != WSCONS_EVENT_KEY_DOWN || iscommand) {
1729 update_leds(id);
1730 return (0);
1731 }
1732
1733 /* Get the keysym */
1734 if (id->t_modifiers & MOD_MODESHIFT)
1735 group = & kp->group2[0];
1736 else
1737 group = & kp->group1[0];
1738
1739 if ((id->t_modifiers & MOD_NUMLOCK) != 0 &&
1740 KS_GROUP(group[1]) == KS_GROUP_Keypad) {
1741 if (MOD_ONESET(id, MOD_ANYSHIFT))
1742 ksym = group[0];
1743 else
1744 ksym = group[1];
1745 } else if (! MOD_ONESET(id, MOD_ANYSHIFT | MOD_CAPSLOCK)) {
1746 ksym = group[0];
1747 } else if (MOD_ONESET(id, MOD_CAPSLOCK)) {
1748 if (! MOD_ONESET(id, MOD_SHIFT_L | MOD_SHIFT_R))
1749 ksym = group[0];
1750 else
1751 ksym = group[1];
1752 if (ksym >= KS_a && ksym <= KS_z)
1753 ksym += KS_A - KS_a;
1754 else if (ksym >= KS_agrave && ksym <= KS_thorn &&
1755 ksym != KS_division)
1756 ksym += KS_Agrave - KS_agrave;
1757 } else if (MOD_ONESET(id, MOD_ANYSHIFT)) {
1758 ksym = group[1];
1759 } else {
1760 ksym = group[0];
1761 }
1762
1763 /* Process compose sequence and dead accents */
1764 res = KS_voidSymbol;
1765
1766 switch (KS_GROUP(ksym)) {
1767 case KS_GROUP_Ascii:
1768 case KS_GROUP_Keypad:
1769 case KS_GROUP_Function:
1770 res = ksym;
1771 break;
1772
1773 case KS_GROUP_Mod:
1774 if (ksym == KS_Multi_key) {
1775 update_modifier(id, 1, 0, MOD_COMPOSE);
1776 id->t_composelen = 2;
1777 }
1778 break;
1779
1780 case KS_GROUP_Dead:
1781 if (id->t_composelen == 0) {
1782 update_modifier(id, 1, 0, MOD_COMPOSE);
1783 id->t_composelen = 1;
1784 id->t_composebuf[0] = ksym;
1785 } else
1786 res = ksym;
1787 break;
1788 }
1789
1790 if (res == KS_voidSymbol) {
1791 update_leds(id);
1792 return (0);
1793 }
1794
1795 if (id->t_composelen > 0) {
1796 id->t_composebuf[2 - id->t_composelen] = res;
1797 if (--id->t_composelen == 0) {
1798 res = wskbd_compose_value(id->t_composebuf);
1799 update_modifier(id, 0, 0, MOD_COMPOSE);
1800 } else {
1801 return (0);
1802 }
1803 }
1804
1805 update_leds(id);
1806
1807 /* We are done, return the symbol */
1808 if (KS_GROUP(res) == KS_GROUP_Ascii) {
1809 if (MOD_ONESET(id, MOD_ANYCONTROL)) {
1810 if ((res >= KS_at && res <= KS_z) || res == KS_space)
1811 res = res & 0x1f;
1812 else if (res == KS_2)
1813 res = 0x00;
1814 else if (res >= KS_3 && res <= KS_7)
1815 res = KS_Escape + (res - KS_3);
1816 else if (res == KS_8)
1817 res = KS_Delete;
1818 }
1819 if (MOD_ONESET(id, MOD_ANYMETA)) {
1820 if (id->t_flags & WSKFL_METAESC) {
1821 id->t_symbols[0] = KS_Escape;
1822 id->t_symbols[1] = res;
1823 return (2);
1824 } else
1825 res |= 0x80;
1826 }
1827 }
1828
1829 id->t_symbols[0] = res;
1830 return (1);
1831 }
1832