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