blob: 98006679b30f28cb8b48f8a0ca6ef1d096925a38 [file] [log] [blame]
Simon Glass9bc590e2012-04-17 09:01:30 +00001/*
2 * Translate key codes into ASCII
3 *
4 * Copyright (c) 2011 The Chromium OS Authors.
5 * (C) Copyright 2004 DENX Software Engineering, Wolfgang Denk, wd@denx.de
6 *
7 * See file CREDITS for list of people who contributed to this
8 * project.
9 *
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License as
12 * published by the Free Software Foundation; either version 2 of
13 * the License, or (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
23 * MA 02111-1307 USA
24 */
25
26#include <common.h>
27#include <stdio_dev.h>
28#include <input.h>
29#include <linux/input.h>
30
31enum {
32 /* These correspond to the lights on the keyboard */
33 FLAG_NUM_LOCK = 1 << 0,
34 FLAG_CAPS_LOCK = 1 << 1,
35 FLAG_SCROLL_LOCK = 1 << 2,
36
37 /* Special flag ORed with key code to indicate release */
38 KEY_RELEASE = 1 << 15,
39 KEY_MASK = 0xfff,
40};
41
42/*
43 * These takes map key codes to ASCII. 0xff means no key, or special key.
44 * Three tables are provided - one for plain keys, one for when the shift
45 * 'modifier' key is pressed and one for when the ctrl modifier key is
46 * pressed.
47 */
48static const uchar kbd_plain_xlate[] = {
49 0xff, 0x1b, '1', '2', '3', '4', '5', '6',
50 '7', '8', '9', '0', '-', '=', '\b', '\t', /* 0x00 - 0x0f */
51 'q', 'w', 'e', 'r', 't', 'y', 'u', 'i',
52 'o', 'p', '[', ']', '\r', 0xff, 'a', 's', /* 0x10 - 0x1f */
53 'd', 'f', 'g', 'h', 'j', 'k', 'l', ';',
54 '\'', '`', 0xff, '\\', 'z', 'x', 'c', 'v', /* 0x20 - 0x2f */
55 'b', 'n', 'm', ',' , '.', '/', 0xff, 0xff, 0xff,
56 ' ', 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, /* 0x30 - 0x3f */
57 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, '7',
58 '8', '9', '-', '4', '5', '6', '+', '1', /* 0x40 - 0x4f */
59 '2', '3', '0', '.', 0xff, 0xff, 0xff, 0xff,
60 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, /* 0x50 - 0x5F */
61 '\r', 0xff, 0xff
62};
63
64static unsigned char kbd_shift_xlate[] = {
65 0xff, 0x1b, '!', '@', '#', '$', '%', '^',
66 '&', '*', '(', ')', '_', '+', '\b', '\t', /* 0x00 - 0x0f */
67 'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I',
68 'O', 'P', '{', '}', '\r', 0xff, 'A', 'S', /* 0x10 - 0x1f */
69 'D', 'F', 'G', 'H', 'J', 'K', 'L', ':',
70 '"', '~', 0xff, '|', 'Z', 'X', 'C', 'V', /* 0x20 - 0x2f */
71 'B', 'N', 'M', '<', '>', '?', 0xff, 0xff, 0xff,
72 ' ', 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, /* 0x30 - 0x3f */
73 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, '7',
74 '8', '9', '-', '4', '5', '6', '+', '1', /* 0x40 - 0x4f */
75 '2', '3', '0', '.', 0xff, 0xff, 0xff, 0xff, 0xff,
76 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, /* 0x50 - 0x5F */
77 '\r', 0xff, 0xff
78};
79
80static unsigned char kbd_ctrl_xlate[] = {
81 0xff, 0x1b, '1', 0x00, '3', '4', '5', 0x1E,
82 '7', '8', '9', '0', 0x1F, '=', '\b', '\t', /* 0x00 - 0x0f */
83 0x11, 0x17, 0x05, 0x12, 0x14, 0x18, 0x15, 0x09,
84 0x0f, 0x10, 0x1b, 0x1d, '\n', 0xff, 0x01, 0x13, /* 0x10 - 0x1f */
85 0x04, 0x06, 0x08, 0x09, 0x0a, 0x0b, 0x0c, ';',
86 '\'', '~', 0x00, 0x1c, 0x1a, 0x18, 0x03, 0x16, /* 0x20 - 0x2f */
87 0x02, 0x0e, 0x0d, '<', '>', '?', 0xff, 0xff,
88 0xff, 0x00, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, /* 0x30 - 0x3f */
89 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, '7',
90 '8', '9', '-', '4', '5', '6', '+', '1', /* 0x40 - 0x4f */
91 '2', '3', '0', '.', 0xff, 0xff, 0xff, 0xff,
92 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, /* 0x50 - 0x5F */
93 '\r', 0xff, 0xff
94};
95
Hung-Te Lin44abe472012-10-11 15:15:53 +000096/*
97 * Scan key code to ANSI 3.64 escape sequence table. This table is
98 * incomplete in that it does not include all possible extra keys.
99 */
100static struct {
101 int kbd_scan_code;
102 char *escape;
103} kbd_to_ansi364[] = {
104 { KEY_UP, "\033[A"},
105 { KEY_DOWN, "\033[B"},
106 { KEY_RIGHT, "\033[C"},
107 { KEY_LEFT, "\033[D"},
108};
109
110/* Maximum number of output characters that an ANSI sequence expands to */
111#define ANSI_CHAR_MAX 3
Simon Glass9bc590e2012-04-17 09:01:30 +0000112
113int input_queue_ascii(struct input_config *config, int ch)
114{
115 if (config->fifo_in + 1 == INPUT_BUFFER_LEN) {
116 if (!config->fifo_out)
117 return -1; /* buffer full */
118 else
119 config->fifo_in = 0;
120 } else {
121 if (config->fifo_in + 1 == config->fifo_out)
122 return -1; /* buffer full */
123 config->fifo_in++;
124 }
125 config->fifo[config->fifo_in] = (uchar)ch;
126
127 return 0;
128}
129
130int input_tstc(struct input_config *config)
131{
132 if (config->fifo_in == config->fifo_out && config->read_keys) {
133 if (!(*config->read_keys)(config))
134 return 0;
135 }
136 return config->fifo_in != config->fifo_out;
137}
138
139int input_getc(struct input_config *config)
140{
141 int err = 0;
142
143 while (config->fifo_in == config->fifo_out) {
144 if (config->read_keys)
145 err = (*config->read_keys)(config);
146 if (err)
147 return -1;
148 }
149
150 if (++config->fifo_out == INPUT_BUFFER_LEN)
151 config->fifo_out = 0;
152
153 return config->fifo[config->fifo_out];
154}
155
156/**
157 * Process a modifier/special key press or release and decide which key
158 * translation array should be used as a result.
159 *
160 * TODO: Should keep track of modifier press/release
161 *
162 * @param config Input state
163 * @param key Key code to process
164 * @param release 0 if a press, 1 if a release
165 * @return pointer to keycode->ascii translation table that should be used
166 */
167static struct input_key_xlate *process_modifier(struct input_config *config,
168 int key, int release)
169{
170 struct input_key_xlate *table;
171 int flip = -1;
172 int i;
173
174 /* Start with the main table, and see what modifiers change it */
175 assert(config->num_tables > 0);
176 table = &config->table[0];
177 for (i = 1; i < config->num_tables; i++) {
178 struct input_key_xlate *tab = &config->table[i];
179
180 if (key == tab->left_keycode || key == tab->right_keycode)
181 table = tab;
182 }
183
184 /* Handle the lighted keys */
185 if (!release) {
186 switch (key) {
187 case KEY_SCROLLLOCK:
188 flip = FLAG_SCROLL_LOCK;
189 break;
190 case KEY_NUMLOCK:
191 flip = FLAG_NUM_LOCK;
192 break;
193 case KEY_CAPSLOCK:
194 flip = FLAG_CAPS_LOCK;
195 break;
196 }
197 }
198
199 if (flip != -1) {
200 int leds = 0;
201
202 config->leds ^= flip;
203 if (config->flags & FLAG_NUM_LOCK)
204 leds |= INPUT_LED_NUM;
205 if (config->flags & FLAG_CAPS_LOCK)
206 leds |= INPUT_LED_CAPS;
207 if (config->flags & FLAG_SCROLL_LOCK)
208 leds |= INPUT_LED_SCROLL;
209 config->leds = leds;
210 }
211
212 return table;
213}
214
215/**
216 * Search an int array for a key value
217 *
218 * @param array Array to search
219 * @param count Number of elements in array
220 * @param key Key value to find
221 * @return element where value was first found, -1 if none
222 */
223static int array_search(int *array, int count, int key)
224{
225 int i;
226
227 for (i = 0; i < count; i++) {
228 if (array[i] == key)
229 return i;
230 }
231
232 return -1;
233}
234
235/**
236 * Sort an array so that those elements that exist in the ordering are
237 * first in the array, and in the same order as the ordering. The algorithm
238 * is O(count * ocount) and designed for small arrays.
239 *
240 * TODO: Move this to common / lib?
241 *
242 * @param dest Array with elements to sort, also destination array
243 * @param count Number of elements to sort
244 * @param order Array containing ordering elements
245 * @param ocount Number of ordering elements
246 * @return number of elements in dest that are in order (these will be at the
247 * start of dest).
248 */
249static int sort_array_by_ordering(int *dest, int count, int *order,
250 int ocount)
251{
252 int temp[count];
253 int dest_count;
254 int same; /* number of elements which are the same */
255 int i;
256
257 /* setup output items, copy items to be sorted into our temp area */
258 memcpy(temp, dest, count * sizeof(*dest));
259 dest_count = 0;
260
261 /* work through the ordering, move over the elements we agree on */
262 for (i = 0; i < ocount; i++) {
263 if (array_search(temp, count, order[i]) != -1)
264 dest[dest_count++] = order[i];
265 }
266 same = dest_count;
267
268 /* now move over the elements that are not in the ordering */
269 for (i = 0; i < count; i++) {
270 if (array_search(order, ocount, temp[i]) == -1)
271 dest[dest_count++] = temp[i];
272 }
273 assert(dest_count == count);
274 return same;
275}
276
277/**
278 * Check a list of key codes against the previous key scan
279 *
280 * Given a list of new key codes, we check how many of these are the same
281 * as last time.
282 *
283 * @param config Input state
284 * @param keycode List of key codes to examine
285 * @param num_keycodes Number of key codes
286 * @param same Returns number of key codes which are the same
287 */
288static int input_check_keycodes(struct input_config *config,
289 int keycode[], int num_keycodes, int *same)
290{
291 /* Select the 'plain' xlate table to start with */
292 if (!config->num_tables) {
293 debug("%s: No xlate tables: cannot decode keys\n", __func__);
294 return -1;
295 }
296
297 /* sort the keycodes into the same order as the previous ones */
298 *same = sort_array_by_ordering(keycode, num_keycodes,
299 config->prev_keycodes, config->num_prev_keycodes);
300
301 memcpy(config->prev_keycodes, keycode, num_keycodes * sizeof(int));
302 config->num_prev_keycodes = num_keycodes;
303
304 return *same != num_keycodes;
305}
306
307/**
Hung-Te Lin44abe472012-10-11 15:15:53 +0000308 * Checks and converts a special key code into ANSI 3.64 escape sequence.
309 *
310 * @param config Input state
311 * @param keycode Key code to examine
312 * @param output_ch Buffer to place output characters into. It should
313 * be at least ANSI_CHAR_MAX bytes long, to allow for
314 * an ANSI sequence.
315 * @param max_chars Maximum number of characters to add to output_ch
316 * @return number of characters output, if the key was converted, otherwise 0.
317 * This may be larger than max_chars, in which case the overflow
318 * characters are not output.
319 */
320static int input_keycode_to_ansi364(struct input_config *config,
321 int keycode, char output_ch[], int max_chars)
322{
323 const char *escape;
324 int ch_count;
325 int i;
326
327 for (i = ch_count = 0; i < ARRAY_SIZE(kbd_to_ansi364); i++) {
328 if (keycode != kbd_to_ansi364[i].kbd_scan_code)
329 continue;
330 for (escape = kbd_to_ansi364[i].escape; *escape; escape++) {
331 if (ch_count < max_chars)
332 output_ch[ch_count] = *escape;
333 ch_count++;
334 }
335 return ch_count;
336 }
337
338 return 0;
339}
340
341/**
342 * Converts and queues a list of key codes in escaped ASCII string form
Simon Glass9bc590e2012-04-17 09:01:30 +0000343 * Convert a list of key codes into ASCII
344 *
345 * You must call input_check_keycodes() before this. It turns the keycode
Hung-Te Lin44abe472012-10-11 15:15:53 +0000346 * list into a list of ASCII characters and sends them to the input layer.
Simon Glass9bc590e2012-04-17 09:01:30 +0000347 *
348 * Characters which were seen last time do not generate fresh ASCII output.
Hung-Te Lin44abe472012-10-11 15:15:53 +0000349 * The output (calls to queue_ascii) may be longer than num_keycodes, if the
350 * keycode contains special keys that was encoded to longer escaped sequence.
Simon Glass9bc590e2012-04-17 09:01:30 +0000351 *
352 * @param config Input state
353 * @param keycode List of key codes to examine
354 * @param num_keycodes Number of key codes
Hung-Te Lin44abe472012-10-11 15:15:53 +0000355 * @param output_ch Buffer to place output characters into. It should
356 * be at last ANSI_CHAR_MAX * num_keycodes, to allow for
357 * ANSI sequences.
358 * @param max_chars Maximum number of characters to add to output_ch
Simon Glass9bc590e2012-04-17 09:01:30 +0000359 * @param same Number of key codes which are the same
Hung-Te Lin44abe472012-10-11 15:15:53 +0000360 * @return number of characters written into output_ch, or -1 if we would
361 * exceed max_chars chars.
Simon Glass9bc590e2012-04-17 09:01:30 +0000362 */
363static int input_keycodes_to_ascii(struct input_config *config,
Hung-Te Lin44abe472012-10-11 15:15:53 +0000364 int keycode[], int num_keycodes, char output_ch[],
365 int max_chars, int same)
Simon Glass9bc590e2012-04-17 09:01:30 +0000366{
367 struct input_key_xlate *table;
Hung-Te Lin44abe472012-10-11 15:15:53 +0000368 int ch_count = 0;
Simon Glass9bc590e2012-04-17 09:01:30 +0000369 int i;
370
371 table = &config->table[0];
372
373 /* deal with modifiers first */
374 for (i = 0; i < num_keycodes; i++) {
375 int key = keycode[i] & KEY_MASK;
376
377 if (key >= table->num_entries || table->xlate[key] == 0xff) {
378 table = process_modifier(config, key,
379 keycode[i] & KEY_RELEASE);
380 }
381 }
382
Hung-Te Lin44abe472012-10-11 15:15:53 +0000383 /* Start conversion by looking for the first new keycode (by same). */
384 for (i = same; i < num_keycodes; i++) {
Simon Glass9bc590e2012-04-17 09:01:30 +0000385 int key = keycode[i];
Hung-Te Lin44abe472012-10-11 15:15:53 +0000386 int ch = (key < table->num_entries) ? table->xlate[key] : 0xff;
Simon Glass9bc590e2012-04-17 09:01:30 +0000387
Hung-Te Lin44abe472012-10-11 15:15:53 +0000388 /*
389 * For a normal key (with an ASCII value), add it; otherwise
390 * translate special key to escape sequence if possible.
391 */
392 if (ch != 0xff) {
393 if (ch_count < max_chars)
394 output_ch[ch_count] = (uchar)ch;
395 ch_count++;
396 } else {
397 ch_count += input_keycode_to_ansi364(config, key,
398 output_ch, max_chars);
Simon Glass9bc590e2012-04-17 09:01:30 +0000399 }
400 }
401
Hung-Te Lin44abe472012-10-11 15:15:53 +0000402 if (ch_count > max_chars) {
403 debug("%s: Output char buffer overflow size=%d, need=%d\n",
404 __func__, max_chars, ch_count);
405 return -1;
406 }
407
Simon Glass9bc590e2012-04-17 09:01:30 +0000408 /* ok, so return keys */
409 return ch_count;
410}
411
412int input_send_keycodes(struct input_config *config,
413 int keycode[], int num_keycodes)
414{
Hung-Te Lin44abe472012-10-11 15:15:53 +0000415 char ch[num_keycodes * ANSI_CHAR_MAX];
Simon Glass9bc590e2012-04-17 09:01:30 +0000416 int count, i, same = 0;
417 int is_repeat = 0;
418 unsigned delay_ms;
419
420 config->modifiers = 0;
421 if (!input_check_keycodes(config, keycode, num_keycodes, &same)) {
422 /*
423 * Same as last time - is it time for another repeat?
424 * TODO(sjg@chromium.org) We drop repeats here and since
425 * the caller may not call in again for a while, our
426 * auto-repeat speed is not quite correct. We should
427 * insert another character if we later realise that we
428 * have missed a repeat slot.
429 */
Simon Glass1b1d3e62012-09-27 15:18:41 +0000430 is_repeat = config->repeat_rate_ms &&
431 (int)get_timer(config->next_repeat_ms) >= 0;
Simon Glass9bc590e2012-04-17 09:01:30 +0000432 if (!is_repeat)
433 return 0;
434 }
435
436 count = input_keycodes_to_ascii(config, keycode, num_keycodes,
Hung-Te Lin44abe472012-10-11 15:15:53 +0000437 ch, sizeof(ch), is_repeat ? 0 : same);
Simon Glass9bc590e2012-04-17 09:01:30 +0000438 for (i = 0; i < count; i++)
439 input_queue_ascii(config, ch[i]);
440 delay_ms = is_repeat ?
441 config->repeat_rate_ms :
442 config->repeat_delay_ms;
443
444 config->next_repeat_ms = get_timer(0) + delay_ms;
Hung-Te Lin44abe472012-10-11 15:15:53 +0000445
446 return count;
Simon Glass9bc590e2012-04-17 09:01:30 +0000447}
448
449int input_add_table(struct input_config *config, int left_keycode,
450 int right_keycode, const uchar *xlate, int num_entries)
451{
452 struct input_key_xlate *table;
453
454 if (config->num_tables == INPUT_MAX_MODIFIERS) {
455 debug("%s: Too many modifier tables\n", __func__);
456 return -1;
457 }
458
459 table = &config->table[config->num_tables++];
460 table->left_keycode = left_keycode;
461 table->right_keycode = right_keycode;
462 table->xlate = xlate;
463 table->num_entries = num_entries;
464
465 return 0;
466}
467
Simon Glass1b1d3e62012-09-27 15:18:41 +0000468void input_set_delays(struct input_config *config, int repeat_delay_ms,
Simon Glass9bc590e2012-04-17 09:01:30 +0000469 int repeat_rate_ms)
470{
Simon Glass1b1d3e62012-09-27 15:18:41 +0000471 config->repeat_delay_ms = repeat_delay_ms;
472 config->repeat_rate_ms = repeat_rate_ms;
473}
474
475int input_init(struct input_config *config, int leds)
476{
Simon Glass9bc590e2012-04-17 09:01:30 +0000477 memset(config, '\0', sizeof(*config));
478 config->leds = leds;
Simon Glass9bc590e2012-04-17 09:01:30 +0000479 if (input_add_table(config, -1, -1,
480 kbd_plain_xlate, ARRAY_SIZE(kbd_plain_xlate)) ||
481 input_add_table(config, KEY_LEFTSHIFT, KEY_RIGHTSHIFT,
482 kbd_shift_xlate, ARRAY_SIZE(kbd_shift_xlate)) ||
483 input_add_table(config, KEY_LEFTCTRL, KEY_RIGHTCTRL,
484 kbd_ctrl_xlate, ARRAY_SIZE(kbd_ctrl_xlate))) {
485 debug("%s: Could not add modifier tables\n", __func__);
486 return -1;
487 }
488
489 return 0;
490}
491
492int input_stdio_register(struct stdio_dev *dev)
493{
494 int error;
495
496 error = stdio_register(dev);
497
498 /* check if this is the standard input device */
499 if (!error && strcmp(getenv("stdin"), dev->name) == 0) {
500 /* reassign the console */
501 if (OVERWRITE_CONSOLE ||
502 console_assign(stdin, dev->name))
503 return -1;
504 }
505
506 return 0;
507}