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