blob: aa164b0c9fdf51f4ae01c656959ba9b24b471f58 [file] [log] [blame]
wdenkc7de8292002-11-19 11:04:11 +00001/*
2 * (C) Copyright 2002
3 * John W. Linville, linville@tuxdriver.com
wdenk8bde7f72003-06-27 21:31:46 +00004 *
wdenkc7de8292002-11-19 11:04:11 +00005 * Modified from code for support of MIP405 and PIP405 boards. Previous
6 * copyright follows.
7 *
8 * (C) Copyright 2001
9 * Denis Peter, MPL AG Switzerland, d.peter@mpl.ch
10 *
11 * See file CREDITS for list of people who contributed to this
12 * project.
13 *
14 * This program is free software; you can redistribute it and/or
15 * modify it under the terms of the GNU General Public License as
16 * published by the Free Software Foundation; either version 2 of
17 * the License, or (at your option) any later version.
18 *
19 * This program is distributed in the hope that it will be useful,
20 * but WITHOUT ANY WARRANTY; without even the implied warranty of
21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 * GNU General Public License for more details.
23 *
24 * You should have received a copy of the GNU General Public License
25 * along with this program; if not, write to the Free Software
26 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
27 * MA 02111-1307 USA
28 *
29 *
30 * Source partly derived from:
31 * linux/drivers/char/pc_keyb.c
32 *
33 *
34 */
35#include <common.h>
36#include <asm/processor.h>
Jean-Christophe PLAGNIOL-VILLARD52cb4d42009-05-16 12:14:54 +020037#include <stdio_dev.h>
wdenkc7de8292002-11-19 11:04:11 +000038#include "ps2kbd.h"
39
40
41unsigned char kbd_read_status(void);
42unsigned char kbd_read_input(void);
43void kbd_send_data(unsigned char data);
44void i8259_mask_irq(unsigned int irq);
45void i8259_unmask_irq(unsigned int irq);
46
47/* used only by send_data - set by keyboard_interrupt */
48
49
50#undef KBG_DEBUG
wdenkc7de8292002-11-19 11:04:11 +000051
52#ifdef KBG_DEBUG
53#define PRINTF(fmt,args...) printf (fmt ,##args)
54#else
55#define PRINTF(fmt,args...)
56#endif
57
58#define KBD_STAT_KOBF 0x01
59#define KBD_STAT_IBF 0x02
60#define KBD_STAT_SYS 0x04
Wolfgang Denk53677ef2008-05-20 16:00:29 +020061#define KBD_STAT_CD 0x08
wdenkc7de8292002-11-19 11:04:11 +000062#define KBD_STAT_LOCK 0x10
63#define KBD_STAT_MOBF 0x20
64#define KBD_STAT_TI_OUT 0x40
65#define KBD_STAT_PARERR 0x80
66
67#define KBD_INIT_TIMEOUT 2000 /* Timeout in ms for initializing the keyboard */
68#define KBC_TIMEOUT 250 /* Timeout in ms for sending to keyboard controller */
69#define KBD_TIMEOUT 2000 /* Timeout in ms for keyboard command acknowledge */
70/*
71 * Keyboard Controller Commands
72 */
73
Wolfgang Denk53677ef2008-05-20 16:00:29 +020074#define KBD_CCMD_READ_MODE 0x20 /* Read mode bits */
75#define KBD_CCMD_WRITE_MODE 0x60 /* Write mode bits */
76#define KBD_CCMD_GET_VERSION 0xA1 /* Get controller version */
wdenkc7de8292002-11-19 11:04:11 +000077#define KBD_CCMD_MOUSE_DISABLE 0xA7 /* Disable mouse interface */
Wolfgang Denk53677ef2008-05-20 16:00:29 +020078#define KBD_CCMD_MOUSE_ENABLE 0xA8 /* Enable mouse interface */
79#define KBD_CCMD_TEST_MOUSE 0xA9 /* Mouse interface test */
80#define KBD_CCMD_SELF_TEST 0xAA /* Controller self test */
81#define KBD_CCMD_KBD_TEST 0xAB /* Keyboard interface test */
82#define KBD_CCMD_KBD_DISABLE 0xAD /* Keyboard interface disable */
83#define KBD_CCMD_KBD_ENABLE 0xAE /* Keyboard interface enable */
wdenkc7de8292002-11-19 11:04:11 +000084#define KBD_CCMD_WRITE_AUX_OBUF 0xD3 /* Write to output buffer as if
85 initiated by the auxiliary device */
Wolfgang Denk53677ef2008-05-20 16:00:29 +020086#define KBD_CCMD_WRITE_MOUSE 0xD4 /* Write the following byte to the mouse */
wdenkc7de8292002-11-19 11:04:11 +000087
88/*
89 * Keyboard Commands
90 */
91
Wolfgang Denk53677ef2008-05-20 16:00:29 +020092#define KBD_CMD_SET_LEDS 0xED /* Set keyboard leds */
93#define KBD_CMD_SET_RATE 0xF3 /* Set typematic rate */
94#define KBD_CMD_ENABLE 0xF4 /* Enable scanning */
95#define KBD_CMD_DISABLE 0xF5 /* Disable scanning */
96#define KBD_CMD_RESET 0xFF /* Reset */
wdenkc7de8292002-11-19 11:04:11 +000097
98/*
99 * Keyboard Replies
100 */
101
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200102#define KBD_REPLY_POR 0xAA /* Power on reset */
103#define KBD_REPLY_ACK 0xFA /* Command ACK */
104#define KBD_REPLY_RESEND 0xFE /* Command NACK, send the cmd again */
wdenkc7de8292002-11-19 11:04:11 +0000105
106/*
107 * Status Register Bits
108 */
109
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200110#define KBD_STAT_OBF 0x01 /* Keyboard output buffer full */
111#define KBD_STAT_IBF 0x02 /* Keyboard input buffer full */
112#define KBD_STAT_SELFTEST 0x04 /* Self test successful */
113#define KBD_STAT_CMD 0x08 /* Last write was a command write (0=data) */
114#define KBD_STAT_UNLOCKED 0x10 /* Zero if keyboard locked */
115#define KBD_STAT_MOUSE_OBF 0x20 /* Mouse output buffer full */
116#define KBD_STAT_GTO 0x40 /* General receive/xmit timeout */
117#define KBD_STAT_PERR 0x80 /* Parity error */
wdenkc7de8292002-11-19 11:04:11 +0000118
119#define AUX_STAT_OBF (KBD_STAT_OBF | KBD_STAT_MOUSE_OBF)
120
121/*
122 * Controller Mode Register Bits
123 */
124
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200125#define KBD_MODE_KBD_INT 0x01 /* Keyboard data generate IRQ1 */
126#define KBD_MODE_MOUSE_INT 0x02 /* Mouse data generate IRQ12 */
127#define KBD_MODE_SYS 0x04 /* The system flag (?) */
128#define KBD_MODE_NO_KEYLOCK 0x08 /* The keylock doesn't affect the keyboard if set */
129#define KBD_MODE_DISABLE_KBD 0x10 /* Disable keyboard interface */
wdenkc7de8292002-11-19 11:04:11 +0000130#define KBD_MODE_DISABLE_MOUSE 0x20 /* Disable mouse interface */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200131#define KBD_MODE_KCC 0x40 /* Scan code conversion to PC format */
132#define KBD_MODE_RFU 0x80
wdenkc7de8292002-11-19 11:04:11 +0000133
134
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200135#define KDB_DATA_PORT 0x60
wdenkc7de8292002-11-19 11:04:11 +0000136#define KDB_COMMAND_PORT 0x64
137
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200138#define LED_SCR 0x01 /* scroll lock led */
139#define LED_CAP 0x04 /* caps lock led */
140#define LED_NUM 0x02 /* num lock led */
wdenkc7de8292002-11-19 11:04:11 +0000141
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200142#define KBD_BUFFER_LEN 0x20 /* size of the keyboardbuffer */
wdenkc7de8292002-11-19 11:04:11 +0000143
144
wdenkc7de8292002-11-19 11:04:11 +0000145static volatile char kbd_buffer[KBD_BUFFER_LEN];
146static volatile int in_pointer = 0;
147static volatile int out_pointer = 0;
148
149
150static unsigned char num_lock = 0;
151static unsigned char caps_lock = 0;
152static unsigned char scroll_lock = 0;
153static unsigned char shift = 0;
154static unsigned char ctrl = 0;
155static unsigned char alt = 0;
156static unsigned char e0 = 0;
157static unsigned char leds = 0;
158
159#define DEVNAME "ps2kbd"
160
161/* Simple translation table for the keys */
162
163static unsigned char kbd_plain_xlate[] = {
164 0xff,0x1b, '1', '2', '3', '4', '5', '6', '7', '8', '9', '0', '-', '=','\b','\t', /* 0x00 - 0x0f */
165 'q', 'w', 'e', 'r', 't', 'y', 'u', 'i', 'o', 'p', '[', ']','\r',0xff, 'a', 's', /* 0x10 - 0x1f */
166 'd', 'f', 'g', 'h', 'j', 'k', 'l', ';','\'', '`',0xff,'\\', 'z', 'x', 'c', 'v', /* 0x20 - 0x2f */
167 'b', 'n', 'm', ',', '.', '/',0xff,0xff,0xff, ' ',0xff,0xff,0xff,0xff,0xff,0xff, /* 0x30 - 0x3f */
168 0xff,0xff,0xff,0xff,0xff,0xff,0xff, '7', '8', '9', '-', '4', '5', '6', '+', '1', /* 0x40 - 0x4f */
169 '2', '3', '0', '.',0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff, /* 0x50 - 0x5F */
170 '\r',0xff,0xff
171 };
wdenk8bde7f72003-06-27 21:31:46 +0000172
wdenkc7de8292002-11-19 11:04:11 +0000173static unsigned char kbd_shift_xlate[] = {
174 0xff,0x1b, '!', '@', '#', '$', '%', '^', '&', '*', '(', ')', '_', '+','\b','\t', /* 0x00 - 0x0f */
175 'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I', 'O', 'P', '{', '}','\r',0xff, 'A', 'S', /* 0x10 - 0x1f */
176 'D', 'F', 'G', 'H', 'J', 'K', 'L', ':', '"', '~',0xff, '|', 'Z', 'X', 'C', 'V', /* 0x20 - 0x2f */
177 'B', 'N', 'M', '<', '>', '?',0xff,0xff,0xff, ' ',0xff,0xff,0xff,0xff,0xff,0xff, /* 0x30 - 0x3f */
178 0xff,0xff,0xff,0xff,0xff,0xff,0xff, '7', '8', '9', '-', '4', '5', '6', '+', '1', /* 0x40 - 0x4f */
179 '2', '3', '0', '.',0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff, /* 0x50 - 0x5F */
180 '\r',0xff,0xff
181 };
182
183static unsigned char kbd_ctrl_xlate[] = {
184 0xff,0x1b, '1',0x00, '3', '4', '5',0x1E, '7', '8', '9', '0',0x1F, '=','\b','\t', /* 0x00 - 0x0f */
185 0x11,0x17,0x05,0x12,0x14,0x18,0x15,0x09,0x0f,0x10,0x1b,0x1d,'\n',0xff,0x01,0x13, /* 0x10 - 0x1f */
186 0x04,0x06,0x08,0x09,0x0a,0x0b,0x0c, ';','\'', '~',0x00,0x1c,0x1a,0x18,0x03,0x16, /* 0x20 - 0x2f */
187 0x02,0x0e,0x0d, '<', '>', '?',0xff,0xff,0xff,0x00,0xff,0xff,0xff,0xff,0xff,0xff, /* 0x30 - 0x3f */
188 0xff,0xff,0xff,0xff,0xff,0xff,0xff, '7', '8', '9', '-', '4', '5', '6', '+', '1', /* 0x40 - 0x4f */
189 '2', '3', '0', '.',0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff, /* 0x50 - 0x5F */
190 '\r',0xff,0xff
191 };
192
193/******************************************************************
wdenk8bde7f72003-06-27 21:31:46 +0000194 * Init
wdenkc7de8292002-11-19 11:04:11 +0000195 ******************************************************************/
196
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200197int isa_kbd_init (void)
wdenkc7de8292002-11-19 11:04:11 +0000198{
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200199 char *result;
200
201 result = kbd_initialize ();
202 if (result != NULL) {
203 result = kbd_initialize ();
wdenkc7de8292002-11-19 11:04:11 +0000204 }
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200205 if (result == NULL) {
206 printf ("AT Keyboard initialized\n");
207 irq_install_handler (KBD_INTERRUPT,
208 (interrupt_handler_t *) kbd_interrupt,
209 NULL);
wdenkc7de8292002-11-19 11:04:11 +0000210 return (1);
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200211 } else {
212 printf ("%s\n", result);
wdenkc7de8292002-11-19 11:04:11 +0000213 return (-1);
214 }
215}
216
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200217#ifdef CONFIG_SYS_CONSOLE_OVERWRITE_ROUTINE
wdenkc7de8292002-11-19 11:04:11 +0000218extern int overwrite_console (void);
219#else
220int overwrite_console (void)
221{
222 return (0);
223}
224#endif
225
226int drv_isa_kbd_init (void)
227{
228 int error;
Jean-Christophe PLAGNIOL-VILLARD52cb4d42009-05-16 12:14:54 +0200229 struct stdio_dev kbddev ;
wdenkc7de8292002-11-19 11:04:11 +0000230 char *stdinname = getenv ("stdin");
231
Wolfgang Denkd0ff51b2008-07-14 15:19:07 +0200232 if(isa_kbd_init() == -1)
wdenkc7de8292002-11-19 11:04:11 +0000233 return -1;
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200234 memset (&kbddev, 0, sizeof(kbddev));
235 strcpy(kbddev.name, DEVNAME);
236 kbddev.flags = DEV_FLAGS_INPUT | DEV_FLAGS_SYSTEM;
237 kbddev.putc = NULL ;
wdenkc7de8292002-11-19 11:04:11 +0000238 kbddev.puts = NULL ;
239 kbddev.getc = kbd_getc ;
240 kbddev.tstc = kbd_testc ;
241
Jean-Christophe PLAGNIOL-VILLARD52cb4d42009-05-16 12:14:54 +0200242 error = stdio_register (&kbddev);
wdenkc7de8292002-11-19 11:04:11 +0000243 if(error==0) {
244 /* check if this is the standard input device */
245 if(strcmp(stdinname,DEVNAME)==0) {
246 /* reassign the console */
247 if(overwrite_console()) {
248 return 1;
249 }
250 error=console_assign(stdin,DEVNAME);
251 if(error==0)
252 return 1;
wdenk8bde7f72003-06-27 21:31:46 +0000253 else
wdenkc7de8292002-11-19 11:04:11 +0000254 return error;
255 }
256 return 1;
257 }
258 return error;
259}
260
261/******************************************************************
wdenk8bde7f72003-06-27 21:31:46 +0000262 * Queue handling
wdenkc7de8292002-11-19 11:04:11 +0000263 ******************************************************************/
264/* puts character in the queue and sets up the in and out pointer */
265void kbd_put_queue(char data)
266{
267 if((in_pointer+1)==KBD_BUFFER_LEN) {
268 if(out_pointer==0) {
269 return; /* buffer full */
270 } else{
271 in_pointer=0;
272 }
273 } else {
274 if((in_pointer+1)==out_pointer)
275 return; /* buffer full */
276 in_pointer++;
277 }
278 kbd_buffer[in_pointer]=data;
279 return;
280}
281
282/* test if a character is in the queue */
283int kbd_testc(void)
284{
285 if(in_pointer==out_pointer)
286 return(0); /* no data */
287 else
wdenk8bde7f72003-06-27 21:31:46 +0000288 return(1);
wdenkc7de8292002-11-19 11:04:11 +0000289}
290/* gets the character from the queue */
291int kbd_getc(void)
292{
293 char c;
294
295 while(in_pointer==out_pointer);
wdenk8bde7f72003-06-27 21:31:46 +0000296 if((out_pointer+1)==KBD_BUFFER_LEN)
wdenkc7de8292002-11-19 11:04:11 +0000297 out_pointer=0;
298 else
299 out_pointer++;
300 c=kbd_buffer[out_pointer];
301 return (int)c;
wdenk8bde7f72003-06-27 21:31:46 +0000302
wdenkc7de8292002-11-19 11:04:11 +0000303}
304
wdenkc7de8292002-11-19 11:04:11 +0000305/* set LEDs */
306
307void kbd_set_leds(void)
308{
309 if(caps_lock==0)
310 leds&=~LED_CAP; /* switch caps_lock off */
311 else
312 leds|=LED_CAP; /* switch on LED */
313 if(num_lock==0)
314 leds&=~LED_NUM; /* switch LED off */
315 else
316 leds|=LED_NUM; /* switch on LED */
317 if(scroll_lock==0)
318 leds&=~LED_SCR; /* switch LED off */
319 else
320 leds|=LED_SCR; /* switch on LED */
321 kbd_send_data(KBD_CMD_SET_LEDS);
322 kbd_send_data(leds);
323}
wdenk8bde7f72003-06-27 21:31:46 +0000324
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200325void handle_keyboard_event (unsigned char scancode)
wdenkc7de8292002-11-19 11:04:11 +0000326{
327 unsigned char keycode;
328
329 /* Convert scancode to keycode */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200330 PRINTF ("scancode %x\n", scancode);
331 if (scancode == 0xe0) {
332 e0 = 1; /* special charakters */
wdenkc7de8292002-11-19 11:04:11 +0000333 return;
334 }
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200335 if (e0 == 1) {
336 e0 = 0; /* delete flag */
337 if (!(((scancode & 0x7F) == 0x38) || /* the right ctrl key */
338 ((scancode & 0x7F) == 0x1D) || /* the right alt key */
339 ((scancode & 0x7F) == 0x35) || /* the right '/' key */
340 ((scancode & 0x7F) == 0x1C) || /* the right enter key */
341 ((scancode) == 0x48) || /* arrow up */
342 ((scancode) == 0x50) || /* arrow down */
343 ((scancode) == 0x4b) || /* arrow left */
344 ((scancode) == 0x4d)))
345 /* arrow right */
wdenkc7de8292002-11-19 11:04:11 +0000346 /* we swallow unknown e0 codes */
347 return;
348 }
349 /* special cntrl keys */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200350 switch (scancode) {
wdenkc7de8292002-11-19 11:04:11 +0000351 case 0x48:
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200352 kbd_put_queue (27);
353 kbd_put_queue (91);
354 kbd_put_queue ('A');
355 return;
wdenkc7de8292002-11-19 11:04:11 +0000356 case 0x50:
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200357 kbd_put_queue (27);
358 kbd_put_queue (91);
359 kbd_put_queue ('B');
360 return;
wdenkc7de8292002-11-19 11:04:11 +0000361 case 0x4b:
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200362 kbd_put_queue (27);
363 kbd_put_queue (91);
364 kbd_put_queue ('D');
365 return;
wdenkc7de8292002-11-19 11:04:11 +0000366 case 0x4D:
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200367 kbd_put_queue (27);
368 kbd_put_queue (91);
369 kbd_put_queue ('C');
370 return;
371 case 0x58: /* F12 key */
372 if (ctrl == 1) {
373 extern int console_changed;
374
375 setenv ("stdin", DEVNAME);
376 setenv ("stdout", "vga");
377 console_changed = 1;
378 }
379 return;
wdenk8bde7f72003-06-27 21:31:46 +0000380 case 0x2A:
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200381 case 0x36: /* shift pressed */
382 shift = 1;
383 return; /* do nothing else */
384 case 0xAA:
385 case 0xB6: /* shift released */
386 shift = 0;
387 return; /* do nothing else */
388 case 0x38: /* alt pressed */
389 alt = 1;
390 return; /* do nothing else */
391 case 0xB8: /* alt released */
392 alt = 0;
393 return; /* do nothing else */
394 case 0x1d: /* ctrl pressed */
395 ctrl = 1;
396 return; /* do nothing else */
397 case 0x9d: /* ctrl released */
398 ctrl = 0;
399 return; /* do nothing else */
400 case 0x46: /* scrollock pressed */
401 scroll_lock = ~scroll_lock;
402 kbd_set_leds ();
403 return; /* do nothing else */
404 case 0x3A: /* capslock pressed */
405 caps_lock = ~caps_lock;
406 kbd_set_leds ();
407 return;
408 case 0x45: /* numlock pressed */
409 num_lock = ~num_lock;
410 kbd_set_leds ();
411 return;
412 case 0xC6: /* scroll lock released */
413 case 0xC5: /* num lock released */
414 case 0xBA: /* caps lock released */
415 return; /* just swallow */
wdenkc7de8292002-11-19 11:04:11 +0000416 }
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200417 if ((scancode & 0x80) == 0x80) /* key released */
wdenkc7de8292002-11-19 11:04:11 +0000418 return;
419 /* now, decide which table we need */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200420 if (scancode > (sizeof (kbd_plain_xlate) / sizeof (kbd_plain_xlate[0]))) { /* scancode not in list */
421 PRINTF ("unkown scancode %X\n", scancode);
422 return; /* swallow it */
wdenkc7de8292002-11-19 11:04:11 +0000423 }
424 /* setup plain code first */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200425 keycode = kbd_plain_xlate[scancode];
426 if (caps_lock == 1) { /* caps_lock is pressed, overwrite plain code */
427 if (scancode > (sizeof (kbd_shift_xlate) / sizeof (kbd_shift_xlate[0]))) { /* scancode not in list */
428 PRINTF ("unkown caps-locked scancode %X\n", scancode);
429 return; /* swallow it */
wdenkc7de8292002-11-19 11:04:11 +0000430 }
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200431 keycode = kbd_shift_xlate[scancode];
432 if (keycode < 'A') { /* we only want the alphas capital */
433 keycode = kbd_plain_xlate[scancode];
wdenkc7de8292002-11-19 11:04:11 +0000434 }
435 }
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200436 if (shift == 1) { /* shift overwrites caps_lock */
437 if (scancode > (sizeof (kbd_shift_xlate) / sizeof (kbd_shift_xlate[0]))) { /* scancode not in list */
438 PRINTF ("unkown shifted scancode %X\n", scancode);
439 return; /* swallow it */
wdenkc7de8292002-11-19 11:04:11 +0000440 }
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200441 keycode = kbd_shift_xlate[scancode];
wdenkc7de8292002-11-19 11:04:11 +0000442 }
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200443 if (ctrl == 1) { /* ctrl overwrites caps_lock and shift */
444 if (scancode > (sizeof (kbd_ctrl_xlate) / sizeof (kbd_ctrl_xlate[0]))) { /* scancode not in list */
445 PRINTF ("unkown ctrl scancode %X\n", scancode);
446 return; /* swallow it */
wdenkc7de8292002-11-19 11:04:11 +0000447 }
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200448 keycode = kbd_ctrl_xlate[scancode];
wdenkc7de8292002-11-19 11:04:11 +0000449 }
450 /* check if valid keycode */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200451 if (keycode == 0xff) {
452 PRINTF ("unkown scancode %X\n", scancode);
453 return; /* swallow unknown codes */
wdenkc7de8292002-11-19 11:04:11 +0000454 }
wdenk8bde7f72003-06-27 21:31:46 +0000455
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200456 kbd_put_queue (keycode);
457 PRINTF ("%x\n", keycode);
wdenkc7de8292002-11-19 11:04:11 +0000458}
459
460/*
461 * This reads the keyboard status port, and does the
462 * appropriate action.
463 *
464 */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200465unsigned char handle_kbd_event (void)
wdenkc7de8292002-11-19 11:04:11 +0000466{
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200467 unsigned char status = kbd_read_status ();
wdenkc7de8292002-11-19 11:04:11 +0000468 unsigned int work = 10000;
469
470 while ((--work > 0) && (status & KBD_STAT_OBF)) {
471 unsigned char scancode;
472
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200473 scancode = kbd_read_input ();
wdenkc7de8292002-11-19 11:04:11 +0000474
475 /* Error bytes must be ignored to make the
476 Synaptics touchpads compaq use work */
477 /* Ignore error bytes */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200478 if (!(status & (KBD_STAT_GTO | KBD_STAT_PERR))) {
479 if (status & KBD_STAT_MOUSE_OBF); /* not supported: handle_mouse_event(scancode); */
wdenkc7de8292002-11-19 11:04:11 +0000480 else
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200481 handle_keyboard_event (scancode);
wdenkc7de8292002-11-19 11:04:11 +0000482 }
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200483 status = kbd_read_status ();
wdenkc7de8292002-11-19 11:04:11 +0000484 }
485 if (!work)
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200486 PRINTF ("pc_keyb: controller jammed (0x%02X).\n", status);
wdenkc7de8292002-11-19 11:04:11 +0000487 return status;
488}
489
wdenkc7de8292002-11-19 11:04:11 +0000490/******************************************************************************
491 * Lowlevel Part of keyboard section
wdenk8bde7f72003-06-27 21:31:46 +0000492 */
wdenkc7de8292002-11-19 11:04:11 +0000493unsigned char kbd_read_status(void)
494{
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200495 return(in8(CONFIG_SYS_ISA_IO_BASE_ADDRESS + KDB_COMMAND_PORT));
wdenk8bde7f72003-06-27 21:31:46 +0000496}
497
wdenkc7de8292002-11-19 11:04:11 +0000498unsigned char kbd_read_input(void)
499{
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200500 return(in8(CONFIG_SYS_ISA_IO_BASE_ADDRESS + KDB_DATA_PORT));
wdenk8bde7f72003-06-27 21:31:46 +0000501}
wdenkc7de8292002-11-19 11:04:11 +0000502
503void kbd_write_command(unsigned char cmd)
504{
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200505 out8(CONFIG_SYS_ISA_IO_BASE_ADDRESS + KDB_COMMAND_PORT,cmd);
wdenk8bde7f72003-06-27 21:31:46 +0000506}
507
wdenkc7de8292002-11-19 11:04:11 +0000508void kbd_write_output(unsigned char data)
509{
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200510 out8(CONFIG_SYS_ISA_IO_BASE_ADDRESS + KDB_DATA_PORT, data);
wdenk8bde7f72003-06-27 21:31:46 +0000511}
512
wdenkc7de8292002-11-19 11:04:11 +0000513int kbd_read_data(void)
514{
515 int val;
516 unsigned char status;
517
Wolfgang Denkd0ff51b2008-07-14 15:19:07 +0200518 val = -1;
wdenkc7de8292002-11-19 11:04:11 +0000519 status = kbd_read_status();
520 if (status & KBD_STAT_OBF) {
521 val = kbd_read_input();
522 if (status & (KBD_STAT_GTO | KBD_STAT_PERR))
523 val = -2;
524 }
525 return val;
526}
527
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200528int kbd_wait_for_input (void)
wdenkc7de8292002-11-19 11:04:11 +0000529{
530 unsigned long timeout;
531 int val;
wdenk8bde7f72003-06-27 21:31:46 +0000532
wdenkc7de8292002-11-19 11:04:11 +0000533 timeout = KBD_TIMEOUT;
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200534 val = kbd_read_data ();
535 while (val < 0) {
536 if (timeout-- == 0)
wdenkc7de8292002-11-19 11:04:11 +0000537 return -1;
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200538 udelay (1000);
539 val = kbd_read_data ();
wdenkc7de8292002-11-19 11:04:11 +0000540 }
541 return val;
542}
543
544
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200545int kb_wait (void)
wdenkc7de8292002-11-19 11:04:11 +0000546{
547 unsigned long timeout = KBC_TIMEOUT * 10;
548
549 do {
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200550 unsigned char status = handle_kbd_event ();
551
wdenkc7de8292002-11-19 11:04:11 +0000552 if (!(status & KBD_STAT_IBF))
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200553 return 0; /* ok */
554 udelay (1000);
wdenkc7de8292002-11-19 11:04:11 +0000555 timeout--;
556 } while (timeout);
557 return 1;
558}
559
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200560void kbd_write_command_w (int data)
wdenkc7de8292002-11-19 11:04:11 +0000561{
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200562 if (kb_wait ())
563 PRINTF ("timeout in kbd_write_command_w\n");
564 kbd_write_command (data);
wdenkc7de8292002-11-19 11:04:11 +0000565}
566
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200567void kbd_write_output_w (int data)
wdenkc7de8292002-11-19 11:04:11 +0000568{
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200569 if (kb_wait ())
570 PRINTF ("timeout in kbd_write_output_w\n");
571 kbd_write_output (data);
wdenkc7de8292002-11-19 11:04:11 +0000572}
573
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200574void kbd_send_data (unsigned char data)
wdenkc7de8292002-11-19 11:04:11 +0000575{
576 unsigned char status;
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200577
578 i8259_mask_irq (KBD_INTERRUPT); /* disable interrupt */
579 kbd_write_output_w (data);
580 status = kbd_wait_for_input ();
wdenkc7de8292002-11-19 11:04:11 +0000581 if (status == KBD_REPLY_ACK)
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200582 i8259_unmask_irq (KBD_INTERRUPT); /* enable interrupt */
wdenkc7de8292002-11-19 11:04:11 +0000583}
584
585
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200586char *kbd_initialize (void)
wdenkc7de8292002-11-19 11:04:11 +0000587{
588 int status;
589
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200590 in_pointer = 0; /* delete in Buffer */
wdenkc7de8292002-11-19 11:04:11 +0000591 out_pointer = 0;
592 /*
593 * Test the keyboard interface.
594 * This seems to be the only way to get it going.
595 * If the test is successful a x55 is placed in the input buffer.
596 */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200597 kbd_write_command_w (KBD_CCMD_SELF_TEST);
598 if (kbd_wait_for_input () != 0x55)
wdenkc7de8292002-11-19 11:04:11 +0000599 return "Kbd: failed self test";
600 /*
601 * Perform a keyboard interface test. This causes the controller
602 * to test the keyboard clock and data lines. The results of the
603 * test are placed in the input buffer.
604 */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200605 kbd_write_command_w (KBD_CCMD_KBD_TEST);
606 if (kbd_wait_for_input () != 0x00)
wdenkc7de8292002-11-19 11:04:11 +0000607 return "Kbd: interface failed self test";
608 /*
609 * Enable the keyboard by allowing the keyboard clock to run.
610 */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200611 kbd_write_command_w (KBD_CCMD_KBD_ENABLE);
612 status = kbd_wait_for_input ();
wdenkc7de8292002-11-19 11:04:11 +0000613 /*
614 * Reset keyboard. If the read times out
615 * then the assumption is that no keyboard is
616 * plugged into the machine.
617 * This defaults the keyboard to scan-code set 2.
618 *
619 * Set up to try again if the keyboard asks for RESEND.
620 */
621 do {
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200622 kbd_write_output_w (KBD_CMD_RESET);
623 status = kbd_wait_for_input ();
wdenk8bde7f72003-06-27 21:31:46 +0000624 if (status == KBD_REPLY_ACK)
wdenkc7de8292002-11-19 11:04:11 +0000625 break;
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200626 if (status != KBD_REPLY_RESEND) {
627 PRINTF ("status: %X\n", status);
wdenkc7de8292002-11-19 11:04:11 +0000628 return "Kbd: reset failed, no ACK";
629 }
630 } while (1);
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200631 if (kbd_wait_for_input () != KBD_REPLY_POR)
wdenkc7de8292002-11-19 11:04:11 +0000632 return "Kbd: reset failed, no POR";
633
634 /*
635 * Set keyboard controller mode. During this, the keyboard should be
636 * in the disabled state.
637 *
638 * Set up to try again if the keyboard asks for RESEND.
639 */
640 do {
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200641 kbd_write_output_w (KBD_CMD_DISABLE);
642 status = kbd_wait_for_input ();
wdenkc7de8292002-11-19 11:04:11 +0000643 if (status == KBD_REPLY_ACK)
644 break;
645 if (status != KBD_REPLY_RESEND)
646 return "Kbd: disable keyboard: no ACK";
647 } while (1);
648
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200649 kbd_write_command_w (KBD_CCMD_WRITE_MODE);
650 kbd_write_output_w (KBD_MODE_KBD_INT
651 | KBD_MODE_SYS
652 | KBD_MODE_DISABLE_MOUSE | KBD_MODE_KCC);
wdenkc7de8292002-11-19 11:04:11 +0000653
Wolfgang Denk0c8721a2005-09-23 11:05:55 +0200654 /* AMCC powerpc portables need this to use scan-code set 1 -- Cort */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200655 kbd_write_command_w (KBD_CCMD_READ_MODE);
656 if (!(kbd_wait_for_input () & KBD_MODE_KCC)) {
wdenkc7de8292002-11-19 11:04:11 +0000657 /*
658 * If the controller does not support conversion,
659 * Set the keyboard to scan-code set 1.
660 */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200661 kbd_write_output_w (0xF0);
662 kbd_wait_for_input ();
663 kbd_write_output_w (0x01);
664 kbd_wait_for_input ();
wdenkc7de8292002-11-19 11:04:11 +0000665 }
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200666 kbd_write_output_w (KBD_CMD_ENABLE);
667 if (kbd_wait_for_input () != KBD_REPLY_ACK)
wdenkc7de8292002-11-19 11:04:11 +0000668 return "Kbd: enable keyboard: no ACK";
669
670 /*
671 * Finally, set the typematic rate to maximum.
672 */
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200673 kbd_write_output_w (KBD_CMD_SET_RATE);
674 if (kbd_wait_for_input () != KBD_REPLY_ACK)
wdenkc7de8292002-11-19 11:04:11 +0000675 return "Kbd: Set rate: no ACK";
Wolfgang Denk53677ef2008-05-20 16:00:29 +0200676 kbd_write_output_w (0x00);
677 if (kbd_wait_for_input () != KBD_REPLY_ACK)
wdenkc7de8292002-11-19 11:04:11 +0000678 return "Kbd: Set rate: no ACK";
679 return NULL;
680}
681
682void kbd_interrupt(void)
683{
684 handle_kbd_event();
685}