atkbd.c revision 44628
1/*-
2 * Copyright (c) 1999 Kazutaka YOKOTA <yokota@zodiac.mech.utsunomiya-u.ac.jp>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer as
10 *    the first lines of this file unmodified.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 *    notice, this list of conditions and the following disclaimer in the
13 *    documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25 *
26 * $Id: atkbd.c,v 1.4 1999/01/28 10:55:55 yokota Exp $
27 */
28
29#include "atkbd.h"
30#include "opt_kbd.h"
31#include "opt_atkbd.h"
32#include "opt_devfs.h"
33
34#if NATKBD > 0
35
36#include <sys/param.h>
37#include <sys/systm.h>
38#include <sys/kernel.h>
39#include <sys/conf.h>
40#include <sys/proc.h>
41#include <sys/tty.h>
42#include <sys/fcntl.h>
43#include <sys/malloc.h>
44
45#include <dev/kbd/kbdreg.h>
46#include <dev/kbd/atkbdreg.h>
47#include <dev/kbd/atkbdcreg.h>
48
49#ifndef __i386__
50
51#include <sys/bus.h>
52#include <isa/isareg.h>
53
54extern devclass_t atkbd_devclass;
55
56#define ATKBD_SOFTC(unit)		\
57	((atkbd_softc_t *)devclass_get_softc(atkbd_devclass, unit))
58
59#else /* __i386__ */
60
61#include <i386/isa/isa.h>
62#include <i386/isa/isa_device.h>
63
64extern struct isa_driver 	atkbddriver;	/* XXX: a kludge; see below */
65
66static atkbd_softc_t		*atkbd_softc[NATKBD];
67
68#define ATKBD_SOFTC(unit)		\
69	(((unit) >= NATKBD) ? NULL : atkbd_softc[(unit)])
70
71#endif /* __i386__ */
72
73static timeout_t	atkbd_timeout;
74
75#ifdef KBD_INSTALL_CDEV
76
77static d_open_t		atkbdopen;
78static d_close_t	atkbdclose;
79static d_read_t		atkbdread;
80static d_ioctl_t	atkbdioctl;
81static d_poll_t		atkbdpoll;
82
83static struct  cdevsw atkbd_cdevsw = {
84	atkbdopen,	atkbdclose,	atkbdread,	nowrite,
85	atkbdioctl,	nostop,		nullreset,	nodevtotty,
86	atkbdpoll,	nommap,		NULL,		ATKBD_DRIVER_NAME,
87	NULL,		-1,
88};
89
90#endif /* KBD_INSTALL_CDEV */
91
92#ifdef __i386__
93
94atkbd_softc_t
95*atkbd_get_softc(int unit)
96{
97	atkbd_softc_t *sc;
98
99	if (unit >= sizeof(atkbd_softc)/sizeof(atkbd_softc[0]))
100		return NULL;
101	sc = atkbd_softc[unit];
102	if (sc == NULL) {
103		sc = atkbd_softc[unit]
104		   = malloc(sizeof(*sc), M_DEVBUF, M_NOWAIT);
105		if (sc == NULL)
106			return NULL;
107		bzero(sc, sizeof(*sc));
108	}
109	return sc;
110}
111
112#endif /* __i386__ */
113
114int
115atkbd_probe_unit(int unit, int port, int irq, int flags)
116{
117	keyboard_switch_t *sw;
118	int args[2];
119	int error;
120
121	sw = kbd_get_switch(ATKBD_DRIVER_NAME);
122	if (sw == NULL)
123		return ENXIO;
124
125	args[0] = port;
126	args[1] = irq;
127	error = (*sw->probe)(unit, args, flags);
128	if (error)
129		return error;
130	return 0;
131}
132
133int
134atkbd_attach_unit(int unit, atkbd_softc_t *sc, int port, int irq, int flags)
135{
136	keyboard_switch_t *sw;
137	int args[2];
138	int error;
139
140	if (sc->flags & ATKBD_ATTACHED)
141		return 0;
142
143	sw = kbd_get_switch(ATKBD_DRIVER_NAME);
144	if (sw == NULL)
145		return ENXIO;
146
147	/* reset, initialize and enable the device */
148	args[0] = port;
149	args[1] = irq;
150	sc->kbd = NULL;
151	error = (*sw->probe)(unit, args, flags);
152	if (error)
153		return error;
154	error = (*sw->init)(unit, &sc->kbd, args, flags);
155	if (error)
156		return error;
157	(*sw->enable)(sc->kbd);
158
159#ifdef KBD_INSTALL_CDEV
160	/* attach a virtual keyboard cdev */
161	error = kbd_attach(makedev(0, ATKBD_MKMINOR(unit)), sc->kbd,
162			   &atkbd_cdevsw);
163	if (error)
164		return error;
165#endif
166
167	/*
168	 * This is a kludge to compensate for lost keyboard interrupts.
169	 * A similar code used to be in syscons. See below. XXX
170	 */
171	atkbd_timeout(sc->kbd);
172
173	if (bootverbose)
174		(*sw->diag)(sc->kbd, bootverbose);
175
176	sc->flags |= ATKBD_ATTACHED;
177	return 0;
178}
179
180static void
181atkbd_timeout(void *arg)
182{
183	keyboard_t *kbd;
184	int s;
185
186	/* The following comments are extracted from syscons.c (1.287) */
187	/*
188	 * With release 2.1 of the Xaccel server, the keyboard is left
189	 * hanging pretty often. Apparently an interrupt from the
190	 * keyboard is lost, and I don't know why (yet).
191	 * This ugly hack calls scintr if input is ready for the keyboard
192	 * and conveniently hides the problem.			XXX
193	 */
194	/*
195	 * Try removing anything stuck in the keyboard controller; whether
196	 * it's a keyboard scan code or mouse data. `scintr()' doesn't
197	 * read the mouse data directly, but `kbdio' routines will, as a
198	 * side effect.
199	 */
200	s = spltty();
201	kbd = (keyboard_t *)arg;
202	if ((*kbdsw[kbd->kb_index]->lock)(kbd, TRUE)) {
203		/*
204		 * We have seen the lock flag is not set. Let's reset
205		 * the flag early, otherwise the LED update routine fails
206		 * which may want the lock during the interrupt routine.
207		 */
208		(*kbdsw[kbd->kb_index]->lock)(kbd, FALSE);
209		if ((*kbdsw[kbd->kb_index]->check_char)(kbd))
210			(*kbdsw[kbd->kb_index]->intr)(kbd, NULL);
211	}
212	splx(s);
213	timeout(atkbd_timeout, arg, hz/10);
214}
215
216/* cdev driver functions */
217
218#ifdef KBD_INSTALL_CDEV
219
220static int
221atkbdopen(dev_t dev, int flag, int mode, struct proc *p)
222{
223	atkbd_softc_t *sc;
224
225	sc = ATKBD_SOFTC(ATKBD_UNIT(dev));
226	if (sc == NULL)
227		return ENXIO;
228	if (mode & (FWRITE | O_CREAT | O_APPEND | O_TRUNC))
229		return ENODEV;
230
231	/* FIXME: set the initial input mode (K_XLATE?) and lock state? */
232	return genkbdopen(&sc->gensc, sc->kbd, flag, mode, p);
233}
234
235static int
236atkbdclose(dev_t dev, int flag, int mode, struct proc *p)
237{
238	atkbd_softc_t *sc;
239
240	sc = ATKBD_SOFTC(ATKBD_UNIT(dev));
241	return genkbdclose(&sc->gensc, sc->kbd, flag, mode, p);
242}
243
244static int
245atkbdread(dev_t dev, struct uio *uio, int flag)
246{
247	atkbd_softc_t *sc;
248
249	sc = ATKBD_SOFTC(ATKBD_UNIT(dev));
250	return genkbdread(&sc->gensc, sc->kbd, uio, flag);
251}
252
253static int
254atkbdioctl(dev_t dev, u_long cmd, caddr_t arg, int flag, struct proc *p)
255{
256	atkbd_softc_t *sc;
257
258	sc = ATKBD_SOFTC(ATKBD_UNIT(dev));
259	return genkbdioctl(&sc->gensc, sc->kbd, cmd, arg, flag, p);
260}
261
262static int
263atkbdpoll(dev_t dev, int event, struct proc *p)
264{
265	atkbd_softc_t *sc;
266
267	sc = ATKBD_SOFTC(ATKBD_UNIT(dev));
268	return genkbdpoll(&sc->gensc, sc->kbd, event, p);
269}
270
271#endif /* KBD_INSTALL_CDEV */
272
273/* LOW-LEVEL */
274
275#include <machine/limits.h>
276#include <machine/console.h>
277#include <machine/clock.h>
278
279#define ATKBD_DEFAULT	0
280
281typedef struct atkbd_state {
282	KBDC		kbdc;		/* keyboard controller */
283					/* XXX: don't move this field; pcvt
284					 * expects `kbdc' to be the first
285					 * field in this structure. */
286	int		ks_mode;	/* input mode (K_XLATE,K_RAW,K_CODE) */
287	int		ks_flags;	/* flags */
288#define COMPOSE		(1 << 0)
289	int		ks_polling;
290	int		ks_state;	/* shift/lock key state */
291	int		ks_accents;	/* accent key index (> 0) */
292	u_int		ks_composed_char; /* composed char code (> 0) */
293	u_char		ks_prefix;	/* AT scan code prefix */
294} atkbd_state_t;
295
296/* keyboard driver declaration */
297static int		atkbd_configure(int flags);
298static kbd_probe_t	atkbd_probe;
299static kbd_init_t	atkbd_init;
300static kbd_term_t	atkbd_term;
301static kbd_intr_t	atkbd_intr;
302static kbd_test_if_t	atkbd_test_if;
303static kbd_enable_t	atkbd_enable;
304static kbd_disable_t	atkbd_disable;
305static kbd_read_t	atkbd_read;
306static kbd_check_t	atkbd_check;
307static kbd_read_char_t	atkbd_read_char;
308static kbd_check_char_t	atkbd_check_char;
309static kbd_ioctl_t	atkbd_ioctl;
310static kbd_lock_t	atkbd_lock;
311static kbd_clear_state_t atkbd_clear_state;
312static kbd_get_state_t	atkbd_get_state;
313static kbd_set_state_t	atkbd_set_state;
314static kbd_poll_mode_t	atkbd_poll;
315
316keyboard_switch_t atkbdsw = {
317	atkbd_probe,
318	atkbd_init,
319	atkbd_term,
320	atkbd_intr,
321	atkbd_test_if,
322	atkbd_enable,
323	atkbd_disable,
324	atkbd_read,
325	atkbd_check,
326	atkbd_read_char,
327	atkbd_check_char,
328	atkbd_ioctl,
329	atkbd_lock,
330	atkbd_clear_state,
331	atkbd_get_state,
332	atkbd_set_state,
333	genkbd_get_fkeystr,
334	atkbd_poll,
335	genkbd_diag,
336};
337
338KEYBOARD_DRIVER(atkbd, atkbdsw, atkbd_configure);
339
340/* local functions */
341static int		setup_kbd_port(KBDC kbdc, int port, int intr);
342static int		get_kbd_echo(KBDC kbdc);
343static int		probe_keyboard(KBDC kbdc, int flags);
344static int		init_keyboard(KBDC kbdc, int *type, int flags);
345static int		write_kbd(KBDC kbdc, int command, int data);
346static int		get_kbd_id(KBDC kbdc);
347static int		typematic(int delay, int rate);
348
349/* local variables */
350
351/* the initial key map, accent map and fkey strings */
352#ifdef ATKBD_DFLT_KEYMAP
353#define KBD_DFLT_KEYMAP
354#include "atkbdmap.h"
355#endif
356#include <dev/kbd/kbdtables.h>
357
358/* structures for the default keyboard */
359static keyboard_t	default_kbd;
360static atkbd_state_t	default_kbd_state;
361static keymap_t		default_keymap;
362static accentmap_t	default_accentmap;
363static fkeytab_t	default_fkeytab[NUM_FKEYS];
364
365/*
366 * The back door to the keyboard driver!
367 * This function is called by the console driver, via the kbdio module,
368 * to tickle keyboard drivers when the low-level console is being initialized.
369 * Almost nothing in the kernel has been initialied yet.  Try to probe
370 * keyboards if possible.
371 * NOTE: because of the way the low-level conole is initialized, this routine
372 * may be called more than once!!
373 */
374static int
375atkbd_configure(int flags)
376{
377	keyboard_t *kbd;
378	int arg[2];
379#ifdef __i386__
380	struct isa_device *dev;
381	int i;
382
383	/* XXX: a kludge to obtain the device configuration flags */
384	dev = find_isadev(isa_devtab_tty, &atkbddriver, 0);
385	if (dev != NULL) {
386		flags |= dev->id_flags;
387		/* if the driver is disabled, unregister the keyboard if any */
388		if (!dev->id_enabled) {
389			i = kbd_find_keyboard(ATKBD_DRIVER_NAME, ATKBD_DEFAULT);
390			if (i >= 0) {
391				kbd = kbd_get_keyboard(i);
392				kbd_unregister(kbd);
393				kbd->kb_flags &= ~KB_REGISTERED;
394				return 0;
395			}
396		}
397	}
398#endif
399
400	/* probe the keyboard controller */
401	atkbdc_configure();
402
403	/* probe the default keyboard */
404	arg[0] = -1;
405	arg[1] = -1;
406	kbd = NULL;
407	if (atkbd_probe(ATKBD_DEFAULT, arg, flags))
408		return 0;
409	if (atkbd_init(ATKBD_DEFAULT, &kbd, arg, flags))
410		return 0;
411
412	/* return the number of found keyboards */
413	return 1;
414}
415
416/* low-level functions */
417
418/* detect a keyboard */
419static int
420atkbd_probe(int unit, void *arg, int flags)
421{
422	KBDC kbdc;
423	int *data = (int *)arg;
424
425	/* XXX */
426	if (unit == ATKBD_DEFAULT) {
427		if (KBD_IS_PROBED(&default_kbd))
428			return 0;
429	}
430
431	kbdc = kbdc_open(data[0]);
432	if (kbdc == NULL)
433		return ENXIO;
434	if (probe_keyboard(kbdc, flags)) {
435		if (flags & KB_CONF_FAIL_IF_NO_KBD)
436			return ENXIO;
437	}
438	return 0;
439}
440
441/* reset and initialize the device */
442static int
443atkbd_init(int unit, keyboard_t **kbdp, void *arg, int flags)
444{
445	keyboard_t *kbd;
446	atkbd_state_t *state;
447	keymap_t *keymap;
448	accentmap_t *accmap;
449	fkeytab_t *fkeymap;
450	int fkeymap_size;
451	int *data = (int *)arg;
452
453	/* XXX */
454	if (unit == ATKBD_DEFAULT) {
455		*kbdp = kbd = &default_kbd;
456		if (KBD_IS_INITIALIZED(kbd) && KBD_IS_CONFIGURED(kbd))
457			return 0;
458		state = &default_kbd_state;
459		keymap = &default_keymap;
460		accmap = &default_accentmap;
461		fkeymap = default_fkeytab;
462		fkeymap_size =
463			sizeof(default_fkeytab)/sizeof(default_fkeytab[0]);
464	} else if (*kbdp == NULL) {
465		*kbdp = kbd = malloc(sizeof(*kbd), M_DEVBUF, M_NOWAIT);
466		if (kbd == NULL)
467			return ENOMEM;
468		bzero(kbd, sizeof(*kbd));
469		state = malloc(sizeof(*state), M_DEVBUF, M_NOWAIT);
470		keymap = malloc(sizeof(key_map), M_DEVBUF, M_NOWAIT);
471		accmap = malloc(sizeof(accent_map), M_DEVBUF, M_NOWAIT);
472		fkeymap = malloc(sizeof(fkey_tab), M_DEVBUF, M_NOWAIT);
473		fkeymap_size = sizeof(fkey_tab)/sizeof(fkey_tab[0]);
474		if ((state == NULL) || (keymap == NULL) || (accmap == NULL)
475		     || (fkeymap == NULL)) {
476			if (state != NULL)
477				free(state, M_DEVBUF);
478			if (keymap != NULL)
479				free(keymap, M_DEVBUF);
480			if (accmap != NULL)
481				free(accmap, M_DEVBUF);
482			if (fkeymap != NULL)
483				free(fkeymap, M_DEVBUF);
484			free(kbd, M_DEVBUF);
485			return ENOMEM;
486		}
487		bzero(state, sizeof(*state));
488	} else if (KBD_IS_INITIALIZED(*kbdp) && KBD_IS_CONFIGURED(*kbdp)) {
489		return 0;
490	} else {
491		kbd = *kbdp;
492		state = (atkbd_state_t *)kbd->kb_data;
493		bzero(state, sizeof(*state));
494		keymap = kbd->kb_keymap;
495		accmap = kbd->kb_accentmap;
496		fkeymap = kbd->kb_fkeytab;
497		fkeymap_size = kbd->kb_fkeytab_size;
498	}
499
500	if (!KBD_IS_PROBED(kbd)) {
501		state->kbdc = kbdc_open(data[0]);
502		if (state->kbdc == NULL)
503			return ENXIO;
504		kbd_init_struct(kbd, ATKBD_DRIVER_NAME, KB_OTHER, unit, flags,
505				data[0], IO_KBDSIZE);
506		bcopy(&key_map, keymap, sizeof(key_map));
507		bcopy(&accent_map, accmap, sizeof(accent_map));
508		bcopy(fkey_tab, fkeymap,
509		      imin(fkeymap_size*sizeof(fkeymap[0]), sizeof(fkey_tab)));
510		kbd_set_maps(kbd, keymap, accmap, fkeymap, fkeymap_size);
511		kbd->kb_data = (void *)state;
512
513		if (probe_keyboard(state->kbdc, flags)) { /* shouldn't happen */
514			if (flags & KB_CONF_FAIL_IF_NO_KBD)
515				return ENXIO;
516		} else {
517			KBD_FOUND_DEVICE(kbd);
518		}
519		atkbd_clear_state(kbd);
520		state->ks_mode = K_XLATE;
521		/*
522		 * FIXME: set the initial value for lock keys in ks_state
523		 * according to the BIOS data?
524		 */
525		KBD_PROBE_DONE(kbd);
526	}
527	if (!KBD_IS_INITIALIZED(kbd) && !(flags & KB_CONF_PROBE_ONLY)) {
528		if (KBD_HAS_DEVICE(kbd)
529	    	    && init_keyboard(state->kbdc, &kbd->kb_type, kbd->kb_config)
530	    	    && (kbd->kb_config & KB_CONF_FAIL_IF_NO_KBD))
531			return ENXIO;
532		atkbd_ioctl(kbd, KDSETLED, (caddr_t)&state->ks_state);
533		KBD_INIT_DONE(kbd);
534	}
535	if (!KBD_IS_CONFIGURED(kbd)) {
536		if (kbd_register(kbd) < 0)
537			return ENXIO;
538		KBD_CONFIG_DONE(kbd);
539	}
540
541	return 0;
542}
543
544/* finish using this keyboard */
545static int
546atkbd_term(keyboard_t *kbd)
547{
548	kbd_unregister(kbd);
549	return 0;
550}
551
552/* keyboard interrupt routine */
553static int
554atkbd_intr(keyboard_t *kbd, void *arg)
555{
556	atkbd_state_t *state;
557	int c;
558
559	if (KBD_IS_ACTIVE(kbd) && KBD_IS_BUSY(kbd)) {
560		/* let the callback function to process the input */
561		(*kbd->kb_callback.kc_func)(kbd, KBDIO_KEYINPUT,
562					    kbd->kb_callback.kc_arg);
563	} else {
564		/* read and discard the input; no one is waiting for input */
565		do {
566			c = atkbd_read_char(kbd, FALSE);
567		} while (c != NOKEY);
568
569		if (!KBD_HAS_DEVICE(kbd)) {
570			/*
571			 * The keyboard was not detected before;
572			 * it must have been reconnected!
573			 */
574			state = (atkbd_state_t *)kbd->kb_data;
575			init_keyboard(state->kbdc, &kbd->kb_type,
576				      kbd->kb_config);
577			atkbd_ioctl(kbd, KDSETLED, (caddr_t)&state->ks_state);
578			KBD_FOUND_DEVICE(kbd);
579		}
580	}
581	return 0;
582}
583
584/* test the interface to the device */
585static int
586atkbd_test_if(keyboard_t *kbd)
587{
588	int error;
589	int s;
590
591	error = 0;
592	empty_both_buffers(((atkbd_state_t *)kbd->kb_data)->kbdc, 10);
593	s = spltty();
594	if (!test_controller(((atkbd_state_t *)kbd->kb_data)->kbdc))
595		error = EIO;
596	else if (test_kbd_port(((atkbd_state_t *)kbd->kb_data)->kbdc) != 0)
597		error = EIO;
598	splx(s);
599
600	return error;
601}
602
603/*
604 * Enable the access to the device; until this function is called,
605 * the client cannot read from the keyboard.
606 */
607static int
608atkbd_enable(keyboard_t *kbd)
609{
610	int s;
611
612	s = spltty();
613	KBD_ACTIVATE(kbd);
614	splx(s);
615	return 0;
616}
617
618/* disallow the access to the device */
619static int
620atkbd_disable(keyboard_t *kbd)
621{
622	int s;
623
624	s = spltty();
625	KBD_DEACTIVATE(kbd);
626	splx(s);
627	return 0;
628}
629
630/* read one byte from the keyboard if it's allowed */
631static int
632atkbd_read(keyboard_t *kbd, int wait)
633{
634	int c;
635
636	if (wait)
637		c = read_kbd_data(((atkbd_state_t *)kbd->kb_data)->kbdc);
638	else
639		c = read_kbd_data_no_wait(((atkbd_state_t *)kbd->kb_data)->kbdc);
640	return (KBD_IS_ACTIVE(kbd) ? c : -1);
641}
642
643/* check if data is waiting */
644static int
645atkbd_check(keyboard_t *kbd)
646{
647	if (!KBD_IS_ACTIVE(kbd))
648		return FALSE;
649	return kbdc_data_ready(((atkbd_state_t *)kbd->kb_data)->kbdc);
650}
651
652/* read char from the keyboard */
653static u_int
654atkbd_read_char(keyboard_t *kbd, int wait)
655{
656	atkbd_state_t *state;
657	u_int action;
658	int scancode;
659	int keycode;
660
661	state = (atkbd_state_t *)kbd->kb_data;
662next_code:
663	/* do we have a composed char to return? */
664	if (!(state->ks_flags & COMPOSE) && (state->ks_composed_char > 0)) {
665		action = state->ks_composed_char;
666		state->ks_composed_char = 0;
667		if (action > UCHAR_MAX)
668			return ERRKEY;
669		return action;
670	}
671
672	/* see if there is something in the keyboard port */
673	if (wait) {
674		do {
675			scancode = read_kbd_data(state->kbdc);
676		} while (scancode == -1);
677	} else {
678		scancode = read_kbd_data_no_wait(state->kbdc);
679		if (scancode == -1)
680			return NOKEY;
681	}
682
683	/* return the byte as is for the K_RAW mode */
684	if (state->ks_mode == K_RAW)
685		return scancode;
686
687	/* translate the scan code into a keycode */
688	keycode = scancode & 0x7F;
689	switch (state->ks_prefix) {
690	case 0x00:	/* normal scancode */
691		switch(scancode) {
692		case 0xB8:	/* left alt (compose key) released */
693			if (state->ks_flags & COMPOSE) {
694				state->ks_flags &= ~COMPOSE;
695				if (state->ks_composed_char > UCHAR_MAX)
696					state->ks_composed_char = 0;
697			}
698			break;
699		case 0x38:	/* left alt (compose key) pressed */
700			if (!(state->ks_flags & COMPOSE)) {
701				state->ks_flags |= COMPOSE;
702				state->ks_composed_char = 0;
703			}
704			break;
705		case 0xE0:
706		case 0xE1:
707			state->ks_prefix = scancode;
708			goto next_code;
709		}
710		break;
711	case 0xE0:      /* 0xE0 prefix */
712		state->ks_prefix = 0;
713		switch (keycode) {
714		case 0x1C:	/* right enter key */
715			keycode = 0x59;
716			break;
717		case 0x1D:	/* right ctrl key */
718			keycode = 0x5A;
719			break;
720		case 0x35:	/* keypad divide key */
721	    		keycode = 0x5B;
722	    		break;
723		case 0x37:	/* print scrn key */
724	    		keycode = 0x5C;
725	    		break;
726		case 0x38:	/* right alt key (alt gr) */
727	    		keycode = 0x5D;
728	    		break;
729		case 0x46:	/* ctrl-pause/break on AT 101 (see below) */
730			keycode = 0x68;
731	    		break;
732		case 0x47:	/* grey home key */
733	    		keycode = 0x5E;
734	    		break;
735		case 0x48:	/* grey up arrow key */
736	    		keycode = 0x5F;
737	    		break;
738		case 0x49:	/* grey page up key */
739	    		keycode = 0x60;
740	    		break;
741		case 0x4B:	/* grey left arrow key */
742	    		keycode = 0x61;
743	    		break;
744		case 0x4D:	/* grey right arrow key */
745	    		keycode = 0x62;
746	    		break;
747		case 0x4F:	/* grey end key */
748	    		keycode = 0x63;
749	    		break;
750		case 0x50:	/* grey down arrow key */
751	    		keycode = 0x64;
752	    		break;
753		case 0x51:	/* grey page down key */
754	    		keycode = 0x65;
755	    		break;
756		case 0x52:	/* grey insert key */
757	    		keycode = 0x66;
758	    		break;
759		case 0x53:	/* grey delete key */
760	    		keycode = 0x67;
761	    		break;
762		/* the following 3 are only used on the MS "Natural" keyboard */
763		case 0x5b:	/* left Window key */
764	    		keycode = 0x69;
765	    		break;
766		case 0x5c:	/* right Window key */
767	    		keycode = 0x6a;
768	    		break;
769		case 0x5d:	/* menu key */
770	    		keycode = 0x6b;
771	    		break;
772		default:	/* ignore everything else */
773	    		goto next_code;
774		}
775		break;
776    	case 0xE1:	/* 0xE1 prefix */
777		/*
778		 * The pause/break key on the 101 keyboard produces:
779		 * E1-1D-45 E1-9D-C5
780		 * Ctrl-pause/break produces:
781		 * E0-46 E0-C6 (See above.)
782		 */
783		state->ks_prefix = 0;
784		if (keycode == 0x1D)
785	    		state->ks_prefix = 0x1D;
786		goto next_code;
787		/* NOT REACHED */
788    	case 0x1D:	/* pause / break */
789		state->ks_prefix = 0;
790		if (keycode != 0x45)
791			goto next_code;
792		keycode = 0x68;
793		break;
794	}
795
796	if (kbd->kb_type == KB_84) {
797		switch (keycode) {
798		case 0x37:	/* *(numpad)/print screen */
799			if (state->ks_flags & SHIFTS)
800	    			keycode = 0x5c;	/* print screen */
801			break;
802		case 0x45:	/* num lock/pause */
803			if (state->ks_flags & CTLS)
804				keycode = 0x68;	/* pause */
805			break;
806		case 0x46:	/* scroll lock/break */
807			if (state->ks_flags & CTLS)
808				keycode = 0x6c;	/* break */
809			break;
810		}
811	} else if (kbd->kb_type == KB_101) {
812		switch (keycode) {
813		case 0x5c:	/* print screen */
814			if (state->ks_flags & ALTS)
815				keycode = 0x54;	/* sysrq */
816			break;
817		case 0x68:	/* pause/break */
818			if (state->ks_flags & CTLS)
819				keycode = 0x6c;	/* break */
820			break;
821		}
822	}
823
824	/* return the key code in the K_CODE mode */
825	if (state->ks_mode == K_CODE)
826		return (keycode | (scancode & 0x80));
827
828	/* compose a character code */
829	if (state->ks_flags & COMPOSE) {
830		switch (scancode) {
831		/* key pressed, process it */
832		case 0x47: case 0x48: case 0x49:	/* keypad 7,8,9 */
833			state->ks_composed_char *= 10;
834			state->ks_composed_char += scancode - 0x40;
835			if (state->ks_composed_char > UCHAR_MAX)
836				return ERRKEY;
837			goto next_code;
838		case 0x4B: case 0x4C: case 0x4D:	/* keypad 4,5,6 */
839			state->ks_composed_char *= 10;
840			state->ks_composed_char += scancode - 0x47;
841			if (state->ks_composed_char > UCHAR_MAX)
842				return ERRKEY;
843			goto next_code;
844		case 0x4F: case 0x50: case 0x51:	/* keypad 1,2,3 */
845			state->ks_composed_char *= 10;
846			state->ks_composed_char += scancode - 0x4E;
847			if (state->ks_composed_char > UCHAR_MAX)
848				return ERRKEY;
849			goto next_code;
850		case 0x52:				/* keypad 0 */
851			state->ks_composed_char *= 10;
852			if (state->ks_composed_char > UCHAR_MAX)
853				return ERRKEY;
854			goto next_code;
855
856		/* key released, no interest here */
857		case 0xC7: case 0xC8: case 0xC9:	/* keypad 7,8,9 */
858		case 0xCB: case 0xCC: case 0xCD:	/* keypad 4,5,6 */
859		case 0xCF: case 0xD0: case 0xD1:	/* keypad 1,2,3 */
860		case 0xD2:				/* keypad 0 */
861			goto next_code;
862
863		case 0x38:				/* left alt key */
864			break;
865
866		default:
867			if (state->ks_composed_char > 0) {
868				state->ks_flags &= ~COMPOSE;
869				state->ks_composed_char = 0;
870				return ERRKEY;
871			}
872			break;
873		}
874	}
875
876	/* keycode to key action */
877	action = genkbd_keyaction(kbd, keycode, scancode & 0x80,
878				  &state->ks_state, &state->ks_accents);
879	if (action == NOKEY)
880		goto next_code;
881	else
882		return action;
883}
884
885/* check if char is waiting */
886static int
887atkbd_check_char(keyboard_t *kbd)
888{
889	atkbd_state_t *state;
890
891	if (!KBD_IS_ACTIVE(kbd))
892		return FALSE;
893	state = (atkbd_state_t *)kbd->kb_data;
894	if (!(state->ks_flags & COMPOSE) && (state->ks_composed_char > 0))
895		return TRUE;
896	return kbdc_data_ready(state->kbdc);
897}
898
899/* some useful control functions */
900static int
901atkbd_ioctl(keyboard_t *kbd, u_long cmd, caddr_t arg)
902{
903	/* trasnlate LED_XXX bits into the device specific bits */
904	static u_char ledmap[8] = {
905		0, 4, 2, 6, 1, 5, 3, 7,
906	};
907	atkbd_state_t *state = kbd->kb_data;
908	int error;
909	int s;
910	int i;
911
912	s = spltty();
913	switch (cmd) {
914
915	case KDGKBMODE:		/* get keyboard mode */
916		*(int *)arg = state->ks_mode;
917		break;
918	case KDSKBMODE:		/* set keyboard mode */
919		switch (*(int *)arg) {
920		case K_XLATE:
921			if (state->ks_mode != K_XLATE) {
922				/* make lock key state and LED state match */
923				state->ks_state &= ~LOCK_MASK;
924				state->ks_state |= KBD_LED_VAL(kbd);
925			}
926			/* FALL THROUGH */
927		case K_RAW:
928		case K_CODE:
929			if (state->ks_mode != *(int *)arg) {
930				atkbd_clear_state(kbd);
931				state->ks_mode = *(int *)arg;
932			}
933			break;
934		default:
935			splx(s);
936			return EINVAL;
937		}
938		break;
939
940	case KDGETLED:		/* get keyboard LED */
941		*(int *)arg = KBD_LED_VAL(kbd);
942		break;
943	case KDSETLED:		/* set keyboard LED */
944		/* NOTE: lock key state in ks_state won't be changed */
945		if (*(int *)arg & ~LOCK_MASK) {
946			splx(s);
947			return EINVAL;
948		}
949		i = *(int *)arg;
950		/* replace CAPS LED with ALTGR LED for ALTGR keyboards */
951		if (kbd->kb_keymap->n_keys > ALTGR_OFFSET) {
952			if (i & ALKED)
953				i |= CLKED;
954			else
955				i &= ~CLKED;
956		}
957		if (KBD_HAS_DEVICE(kbd)) {
958			error = write_kbd(state->kbdc, KBDC_SET_LEDS,
959					  ledmap[i & LED_MASK]);
960			if (error) {
961				splx(s);
962				return error;
963			}
964		}
965		KBD_LED_VAL(kbd) = *(int *)arg;
966		break;
967
968	case KDGKBSTATE:	/* get lock key state */
969		*(int *)arg = state->ks_state & LOCK_MASK;
970		break;
971	case KDSKBSTATE:	/* set lock key state */
972		if (*(int *)arg & ~LOCK_MASK) {
973			splx(s);
974			return EINVAL;
975		}
976		state->ks_state &= ~LOCK_MASK;
977		state->ks_state |= *(int *)arg;
978		splx(s);
979		/* set LEDs and quit */
980		return atkbd_ioctl(kbd, KDSETLED, arg);
981
982	case KDSETREPEAT:	/* set keyboard repeat rate (new interface) */
983		splx(s);
984		if (!KBD_HAS_DEVICE(kbd))
985			return 0;
986		i = typematic(((int *)arg)[0], ((int *)arg)[1]);
987		return write_kbd(state->kbdc, KBDC_SET_TYPEMATIC, i);
988
989	case KDSETRAD:		/* set keyboard repeat rate (old interface) */
990		splx(s);
991		if (!KBD_HAS_DEVICE(kbd))
992			return 0;
993		return write_kbd(state->kbdc, KBDC_SET_TYPEMATIC, *(int *)arg);
994
995	case PIO_KEYMAP:	/* set keyboard translation table */
996	case PIO_KEYMAPENT:	/* set keyboard translation table entry */
997	case PIO_DEADKEYMAP:	/* set accent key translation table */
998		state->ks_accents = 0;
999		/* FALL THROUGH */
1000	default:
1001		splx(s);
1002		return genkbd_commonioctl(kbd, cmd, arg);
1003	}
1004
1005	splx(s);
1006	return 0;
1007}
1008
1009/* lock the access to the keyboard */
1010static int
1011atkbd_lock(keyboard_t *kbd, int lock)
1012{
1013	return kbdc_lock(((atkbd_state_t *)kbd->kb_data)->kbdc, lock);
1014}
1015
1016/* clear the internal state of the keyboard */
1017static void
1018atkbd_clear_state(keyboard_t *kbd)
1019{
1020	atkbd_state_t *state;
1021
1022	state = (atkbd_state_t *)kbd->kb_data;
1023	state->ks_flags = 0;
1024	state->ks_polling = 0;
1025	state->ks_state &= LOCK_MASK;	/* preserve locking key state */
1026	state->ks_accents = 0;
1027	state->ks_composed_char = 0;
1028#if 0
1029	state->ks_prefix = 0; /* XXX */
1030#endif
1031}
1032
1033/* save the internal state */
1034static int
1035atkbd_get_state(keyboard_t *kbd, void *buf, size_t len)
1036{
1037	if (len == 0)
1038		return sizeof(atkbd_state_t);
1039	if (len < sizeof(atkbd_state_t))
1040		return -1;
1041	bcopy(kbd->kb_data, buf, sizeof(atkbd_state_t));
1042	return 0;
1043}
1044
1045/* set the internal state */
1046static int
1047atkbd_set_state(keyboard_t *kbd, void *buf, size_t len)
1048{
1049	if (len < sizeof(atkbd_state_t))
1050		return ENOMEM;
1051	if (((atkbd_state_t *)kbd->kb_data)->kbdc
1052		!= ((atkbd_state_t *)buf)->kbdc)
1053		return ENOMEM;
1054	bcopy(buf, kbd->kb_data, sizeof(atkbd_state_t));
1055	return 0;
1056}
1057
1058static int
1059atkbd_poll(keyboard_t *kbd, int on)
1060{
1061	atkbd_state_t *state;
1062	int s;
1063
1064	state = (atkbd_state_t *)kbd->kb_data;
1065	s = spltty();
1066	if (on)
1067		++state->ks_polling;
1068	else
1069		--state->ks_polling;
1070	splx(s);
1071	return 0;
1072}
1073
1074/* local functions */
1075
1076static int
1077setup_kbd_port(KBDC kbdc, int port, int intr)
1078{
1079	if (!set_controller_command_byte(kbdc,
1080		KBD_KBD_CONTROL_BITS,
1081		((port) ? KBD_ENABLE_KBD_PORT : KBD_DISABLE_KBD_PORT)
1082		    | ((intr) ? KBD_ENABLE_KBD_INT : KBD_DISABLE_KBD_INT)))
1083		return 1;
1084	return 0;
1085}
1086
1087static int
1088get_kbd_echo(KBDC kbdc)
1089{
1090	/* enable the keyboard port, but disable the keyboard intr. */
1091	if (setup_kbd_port(kbdc, TRUE, FALSE))
1092		/* CONTROLLER ERROR: there is very little we can do... */
1093		return ENXIO;
1094
1095	/* see if something is present */
1096	write_kbd_command(kbdc, KBDC_ECHO);
1097	if (read_kbd_data(kbdc) != KBD_ECHO) {
1098		empty_both_buffers(kbdc, 10);
1099		test_controller(kbdc);
1100		test_kbd_port(kbdc);
1101		return ENXIO;
1102	}
1103
1104	/* enable the keyboard port and intr. */
1105	if (setup_kbd_port(kbdc, TRUE, TRUE)) {
1106		/*
1107		 * CONTROLLER ERROR
1108		 * This is serious; the keyboard intr is left disabled!
1109		 */
1110		return ENXIO;
1111	}
1112
1113	return 0;
1114}
1115
1116static int
1117probe_keyboard(KBDC kbdc, int flags)
1118{
1119	/*
1120	 * Don't try to print anything in this function.  The low-level
1121	 * console may not have been initialized yet...
1122	 */
1123	int err;
1124	int c;
1125	int m;
1126
1127	if (!kbdc_lock(kbdc, TRUE)) {
1128		/* driver error? */
1129		return ENXIO;
1130	}
1131
1132	/* flush any noise in the buffer */
1133	empty_both_buffers(kbdc, 10);
1134
1135	/* save the current keyboard controller command byte */
1136	m = kbdc_get_device_mask(kbdc) & ~KBD_KBD_CONTROL_BITS;
1137	c = get_controller_command_byte(kbdc);
1138	if (c == -1) {
1139		/* CONTROLLER ERROR */
1140		kbdc_set_device_mask(kbdc, m);
1141		kbdc_lock(kbdc, FALSE);
1142		return ENXIO;
1143	}
1144
1145	/*
1146	 * The keyboard may have been screwed up by the boot block.
1147	 * We may just be able to recover from error by testing the controller
1148	 * and the keyboard port. The controller command byte needs to be
1149	 * saved before this recovery operation, as some controllers seem
1150	 * to set the command byte to particular values.
1151	 */
1152	test_controller(kbdc);
1153	test_kbd_port(kbdc);
1154
1155	err = get_kbd_echo(kbdc);
1156	if (err == 0) {
1157		kbdc_set_device_mask(kbdc, m | KBD_KBD_CONTROL_BITS);
1158	} else {
1159		if (c != -1)
1160			/* try to restore the command byte as before */
1161			set_controller_command_byte(kbdc, 0xff, c);
1162		kbdc_set_device_mask(kbdc, m);
1163	}
1164
1165	kbdc_lock(kbdc, FALSE);
1166	return err;
1167}
1168
1169static int
1170init_keyboard(KBDC kbdc, int *type, int flags)
1171{
1172	int codeset;
1173	int id;
1174	int c;
1175
1176	if (!kbdc_lock(kbdc, TRUE)) {
1177		/* driver error? */
1178		return EIO;
1179	}
1180
1181	/* save the current controller command byte */
1182	empty_both_buffers(kbdc, 10);
1183	c = get_controller_command_byte(kbdc);
1184	if (c == -1) {
1185		/* CONTROLLER ERROR */
1186		kbdc_lock(kbdc, FALSE);
1187		printf("atkbd: unable to get the current command byte value.\n");
1188		return EIO;
1189	}
1190	if (bootverbose)
1191		printf("atkbd: the current kbd controller command byte %04x\n",
1192		       c);
1193#if 0
1194	/* override the keyboard lock switch */
1195	c |= KBD_OVERRIDE_KBD_LOCK;
1196#endif
1197
1198	/* enable the keyboard port, but disable the keyboard intr. */
1199	if (setup_kbd_port(kbdc, TRUE, FALSE)) {
1200		/* CONTROLLER ERROR: there is very little we can do... */
1201		printf("atkbd: unable to set the command byte.\n");
1202		kbdc_lock(kbdc, FALSE);
1203		return EIO;
1204	}
1205
1206	/*
1207	 * Check if we have an XT keyboard before we attempt to reset it.
1208	 * The procedure assumes that the keyboard and the controller have
1209	 * been set up properly by BIOS and have not been messed up
1210	 * during the boot process.
1211	 */
1212	codeset = -1;
1213	if (flags & KB_CONF_ALT_SCANCODESET)
1214		/* the user says there is a XT keyboard */
1215		codeset = 1;
1216#ifdef KBD_DETECT_XT_KEYBOARD
1217	else if ((c & KBD_TRANSLATION) == 0) {
1218		/* SET_SCANCODE_SET is not always supported; ignore error */
1219		if (send_kbd_command_and_data(kbdc, KBDC_SET_SCANCODE_SET, 0)
1220			== KBD_ACK)
1221			codeset = read_kbd_data(kbdc);
1222	}
1223	if (bootverbose)
1224		printf("atkbd: scancode set %d\n", codeset);
1225#endif /* KBD_DETECT_XT_KEYBOARD */
1226
1227	*type = KB_OTHER;
1228	id = get_kbd_id(kbdc);
1229	switch(id) {
1230	case 0x41ab:
1231	case 0x83ab:
1232		*type = KB_101;
1233		break;
1234	case -1:	/* AT 84 keyboard doesn't return ID */
1235		*type = KB_84;
1236		break;
1237	default:
1238		break;
1239	}
1240	if (bootverbose)
1241		printf("atkbd: keyboard ID 0x%x (%d)\n", id, *type);
1242
1243	/* reset keyboard hardware */
1244	if (!(flags & KB_CONF_NO_RESET) && !reset_kbd(kbdc)) {
1245		/*
1246		 * KEYBOARD ERROR
1247		 * Keyboard reset may fail either because the keyboard
1248		 * doen't exist, or because the keyboard doesn't pass
1249		 * the self-test, or the keyboard controller on the
1250		 * motherboard and the keyboard somehow fail to shake hands.
1251		 * It is just possible, particularly in the last case,
1252		 * that the keyoard controller may be left in a hung state.
1253		 * test_controller() and test_kbd_port() appear to bring
1254		 * the keyboard controller back (I don't know why and how,
1255		 * though.)
1256		 */
1257		empty_both_buffers(kbdc, 10);
1258		test_controller(kbdc);
1259		test_kbd_port(kbdc);
1260		/*
1261		 * We could disable the keyboard port and interrupt... but,
1262		 * the keyboard may still exist (see above).
1263		 */
1264		set_controller_command_byte(kbdc, 0xff, c);
1265		kbdc_lock(kbdc, FALSE);
1266		if (bootverbose)
1267			printf("atkbd: failed to reset the keyboard.\n");
1268		return EIO;
1269	}
1270
1271	/*
1272	 * Allow us to set the XT_KEYBD flag in UserConfig so that keyboards
1273	 * such as those on the IBM ThinkPad laptop computers can be used
1274	 * with the standard console driver.
1275	 */
1276	if (codeset == 1) {
1277		if (send_kbd_command_and_data(kbdc,
1278			KBDC_SET_SCANCODE_SET, codeset) == KBD_ACK) {
1279			/* XT kbd doesn't need scan code translation */
1280			c &= ~KBD_TRANSLATION;
1281		} else {
1282			/*
1283			 * KEYBOARD ERROR
1284			 * The XT kbd isn't usable unless the proper scan
1285			 * code set is selected.
1286			 */
1287			set_controller_command_byte(kbdc, 0xff, c);
1288			kbdc_lock(kbdc, FALSE);
1289			printf("atkbd: unable to set the XT keyboard mode.\n");
1290			return EIO;
1291		}
1292	}
1293
1294#ifdef __alpha__
1295	if (send_kbd_command_and_data(
1296		kbdc, KBDC_SET_SCANCODE_SET, 2) != KBD_ACK) {
1297		printf("atkbd: can't set translation.\n");
1298
1299	}
1300	c |= KBD_TRANSLATION;
1301#endif
1302
1303	/* enable the keyboard port and intr. */
1304	if (!set_controller_command_byte(kbdc,
1305		KBD_KBD_CONTROL_BITS | KBD_TRANSLATION | KBD_OVERRIDE_KBD_LOCK,
1306		(c & (KBD_TRANSLATION | KBD_OVERRIDE_KBD_LOCK))
1307		    | KBD_ENABLE_KBD_PORT | KBD_ENABLE_KBD_INT)) {
1308		/*
1309		 * CONTROLLER ERROR
1310		 * This is serious; we are left with the disabled
1311		 * keyboard intr.
1312		 */
1313		set_controller_command_byte(kbdc, 0xff, c);
1314		kbdc_lock(kbdc, FALSE);
1315		printf("atkbd: unable to enable the keyboard port and intr.\n");
1316		return EIO;
1317	}
1318
1319	kbdc_lock(kbdc, FALSE);
1320	return 0;
1321}
1322
1323static int
1324write_kbd(KBDC kbdc, int command, int data)
1325{
1326    int s;
1327
1328    /* prevent the timeout routine from polling the keyboard */
1329    if (!kbdc_lock(kbdc, TRUE))
1330	return EBUSY;
1331
1332    /* disable the keyboard and mouse interrupt */
1333    s = spltty();
1334#if 0
1335    c = get_controller_command_byte(kbdc);
1336    if ((c == -1)
1337	|| !set_controller_command_byte(kbdc,
1338            kbdc_get_device_mask(kbdc),
1339            KBD_DISABLE_KBD_PORT | KBD_DISABLE_KBD_INT
1340                | KBD_DISABLE_AUX_PORT | KBD_DISABLE_AUX_INT)) {
1341	/* CONTROLLER ERROR */
1342        kbdc_lock(kbdc, FALSE);
1343	splx(s);
1344	return EIO;
1345    }
1346    /*
1347     * Now that the keyboard controller is told not to generate
1348     * the keyboard and mouse interrupts, call `splx()' to allow
1349     * the other tty interrupts. The clock interrupt may also occur,
1350     * but the timeout routine (`scrn_timer()') will be blocked
1351     * by the lock flag set via `kbdc_lock()'
1352     */
1353    splx(s);
1354#endif
1355
1356    if (send_kbd_command_and_data(kbdc, command, data) != KBD_ACK)
1357        send_kbd_command(kbdc, KBDC_ENABLE_KBD);
1358
1359#if 0
1360    /* restore the interrupts */
1361    if (!set_controller_command_byte(kbdc,
1362            kbdc_get_device_mask(kbdc),
1363	    c & (KBD_KBD_CONTROL_BITS | KBD_AUX_CONTROL_BITS))) {
1364	/* CONTROLLER ERROR */
1365    }
1366#else
1367    splx(s);
1368#endif
1369    kbdc_lock(kbdc, FALSE);
1370
1371    return 0;
1372}
1373
1374static int
1375get_kbd_id(KBDC kbdc)
1376{
1377	int id1, id2;
1378
1379	empty_both_buffers(kbdc, 10);
1380	id1 = id2 = -1;
1381	if (send_kbd_command(kbdc, KBDC_SEND_DEV_ID) != KBD_ACK)
1382		return -1;
1383
1384	DELAY(10000); 	/* 10 msec delay */
1385	id1 = read_kbd_data(kbdc);
1386	if (id1 != -1)
1387		id2 = read_kbd_data(kbdc);
1388
1389	if ((id1 == -1) || (id2 == -1)) {
1390		empty_both_buffers(kbdc, 10);
1391		test_controller(kbdc);
1392		test_kbd_port(kbdc);
1393		return -1;
1394	}
1395	return ((id2 << 8) | id1);
1396}
1397
1398static int
1399typematic(int delay, int rate)
1400{
1401	static int delays[] = { 250, 500, 750, 1000 };
1402	static int rates[] = {  34,  38,  42,  46,  50,  55,  59,  63,
1403				68,  76,  84,  92, 100, 110, 118, 126,
1404			       136, 152, 168, 184, 200, 220, 236, 252,
1405			       272, 304, 336, 368, 400, 440, 472, 504 };
1406	int value;
1407	int i;
1408
1409	for (i = sizeof(delays)/sizeof(delays[0]) - 1; i > 0; --i) {
1410		if (delay >= delays[i])
1411			break;
1412	}
1413	value = i << 5;
1414	for (i = sizeof(rates)/sizeof(rates[0]) - 1; i > 0; --i) {
1415		if (rate >= rates[i])
1416			break;
1417	}
1418	value |= i;
1419	return value;
1420}
1421
1422#endif /* NATKBD > 0 */
1423