0e43e99c04
git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@1660 c046a42c-6fe2-441c-8c8c-71466251a162
513 lines
15 KiB
C
513 lines
15 KiB
C
/*
|
|
* 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 "vl.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 256
|
|
|
|
typedef 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;
|
|
} 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;
|
|
|
|
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)
|
|
{
|
|
PS2MouseState *s = opaque;
|
|
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;
|
|
}
|
|
}
|
|
|
|
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;
|
|
b = (dz1 & 0x0f) | ((s->mouse_buttons & 0x18) << 1);
|
|
ps2_queue(&s->common, b);
|
|
break;
|
|
}
|
|
|
|
/* update deltas */
|
|
s->mouse_dx -= dx1;
|
|
s->mouse_dy -= dy1;
|
|
s->mouse_dz -= dz1;
|
|
}
|
|
|
|
static void ps2_mouse_event(void *opaque,
|
|
int dx, int dy, int dz, int buttons_state)
|
|
{
|
|
PS2MouseState *s = opaque;
|
|
|
|
/* check if deltas are recorded when disabled */
|
|
if (!(s->mouse_status & MOUSE_STATUS_ENABLED))
|
|
return;
|
|
|
|
s->mouse_dx += dx;
|
|
s->mouse_dy -= dy;
|
|
s->mouse_dz += dz;
|
|
/* XXX: SDL sometimes generates nul events: we delete them */
|
|
if (s->mouse_dx == 0 && s->mouse_dy == 0 && s->mouse_dz == 0 &&
|
|
s->mouse_buttons == buttons_state)
|
|
return;
|
|
s->mouse_buttons = buttons_state;
|
|
|
|
if (!(s->mouse_status & MOUSE_STATUS_REMOTE) &&
|
|
(s->common.queue.count < (PS2_QUEUE_SIZE - 16))) {
|
|
for(;;) {
|
|
/* if not remote, send event. Multiple events are sent if
|
|
too big deltas */
|
|
ps2_mouse_send_packet(s);
|
|
if (s->mouse_dx == 0 && s->mouse_dy == 0 && s->mouse_dz == 0)
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
void ps2_write_mouse(void *opaque, int val)
|
|
{
|
|
PS2MouseState *s = (PS2MouseState *)opaque;
|
|
#ifdef DEBUG_MOUSE
|
|
printf("kbd: write mouse 0x%02x\n", val);
|
|
#endif
|
|
switch(s->common.write_cmd) {
|
|
default:
|
|
case -1:
|
|
/* mouse command */
|
|
if (s->mouse_wrap) {
|
|
if (val == AUX_RESET_WRAP) {
|
|
s->mouse_wrap = 0;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
return;
|
|
} else if (val != AUX_RESET) {
|
|
ps2_queue(&s->common, val);
|
|
return;
|
|
}
|
|
}
|
|
switch(val) {
|
|
case AUX_SET_SCALE11:
|
|
s->mouse_status &= ~MOUSE_STATUS_SCALE21;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
break;
|
|
case AUX_SET_SCALE21:
|
|
s->mouse_status |= MOUSE_STATUS_SCALE21;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
break;
|
|
case AUX_SET_STREAM:
|
|
s->mouse_status &= ~MOUSE_STATUS_REMOTE;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
break;
|
|
case AUX_SET_WRAP:
|
|
s->mouse_wrap = 1;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
break;
|
|
case AUX_SET_REMOTE:
|
|
s->mouse_status |= MOUSE_STATUS_REMOTE;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
break;
|
|
case AUX_GET_TYPE:
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
ps2_queue(&s->common, s->mouse_type);
|
|
break;
|
|
case AUX_SET_RES:
|
|
case AUX_SET_SAMPLE:
|
|
s->common.write_cmd = val;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
break;
|
|
case AUX_GET_SCALE:
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
ps2_queue(&s->common, s->mouse_status);
|
|
ps2_queue(&s->common, s->mouse_resolution);
|
|
ps2_queue(&s->common, s->mouse_sample_rate);
|
|
break;
|
|
case AUX_POLL:
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
ps2_mouse_send_packet(s);
|
|
break;
|
|
case AUX_ENABLE_DEV:
|
|
s->mouse_status |= MOUSE_STATUS_ENABLED;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
break;
|
|
case AUX_DISABLE_DEV:
|
|
s->mouse_status &= ~MOUSE_STATUS_ENABLED;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
break;
|
|
case AUX_SET_DEFAULT:
|
|
s->mouse_sample_rate = 100;
|
|
s->mouse_resolution = 2;
|
|
s->mouse_status = 0;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
break;
|
|
case AUX_RESET:
|
|
s->mouse_sample_rate = 100;
|
|
s->mouse_resolution = 2;
|
|
s->mouse_status = 0;
|
|
s->mouse_type = 0;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
ps2_queue(&s->common, 0xaa);
|
|
ps2_queue(&s->common, s->mouse_type);
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
break;
|
|
case AUX_SET_SAMPLE:
|
|
s->mouse_sample_rate = val;
|
|
/* detect IMPS/2 or IMEX */
|
|
switch(s->mouse_detect_state) {
|
|
default:
|
|
case 0:
|
|
if (val == 200)
|
|
s->mouse_detect_state = 1;
|
|
break;
|
|
case 1:
|
|
if (val == 100)
|
|
s->mouse_detect_state = 2;
|
|
else if (val == 200)
|
|
s->mouse_detect_state = 3;
|
|
else
|
|
s->mouse_detect_state = 0;
|
|
break;
|
|
case 2:
|
|
if (val == 80)
|
|
s->mouse_type = 3; /* IMPS/2 */
|
|
s->mouse_detect_state = 0;
|
|
break;
|
|
case 3:
|
|
if (val == 80)
|
|
s->mouse_type = 4; /* IMEX */
|
|
s->mouse_detect_state = 0;
|
|
break;
|
|
}
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
s->common.write_cmd = -1;
|
|
break;
|
|
case AUX_SET_RES:
|
|
s->mouse_resolution = val;
|
|
ps2_queue(&s->common, AUX_ACK);
|
|
s->common.write_cmd = -1;
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void ps2_reset(void *opaque)
|
|
{
|
|
PS2State *s = (PS2State *)opaque;
|
|
PS2Queue *q;
|
|
s->write_cmd = -1;
|
|
q = &s->queue;
|
|
q->rptr = 0;
|
|
q->wptr = 0;
|
|
q->count = 0;
|
|
}
|
|
|
|
static void ps2_kbd_save(QEMUFile* f, void* opaque)
|
|
{
|
|
PS2KbdState *s = (PS2KbdState*)opaque;
|
|
|
|
qemu_put_be32s(f, &s->common.write_cmd);
|
|
qemu_put_be32s(f, &s->scan_enabled);
|
|
}
|
|
|
|
static void ps2_mouse_save(QEMUFile* f, void* opaque)
|
|
{
|
|
PS2MouseState *s = (PS2MouseState*)opaque;
|
|
|
|
qemu_put_be32s(f, &s->common.write_cmd);
|
|
qemu_put_8s(f, &s->mouse_status);
|
|
qemu_put_8s(f, &s->mouse_resolution);
|
|
qemu_put_8s(f, &s->mouse_sample_rate);
|
|
qemu_put_8s(f, &s->mouse_wrap);
|
|
qemu_put_8s(f, &s->mouse_type);
|
|
qemu_put_8s(f, &s->mouse_detect_state);
|
|
qemu_put_be32s(f, &s->mouse_dx);
|
|
qemu_put_be32s(f, &s->mouse_dy);
|
|
qemu_put_be32s(f, &s->mouse_dz);
|
|
qemu_put_8s(f, &s->mouse_buttons);
|
|
}
|
|
|
|
static int ps2_kbd_load(QEMUFile* f, void* opaque, int version_id)
|
|
{
|
|
PS2KbdState *s = (PS2KbdState*)opaque;
|
|
|
|
if (version_id != 1)
|
|
return -EINVAL;
|
|
qemu_get_be32s(f, &s->common.write_cmd);
|
|
qemu_get_be32s(f, &s->scan_enabled);
|
|
return 0;
|
|
}
|
|
|
|
static int ps2_mouse_load(QEMUFile* f, void* opaque, int version_id)
|
|
{
|
|
PS2MouseState *s = (PS2MouseState*)opaque;
|
|
|
|
if (version_id != 1)
|
|
return -EINVAL;
|
|
qemu_get_be32s(f, &s->common.write_cmd);
|
|
qemu_get_8s(f, &s->mouse_status);
|
|
qemu_get_8s(f, &s->mouse_resolution);
|
|
qemu_get_8s(f, &s->mouse_sample_rate);
|
|
qemu_get_8s(f, &s->mouse_wrap);
|
|
qemu_get_8s(f, &s->mouse_type);
|
|
qemu_get_8s(f, &s->mouse_detect_state);
|
|
qemu_get_be32s(f, &s->mouse_dx);
|
|
qemu_get_be32s(f, &s->mouse_dy);
|
|
qemu_get_be32s(f, &s->mouse_dz);
|
|
qemu_get_8s(f, &s->mouse_buttons);
|
|
return 0;
|
|
}
|
|
|
|
void *ps2_kbd_init(void (*update_irq)(void *, int), void *update_arg)
|
|
{
|
|
PS2KbdState *s = (PS2KbdState *)qemu_mallocz(sizeof(PS2KbdState));
|
|
|
|
s->common.update_irq = update_irq;
|
|
s->common.update_arg = update_arg;
|
|
ps2_reset(&s->common);
|
|
register_savevm("ps2kbd", 0, 1, ps2_kbd_save, ps2_kbd_load, s);
|
|
qemu_add_kbd_event_handler(ps2_put_keycode, s);
|
|
qemu_register_reset(ps2_reset, &s->common);
|
|
return s;
|
|
}
|
|
|
|
void *ps2_mouse_init(void (*update_irq)(void *, int), void *update_arg)
|
|
{
|
|
PS2MouseState *s = (PS2MouseState *)qemu_mallocz(sizeof(PS2MouseState));
|
|
|
|
s->common.update_irq = update_irq;
|
|
s->common.update_arg = update_arg;
|
|
ps2_reset(&s->common);
|
|
register_savevm("ps2mouse", 0, 1, ps2_mouse_save, ps2_mouse_load, s);
|
|
qemu_add_mouse_event_handler(ps2_mouse_event, s);
|
|
qemu_register_reset(ps2_reset, &s->common);
|
|
return s;
|
|
}
|