v86 0.4.0 → 0.5.11

package/bios/seabios/src/hw/ps2port.c

@@ -1,543 +0,0 @@
-// Support for handling the PS/2 mouse/keyboard ports.
-//
-// Copyright (C) 2008  Kevin O'Connor <kevin@koconnor.net>
-// Several ideas taken from code Copyright (c) 1999-2004 Vojtech Pavlik
-//
-// This file may be distributed under the terms of the GNU LGPLv3 license.
-
-#include "biosvar.h" // GET_LOW
-#include "output.h" // dprintf
-#include "pic.h" // pic_eoi1
-#include "ps2port.h" // ps2_kbd_command
-#include "romfile.h" // romfile_loadint
-#include "stacks.h" // yield
-#include "util.h" // udelay
-#include "x86.h" // inb
-
-
-/****************************************************************
- * Low level i8042 commands.
- ****************************************************************/
-
-// Timeout value.
-#define I8042_CTL_TIMEOUT       10000
-
-#define I8042_BUFFER_SIZE       16
-
-static int
-i8042_wait_read(void)
-{
-    dprintf(7, "i8042_wait_read\n");
-    int i;
-    for (i=0; i<I8042_CTL_TIMEOUT; i++) {
-        u8 status = inb(PORT_PS2_STATUS);
-        if (status & I8042_STR_OBF)
-            return 0;
-        udelay(50);
-    }
-    warn_timeout();
-    return -1;
-}
-
-static int
-i8042_wait_write(void)
-{
-    dprintf(7, "i8042_wait_write\n");
-    int i;
-    for (i=0; i<I8042_CTL_TIMEOUT; i++) {
-        u8 status = inb(PORT_PS2_STATUS);
-        if (! (status & I8042_STR_IBF))
-            return 0;
-        udelay(50);
-    }
-    warn_timeout();
-    return -1;
-}
-
-static int
-i8042_flush(void)
-{
-    dprintf(7, "i8042_flush\n");
-    int i;
-    for (i=0; i<I8042_BUFFER_SIZE; i++) {
-        u8 status = inb(PORT_PS2_STATUS);
-        if (! (status & I8042_STR_OBF))
-            return 0;
-        udelay(50);
-        u8 data = inb(PORT_PS2_DATA);
-        dprintf(7, "i8042 flushed %x (status=%x)\n", data, status);
-    }
-
-    warn_timeout();
-    return -1;
-}
-
-static int
-__i8042_command(int command, u8 *param)
-{
-    int receive = (command >> 8) & 0xf;
-    int send = (command >> 12) & 0xf;
-
-    // Send the command.
-    int ret = i8042_wait_write();
-    if (ret)
-        return ret;
-    outb(command, PORT_PS2_STATUS);
-
-    // Send parameters (if any).
-    int i;
-    for (i = 0; i < send; i++) {
-        ret = i8042_wait_write();
-        if (ret)
-            return ret;
-        outb(param[i], PORT_PS2_DATA);
-    }
-
-    // Receive parameters (if any).
-    for (i = 0; i < receive; i++) {
-        ret = i8042_wait_read();
-        if (ret)
-            return ret;
-        param[i] = inb(PORT_PS2_DATA);
-        dprintf(7, "i8042 param=%x\n", param[i]);
-    }
-
-    return 0;
-}
-
-static int
-i8042_command(int command, u8 *param)
-{
-    dprintf(7, "i8042_command cmd=%x\n", command);
-    int ret = __i8042_command(command, param);
-    if (ret)
-        dprintf(2, "i8042 command %x failed\n", command);
-    return ret;
-}
-
-static int
-i8042_kbd_write(u8 c)
-{
-    dprintf(7, "i8042_kbd_write c=%d\n", c);
-    int ret = i8042_wait_write();
-    if (! ret)
-        outb(c, PORT_PS2_DATA);
-    return ret;
-}
-
-static int
-i8042_aux_write(u8 c)
-{
-    return i8042_command(I8042_CMD_AUX_SEND, &c);
-}
-
-void
-i8042_reboot(void)
-{
-    if (! CONFIG_PS2PORT)
-       return;
-    int i;
-    for (i=0; i<10; i++) {
-        i8042_wait_write();
-        udelay(50);
-        outb(0xfe, PORT_PS2_STATUS); /* pulse reset low */
-        udelay(50);
-    }
-}
-
-
-/****************************************************************
- * Device commands.
- ****************************************************************/
-
-#define PS2_RET_ACK             0xfa
-#define PS2_RET_NAK             0xfe
-
-static int
-ps2_recvbyte(int aux, int needack, int timeout)
-{
-    u32 end = timer_calc(timeout);
-    for (;;) {
-        u8 status = inb(PORT_PS2_STATUS);
-        if (status & I8042_STR_OBF) {
-            u8 data = inb(PORT_PS2_DATA);
-            dprintf(7, "ps2 read %x\n", data);
-
-            if (!!(status & I8042_STR_AUXDATA) == aux) {
-                if (!needack)
-                    return data;
-                if (data == PS2_RET_ACK)
-                    return data;
-                if (data == PS2_RET_NAK) {
-                    dprintf(1, "Got ps2 nak (status=%x)\n", status);
-                    return data;
-                }
-            }
-
-            // This data not part of command - just discard it.
-            dprintf(1, "Discarding ps2 data %02x (status=%02x)\n", data, status);
-        }
-
-        if (timer_check(end)) {
-            warn_timeout();
-            return -1;
-        }
-        yield();
-    }
-}
-
-static int
-ps2_sendbyte(int aux, u8 command, int timeout)
-{
-    dprintf(7, "ps2_sendbyte aux=%d cmd=%x\n", aux, command);
-    int ret;
-    if (aux)
-        ret = i8042_aux_write(command);
-    else
-        ret = i8042_kbd_write(command);
-    if (ret)
-        return ret;
-
-    // Read ack.
-    ret = ps2_recvbyte(aux, 1, timeout);
-    if (ret < 0)
-        return ret;
-    if (ret != PS2_RET_ACK)
-        return -1;
-
-    return 0;
-}
-
-u8 Ps2ctr VARLOW = I8042_CTR_KBDDIS | I8042_CTR_AUXDIS;
-
-static int
-__ps2_command(int aux, int command, u8 *param)
-{
-    int ret2;
-    int receive = (command >> 8) & 0xf;
-    int send = (command >> 12) & 0xf;
-
-    // Disable interrupts and keyboard/mouse.
-    u8 ps2ctr = GET_LOW(Ps2ctr);
-    u8 newctr = ((ps2ctr | I8042_CTR_AUXDIS | I8042_CTR_KBDDIS)
-                 & ~(I8042_CTR_KBDINT|I8042_CTR_AUXINT));
-    dprintf(6, "i8042 ctr old=%x new=%x\n", ps2ctr, newctr);
-    int ret = i8042_command(I8042_CMD_CTL_WCTR, &newctr);
-    if (ret)
-        return ret;
-
-    // Flush any interrupts already pending.
-    yield();
-
-    // Enable port command is being sent to.
-    SET_LOW(Ps2ctr, newctr);
-    if (aux)
-        newctr &= ~I8042_CTR_AUXDIS;
-    else
-        newctr &= ~I8042_CTR_KBDDIS;
-    ret = i8042_command(I8042_CMD_CTL_WCTR, &newctr);
-    if (ret)
-        goto fail;
-
-    if ((u8)command == (u8)ATKBD_CMD_RESET_BAT) {
-        // Reset is special wrt timeouts.
-
-        // Send command.
-        ret = ps2_sendbyte(aux, command, 1000);
-        if (ret)
-            goto fail;
-
-        // Receive parameters.
-        ret = ps2_recvbyte(aux, 0, 4000);
-        if (ret < 0)
-            goto fail;
-        param[0] = ret;
-        if (receive > 1) {
-            ret = ps2_recvbyte(aux, 0, 500);
-            if (ret < 0)
-                goto fail;
-            param[1] = ret;
-        }
-    } else if (command == ATKBD_CMD_GETID) {
-        // Getid is special wrt bytes received.
-
-        // Send command.
-        ret = ps2_sendbyte(aux, command, 200);
-        if (ret)
-            goto fail;
-
-        // Receive parameters.
-        ret = ps2_recvbyte(aux, 0, 500);
-        if (ret < 0)
-            goto fail;
-        param[0] = ret;
-        if (ret == 0xab || ret == 0xac || ret == 0x2b || ret == 0x5d
-            || ret == 0x60 || ret == 0x47) {
-            // These ids (keyboards) return two bytes.
-            ret = ps2_recvbyte(aux, 0, 500);
-            if (ret < 0)
-                goto fail;
-            param[1] = ret;
-        } else {
-            param[1] = 0;
-        }
-    } else {
-        // Send command.
-        ret = ps2_sendbyte(aux, command, 200);
-        if (ret)
-            goto fail;
-
-        // Send parameters (if any).
-        int i;
-        for (i = 0; i < send; i++) {
-            ret = ps2_sendbyte(aux, param[i], 200);
-            if (ret)
-                goto fail;
-        }
-
-        // Receive parameters (if any).
-        for (i = 0; i < receive; i++) {
-            ret = ps2_recvbyte(aux, 0, 500);
-            if (ret < 0)
-                goto fail;
-            param[i] = ret;
-        }
-    }
-
-    ret = 0;
-
-fail:
-    // Restore interrupts and keyboard/mouse.
-    SET_LOW(Ps2ctr, ps2ctr);
-    ret2 = i8042_command(I8042_CMD_CTL_WCTR, &ps2ctr);
-    if (ret2)
-        return ret2;
-
-    return ret;
-}
-
-static int
-ps2_command(int aux, int command, u8 *param)
-{
-    dprintf(7, "ps2_command aux=%d cmd=%x\n", aux, command);
-    int ret = __ps2_command(aux, command, param);
-    if (ret)
-        dprintf(2, "ps2 command %x failed (aux=%d)\n", command, aux);
-    return ret;
-}
-
-int
-ps2_kbd_command(int command, u8 *param)
-{
-    if (! CONFIG_PS2PORT)
-        return -1;
-    return ps2_command(0, command, param);
-}
-
-int
-ps2_mouse_command(int command, u8 *param)
-{
-    if (! CONFIG_PS2PORT)
-        return -1;
-
-    // Update ps2ctr for mouse enable/disable.
-    if (command == PSMOUSE_CMD_ENABLE || command == PSMOUSE_CMD_DISABLE) {
-        u8 ps2ctr = GET_LOW(Ps2ctr);
-        if (command == PSMOUSE_CMD_ENABLE)
-            ps2ctr = ((ps2ctr | (CONFIG_HARDWARE_IRQ ? I8042_CTR_AUXINT : 0))
-                      & ~I8042_CTR_AUXDIS);
-        else
-            ps2ctr = (ps2ctr | I8042_CTR_AUXDIS) & ~I8042_CTR_AUXINT;
-        SET_LOW(Ps2ctr, ps2ctr);
-    }
-
-    return ps2_command(1, command, param);
-}
-
-
-/****************************************************************
- * IRQ handlers
- ****************************************************************/
-
-// INT74h : PS/2 mouse hardware interrupt
-void VISIBLE16
-handle_74(void)
-{
-    if (! CONFIG_PS2PORT)
-        return;
-
-    debug_isr(DEBUG_ISR_74);
-
-    u8 v = inb(PORT_PS2_STATUS);
-    if ((v & (I8042_STR_OBF|I8042_STR_AUXDATA))
-        != (I8042_STR_OBF|I8042_STR_AUXDATA)) {
-        dprintf(1, "ps2 mouse irq but no mouse data.\n");
-        goto done;
-    }
-    v = inb(PORT_PS2_DATA);
-
-    if (!(GET_LOW(Ps2ctr) & I8042_CTR_AUXINT))
-        // Interrupts not enabled.
-        goto done;
-
-    process_mouse(v);
-
-done:
-    pic_eoi2();
-}
-
-// INT09h : Keyboard Hardware Service Entry Point
-void VISIBLE16
-handle_09(void)
-{
-    if (! CONFIG_PS2PORT)
-        return;
-
-    debug_isr(DEBUG_ISR_09);
-
-    // read key from keyboard controller
-    u8 v = inb(PORT_PS2_STATUS);
-    if (v & I8042_STR_AUXDATA) {
-        dprintf(1, "ps2 keyboard irq but found mouse data?!\n");
-        goto done;
-    }
-    v = inb(PORT_PS2_DATA);
-
-    if (!(GET_LOW(Ps2ctr) & I8042_CTR_KBDINT))
-        // Interrupts not enabled.
-        goto done;
-
-    process_key(v);
-
-    // Some old programs expect ISR to turn keyboard back on.
-    i8042_command(I8042_CMD_KBD_ENABLE, NULL);
-
-done:
-    pic_eoi1();
-}
-
-// Check for ps2 activity on machines without hardware irqs
-void
-ps2_check_event(void)
-{
-    if (! CONFIG_PS2PORT || CONFIG_HARDWARE_IRQ)
-        return;
-    u8 ps2ctr = GET_LOW(Ps2ctr);
-    if ((ps2ctr & (I8042_CTR_KBDDIS|I8042_CTR_AUXDIS))
-        == (I8042_CTR_KBDDIS|I8042_CTR_AUXDIS))
-        return;
-    for (;;) {
-        u8 status = inb(PORT_PS2_STATUS);
-        if (!(status & I8042_STR_OBF))
-            break;
-        u8 data = inb(PORT_PS2_DATA);
-        if (status & I8042_STR_AUXDATA) {
-            if (!(ps2ctr & I8042_CTR_AUXDIS))
-                process_mouse(data);
-        } else {
-            if (!(ps2ctr & I8042_CTR_KBDDIS))
-                process_key(data);
-        }
-    }
-}
-
-
-/****************************************************************
- * Setup
- ****************************************************************/
-
-static void
-ps2_keyboard_setup(void *data)
-{
-    // flush incoming keys (also verifies port is likely present)
-    int ret = i8042_flush();
-    if (ret)
-        return;
-
-    // Disable keyboard / mouse and drain any input they may have sent
-    ret = i8042_command(I8042_CMD_KBD_DISABLE, NULL);
-    if (ret)
-        return;
-    ret = i8042_command(I8042_CMD_AUX_DISABLE, NULL);
-    if (ret)
-        return;
-    ret = i8042_flush();
-    if (ret)
-        return;
-
-    // Controller self-test.
-    u8 param[2];
-    ret = i8042_command(I8042_CMD_CTL_TEST, param);
-    if (ret)
-        return;
-    if (param[0] != 0x55) {
-        dprintf(1, "i8042 self test failed (got %x not 0x55)\n", param[0]);
-        return;
-    }
-
-    // Controller keyboard test.
-    ret = i8042_command(I8042_CMD_KBD_TEST, param);
-    if (ret)
-        return;
-    if (param[0] != 0x00) {
-        dprintf(1, "i8042 keyboard test failed (got %x not 0x00)\n", param[0]);
-        return;
-    }
-
-
-    /* ------------------- keyboard side ------------------------*/
-    /* reset keyboard and self test  (keyboard side) */
-    int spinupdelay = romfile_loadint("etc/ps2-keyboard-spinup", 0);
-    u32 end = timer_calc(spinupdelay);
-    for (;;) {
-        ret = ps2_kbd_command(ATKBD_CMD_RESET_BAT, param);
-        if (!ret)
-            break;
-        if (timer_check(end)) {
-            if (spinupdelay)
-                warn_timeout();
-            return;
-        }
-        yield();
-    }
-    if (param[0] != 0xaa) {
-        dprintf(1, "keyboard self test failed (got %x not 0xaa)\n", param[0]);
-        return;
-    }
-
-    /* Disable keyboard */
-    ret = ps2_kbd_command(ATKBD_CMD_RESET_DIS, NULL);
-    if (ret)
-        return;
-
-    // Set scancode command (mode 2)
-    param[0] = 0x02;
-    ret = ps2_kbd_command(ATKBD_CMD_SSCANSET, param);
-    if (ret)
-        return;
-
-    // Keyboard Mode: disable mouse, scan code convert, enable kbd IRQ
-    Ps2ctr = (I8042_CTR_AUXDIS | I8042_CTR_XLATE
-              | (CONFIG_HARDWARE_IRQ ? I8042_CTR_KBDINT : 0));
-
-    /* Enable keyboard */
-    ret = ps2_kbd_command(ATKBD_CMD_ENABLE, NULL);
-    if (ret)
-        return;
-
-    dprintf(1, "PS2 keyboard initialized\n");
-}
-
-void
-ps2port_setup(void)
-{
-    ASSERT32FLAT();
-    if (! CONFIG_PS2PORT)
-        return;
-    dprintf(3, "init ps2port\n");
-
-    enable_hwirq(1, FUNC16(entry_09));
-    enable_hwirq(12, FUNC16(entry_74));
-
-    run_thread(ps2_keyboard_setup, NULL);
-}

package/bios/seabios/src/hw/ps2port.h

@@ -1,67 +0,0 @@
-// Basic ps2 port (keyboard/mouse) command handling.
-#ifndef __PS2PORT_H
-#define __PS2PORT_H
-
-#include "types.h" // u8
-
-#define PORT_PS2_DATA          0x0060
-#define PORT_PS2_STATUS        0x0064
-
-// Standard commands.
-#define I8042_CMD_CTL_RCTR      0x0120
-#define I8042_CMD_CTL_WCTR      0x1060
-#define I8042_CMD_CTL_TEST      0x01aa
-
-#define I8042_CMD_KBD_TEST      0x01ab
-#define I8042_CMD_KBD_DISABLE   0x00ad
-#define I8042_CMD_KBD_ENABLE    0x00ae
-
-#define I8042_CMD_AUX_DISABLE   0x00a7
-#define I8042_CMD_AUX_ENABLE    0x00a8
-#define I8042_CMD_AUX_SEND      0x10d4
-
-// Keyboard commands
-#define ATKBD_CMD_SETLEDS       0x10ed
-#define ATKBD_CMD_SSCANSET      0x10f0
-#define ATKBD_CMD_GETID         0x02f2
-#define ATKBD_CMD_ENABLE        0x00f4
-#define ATKBD_CMD_RESET_DIS     0x00f5
-#define ATKBD_CMD_RESET_BAT     0x01ff
-
-// Mouse commands
-#define PSMOUSE_CMD_SETSCALE11  0x00e6
-#define PSMOUSE_CMD_SETSCALE21  0x00e7
-#define PSMOUSE_CMD_SETRES      0x10e8
-#define PSMOUSE_CMD_GETINFO     0x03e9
-#define PSMOUSE_CMD_GETID       0x02f2
-#define PSMOUSE_CMD_SETRATE     0x10f3
-#define PSMOUSE_CMD_ENABLE      0x00f4
-#define PSMOUSE_CMD_DISABLE     0x00f5
-#define PSMOUSE_CMD_RESET_BAT   0x02ff
-
-// Status register bits.
-#define I8042_STR_PARITY        0x80
-#define I8042_STR_TIMEOUT       0x40
-#define I8042_STR_AUXDATA       0x20
-#define I8042_STR_KEYLOCK       0x10
-#define I8042_STR_CMDDAT        0x08
-#define I8042_STR_MUXERR        0x04
-#define I8042_STR_IBF           0x02
-#define I8042_STR_OBF           0x01
-
-// Control register bits.
-#define I8042_CTR_KBDINT        0x01
-#define I8042_CTR_AUXINT        0x02
-#define I8042_CTR_IGNKEYLOCK    0x08
-#define I8042_CTR_KBDDIS        0x10
-#define I8042_CTR_AUXDIS        0x20
-#define I8042_CTR_XLATE         0x40
-
-// ps2port.c
-void i8042_reboot(void);
-int ps2_kbd_command(int command, u8 *param);
-int ps2_mouse_command(int command, u8 *param);
-void ps2_check_event(void);
-void ps2port_setup(void);
-
-#endif // ps2port.h