File: [local] / prex / dev / i386 / pc / kbd.c (download)
Revision 1.1.1.1 (vendor branch), Tue Aug 19 12:46:47 2008 UTC (16 years ago) by nbrk
Branch: MAIN, KOHSUKE
CVS Tags: PREX_0_8_BASE, HEAD Changes since 1.1: +0 -0 lines
Initial import of Prex, Portable Real-time Embedded POSIX microkernel system.
I have totally new directions in my development (more focused on real hardware, not virtual one).
Old hacks are available in prex-old module. They will be carefully re-designed and merged soon.
|
/*-
* Copyright (c) 2005, Kohsuke Ohtani
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. Neither the name of the author nor the names of any co-contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
/*
* kbd.c - keyboard driver for PC
*/
#include <driver.h>
#include <prex/keycode.h>
#include <sys/tty.h>
#include <cpufunc.h>
#include <pm.h>
#include <console.h>
#include "kmc.h"
/* Parameters */
#define KBD_IRQ 1
static int kbd_init(void);
/*
* Driver structure
*/
struct driver kbd_drv = {
/* name */ "PC/AT Keyboard",
/* order */ 8,
/* init */ kbd_init,
};
/*
* Device I/O table
*/
static struct devio kbd_io = {
/* open */ NULL,
/* close */ NULL,
/* read */ NULL,
/* write */ NULL,
/* ioctl */ NULL,
/* event */ NULL,
};
/*
* Key map
*/
static const u_char key_map[] = {
0, 0x1b, '1', '2', '3', '4', '5', '6',
'7', '8', '9', '0', '-', '=', '\b', '\t',
'q', 'w', 'e', 'r', 't', 'y', 'u', 'i',
'o', 'p', '[', ']', '\n', K_CTRL, 'a', 's',
'd', 'f', 'g', 'h', 'j', 'k', 'l', ';',
'\'', '`', K_SHFT, '\\', 'z', 'x', 'c', 'v',
'b', 'n', 'm', ',', '.', '/', K_SHFT, '*',
K_ALT, ' ', K_CAPS, K_F1, K_F2, K_F3, K_F4, K_F5,
K_F6, K_F7, K_F8, K_F9, K_F10, 0, 0, K_HOME,
K_UP, K_PGUP, 0, K_LEFT, 0, K_RGHT, 0, K_END,
K_DOWN, K_PGDN, K_INS, 0x7f, K_F11, K_F12
};
#define KEY_MAX (sizeof(key_map) / sizeof(char))
static const u_char shift_map[] = {
0, 0x1b, '!', '@', '#', '$', '%', '^',
'&', '*', '(', ')', '_', '+', '\b', '\t',
'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I',
'O', 'P', '{', '}', '\n', K_CTRL, 'A', 'S',
'D', 'F', 'G', 'H', 'J', 'K', 'L', ':',
'"', '~', 0, '|', 'Z', 'X', 'C', 'V',
'B', 'N', 'M', '<', '>', '?', 0, '*',
K_ALT, ' ', 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, K_HOME,
K_UP, K_PGUP, 0, K_LEFT, 0, K_RGHT, 0, K_END,
K_DOWN, K_PGDN, K_INS, 0x7f, 0, 0
};
static device_t kbd_dev; /* Device object */
static irq_t kbd_irq; /* Handle for keyboard irq */
static struct tty *tty;
static int shift;
static int alt;
static int ctrl;
static int capslk;
static int led_sts;
/*
* Send command to keyboard controller
*/
static void
kbd_cmd(u_char cmd)
{
wait_ibe();
outb(cmd, KMC_CMD);
}
/*
* Update LEDs for current modifier state.
*/
static void
kbd_setleds(void)
{
outb(0xed, KMC_DATA);
while (inb(KMC_STS) & 2);
outb(led_sts, KMC_DATA);
while (inb(KMC_STS) & 2);
}
#ifdef DEBUG
/*
* Help for keyboard debug function
*/
static void
kbd_dump_help(void)
{
printf("\nSystem dump usage:\n");
printf("F1=help F2=thread F3=task F4=mem\n");
}
#endif
/*
* Interrupt service routine
*/
static int
kbd_isr(int irq)
{
u_char sc, ac; /* scan & ascii code */
u_char val;
int press;
/* Get scan code */
wait_obf();
sc = inb(KMC_DATA);
/* Send ack to the controller */
val = inb(KMC_PORTB);
outb(val | 0x80, KMC_PORTB);
outb(val, KMC_PORTB);
/* Convert scan code to ascii */
press = sc & 0x80 ? 0 : 1;
sc = sc & 0x7f;
if (sc >= KEY_MAX)
return 0;
ac = key_map[sc];
#ifdef CONFIG_PM
/* Reload power management timer */
if (press)
pm_active();
#endif
/* Check meta key */
switch (ac) {
case K_SHFT:
shift = press;
return 0;
case K_CTRL:
ctrl = press;
return 0;
case K_ALT:
alt = press;
return 0;
case K_CAPS:
capslk = !capslk;
return INT_CONTINUE;
}
/* Ignore key release */
if (!press)
return 0;
#ifdef DEBUG
if (ac == K_F1) {
kbd_dump_help();
return 0;
}
if (ac >= K_F2 && ac <= K_F12) {
debug_dump(ac - K_F1);
return 0;
}
#endif
if (ac >= 0x80) {
tty_input(ac, tty);
return 0;
}
/* Check Alt+Ctrl+Del */
if (alt && ctrl && ac == 0x7f) {
machine_reset();
}
/* Check ctrl & shift state */
if (ctrl) {
if (ac >= 'a' && ac <= 'z')
ac = ac - 'a' + 0x01;
else if (ac == '\\')
ac = 0x1c;
else
ac = 0;
} else if (shift)
ac = shift_map[sc];
if (ac == 0)
return 0;
/* Check caps lock state */
if (capslk) {
if (ac >= 'A' && ac <= 'Z')
ac += 'a' - 'A';
else if (ac >= 'a' && ac <= 'z')
ac -= 'a' - 'A';
}
/* Check alt key */
if (alt)
ac |= 0x80;
/* Insert key to queue */
tty_input(ac, tty);
return 0;
}
/*
* Interrupt service thread
*/
static void
kbd_ist(int irq)
{
int val = 0;
/* Update LEDs */
if (capslk)
val |= 0x04;
if (led_sts != val) {
led_sts = val;
kbd_setleds();
}
return;
}
int
kbd_init(void)
{
kbd_dev = device_create(&kbd_io, "kbd", DF_CHR);
ASSERT(kbd_dev);
/* Disable keyboard controller */
kbd_cmd(CMD_KBD_DIS);
led_sts = 0;
/* kbd_setleds(); */
kbd_irq = irq_attach(KBD_IRQ, IPL_INPUT, 0, kbd_isr, kbd_ist);
ASSERT(kbd_irq != IRQ_NULL);
/* Discard garbage data */
while (inb(KMC_STS) & STS_OBF)
inb(KMC_DATA);
/* Enable keyboard controller */
kbd_cmd(CMD_KBD_EN);
console_attach(&tty);
return 0;
}