xref: /src/sys/arch/atari/stand/keymaps/uk/uk-kbdmap.c

/*	$NetBSD: uk-kbdmap.c,v 1.4 2021/05/29 09:50:04 tsutsui Exp $	*/

#if !defined(_KERNEL)
#include <stdlib.h>
#include <unistd.h>
#endif

#include "../../../dev/kbdmap.h"

/* mode shortcuts: */
#define	S KBD_MODE_STRING
#define	C KBD_MODE_CAPS
#define	K KBD_MODE_KPAD

struct kbdmap kbdmap;
struct kbdmap ascii_kbdmap = {
	/* normal map */
	{
/* 0x00 */	{ 0, 0 },	{ 0, ESC },	{ 0, '1' },	{ 0, '2' },
/* 0x04 */	{ 0, '3' },	{ 0, '4' },	{ 0, '5' },	{ 0, '6' },
/* 0x08 */	{ 0, '7' },	{ 0, '8' },	{ 0, '9' },	{ 0, '0' },
/* 0x0C */	{ 0, '-' },	{ 0, '=' },	{ 0, '\b' },{ 0, '\t' },
/* 0x10 */	{ C, 'q' },	{ C, 'w' },	{ C, 'e' },	{ C, 'r' },
/* 0x14 */	{ C, 't' },	{ C, 'y' },	{ C, 'u' },	{ C, 'i' },
/* 0x18 */	{ C, 'o' },	{ C, 'p' },	{ 0, '[' },	{ 0, ']' },
/* 0x1C */	{ 0, '\r' },	{ 0, 0 },	{ C, 'a' },	{ C, 's' },
/* 0x20 */	{ C, 'd' },	{ C, 'f' },	{ C, 'g' },	{ C, 'h' },
/* 0x24 */	{ C, 'j' },	{ C, 'k' },	{ C, 'l' },	{ 0, ';' },
/* 0x28 */	{ 0, '\'' },	{ 0, '`' },	{ 0, 0 },	{ 0, '#' },
/* 0x2C */	{ C, 'z' },	{ C, 'x' },	{ C, 'c' },	{ C, 'v' },
/* 0x30 */	{ C, 'b' },	{ C, 'n' },	{ C, 'm' },	{ 0, ',' },
/* 0x34 */	{ 0, '.' },	{ 0, '/' },	{ 0, 0 },	{ 0, 0 },
/* 0x38 */	{ 0, 0 },	{ 0, ' ' },	{ 0, 0 },	{ S, 0x10 },
/* 0x3C */	{ S, 0x15 },	{ S, 0x1A },	{ S, 0x1F },	{ S, 0x24 },
/* 0x40 */	{ S, 0x29 },	{ S, 0x2E },	{ S, 0x33 },	{ S, 0x38 },
/* 0x44 */	{ S, 0x3D },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x48 */	{ S, 0x00 },	{ 0, 0 },	{ 0, '-' },	{ S, 0x0C },
/* 0x4C */	{ 0, 0 },	{ S, 0x08 },	{ 0, '+' },	{ 0, 0 },
/* 0x50 */	{ S, 0x04 },	{ 0, 0 },	{ 0, 0 },	{ 0, DEL },
/* 0x54 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x58 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x5C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x60 */
/* 0x60 */	{ 0, '\\' },	{ 0, 0 },	{ 0, 0 },	{ 0, '(' },
/* 0x64 */	{ 0, ')' },	{ 0, '/' },	{ 0, '*' },	{ K, '7' },
/* 0x68 */	{ K, '8' },	{ K, '9' },	{ K, '4' },	{ K, '5' },
/* 0x6C */	{ K, '6' },	{ K, '1' },	{ K, '2' },	{ K, '3' },
/* 0x70 */	{ K, '0' },	{ K, '.' },	{ K, '\r' },	{ 0, 0 },
/* 0x74 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x78 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x7C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 }
},
	/* shifted map */
	{
/* 0x00 */	{ 0, 0 },	{ 0, ESC },	{ 0, '!' },	{ 0, '"' },
/* 0x04 */	{ 0, '#' },	{ 0, '$' },	{ 0, '%' },	{ 0, '^' },
/* 0x08 */	{ 0, '&' },	{ 0, '*' },	{ 0, '(' },	{ 0, ')' },
/* 0x0C */	{ 0, '_' },	{ 0, '+' },	{ 0, '\b' },	{ 0, '\t' },
/* 0x10 */	{ C, 'Q' },	{ C, 'W' },	{ C, 'E' },	{ C, 'R' },
/* 0x14 */	{ C, 'T' },	{ C, 'Y' },	{ C, 'U' },	{ C, 'I' },
/* 0x18 */	{ C, 'O' },	{ C, 'P' },	{ 0, '{' },	{ 0, '}' },
/* 0x1C */	{ 0, '\r' },	{ 0, 0 },	{ C, 'A' },	{ C, 'S' },
/* 0x20 */	{ C, 'D' },	{ C, 'F' },	{ C, 'G' },	{ C, 'H' },
/* 0x24 */	{ C, 'J' },	{ C, 'K' },	{ C, 'L' },	{ 0, ':' },
/* 0x28 */	{ 0, '@' },	{ 0, '_' },	{ 0, 0 },	{ 0, '~' },
/* 0x2C */	{ C, 'Z' },	{ C, 'X' },	{ C, 'C' },	{ C, 'V' },
/* 0x30 */	{ C, 'B' },	{ C, 'N' },	{ C, 'M' },	{ 0, '<' },
/* 0x34 */	{ 0, '>' },	{ 0, '?' },	{ 0, 0 },	{ 0, 0 },
/* 0x38 */	{ 0, 0 },	{ 0, ' ' },	{ 0, 0 },	{ S, 0x5d },
/* 0x3C */	{ S, 0x63 },	{ S, 0x69 },	{ S, 0x6F },	{ S, 0x75 },
/* 0x40 */	{ S, 0x7b },	{ S, 0x81 },	{ S, 0x87 },	{ S, 0x8d },
/* 0x44 */	{ S, 0x93 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x48 */	{ S, 0x47 },	{ 0, 0 },	{ 0, '-' },	{ S, 0x57 },
/* 0x4C */	{ 0, 0 },	{ S, 0x51 },	{ 0, '+' },	{ 0, 0 },
/* 0x50 */	{ S, 0x4c },	{ 0, 0 },	{ 0, 0 },	{ 0, DEL },
/* 0x54 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x58 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x5C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x60 */
/* 0x60 */	{ 0, '|' },	{ 0, 0 },	{ 0, 0 },	{ 0, '(' },
/* 0x64 */	{ 0, ')' },	{ 0, '/' },	{ 0, '*' },	{ K, '7' },
/* 0x68 */	{ K, '8' },	{ K, '9' },	{ K, '4' },	{ K, '5' },
/* 0x6C */	{ K, '6' },	{ K, '1' },	{ K, '2' },	{ K, '3' },
/* 0x70 */	{ K, '0' },	{ K, '.' },	{ K, '\r' },	{ 0, 0 },
/* 0x74 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x78 */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },
/* 0x7C */	{ 0, 0 },	{ 0, 0 },	{ 0, 0 },	{ 0, 0 }
	},

	/* alt map FIXME: No altmap yet.. */
	{
		{ 0, 0 }
	},

	/* shift alt map FIXME: No shift altmap yet... */
	{
		{ 0, 0 }
	},

	{
	/*
	 * string table. If there's a better way to get the offsets into the
	 * above table, please tell me..
	 *
	 * NOTE: save yourself and others a lot of grief by *not* using
	 *       CSI == 0x9b, using the two-character sequence gives
	 *       much less trouble, especially in GNU-Emacs..
	 */

	  3, ESC, '[', 'A',		/* 0x00: CRSR UP */
	  3, ESC, '[', 'B',		/* 0x04: CRSR DOWN */
	  3, ESC, '[', 'C',		/* 0x08: CRSR RIGHT */
	  3, ESC, '[', 'D',		/* 0x0C: CRSR LEFT */
	  4, ESC, '[', '0', '~',	/* 0x10: F1 */
	  4, ESC, '[', '1', '~',	/* 0x15: F2 */
	  4, ESC, '[', '2', '~',	/* 0x1A: F3 */
	  4, ESC, '[', '3', '~',	/* 0x1F: F4 */
	  4, ESC, '[', '4', '~',	/* 0x24: F5 */
	  4, ESC, '[', '5', '~',	/* 0x29: F6 */
	  4, ESC, '[', '6', '~',	/* 0x2E: F7 */
	  4, ESC, '[', '7', '~',	/* 0x33: F8 */
	  4, ESC, '[', '8', '~',	/* 0x38: F9 */
	  4, ESC, '[', '9', '~',	/* 0x3D: F10 */
	  4, ESC, '[', '?', '~',	/* 0x42: HELP */

	  4, ESC, '[', 'T', '~',	/* 0x47: shift CRSR UP */
	  4, ESC, '[', 'S', '~',	/* 0x4C: shift CRSR DOWN */
	  5, ESC, '[', ' ', '@', '~',	/* 0x51: shift CRSR RIGHT */
	  5, ESC, '[', ' ', 'A', '~',	/* 0x57: shift CRSR LEFT */
	  5, ESC, '[', '1', '0', '~',	/* 0x5D: shift F1 */
	  5, ESC, '[', '1', '1', '~',	/* 0x63: shift F2 */
	  5, ESC, '[', '1', '2', '~',	/* 0x69: shift F3 */
	  5, ESC, '[', '1', '3', '~',	/* 0x6F: shift F4 */
	  5, ESC, '[', '1', '4', '~',	/* 0x75: shift F5 */
	  5, ESC, '[', '1', '5', '~',	/* 0x7B: shift F6 */
	  5, ESC, '[', '1', '6', '~',	/* 0x81: shift F7 */
	  5, ESC, '[', '1', '7', '~',	/* 0x87: shift F8 */
	  5, ESC, '[', '1', '8', '~',	/* 0x8D: shift F9 */
	  5, ESC, '[', '1', '9', '~',	/* 0x93: shift F10 */
	  3, ESC, '[', 'Z',		/* 0x99: shift TAB */
	  2, ESC, '[',			/* 0x9d: alt ESC == CSI */
	},
};

#ifndef _KERNEL
int
main(int argc, char *argv[])
{

	exit(write(1, &ascii_kbdmap, sizeof(kbdmap)) == sizeof(kbdmap) ? 0 : 1);
}
#endif /* _KERNEL */