de-kbdmap.c revision 1.1
11.1Sleo/*	$NetBSD: de-kbdmap.c,v 1.1 1996/06/22 20:14:12 leo Exp $	*/
21.1Sleo
31.1Sleo/*
41.1Sleo * Contributed by Thomas Gerner
51.1Sleo */
61.1Sleo
71.1Sleo#include "../../../dev/kbdmap.h"
81.1Sleo
91.1Sleo/* mode shortcuts: */
101.1Sleo#define	S KBD_MODE_STRING
111.1Sleo#define C KBD_MODE_CAPS
121.1Sleo#define K KBD_MODE_KPAD
131.1Sleo
141.1Sleostruct kbdmap kbdmap;
151.1Sleostruct kbdmap ascii_kbdmap = {
161.1Sleo	/* normal map */
171.1Sleo	{
181.1Sleo/* 0x00 */	0, 0,		0, ESC,		0, '1',		0, '2',
191.1Sleo/* 0x04 */	0, '3',		0, '4',		0, '5',		0, '6',
201.1Sleo/* 0x08 */	0, '7',		0, '8',		0, '9',		0, '0',
211.1Sleo/* 0x0c */	C, 0xDF,	0, '\'',	0, '\b',	0, '\t',
221.1Sleo/* 0x10	*/	C, 'q',		C, 'w',		C, 'e',		C, 'r',
231.1Sleo/* 0x14 */	C, 't',		C, 'z',		C, 'u',		C, 'i',
241.1Sleo/* 0x18 */	C, 'o',		C, 'p',		C, 0xFC,	0, '+',
251.1Sleo/* 0x1c */	0, '\r',	0, 0,		C, 'a',		C, 's',
261.1Sleo/* 0x20 */	C, 'd',		C, 'f',		C, 'g',		C, 'h',
271.1Sleo/* 0x24 */	C, 'j',		C, 'k',		C, 'l',		C, 0xF6,
281.1Sleo/* 0x28 */	C, 0xE4,	0, '#',		0, 0,		0, '~',
291.1Sleo/* 0x2c */	C, 'y',		C, 'x',		C, 'c',		C, 'v',
301.1Sleo/* 0x30 */	C, 'b',		C, 'n',		C, 'm',		0, ',',
311.1Sleo/* 0x34 */	0, '.',		0, '-',		0, 0,		0, 0,
321.1Sleo/* 0x38 */	0, 0,		0, ' ',		0, 0,		S, 0x10,
331.1Sleo/* 0x3c */	S, 0x15,	S, 0x1A,	S, 0x1F,	S, 0x24,
341.1Sleo/* 0x40 */	S, 0x29,	S, 0x2E,	S, 0x33,	S, 0x38,
351.1Sleo/* 0x44 */	S, 0x3D,	0, 0,		0, 0,		0, 0,
361.1Sleo/* 0x48 */	S, 0x00,	0, 0,		0, '-',		S, 0x0C,
371.1Sleo/* 0x4c */	0, 0,		S, 0x08,	0, '+',		0, 0,
381.1Sleo/* 0x50 */	S, 0x04,	0, 0,		0, 0,		0, DEL,
391.1Sleo/* 0x54 */	0, 0,		0, 0,		0, 0,		0, 0,
401.1Sleo/* 0x58 */	0, 0,		0, 0,		0, 0,		0, 0,
411.1Sleo/* 0x5c */	0, 0,		0, 0,		0, 0,		0, 0,
421.1Sleo/* 0x60 */
431.1Sleo/* 0x60 */	0, '<',		0, 0,		0, 0,		0, '(',
441.1Sleo/* 0x64 */	0, ')',		0, '/',		0, '*',		K, '7',
451.1Sleo/* 0x68 */	K, '8',		K, '9',		K, '4',		K, '5',
461.1Sleo/* 0x6c */	K, '6',		K, '1',		K, '2',		K, '3',
471.1Sleo/* 0x70 */	K, '0',		K, '.',		K, '\r',	0, 0,
481.1Sleo/* 0x74 */	0, 0,		0, 0,		0, 0,		0, 0,
491.1Sleo/* 0x78 */	0, 0,		0, 0,		0, 0,		0, 0,
501.1Sleo/* 0x7c */	0, 0,		0, 0,		0, 0,		0, 0
511.1Sleo},
521.1Sleo	/* shifted map */
531.1Sleo	{
541.1Sleo/* 0x00 */	0, 0,		0, ESC,		0, '!',		0, '"',
551.1Sleo/* 0x04 */	0, 0xA7,	0, '$',		0, '%',		0, '&',
561.1Sleo/* 0x08 */	0, '/',		0, '(',		0, ')',		0, '=',
571.1Sleo/* 0x0c */	0, '?',		0, '`',		0, '\b',	0, '\t',
581.1Sleo/* 0x10	*/	C, 'Q',		C, 'W',		C, 'E',		C, 'R',
591.1Sleo/* 0x14 */	C, 'T',		C, 'Z',		C, 'U',		C, 'I',
601.1Sleo/* 0x18 */	C, 'O',		C, 'P',		C, 0xDC,	0, '*',
611.1Sleo/* 0x1c */	0, '\r',	0, 0,		C, 'A',		C, 'S',
621.1Sleo/* 0x20 */	C, 'D',		C, 'F',		C, 'G',		C, 'H',
631.1Sleo/* 0x24 */	C, 'J',		C, 'K',		C, 'L',		C, 0xD6,
641.1Sleo/* 0x28 */	C, 0xC4,	0, '^',		0, 0,		0, '|',
651.1Sleo/* 0x2c */	C, 'Y',		C, 'X',		C, 'C',		C, 'V',
661.1Sleo/* 0x30 */	C, 'B',		C, 'N',		C, 'M',		0, ';',
671.1Sleo/* 0x34 */	0, ':',		0, '_',		0, 0,		0, 0,
681.1Sleo/* 0x38 */	0, 0,		0, ' ',		0, 0,		S, 0x5d,
691.1Sleo/* 0x3c */	S, 0x63,	S, 0x69,	S, 0x6F,	S, 0x75,
701.1Sleo/* 0x40 */	S, 0x7b,	S, 0x81,	S, 0x87,	S, 0x8d,
711.1Sleo/* 0x44 */	S, 0x93,	0, 0,		0, 0,		0, 0,
721.1Sleo/* 0x48 */	S, 0x47,	0, 0,		0, '-',		S, 0x57,
731.1Sleo/* 0x4c */	0, 0,		S, 0x51,	0, '+',		0, 0,
741.1Sleo/* 0x50 */	S, 0x4c,	0, 0,		0, 0,		0, DEL,
751.1Sleo/* 0x54 */	0, 0,		0, 0,		0, 0,		0, 0,
761.1Sleo/* 0x58 */	0, 0,		0, 0,		0, 0,		0, 0,
771.1Sleo/* 0x5c */	0, 0,		0, 0,		0, 0,		0, 0,
781.1Sleo/* 0x60 */
791.1Sleo/* 0x60 */	0, '>',		0, 0,		0, 0,		0, '(',
801.1Sleo/* 0x64 */	0, ')',		0, '/',		0, '*',		K, '7',
811.1Sleo/* 0x68 */	K, '8',		K, '9',		K, '4',		K, '5',
821.1Sleo/* 0x6c */	K, '6',		K, '1',		K, '2',		K, '3',
831.1Sleo/* 0x70 */	K, '0',		K, '.',		K, '\r',	0, 0,
841.1Sleo/* 0x74 */	0, 0,		0, 0,		0, 0,		0, 0,
851.1Sleo/* 0x78 */	0, 0,		0, 0,		0, 0,		0, 0,
861.1Sleo/* 0x7c */	0, 0,		0, 0,		0, 0,		0, 0
871.1Sleo	},
881.1Sleo
891.1Sleo	/* alt map */
901.1Sleo	{
911.1Sleo/* 0x00 */	0, 0,		0, 0,		0, 0,		0, 0,
921.1Sleo/* 0x04 */	0, 0,		0, 0,		0, 0,		0, 0,
931.1Sleo/* 0x08 */	0, 0,		0, 0,		0, 0,		0, 0,
941.1Sleo/* 0x0c */	0, 0,		0, 0,		0, 0,		0, 0,
951.1Sleo/* 0x10 */	0, 0,		0, 0,		0, 0,		0, 0,
961.1Sleo/* 0x14 */	0, 0,		0, 0,		0, 0,		0, 0,
971.1Sleo/* 0x18 */	0, 0,		0, 0,		0, '@',		0, 0,
981.1Sleo/* 0x1c */	0, 0,		0, 0,		0, 0,		0, 0,
991.1Sleo/* 0x20 */	0, 0,		0, 0,		0, 0,		0, 0,
1001.1Sleo/* 0x24 */	0, 0,		0, 0,		0, 0,		0, '[',
1011.1Sleo/* 0x28 */	0, ']',		0, 0,		0, 0,		0, 0,
1021.1Sleo/* 0x2c */	0, 0,		0, 0,		0, 0,		0, 0,
1031.1Sleo/* 0x30 */	0, 0,		0, 0,		0, 0,		0, 0,
1041.1Sleo/* 0x34 */	0, 0,		0, 0,		0, 0,		0, 0,
1051.1Sleo/* 0x38 */	0, 0,		0, 0,		0, 0,		0, 0,
1061.1Sleo/* 0x3c */	0, 0,		0, 0,		0, 0,		0, 0,
1071.1Sleo/* 0x40 */	0, 0,		0, 0,		0, 0,		0, 0,
1081.1Sleo/* 0x44 */	0, 0,		0, 0,		0, 0,		0, 0,
1091.1Sleo/* 0x48 */	0, 0,		0, 0,		0, 0,		0, 0,
1101.1Sleo/* 0x4c */	0, 0,		0, 0,		0, 0,		0, 0,
1111.1Sleo/* 0x50 */	0, 0,		0, 0,		0, 0,		0, 0,
1121.1Sleo/* 0x54 */	0, 0,		0, 0,		0, 0,		0, 0,
1131.1Sleo/* 0x58 */	0, 0,		0, 0,		0, 0,		0, 0,
1141.1Sleo/* 0x5c */	0, 0,		0, 0,		0, 0,		0, 0,
1151.1Sleo/* 0x60 */
1161.1Sleo/* 0x60 */	0, 0,		0, 0,		0, 0,		0, 0,
1171.1Sleo/* 0x64 */	0, 0,		0, 0,		0, 0,		0, 0,
1181.1Sleo/* 0x68 */	0, 0,		0, 0,		0, 0,		0, 0,
1191.1Sleo/* 0x6c */	0, 0,		0, 0,		0, 0,		0, 0,
1201.1Sleo/* 0x70 */	0, 0,		0, 0,		0, 0,		0, 0,
1211.1Sleo/* 0x74 */	0, 0,		0, 0,		0, 0,		0, 0,
1221.1Sleo/* 0x78 */	0, 0,		0, 0,		0, 0,		0, 0,
1231.1Sleo/* 0x7c */	0, 0,		0, 0,		0, 0,		0, 0
1241.1Sleo	},
1251.1Sleo
1261.1Sleo	/* shift alt map */
1271.1Sleo	{
1281.1Sleo/* 0x00 */	0, 0,		0, 0,		0, 0,		0, 0,
1291.1Sleo/* 0x04 */	0, 0,		0, 0,		0, 0,		0, 0,
1301.1Sleo/* 0x08 */	0, 0,		0, 0,		0, 0,		0, 0,
1311.1Sleo/* 0x0c */	0, 0,		0, 0,		0, 0,		0, 0,
1321.1Sleo/* 0x10 */	0, 0,		0, 0,		0, 0,		0, 0,
1331.1Sleo/* 0x14 */	0, 0,		0, 0,		0, 0,		0, 0,
1341.1Sleo/* 0x18 */	0, 0,		0, 0,		0, '\\',	0, 0,
1351.1Sleo/* 0x1c */	0, 0,		0, 0,		0, 0,		0, 0,
1361.1Sleo/* 0x20 */	0, 0,		0, 0,		0, 0,		0, 0,
1371.1Sleo/* 0x24 */	0, 0,		0, 0,		0, 0,		0, '{',
1381.1Sleo/* 0x28 */	0, '}',		0, 0,		0, 0,		0, 0,
1391.1Sleo/* 0x2c */	0, 0,		0, 0,		0, 0,		0, 0,
1401.1Sleo/* 0x30 */	0, 0,		0, 0,		0, 0,		0, 0,
1411.1Sleo/* 0x34 */	0, 0,		0, 0,		0, 0,		0, 0,
1421.1Sleo/* 0x38 */	0, 0,		0, 0,		0, 0,		0, 0,
1431.1Sleo/* 0x3c */	0, 0,		0, 0,		0, 0,		0, 0,
1441.1Sleo/* 0x40 */	0, 0,		0, 0,		0, 0,		0, 0,
1451.1Sleo/* 0x44 */	0, 0,		0, 0,		0, 0,		0, 0,
1461.1Sleo/* 0x48 */	0, 0,		0, 0,		0, 0,		0, 0,
1471.1Sleo/* 0x4c */	0, 0,		0, 0,		0, 0,		0, 0,
1481.1Sleo/* 0x50 */	0, 0,		0, 0,		0, 0,		0, 0,
1491.1Sleo/* 0x54 */	0, 0,		0, 0,		0, 0,		0, 0,
1501.1Sleo/* 0x58 */	0, 0,		0, 0,		0, 0,		0, 0,
1511.1Sleo/* 0x5c */	0, 0,		0, 0,		0, 0,		0, 0,
1521.1Sleo/* 0x60 */	0, 0,		0, 0,		0, 0,		0, 0,
1531.1Sleo/* 0x64 */	0, 0,		0, 0,		0, 0,		0, 0,
1541.1Sleo/* 0x68 */	0, 0,		0, 0,		0, 0,		0, 0,
1551.1Sleo/* 0x6c */	0, 0,		0, 0,		0, 0,		0, 0,
1561.1Sleo/* 0x70 */	0, 0,		0, 0,		0, 0,		0, 0,
1571.1Sleo/* 0x74 */	0, 0,		0, 0,		0, 0,		0, 0,
1581.1Sleo/* 0x78 */	0, 0,		0, 0,		0, 0,		0, 0,
1591.1Sleo/* 0x7c */	0, 0,		0, 0,		0, 0,		0, 0
1601.1Sleo	},
1611.1Sleo
1621.1Sleo	{
1631.1Sleo	  /* string table. If there's a better way to get the offsets into the
1641.1Sleo	     above table, please tell me..
1651.1Sleo
1661.1Sleo	     NOTE: save yourself and others a lot of grief by *not* using
1671.1Sleo	           CSI == 0x9b, using the two-character sequence gives
1681.1Sleo	           much less trouble, especially in GNU-Emacs.. */
1691.1Sleo
1701.1Sleo	  3, ESC, '[', 'A',		/* 0x00: CRSR UP */
1711.1Sleo	  3, ESC, '[', 'B',		/* 0x04: CRSR DOWN */
1721.1Sleo	  3, ESC, '[', 'C',		/* 0x08: CRSR RIGHT */
1731.1Sleo	  3, ESC, '[', 'D',		/* 0x0C: CRSR LEFT */
1741.1Sleo	  4, ESC, '[', '0', '~',	/* 0x10: F1 */
1751.1Sleo	  4, ESC, '[', '1', '~',	/* 0x15: F2 */
1761.1Sleo	  4, ESC, '[', '2', '~',	/* 0x1A: F3 */
1771.1Sleo	  4, ESC, '[', '3', '~',	/* 0x1F: F4 */
1781.1Sleo	  4, ESC, '[', '4', '~',	/* 0x24: F5 */
1791.1Sleo	  4, ESC, '[', '5', '~',	/* 0x29: F6 */
1801.1Sleo	  4, ESC, '[', '6', '~',	/* 0x2E: F7 */
1811.1Sleo	  4, ESC, '[', '7', '~',	/* 0x33: F8 */
1821.1Sleo	  4, ESC, '[', '8', '~',	/* 0x38: F9 */
1831.1Sleo	  4, ESC, '[', '9', '~',	/* 0x3D: F10 */
1841.1Sleo	  4, ESC, '[', '?', '~',	/* 0x42: HELP */
1851.1Sleo
1861.1Sleo	  4, ESC, '[', 'T', '~',	/* 0x47: shift CRSR UP */
1871.1Sleo	  4, ESC, '[', 'S', '~',	/* 0x4C: shift CRSR DOWN */
1881.1Sleo	  5, ESC, '[', ' ', '@', '~',	/* 0x51: shift CRSR RIGHT */
1891.1Sleo	  5, ESC, '[', ' ', 'A', '~',	/* 0x57: shift CRSR LEFT */
1901.1Sleo	  5, ESC, '[', '1', '0', '~',	/* 0x5D: shift F1 */
1911.1Sleo	  5, ESC, '[', '1', '1', '~',	/* 0x63: shift F2 */
1921.1Sleo	  5, ESC, '[', '1', '2', '~',	/* 0x69: shift F3 */
1931.1Sleo	  5, ESC, '[', '1', '3', '~',	/* 0x6F: shift F4 */
1941.1Sleo	  5, ESC, '[', '1', '4', '~',	/* 0x75: shift F5 */
1951.1Sleo	  5, ESC, '[', '1', '5', '~',	/* 0x7B: shift F6 */
1961.1Sleo	  5, ESC, '[', '1', '6', '~',	/* 0x81: shift F7 */
1971.1Sleo	  5, ESC, '[', '1', '7', '~',	/* 0x87: shift F8 */
1981.1Sleo	  5, ESC, '[', '1', '8', '~',	/* 0x8D: shift F9 */
1991.1Sleo	  5, ESC, '[', '1', '9', '~',	/* 0x93: shift F10 */
2001.1Sleo	  3, ESC, '[', 'Z',		/* 0x99: shift TAB */
2011.1Sleo	  2, ESC, '[',			/* 0x9d: alt ESC == CSI */
2021.1Sleo	},
2031.1Sleo};
2041.1Sleo
2051.1Sleo#ifndef _KERNEL
2061.1Sleomain()
2071.1Sleo{
2081.1Sleo  write (1, &ascii_kbdmap, sizeof (kbdmap));
2091.1Sleo}
2101.1Sleo#endif /* _KERNEL */
211