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 { "@�BCD�FGH�JKLMN�PQRST�VWXYZ[\\]^_" 189 "`�bcd�fgh�jklmn�pqrst�vwxyz{|}~\177"}, /* KBD_ACC_GRAVE */ 190 191 { "@�BCD�FGH�JKLMN�PQRST�VWXYZ[\\]^_" 192 "`�bcd�fgh�jklmn�pqrst�vwxyz{|}~\177"}, /* KBD_ACC_ACUTE */ 193 194 { "@�BCD�FGH�JKLMN�PQRST�VWXYZ[\\]^_" 195 "`�bcd�fgh�jklmn�pqrst�vwxyz{|}~\177"}, /* KBD_ACC_CIRC */ 196 197 { "@�BCDEFGHIJKLM��PQRSTUVWXYZ[\\]^_" 198 "`�bcdefghijklm��pqrstuvwxyz{|}~\177"}, /* KBD_ACC_TILDE */ 199 200 { "@�BCD�FGH�JKLMN�PQRST�VWXYZ[\\]^_" 201 "`�bcd�fgh�jklmn�pqrst�vwxyz{|}~\177"}, /* KBD_ACC_DIER */ 202 }; 203