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