/* * QEMU PS/2 keyboard/mouse emulation * * Copyright (c) 2003 Fabrice Bellard * * Permission is hereby granted, free of charge, to any person obtaining a copy * of this software and associated documentation files (the "Software"), to deal * in the Software without restriction, including without limitation the rights * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell * copies of the Software, and to permit persons to whom the Software is * furnished to do so, subject to the following conditions: * * The above copyright notice and this permission notice shall be included in * all copies or substantial portions of the Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN * THE SOFTWARE. */#include "hw.h"#include "ps2.h"#include "console.h"/* debug PC keyboard *///#define DEBUG_KBD/* debug PC keyboard : only mouse *///#define DEBUG_MOUSE/* Keyboard Commands */#define KBD_CMD_SET_LEDS	0xED	/* Set keyboard leds */#define KBD_CMD_ECHO     	0xEE#define KBD_CMD_GET_ID 	        0xF2	/* get keyboard ID */#define KBD_CMD_SET_RATE	0xF3	/* Set typematic rate */#define KBD_CMD_ENABLE		0xF4	/* Enable scanning */#define KBD_CMD_RESET_DISABLE	0xF5	/* reset and disable scanning */#define KBD_CMD_RESET_ENABLE   	0xF6    /* reset and enable scanning */#define KBD_CMD_RESET		0xFF	/* Reset *//* Keyboard Replies */#define KBD_REPLY_POR		0xAA	/* Power on reset */#define KBD_REPLY_ACK		0xFA	/* Command ACK */#define KBD_REPLY_RESEND	0xFE	/* Command NACK, send the cmd again *//* Mouse Commands */#define AUX_SET_SCALE11		0xE6	/* Set 1:1 scaling */#define AUX_SET_SCALE21		0xE7	/* Set 2:1 scaling */#define AUX_SET_RES		0xE8	/* Set resolution */#define AUX_GET_SCALE		0xE9	/* Get scaling factor */#define AUX_SET_STREAM		0xEA	/* Set stream mode */#define AUX_POLL		0xEB	/* Poll */#define AUX_RESET_WRAP		0xEC	/* Reset wrap mode */#define AUX_SET_WRAP		0xEE	/* Set wrap mode */#define AUX_SET_REMOTE		0xF0	/* Set remote mode */#define AUX_GET_TYPE		0xF2	/* Get type */#define AUX_SET_SAMPLE		0xF3	/* Set sample rate */#define AUX_ENABLE_DEV		0xF4	/* Enable aux device */#define AUX_DISABLE_DEV		0xF5	/* Disable aux device */#define AUX_SET_DEFAULT		0xF6#define AUX_RESET		0xFF	/* Reset aux device */#define AUX_ACK			0xFA	/* Command byte ACK. */#define MOUSE_STATUS_REMOTE     0x40#define MOUSE_STATUS_ENABLED    0x20#define MOUSE_STATUS_SCALE21    0x10#define PS2_QUEUE_SIZE 256typedef struct {    uint8_t data[PS2_QUEUE_SIZE];    int rptr, wptr, count;} PS2Queue;typedef struct {    PS2Queue queue;    int32_t write_cmd;    void (*update_irq)(void *, int);    void *update_arg;} PS2State;typedef struct {    PS2State common;    int scan_enabled;    /* Qemu uses translated PC scancodes internally.  To avoid multiple       conversions we do the translation (if any) in the PS/2 emulation       not the keyboard controller.  */    int translate;} PS2KbdState;typedef struct {    PS2State common;    uint8_t mouse_status;    uint8_t mouse_resolution;    uint8_t mouse_sample_rate;    uint8_t mouse_wrap;    uint8_t mouse_type; /* 0 = PS2, 3 = IMPS/2, 4 = IMEX */    uint8_t mouse_detect_state;    int mouse_dx; /* current values, needed for 'poll' mode */    int mouse_dy;    int mouse_dz;    uint8_t mouse_buttons;} PS2MouseState;/* Table to convert from PC scancodes to raw scancodes.  */static const unsigned char ps2_raw_keycode[128] = {          0,118, 22, 30, 38, 37, 46, 54, 61, 62, 70, 69, 78, 85,102, 13,         21, 29, 36, 45, 44, 53, 60, 67, 68, 77, 84, 91, 90, 20, 28, 27,         35, 43, 52, 51, 59, 66, 75, 76, 82, 14, 18, 93, 26, 34, 33, 42,         50, 49, 58, 65, 73, 74, 89,124, 17, 41, 88,  5,  6,  4, 12,  3,         11,  2, 10,  1,  9,119,126,108,117,125,123,107,115,116,121,105,        114,122,112,113,127, 96, 97,120,  7, 15, 23, 31, 39, 47, 55, 63,         71, 79, 86, 94,  8, 16, 24, 32, 40, 48, 56, 64, 72, 80, 87,111,         19, 25, 57, 81, 83, 92, 95, 98, 99,100,101,103,104,106,109,110};void ps2_queue(void *opaque, int b){    PS2State *s = (PS2State *)opaque;    PS2Queue *q = &s->queue;    if (q->count >= PS2_QUEUE_SIZE)        return;    q->data[q->wptr] = b;    if (++q->wptr == PS2_QUEUE_SIZE)        q->wptr = 0;    q->count++;    s->update_irq(s->update_arg, 1);}static void ps2_put_keycode(void *opaque, int keycode){    PS2KbdState *s = opaque;    if (!s->translate && keycode < 0xe0)      {        if (keycode & 0x80)            ps2_queue(&s->common, 0xf0);        keycode = ps2_raw_keycode[keycode & 0x7f];      }    ps2_queue(&s->common, keycode);}uint32_t ps2_read_data(void *opaque){    PS2State *s = (PS2State *)opaque;    PS2Queue *q;    int val, index;    q = &s->queue;    if (q->count == 0) {        /* NOTE: if no data left, we return the last keyboard one           (needed for EMM386) */        /* XXX: need a timer to do things correctly */        index = q->rptr - 1;        if (index < 0)            index = PS2_QUEUE_SIZE - 1;        val = q->data[index];    } else {        val = q->data[q->rptr];        if (++q->rptr == PS2_QUEUE_SIZE)            q->rptr = 0;        q->count--;        /* reading deasserts IRQ */        s->update_irq(s->update_arg, 0);        /* reassert IRQs if data left */        s->update_irq(s->update_arg, q->count != 0);    }    return val;}static void ps2_reset_keyboard(PS2KbdState *s){    s->scan_enabled = 1;}void ps2_write_keyboard(void *opaque, int val){    PS2KbdState *s = (PS2KbdState *)opaque;    switch(s->common.write_cmd) {    default:    case -1:        switch(val) {        case 0x00:            ps2_queue(&s->common, KBD_REPLY_ACK);            break;        case 0x05:            ps2_queue(&s->common, KBD_REPLY_RESEND);            break;        case KBD_CMD_GET_ID:            ps2_queue(&s->common, KBD_REPLY_ACK);            ps2_queue(&s->common, 0xab);            ps2_queue(&s->common, 0x83);            break;        case KBD_CMD_ECHO:            ps2_queue(&s->common, KBD_CMD_ECHO);            break;        case KBD_CMD_ENABLE:            s->scan_enabled = 1;            ps2_queue(&s->common, KBD_REPLY_ACK);            break;        case KBD_CMD_SET_LEDS:        case KBD_CMD_SET_RATE:            s->common.write_cmd = val;            ps2_queue(&s->common, KBD_REPLY_ACK);            break;        case KBD_CMD_RESET_DISABLE:            ps2_reset_keyboard(s);            s->scan_enabled = 0;            ps2_queue(&s->common, KBD_REPLY_ACK);            break;        case KBD_CMD_RESET_ENABLE:            ps2_reset_keyboard(s);            s->scan_enabled = 1;            ps2_queue(&s->common, KBD_REPLY_ACK);            break;        case KBD_CMD_RESET:            ps2_reset_keyboard(s);            ps2_queue(&s->common, KBD_REPLY_ACK);            ps2_queue(&s->common, KBD_REPLY_POR);            break;        default:            ps2_queue(&s->common, KBD_REPLY_ACK);            break;        }        break;    case KBD_CMD_SET_LEDS:        ps2_queue(&s->common, KBD_REPLY_ACK);        s->common.write_cmd = -1;        break;    case KBD_CMD_SET_RATE:        ps2_queue(&s->common, KBD_REPLY_ACK);        s->common.write_cmd = -1;        break;    }}/* Set the scancode translation mode.   0 = raw scancodes.   1 = translated scancodes (used by qemu internally).  */void ps2_keyboard_set_translation(void *opaque, int mode){    PS2KbdState *s = (PS2KbdState *)opaque;    s->translate = mode;}static void ps2_mouse_send_packet(PS2MouseState *s){    unsigned int b;    int dx1, dy1, dz1;    dx1 = s->mouse_dx;    dy1 = s->mouse_dy;    dz1 = s->mouse_dz;    /* XXX: increase range to 8 bits ? */    if (dx1 > 127)        dx1 = 127;    else if (dx1 < -127)        dx1 = -127;    if (dy1 > 127)        dy1 = 127;    else if (dy1 < -127)        dy1 = -127;    b = 0x08 | ((dx1 < 0) << 4) | ((dy1 < 0) << 5) | (s->mouse_buttons & 0x07);    ps2_queue(&s->common, b);    ps2_queue(&s->common, dx1 & 0xff);    ps2_queue(&s->common, dy1 & 0xff);    /* extra byte for IMPS/2 or IMEX */    switch(s->mouse_type) {    default:        break;    case 3:        if (dz1 > 127)            dz1 = 127;        else if (dz1 < -127)                dz1 = -127;        ps2_queue(&s->common, dz1 & 0xff);        break;    case 4:        if (dz1 > 7)            dz1 = 7;        else if (dz1 < -7)            dz1 = -7;