]>
Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * linux/drivers/char/ec3104_keyb.c | |
3 | * | |
4 | * Copyright (C) 2000 Philipp Rumpf <[email protected]> | |
5 | * | |
6 | * based on linux/drivers/char/pc_keyb.c, which had the following comments: | |
7 | * | |
8 | * Separation of the PC low-level part by Geert Uytterhoeven, May 1997 | |
9 | * See keyboard.c for the whole history. | |
10 | * | |
11 | * Major cleanup by Martin Mares, May 1997 | |
12 | * | |
13 | * Combined the keyboard and PS/2 mouse handling into one file, | |
14 | * because they share the same hardware. | |
15 | * Johan Myreen <[email protected]> 1998-10-08. | |
16 | * | |
17 | * Code fixes to handle mouse ACKs properly. | |
18 | * C. Scott Ananian <[email protected]> 1999-01-29. | |
19 | */ | |
20 | /* EC3104 note: | |
21 | * This code was written without any documentation about the EC3104 chip. While | |
22 | * I hope I got most of the basic functionality right, the register names I use | |
23 | * are most likely completely different from those in the chip documentation. | |
24 | * | |
25 | * If you have any further information about the EC3104, please tell me | |
26 | * ([email protected]). | |
27 | */ | |
28 | ||
29 | #include <linux/config.h> | |
30 | ||
31 | #include <linux/spinlock.h> | |
32 | #include <linux/sched.h> | |
33 | #include <linux/interrupt.h> | |
34 | #include <linux/tty.h> | |
35 | #include <linux/mm.h> | |
36 | #include <linux/signal.h> | |
37 | #include <linux/init.h> | |
38 | #include <linux/kbd_ll.h> | |
39 | #include <linux/delay.h> | |
40 | #include <linux/random.h> | |
41 | #include <linux/poll.h> | |
42 | #include <linux/miscdevice.h> | |
43 | #include <linux/slab.h> | |
44 | #include <linux/kbd_kern.h> | |
45 | #include <linux/smp_lock.h> | |
46 | #include <linux/bitops.h> | |
47 | ||
48 | #include <asm/keyboard.h> | |
49 | #include <asm/uaccess.h> | |
50 | #include <asm/irq.h> | |
51 | #include <asm/system.h> | |
52 | #include <asm/ec3104.h> | |
53 | ||
54 | #include <asm/io.h> | |
55 | ||
56 | /* Some configuration switches are present in the include file... */ | |
57 | ||
58 | #include <linux/pc_keyb.h> | |
59 | ||
60 | #define MSR_CTS 0x10 | |
61 | #define MCR_RTS 0x02 | |
62 | #define LSR_DR 0x01 | |
63 | #define LSR_BOTH_EMPTY 0x60 | |
64 | ||
65 | static struct e5_struct { | |
66 | u8 packet[8]; | |
67 | int pos; | |
68 | int length; | |
69 | ||
70 | u8 cached_mcr; | |
71 | u8 last_msr; | |
72 | } ec3104_keyb; | |
73 | ||
74 | /* Simple translation table for the SysRq keys */ | |
75 | ||
76 | ||
77 | #ifdef CONFIG_MAGIC_SYSRQ | |
78 | unsigned char ec3104_kbd_sysrq_xlate[128] = | |
79 | "\000\0331234567890-=\177\t" /* 0x00 - 0x0f */ | |
80 | "qwertyuiop[]\r\000as" /* 0x10 - 0x1f */ | |
81 | "dfghjkl;'`\000\\zxcv" /* 0x20 - 0x2f */ | |
82 | "bnm,./\000*\000 \000\201\202\203\204\205" /* 0x30 - 0x3f */ | |
83 | "\206\207\210\211\212\000\000789-456+1" /* 0x40 - 0x4f */ | |
84 | "230\177\000\000\213\214\000\000\000\000\000\000\000\000\000\000" /* 0x50 - 0x5f */ | |
85 | "\r\000/"; /* 0x60 - 0x6f */ | |
86 | #endif | |
87 | ||
88 | static void kbd_write_command_w(int data); | |
89 | static void kbd_write_output_w(int data); | |
90 | #ifdef CONFIG_PSMOUSE | |
91 | static void aux_write_ack(int val); | |
92 | static void __aux_write_ack(int val); | |
93 | #endif | |
94 | ||
95 | static DEFINE_SPINLOCK(kbd_controller_lock); | |
96 | static unsigned char handle_kbd_event(void); | |
97 | ||
98 | /* used only by send_data - set by keyboard_interrupt */ | |
99 | static volatile unsigned char reply_expected; | |
100 | static volatile unsigned char acknowledge; | |
101 | static volatile unsigned char resend; | |
102 | ||
103 | ||
104 | int ec3104_kbd_setkeycode(unsigned int scancode, unsigned int keycode) | |
105 | { | |
106 | return 0; | |
107 | } | |
108 | ||
109 | int ec3104_kbd_getkeycode(unsigned int scancode) | |
110 | { | |
111 | return 0; | |
112 | } | |
113 | ||
114 | ||
115 | /* yes, it probably would be faster to use an array. I don't care. */ | |
116 | ||
117 | static inline unsigned char ec3104_scan2key(unsigned char scancode) | |
118 | { | |
119 | switch (scancode) { | |
120 | case 1: /* '`' */ | |
121 | return 41; | |
122 | ||
123 | case 2 ... 27: | |
124 | return scancode; | |
125 | ||
126 | case 28: /* '\\' */ | |
127 | return 43; | |
128 | ||
129 | case 29 ... 39: | |
130 | return scancode + 1; | |
131 | ||
132 | case 40: /* '\r' */ | |
133 | return 28; | |
134 | ||
135 | case 41 ... 50: | |
136 | return scancode + 3; | |
137 | ||
138 | case 51: /* ' ' */ | |
139 | return 57; | |
140 | ||
141 | case 52: /* escape */ | |
142 | return 1; | |
143 | ||
144 | case 54: /* insert/delete (labelled delete) */ | |
145 | /* this should arguably be 110, but I'd like to have ctrl-alt-del | |
146 | * working with a standard keymap */ | |
147 | return 111; | |
148 | ||
149 | case 55: /* left */ | |
150 | return 105; | |
151 | case 56: /* home */ | |
152 | return 102; | |
153 | case 57: /* end */ | |
154 | return 107; | |
155 | case 58: /* up */ | |
156 | return 103; | |
157 | case 59: /* down */ | |
158 | return 108; | |
159 | case 60: /* pgup */ | |
160 | return 104; | |
161 | case 61: /* pgdown */ | |
162 | return 109; | |
163 | case 62: /* right */ | |
164 | return 106; | |
165 | ||
166 | case 79 ... 88: /* f1 - f10 */ | |
167 | return scancode - 20; | |
168 | ||
169 | case 89 ... 90: /* f11 - f12 */ | |
170 | return scancode - 2; | |
171 | ||
172 | case 91: /* left shift */ | |
173 | return 42; | |
174 | ||
175 | case 92: /* right shift */ | |
176 | return 54; | |
177 | ||
178 | case 93: /* left alt */ | |
179 | return 56; | |
180 | case 94: /* right alt */ | |
181 | return 100; | |
182 | case 95: /* left ctrl */ | |
183 | return 29; | |
184 | case 96: /* right ctrl */ | |
185 | return 97; | |
186 | ||
187 | case 97: /* caps lock */ | |
188 | return 58; | |
189 | case 102: /* left windows */ | |
190 | return 125; | |
191 | case 103: /* right windows */ | |
192 | return 126; | |
193 | ||
194 | case 106: /* Fn */ | |
195 | /* this is wrong. */ | |
196 | return 84; | |
197 | ||
198 | default: | |
199 | return 0; | |
200 | } | |
201 | } | |
202 | ||
203 | int ec3104_kbd_translate(unsigned char scancode, unsigned char *keycode, | |
204 | char raw_mode) | |
205 | { | |
206 | scancode &= 0x7f; | |
207 | ||
208 | *keycode = ec3104_scan2key(scancode); | |
209 | ||
210 | return 1; | |
211 | } | |
212 | ||
213 | char ec3104_kbd_unexpected_up(unsigned char keycode) | |
214 | { | |
215 | return 0200; | |
216 | } | |
217 | ||
218 | static inline void handle_keyboard_event(unsigned char scancode) | |
219 | { | |
220 | #ifdef CONFIG_VT | |
221 | handle_scancode(scancode, !(scancode & 0x80)); | |
222 | #endif | |
223 | tasklet_schedule(&keyboard_tasklet); | |
224 | } | |
225 | ||
226 | void ec3104_kbd_leds(unsigned char leds) | |
227 | { | |
228 | } | |
229 | ||
230 | static u8 e5_checksum(u8 *packet, int count) | |
231 | { | |
232 | int i; | |
233 | u8 sum = 0; | |
234 | ||
235 | for (i=0; i<count; i++) | |
236 | sum ^= packet[i]; | |
237 | ||
238 | if (sum & 0x80) | |
239 | sum ^= 0xc0; | |
240 | ||
241 | return sum; | |
242 | } | |
243 | ||
244 | static void e5_wait_for_cts(struct e5_struct *k) | |
245 | { | |
246 | u8 msr; | |
247 | ||
248 | do { | |
249 | msr = ctrl_inb(EC3104_SER4_MSR); | |
250 | } while (!(msr & MSR_CTS)); | |
251 | } | |
252 | ||
253 | ||
254 | static void e5_send_byte(u8 byte, struct e5_struct *k) | |
255 | { | |
256 | u8 status; | |
257 | ||
258 | do { | |
259 | status = ctrl_inb(EC3104_SER4_LSR); | |
260 | } while ((status & LSR_BOTH_EMPTY) != LSR_BOTH_EMPTY); | |
261 | ||
262 | printk("<%02x>", byte); | |
263 | ||
264 | ctrl_outb(byte, EC3104_SER4_DATA); | |
265 | ||
266 | do { | |
267 | status = ctrl_inb(EC3104_SER4_LSR); | |
268 | } while ((status & LSR_BOTH_EMPTY) != LSR_BOTH_EMPTY); | |
269 | ||
270 | } | |
271 | ||
272 | static int e5_send_packet(u8 *packet, int count, struct e5_struct *k) | |
273 | { | |
274 | int i; | |
275 | ||
276 | disable_irq(EC3104_IRQ_SER4); | |
277 | ||
278 | if (k->cached_mcr & MCR_RTS) { | |
279 | printk("e5_send_packet: too slow\n"); | |
280 | enable_irq(EC3104_IRQ_SER4); | |
281 | return -EAGAIN; | |
282 | } | |
283 | ||
284 | k->cached_mcr |= MCR_RTS; | |
285 | ctrl_outb(k->cached_mcr, EC3104_SER4_MCR); | |
286 | ||
287 | e5_wait_for_cts(k); | |
288 | ||
289 | printk("p: "); | |
290 | ||
291 | for(i=0; i<count; i++) | |
292 | e5_send_byte(packet[i], k); | |
293 | ||
294 | e5_send_byte(e5_checksum(packet, count), k); | |
295 | ||
296 | printk("\n"); | |
297 | ||
298 | udelay(1500); | |
299 | ||
300 | k->cached_mcr &= ~MCR_RTS; | |
301 | ctrl_outb(k->cached_mcr, EC3104_SER4_MCR); | |
302 | ||
303 | set_current_state(TASK_UNINTERRUPTIBLE); | |
304 | ||
305 | ||
306 | ||
307 | enable_irq(EC3104_IRQ_SER4); | |
308 | ||
309 | ||
310 | ||
311 | return 0; | |
312 | } | |
313 | ||
314 | /* | |
315 | * E5 packets we know about: | |
316 | * E5->host 0x80 0x05 <checksum> - resend packet | |
317 | * host->E5 0x83 0x43 <contrast> - set LCD contrast | |
318 | * host->E5 0x85 0x41 0x02 <brightness> 0x02 - set LCD backlight | |
319 | * E5->host 0x87 <ps2 packet> 0x00 <checksum> - external PS2 | |
320 | * E5->host 0x88 <scancode> <checksum> - key press | |
321 | */ | |
322 | ||
323 | static void e5_receive(struct e5_struct *k) | |
324 | { | |
325 | k->packet[k->pos++] = ctrl_inb(EC3104_SER4_DATA); | |
326 | ||
327 | if (k->pos == 1) { | |
328 | switch(k->packet[0]) { | |
329 | case 0x80: | |
330 | k->length = 3; | |
331 | break; | |
332 | ||
333 | case 0x87: /* PS2 ext */ | |
334 | k->length = 6; | |
335 | break; | |
336 | ||
337 | case 0x88: /* keyboard */ | |
338 | k->length = 3; | |
339 | break; | |
340 | ||
341 | default: | |
342 | k->length = 1; | |
343 | printk(KERN_WARNING "unknown E5 packet %02x\n", | |
344 | k->packet[0]); | |
345 | } | |
346 | } | |
347 | ||
348 | if (k->pos == k->length) { | |
349 | int i; | |
350 | ||
351 | if (e5_checksum(k->packet, k->length) != 0) | |
352 | printk(KERN_WARNING "E5: wrong checksum\n"); | |
353 | ||
354 | #if 0 | |
355 | printk("E5 packet ["); | |
356 | for(i=0; i<k->length; i++) { | |
357 | printk("%02x ", k->packet[i]); | |
358 | } | |
359 | ||
360 | printk("(%02x)]\n", e5_checksum(k->packet, k->length-1)); | |
361 | #endif | |
362 | ||
363 | switch(k->packet[0]) { | |
364 | case 0x80: | |
365 | case 0x88: | |
366 | handle_keyboard_event(k->packet[1]); | |
367 | break; | |
368 | } | |
369 | ||
370 | k->pos = k->length = 0; | |
371 | } | |
372 | } | |
373 | ||
374 | static void ec3104_keyb_interrupt(int irq, void *data, struct pt_regs *regs) | |
375 | { | |
376 | struct e5_struct *k = &ec3104_keyb; | |
377 | u8 msr, lsr; | |
378 | ||
379 | msr = ctrl_inb(EC3104_SER4_MSR); | |
380 | ||
381 | if ((msr & MSR_CTS) && !(k->last_msr & MSR_CTS)) { | |
382 | if (k->cached_mcr & MCR_RTS) | |
383 | printk("confused: RTS already high\n"); | |
384 | /* CTS went high. Send RTS. */ | |
385 | k->cached_mcr |= MCR_RTS; | |
386 | ||
387 | ctrl_outb(k->cached_mcr, EC3104_SER4_MCR); | |
388 | } else if ((!(msr & MSR_CTS)) && (k->last_msr & MSR_CTS)) { | |
389 | /* CTS went low. */ | |
390 | if (!(k->cached_mcr & MCR_RTS)) | |
391 | printk("confused: RTS already low\n"); | |
392 | ||
393 | k->cached_mcr &= ~MCR_RTS; | |
394 | ||
395 | ctrl_outb(k->cached_mcr, EC3104_SER4_MCR); | |
396 | } | |
397 | ||
398 | k->last_msr = msr; | |
399 | ||
400 | lsr = ctrl_inb(EC3104_SER4_LSR); | |
401 | ||
402 | if (lsr & LSR_DR) | |
403 | e5_receive(k); | |
404 | } | |
405 | ||
406 | static void ec3104_keyb_clear_state(void) | |
407 | { | |
408 | struct e5_struct *k = &ec3104_keyb; | |
409 | u8 msr, lsr; | |
410 | ||
411 | /* we want CTS to be low */ | |
412 | k->last_msr = 0; | |
413 | ||
414 | for (;;) { | |
415 | msleep(100); | |
416 | ||
417 | msr = ctrl_inb(EC3104_SER4_MSR); | |
418 | ||
419 | lsr = ctrl_inb(EC3104_SER4_LSR); | |
420 | ||
421 | if (lsr & LSR_DR) { | |
422 | e5_receive(k); | |
423 | continue; | |
424 | } | |
425 | ||
426 | if ((msr & MSR_CTS) && !(k->last_msr & MSR_CTS)) { | |
427 | if (k->cached_mcr & MCR_RTS) | |
428 | printk("confused: RTS already high\n"); | |
429 | /* CTS went high. Send RTS. */ | |
430 | k->cached_mcr |= MCR_RTS; | |
431 | ||
432 | ctrl_outb(k->cached_mcr, EC3104_SER4_MCR); | |
433 | } else if ((!(msr & MSR_CTS)) && (k->last_msr & MSR_CTS)) { | |
434 | /* CTS went low. */ | |
435 | if (!(k->cached_mcr & MCR_RTS)) | |
436 | printk("confused: RTS already low\n"); | |
437 | ||
438 | k->cached_mcr &= ~MCR_RTS; | |
439 | ||
440 | ctrl_outb(k->cached_mcr, EC3104_SER4_MCR); | |
441 | } else | |
442 | break; | |
443 | ||
444 | k->last_msr = msr; | |
445 | ||
446 | continue; | |
447 | } | |
448 | } | |
449 | ||
450 | void __init ec3104_kbd_init_hw(void) | |
451 | { | |
452 | ec3104_keyb.last_msr = ctrl_inb(EC3104_SER4_MSR); | |
453 | ec3104_keyb.cached_mcr = ctrl_inb(EC3104_SER4_MCR); | |
454 | ||
455 | ec3104_keyb_clear_state(); | |
456 | ||
457 | /* Ok, finally allocate the IRQ, and off we go.. */ | |
458 | request_irq(EC3104_IRQ_SER4, ec3104_keyb_interrupt, 0, "keyboard", NULL); | |
459 | } |