11.4Stsutsui/*	$NetBSD: de-kbdmap.c,v 1.4 2021/05/29 09:50:04 tsutsui Exp $	*/
21.1Sleo
31.1Sleo/*
41.1Sleo * Contributed by Thomas Gerner
51.1Sleo */
61.1Sleo
71.4Stsutsui#if !defined(_KERNEL)
81.4Stsutsui#include <stdlib.h>
91.4Stsutsui#include <unistd.h>
101.4Stsutsui#endif
111.4Stsutsui
121.1Sleo#include "../../../dev/kbdmap.h"
131.1Sleo
141.1Sleo/* mode shortcuts: */
151.1Sleo#define	S KBD_MODE_STRING
161.4Stsutsui#define	C KBD_MODE_CAPS
171.4Stsutsui#define	K KBD_MODE_KPAD
181.1Sleo
191.1Sleostruct kbdmap kbdmap;
201.1Sleostruct kbdmap ascii_kbdmap = {
211.1Sleo	/* normal map */
221.1Sleo	{
231.4Stsutsui/* 0x00 */	{ 0, 0 },	{ 0, ESC },	{ 0, '1' },	{ 0, '2' },
241.4Stsutsui/* 0x04 */	{ 0, '3' },	{ 0, '4' },	{ 0, '5' },	{ 0, '6' },
251.4Stsutsui/* 0x08 */	{ 0, '7' },	{ 0, '8' },	{ 0, '9' },	{ 0, '0' },
261.4Stsutsui/* 0x0C */	{ C, 0xDF },	{ 0, '\'' },	{ 0, '\b' },	{ 0, '\t' },
271.4Stsutsui/* 0x10 */	{ C, 'q' },	{ C, 'w' },	{ C, 'e' },	{ C, 'r' },
281.4Stsutsui/* 0x14 */	{ C, 't' },	{ C, 'z' },	{ C, 'u' },	{ C, 'i' },
291.4Stsutsui/* 0x18 */	{ C, 'o' },	{ C, 'p' },	{ C, 0xFC },	{ 0, '+' },
301.4Stsutsui/* 0x1C */	{ 0, '\r' },	{ 0, 0 },	{ C, 'a' },	{ C, 's' },
311.4Stsutsui/* 0x20 */	{ C, 'd' },	{ C, 'f' },	{ C, 'g' },	{ C, 'h' },
321.4Stsutsui/* 0x24 */	{ C, 'j' },	{ C, 'k' },	{ C, 'l' },	{ C, 0xF6 },
331.4Stsutsui/* 0x28 */	{ C, 0xE4 },	{ 0, '#' },	{ 0, 0 },	{ 0, '~' },
341.4Stsutsui/* 0x2C */	{ C, 'y' },	{ C, 'x' },	{ C, 'c' },	{ C, 'v' },
351.4Stsutsui/* 0x30 */	{ C, 'b' },	{ C, 'n' },	{ C, 'm' },	{ 0, ',' },
361.4Stsutsui/* 0x34 */	{ 0, '.' },	{ 0, '-' },	{ 0, 0 },	{ 0, 0 },
371.4Stsutsui/* 0x38 */	{ 0, 0 },	{ 0, ' ' },	{ 0, 0 },	{ S, 0x10 },
381.4Stsutsui/* 0x3C */	{ S, 0x15 },	{ S, 0x1A },	{ S, 0x1F },	{ S, 0x24 },
391.4Stsutsui/* 0x40 */	{ S, 0x29 },	{ S, 0x2E },	{ S, 0x33 },	{ S, 0x38 },
401.4Stsutsui/* 0x44 */	{ S, 0x3D },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
411.4Stsutsui/* 0x48 */	{ S, 0x00 },	{ 0, 0 },	{ 0, '-' },	{ S, 0x0C },
421.4Stsutsui/* 0x4C */	{ 0, 0 },	{ S, 0x08 },	{ 0, '+' },	{ 0, 0 },
431.4Stsutsui/* 0x50 */	{ S, 0x04 },	{ 0, 0 },	{ 0, 0 },	{ 0, DEL },
441.4Stsutsui/* 0x54 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
451.4Stsutsui/* 0x58 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
461.4Stsutsui/* 0x5C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
471.1Sleo/* 0x60 */
481.4Stsutsui/* 0x60 */	{ 0, '<' },	{ 0, 0 },	{ 0, 0 },	{ 0, '(' },
491.4Stsutsui/* 0x64 */	{ 0, ')' },	{ 0, '/' },	{ 0, '*' },	{ K, '7' },
501.4Stsutsui/* 0x68 */	{ K, '8' },	{ K, '9' },	{ K, '4' },	{ K, '5' },
511.4Stsutsui/* 0x6C */	{ K, '6' },	{ K, '1' },	{ K, '2' },	{ K, '3' },
521.4Stsutsui/* 0x70 */	{ K, '0' },	{ K, '.' },	{ K, '\r' },	{ 0, 0 },
531.4Stsutsui/* 0x74 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
541.4Stsutsui/* 0x78 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
551.4Stsutsui/* 0x7C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 }
561.1Sleo},
571.1Sleo	/* shifted map */
581.1Sleo	{
591.4Stsutsui/* 0x00 */	{ 0, 0 },	{ 0, ESC },	{ 0, '!' },	{ 0, '"' },
601.4Stsutsui/* 0x04 */	{ 0, 0xA7 },	{ 0, '$' },	{ 0, '%' },	{ 0, '&' },
611.4Stsutsui/* 0x08 */	{ 0, '/' },	{ 0, '(' },	{ 0, ')' },	{ 0, '=' },
621.4Stsutsui/* 0x0C */	{ 0, '?' },	{ 0, '`' },	{ 0, '\b' },	{ 0, '\t' },
631.4Stsutsui/* 0x10 */	{ C, 'Q' },	{ C, 'W' },	{ C, 'E' },	{ C, 'R' },
641.4Stsutsui/* 0x14 */	{ C, 'T' },	{ C, 'Z' },	{ C, 'U' },	{ C, 'I' },
651.4Stsutsui/* 0x18 */	{ C, 'O' },	{ C, 'P' },	{ C, 0xDC },	{ 0, '*' },
661.4Stsutsui/* 0x1C */	{ 0, '\r' },	{ 0, 0 },	{ C, 'A' },	{ C, 'S' },
671.4Stsutsui/* 0x20 */	{ C, 'D' },	{ C, 'F' },	{ C, 'G' },	{ C, 'H' },
681.4Stsutsui/* 0x24 */	{ C, 'J' },	{ C, 'K' },	{ C, 'L' },	{ C, 0xD6 },
691.4Stsutsui/* 0x28 */	{ C, 0xC4 },	{ 0, '^' },	{ 0, 0 },	{ 0, '|' },
701.4Stsutsui/* 0x2C */	{ C, 'Y' },	{ C, 'X' },	{ C, 'C' },	{ C, 'V' },
711.4Stsutsui/* 0x30 */	{ C, 'B' },	{ C, 'N' },	{ C, 'M' },	{ 0, ';' },
721.4Stsutsui/* 0x34 */	{ 0, ':' },	{ 0, '_' },	{ 0, 0 },	{ 0, 0 },
731.4Stsutsui/* 0x38 */	{ 0, 0 },	{ 0, ' ' },	{ 0, 0 },	{ S, 0x5d },
741.4Stsutsui/* 0x3C */	{ S, 0x63 },	{ S, 0x69 },	{ S, 0x6F },	{ S, 0x75 },
751.4Stsutsui/* 0x40 */	{ S, 0x7b },	{ S, 0x81 },	{ S, 0x87 },	{ S, 0x8d },
761.4Stsutsui/* 0x44 */	{ S, 0x93 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
771.4Stsutsui/* 0x48 */	{ S, 0x47 },	{ 0, 0 },	{ 0, '-' },	{ S, 0x57 },
781.4Stsutsui/* 0x4C */	{ 0, 0 },	{ S, 0x51 },	{ 0, '+' },	{ 0, 0 },
791.4Stsutsui/* 0x50 */	{ S, 0x4c },	{ 0, 0 },	{ 0, 0 },	{ 0, DEL },
801.4Stsutsui/* 0x54 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
811.4Stsutsui/* 0x58 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
821.4Stsutsui/* 0x5C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
831.1Sleo/* 0x60 */
841.4Stsutsui/* 0x60 */	{ 0, '>' },	{ 0, 0 },	{ 0, 0 },	{ 0, '(' },
851.4Stsutsui/* 0x64 */	{ 0, ')' },	{ 0, '/' },	{ 0, '*' },	{ K, '7' },
861.4Stsutsui/* 0x68 */	{ K, '8' },	{ K, '9' },	{ K, '4' },	{ K, '5' },
871.4Stsutsui/* 0x6C */	{ K, '6' },	{ K, '1' },	{ K, '2' },	{ K, '3' },
881.4Stsutsui/* 0x70 */	{ K, '0' },	{ K, '.' },	{ K, '\r' },	{ 0, 0 },
891.4Stsutsui/* 0x74 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
901.4Stsutsui/* 0x78 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
911.4Stsutsui/* 0x7C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 }
921.1Sleo	},
931.4Stsutsui
941.1Sleo	/* alt map */
951.1Sleo	{
961.4Stsutsui/* 0x00 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
971.4Stsutsui/* 0x04 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
981.4Stsutsui/* 0x08 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
991.4Stsutsui/* 0x0C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1001.4Stsutsui/* 0x10 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1011.4Stsutsui/* 0x14 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1021.4Stsutsui/* 0x18 */	{ 0, 0 },	{ 0, 0 },	{ 0, '@' },	{ 0, 0 },
1031.4Stsutsui/* 0x1C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1041.4Stsutsui/* 0x20 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1051.4Stsutsui/* 0x24 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, '[' },
1061.4Stsutsui/* 0x28 */	{ 0, ']' },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1071.4Stsutsui/* 0x2C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1081.4Stsutsui/* 0x30 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1091.4Stsutsui/* 0x34 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1101.4Stsutsui/* 0x38 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1111.4Stsutsui/* 0x3C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1121.4Stsutsui/* 0x40 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1131.4Stsutsui/* 0x44 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1141.4Stsutsui/* 0x48 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1151.4Stsutsui/* 0x4C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1161.4Stsutsui/* 0x50 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1171.4Stsutsui/* 0x54 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1181.4Stsutsui/* 0x58 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1191.4Stsutsui/* 0x5C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1201.1Sleo/* 0x60 */
1211.4Stsutsui/* 0x60 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1221.4Stsutsui/* 0x64 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1231.4Stsutsui/* 0x68 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1241.4Stsutsui/* 0x6C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1251.4Stsutsui/* 0x70 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1261.4Stsutsui/* 0x74 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1271.4Stsutsui/* 0x78 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1281.4Stsutsui/* 0x7C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 }
1291.1Sleo	},
1301.1Sleo
1311.1Sleo	/* shift alt map */
1321.1Sleo	{
1331.4Stsutsui/* 0x00 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1341.4Stsutsui/* 0x04 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1351.4Stsutsui/* 0x08 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1361.4Stsutsui/* 0x0C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1371.4Stsutsui/* 0x10 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1381.4Stsutsui/* 0x14 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1391.4Stsutsui/* 0x18 */	{ 0, 0 },	{ 0, 0 },	{ 0, '\\' },	{ 0, 0 },
1401.4Stsutsui/* 0x1C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1411.4Stsutsui/* 0x20 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1421.4Stsutsui/* 0x24 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, '{' },
1431.4Stsutsui/* 0x28 */	{ 0, '}' },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1441.4Stsutsui/* 0x2C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1451.4Stsutsui/* 0x30 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1461.4Stsutsui/* 0x34 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1471.4Stsutsui/* 0x38 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1481.4Stsutsui/* 0x3C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1491.4Stsutsui/* 0x40 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1501.4Stsutsui/* 0x44 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1511.4Stsutsui/* 0x48 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1521.4Stsutsui/* 0x4C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1531.4Stsutsui/* 0x50 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1541.4Stsutsui/* 0x54 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1551.4Stsutsui/* 0x58 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1561.4Stsutsui/* 0x5C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1571.4Stsutsui/* 0x60 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1581.4Stsutsui/* 0x64 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1591.4Stsutsui/* 0x68 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1601.4Stsutsui/* 0x6C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1611.4Stsutsui/* 0x70 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1621.4Stsutsui/* 0x74 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1631.4Stsutsui/* 0x78 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
1641.4Stsutsui/* 0x7C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 }
1651.1Sleo	},
1661.1Sleo
1671.4Stsutsui	{
1681.4Stsutsui	/*
1691.4Stsutsui	 * string table. If there's a better way to get the offsets into the
1701.4Stsutsui	 * above table, please tell me..
1711.4Stsutsui	 *
1721.4Stsutsui	 * NOTE: save yourself and others a lot of grief by *not* using
1731.4Stsutsui	 *       CSI == 0x9b, using the two-character sequence gives
1741.4Stsutsui	 *       much less trouble, especially in GNU-Emacs..
1751.4Stsutsui	 */
1761.4Stsutsui
1771.1Sleo	  3, ESC, '[', 'A',		/* 0x00: CRSR UP */
1781.1Sleo	  3, ESC, '[', 'B',		/* 0x04: CRSR DOWN */
1791.1Sleo	  3, ESC, '[', 'C',		/* 0x08: CRSR RIGHT */
1801.1Sleo	  3, ESC, '[', 'D',		/* 0x0C: CRSR LEFT */
1811.1Sleo	  4, ESC, '[', '0', '~',	/* 0x10: F1 */
1821.1Sleo	  4, ESC, '[', '1', '~',	/* 0x15: F2 */
1831.1Sleo	  4, ESC, '[', '2', '~',	/* 0x1A: F3 */
1841.1Sleo	  4, ESC, '[', '3', '~',	/* 0x1F: F4 */
1851.1Sleo	  4, ESC, '[', '4', '~',	/* 0x24: F5 */
1861.1Sleo	  4, ESC, '[', '5', '~',	/* 0x29: F6 */
1871.1Sleo	  4, ESC, '[', '6', '~',	/* 0x2E: F7 */
1881.1Sleo	  4, ESC, '[', '7', '~',	/* 0x33: F8 */
1891.1Sleo	  4, ESC, '[', '8', '~',	/* 0x38: F9 */
1901.1Sleo	  4, ESC, '[', '9', '~',	/* 0x3D: F10 */
1911.1Sleo	  4, ESC, '[', '?', '~',	/* 0x42: HELP */
1921.1Sleo
1931.1Sleo	  4, ESC, '[', 'T', '~',	/* 0x47: shift CRSR UP */
1941.1Sleo	  4, ESC, '[', 'S', '~',	/* 0x4C: shift CRSR DOWN */
1951.1Sleo	  5, ESC, '[', ' ', '@', '~',	/* 0x51: shift CRSR RIGHT */
1961.1Sleo	  5, ESC, '[', ' ', 'A', '~',	/* 0x57: shift CRSR LEFT */
1971.1Sleo	  5, ESC, '[', '1', '0', '~',	/* 0x5D: shift F1 */
1981.1Sleo	  5, ESC, '[', '1', '1', '~',	/* 0x63: shift F2 */
1991.1Sleo	  5, ESC, '[', '1', '2', '~',	/* 0x69: shift F3 */
2001.1Sleo	  5, ESC, '[', '1', '3', '~',	/* 0x6F: shift F4 */
2011.1Sleo	  5, ESC, '[', '1', '4', '~',	/* 0x75: shift F5 */
2021.1Sleo	  5, ESC, '[', '1', '5', '~',	/* 0x7B: shift F6 */
2031.1Sleo	  5, ESC, '[', '1', '6', '~',	/* 0x81: shift F7 */
2041.1Sleo	  5, ESC, '[', '1', '7', '~',	/* 0x87: shift F8 */
2051.1Sleo	  5, ESC, '[', '1', '8', '~',	/* 0x8D: shift F9 */
2061.1Sleo	  5, ESC, '[', '1', '9', '~',	/* 0x93: shift F10 */
2071.1Sleo	  3, ESC, '[', 'Z',		/* 0x99: shift TAB */
2081.1Sleo	  2, ESC, '[',			/* 0x9d: alt ESC == CSI */
2091.1Sleo	},
2101.1Sleo};
2111.1Sleo
2121.1Sleo#ifndef _KERNEL
2131.4Stsutsuiint
2141.4Stsutsuimain(int argc, char *argv[])
2151.1Sleo{
2161.4Stsutsui
2171.4Stsutsui	exit(write(1, &ascii_kbdmap, sizeof(kbdmap)) == sizeof(kbdmap) ? 0 : 1);
2181.1Sleo}
2191.1Sleo#endif /* _KERNEL */
220