root / hw / pckbd.c @ 80cabfad
History | View | Annotate | Download (19.3 kB)
1 | 80cabfad | bellard | /*
|
---|---|---|---|
2 | 80cabfad | bellard | * QEMU PC keyboard emulation
|
3 | 80cabfad | bellard | *
|
4 | 80cabfad | bellard | * Copyright (c) 2003 Fabrice Bellard
|
5 | 80cabfad | bellard | *
|
6 | 80cabfad | bellard | * Permission is hereby granted, free of charge, to any person obtaining a copy
|
7 | 80cabfad | bellard | * of this software and associated documentation files (the "Software"), to deal
|
8 | 80cabfad | bellard | * in the Software without restriction, including without limitation the rights
|
9 | 80cabfad | bellard | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
10 | 80cabfad | bellard | * copies of the Software, and to permit persons to whom the Software is
|
11 | 80cabfad | bellard | * furnished to do so, subject to the following conditions:
|
12 | 80cabfad | bellard | *
|
13 | 80cabfad | bellard | * The above copyright notice and this permission notice shall be included in
|
14 | 80cabfad | bellard | * all copies or substantial portions of the Software.
|
15 | 80cabfad | bellard | *
|
16 | 80cabfad | bellard | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
17 | 80cabfad | bellard | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
18 | 80cabfad | bellard | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
19 | 80cabfad | bellard | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
20 | 80cabfad | bellard | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
21 | 80cabfad | bellard | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
22 | 80cabfad | bellard | * THE SOFTWARE.
|
23 | 80cabfad | bellard | */
|
24 | 80cabfad | bellard | #include <stdlib.h> |
25 | 80cabfad | bellard | #include <stdio.h> |
26 | 80cabfad | bellard | #include <stdarg.h> |
27 | 80cabfad | bellard | #include <string.h> |
28 | 80cabfad | bellard | #include <getopt.h> |
29 | 80cabfad | bellard | #include <inttypes.h> |
30 | 80cabfad | bellard | #include <unistd.h> |
31 | 80cabfad | bellard | #include <sys/mman.h> |
32 | 80cabfad | bellard | #include <fcntl.h> |
33 | 80cabfad | bellard | #include <signal.h> |
34 | 80cabfad | bellard | #include <time.h> |
35 | 80cabfad | bellard | #include <sys/time.h> |
36 | 80cabfad | bellard | #include <malloc.h> |
37 | 80cabfad | bellard | #include <termios.h> |
38 | 80cabfad | bellard | #include <sys/poll.h> |
39 | 80cabfad | bellard | #include <errno.h> |
40 | 80cabfad | bellard | #include <sys/wait.h> |
41 | 80cabfad | bellard | #include <netinet/in.h> |
42 | 80cabfad | bellard | |
43 | 80cabfad | bellard | #include "cpu.h" |
44 | 80cabfad | bellard | #include "vl.h" |
45 | 80cabfad | bellard | |
46 | 80cabfad | bellard | /* debug PC keyboard */
|
47 | 80cabfad | bellard | //#define DEBUG_KBD
|
48 | 80cabfad | bellard | |
49 | 80cabfad | bellard | /* debug PC keyboard : only mouse */
|
50 | 80cabfad | bellard | //#define DEBUG_MOUSE
|
51 | 80cabfad | bellard | |
52 | 80cabfad | bellard | /* Keyboard Controller Commands */
|
53 | 80cabfad | bellard | #define KBD_CCMD_READ_MODE 0x20 /* Read mode bits */ |
54 | 80cabfad | bellard | #define KBD_CCMD_WRITE_MODE 0x60 /* Write mode bits */ |
55 | 80cabfad | bellard | #define KBD_CCMD_GET_VERSION 0xA1 /* Get controller version */ |
56 | 80cabfad | bellard | #define KBD_CCMD_MOUSE_DISABLE 0xA7 /* Disable mouse interface */ |
57 | 80cabfad | bellard | #define KBD_CCMD_MOUSE_ENABLE 0xA8 /* Enable mouse interface */ |
58 | 80cabfad | bellard | #define KBD_CCMD_TEST_MOUSE 0xA9 /* Mouse interface test */ |
59 | 80cabfad | bellard | #define KBD_CCMD_SELF_TEST 0xAA /* Controller self test */ |
60 | 80cabfad | bellard | #define KBD_CCMD_KBD_TEST 0xAB /* Keyboard interface test */ |
61 | 80cabfad | bellard | #define KBD_CCMD_KBD_DISABLE 0xAD /* Keyboard interface disable */ |
62 | 80cabfad | bellard | #define KBD_CCMD_KBD_ENABLE 0xAE /* Keyboard interface enable */ |
63 | 80cabfad | bellard | #define KBD_CCMD_READ_INPORT 0xC0 /* read input port */ |
64 | 80cabfad | bellard | #define KBD_CCMD_READ_OUTPORT 0xD0 /* read output port */ |
65 | 80cabfad | bellard | #define KBD_CCMD_WRITE_OUTPORT 0xD1 /* write output port */ |
66 | 80cabfad | bellard | #define KBD_CCMD_WRITE_OBUF 0xD2 |
67 | 80cabfad | bellard | #define KBD_CCMD_WRITE_AUX_OBUF 0xD3 /* Write to output buffer as if |
68 | 80cabfad | bellard | initiated by the auxiliary device */
|
69 | 80cabfad | bellard | #define KBD_CCMD_WRITE_MOUSE 0xD4 /* Write the following byte to the mouse */ |
70 | 80cabfad | bellard | #define KBD_CCMD_DISABLE_A20 0xDD /* HP vectra only ? */ |
71 | 80cabfad | bellard | #define KBD_CCMD_ENABLE_A20 0xDF /* HP vectra only ? */ |
72 | 80cabfad | bellard | #define KBD_CCMD_RESET 0xFE |
73 | 80cabfad | bellard | |
74 | 80cabfad | bellard | /* Keyboard Commands */
|
75 | 80cabfad | bellard | #define KBD_CMD_SET_LEDS 0xED /* Set keyboard leds */ |
76 | 80cabfad | bellard | #define KBD_CMD_ECHO 0xEE |
77 | 80cabfad | bellard | #define KBD_CMD_GET_ID 0xF2 /* get keyboard ID */ |
78 | 80cabfad | bellard | #define KBD_CMD_SET_RATE 0xF3 /* Set typematic rate */ |
79 | 80cabfad | bellard | #define KBD_CMD_ENABLE 0xF4 /* Enable scanning */ |
80 | 80cabfad | bellard | #define KBD_CMD_RESET_DISABLE 0xF5 /* reset and disable scanning */ |
81 | 80cabfad | bellard | #define KBD_CMD_RESET_ENABLE 0xF6 /* reset and enable scanning */ |
82 | 80cabfad | bellard | #define KBD_CMD_RESET 0xFF /* Reset */ |
83 | 80cabfad | bellard | |
84 | 80cabfad | bellard | /* Keyboard Replies */
|
85 | 80cabfad | bellard | #define KBD_REPLY_POR 0xAA /* Power on reset */ |
86 | 80cabfad | bellard | #define KBD_REPLY_ACK 0xFA /* Command ACK */ |
87 | 80cabfad | bellard | #define KBD_REPLY_RESEND 0xFE /* Command NACK, send the cmd again */ |
88 | 80cabfad | bellard | |
89 | 80cabfad | bellard | /* Status Register Bits */
|
90 | 80cabfad | bellard | #define KBD_STAT_OBF 0x01 /* Keyboard output buffer full */ |
91 | 80cabfad | bellard | #define KBD_STAT_IBF 0x02 /* Keyboard input buffer full */ |
92 | 80cabfad | bellard | #define KBD_STAT_SELFTEST 0x04 /* Self test successful */ |
93 | 80cabfad | bellard | #define KBD_STAT_CMD 0x08 /* Last write was a command write (0=data) */ |
94 | 80cabfad | bellard | #define KBD_STAT_UNLOCKED 0x10 /* Zero if keyboard locked */ |
95 | 80cabfad | bellard | #define KBD_STAT_MOUSE_OBF 0x20 /* Mouse output buffer full */ |
96 | 80cabfad | bellard | #define KBD_STAT_GTO 0x40 /* General receive/xmit timeout */ |
97 | 80cabfad | bellard | #define KBD_STAT_PERR 0x80 /* Parity error */ |
98 | 80cabfad | bellard | |
99 | 80cabfad | bellard | /* Controller Mode Register Bits */
|
100 | 80cabfad | bellard | #define KBD_MODE_KBD_INT 0x01 /* Keyboard data generate IRQ1 */ |
101 | 80cabfad | bellard | #define KBD_MODE_MOUSE_INT 0x02 /* Mouse data generate IRQ12 */ |
102 | 80cabfad | bellard | #define KBD_MODE_SYS 0x04 /* The system flag (?) */ |
103 | 80cabfad | bellard | #define KBD_MODE_NO_KEYLOCK 0x08 /* The keylock doesn't affect the keyboard if set */ |
104 | 80cabfad | bellard | #define KBD_MODE_DISABLE_KBD 0x10 /* Disable keyboard interface */ |
105 | 80cabfad | bellard | #define KBD_MODE_DISABLE_MOUSE 0x20 /* Disable mouse interface */ |
106 | 80cabfad | bellard | #define KBD_MODE_KCC 0x40 /* Scan code conversion to PC format */ |
107 | 80cabfad | bellard | #define KBD_MODE_RFU 0x80 |
108 | 80cabfad | bellard | |
109 | 80cabfad | bellard | /* Mouse Commands */
|
110 | 80cabfad | bellard | #define AUX_SET_SCALE11 0xE6 /* Set 1:1 scaling */ |
111 | 80cabfad | bellard | #define AUX_SET_SCALE21 0xE7 /* Set 2:1 scaling */ |
112 | 80cabfad | bellard | #define AUX_SET_RES 0xE8 /* Set resolution */ |
113 | 80cabfad | bellard | #define AUX_GET_SCALE 0xE9 /* Get scaling factor */ |
114 | 80cabfad | bellard | #define AUX_SET_STREAM 0xEA /* Set stream mode */ |
115 | 80cabfad | bellard | #define AUX_POLL 0xEB /* Poll */ |
116 | 80cabfad | bellard | #define AUX_RESET_WRAP 0xEC /* Reset wrap mode */ |
117 | 80cabfad | bellard | #define AUX_SET_WRAP 0xEE /* Set wrap mode */ |
118 | 80cabfad | bellard | #define AUX_SET_REMOTE 0xF0 /* Set remote mode */ |
119 | 80cabfad | bellard | #define AUX_GET_TYPE 0xF2 /* Get type */ |
120 | 80cabfad | bellard | #define AUX_SET_SAMPLE 0xF3 /* Set sample rate */ |
121 | 80cabfad | bellard | #define AUX_ENABLE_DEV 0xF4 /* Enable aux device */ |
122 | 80cabfad | bellard | #define AUX_DISABLE_DEV 0xF5 /* Disable aux device */ |
123 | 80cabfad | bellard | #define AUX_SET_DEFAULT 0xF6 |
124 | 80cabfad | bellard | #define AUX_RESET 0xFF /* Reset aux device */ |
125 | 80cabfad | bellard | #define AUX_ACK 0xFA /* Command byte ACK. */ |
126 | 80cabfad | bellard | |
127 | 80cabfad | bellard | #define MOUSE_STATUS_REMOTE 0x40 |
128 | 80cabfad | bellard | #define MOUSE_STATUS_ENABLED 0x20 |
129 | 80cabfad | bellard | #define MOUSE_STATUS_SCALE21 0x10 |
130 | 80cabfad | bellard | |
131 | 80cabfad | bellard | #define KBD_QUEUE_SIZE 256 |
132 | 80cabfad | bellard | |
133 | 80cabfad | bellard | typedef struct { |
134 | 80cabfad | bellard | uint8_t data[KBD_QUEUE_SIZE]; |
135 | 80cabfad | bellard | int rptr, wptr, count;
|
136 | 80cabfad | bellard | } KBDQueue; |
137 | 80cabfad | bellard | |
138 | 80cabfad | bellard | typedef struct KBDState { |
139 | 80cabfad | bellard | KBDQueue queues[2];
|
140 | 80cabfad | bellard | uint8_t write_cmd; /* if non zero, write data to port 60 is expected */
|
141 | 80cabfad | bellard | uint8_t status; |
142 | 80cabfad | bellard | uint8_t mode; |
143 | 80cabfad | bellard | /* keyboard state */
|
144 | 80cabfad | bellard | int kbd_write_cmd;
|
145 | 80cabfad | bellard | int scan_enabled;
|
146 | 80cabfad | bellard | /* mouse state */
|
147 | 80cabfad | bellard | int mouse_write_cmd;
|
148 | 80cabfad | bellard | uint8_t mouse_status; |
149 | 80cabfad | bellard | uint8_t mouse_resolution; |
150 | 80cabfad | bellard | uint8_t mouse_sample_rate; |
151 | 80cabfad | bellard | uint8_t mouse_wrap; |
152 | 80cabfad | bellard | uint8_t mouse_type; /* 0 = PS2, 3 = IMPS/2, 4 = IMEX */
|
153 | 80cabfad | bellard | uint8_t mouse_detect_state; |
154 | 80cabfad | bellard | int mouse_dx; /* current values, needed for 'poll' mode */ |
155 | 80cabfad | bellard | int mouse_dy;
|
156 | 80cabfad | bellard | int mouse_dz;
|
157 | 80cabfad | bellard | uint8_t mouse_buttons; |
158 | 80cabfad | bellard | } KBDState; |
159 | 80cabfad | bellard | |
160 | 80cabfad | bellard | KBDState kbd_state; |
161 | 80cabfad | bellard | int reset_requested;
|
162 | 80cabfad | bellard | |
163 | 80cabfad | bellard | /* update irq and KBD_STAT_[MOUSE_]OBF */
|
164 | 80cabfad | bellard | /* XXX: not generating the irqs if KBD_MODE_DISABLE_KBD is set may be
|
165 | 80cabfad | bellard | incorrect, but it avoids having to simulate exact delays */
|
166 | 80cabfad | bellard | static void kbd_update_irq(KBDState *s) |
167 | 80cabfad | bellard | { |
168 | 80cabfad | bellard | int irq12_level, irq1_level;
|
169 | 80cabfad | bellard | |
170 | 80cabfad | bellard | irq1_level = 0;
|
171 | 80cabfad | bellard | irq12_level = 0;
|
172 | 80cabfad | bellard | s->status &= ~(KBD_STAT_OBF | KBD_STAT_MOUSE_OBF); |
173 | 80cabfad | bellard | if (s->queues[0].count != 0 || |
174 | 80cabfad | bellard | s->queues[1].count != 0) { |
175 | 80cabfad | bellard | s->status |= KBD_STAT_OBF; |
176 | 80cabfad | bellard | if (s->queues[1].count != 0) { |
177 | 80cabfad | bellard | s->status |= KBD_STAT_MOUSE_OBF; |
178 | 80cabfad | bellard | if (s->mode & KBD_MODE_MOUSE_INT)
|
179 | 80cabfad | bellard | irq12_level = 1;
|
180 | 80cabfad | bellard | } else {
|
181 | 80cabfad | bellard | if ((s->mode & KBD_MODE_KBD_INT) &&
|
182 | 80cabfad | bellard | !(s->mode & KBD_MODE_DISABLE_KBD)) |
183 | 80cabfad | bellard | irq1_level = 1;
|
184 | 80cabfad | bellard | } |
185 | 80cabfad | bellard | } |
186 | 80cabfad | bellard | pic_set_irq(1, irq1_level);
|
187 | 80cabfad | bellard | pic_set_irq(12, irq12_level);
|
188 | 80cabfad | bellard | } |
189 | 80cabfad | bellard | |
190 | 80cabfad | bellard | static void kbd_queue(KBDState *s, int b, int aux) |
191 | 80cabfad | bellard | { |
192 | 80cabfad | bellard | KBDQueue *q = &kbd_state.queues[aux]; |
193 | 80cabfad | bellard | |
194 | 80cabfad | bellard | #if defined(DEBUG_MOUSE) || defined(DEBUG_KBD)
|
195 | 80cabfad | bellard | if (aux)
|
196 | 80cabfad | bellard | printf("mouse event: 0x%02x\n", b);
|
197 | 80cabfad | bellard | #ifdef DEBUG_KBD
|
198 | 80cabfad | bellard | else
|
199 | 80cabfad | bellard | printf("kbd event: 0x%02x\n", b);
|
200 | 80cabfad | bellard | #endif
|
201 | 80cabfad | bellard | #endif
|
202 | 80cabfad | bellard | if (q->count >= KBD_QUEUE_SIZE)
|
203 | 80cabfad | bellard | return;
|
204 | 80cabfad | bellard | q->data[q->wptr] = b; |
205 | 80cabfad | bellard | if (++q->wptr == KBD_QUEUE_SIZE)
|
206 | 80cabfad | bellard | q->wptr = 0;
|
207 | 80cabfad | bellard | q->count++; |
208 | 80cabfad | bellard | kbd_update_irq(s); |
209 | 80cabfad | bellard | } |
210 | 80cabfad | bellard | |
211 | 80cabfad | bellard | void kbd_put_keycode(int keycode) |
212 | 80cabfad | bellard | { |
213 | 80cabfad | bellard | KBDState *s = &kbd_state; |
214 | 80cabfad | bellard | kbd_queue(s, keycode, 0);
|
215 | 80cabfad | bellard | } |
216 | 80cabfad | bellard | |
217 | 80cabfad | bellard | static uint32_t kbd_read_status(CPUState *env, uint32_t addr)
|
218 | 80cabfad | bellard | { |
219 | 80cabfad | bellard | KBDState *s = &kbd_state; |
220 | 80cabfad | bellard | int val;
|
221 | 80cabfad | bellard | val = s->status; |
222 | 80cabfad | bellard | #if defined(DEBUG_KBD)
|
223 | 80cabfad | bellard | printf("kbd: read status=0x%02x\n", val);
|
224 | 80cabfad | bellard | #endif
|
225 | 80cabfad | bellard | return val;
|
226 | 80cabfad | bellard | } |
227 | 80cabfad | bellard | |
228 | 80cabfad | bellard | static void kbd_write_command(CPUState *env, uint32_t addr, uint32_t val) |
229 | 80cabfad | bellard | { |
230 | 80cabfad | bellard | KBDState *s = &kbd_state; |
231 | 80cabfad | bellard | |
232 | 80cabfad | bellard | #ifdef DEBUG_KBD
|
233 | 80cabfad | bellard | printf("kbd: write cmd=0x%02x\n", val);
|
234 | 80cabfad | bellard | #endif
|
235 | 80cabfad | bellard | switch(val) {
|
236 | 80cabfad | bellard | case KBD_CCMD_READ_MODE:
|
237 | 80cabfad | bellard | kbd_queue(s, s->mode, 0);
|
238 | 80cabfad | bellard | break;
|
239 | 80cabfad | bellard | case KBD_CCMD_WRITE_MODE:
|
240 | 80cabfad | bellard | case KBD_CCMD_WRITE_OBUF:
|
241 | 80cabfad | bellard | case KBD_CCMD_WRITE_AUX_OBUF:
|
242 | 80cabfad | bellard | case KBD_CCMD_WRITE_MOUSE:
|
243 | 80cabfad | bellard | case KBD_CCMD_WRITE_OUTPORT:
|
244 | 80cabfad | bellard | s->write_cmd = val; |
245 | 80cabfad | bellard | break;
|
246 | 80cabfad | bellard | case KBD_CCMD_MOUSE_DISABLE:
|
247 | 80cabfad | bellard | s->mode |= KBD_MODE_DISABLE_MOUSE; |
248 | 80cabfad | bellard | break;
|
249 | 80cabfad | bellard | case KBD_CCMD_MOUSE_ENABLE:
|
250 | 80cabfad | bellard | s->mode &= ~KBD_MODE_DISABLE_MOUSE; |
251 | 80cabfad | bellard | break;
|
252 | 80cabfad | bellard | case KBD_CCMD_TEST_MOUSE:
|
253 | 80cabfad | bellard | kbd_queue(s, 0x00, 0); |
254 | 80cabfad | bellard | break;
|
255 | 80cabfad | bellard | case KBD_CCMD_SELF_TEST:
|
256 | 80cabfad | bellard | s->status |= KBD_STAT_SELFTEST; |
257 | 80cabfad | bellard | kbd_queue(s, 0x55, 0); |
258 | 80cabfad | bellard | break;
|
259 | 80cabfad | bellard | case KBD_CCMD_KBD_TEST:
|
260 | 80cabfad | bellard | kbd_queue(s, 0x00, 0); |
261 | 80cabfad | bellard | break;
|
262 | 80cabfad | bellard | case KBD_CCMD_KBD_DISABLE:
|
263 | 80cabfad | bellard | s->mode |= KBD_MODE_DISABLE_KBD; |
264 | 80cabfad | bellard | kbd_update_irq(s); |
265 | 80cabfad | bellard | break;
|
266 | 80cabfad | bellard | case KBD_CCMD_KBD_ENABLE:
|
267 | 80cabfad | bellard | s->mode &= ~KBD_MODE_DISABLE_KBD; |
268 | 80cabfad | bellard | kbd_update_irq(s); |
269 | 80cabfad | bellard | break;
|
270 | 80cabfad | bellard | case KBD_CCMD_READ_INPORT:
|
271 | 80cabfad | bellard | kbd_queue(s, 0x00, 0); |
272 | 80cabfad | bellard | break;
|
273 | 80cabfad | bellard | case KBD_CCMD_READ_OUTPORT:
|
274 | 80cabfad | bellard | /* XXX: check that */
|
275 | 80cabfad | bellard | #ifdef TARGET_I386
|
276 | 80cabfad | bellard | val = 0x01 | (((cpu_single_env->a20_mask >> 20) & 1) << 1); |
277 | 80cabfad | bellard | #else
|
278 | 80cabfad | bellard | val = 0x01;
|
279 | 80cabfad | bellard | #endif
|
280 | 80cabfad | bellard | if (s->status & KBD_STAT_OBF)
|
281 | 80cabfad | bellard | val |= 0x10;
|
282 | 80cabfad | bellard | if (s->status & KBD_STAT_MOUSE_OBF)
|
283 | 80cabfad | bellard | val |= 0x20;
|
284 | 80cabfad | bellard | kbd_queue(s, val, 0);
|
285 | 80cabfad | bellard | break;
|
286 | 80cabfad | bellard | #ifdef TARGET_I386
|
287 | 80cabfad | bellard | case KBD_CCMD_ENABLE_A20:
|
288 | 80cabfad | bellard | cpu_x86_set_a20(env, 1);
|
289 | 80cabfad | bellard | break;
|
290 | 80cabfad | bellard | case KBD_CCMD_DISABLE_A20:
|
291 | 80cabfad | bellard | cpu_x86_set_a20(env, 0);
|
292 | 80cabfad | bellard | break;
|
293 | 80cabfad | bellard | #endif
|
294 | 80cabfad | bellard | case KBD_CCMD_RESET:
|
295 | 80cabfad | bellard | reset_requested = 1;
|
296 | 80cabfad | bellard | cpu_interrupt(cpu_single_env, CPU_INTERRUPT_EXIT); |
297 | 80cabfad | bellard | break;
|
298 | 80cabfad | bellard | case 0xff: |
299 | 80cabfad | bellard | /* ignore that - I don't know what is its use */
|
300 | 80cabfad | bellard | break;
|
301 | 80cabfad | bellard | default:
|
302 | 80cabfad | bellard | fprintf(stderr, "qemu: unsupported keyboard cmd=0x%02x\n", val);
|
303 | 80cabfad | bellard | break;
|
304 | 80cabfad | bellard | } |
305 | 80cabfad | bellard | } |
306 | 80cabfad | bellard | |
307 | 80cabfad | bellard | static uint32_t kbd_read_data(CPUState *env, uint32_t addr)
|
308 | 80cabfad | bellard | { |
309 | 80cabfad | bellard | KBDState *s = &kbd_state; |
310 | 80cabfad | bellard | KBDQueue *q; |
311 | 80cabfad | bellard | int val, index;
|
312 | 80cabfad | bellard | |
313 | 80cabfad | bellard | q = &s->queues[0]; /* first check KBD data */ |
314 | 80cabfad | bellard | if (q->count == 0) |
315 | 80cabfad | bellard | q = &s->queues[1]; /* then check AUX data */ |
316 | 80cabfad | bellard | if (q->count == 0) { |
317 | 80cabfad | bellard | /* NOTE: if no data left, we return the last keyboard one
|
318 | 80cabfad | bellard | (needed for EMM386) */
|
319 | 80cabfad | bellard | /* XXX: need a timer to do things correctly */
|
320 | 80cabfad | bellard | q = &s->queues[0];
|
321 | 80cabfad | bellard | index = q->rptr - 1;
|
322 | 80cabfad | bellard | if (index < 0) |
323 | 80cabfad | bellard | index = KBD_QUEUE_SIZE - 1;
|
324 | 80cabfad | bellard | val = q->data[index]; |
325 | 80cabfad | bellard | } else {
|
326 | 80cabfad | bellard | val = q->data[q->rptr]; |
327 | 80cabfad | bellard | if (++q->rptr == KBD_QUEUE_SIZE)
|
328 | 80cabfad | bellard | q->rptr = 0;
|
329 | 80cabfad | bellard | q->count--; |
330 | 80cabfad | bellard | /* reading deasserts IRQ */
|
331 | 80cabfad | bellard | if (q == &s->queues[0]) |
332 | 80cabfad | bellard | pic_set_irq(1, 0); |
333 | 80cabfad | bellard | else
|
334 | 80cabfad | bellard | pic_set_irq(12, 0); |
335 | 80cabfad | bellard | } |
336 | 80cabfad | bellard | /* reassert IRQs if data left */
|
337 | 80cabfad | bellard | kbd_update_irq(s); |
338 | 80cabfad | bellard | #ifdef DEBUG_KBD
|
339 | 80cabfad | bellard | printf("kbd: read data=0x%02x\n", val);
|
340 | 80cabfad | bellard | #endif
|
341 | 80cabfad | bellard | return val;
|
342 | 80cabfad | bellard | } |
343 | 80cabfad | bellard | |
344 | 80cabfad | bellard | static void kbd_reset_keyboard(KBDState *s) |
345 | 80cabfad | bellard | { |
346 | 80cabfad | bellard | s->scan_enabled = 1;
|
347 | 80cabfad | bellard | } |
348 | 80cabfad | bellard | |
349 | 80cabfad | bellard | static void kbd_write_keyboard(KBDState *s, int val) |
350 | 80cabfad | bellard | { |
351 | 80cabfad | bellard | switch(s->kbd_write_cmd) {
|
352 | 80cabfad | bellard | default:
|
353 | 80cabfad | bellard | case -1: |
354 | 80cabfad | bellard | switch(val) {
|
355 | 80cabfad | bellard | case 0x00: |
356 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_ACK, 0);
|
357 | 80cabfad | bellard | break;
|
358 | 80cabfad | bellard | case 0x05: |
359 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_RESEND, 0);
|
360 | 80cabfad | bellard | break;
|
361 | 80cabfad | bellard | case KBD_CMD_GET_ID:
|
362 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_ACK, 0);
|
363 | 80cabfad | bellard | kbd_queue(s, 0xab, 0); |
364 | 80cabfad | bellard | kbd_queue(s, 0x83, 0); |
365 | 80cabfad | bellard | break;
|
366 | 80cabfad | bellard | case KBD_CMD_ECHO:
|
367 | 80cabfad | bellard | kbd_queue(s, KBD_CMD_ECHO, 0);
|
368 | 80cabfad | bellard | break;
|
369 | 80cabfad | bellard | case KBD_CMD_ENABLE:
|
370 | 80cabfad | bellard | s->scan_enabled = 1;
|
371 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_ACK, 0);
|
372 | 80cabfad | bellard | break;
|
373 | 80cabfad | bellard | case KBD_CMD_SET_LEDS:
|
374 | 80cabfad | bellard | case KBD_CMD_SET_RATE:
|
375 | 80cabfad | bellard | s->kbd_write_cmd = val; |
376 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_ACK, 0);
|
377 | 80cabfad | bellard | break;
|
378 | 80cabfad | bellard | case KBD_CMD_RESET_DISABLE:
|
379 | 80cabfad | bellard | kbd_reset_keyboard(s); |
380 | 80cabfad | bellard | s->scan_enabled = 0;
|
381 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_ACK, 0);
|
382 | 80cabfad | bellard | break;
|
383 | 80cabfad | bellard | case KBD_CMD_RESET_ENABLE:
|
384 | 80cabfad | bellard | kbd_reset_keyboard(s); |
385 | 80cabfad | bellard | s->scan_enabled = 1;
|
386 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_ACK, 0);
|
387 | 80cabfad | bellard | break;
|
388 | 80cabfad | bellard | case KBD_CMD_RESET:
|
389 | 80cabfad | bellard | kbd_reset_keyboard(s); |
390 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_ACK, 0);
|
391 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_POR, 0);
|
392 | 80cabfad | bellard | break;
|
393 | 80cabfad | bellard | default:
|
394 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_ACK, 0);
|
395 | 80cabfad | bellard | break;
|
396 | 80cabfad | bellard | } |
397 | 80cabfad | bellard | break;
|
398 | 80cabfad | bellard | case KBD_CMD_SET_LEDS:
|
399 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_ACK, 0);
|
400 | 80cabfad | bellard | s->kbd_write_cmd = -1;
|
401 | 80cabfad | bellard | break;
|
402 | 80cabfad | bellard | case KBD_CMD_SET_RATE:
|
403 | 80cabfad | bellard | kbd_queue(s, KBD_REPLY_ACK, 0);
|
404 | 80cabfad | bellard | s->kbd_write_cmd = -1;
|
405 | 80cabfad | bellard | break;
|
406 | 80cabfad | bellard | } |
407 | 80cabfad | bellard | } |
408 | 80cabfad | bellard | |
409 | 80cabfad | bellard | static void kbd_mouse_send_packet(KBDState *s) |
410 | 80cabfad | bellard | { |
411 | 80cabfad | bellard | unsigned int b; |
412 | 80cabfad | bellard | int dx1, dy1, dz1;
|
413 | 80cabfad | bellard | |
414 | 80cabfad | bellard | dx1 = s->mouse_dx; |
415 | 80cabfad | bellard | dy1 = s->mouse_dy; |
416 | 80cabfad | bellard | dz1 = s->mouse_dz; |
417 | 80cabfad | bellard | /* XXX: increase range to 8 bits ? */
|
418 | 80cabfad | bellard | if (dx1 > 127) |
419 | 80cabfad | bellard | dx1 = 127;
|
420 | 80cabfad | bellard | else if (dx1 < -127) |
421 | 80cabfad | bellard | dx1 = -127;
|
422 | 80cabfad | bellard | if (dy1 > 127) |
423 | 80cabfad | bellard | dy1 = 127;
|
424 | 80cabfad | bellard | else if (dy1 < -127) |
425 | 80cabfad | bellard | dy1 = -127;
|
426 | 80cabfad | bellard | b = 0x08 | ((dx1 < 0) << 4) | ((dy1 < 0) << 5) | (s->mouse_buttons & 0x07); |
427 | 80cabfad | bellard | kbd_queue(s, b, 1);
|
428 | 80cabfad | bellard | kbd_queue(s, dx1 & 0xff, 1); |
429 | 80cabfad | bellard | kbd_queue(s, dy1 & 0xff, 1); |
430 | 80cabfad | bellard | /* extra byte for IMPS/2 or IMEX */
|
431 | 80cabfad | bellard | switch(s->mouse_type) {
|
432 | 80cabfad | bellard | default:
|
433 | 80cabfad | bellard | break;
|
434 | 80cabfad | bellard | case 3: |
435 | 80cabfad | bellard | if (dz1 > 127) |
436 | 80cabfad | bellard | dz1 = 127;
|
437 | 80cabfad | bellard | else if (dz1 < -127) |
438 | 80cabfad | bellard | dz1 = -127;
|
439 | 80cabfad | bellard | kbd_queue(s, dz1 & 0xff, 1); |
440 | 80cabfad | bellard | break;
|
441 | 80cabfad | bellard | case 4: |
442 | 80cabfad | bellard | if (dz1 > 7) |
443 | 80cabfad | bellard | dz1 = 7;
|
444 | 80cabfad | bellard | else if (dz1 < -7) |
445 | 80cabfad | bellard | dz1 = -7;
|
446 | 80cabfad | bellard | b = (dz1 & 0x0f) | ((s->mouse_buttons & 0x18) << 1); |
447 | 80cabfad | bellard | kbd_queue(s, b, 1);
|
448 | 80cabfad | bellard | break;
|
449 | 80cabfad | bellard | } |
450 | 80cabfad | bellard | |
451 | 80cabfad | bellard | /* update deltas */
|
452 | 80cabfad | bellard | s->mouse_dx -= dx1; |
453 | 80cabfad | bellard | s->mouse_dy -= dy1; |
454 | 80cabfad | bellard | s->mouse_dz -= dz1; |
455 | 80cabfad | bellard | } |
456 | 80cabfad | bellard | |
457 | 80cabfad | bellard | void kbd_mouse_event(int dx, int dy, int dz, int buttons_state) |
458 | 80cabfad | bellard | { |
459 | 80cabfad | bellard | KBDState *s = &kbd_state; |
460 | 80cabfad | bellard | |
461 | 80cabfad | bellard | /* check if deltas are recorded when disabled */
|
462 | 80cabfad | bellard | if (!(s->mouse_status & MOUSE_STATUS_ENABLED))
|
463 | 80cabfad | bellard | return;
|
464 | 80cabfad | bellard | |
465 | 80cabfad | bellard | s->mouse_dx += dx; |
466 | 80cabfad | bellard | s->mouse_dy -= dy; |
467 | 80cabfad | bellard | s->mouse_dz += dz; |
468 | 80cabfad | bellard | s->mouse_buttons = buttons_state; |
469 | 80cabfad | bellard | |
470 | 80cabfad | bellard | if (!(s->mouse_status & MOUSE_STATUS_REMOTE) &&
|
471 | 80cabfad | bellard | (s->queues[1].count < (KBD_QUEUE_SIZE - 16))) { |
472 | 80cabfad | bellard | for(;;) {
|
473 | 80cabfad | bellard | /* if not remote, send event. Multiple events are sent if
|
474 | 80cabfad | bellard | too big deltas */
|
475 | 80cabfad | bellard | kbd_mouse_send_packet(s); |
476 | 80cabfad | bellard | if (s->mouse_dx == 0 && s->mouse_dy == 0 && s->mouse_dz == 0) |
477 | 80cabfad | bellard | break;
|
478 | 80cabfad | bellard | } |
479 | 80cabfad | bellard | } |
480 | 80cabfad | bellard | } |
481 | 80cabfad | bellard | |
482 | 80cabfad | bellard | static void kbd_write_mouse(KBDState *s, int val) |
483 | 80cabfad | bellard | { |
484 | 80cabfad | bellard | #ifdef DEBUG_MOUSE
|
485 | 80cabfad | bellard | printf("kbd: write mouse 0x%02x\n", val);
|
486 | 80cabfad | bellard | #endif
|
487 | 80cabfad | bellard | switch(s->mouse_write_cmd) {
|
488 | 80cabfad | bellard | default:
|
489 | 80cabfad | bellard | case -1: |
490 | 80cabfad | bellard | /* mouse command */
|
491 | 80cabfad | bellard | if (s->mouse_wrap) {
|
492 | 80cabfad | bellard | if (val == AUX_RESET_WRAP) {
|
493 | 80cabfad | bellard | s->mouse_wrap = 0;
|
494 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
495 | 80cabfad | bellard | return;
|
496 | 80cabfad | bellard | } else if (val != AUX_RESET) { |
497 | 80cabfad | bellard | kbd_queue(s, val, 1);
|
498 | 80cabfad | bellard | return;
|
499 | 80cabfad | bellard | } |
500 | 80cabfad | bellard | } |
501 | 80cabfad | bellard | switch(val) {
|
502 | 80cabfad | bellard | case AUX_SET_SCALE11:
|
503 | 80cabfad | bellard | s->mouse_status &= ~MOUSE_STATUS_SCALE21; |
504 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
505 | 80cabfad | bellard | break;
|
506 | 80cabfad | bellard | case AUX_SET_SCALE21:
|
507 | 80cabfad | bellard | s->mouse_status |= MOUSE_STATUS_SCALE21; |
508 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
509 | 80cabfad | bellard | break;
|
510 | 80cabfad | bellard | case AUX_SET_STREAM:
|
511 | 80cabfad | bellard | s->mouse_status &= ~MOUSE_STATUS_REMOTE; |
512 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
513 | 80cabfad | bellard | break;
|
514 | 80cabfad | bellard | case AUX_SET_WRAP:
|
515 | 80cabfad | bellard | s->mouse_wrap = 1;
|
516 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
517 | 80cabfad | bellard | break;
|
518 | 80cabfad | bellard | case AUX_SET_REMOTE:
|
519 | 80cabfad | bellard | s->mouse_status |= MOUSE_STATUS_REMOTE; |
520 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
521 | 80cabfad | bellard | break;
|
522 | 80cabfad | bellard | case AUX_GET_TYPE:
|
523 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
524 | 80cabfad | bellard | kbd_queue(s, s->mouse_type, 1);
|
525 | 80cabfad | bellard | break;
|
526 | 80cabfad | bellard | case AUX_SET_RES:
|
527 | 80cabfad | bellard | case AUX_SET_SAMPLE:
|
528 | 80cabfad | bellard | s->mouse_write_cmd = val; |
529 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
530 | 80cabfad | bellard | break;
|
531 | 80cabfad | bellard | case AUX_GET_SCALE:
|
532 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
533 | 80cabfad | bellard | kbd_queue(s, s->mouse_status, 1);
|
534 | 80cabfad | bellard | kbd_queue(s, s->mouse_resolution, 1);
|
535 | 80cabfad | bellard | kbd_queue(s, s->mouse_sample_rate, 1);
|
536 | 80cabfad | bellard | break;
|
537 | 80cabfad | bellard | case AUX_POLL:
|
538 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
539 | 80cabfad | bellard | kbd_mouse_send_packet(s); |
540 | 80cabfad | bellard | break;
|
541 | 80cabfad | bellard | case AUX_ENABLE_DEV:
|
542 | 80cabfad | bellard | s->mouse_status |= MOUSE_STATUS_ENABLED; |
543 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
544 | 80cabfad | bellard | break;
|
545 | 80cabfad | bellard | case AUX_DISABLE_DEV:
|
546 | 80cabfad | bellard | s->mouse_status &= ~MOUSE_STATUS_ENABLED; |
547 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
548 | 80cabfad | bellard | break;
|
549 | 80cabfad | bellard | case AUX_SET_DEFAULT:
|
550 | 80cabfad | bellard | s->mouse_sample_rate = 100;
|
551 | 80cabfad | bellard | s->mouse_resolution = 2;
|
552 | 80cabfad | bellard | s->mouse_status = 0;
|
553 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
554 | 80cabfad | bellard | break;
|
555 | 80cabfad | bellard | case AUX_RESET:
|
556 | 80cabfad | bellard | s->mouse_sample_rate = 100;
|
557 | 80cabfad | bellard | s->mouse_resolution = 2;
|
558 | 80cabfad | bellard | s->mouse_status = 0;
|
559 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
560 | 80cabfad | bellard | kbd_queue(s, 0xaa, 1); |
561 | 80cabfad | bellard | kbd_queue(s, s->mouse_type, 1);
|
562 | 80cabfad | bellard | break;
|
563 | 80cabfad | bellard | default:
|
564 | 80cabfad | bellard | break;
|
565 | 80cabfad | bellard | } |
566 | 80cabfad | bellard | break;
|
567 | 80cabfad | bellard | case AUX_SET_SAMPLE:
|
568 | 80cabfad | bellard | s->mouse_sample_rate = val; |
569 | 80cabfad | bellard | #if 0
|
570 | 80cabfad | bellard | /* detect IMPS/2 or IMEX */
|
571 | 80cabfad | bellard | switch(s->mouse_detect_state) {
|
572 | 80cabfad | bellard | default:
|
573 | 80cabfad | bellard | case 0:
|
574 | 80cabfad | bellard | if (val == 200)
|
575 | 80cabfad | bellard | s->mouse_detect_state = 1;
|
576 | 80cabfad | bellard | break;
|
577 | 80cabfad | bellard | case 1:
|
578 | 80cabfad | bellard | if (val == 100)
|
579 | 80cabfad | bellard | s->mouse_detect_state = 2;
|
580 | 80cabfad | bellard | else if (val == 200)
|
581 | 80cabfad | bellard | s->mouse_detect_state = 3;
|
582 | 80cabfad | bellard | else
|
583 | 80cabfad | bellard | s->mouse_detect_state = 0;
|
584 | 80cabfad | bellard | break;
|
585 | 80cabfad | bellard | case 2:
|
586 | 80cabfad | bellard | if (val == 80)
|
587 | 80cabfad | bellard | s->mouse_type = 3; /* IMPS/2 */
|
588 | 80cabfad | bellard | s->mouse_detect_state = 0;
|
589 | 80cabfad | bellard | break;
|
590 | 80cabfad | bellard | case 3:
|
591 | 80cabfad | bellard | if (val == 80)
|
592 | 80cabfad | bellard | s->mouse_type = 4; /* IMEX */
|
593 | 80cabfad | bellard | s->mouse_detect_state = 0;
|
594 | 80cabfad | bellard | break;
|
595 | 80cabfad | bellard | }
|
596 | 80cabfad | bellard | #endif
|
597 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
598 | 80cabfad | bellard | s->mouse_write_cmd = -1;
|
599 | 80cabfad | bellard | break;
|
600 | 80cabfad | bellard | case AUX_SET_RES:
|
601 | 80cabfad | bellard | s->mouse_resolution = val; |
602 | 80cabfad | bellard | kbd_queue(s, AUX_ACK, 1);
|
603 | 80cabfad | bellard | s->mouse_write_cmd = -1;
|
604 | 80cabfad | bellard | break;
|
605 | 80cabfad | bellard | } |
606 | 80cabfad | bellard | } |
607 | 80cabfad | bellard | |
608 | 80cabfad | bellard | void kbd_write_data(CPUState *env, uint32_t addr, uint32_t val)
|
609 | 80cabfad | bellard | { |
610 | 80cabfad | bellard | KBDState *s = &kbd_state; |
611 | 80cabfad | bellard | |
612 | 80cabfad | bellard | #ifdef DEBUG_KBD
|
613 | 80cabfad | bellard | printf("kbd: write data=0x%02x\n", val);
|
614 | 80cabfad | bellard | #endif
|
615 | 80cabfad | bellard | |
616 | 80cabfad | bellard | switch(s->write_cmd) {
|
617 | 80cabfad | bellard | case 0: |
618 | 80cabfad | bellard | kbd_write_keyboard(s, val); |
619 | 80cabfad | bellard | break;
|
620 | 80cabfad | bellard | case KBD_CCMD_WRITE_MODE:
|
621 | 80cabfad | bellard | s->mode = val; |
622 | 80cabfad | bellard | kbd_update_irq(s); |
623 | 80cabfad | bellard | break;
|
624 | 80cabfad | bellard | case KBD_CCMD_WRITE_OBUF:
|
625 | 80cabfad | bellard | kbd_queue(s, val, 0);
|
626 | 80cabfad | bellard | break;
|
627 | 80cabfad | bellard | case KBD_CCMD_WRITE_AUX_OBUF:
|
628 | 80cabfad | bellard | kbd_queue(s, val, 1);
|
629 | 80cabfad | bellard | break;
|
630 | 80cabfad | bellard | case KBD_CCMD_WRITE_OUTPORT:
|
631 | 80cabfad | bellard | #ifdef TARGET_I386
|
632 | 80cabfad | bellard | cpu_x86_set_a20(env, (val >> 1) & 1); |
633 | 80cabfad | bellard | #endif
|
634 | 80cabfad | bellard | if (!(val & 1)) { |
635 | 80cabfad | bellard | reset_requested = 1;
|
636 | 80cabfad | bellard | cpu_interrupt(cpu_single_env, CPU_INTERRUPT_EXIT); |
637 | 80cabfad | bellard | } |
638 | 80cabfad | bellard | break;
|
639 | 80cabfad | bellard | case KBD_CCMD_WRITE_MOUSE:
|
640 | 80cabfad | bellard | kbd_write_mouse(s, val); |
641 | 80cabfad | bellard | break;
|
642 | 80cabfad | bellard | default:
|
643 | 80cabfad | bellard | break;
|
644 | 80cabfad | bellard | } |
645 | 80cabfad | bellard | s->write_cmd = 0;
|
646 | 80cabfad | bellard | } |
647 | 80cabfad | bellard | |
648 | 80cabfad | bellard | void kbd_reset(KBDState *s)
|
649 | 80cabfad | bellard | { |
650 | 80cabfad | bellard | KBDQueue *q; |
651 | 80cabfad | bellard | int i;
|
652 | 80cabfad | bellard | |
653 | 80cabfad | bellard | s->kbd_write_cmd = -1;
|
654 | 80cabfad | bellard | s->mouse_write_cmd = -1;
|
655 | 80cabfad | bellard | s->mode = KBD_MODE_KBD_INT | KBD_MODE_MOUSE_INT; |
656 | 80cabfad | bellard | s->status = KBD_STAT_CMD | KBD_STAT_UNLOCKED; |
657 | 80cabfad | bellard | for(i = 0; i < 2; i++) { |
658 | 80cabfad | bellard | q = &s->queues[i]; |
659 | 80cabfad | bellard | q->rptr = 0;
|
660 | 80cabfad | bellard | q->wptr = 0;
|
661 | 80cabfad | bellard | q->count = 0;
|
662 | 80cabfad | bellard | } |
663 | 80cabfad | bellard | } |
664 | 80cabfad | bellard | |
665 | 80cabfad | bellard | void kbd_init(void) |
666 | 80cabfad | bellard | { |
667 | 80cabfad | bellard | kbd_reset(&kbd_state); |
668 | 80cabfad | bellard | register_ioport_read(0x60, 1, kbd_read_data, 1); |
669 | 80cabfad | bellard | register_ioport_write(0x60, 1, kbd_write_data, 1); |
670 | 80cabfad | bellard | register_ioport_read(0x64, 1, kbd_read_status, 1); |
671 | 80cabfad | bellard | register_ioport_write(0x64, 1, kbd_write_command, 1); |
672 | 80cabfad | bellard | } |