263 lines
8.6 KiB
C
263 lines
8.6 KiB
C
/* $NetBSD: hil.c,v 1.5 1994/10/26 07:27:19 cgd Exp $ */
|
|
|
|
/*
|
|
* Copyright (c) 1988 University of Utah.
|
|
* Copyright (c) 1990, 1993
|
|
* The Regents of the University of California. All rights reserved.
|
|
*
|
|
* This code is derived from software contributed to Berkeley by
|
|
* the Systems Programming Group of the University of Utah Computer
|
|
* Science Department.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. All advertising materials mentioning features or use of this software
|
|
* must display the following acknowledgement:
|
|
* This product includes software developed by the University of
|
|
* California, Berkeley and its contributors.
|
|
* 4. Neither the name of the University nor the names of its contributors
|
|
* may be used to endorse or promote products derived from this software
|
|
* without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*
|
|
* from: Utah Hdr: hil.c 1.1 89/08/22
|
|
*
|
|
* @(#)hil.c 8.1 (Berkeley) 6/10/93
|
|
*/
|
|
|
|
/*
|
|
* Keyboard routines for the standalone ITE.
|
|
*/
|
|
#include "samachdep.h"
|
|
|
|
#ifdef ITECONSOLE
|
|
|
|
#include <sys/param.h>
|
|
#include <hp300/dev/hilreg.h>
|
|
#include <hp300/dev/kbdmap.h>
|
|
#include <hp300/dev/itevar.h>
|
|
|
|
#ifndef SMALL
|
|
|
|
/*
|
|
* HIL cooked keyboard keymaps.
|
|
* Supports only unshifted, shifted and control keys.
|
|
*/
|
|
char us_keymap[] = {
|
|
NULL, '`', '\\', ESC, NULL, DEL, NULL, NULL,
|
|
'\n', '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\n', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, '\b', NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
ESC, '\r', NULL, '\n', '0', '.', ',', '+',
|
|
'1', '2', '3', '-', '4', '5', '6', '*',
|
|
'7', '8', '9', '/', 'E', '(', ')', '^',
|
|
'1', '2', '3', '4', '5', '6', '7', '8',
|
|
'9', '0', '-', '=', '[', ']', ';', '\'',
|
|
',', '.', '/', '\040', 'o', 'p', 'k', 'l',
|
|
'q', 'w', 'e', 'r', 't', 'y', 'u', 'i',
|
|
'a', 's', 'd', 'f', 'g', 'h', 'j', 'm',
|
|
'z', 'x', 'c', 'v', 'b', 'n', NULL, NULL
|
|
};
|
|
|
|
char us_shiftmap[] = {
|
|
NULL, '~', '|', DEL, NULL, DEL, NULL, NULL,
|
|
'\n', '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\n', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, DEL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
ESC, '\r', NULL, '\n', '0', '.', ',', '+',
|
|
'1', '2', '3', '-', '4', '5', '6', '*',
|
|
'7', '8', '9', '/', '`', '|', '\\', '~',
|
|
'!', '@', '#', '$', '%', '^', '&', '*',
|
|
'(', ')', '_', '+', '{', '}', ':', '\"',
|
|
'<', '>', '?', '\040', 'O', 'P', 'K', 'L',
|
|
'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I',
|
|
'A', 'S', 'D', 'F', 'G', 'H', 'J', 'M',
|
|
'Z', 'X', 'C', 'V', 'B', 'N', NULL, NULL
|
|
};
|
|
|
|
char us_ctrlmap[] = {
|
|
NULL, '`', '\034', ESC, NULL, DEL, NULL, NULL,
|
|
'\n', '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\n', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, '\b', NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
ESC, '\r', NULL, '\n', '0', '.', ',', '+',
|
|
'1', '2', '3', '-', '4', '5', '6', '*',
|
|
'7', '8', '9', '/', 'E', '(', ')', '\036',
|
|
'1', '2', '3', '4', '5', '6', '7', '8',
|
|
'9', '0', '-', '=', '\033', '\035', ';', '\'',
|
|
',', '.', '/', '\040', '\017', '\020', '\013', '\014',
|
|
'\021', '\027', '\005', '\022', '\024', '\031', '\025', '\011',
|
|
'\001', '\023', '\004', '\006', '\007', '\010', '\012', '\015',
|
|
'\032', '\030', '\003', '\026', '\002', '\016', NULL, NULL
|
|
};
|
|
|
|
#ifdef UK_KEYBOARD
|
|
char uk_keymap[] = {
|
|
NULL, '`', '<', ESC, NULL, DEL, NULL, NULL,
|
|
'\n', '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\n', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, '\b', NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
ESC, '\r', NULL, '\n', '0', '.', ',', '+',
|
|
'1', '2', '3', '-', '4', '5', '6', '*',
|
|
'7', '8', '9', '/', 'E', '(', ')', '^',
|
|
'1', '2', '3', '4', '5', '6', '7', '8',
|
|
'9', '0', '+', '\'', '[', ']', '*', '\\',
|
|
',', '.', '-', '\040', 'o', 'p', 'k', 'l',
|
|
'q', 'w', 'e', 'r', 't', 'y', 'u', 'i',
|
|
'a', 's', 'd', 'f', 'g', 'h', 'j', 'm',
|
|
'z', 'x', 'c', 'v', 'b', 'n', NULL, NULL
|
|
};
|
|
|
|
char uk_shiftmap[] = {
|
|
NULL, '~', '>', DEL, NULL, DEL, NULL, NULL,
|
|
'\n', '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\n', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, DEL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
ESC, '\r', NULL, '\n', '0', '.', ',', '+',
|
|
'1', '2', '3', '-', '4', '5', '6', '*',
|
|
'7', '8', '9', '/', '`', '|', '\\', '~',
|
|
'!', '\"', '#', '$', '%', '&', '^', '(',
|
|
')', '=', '?', '/', '{', '}', '@', '|',
|
|
';', ':', '_', '\040', 'O', 'P', 'K', 'L',
|
|
'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I',
|
|
'A', 'S', 'D', 'F', 'G', 'H', 'J', 'M',
|
|
'Z', 'X', 'C', 'V', 'B', 'N', NULL, NULL
|
|
};
|
|
|
|
char uk_ctrlmap[] = {
|
|
NULL, '`', '<', ESC, NULL, DEL, NULL, NULL,
|
|
'\n', '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\n', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, '\t', NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, '\b', NULL,
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
|
|
ESC, '\r', NULL, '\n', '0', '.', ',', '+',
|
|
'1', '2', '3', '-', '4', '5', '6', '*',
|
|
'7', '8', '9', '/', 'E', '(', ')', '\036',
|
|
'1', '2', '3', '4', '5', '6', '7', '8',
|
|
'9', '0', '+', '\'', '\033', '\035', '*', '\034',
|
|
',', '.', '/', '\040', '\017', '\020', '\013', '\014',
|
|
'\021', '\027', '\005', '\022', '\024', '\031', '\025', '\011',
|
|
'\001', '\023', '\004', '\006', '\007', '\010', '\012', '\015',
|
|
'\032', '\030', '\003', '\026', '\002', '\016', NULL, NULL
|
|
};
|
|
#endif
|
|
|
|
/*
|
|
* The keyboard map table.
|
|
* Lookup is by hardware returned language code.
|
|
*/
|
|
struct kbdmap kbd_map[] = {
|
|
KBD_US, NULL,
|
|
us_keymap, us_shiftmap, us_ctrlmap, NULL, NULL,
|
|
|
|
#ifdef UK_KEYBOARD
|
|
KBD_UK, NULL,
|
|
uk_keymap, uk_shiftmap, uk_ctrlmap, NULL, NULL,
|
|
#endif
|
|
|
|
0, NULL,
|
|
NULL, NULL, NULL, NULL, NULL,
|
|
};
|
|
|
|
char *kbd_keymap = us_keymap;
|
|
char *kbd_shiftmap = us_shiftmap;
|
|
char *kbd_ctrlmap = us_ctrlmap;
|
|
|
|
kbdgetc()
|
|
{
|
|
register int status, c;
|
|
register struct hil_dev *hiladdr = HILADDR;
|
|
|
|
status = hiladdr->hil_stat;
|
|
if ((status & HIL_DATA_RDY) == 0)
|
|
return(0);
|
|
c = hiladdr->hil_data;
|
|
switch ((status>>KBD_SSHIFT) & KBD_SMASK) {
|
|
case KBD_SHIFT:
|
|
c = kbd_shiftmap[c & KBD_CHARMASK];
|
|
break;
|
|
case KBD_CTRL:
|
|
c = kbd_ctrlmap[c & KBD_CHARMASK];
|
|
break;
|
|
case KBD_KEY:
|
|
c = kbd_keymap[c & KBD_CHARMASK];
|
|
break;
|
|
default:
|
|
c = 0;
|
|
break;
|
|
}
|
|
return(c);
|
|
}
|
|
#endif
|
|
|
|
kbdnmi()
|
|
{
|
|
register struct hil_dev *hiladdr = HILADDR;
|
|
|
|
HILWAIT(hiladdr);
|
|
hiladdr->hil_cmd = HIL_CNMT;
|
|
HILWAIT(hiladdr);
|
|
hiladdr->hil_cmd = HIL_CNMT;
|
|
HILWAIT(hiladdr);
|
|
printf("\nboot interrupted\n");
|
|
}
|
|
|
|
kbdinit()
|
|
{
|
|
register struct hil_dev *hiladdr = HILADDR;
|
|
register struct kbdmap *km;
|
|
u_char lang;
|
|
|
|
HILWAIT(hiladdr);
|
|
hiladdr->hil_cmd = HIL_SETARR;
|
|
HILWAIT(hiladdr);
|
|
hiladdr->hil_data = ar_format(KBD_ARR);
|
|
HILWAIT(hiladdr);
|
|
hiladdr->hil_cmd = HIL_READKBDLANG;
|
|
HILDATAWAIT(hiladdr);
|
|
lang = hiladdr->hil_data;
|
|
for (km = kbd_map; km->kbd_code; km++)
|
|
if (km->kbd_code == lang) {
|
|
kbd_keymap = km->kbd_keymap;
|
|
kbd_shiftmap = km->kbd_shiftmap;
|
|
kbd_ctrlmap = km->kbd_ctrlmap;
|
|
}
|
|
HILWAIT(hiladdr);
|
|
hiladdr->hil_cmd = HIL_INTON;
|
|
}
|
|
#endif
|