X-Git-Url: https://git.friedersdorff.com/?a=blobdiff_plain;f=converter%2Fibmpc_usb%2Fibmpc_usb.c;h=f31e83dd4457c6778d9767440272a05e803369f3;hb=bb955a819af89e74843743e268aa7b4ceb06cc4e;hp=89afa081e260a6427987b419e0013ff075789b6f;hpb=da1ca3ab6fd055f56470e5f310c86fed1f2ee5b4;p=max%2Ftmk_keyboard.git
diff --git a/converter/ibmpc_usb/ibmpc_usb.c b/converter/ibmpc_usb/ibmpc_usb.c
index 89afa081..f31e83dd 100644
--- a/converter/ibmpc_usb/ibmpc_usb.c
+++ b/converter/ibmpc_usb/ibmpc_usb.c
@@ -33,9 +33,9 @@ along with this program. If not, see .
static void matrix_make(uint8_t code);
static void matrix_break(uint8_t code);
-static int8_t process_cs1(void);
-static int8_t process_cs2(void);
-static int8_t process_cs3(void);
+static int8_t process_cs1(uint8_t code);
+static int8_t process_cs2(uint8_t code);
+static int8_t process_cs3(uint8_t code);
static uint8_t matrix[MATRIX_ROWS];
@@ -68,6 +68,7 @@ static uint16_t read_keyboard_id(void)
if (code == -1) { id = 0x0000; goto DONE; } // AT
id = (code & 0xFF)<<8;
+ // Mouse responds with one-byte 00, this returns 00FF [y] p.14
code = read_wait(500);
id |= code & 0xFF;
@@ -104,6 +105,7 @@ void matrix_init(void)
* d. ID is BF BF: Terminal keyboard CodeSet3
* e. error on recv: maybe broken PS/2
*/
+uint8_t current_protocol = 0;
uint16_t keyboard_id = 0x0000;
keyboard_kind_t keyboard_kind = NONE;
uint8_t matrix_scan(void)
@@ -111,6 +113,8 @@ uint8_t matrix_scan(void)
// scan code reading states
static enum {
INIT,
+ WAIT_SETTLE,
+ AT_RESET,
XT_RESET,
XT_RESET_WAIT,
XT_RESET_DONE,
@@ -125,23 +129,45 @@ uint8_t matrix_scan(void)
if (ibmpc_error) {
- xprintf("\nERR:%02X\n", ibmpc_error);
+ xprintf("\nERR:%02X ISR:%04X ", ibmpc_error, ibmpc_isr_debug);
// when recv error, neither send error nor buffer full
if (!(ibmpc_error & (IBMPC_ERR_SEND | IBMPC_ERR_FULL))) {
// keyboard init again
if (state == LOOP) {
- xprintf("init\n");
+ xprintf("[RST] ");
state = INIT;
}
}
// clear or process error
ibmpc_error = IBMPC_ERR_NONE;
+ ibmpc_isr_debug = 0;
+ }
+
+ // check protocol change AT/XT
+ if (ibmpc_protocol && ibmpc_protocol != current_protocol) {
+ xprintf("\nPRT:%02X ISR:%04X ", ibmpc_protocol, ibmpc_isr_debug);
+
+ // protocol change between AT and XT indicates that
+ // keyboard is hotswapped or something goes wrong.
+ // This requires initializing keyboard again probably.
+ if (((current_protocol&IBMPC_PROTOCOL_XT) && (ibmpc_protocol&IBMPC_PROTOCOL_AT)) ||
+ ((current_protocol&IBMPC_PROTOCOL_AT) && (ibmpc_protocol&IBMPC_PROTOCOL_XT))) {
+ if (state == LOOP) {
+ xprintf("[CHG] ");
+ state = INIT;
+ }
+ }
+
+ current_protocol = ibmpc_protocol;
+ ibmpc_isr_debug = 0;
}
switch (state) {
case INIT:
+ ibmpc_host_disable();
+
xprintf("I%u ", timer_read());
keyboard_kind = NONE;
keyboard_id = 0x0000;
@@ -149,14 +175,39 @@ uint8_t matrix_scan(void)
matrix_clear();
clear_keyboard();
- state = XT_RESET;
+ init_time = timer_read();
+ state = WAIT_SETTLE;
+ break;
+ case WAIT_SETTLE:
+ // wait for keyboard to settle after plugin
+ if (timer_elapsed(init_time) > 1000) {
+ state = AT_RESET;
+ }
+ break;
+ case AT_RESET:
+ ibmpc_host_isr_clear();
+ ibmpc_host_enable();
+ wait_ms(1); // keyboard can't respond to command without this
+
+ // SKIDATA-2-DE(and some other keyboards?) stores 'Code Set' setting in nonvlatile memory
+ // and keeps it until receiving reset. Sending reset here may be useful to clear it, perhaps.
+ // https://github.com/tmk/tmk_keyboard/wiki/IBM-PC-AT-Keyboard-Protocol#select-alternate-scan-codesf0
+
+ // reset command
+ if (0xFA == ibmpc_host_send(0xFF)) {
+ state = WAIT_AA;
+ } else {
+ state = XT_RESET;
+ }
+ xprintf("A%u ", timer_read());
break;
case XT_RESET:
// Reset XT-initialize keyboard
// XT: hard reset 500ms for IBM XT Type-1 keyboard and clones
- // XT: soft reset 20ms min(clock Lo)
- ibmpc_host_disable(); // soft reset: inihibit(clock Lo/Data Hi)
- IBMPC_RST_LO(); // hard reset: reset pin Lo
+ // XT: soft reset 20ms min
+ // https://github.com/tmk/tmk_keyboard/wiki/IBM-PC-XT-Keyboard-Protocol#keyboard-soft-reset
+ ibmpc_host_disable(); // soft reset: Clock Lo/Data Hi
+ IBMPC_RST_LO(); // hard reset: Reset pin Lo
init_time = timer_read();
state = XT_RESET_WAIT;
@@ -167,9 +218,9 @@ uint8_t matrix_scan(void)
}
break;
case XT_RESET_DONE:
- IBMPC_RST_HIZ(); // hard reset: reset pin HiZ
+ IBMPC_RST_HIZ(); // hard reset: Reset pin HiZ
ibmpc_host_isr_clear();
- ibmpc_host_enable(); // soft reset: idle(clock Hi/Data Hi)
+ ibmpc_host_enable(); // soft reset: idle(Clock Hi/Data Hi)
xprintf("X%u ", timer_read());
init_time = timer_read();
@@ -216,32 +267,46 @@ uint8_t matrix_scan(void)
}
break;
case READ_ID:
- xprintf("R%u ", timer_read());
-
keyboard_id = read_keyboard_id();
- if (ibmpc_error) {
- xprintf("\nERR:%02X\n", ibmpc_error);
- ibmpc_error = IBMPC_ERR_NONE;
- }
+ xprintf("R%u ", timer_read());
- if (0xAB00 == (keyboard_id & 0xFF00)) { // CodeSet2 PS/2
+ if (0x0000 == keyboard_id) { // CodeSet2 AT(IBM PC AT 84-key)
keyboard_kind = PC_AT;
- } else if (0xBF00 == (keyboard_id & 0xFF00)) { // CodeSet3 Terminal
- keyboard_kind = PC_TERMINAL;
- } else if (0x0000 == keyboard_id) { // CodeSet2 AT
- keyboard_kind = PC_AT;
- } else if (0xFFFF == keyboard_id) { // CodeSet1 XT
+ } else if (0xFFFF == keyboard_id) { // CodeSet1 XT
keyboard_kind = PC_XT;
- } else if (0xFFFE == keyboard_id) { // CodeSet2 PS/2 fails to response?
+ } else if (0xFFFE == keyboard_id) { // CodeSet2 PS/2 fails to response?
keyboard_kind = PC_AT;
- } else if (0x00FF == keyboard_id) { // Mouse is not supported
+ } else if (0x00FF == keyboard_id) { // Mouse is not supported
xprintf("Mouse: not supported\n");
keyboard_kind = NONE;
+#ifdef G80_2551_SUPPORT
+ } else if (0xAB86 == keyboard_id ||
+ 0xAB85 == keyboard_id) { // For G80-2551 and other 122-key terminal
+ // https://github.com/tmk/tmk_keyboard/wiki/IBM-PC-AT-Keyboard-Protocol#ab86
+ // https://github.com/tmk/tmk_keyboard/wiki/IBM-PC-AT-Keyboard-Protocol#ab85
+
+ if ((0xFA == ibmpc_host_send(0xF0)) &&
+ (0xFA == ibmpc_host_send(0x03))) {
+ // switch to code set 3
+ keyboard_kind = PC_TERMINAL;
+ } else {
+ keyboard_kind = PC_AT;
+ }
+#endif
+ } else if (0xBFB0 == keyboard_id) { // IBM RT Keyboard
+ // https://github.com/tmk/tmk_keyboard/wiki/IBM-PC-AT-Keyboard-Protocol#bfb0
+ // TODO: LED indicator fix
+ //keyboard_kind = PC_TERMINAL_IBM_RT;
+ keyboard_kind = PC_TERMINAL;
+ } else if (0xAB00 == (keyboard_id & 0xFF00)) { // CodeSet2 PS/2
+ keyboard_kind = PC_AT;
+ } else if (0xBF00 == (keyboard_id & 0xFF00)) { // CodeSet3 Terminal
+ keyboard_kind = PC_TERMINAL;
} else {
keyboard_kind = PC_AT;
}
- xprintf("ID:%04X(%d)\n", keyboard_id, keyboard_kind);
+ xprintf("\nID:%04X(%d) ", keyboard_id, keyboard_kind);
state = SETUP;
break;
@@ -254,7 +319,10 @@ uint8_t matrix_scan(void)
led_set(host_keyboard_leds());
break;
case PC_TERMINAL:
+ // Set all keys to make/break type
ibmpc_host_send(0xF8);
+ // This should not be harmful
+ led_set(host_keyboard_leds());
break;
default:
break;
@@ -262,18 +330,39 @@ uint8_t matrix_scan(void)
state = LOOP;
xprintf("L%u ", timer_read());
case LOOP:
- switch (keyboard_kind) {
- case PC_XT:
- if (process_cs1() == -1) state = INIT;
- break;
- case PC_AT:
- if (process_cs2() == -1) state = INIT;
- break;
- case PC_TERMINAL:
- if (process_cs3() == -1) state = INIT;
- break;
- default:
- break;
+ {
+ uint16_t code = ibmpc_host_recv();
+ if (code == -1) {
+ // no code
+ break;
+ }
+
+ // Keyboard Error/Overrun([3]p.26) or Buffer full
+ // Scan Code Set 1: 0xFF
+ // Scan Code Set 2 and 3: 0x00
+ // Buffer full(IBMPC_ERR_FULL): 0xFF
+ if (code == 0x00 || code == 0xFF) {
+ // clear stuck keys
+ matrix_clear();
+ clear_keyboard();
+
+ xprintf("\n[OVR] ");
+ break;
+ }
+
+ switch (keyboard_kind) {
+ case PC_XT:
+ if (process_cs1(code) == -1) state = INIT;
+ break;
+ case PC_AT:
+ if (process_cs2(code) == -1) state = INIT;
+ break;
+ case PC_TERMINAL:
+ if (process_cs3(code) == -1) state = INIT;
+ break;
+ default:
+ break;
+ }
}
break;
default:
@@ -327,8 +416,19 @@ void matrix_clear(void)
void led_set(uint8_t usb_led)
{
- if (keyboard_kind != PC_AT) return;
+ // Sending before keyboard recognition may be harmful for XT keyboard
+ if (keyboard_kind == NONE) return;
+ // XT keyobard doesn't support any command and it is harmful perhaps
+ // https://github.com/tmk/tmk_keyboard/issues/635#issuecomment-626993437
+ if (keyboard_kind == PC_XT) return;
+
+ // It should be safe to send the command to keyboards with AT protocol
+ // - IBM Terminal doesn't support the command and response with 0xFE but it is not harmful.
+ // - Some other Terminals like G80-2551 supports the command.
+ // https://geekhack.org/index.php?topic=103648.msg2894921#msg2894921
+
+ // TODO: PC_TERMINAL_IBM_RT support
uint8_t ibmpc_led = 0;
if (usb_led & (1<= 0x62) {
- xprintf("!CS1_INV!\n");
- state = INIT;
- return -1;
- }
-
switch (state) {
case INIT:
switch (code) {
- case 0x00:
- case 0xFF: // Error/Overrun [3]p.26
- xprintf("!CS1_ERR!\n");
- return -1;
- break;
case 0xE0:
state = E0;
break;
@@ -497,7 +579,8 @@ static int8_t process_cs1(void)
case E1_1D:
switch (code) {
case 0x45:
- matrix_make(0x55);
+ matrix_make(0x55); // Pause
+ state = INIT;
break;
default:
state = INIT;
@@ -506,8 +589,9 @@ static int8_t process_cs1(void)
break;
case E1_9D:
switch (code) {
- case 0x45:
- matrix_break(0x55);
+ case 0xC5:
+ matrix_break(0x55); // Pause
+ state = INIT;
break;
default:
state = INIT;
@@ -605,12 +689,12 @@ static uint8_t cs2_e0code(uint8_t code) {
case 0x75: return 0x4F; // cursor up
case 0x7A: return 0x56; // page down
case 0x7D: return 0x5E; // page up
- case 0x7C: return 0x6F; // Print Screen
+ case 0x7C: return 0x7F; // Print Screen
case 0x7E: return 0x00; // Control'd Pause
case 0x21: return 0x65; // volume down
case 0x32: return 0x6E; // volume up
- case 0x23: return 0x7F; // mute
+ case 0x23: return 0x6F; // mute
case 0x10: return 0x08; // (WWW search) -> F13
case 0x18: return 0x10; // (WWW favourites) -> F14
case 0x20: return 0x18; // (WWW refresh) -> F15
@@ -642,7 +726,7 @@ static uint8_t cs2_e0code(uint8_t code) {
}
}
-static int8_t process_cs2(void)
+static int8_t process_cs2(uint8_t code)
{
// scan code reading states
static enum {
@@ -656,32 +740,11 @@ static int8_t process_cs2(void)
E1_F0,
E1_F0_14,
E1_F0_14_F0,
-#ifdef G80_2551_SUPPORT
- // G80-2551 four extra keys around cursor keys
- G80,
- G80_F0,
-#endif
} state = INIT;
- uint16_t code = ibmpc_host_recv();
- if (code == -1) {
- return 0;
- }
-
switch (state) {
case INIT:
switch (code) {
- case 0x00: // Error/Overrun [3]p.26
- xprintf("!CS2_OVR!\n");
- matrix_clear();
- clear_keyboard();
- break;
- case 0xFF:
- matrix_clear();
- xprintf("!CS2_ERR!\n");
- state = INIT;
- return -1;
- break;
case 0xE0:
state = E0;
break;
@@ -696,53 +759,12 @@ static int8_t process_cs2(void)
state = INIT;
break;
case 0x84: // Alt'd PrintScreen
- matrix_make(0x6F);
+ matrix_make(0x7F);
state = INIT;
break;
case 0xAA: // Self-test passed
case 0xFC: // Self-test failed
- // reset or plugin-in new keyboard
- state = INIT;
- return -1;
- break;
-#ifdef G80_2551_SUPPORT
- /*
- * G80-2551 terminal keyboard support
- */
- case 0x80: // G80-2551 four extra keys around cursor keys
- state = G80;
- break;
- case 0x19:
- matrix_make(0x7F); // MUTE
- break;
- case 0x39:
- matrix_make(0x6E); // VOLU
- break;
- case 0x53:
- matrix_make(0x65); // VOLD
- break;
- case 0x6F:
- matrix_make(0x5C); // APP
- break;
- case 0x5C:
- matrix_make(0x19); // LGUI
- break;
- case 0x1F:
- matrix_make(0x1F); // RGUI
- break;
- case 0x27:
- matrix_make(0x67); // MHEN
- break;
- case 0x2F:
- matrix_make(0x57); // F23
- break;
- case 0x5E:
- matrix_make(0x64); // HENK
- break;
- case 0x17:
- matrix_make(0x77); // NLCK
- break;
-#endif
+ // replug or unstable connection probably
default: // normal key make
state = INIT;
if (code < 0x80) {
@@ -781,57 +803,9 @@ static int8_t process_cs2(void)
state = INIT;
break;
case 0x84: // Alt'd PrintScreen
- matrix_break(0x6F);
- state = INIT;
- break;
-#ifdef G80_2551_SUPPORT
- /*
- * G80-2551 terminal keyboard support
- * https://deskthority.net/wiki/Cherry_G80-2551
- * https://geekhack.org/index.php?topic=103648.msg2893404#msg2893404
- * https://gist.github.com/tmk/22cb8680ca8ef854630ecd1953268c5b
- */
- case 0x19:
- matrix_break(0x7F); // MUTE
- state = INIT;
- break;
- case 0x39:
- matrix_break(0x6E); // VOLU
- state = INIT;
- break;
- case 0x53:
- matrix_break(0x65); // VOLD
- state = INIT;
- break;
- case 0x6F:
- matrix_break(0x5C); // APP
- state = INIT;
- break;
- case 0x5C:
- matrix_break(0x19); // LGUI
- state = INIT;
- break;
- case 0x1F:
- matrix_break(0x1F); // RGUI
- state = INIT;
- break;
- case 0x27:
- matrix_break(0x67); // MHEN
- state = INIT;
- break;
- case 0x2F:
- matrix_break(0x57); // F23
- state = INIT;
- break;
- case 0x5E:
- matrix_break(0x64); // HENK
- state = INIT;
- break;
- case 0x17:
- matrix_break(0x77); // NLCK
+ matrix_break(0x7F);
state = INIT;
break;
-#endif
default:
state = INIT;
if (code < 0x80) {
@@ -912,53 +886,6 @@ static int8_t process_cs2(void)
state = INIT;
}
break;
-#ifdef G80_2551_SUPPORT
- case G80: // G80-2551 four extra keys around cursor keys
- switch (code) {
- case (0x26): // TD= -> JYEN
- matrix_make(0x6A);
- break;
- case (0x25): // page with edge -> NUHS
- matrix_make(0x68);
- break;
- case (0x16): // two pages -> RO
- matrix_make(0x51);
- break;
- case (0x1E): // calc -> KANA
- matrix_make(0x13);
- break;
- case (0xF0):
- state = G80_F0;
- return 0;
- default:
- // Not supported
- matrix_clear();
- break;
- }
- state = INIT;
- break;
- case G80_F0:
- switch (code) {
- case (0x26): // TD= -> JYEN
- matrix_break(0x6A);
- break;
- case (0x25): // page with edge -> NUHS
- matrix_break(0x68);
- break;
- case (0x16): // two pages -> RO
- matrix_break(0x51);
- break;
- case (0x1E): // calc -> KANA
- matrix_break(0x13);
- break;
- default:
- // Not supported
- matrix_clear();
- break;
- }
- state = INIT;
- break;
-#endif
default:
state = INIT;
}
@@ -968,43 +895,56 @@ static int8_t process_cs2(void)
/*
* Terminal: Scan Code Set 3
*
- * See [3], [7]
- *
- * Scan code 0x83 and 0x84 are handled exceptioanally to fit into 1-byte range index.
+ * See [3], [7] and
+ * https://github.com/tmk/tmk_keyboard/wiki/IBM-PC-AT-Keyboard-Protocol#scan-code-set-3
*/
-static int8_t process_cs3(void)
+static int8_t process_cs3(uint8_t code)
{
static enum {
READY,
F0,
+#ifdef G80_2551_SUPPORT
+ // G80-2551 four extra keys around cursor keys
+ G80,
+ G80_F0,
+#endif
} state = READY;
- uint16_t code = ibmpc_host_recv();
- if (code == -1) {
- return 0;
- }
-
switch (state) {
case READY:
switch (code) {
- case 0x00: // Error/Overrun [3]p.26
- xprintf("!CS3_OVR!\n");
- matrix_clear();
- clear_keyboard();
- break;
- case 0xFF:
- xprintf("!CS3_ERR!\n");
- return -1;
- break;
case 0xF0:
state = F0;
break;
- case 0x83:
+ case 0x83: // PrintScreen
matrix_make(0x02);
break;
- case 0x84:
+ case 0x84: // Keypad *
matrix_make(0x7F);
break;
+ case 0x85: // Muhenkan
+ matrix_make(0x0B);
+ break;
+ case 0x86: // Henkan
+ matrix_make(0x06);
+ break;
+ case 0x87: // Hiragana
+ matrix_make(0x00);
+ break;
+ case 0x8B: // Left GUI
+ matrix_make(0x01);
+ break;
+ case 0x8C: // Right GUI
+ matrix_make(0x09);
+ break;
+ case 0x8D: // Application
+ matrix_make(0x0A);
+ break;
+#ifdef G80_2551_SUPPORT
+ case 0x80: // G80-2551 four extra keys around cursor keys
+ state = G80;
+ break;
+#endif
default: // normal key make
if (code < 0x80) {
matrix_make(code);
@@ -1016,23 +956,36 @@ static int8_t process_cs3(void)
break;
case F0: // Break code
switch (code) {
- case 0x00:
- xprintf("!CS3_F0_OVR!\n");
- matrix_clear();
- clear_keyboard();
+ case 0x83: // PrintScreen
+ matrix_break(0x02);
+ state = READY;
+ break;
+ case 0x84: // Keypad *
+ matrix_break(0x7F);
state = READY;
break;
- case 0xFF:
- xprintf("!CS3_F0_ERR!\n");
+ case 0x85: // Muhenkan
+ matrix_break(0x0B);
state = READY;
- return -1;
break;
- case 0x83:
- matrix_break(0x02);
+ case 0x86: // Henkan
+ matrix_break(0x06);
state = READY;
break;
- case 0x84:
- matrix_break(0x7F);
+ case 0x87: // Hiragana
+ matrix_break(0x00);
+ state = READY;
+ break;
+ case 0x8B: // Left GUI
+ matrix_break(0x01);
+ state = READY;
+ break;
+ case 0x8C: // Right GUI
+ matrix_break(0x09);
+ state = READY;
+ break;
+ case 0x8D: // Application
+ matrix_break(0x0A);
state = READY;
break;
default:
@@ -1045,6 +998,58 @@ static int8_t process_cs3(void)
}
}
break;
+#ifdef G80_2551_SUPPORT
+ /*
+ * G80-2551 terminal keyboard support
+ * https://deskthority.net/wiki/Cherry_G80-2551
+ * https://github.com/tmk/tmk_keyboard/wiki/IBM-PC-AT-Keyboard-Protocol#g80-2551-in-code-set-3
+ */
+ case G80: // G80-2551 four extra keys around cursor keys
+ switch (code) {
+ case (0x26): // TD= -> JYEN
+ matrix_make(0x5D);
+ break;
+ case (0x25): // page with edge -> NUHS
+ matrix_make(0x53);
+ break;
+ case (0x16): // two pages -> RO
+ matrix_make(0x51);
+ break;
+ case (0x1E): // calc -> KANA
+ matrix_make(0x00);
+ break;
+ case (0xF0):
+ state = G80_F0;
+ return 0;
+ default:
+ // Not supported
+ matrix_clear();
+ break;
+ }
+ state = READY;
+ break;
+ case G80_F0:
+ switch (code) {
+ case (0x26): // TD= -> JYEN
+ matrix_break(0x5D);
+ break;
+ case (0x25): // page with edge -> NUHS
+ matrix_break(0x53);
+ break;
+ case (0x16): // two pages -> RO
+ matrix_break(0x51);
+ break;
+ case (0x1E): // calc -> KANA
+ matrix_break(0x00);
+ break;
+ default:
+ // Not supported
+ matrix_clear();
+ break;
+ }
+ state = READY;
+ break;
+#endif
}
return 0;
}
@@ -1079,6 +1084,9 @@ static int8_t process_cs3(void)
* [7] The IBM 6110344 Keyboard - Scan Code Set 3 of 122-key terminal keyboard
* https://www.seasip.info/VintagePC/ibm_6110344.html
*
+ * [8] IBM PC AT Technical Reference 1986
+ * http://bitsavers.org/pdf/ibm/pc/at/6183355_PC_AT_Technical_Reference_Mar86.pdf
+ *
* [y] TrackPoint Engineering Specifications for version 3E
* https://web.archive.org/web/20100526161812/http://wwwcssrv.almaden.ibm.com/trackpoint/download.html
*