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