460 lines
9.1 KiB
C
460 lines
9.1 KiB
C
|
/*
|
||
|
* linux/drivers/char/ec3104_keyb.c
|
||
|
*
|
||
|
* Copyright (C) 2000 Philipp Rumpf <prumpf@tux.org>
|
||
|
*
|
||
|
* based on linux/drivers/char/pc_keyb.c, which had the following comments:
|
||
|
*
|
||
|
* Separation of the PC low-level part by Geert Uytterhoeven, May 1997
|
||
|
* See keyboard.c for the whole history.
|
||
|
*
|
||
|
* Major cleanup by Martin Mares, May 1997
|
||
|
*
|
||
|
* Combined the keyboard and PS/2 mouse handling into one file,
|
||
|
* because they share the same hardware.
|
||
|
* Johan Myreen <jem@iki.fi> 1998-10-08.
|
||
|
*
|
||
|
* Code fixes to handle mouse ACKs properly.
|
||
|
* C. Scott Ananian <cananian@alumni.princeton.edu> 1999-01-29.
|
||
|
*/
|
||
|
/* EC3104 note:
|
||
|
* This code was written without any documentation about the EC3104 chip. While
|
||
|
* I hope I got most of the basic functionality right, the register names I use
|
||
|
* are most likely completely different from those in the chip documentation.
|
||
|
*
|
||
|
* If you have any further information about the EC3104, please tell me
|
||
|
* (prumpf@tux.org).
|
||
|
*/
|
||
|
|
||
|
#include <linux/config.h>
|
||
|
|
||
|
#include <linux/spinlock.h>
|
||
|
#include <linux/sched.h>
|
||
|
#include <linux/interrupt.h>
|
||
|
#include <linux/tty.h>
|
||
|
#include <linux/mm.h>
|
||
|
#include <linux/signal.h>
|
||
|
#include <linux/init.h>
|
||
|
#include <linux/kbd_ll.h>
|
||
|
#include <linux/delay.h>
|
||
|
#include <linux/random.h>
|
||
|
#include <linux/poll.h>
|
||
|
#include <linux/miscdevice.h>
|
||
|
#include <linux/slab.h>
|
||
|
#include <linux/kbd_kern.h>
|
||
|
#include <linux/smp_lock.h>
|
||
|
#include <linux/bitops.h>
|
||
|
|
||
|
#include <asm/keyboard.h>
|
||
|
#include <asm/uaccess.h>
|
||
|
#include <asm/irq.h>
|
||
|
#include <asm/system.h>
|
||
|
#include <asm/ec3104.h>
|
||
|
|
||
|
#include <asm/io.h>
|
||
|
|
||
|
/* Some configuration switches are present in the include file... */
|
||
|
|
||
|
#include <linux/pc_keyb.h>
|
||
|
|
||
|
#define MSR_CTS 0x10
|
||
|
#define MCR_RTS 0x02
|
||
|
#define LSR_DR 0x01
|
||
|
#define LSR_BOTH_EMPTY 0x60
|
||
|
|
||
|
static struct e5_struct {
|
||
|
u8 packet[8];
|
||
|
int pos;
|
||
|
int length;
|
||
|
|
||
|
u8 cached_mcr;
|
||
|
u8 last_msr;
|
||
|
} ec3104_keyb;
|
||
|
|
||
|
/* Simple translation table for the SysRq keys */
|
||
|
|
||
|
|
||
|
#ifdef CONFIG_MAGIC_SYSRQ
|
||
|
unsigned char ec3104_kbd_sysrq_xlate[128] =
|
||
|
"\000\0331234567890-=\177\t" /* 0x00 - 0x0f */
|
||
|
"qwertyuiop[]\r\000as" /* 0x10 - 0x1f */
|
||
|
"dfghjkl;'`\000\\zxcv" /* 0x20 - 0x2f */
|
||
|
"bnm,./\000*\000 \000\201\202\203\204\205" /* 0x30 - 0x3f */
|
||
|
"\206\207\210\211\212\000\000789-456+1" /* 0x40 - 0x4f */
|
||
|
"230\177\000\000\213\214\000\000\000\000\000\000\000\000\000\000" /* 0x50 - 0x5f */
|
||
|
"\r\000/"; /* 0x60 - 0x6f */
|
||
|
#endif
|
||
|
|
||
|
static void kbd_write_command_w(int data);
|
||
|
static void kbd_write_output_w(int data);
|
||
|
#ifdef CONFIG_PSMOUSE
|
||
|
static void aux_write_ack(int val);
|
||
|
static void __aux_write_ack(int val);
|
||
|
#endif
|
||
|
|
||
|
static DEFINE_SPINLOCK(kbd_controller_lock);
|
||
|
static unsigned char handle_kbd_event(void);
|
||
|
|
||
|
/* used only by send_data - set by keyboard_interrupt */
|
||
|
static volatile unsigned char reply_expected;
|
||
|
static volatile unsigned char acknowledge;
|
||
|
static volatile unsigned char resend;
|
||
|
|
||
|
|
||
|
int ec3104_kbd_setkeycode(unsigned int scancode, unsigned int keycode)
|
||
|
{
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
int ec3104_kbd_getkeycode(unsigned int scancode)
|
||
|
{
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
|
||
|
/* yes, it probably would be faster to use an array. I don't care. */
|
||
|
|
||
|
static inline unsigned char ec3104_scan2key(unsigned char scancode)
|
||
|
{
|
||
|
switch (scancode) {
|
||
|
case 1: /* '`' */
|
||
|
return 41;
|
||
|
|
||
|
case 2 ... 27:
|
||
|
return scancode;
|
||
|
|
||
|
case 28: /* '\\' */
|
||
|
return 43;
|
||
|
|
||
|
case 29 ... 39:
|
||
|
return scancode + 1;
|
||
|
|
||
|
case 40: /* '\r' */
|
||
|
return 28;
|
||
|
|
||
|
case 41 ... 50:
|
||
|
return scancode + 3;
|
||
|
|
||
|
case 51: /* ' ' */
|
||
|
return 57;
|
||
|
|
||
|
case 52: /* escape */
|
||
|
return 1;
|
||
|
|
||
|
case 54: /* insert/delete (labelled delete) */
|
||
|
/* this should arguably be 110, but I'd like to have ctrl-alt-del
|
||
|
* working with a standard keymap */
|
||
|
return 111;
|
||
|
|
||
|
case 55: /* left */
|
||
|
return 105;
|
||
|
case 56: /* home */
|
||
|
return 102;
|
||
|
case 57: /* end */
|
||
|
return 107;
|
||
|
case 58: /* up */
|
||
|
return 103;
|
||
|
case 59: /* down */
|
||
|
return 108;
|
||
|
case 60: /* pgup */
|
||
|
return 104;
|
||
|
case 61: /* pgdown */
|
||
|
return 109;
|
||
|
case 62: /* right */
|
||
|
return 106;
|
||
|
|
||
|
case 79 ... 88: /* f1 - f10 */
|
||
|
return scancode - 20;
|
||
|
|
||
|
case 89 ... 90: /* f11 - f12 */
|
||
|
return scancode - 2;
|
||
|
|
||
|
case 91: /* left shift */
|
||
|
return 42;
|
||
|
|
||
|
case 92: /* right shift */
|
||
|
return 54;
|
||
|
|
||
|
case 93: /* left alt */
|
||
|
return 56;
|
||
|
case 94: /* right alt */
|
||
|
return 100;
|
||
|
case 95: /* left ctrl */
|
||
|
return 29;
|
||
|
case 96: /* right ctrl */
|
||
|
return 97;
|
||
|
|
||
|
case 97: /* caps lock */
|
||
|
return 58;
|
||
|
case 102: /* left windows */
|
||
|
return 125;
|
||
|
case 103: /* right windows */
|
||
|
return 126;
|
||
|
|
||
|
case 106: /* Fn */
|
||
|
/* this is wrong. */
|
||
|
return 84;
|
||
|
|
||
|
default:
|
||
|
return 0;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
int ec3104_kbd_translate(unsigned char scancode, unsigned char *keycode,
|
||
|
char raw_mode)
|
||
|
{
|
||
|
scancode &= 0x7f;
|
||
|
|
||
|
*keycode = ec3104_scan2key(scancode);
|
||
|
|
||
|
return 1;
|
||
|
}
|
||
|
|
||
|
char ec3104_kbd_unexpected_up(unsigned char keycode)
|
||
|
{
|
||
|
return 0200;
|
||
|
}
|
||
|
|
||
|
static inline void handle_keyboard_event(unsigned char scancode)
|
||
|
{
|
||
|
#ifdef CONFIG_VT
|
||
|
handle_scancode(scancode, !(scancode & 0x80));
|
||
|
#endif
|
||
|
tasklet_schedule(&keyboard_tasklet);
|
||
|
}
|
||
|
|
||
|
void ec3104_kbd_leds(unsigned char leds)
|
||
|
{
|
||
|
}
|
||
|
|
||
|
static u8 e5_checksum(u8 *packet, int count)
|
||
|
{
|
||
|
int i;
|
||
|
u8 sum = 0;
|
||
|
|
||
|
for (i=0; i<count; i++)
|
||
|
sum ^= packet[i];
|
||
|
|
||
|
if (sum & 0x80)
|
||
|
sum ^= 0xc0;
|
||
|
|
||
|
return sum;
|
||
|
}
|
||
|
|
||
|
static void e5_wait_for_cts(struct e5_struct *k)
|
||
|
{
|
||
|
u8 msr;
|
||
|
|
||
|
do {
|
||
|
msr = ctrl_inb(EC3104_SER4_MSR);
|
||
|
} while (!(msr & MSR_CTS));
|
||
|
}
|
||
|
|
||
|
|
||
|
static void e5_send_byte(u8 byte, struct e5_struct *k)
|
||
|
{
|
||
|
u8 status;
|
||
|
|
||
|
do {
|
||
|
status = ctrl_inb(EC3104_SER4_LSR);
|
||
|
} while ((status & LSR_BOTH_EMPTY) != LSR_BOTH_EMPTY);
|
||
|
|
||
|
printk("<%02x>", byte);
|
||
|
|
||
|
ctrl_outb(byte, EC3104_SER4_DATA);
|
||
|
|
||
|
do {
|
||
|
status = ctrl_inb(EC3104_SER4_LSR);
|
||
|
} while ((status & LSR_BOTH_EMPTY) != LSR_BOTH_EMPTY);
|
||
|
|
||
|
}
|
||
|
|
||
|
static int e5_send_packet(u8 *packet, int count, struct e5_struct *k)
|
||
|
{
|
||
|
int i;
|
||
|
|
||
|
disable_irq(EC3104_IRQ_SER4);
|
||
|
|
||
|
if (k->cached_mcr & MCR_RTS) {
|
||
|
printk("e5_send_packet: too slow\n");
|
||
|
enable_irq(EC3104_IRQ_SER4);
|
||
|
return -EAGAIN;
|
||
|
}
|
||
|
|
||
|
k->cached_mcr |= MCR_RTS;
|
||
|
ctrl_outb(k->cached_mcr, EC3104_SER4_MCR);
|
||
|
|
||
|
e5_wait_for_cts(k);
|
||
|
|
||
|
printk("p: ");
|
||
|
|
||
|
for(i=0; i<count; i++)
|
||
|
e5_send_byte(packet[i], k);
|
||
|
|
||
|
e5_send_byte(e5_checksum(packet, count), k);
|
||
|
|
||
|
printk("\n");
|
||
|
|
||
|
udelay(1500);
|
||
|
|
||
|
k->cached_mcr &= ~MCR_RTS;
|
||
|
ctrl_outb(k->cached_mcr, EC3104_SER4_MCR);
|
||
|
|
||
|
set_current_state(TASK_UNINTERRUPTIBLE);
|
||
|
|
||
|
|
||
|
|
||
|
enable_irq(EC3104_IRQ_SER4);
|
||
|
|
||
|
|
||
|
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* E5 packets we know about:
|
||
|
* E5->host 0x80 0x05 <checksum> - resend packet
|
||
|
* host->E5 0x83 0x43 <contrast> - set LCD contrast
|
||
|
* host->E5 0x85 0x41 0x02 <brightness> 0x02 - set LCD backlight
|
||
|
* E5->host 0x87 <ps2 packet> 0x00 <checksum> - external PS2
|
||
|
* E5->host 0x88 <scancode> <checksum> - key press
|
||
|
*/
|
||
|
|
||
|
static void e5_receive(struct e5_struct *k)
|
||
|
{
|
||
|
k->packet[k->pos++] = ctrl_inb(EC3104_SER4_DATA);
|
||
|
|
||
|
if (k->pos == 1) {
|
||
|
switch(k->packet[0]) {
|
||
|
case 0x80:
|
||
|
k->length = 3;
|
||
|
break;
|
||
|
|
||
|
case 0x87: /* PS2 ext */
|
||
|
k->length = 6;
|
||
|
break;
|
||
|
|
||
|
case 0x88: /* keyboard */
|
||
|
k->length = 3;
|
||
|
break;
|
||
|
|
||
|
default:
|
||
|
k->length = 1;
|
||
|
printk(KERN_WARNING "unknown E5 packet %02x\n",
|
||
|
k->packet[0]);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if (k->pos == k->length) {
|
||
|
int i;
|
||
|
|
||
|
if (e5_checksum(k->packet, k->length) != 0)
|
||
|
printk(KERN_WARNING "E5: wrong checksum\n");
|
||
|
|
||
|
#if 0
|
||
|
printk("E5 packet [");
|
||
|
for(i=0; i<k->length; i++) {
|
||
|
printk("%02x ", k->packet[i]);
|
||
|
}
|
||
|
|
||
|
printk("(%02x)]\n", e5_checksum(k->packet, k->length-1));
|
||
|
#endif
|
||
|
|
||
|
switch(k->packet[0]) {
|
||
|
case 0x80:
|
||
|
case 0x88:
|
||
|
handle_keyboard_event(k->packet[1]);
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
k->pos = k->length = 0;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
static void ec3104_keyb_interrupt(int irq, void *data, struct pt_regs *regs)
|
||
|
{
|
||
|
struct e5_struct *k = &ec3104_keyb;
|
||
|
u8 msr, lsr;
|
||
|
|
||
|
msr = ctrl_inb(EC3104_SER4_MSR);
|
||
|
|
||
|
if ((msr & MSR_CTS) && !(k->last_msr & MSR_CTS)) {
|
||
|
if (k->cached_mcr & MCR_RTS)
|
||
|
printk("confused: RTS already high\n");
|
||
|
/* CTS went high. Send RTS. */
|
||
|
k->cached_mcr |= MCR_RTS;
|
||
|
|
||
|
ctrl_outb(k->cached_mcr, EC3104_SER4_MCR);
|
||
|
} else if ((!(msr & MSR_CTS)) && (k->last_msr & MSR_CTS)) {
|
||
|
/* CTS went low. */
|
||
|
if (!(k->cached_mcr & MCR_RTS))
|
||
|
printk("confused: RTS already low\n");
|
||
|
|
||
|
k->cached_mcr &= ~MCR_RTS;
|
||
|
|
||
|
ctrl_outb(k->cached_mcr, EC3104_SER4_MCR);
|
||
|
}
|
||
|
|
||
|
k->last_msr = msr;
|
||
|
|
||
|
lsr = ctrl_inb(EC3104_SER4_LSR);
|
||
|
|
||
|
if (lsr & LSR_DR)
|
||
|
e5_receive(k);
|
||
|
}
|
||
|
|
||
|
static void ec3104_keyb_clear_state(void)
|
||
|
{
|
||
|
struct e5_struct *k = &ec3104_keyb;
|
||
|
u8 msr, lsr;
|
||
|
|
||
|
/* we want CTS to be low */
|
||
|
k->last_msr = 0;
|
||
|
|
||
|
for (;;) {
|
||
|
msleep(100);
|
||
|
|
||
|
msr = ctrl_inb(EC3104_SER4_MSR);
|
||
|
|
||
|
lsr = ctrl_inb(EC3104_SER4_LSR);
|
||
|
|
||
|
if (lsr & LSR_DR) {
|
||
|
e5_receive(k);
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
if ((msr & MSR_CTS) && !(k->last_msr & MSR_CTS)) {
|
||
|
if (k->cached_mcr & MCR_RTS)
|
||
|
printk("confused: RTS already high\n");
|
||
|
/* CTS went high. Send RTS. */
|
||
|
k->cached_mcr |= MCR_RTS;
|
||
|
|
||
|
ctrl_outb(k->cached_mcr, EC3104_SER4_MCR);
|
||
|
} else if ((!(msr & MSR_CTS)) && (k->last_msr & MSR_CTS)) {
|
||
|
/* CTS went low. */
|
||
|
if (!(k->cached_mcr & MCR_RTS))
|
||
|
printk("confused: RTS already low\n");
|
||
|
|
||
|
k->cached_mcr &= ~MCR_RTS;
|
||
|
|
||
|
ctrl_outb(k->cached_mcr, EC3104_SER4_MCR);
|
||
|
} else
|
||
|
break;
|
||
|
|
||
|
k->last_msr = msr;
|
||
|
|
||
|
continue;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void __init ec3104_kbd_init_hw(void)
|
||
|
{
|
||
|
ec3104_keyb.last_msr = ctrl_inb(EC3104_SER4_MSR);
|
||
|
ec3104_keyb.cached_mcr = ctrl_inb(EC3104_SER4_MCR);
|
||
|
|
||
|
ec3104_keyb_clear_state();
|
||
|
|
||
|
/* Ok, finally allocate the IRQ, and off we go.. */
|
||
|
request_irq(EC3104_IRQ_SER4, ec3104_keyb_interrupt, 0, "keyboard", NULL);
|
||
|
}
|