Home | History | Annotate | Line # | Download | only in dev
      1 /*	$NetBSD: kbdmap.c,v 1.7 2023/01/06 10:28:28 tsutsui Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1995 Leo Weppelman.
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  *
     16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     21  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     22  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     23  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     25  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     26  */
     27 
     28 #include <sys/cdefs.h>
     29 __KERNEL_RCSID(0, "$NetBSD: kbdmap.c,v 1.7 2023/01/06 10:28:28 tsutsui Exp $");
     30 
     31 #include <atari/dev/kbdmap.h>
     32 
     33 /* define a default keymap. This can be changed by keyboard ioctl's
     34    (later at least..) */
     35 
     36 /* mode shortcuts: */
     37 #define	S KBD_MODE_STRING
     38 #define C KBD_MODE_CAPS
     39 #define K KBD_MODE_KPAD
     40 
     41 struct kbdmap ascii_kbdmap = {
     42 	/* normal map */
     43 	{
     44 /* 0x00 */	{ 0, 0    },	{ 0, ESC  },	{ 0, '1'  },	{ 0, '2'  },
     45 /* 0x04 */	{ 0, '3'  },	{ 0, '4'  },	{ 0, '5'  },	{ 0, '6'  },
     46 /* 0x08 */	{ 0, '7'  },	{ 0, '8'  },	{ 0, '9'  },	{ 0, '0'  },
     47 /* 0x0c */	{ 0, '-'  },	{ 0, '='  },	{ 0, '\b' },	{ 0, '\t' },
     48 /* 0x10	*/	{ C, 'q'  },	{ C, 'w'  },	{ C, 'e'  },	{ C, 'r'  },
     49 /* 0x14 */	{ C, 't'  },	{ C, 'y'  },	{ C, 'u'  },	{ C, 'i'  },
     50 /* 0x18 */	{ C, 'o'  },	{ C, 'p'  },	{ 0, '['  },	{ 0, ']'  },
     51 /* 0x1c */	{ 0, '\r' },	{ 0, 0    },	{ C, 'a'  },	{ C, 's'  },
     52 /* 0x20 */	{ C, 'd'  },	{ C, 'f'  },	{ C, 'g'  },	{ C, 'h'  },
     53 /* 0x24 */	{ C, 'j'  },	{ C, 'k'  },	{ C, 'l'  },	{ 0, ';'  },
     54 #ifdef US_KBD
     55 /* 0x28 */	{ 0, '\'' },	{ 0, '`'  },	{ 0, 0    },	{ 0, '\\' },
     56 #else
     57 /* 0x28 */	{ 0, '\'' },	{ 0, '`'  },	{ 0, 0    },	{ 0, '#'  },
     58 #endif
     59 /* 0x2c */	{ C, 'z'  },	{ C, 'x'  },	{ C, 'c'  },	{ C, 'v'  },
     60 /* 0x30 */	{ C, 'b'  },	{ C, 'n'  },	{ C, 'm'  },	{ 0, ','  },
     61 /* 0x34 */	{ 0, '.'  },	{ 0, '/'  },	{ 0, 0    },	{ 0, 0    },
     62 /* 0x38 */	{ 0, 0    },	{ 0, ' '  },	{ 0, 0    },	{ S, 0x10 },
     63 /* 0x3c */	{ S, 0x15 },	{ S, 0x1A },	{ S, 0x1F },	{ S, 0x24 },
     64 /* 0x40 */	{ S, 0x29 },	{ S, 0x2E },	{ S, 0x33 },	{ S, 0x38 },
     65 /* 0x44 */	{ S, 0x3D },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
     66 /* 0x48 */	{ S, 0x00 },	{ 0, 0    },	{ 0, '-'  },	{ S, 0x0C },
     67 /* 0x4c */	{ 0, 0    },	{ S, 0x08 },	{ 0, '+'  },	{ 0, 0    },
     68 /* 0x50 */	{ S, 0x04 },	{ 0, 0    },	{ 0, 0    },	{ 0, DEL  },
     69 /* 0x54 */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
     70 /* 0x58 */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
     71 /* 0x5c */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
     72 #ifdef US_KBD
     73 /* 0x60 */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, '('  },
     74 #else
     75 /* 0x60 */	{ 0, '\\' },	{ 0, 0    },	{ 0, 0    },	{ 0, '('  },
     76 #endif
     77 /* 0x64 */	{ 0, ')'  },	{ 0, '/'  },	{ 0, '*'  },	{ K, '7'  },
     78 /* 0x68 */	{ K, '8'  },	{ K, '9'  },	{ K, '4'  },	{ K, '5'  },
     79 /* 0x6c */	{ K, '6'  },	{ K, '1'  },	{ K, '2'  },	{ K, '3'  },
     80 /* 0x70 */	{ K, '0'  },	{ K, '.'  },	{ K, '\r' },	{ 0, 0    },
     81 /* 0x74 */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
     82 /* 0x78 */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
     83 /* 0x7c */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    }
     84 },
     85 	/* shifted map */
     86 	{
     87 #ifdef US_KBD
     88 /* 0x00 */	{ 0, 0    },	{ 0, ESC  },	{ 0, '!'  },	{ 0, '@'  },
     89 #else
     90 /* 0x00 */	{ 0, 0    },	{ 0, ESC  },	{ 0, '!'  },	{ 0, '"'  },
     91 #endif
     92 /* 0x04 */	{ 0, '#'  },	{ 0, '$'  },	{ 0, '%'  },	{ 0, '^'  },
     93 /* 0x08 */	{ 0, '&'  },	{ 0, '*'  },	{ 0, '('  },	{ 0, ')'  },
     94 /* 0x0c */	{ 0, '_'  },	{ 0, '+'  },	{ 0, '\b' },	{ 0, '\t' },
     95 /* 0x10	*/	{ C, 'Q'  },	{ C, 'W'  },	{ C, 'E'  },	{ C, 'R'  },
     96 /* 0x14 */	{ C, 'T'  },	{ C, 'Y'  },	{ C, 'U'  },	{ C, 'I'  },
     97 /* 0x18 */	{ C, 'O'  },	{ C, 'P'  },	{ 0, '{'  },	{ 0, '}'  },
     98 /* 0x1c */	{ 0, '\r' },	{ 0, 0    },	{ C, 'A'  },	{ C, 'S'  },
     99 /* 0x20 */	{ C, 'D'  },	{ C, 'F'  },	{ C, 'G'  },	{ C, 'H'  },
    100 /* 0x24 */	{ C, 'J'  },	{ C, 'K'  },	{ C, 'L'  },	{ 0, ':'  },
    101 #ifdef US_KBD
    102 /* 0x28 */	{ 0, '"'  },	{ 0, '~'  },	{ 0, 0    },	{ 0, '|'  },
    103 #else
    104 /* 0x28 */	{ 0, '@'  },	{ 0, '_'  },	{ 0, 0    },	{ 0, '~'  },
    105 #endif
    106 /* 0x2c */	{ C, 'Z'  },	{ C, 'X'  },	{ C, 'C'  },	{ C, 'V'  },
    107 /* 0x30 */	{ C, 'B'  },	{ C, 'N'  },	{ C, 'M'  },	{ 0, '<'  },
    108 /* 0x34 */	{ 0, '>'  },	{ 0, '?'  },	{ 0, 0    },	{ 0, 0    },
    109 /* 0x38 */	{ 0, 0    },	{ 0, ' '  },	{ 0, 0    },	{ S, 0x5d },
    110 /* 0x3c */	{ S, 0x63 },	{ S, 0x69 },	{ S, 0x6F },	{ S, 0x75 },
    111 /* 0x40 */	{ S, 0x7b },	{ S, 0x81 },	{ S, 0x87 },	{ S, 0x8d },
    112 /* 0x44 */	{ S, 0x93 },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
    113 /* 0x48 */	{ S, 0x47 },	{ 0, 0    },	{ 0, '-'  },	{ S, 0x57 },
    114 /* 0x4c */	{ 0, 0    },	{ S, 0x51 },	{ 0, '+'  },	{ 0, 0    },
    115 /* 0x50 */	{ S, 0x4c },	{ 0, 0    },	{ 0, 0    },	{ 0, DEL  },
    116 /* 0x54 */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
    117 /* 0x58 */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
    118 /* 0x5c */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
    119 /* 0x60 */
    120 #ifdef US_KBD
    121 /* 0x60 */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, '('  },
    122 #else
    123 /* 0x60 */	{ 0, '|'  },	{ 0, 0    },	{ 0, 0    },	{ 0, '('  },
    124 #endif
    125 /* 0x64 */	{ 0, ')'  },	{ 0, '/'  },	{ 0, '*'  },	{ K, '7'  },
    126 /* 0x68 */	{ K, '8'  },	{ K, '9'  },	{ K, '4'  },	{ K, '5'  },
    127 /* 0x6c */	{ K, '6'  },	{ K, '1'  },	{ K, '2'  },	{ K, '3'  },
    128 /* 0x70 */	{ K, '0'  },	{ K, '.'  },	{ K, '\r' },	{ 0, 0    },
    129 /* 0x74 */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
    130 /* 0x78 */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },
    131 /* 0x7c */	{ 0, 0    },	{ 0, 0    },	{ 0, 0    },	{ 0, 0    }
    132 	},
    133 
    134 	/* alt map FIXME: No altmap yet.. */
    135 	{
    136 		{ 0, 0    }
    137 	},
    138 
    139 	/* shift alt map FIXME: No shift altmap yet... */
    140 	{
    141 		{ 0, 0    }
    142 	},
    143 
    144 	{
    145 	  /* string table. If there's a better way to get the offsets into the
    146 	     above table, please tell me..
    147 
    148 	     NOTE: save yourself and others a lot of grief by *not* using
    149 	           CSI == 0x9b, using the two-character sequence gives
    150 	           much less trouble, especially in GNU-Emacs.. */
    151 
    152 	  3, ESC, '[', 'A',		/* 0x00: CRSR UP */
    153 	  3, ESC, '[', 'B',		/* 0x04: CRSR DOWN */
    154 	  3, ESC, '[', 'C',		/* 0x08: CRSR RIGHT */
    155 	  3, ESC, '[', 'D',		/* 0x0C: CRSR LEFT */
    156 	  4, ESC, '[', '0', '~',	/* 0x10: F1 */
    157 	  4, ESC, '[', '1', '~',	/* 0x15: F2 */
    158 	  4, ESC, '[', '2', '~',	/* 0x1A: F3 */
    159 	  4, ESC, '[', '3', '~',	/* 0x1F: F4 */
    160 	  4, ESC, '[', '4', '~',	/* 0x24: F5 */
    161 	  4, ESC, '[', '5', '~',	/* 0x29: F6 */
    162 	  4, ESC, '[', '6', '~',	/* 0x2E: F7 */
    163 	  4, ESC, '[', '7', '~',	/* 0x33: F8 */
    164 	  4, ESC, '[', '8', '~',	/* 0x38: F9 */
    165 	  4, ESC, '[', '9', '~',	/* 0x3D: F10 */
    166 	  4, ESC, '[', '?', '~',	/* 0x42: HELP */
    167 
    168 	  4, ESC, '[', 'T', '~',	/* 0x47: shift CRSR UP */
    169 	  4, ESC, '[', 'S', '~',	/* 0x4C: shift CRSR DOWN */
    170 	  5, ESC, '[', ' ', '@', '~',	/* 0x51: shift CRSR RIGHT */
    171 	  5, ESC, '[', ' ', 'A', '~',	/* 0x57: shift CRSR LEFT */
    172 	  5, ESC, '[', '1', '0', '~',	/* 0x5D: shift F1 */
    173 	  5, ESC, '[', '1', '1', '~',	/* 0x63: shift F2 */
    174 	  5, ESC, '[', '1', '2', '~',	/* 0x69: shift F3 */
    175 	  5, ESC, '[', '1', '3', '~',	/* 0x6F: shift F4 */
    176 	  5, ESC, '[', '1', '4', '~',	/* 0x75: shift F5 */
    177 	  5, ESC, '[', '1', '5', '~',	/* 0x7B: shift F6 */
    178 	  5, ESC, '[', '1', '6', '~',	/* 0x81: shift F7 */
    179 	  5, ESC, '[', '1', '7', '~',	/* 0x87: shift F8 */
    180 	  5, ESC, '[', '1', '8', '~',	/* 0x8D: shift F9 */
    181 	  5, ESC, '[', '1', '9', '~',	/* 0x93: shift F10 */
    182 	  3, ESC, '[', 'Z',		/* 0x99: shift TAB */
    183 	  2, ESC, '[',			/* 0x9d: alt ESC == CSI */
    184 	},
    185 };
    186 
    187 unsigned char acctable[KBD_NUM_ACC][64] = {
    188   {	"@BCDFGHJKLMNPQRSTVWXYZ[\\]^_"
    189 	"`bcdfghjklmnpqrstvwxyz{|}~\177"},	/* KBD_ACC_GRAVE */
    190 
    191   {	"@BCDFGHJKLMNPQRSTVWXYZ[\\]^_"
    192 	"`bcdfghjklmnpqrstvwxyz{|}~\177"},	/* KBD_ACC_ACUTE */
    193 
    194   {	"@BCDFGHJKLMNPQRSTVWXYZ[\\]^_"
    195 	"`bcdfghjklmnpqrstvwxyz{|}~\177"},	/* KBD_ACC_CIRC */
    196 
    197   {	"@BCDEFGHIJKLMPQRSTUVWXYZ[\\]^_"
    198 	"`bcdefghijklmpqrstuvwxyz{|}~\177"},	/* KBD_ACC_TILDE */
    199 
    200   {	"@BCDFGHJKLMNPQRSTVWXYZ[\\]^_"
    201 	"`bcdfghjklmnpqrstvwxyz{|}~\177"},	/* KBD_ACC_DIER */
    202 };
    203