1 /* 2 * QEMU keysym to keycode conversion using rdesktop keymaps 3 * 4 * Copyright (c) 2004 Johannes Schindelin 5 * 6 * Permission is hereby granted, free of charge, to any person obtaining a copy 7 * of this software and associated documentation files (the "Software"), to deal 8 * in the Software without restriction, including without limitation the rights 9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell 10 * copies of the Software, and to permit persons to whom the Software is 11 * furnished to do so, subject to the following conditions: 12 * 13 * The above copyright notice and this permission notice shall be included in 14 * all copies or substantial portions of the Software. 15 * 16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL 19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN 22 * THE SOFTWARE. 23 */ 24 25 #include "keymaps.h" 26 #include "sysemu/sysemu.h" 27 28 static int get_keysym(const name2keysym_t *table, 29 const char *name) 30 { 31 const name2keysym_t *p; 32 for(p = table; p->name != NULL; p++) { 33 if (!strcmp(p->name, name)) 34 return p->keysym; 35 } 36 if (name[0] == 'U' && strlen(name) == 5) { /* try unicode Uxxxx */ 37 char *end; 38 int ret = (int)strtoul(name + 1, &end, 16); 39 if (*end == '\0' && ret > 0) 40 return ret; 41 } 42 return 0; 43 } 44 45 46 static void add_to_key_range(struct key_range **krp, int code) { 47 struct key_range *kr; 48 for (kr = *krp; kr; kr = kr->next) { 49 if (code >= kr->start && code <= kr->end) 50 break; 51 if (code == kr->start - 1) { 52 kr->start--; 53 break; 54 } 55 if (code == kr->end + 1) { 56 kr->end++; 57 break; 58 } 59 } 60 if (kr == NULL) { 61 kr = g_malloc0(sizeof(*kr)); 62 kr->start = kr->end = code; 63 kr->next = *krp; 64 *krp = kr; 65 } 66 } 67 68 static void add_keysym(char *line, int keysym, int keycode, kbd_layout_t *k) { 69 if (keysym < MAX_NORMAL_KEYCODE) { 70 //fprintf(stderr,"Setting keysym %s (%d) to %d\n",line,keysym,keycode); 71 k->keysym2keycode[keysym] = keycode; 72 } else { 73 if (k->extra_count >= MAX_EXTRA_COUNT) { 74 fprintf(stderr, 75 "Warning: Could not assign keysym %s (0x%x) because of memory constraints.\n", 76 line, keysym); 77 } else { 78 #if 0 79 fprintf(stderr, "Setting %d: %d,%d\n", 80 k->extra_count, keysym, keycode); 81 #endif 82 k->keysym2keycode_extra[k->extra_count]. 83 keysym = keysym; 84 k->keysym2keycode_extra[k->extra_count]. 85 keycode = keycode; 86 k->extra_count++; 87 } 88 } 89 } 90 91 static kbd_layout_t *parse_keyboard_layout(const name2keysym_t *table, 92 const char *language, 93 kbd_layout_t * k) 94 { 95 FILE *f; 96 char * filename; 97 char line[1024]; 98 int len; 99 100 filename = qemu_find_file(QEMU_FILE_TYPE_KEYMAP, language); 101 f = filename ? fopen(filename, "r") : NULL; 102 g_free(filename); 103 if (!f) { 104 fprintf(stderr, 105 "Could not read keymap file: '%s'\n", language); 106 return NULL; 107 } 108 109 if (!k) 110 k = g_malloc0(sizeof(kbd_layout_t)); 111 112 for(;;) { 113 if (fgets(line, 1024, f) == NULL) 114 break; 115 len = strlen(line); 116 if (len > 0 && line[len - 1] == '\n') 117 line[len - 1] = '\0'; 118 if (line[0] == '#') 119 continue; 120 if (!strncmp(line, "map ", 4)) 121 continue; 122 if (!strncmp(line, "include ", 8)) { 123 parse_keyboard_layout(table, line + 8, k); 124 } else { 125 char *end_of_keysym = line; 126 while (*end_of_keysym != 0 && *end_of_keysym != ' ') 127 end_of_keysym++; 128 if (*end_of_keysym) { 129 int keysym; 130 *end_of_keysym = 0; 131 keysym = get_keysym(table, line); 132 if (keysym == 0) { 133 // fprintf(stderr, "Warning: unknown keysym %s\n", line); 134 } else { 135 const char *rest = end_of_keysym + 1; 136 int keycode = strtol(rest, NULL, 0); 137 138 if (strstr(rest, "numlock")) { 139 add_to_key_range(&k->keypad_range, keycode); 140 add_to_key_range(&k->numlock_range, keysym); 141 //fprintf(stderr, "keypad keysym %04x keycode %d\n", keysym, keycode); 142 } 143 144 if (strstr(rest, "shift")) { 145 keycode |= SCANCODE_SHIFT; 146 } 147 if (strstr(rest, "altgr")) { 148 keycode |= SCANCODE_ALTGR; 149 } 150 if (strstr(rest, "ctrl")) { 151 keycode |= SCANCODE_CTRL; 152 } 153 154 add_keysym(line, keysym, keycode, k); 155 156 if (strstr(rest, "addupper")) { 157 char *c; 158 for (c = line; *c; c++) 159 *c = qemu_toupper(*c); 160 keysym = get_keysym(table, line); 161 if (keysym) 162 add_keysym(line, keysym, keycode | SCANCODE_SHIFT, k); 163 } 164 } 165 } 166 } 167 } 168 fclose(f); 169 return k; 170 } 171 172 173 void *init_keyboard_layout(const name2keysym_t *table, const char *language) 174 { 175 return parse_keyboard_layout(table, language, NULL); 176 } 177 178 179 int keysym2scancode(void *kbd_layout, int keysym) 180 { 181 kbd_layout_t *k = kbd_layout; 182 if (keysym < MAX_NORMAL_KEYCODE) { 183 if (k->keysym2keycode[keysym] == 0) 184 fprintf(stderr, "Warning: no scancode found for keysym %d\n", 185 keysym); 186 return k->keysym2keycode[keysym]; 187 } else { 188 int i; 189 #ifdef XK_ISO_Left_Tab 190 if (keysym == XK_ISO_Left_Tab) 191 keysym = XK_Tab; 192 #endif 193 for (i = 0; i < k->extra_count; i++) 194 if (k->keysym2keycode_extra[i].keysym == keysym) 195 return k->keysym2keycode_extra[i].keycode; 196 } 197 return 0; 198 } 199 200 int keycode_is_keypad(void *kbd_layout, int keycode) 201 { 202 kbd_layout_t *k = kbd_layout; 203 struct key_range *kr; 204 205 for (kr = k->keypad_range; kr; kr = kr->next) 206 if (keycode >= kr->start && keycode <= kr->end) 207 return 1; 208 return 0; 209 } 210 211 int keysym_is_numlock(void *kbd_layout, int keysym) 212 { 213 kbd_layout_t *k = kbd_layout; 214 struct key_range *kr; 215 216 for (kr = k->numlock_range; kr; kr = kr->next) 217 if (keysym >= kr->start && keysym <= kr->end) 218 return 1; 219 return 0; 220 } 221