void keyboard_xt_write(uint16_t port, uint8_t val, void *priv)
{
switch (port)
{
case 0x61:
if (!(keyboard_xt.pb & 0x40) && (val & 0x40)) /*Reset keyboard*/
{
pclog("keyboard_xt : reset keyboard\n");
key_queue_end = key_queue_start;
keyboard_xt_adddata(0xaa);
}
if ((keyboard_xt.pb & 0x80)==0 && (val & 0x80)!=0)
{
keyboard_xt.pa = 0;
keyboard_xt.blocked = 0;
picintc(2);
}
keyboard_xt.pb = val;
ppi.pb = val;
timer_process();
timer_update_outstanding();
speaker_update();
speaker_gated = val & 1;
speaker_enable = val & 2;
if (speaker_enable)
was_speaker_enable = 1;
pit_set_gate(&pit, 2, val & 1);
break;
}
}
void keyboard_pcjr_write(uint16_t port, uint8_t val, void *priv)
{
// pclog("keyboard_pcjr : write %04X %02X %02X\n", port, val, keyboard_pcjr.pb);
/* if (ram[8] == 0xc3)
{
output = 3;
}*/
switch (port)
{
case 0x60:
keyboard_pcjr.pa = val;
break;
case 0x61:
keyboard_pcjr.pb = val;
timer_process();
timer_update_outstanding();
speaker_update();
speaker_gated = val & 1;
speaker_enable = val & 2;
if (speaker_enable)
was_speaker_enable = 1;
pit_set_gate(2, val & 1);
sn76489_mute = speaker_mute = 1;
switch (val & 0x60)
{
case 0x00:
speaker_mute = 0;
break;
case 0x60:
sn76489_mute = 0;
break;
}
break;
case 0xa0:
nmi_mask = val & 0x80;
pit_set_using_timer(1, !(val & 0x20));
break;
}
}
void keyboard_pcjr_write(uint16_t port, uint8_t val, void *priv)
{
switch (port)
{
case 0x60:
keyboard_pcjr.pa = val;
break;
case 0x61:
keyboard_pcjr.pb = val;
timer_process();
timer_update_outstanding();
speaker_update();
speaker_gated = val & 1;
speaker_enable = val & 2;
if (speaker_enable)
was_speaker_enable = 1;
pit_set_gate(&pit, 2, val & 1);
sn76489_mute = speaker_mute = 1;
switch (val & 0x60)
{
case 0x00:
speaker_mute = 0;
break;
case 0x60:
sn76489_mute = 0;
break;
}
break;
case 0xa0:
nmi_mask = val & 0x80;
pit_set_using_timer(&pit, 1, !(val & 0x20));
break;
}
}
void keyboard_at_write(uint16_t port, uint8_t val, void *priv)
{
// pclog("keyboard_at : write %04X %02X %i %02X\n", port, val, keyboard_at.key_wantdata, ram[8]);
/* if (ram[8] == 0xc3)
{
output = 3;
}*/
switch (port)
{
case 0x60:
if (keyboard_at.want60)
{
/*Write to controller*/
keyboard_at.want60 = 0;
switch (keyboard_at.command)
{
case 0x60: case 0x61: case 0x62: case 0x63:
case 0x64: case 0x65: case 0x66: case 0x67:
case 0x68: case 0x69: case 0x6a: case 0x6b:
case 0x6c: case 0x6d: case 0x6e: case 0x6f:
case 0x70: case 0x71: case 0x72: case 0x73:
case 0x74: case 0x75: case 0x76: case 0x77:
case 0x78: case 0x79: case 0x7a: case 0x7b:
case 0x7c: case 0x7d: case 0x7e: case 0x7f:
keyboard_at.mem[keyboard_at.command & 0x1f] = val;
if (keyboard_at.command == 0x60)
{
if ((val & 1) && (keyboard_at.status & STAT_OFULL))
keyboard_at.wantirq = 1;
if (!(val & 1) && keyboard_at.wantirq)
keyboard_at.wantirq = 0;
}
break;
case 0xcb: /*AMI - set keyboard mode*/
break;
case 0xcf: /*??? - sent by MegaPC BIOS*/
break;
case 0xd1: /*Write output port*/
// pclog("Write output port - %02X %02X %04X:%04X\n", keyboard_at.output_port, val, CS, pc);
if ((keyboard_at.output_port ^ val) & 0x02) /*A20 enable change*/
{
mem_a20_key = val & 0x02;
mem_a20_recalc();
// pclog("Rammask change to %08X %02X\n", rammask, val & 0x02);
flushmmucache();
}
keyboard_at.output_port = val;
break;
case 0xd3: /*Write to mouse output buffer*/
keyboard_at_adddata_mouse(val);
break;
case 0xd4: /*Write to mouse*/
if (mouse_write)
mouse_write(val);
break;
default:
pclog("Bad AT keyboard controller 0060 write %02X command %02X\n", val, keyboard_at.command);
// dumpregs();
// exit(-1);
}
}
else
{
/*Write to keyboard*/
keyboard_at.mem[0] &= ~0x10;
if (keyboard_at.key_wantdata)
{
keyboard_at.key_wantdata = 0;
switch (keyboard_at.key_command)
{
case 0xed: /*Set/reset LEDs*/
keyboard_at_adddata_keyboard(0xfa);
break;
case 0xf3: /*Set typematic rate/delay*/
keyboard_at_adddata_keyboard(0xfa);
break;
default:
pclog("Bad AT keyboard 0060 write %02X command %02X\n", val, keyboard_at.key_command);
// dumpregs();
// exit(-1);
}
}
else
{
keyboard_at.key_command = val;
switch (val)
{
case 0x05: /*??? - sent by NT 4.0*/
keyboard_at_adddata_keyboard(0xfe);
break;
case 0xed: /*Set/reset LEDs*/
keyboard_at.key_wantdata = 1;
keyboard_at_adddata_keyboard(0xfa);
break;
case 0xf2: /*Read ID*/
keyboard_at_adddata_keyboard(0xfa);
keyboard_at_adddata_keyboard(0xab);
keyboard_at_adddata_keyboard(0x41);
break;
case 0xf3: /*Set typematic rate/delay*/
keyboard_at.key_wantdata = 1;
keyboard_at_adddata_keyboard(0xfa);
break;
case 0xf4: /*Enable keyboard*/
keyboard_scan = 1;
keyboard_at_adddata_keyboard(0xfa);
break;
case 0xf5: /*Disable keyboard*/
keyboard_scan = 0;
keyboard_at_adddata_keyboard(0xfa);
break;
case 0xff: /*Reset*/
key_queue_start = key_queue_end = 0; /*Clear key queue*/
keyboard_at_adddata_keyboard(0xfa);
keyboard_at_adddata_keyboard(0xaa);
break;
default:
pclog("Bad AT keyboard command %02X\n", val);
keyboard_at_adddata_keyboard(0xfe);
// dumpregs();
// exit(-1);
}
}
}
break;
case 0x61:
ppi.pb = val;
speaker_gated = val & 1;
speaker_enable = val & 2;
if (speaker_enable)
was_speaker_enable = 1;
pit_set_gate(2, val & 1);
break;
case 0x64:
keyboard_at.want60 = 0;
keyboard_at.command = val;
/*New controller command*/
switch (val)
{
case 0x20: case 0x21: case 0x22: case 0x23:
case 0x24: case 0x25: case 0x26: case 0x27:
case 0x28: case 0x29: case 0x2a: case 0x2b:
case 0x2c: case 0x2d: case 0x2e: case 0x2f:
case 0x30: case 0x31: case 0x32: case 0x33:
case 0x34: case 0x35: case 0x36: case 0x37:
case 0x38: case 0x39: case 0x3a: case 0x3b:
case 0x3c: case 0x3d: case 0x3e: case 0x3f:
keyboard_at_adddata(keyboard_at.mem[val & 0x1f]);
break;
case 0x60: case 0x61: case 0x62: case 0x63:
case 0x64: case 0x65: case 0x66: case 0x67:
case 0x68: case 0x69: case 0x6a: case 0x6b:
case 0x6c: case 0x6d: case 0x6e: case 0x6f:
case 0x70: case 0x71: case 0x72: case 0x73:
case 0x74: case 0x75: case 0x76: case 0x77:
case 0x78: case 0x79: case 0x7a: case 0x7b:
case 0x7c: case 0x7d: case 0x7e: case 0x7f:
keyboard_at.want60 = 1;
break;
case 0xa1: /*AMI - get controlled version*/
break;
case 0xa7: /*Disable mouse port*/
break;
case 0xa9: /*Test mouse port*/
keyboard_at_adddata(0x00); /*no error*/
break;
case 0xaa: /*Self-test*/
if (!keyboard_at.initialised)
{
keyboard_at.initialised = 1;
key_ctrl_queue_start = key_ctrl_queue_end = 0;
keyboard_at.status &= ~STAT_OFULL;
}
keyboard_at.status |= STAT_SYSFLAG;
keyboard_at.mem[0] |= 0x04;
keyboard_at_adddata(0x55);
break;
case 0xab: /*Interface test*/
keyboard_at_adddata(0x00); /*no error*/
break;
case 0xad: /*Disable keyboard*/
keyboard_at.mem[0] |= 0x10;
break;
case 0xae: /*Enable keyboard*/
keyboard_at.mem[0] &= ~0x10;
break;
case 0xc0: /*Read input port*/
keyboard_at_adddata(keyboard_at.input_port);
keyboard_at.input_port = ((keyboard_at.input_port + 1) & 3) | (keyboard_at.input_port & 0xfc);
break;
case 0xc9: /*AMI - block P22 and P23 ??? */
break;
case 0xca: /*AMI - read keyboard mode*/
keyboard_at_adddata(0x00); /*ISA mode*/
break;
case 0xcb: /*AMI - set keyboard mode*/
keyboard_at.want60 = 1;
break;
case 0xcf: /*??? - sent by MegaPC BIOS*/
keyboard_at.want60 = 1;
break;
case 0xd0: /*Read output port*/
keyboard_at_adddata(keyboard_at.output_port);
break;
case 0xd1: /*Write output port*/
keyboard_at.want60 = 1;
break;
case 0xd3: /*Write mouse output buffer*/
keyboard_at.want60 = 1;
break;
case 0xd4: /*Write to mouse*/
keyboard_at.want60 = 1;
break;
case 0xe0: /*Read test inputs*/
keyboard_at_adddata(0x00);
break;
case 0xef: /*??? - sent by AMI486*/
break;
case 0xfe: /*Pulse output port - pin 0 selected - x86 reset*/
softresetx86(); /*Pulse reset!*/
break;
case 0xff: /*Pulse output port - but no pins selected - sent by MegaPC BIOS*/
break;
default:
pclog("Bad AT keyboard controller command %02X\n", val);
// dumpregs();
// exit(-1);
}
}
}
