libpayload: The initial chunk of code writen by AMD
[coreboot.git] / payloads / libpayload / drivers / keyboard.c
1 /*
2  * This file is part of the libpayload project.
3  *
4  * Copyright (C) 2008 Advanced Micro Devices, Inc.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. The name of the author may not be used to endorse or promote products
15  *    derived from this software without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  */
29
30 #include <arch/io.h>
31 #include <libpayload.h>
32
33 unsigned char map[2][0x57] = {
34   {
35     0x00, 0x1B, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36,
36     0x37, 0x38, 0x39, 0x30, 0x2D, 0x3D, 0x08, 0x09,
37     0x71, 0x77, 0x65, 0x72, 0x74, 0x79, 0x75, 0x69,
38     0x6F, 0x70, 0x5B, 0x5D, 0x0A, 0x00, 0x61, 0x73,
39     0x64, 0x66, 0x67, 0x68, 0x6A, 0x6B, 0x6C, 0x3B,
40     0x27, 0x60, 0x00, 0x5C, 0x7A, 0x78, 0x63, 0x76,
41     0x62, 0x6E, 0x6D, 0x2C, 0x2E, 0x2F, 0x00, 0x2A,
42     0x00, 0x20,
43   },
44   {
45     0x00, 0x1B, 0x21, 0x40, 0x23, 0x24, 0x25, 0x5E,
46     0x26, 0x2A, 0x28, 0x29, 0x5F, 0x2B, 0x08, 0x00,
47     0x51, 0x57, 0x45, 0x52, 0x54, 0x59, 0x55, 0x49,
48     0x4F, 0x50, 0x7B, 0x7D, 0x0A, 0x00, 0x41, 0x53,
49     0x44, 0x46, 0x47, 0x48, 0x4A, 0x4B, 0x4C, 0x3A,
50     0x22, 0x7E, 0x00, 0x7C, 0x5A, 0x58, 0x43, 0x56,
51     0x42, 0x4E, 0x4D, 0x3C, 0x3E, 0x3F, 0x00, 0x2A,
52     0x00, 0x20,
53   }
54 };
55
56 #define MOD_SHIFT    1
57 #define MOD_CTRL     2
58 #define MOD_CAPSLOCK 4
59
60 int keyboard_havechar(void)
61 {
62         unsigned char c = inb(0x64);
63         return c & 1;
64 }
65
66 unsigned char keyboard_get_scancode(void)
67 {
68         unsigned char ch = 0;
69
70         if (keyboard_havechar())
71                 ch = inb(0x60);
72
73         return ch;
74 }
75
76 int keyboard_getchar(void)
77 {
78         static int modifier;
79         unsigned char ch;
80         int shift;
81
82         int ret = 0;
83
84         while(!keyboard_havechar())
85                 ;
86
87         ch = keyboard_get_scancode();
88
89         switch(ch) {
90         case 0x36:
91         case 0x2a:
92                 modifier &= ~MOD_SHIFT;
93                 break;
94
95         case 0x80 | 0x36:
96         case 0x80 | 0x2a:
97                 modifier |= MOD_SHIFT;
98
99         case 0x1d:
100                 modifier &= ~MOD_CTRL;
101                 break;
102
103         case 0x80 | 0x1d:
104                 modifier |= MOD_CTRL;
105                 break;
106
107         case 0x3a:
108                 if (modifier & MOD_CAPSLOCK)
109                         modifier &= ~MOD_CAPSLOCK;
110                 else
111                         modifier |= MOD_CAPSLOCK;
112                 break;
113         }
114
115         if (!(ch & 0x80) && ch <  0x57) {
116                 shift = (modifier & MOD_SHIFT) ^ (modifier & MOD_CAPSLOCK) ? 1 : 0;
117                 ret = map[shift][ch];
118
119                 if (modifier & MOD_CTRL)
120                         ret = (ret >= 0x3F && ret <= 0x5F) ? ret & 0x1f : 0;
121
122                 return ret;
123         }
124
125         return ret;
126 }