///////////////////////////////////////////////////////////////////////////////////////////////////////// // // Name: PC9801.cpp // Created: Apr 2022 // Version: v1.0 // Author(s): Philip Smart // Description: HID (PS/2 or BT keyboard) to NEC PC-9801 series Interface logic. // This source file contains the singleton class containing logic to obtain // PS/2 or BT scan codes, map them into NEC PC-9801 key codes and transmit the key // data to the NEC PC-9801 host. // // The class uses a modified version of the PS2KeyAdvanced // https://github.com/techpaul/PS2KeyAdvanced class from Paul Carpenter. // // The whole application of which this class is a member, uses the Espressif Development // environment with Arduino components. This is necessary for the PS2KeyAdvanced class, // which I may in future convert to use esp-idf library calls rather than Arduino. // // Credits: // Copyright: (c) 2022 Philip Smart // // History: Apr 2022 - Initial framework, waiting on arrival of real machine to progress further. // v1.01 Jun 2022 - Updates to reflect changes realised in other modules due to addition of // bluetooth and suspend logic due to NVS issues using both cores. // // Notes: See Makefile to enable/disable conditional components // ///////////////////////////////////////////////////////////////////////////////////////////////////////// // This source file is free software: you can redistribute it and#or modify // it under the terms of the GNU General Public License as published // by the Free Software Foundation, either version 3 of the License, or // (at your option) any later version. // // This source file is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . ///////////////////////////////////////////////////////////////////////////////////////////////////////// #include #include #include #include #include #include #include #include #include #include #include "freertos/FreeRTOS.h" #include "freertos/task.h" #include "freertos/queue.h" #include "driver/uart.h" #include "driver/gpio.h" #include "esp_log.h" #include "soc/timer_group_struct.h" #include "soc/timer_group_reg.h" #include "driver/timer.h" #include "sys/stat.h" #include "esp_littlefs.h" #include "PS2KeyAdvanced.h" #include "sdkconfig.h" #include "PC9801.h" // Tag for ESP main application logging. #define MAINTAG "pc9801key" // FreeRTOS Queue handle to pass messages from the HID Keyboard Mapper into the PC9801 transmission logic. static QueueHandle_t xmitQueue; static QueueHandle_t rcvQueue; // NEC PC-9801 Protocol // -------------------- // // The NEC PC-9801 uses an asynchronous serial protocol over two wires (+ 2 control wires and +5V/GND). The basic protocol is 19200, 8 bits, 1 start bit, 1 stop bit, ODD parity at TTL level (ie. not RS-232). // The 4 signals are (from the SharpKey side): // DATA (TxD) - Data sent serially from SharpKey to PC-9801 // /RST (RxD) - Reset signal from PC-9801 to SharpKey, active low. Doubles up for later models as the Rxd Serial connection for the PC-9801 to send the SharpKey some commands. // /RDY - Ready signal from PC-9801 to SharpKey, active low. When active, PC-9801 can receive key data. // /RTY - Retry signal from PC-9801 to SharpKey, active low. When active, PC-9801 requires the SharpKey to retransmit the last key. // //// Protocol: // Idle State (RXD/TXD) = High. // // // The following keymaps (from the TMK project, https://github.com/tmk/tmk_keyboard/wiki/PC-9801-Keyboard) show the PC-9801 keyboard layout // and generated scan codes. // // ,---. ,---. ,------------------------. ,------------------------. ,------------------------. // | 60| | 61| | 62 | 63 | 64 | 65 | 66 | | 67 | 68 | 69 | 6A | 6B | | 52 | 53 | 54 | 55 | 56 | // `---' `---' `------------------------' `------------------------' `------------------------' // ,-------------------------------------------------------------. ,-------. ,---------------. // | 00 | 01| 02| 03| 04| 05| 06| 07| 08| 09| 0A| 0B| 0C| 0D| 0E | | 38| 39| | 3E| 3F| 4D| 41| // |-------------------------------------------------------------| |-------| |---------------| // | 0F | 10| 11| 12| 13| 14| 15| 16| 17| 18| 19| 1A| 1B| | | 36| 37| | 42| 43| 44| 45| // |-------------------------------------------------------` 1C | |-------| |---------------| // | 74| 71| 1D| 1E| 1F| 20| 21| 22| 23| 24| 25| 26| 27| 28| | | 3A | | 46| 47| 48| 49| // |-------------------------------------------------------------| |-------| |---------------| // | 70 | 29| 2A| 2B| 2C| 2D| 2E| 2F| 30| 31| 32| 33| 70/7D | | 3B| 3C| | 4A| 4B| 4C| 4D| // `-------------------------------------------------------------' |-------| |---------------| // | 72 | 77| 73| 51 | 34 | 35 | 79| 78| 5E| | 3D | | 4E| 4F| 50| 1C| // `-------------------------------------------------------' `-------' `---------------' // 5E: HOME on PC98XL keyboard // 79: ALT on DIGITAL WAVE Dboard // 77,78,79: Left Win, right Win and Application on PC-9821 keyboard // // ,---. ,---. ,------------------------. ,------------------------. ,------------------------. // |Stp| |Cpy| | F1 | F2 | F3 | F4 | F5 | | F6 | F7 | F8 | F9 | F10| | F11| F12| F13| F14| F15| // `---' `---' `------------------------' `------------------------' `------------------------' // ,-------------------------------------------------------------. ,-------. ,---------------. // | Esc| 1| 2| 3| 4| 5| 6| 7| 8| 9| 0| -| =|JPY|Bspc| |Ins|Del| |Hom|Hlp| -| /| // |-------------------------------------------------------------| |-------| |---------------| // | Tab | Q| W| E| R| T| Y| U| I| O| P| [| ]| | |RUp|RDn| | 7| 8| 9| *| // |-------------------------------------------------------`Enter| |-------| |---------------| // |Ctl|Cap| A| S| D| F| G| H| J| K| L| ;| '| \| | | Up | | 4| 5| 6| +| // |-------------------------------------------------------------| |-------| |---------------| // | Shift | Z| X| C| V| B| N| M| ,| .| /| RO| Shift | |Lef|Rig| | 1| 2| 3| =| // `-------------------------------------------------------------' |-------| |---------------| // |Kana|Win|GRP|NFER| Space |XFER| ^2|Win| ^3| | Down | | 0| ,| .| ^1| // `-------------------------------------------------------' `-------' `---------------' // ^1: Enter on keypad is identical to Enter on alphanumeric portion // ^2: ALT on DIGITAL WAVE Dboard while Menu on PC-9821 keyboard // ^3: HOME on PC98XL keyboard // ^4: CAPS and Kana are locking keys, either mechanically or by firmware emulation // // The following keymaps are for the later NEC keyboad, PC-9801-114 KBDPO3 PC-PTOS // ,-------------------------------------------------------------------------------------------. // | 73| 62| 63| 64| 65| 66| 67| 68| 69| 6A| 6B| 52| 53| 54| 55| 56| 36| 37| | | | | | // `-------------------------------------------------------------------------------------------' // ,-------------------------------------------------------------. ,-------. ,-------------------. // | 00 | 01| 02| 03| 04| 05| 06| 07| 08| 09| 0A| 0B| 0C| 0D| 0E | | 38| 39| | 3F| 3E| 61| 4D| 60| // |-------------------------------------------------------------| |-------| |-------------------| // | 0F | 10| 11| 12| 13| 14| 15| 16| 17| 18| 19| 1A| 1B| | | 3A | | 42| 43| 44| | 41| // |-------------------------------------------------------` 1C | |-------| |-------------------| // | 74| 71| 1D| 1E| 1F| 20| 21| 22| 23| 24| 25| 26| 27| 28| | | 3B| 3C| | 46| 47| 48| | 45| // |-------------------------------------------------------------| |-------| |-------------------| // | | 70 | 29| 2A| 2B| 2C| 2D| 2E| 2F| 30| 31| 32| 33| 70/7D | | 3D | | 4A| 4B| 4C| | 4D| // |-------------------------------------------------------------| |-------| |-----------| 1C|---| // | | | 51 | 34 | 35 | | 72 | | | | | 4E| 4F| 50| | 49| // `-------------------------------------------------------------' `-------' `-------------------' // // ,-------------------------------------------------------------------------------------------. // |FNC| F1| F2| F3| F4| F5| F6| F7| F8| F9|F10|F11|F12|F13|F14|F15|F16|F17|F18|F19|F20|F21|F22| // `-------------------------------------------------------------------------------------------' // ,-------------------------------------------------------------. ,-------. ,-------------------. // | Esc| 1| 2| 3| 4| 5| 6| 7| 8| 9| 0| -| ^|JPY|Bskp| |Skp|Rst| |Hlp|Hom|Cpy| =|Stp| // |-------------------------------------------------------------| |-------| |-------------------| // | Tab | Q| W| E| R| T| Y| U| I| O| P| @| [| | | Up | | 7| 8| 9| II| /| // |-------------------------------------------------------`Enter| |-------| |-------------------| // |Ctl|Cap| A| S| D| F| G| H| J| K| L| ;| :| ]| | |Lef|Rig| | 4| 5| 6| I| *| // |-------------------------------------------------------------| |-------| |-------------------| // |SW1|Shift| Z| X| C| V| B| N| M| ,| .| /| RO| Shift | | Down | | 1| 2| 3| | -| // |-------------------------------------------------------------' |-------| |-----------|Ent|---| // |SW2| Eisu | MHEN | Space | HENK | HIRA | KANA |Z/H| | Exec | | 0|000| .| | +| // `-------------------------------------------------------------' `-------' `-------------------' // Function to push a keycode onto the key queue ready for transmission. // IRAM_ATTR void PC9801::pushKeyToQueue(uint32_t key) { // Locals. t_xmitQueueMessage xmitMsg; #define PUSHKEYTAG "pushKeyToQueue" xmitMsg.keyCode = key; if( xQueueSend(xmitQueue, (void *)&xmitMsg, 10) != pdPASS) { ESP_LOGW(PUSHKEYTAG, "Failed to put scancode:%04x into xmitQueue", key); } return; } // Function to push a host command onto the processing queue. // IRAM_ATTR void PC9801::pushHostCmdToQueue(uint8_t cmd) { // Locals. t_rcvQueueMessage rcvMsg; #define PUSHCMDTAG "pushHostCmdToQueue" rcvMsg.hostCmd = cmd; if( xQueueSend(rcvQueue, (void *)&rcvMsg, 10) != pdPASS) { ESP_LOGW(PUSHCMDTAG, "Failed to put host command:%02x onto rcvQueue", cmd); } return; } // Method to realise the NEC PC-9801 4 wire serial protocol in order to transmit key presses to the // NEC PC-9801. // // This method uses Core 1 and it will hold it in a spinlock as necessary to ensure accurate timing. // A key is passed into the method via the FreeRTOS Queue handle xmitQueue. // IRAM_ATTR void PC9801::pcInterface( void * pvParameters ) { // Locals. t_xmitQueueMessage rcvMsg; uint8_t uartData[128]; int uartXmitCnt; size_t uartRcvCnt; // Retrieve pointer to object in order to access data. PC9801* pThis = (PC9801*)pvParameters; // Initialise the MUTEX which prevents this core from being released to other tasks. pThis->pcMutex = portMUX_INITIALIZER_UNLOCKED; // Initial delay needed because the xQueue will assert probably on a suspended task ALL if delay not inserted! vTaskDelay(1000); // Sign on. ESP_LOGW(MAINTAG, "Starting NEC PC-9801 thread."); // Permanent loop, wait for an incoming message on the key to send queue, read it then transmit to the PC-9801, repeat! for(;;) { // Check stack space, report if it is getting low. if(uxTaskGetStackHighWaterMark(NULL) < 1024) { ESP_LOGW(MAINTAG, "THREAD STACK SPACE(%d)\n",uxTaskGetStackHighWaterMark(NULL)); } if(xQueueReceive(xmitQueue, (void *)&rcvMsg, 0) == pdTRUE) { ESP_LOGW(MAINTAG, "Received:%08x\n", rcvMsg.keyCode); // Allow for multi byte transmissions, MSB sent first. if(rcvMsg.keyCode != 0x00000000) { uartXmitCnt = 0; while((rcvMsg.keyCode & 0xff000000) == 0x00) { rcvMsg.keyCode = rcvMsg.keyCode << 8; } for(int idx=0; idx < 4 && (rcvMsg.keyCode & 0xff000000) != 0x00; idx++) { if((rcvMsg.keyCode & 0xff000000) != 0) { uartData[idx] = (uint8_t)((rcvMsg.keyCode & 0xFF000000) >> 24); uartXmitCnt++; } rcvMsg.keyCode = rcvMsg.keyCode << 8; } if(uartXmitCnt > 0) { ESP_LOGW(MAINTAG, "Received:%08x, Count=%d\n", rcvMsg.keyCode, uartXmitCnt); uart_write_bytes(pThis->pcCtrl.uartNum, (const char *)uartData, uartXmitCnt); } } } // Get command data from the PC-9801 if any sent- this is where the PC-9801, later models, can send any relevant commands for processing. uart_get_buffered_data_len(pThis->pcCtrl.uartNum, &uartRcvCnt); if(uartRcvCnt > 0) { do { uartRcvCnt = uart_read_bytes(pThis->pcCtrl.uartNum, uartData, (128 - 1), 20 / portTICK_PERIOD_MS); for(int idx=0; idx < uartRcvCnt; idx++) { // Filter out polling commands and send valid commands to the rcvQueue. if(uartData[idx] != 0x40 && uartData[idx] != 0x41) { pThis->pushHostCmdToQueue(uartData[idx]); } } } while(uartRcvCnt > 0); } // Yield if the suspend flag is set. pThis->yield(50); // Logic to feed the watchdog if needed. Watchdog disabled in menuconfig but if enabled this will need to be used. //TIMERG0.wdt_wprotect=TIMG_WDT_WKEY_VALUE; // write enable //TIMERG0.wdt_feed=1; // feed dog //TIMERG0.wdt_wprotect=0; // write protect //TIMERG1.wdt_wprotect=TIMG_WDT_WKEY_VALUE; // write enable //TIMERG1.wdt_feed=1; // feed dog //TIMERG1.wdt_wprotect=0; // write protect } } // Method to select keyboard configuration options. When a key sequence is pressed, ie. SHIFT+CTRL+ESC then the fourth simultaneous key is the required option and given to this // method to act on. Options can be machine model, keyboard map etc. // void PC9801::selectOption(uint8_t optionCode) { // Locals. // bool updated = true; #define SELOPTTAG "selectOption" // Simple switch to decode the required option and act on it. switch(optionCode) { // Select a keymap using 1..8 or default (STANDARD) using 0. case PS2_KEY_1: this->pcConfig.params.activeKeyboardMap = KEYMAP_UK_WYSE_KB3926; break; case PS2_KEY_2: this->pcConfig.params.activeKeyboardMap = KEYMAP_JAPAN_OADG109; break; case PS2_KEY_3: this->pcConfig.params.activeKeyboardMap = KEYMAP_JAPAN_SANWA_SKBL1; break; case PS2_KEY_4: this->pcConfig.params.activeKeyboardMap = KEYMAP_NOT_ASSIGNED_4; break; case PS2_KEY_5: this->pcConfig.params.activeKeyboardMap = KEYMAP_NOT_ASSIGNED_5; break; case PS2_KEY_6: this->pcConfig.params.activeKeyboardMap = KEYMAP_NOT_ASSIGNED_6; break; case PS2_KEY_7: this->pcConfig.params.activeKeyboardMap = KEYMAP_UK_PERIBOARD_810; break; case PS2_KEY_8: this->pcConfig.params.activeKeyboardMap = KEYMAP_UK_OMOTON_K8508; break; case PS2_KEY_0: this->pcConfig.params.activeKeyboardMap = KEYMAP_STANDARD; break; // Unknown option so ignore. default: updated = false; break; } // If an update was made, persist it for power cycles. // if(updated) { this->pcCtrl.persistConfig = true; } return; } // Method to take a PS/2 key and control data and map it into an NEC PC-9801 key and control equivalent, updating state values accordingly (ie. CAPS). // A mapping table is used which maps a key and state values into an NEC PC-9801 key and control values, the emphasis being on readability and easy configuration // as opposed to concatenated byte tables. // uint32_t PC9801::mapKey(uint16_t scanCode) { // Locals. uint32_t idx; uint8_t keyCode = (scanCode & 0xFF); bool mapped = false; bool matchExact = false; uint32_t mappedKey = 0x00000000; #define MAPKEYTAG "mapKey" // Intercept control keys and set state variables. // // if(scanCode & PS2_BREAK) { // if((keyCode == PS2_KEY_L_SHIFT || keyCode == PS2_KEY_R_SHIFT) && (scanCode & PS2_SHIFT) == 0) { mapped=true; this->pcCtrl.keyCtrl |= PC9801_CTRL_SHIFT; } // if(keyCode == PS2_KEY_KANA && (scanCode & PS2_CTRL) == 0) { mapped=true; this->pcCtrl.keyCtrl &= ~PC9801_CTRL_KANA; } // Any break key clears the option select flag. this->pcCtrl.optionSelect = false; // Clear any feature LED blinking. led->setLEDMode(LED::LED_MODE_OFF, LED::LED_DUTY_CYCLE_OFF, 0, 0L, 0L); } else { // if((keyCode == PS2_KEY_L_SHIFT || keyCode == PS2_KEY_R_SHIFT) && (scanCode & PS2_SHIFT)) { mapped=true; this->pcCtrl.keyCtrl &= ~PC9801_CTRL_SHIFT; } // if(keyCode == PS2_KEY_KANA && (scanCode & PS2_CTRL)) { mapped=true; this->pcCtrl.keyCtrl |= PC9801_CTRL_KANA; } // Special mapping to allow selection of keyboard options. If the user presses CTRL+SHIFT+ESC then a flag becomes active and should a fourth key be pressed before a BREAK then the fourth key is taken as an option key and processed accordingly. if(this->pcCtrl.optionSelect == true && keyCode != PS2_KEY_ESC) { mapped = true; this->pcCtrl.optionSelect = false; selectOption(keyCode); } if(keyCode == PS2_KEY_ESC && (scanCode & PS2_CTRL) && (scanCode & PS2_SHIFT) && this->pcCtrl.optionSelect == false) { // Prime flag ready for fourth option key and start LED blinking periodically. mapped = true; this->pcCtrl.optionSelect = true; led->setLEDMode(LED::LED_MODE_BLINK, LED::LED_DUTY_CYCLE_50, 1, 500L, 500L); } } // If the key has been mapped as a special key, no further processing. if(mapped == true) { ESP_LOGW(MAPKEYTAG, "Mapped special key:%02x\n", this->pcCtrl.keyCtrl); // mappedKey = (this->pcCtrl.keyCtrl << 8) | 0x00; } else { // Loop through the entire conversion table to find a match on this key, if found map to X68000 equivalent. // switch matrix. // for(idx=0, mapped=false, matchExact=false; idx < pcCtrl.kmeRows && (mapped == false || (mapped == true && matchExact == false)); idx++) { // Match key code? Make sure the current machine and keymap match as well. if(pcCtrl.kme[idx].ps2KeyCode == (uint8_t)(scanCode&0xFF) && ((pcCtrl.kme[idx].machine == PC9801_ALL) || ((pcCtrl.kme[idx].machine & pcConfig.params.activeMachineModel) != 0)) && ((pcCtrl.kme[idx].keyboardModel & pcConfig.params.activeKeyboardMap) != 0)) { // Match Raw, Shift, Function, Control, ALT or ALT-Gr? //if( (((pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_SHIFT) == 0) && ((pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_CTRL) == 0) && ((pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_KANA) == 0) && ((pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_GRAPH) == 0) && ((pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_GUI) == 0) && ((pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_FUNC) == 0)) || if( (((pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_SHIFT) == 0) && ((pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_CTRL) == 0) && ((pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_GRAPH) == 0) && ((pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_GUI) == 0) && ((pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_FUNC) == 0)) || ((scanCode & PS2_SHIFT) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_SHIFT) != 0) || ((scanCode & PS2_CTRL) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_CTRL) != 0) || ((scanCode & PS2_GUI) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_GUI) != 0) || // ((this->pcCtrl.keyCtrl & PC9801_CTRL_KANA) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_KANA)!= 0) || // ((scanCode & PS2_CAPS) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_CAPS) != 0) || ((scanCode & PS2_FUNCTION) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_FUNC) != 0) ) { // Exact entry match, data + control key? On an exact match we only process the first key. On a data only match we fall through to include additional data and control key matches to allow for un-mapped key combinations, ie. Japanese characters. matchExact = (((scanCode & PS2_SHIFT) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_SHIFT) != 0) || ((scanCode & PS2_SHIFT) == 0 && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_SHIFT) == 0)) && (((scanCode & PS2_CTRL) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_CTRL) != 0) || ((scanCode & PS2_CTRL) == 0 && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_CTRL) == 0)) && (((scanCode & PS2_GUI) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_GUI) != 0) || ((scanCode & PS2_GUI) == 0 && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_GUI) == 0)) && // (((this->pcCtrl.keyCtrl & PC9801_CTRL_KANA) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_KANA)!= 0) || ((this->pcCtrl.keyCtrl & PC9801_CTRL_KANA) == 0 && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_KANA)== 0)) && // (((scanCode & PS2_CAPS) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_CAPS) != 0) || ((scanCode & PS2_GUI) == 0 && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_CAPS) == 0)) && (((scanCode & PS2_FUNCTION) && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_FUNC) != 0) || ((scanCode & PS2_FUNCTION) == 0 && (pcCtrl.kme[idx].ps2Ctrl & PS2CTRL_FUNC) == 0)) ? true : false; // RELEASE (PS2_BREAK == 1) or PRESS? if((scanCode & PS2_BREAK)) { // Special case for the PAUSE / BREAK key. The underlying logic has been modified to send a BREAK key event immediately // after a PAUSE make, this is necessary as the Sharp machines require SHIFT (pause) BREAK so the PS/2 CTRL+BREAK wont // work (unless logic is added to insert a SHIFT, pause, add BREAK). The solution was to generate a BREAK event // when SHIFT+PAUSE is pressed. if(keyCode == PS2_KEY_PAUSE) { vTaskDelay(100); } mappedKey = 0x80 | (pcCtrl.kme[idx].pcKey & 0x7F); mapped = true; } else { // Map key actioning any control overrides. if((pcCtrl.kme[idx].pcCtrl & PC9801_CTRL_RELEASESHIFT) != 0) { // RELEASESHIFT infers that the X68000 must cancel the current shift status prior to receiving the key code. This is necessary when using foreign keyboards and a character appears // on a shifted key whereas on the original X68000 keyboard the character is the primary key. // mappedKey = ((0x80 | PC9801_KEY_SHIFT) << 16) | 0x00 | ((pcCtrl.kme[idx].pcKey & 0x7F) << 8) | (0x00 | PC9801_KEY_SHIFT); } else if((pcCtrl.kme[idx].pcCtrl & PC9801_CTRL_SHIFT) != 0) { // SHIFT infers that the X68000 must invoke shift status prior to receiving the key code. This is necessary when using foreign keyboards and a character appears // as a primary key on the foreign keyboard but as a shifted key on the X68000 keyboard. // mappedKey = ((0x00 | PC9801_KEY_SHIFT) << 16) | 0x00 | ((pcCtrl.kme[idx].pcKey & 0x7F) << 8) | (0x80 | PC9801_KEY_SHIFT); } else { mappedKey = 0x00 | (pcCtrl.kme[idx].pcKey & 0x7F); } mapped = true; } } } } } return(mappedKey); } // Primary HID thread, running on Core 0. // This thread is responsible for receiving HID (PS/2 or BT) keyboard scan codes and mapping them to Sharp PC9801 equivalent keys, updating state flags as needed. // The HID data is received via interrupt. The data to be sent to the PC9801 is pushed onto a FIFO queue. // IRAM_ATTR void PC9801::hidInterface( void * pvParameters ) { // Locals. uint16_t scanCode = 0x0000; uint32_t pcKey = 0x00000000; t_rcvQueueMessage rcvMsg; // Map the instantiating object so we can access its methods and data. PC9801* pThis = (PC9801*)pvParameters; // Thread never exits, just polls the keyboard and updates the matrix. while(1) { // Check stack space, report if it is getting low. if(uxTaskGetStackHighWaterMark(NULL) < 1024) { ESP_LOGW(MAINTAG, "THREAD STACK SPACE(%d)\n",uxTaskGetStackHighWaterMark(NULL)); } // Check for HID keyboard scan codes. while((scanCode = pThis->hid->read()) != 0) { // Scan Code Breakdown: // Define name bit description // PS2_BREAK 15 1 = Break key code // (MSB) 0 = Make Key code // PS2_SHIFT 14 1 = Shift key pressed as well (either side) // 0 = No shift key // PS2_CTRL 13 1 = Ctrl key pressed as well (either side) // 0 = No Ctrl key // PS2_CAPS 12 1 = Caps Lock ON // 0 = Caps lock OFF // PS2_ALT 11 1 = Left Alt key pressed as well // 0 = No Left Alt key // PS2_ALT_GR 10 1 = Right Alt (Alt GR) key pressed as well // 0 = No Right Alt key // PS2_GUI 9 1 = GUI key pressed as well (either) // 0 = No GUI key // PS2_FUNCTION 8 1 = FUNCTION key non-printable character (plus space, tab, enter) // 0 = standard character key // 7-0 PS/2 Key code. // // BREAK code means all keys released so clear out flags and send update. ESP_LOGW(MAPKEYTAG, "SCANCODE:%04x",scanCode); // Map the PS/2 key to an PC9801 CTRL + KEY pcKey = pThis->mapKey(scanCode); if(pcKey != 0L) { pThis->pushKeyToQueue(pcKey); } // Toggle LED to indicate data flow. if((scanCode & PS2_BREAK) == 0) pThis->led->setLEDMode(LED::LED_MODE_BLINK_ONESHOT, LED::LED_DUTY_CYCLE_10, 1, 100L, 0L); } // Check for incoming host keyboard commands and execute them. if(xQueueReceive(rcvQueue, (void *)&rcvMsg, 0) == pdTRUE) { ESP_LOGD(MAINTAG, "Received Host Cmd:%02x\n", rcvMsg.hostCmd); } // NVS writes require both CPU cores to be free so write config out at a known junction. if(pThis->pcCtrl.persistConfig == true) { // Request and wait for the interface to suspend. This ensures that the host cpu is not held in a spinlock when NVS update is requested avoiding deadlock. pThis->suspendInterface(true); pThis->isSuspended(true); if(pThis->nvs->persistData(pThis->getClassName(__PRETTY_FUNCTION__), &pThis->pcConfig, sizeof(t_pcConfig)) == false) { ESP_LOGW(SELOPTTAG, "Persisting PC-9801 configuration data failed, updates will not persist in future power cycles."); pThis->led->setLEDMode(LED::LED_MODE_BLINK_ONESHOT, LED::LED_DUTY_CYCLE_10, 200, 1000L, 0L); } else // Few other updates so make a commit here to ensure data is flushed and written. if(pThis->nvs->commitData() == false) { ESP_LOGW(SELOPTTAG, "NVS Commit writes operation failed, some previous writes may not persist in future power cycles."); pThis->led->setLEDMode(LED::LED_MODE_BLINK_ONESHOT, LED::LED_DUTY_CYCLE_10, 200, 500L, 0L); } // Release interface. pThis->suspendInterface(false); // Clear flag so we dont persist in a loop. pThis->pcCtrl.persistConfig = false; } // Yield if the suspend flag is set. pThis->yield(25); } } // A method to load the keyboard mapping table into memory for use in the interface mapping logic. If no persistence file exists or an error reading persistence occurs, the keymap // uses the internal static default. If no persistence file exists and attempt is made to create it with a copy of the inbuilt static map so that future operations all // work with persistence such that modifications can be made. // bool PC9801::loadKeyMap(void) { // Locals. // bool result = false; int fileRows = 0; struct stat keyMapFileNameStat; // See if the file exists, if it does, get size so we can compute number of mapping rows. if(stat(pcCtrl.keyMapFileName.c_str(), &keyMapFileNameStat) == -1) { ESP_LOGW(MAINTAG, "No keymap file, using inbuilt definitions."); } else { // Get number of rows in the file. fileRows = keyMapFileNameStat.st_size/sizeof(t_keyMapEntry); // Subsequent reloads, delete memory prior to building new map, primarily to conserve precious resources rather than trying the memory allocation trying to realloc and then having to copy. if(pcCtrl.kme != NULL && pcCtrl.kme != PS2toPC9801.kme) { delete pcCtrl.kme; pcCtrl.kme = NULL; } // Allocate memory for the new keymap table. pcCtrl.kme = new t_keyMapEntry[fileRows]; if(pcCtrl.kme == NULL) { ESP_LOGW(MAINTAG, "Failed to allocate memory for keyboard map, fallback to inbuilt!"); } else { // Open the keymap extension file for binary reading to add data to our map table. std::fstream keyFileIn(pcCtrl.keyMapFileName.c_str(), std::ios::in | std::ios::binary); int idx=0; while(keyFileIn.good()) { keyFileIn.read((char *)&pcCtrl.kme[idx], sizeof(t_keyMapEntry)); if(keyFileIn.good()) { idx++; } } // Any errors, we wind back and use the inbuilt mapping table. if(keyFileIn.bad()) { keyFileIn.close(); ESP_LOGW(MAINTAG, "Failed to read data from keymap extension file:%s, fallback to inbuilt!", pcCtrl.keyMapFileName.c_str()); } else { // No longer need the file. keyFileIn.close(); // Max rows in the KME table. pcCtrl.kmeRows = fileRows; // Good to go, map ready for use with the interface. result = true; } } } // Any failures, free up memory and use the inbuilt mapping table. if(result == false) { if(pcCtrl.kme != NULL && pcCtrl.kme != PS2toPC9801.kme) { delete pcCtrl.kme; pcCtrl.kme = NULL; } // No point allocating memory if no extensions exist or an error occurs, just point to the static table. pcCtrl.kme = PS2toPC9801.kme; pcCtrl.kmeRows = PS2TBL_PC9801_MAXROWS; // Persist the data so that next load comes from file. saveKeyMap(); } // Return code. Either memory map was successfully loaded, true or failed, false. return(result); } // Method to save the current keymap out to an extension file. // bool PC9801::saveKeyMap(void) { // Locals. // bool result = false; int idx = 0; // Has a map been defined? Cannot save unless loadKeyMap has been called which sets pcCtrl.kme to point to the internal keymap or a new memory resident map. // if(pcCtrl.kme == NULL) { ESP_LOGW(MAINTAG, "KeyMap hasnt yet been defined, need to call loadKeyMap."); } else { // Open file for binary writing, trunc specified to clear out the file, we arent appending. std::fstream keyFileOut(pcCtrl.keyMapFileName.c_str(), std::ios::out | std::ios::binary | std::ios::trunc); // Loop whilst no errors and data rows still not written. while(keyFileOut.good() && idx < pcCtrl.kmeRows) { keyFileOut.write((char *)&pcCtrl.kme[idx], sizeof(t_keyMapEntry)); idx++; } if(keyFileOut.bad()) { ESP_LOGW(MAINTAG, "Failed to write data from the keymap to file:%s, deleting as state is unknown!", pcCtrl.keyMapFileName.c_str()); keyFileOut.close(); std::remove(pcCtrl.keyMapFileName.c_str()); } else { // Success. keyFileOut.close(); result = true; } } // Return code. Either memory map was successfully saved, true or failed, false. return(result); } // Public method to open a keymap file for data upload. // This method opens the file and makes any validation checks as necessary. // bool PC9801::createKeyMapFile(std::fstream &outFile) { // Locals. // bool result = true; std::string fileName; // Attempt to open a temporary keymap file for writing. // fileName = pcCtrl.keyMapFileName; replaceExt(fileName, "tmp"); outFile.open(fileName.c_str(), std::ios::out | std::ios::binary | std::ios::trunc); if(outFile.bad()) { result = false; } // Send result. return(result); } // Public method to validate and store data provided by caller into an open file created by 'createKeyMapFile'. // bool PC9801::storeDataToKeyMapFile(std::fstream &outFile, char *data, int size) { // Locals. // bool result = true; // Check that the file is still writeable then add data. if(outFile.good()) { outFile.write(data, size); } if(outFile.bad()) { result = false; } // Send result. return(result); } // Polymorphic alternative to take a vector of bytes for writing to the output file. // bool PC9801::storeDataToKeyMapFile(std::fstream & outFile, std::vector& dataArray) { // Locals. // bool result = true; char data[1]; // Check that the file is still writeable then add data. Not best for performace but ease of use and minimum memory. if(outFile.good()) { for(std::size_t idx = 0; idx < dataArray.size(); idx++) { data[0] = (char)dataArray[idx]; outFile.write((char *)&data, 1); } } if(outFile.bad()) { result = false; } // Send result. return(result); } // Public method to close and commit a data file, created by 'createKeyMapFile' and populated by 'storeDataToKeyMapFile'. // This involves renaming the original keymap file, closing the new file and renaming it to the original keymap filename. // bool PC9801::closeAndCommitKeyMapFile(std::fstream &outFile, bool cleanupOnly) { // Locals. // bool result = true; std::string fileName; // Check the file is still accessible and close. // outFile.close(); if(!cleanupOnly) { if(outFile.good()) { // Rename the original file. fileName = pcCtrl.keyMapFileName; replaceExt(fileName, "bak"); // Remove old backup file. Dont worry if it is not there! std::remove(fileName.c_str()); replaceExt(fileName, "tmp"); // Rename new file to active. if(std::rename(fileName.c_str(), pcCtrl.keyMapFileName.c_str()) != 0) { result = false; } } else { result = false; } } // Send result. return(result); } // Method to return the keymap column names as header strings. // void PC9801::getKeyMapHeaders(std::vector& headerList) { // Add the names. // headerList.push_back(PS2TBL_PS2KEYCODE_NAME); headerList.push_back(PS2TBL_PS2CTRL_NAME); headerList.push_back(PS2TBL_KEYBOARDMODEL_NAME); headerList.push_back(PS2TBL_MACHINE_NAME); // headerList.push_back(PS2TBL_X1MODE_NAME); // headerList.push_back(PS2TBL_X1KEYCODE_NAME); // headerList.push_back(PS2TBL_X1KEYCODE_BYTE2_NAME); // headerList.push_back(PS2TBL_X1_CTRL_NAME); return; } // A method to return the Type of data for a given column in the KeyMap table. // void PC9801::getKeyMapTypes(std::vector& typeList) { // Add the types. // typeList.push_back(PS2TBL_PS2KEYCODE_TYPE); typeList.push_back(PS2TBL_PS2CTRL_TYPE); typeList.push_back(PS2TBL_KEYBOARDMODEL_TYPE); typeList.push_back(PS2TBL_MACHINE_TYPE); // typeList.push_back(PS2TBL_X1MODE_TYPE); // typeList.push_back(PS2TBL_X1KEYCODE_TYPE); // typeList.push_back(PS2TBL_X1KEYCODE_BYTE2_TYPE); // typeList.push_back(PS2TBL_X1CTRL_TYPE); return; } // Method to return a list of key:value entries for a given keymap column. This represents the // feature which can be selected and the value it uses. Features can be combined by ORing the values // together. bool PC9801::getKeyMapSelectList(std::vector>& selectList, std::string option) { // Locals. // bool result = true; // Build up a map, depending on the list required, of name to value. This list can then be used // by a user front end to select an option based on a name and return its value. if(option.compare(PS2TBL_PS2CTRL_TYPE) == 0) { selectList.push_back(std::make_pair(PS2TBL_PS2CTRL_SEL_SHIFT, PS2CTRL_SHIFT)); selectList.push_back(std::make_pair(PS2TBL_PS2CTRL_SEL_CTRL, PS2CTRL_CTRL)); selectList.push_back(std::make_pair(PS2TBL_PS2CTRL_SEL_CAPS, PS2CTRL_CAPS)); selectList.push_back(std::make_pair(PS2TBL_PS2CTRL_SEL_KANA, PS2CTRL_KANA)); selectList.push_back(std::make_pair(PS2TBL_PS2CTRL_SEL_GRAPH, PS2CTRL_GRAPH)); selectList.push_back(std::make_pair(PS2TBL_PS2CTRL_SEL_GUI, PS2CTRL_GUI)); selectList.push_back(std::make_pair(PS2TBL_PS2CTRL_SEL_FUNC, PS2CTRL_FUNC)); selectList.push_back(std::make_pair(PS2TBL_PS2CTRL_SEL_EXACT, PS2CTRL_EXACT)); } else if(option.compare(PS2TBL_KEYBOARDMODEL_TYPE) == 0) { selectList.push_back(std::make_pair(KEYMAP_SEL_STANDARD, KEYMAP_STANDARD)); selectList.push_back(std::make_pair(KEYMAP_SEL_UK_WYSE_KB3926, KEYMAP_UK_WYSE_KB3926)); selectList.push_back(std::make_pair(KEYMAP_SEL_JAPAN_OADG109, KEYMAP_JAPAN_OADG109)); selectList.push_back(std::make_pair(KEYMAP_SEL_JAPAN_SANWA_SKBL1, KEYMAP_JAPAN_SANWA_SKBL1)); selectList.push_back(std::make_pair(KEYMAP_SEL_NOT_ASSIGNED_4, KEYMAP_NOT_ASSIGNED_4)); selectList.push_back(std::make_pair(KEYMAP_SEL_NOT_ASSIGNED_5, KEYMAP_NOT_ASSIGNED_5)); selectList.push_back(std::make_pair(KEYMAP_SEL_NOT_ASSIGNED_6, KEYMAP_NOT_ASSIGNED_6)); selectList.push_back(std::make_pair(KEYMAP_SEL_UK_PERIBOARD_810, KEYMAP_UK_PERIBOARD_810)); selectList.push_back(std::make_pair(KEYMAP_SEL_UK_OMOTON_K8508, KEYMAP_UK_OMOTON_K8508)); } else if(option.compare(PS2TBL_MACHINE_TYPE) == 0) { selectList.push_back(std::make_pair(PC9801_SEL_ALL, PC9801_ALL)); // selectList.push_back(std::make_pair(X1_SEL_ORIG, X1_ORIG)); // selectList.push_back(std::make_pair(X1_SEL_TURBO, X1_TURBO)); // selectList.push_back(std::make_pair(X1_SEL_TURBOZ, X1_TURBOZ)); } else if(option.compare(PS2TBL_PC9801_CTRL_TYPE) == 0) { selectList.push_back(std::make_pair(PC9801_CTRL_SEL_GRAPH, PC9801_CTRL_GRAPH)); selectList.push_back(std::make_pair(PC9801_CTRL_SEL_CAPS, PC9801_CTRL_CAPS)); selectList.push_back(std::make_pair(PC9801_CTRL_SEL_KANA, PC9801_CTRL_KANA)); selectList.push_back(std::make_pair(PC9801_CTRL_SEL_SHIFT, PC9801_CTRL_SHIFT)); selectList.push_back(std::make_pair(PC9801_CTRL_SEL_CTRL, PC9801_CTRL_CTRL)); } else { // Not found! result = false; } // Return result, false if the option not found, true otherwise. // return(result); } // Method to read the Keymap array, 1 row at a time and return it to the caller. // bool PC9801::getKeyMapData(std::vector& dataArray, int *row, bool start) { // Locals. // bool result = false; // If start flag is set, set row to 0. if(start == true) { (*row) = 0; } // Bound check and if still valid, push data onto the vector. if((*row) >= pcCtrl.kmeRows) { result = true; } else { dataArray.push_back(pcCtrl.kme[*row].ps2KeyCode); dataArray.push_back(pcCtrl.kme[*row].ps2Ctrl); dataArray.push_back(pcCtrl.kme[*row].keyboardModel); dataArray.push_back(pcCtrl.kme[*row].machine); // dataArray.push_back(pcCtrl.kme[*row].x1Mode); // dataArray.push_back(pcCtrl.kme[*row].x1Key); // dataArray.push_back(pcCtrl.kme[*row].x1Key2); // dataArray.push_back(pcCtrl.kme[*row].x1Ctrl); (*row) = (*row) + 1; } // True if no more rows, false if additional rows can be read. return(result); } // Initialisation routine. Start two threads, one to handle the incoming PS/2 keyboard data and map it, the second to handle the host interface. void PC9801::init(uint32_t ifMode, NVS *hdlNVS, LED *hdlLED, HID *hdlHID) { // Basic initialisation. init(hdlNVS, hdlHID); // Invoke the prototype init which initialises common variables and devices shared by all subclass. KeyInterface::init(getClassName(__PRETTY_FUNCTION__), hdlNVS, hdlLED, hdlHID, ifMode); // Prepare the UART to be used for communications with the PC-9801. // The PC-9801 uses Asynchronous protocol with 1 start bit, 1 stop bit, odd parity, 19200 baud. // uart_config_t uartConfig = { .baud_rate = 19200, .data_bits = UART_DATA_8_BITS, .parity = UART_PARITY_ODD, .stop_bits = UART_STOP_BITS_1, .flow_ctrl = UART_HW_FLOWCTRL_DISABLE, .rx_flow_ctrl_thresh = 122, .source_clk = UART_SCLK_APB, }; // Install UART driver. Use RX/TX buffers without event queue. ESP_ERROR_CHECK(uart_driver_install(pcCtrl.uartNum, pcCtrl.uartBufferSize, pcCtrl.uartBufferSize, 0, NULL, 0)); // Configure UART parameters and pin assignments, software flow control, not RTS/CTS. ESP_ERROR_CHECK(uart_param_config(pcCtrl.uartNum, &uartConfig)); ESP_ERROR_CHECK(uart_set_pin(pcCtrl.uartNum, CONFIG_HOST_KDB0, CONFIG_HOST_KDB3, -1, -1)); // Create queue for buffering incoming HID keys prior to transmitting to the PC-9801. xmitQueue = xQueueCreate(MAX_PC9801_XMIT_KEY_BUF, sizeof(t_xmitQueueMessage)); // Create queue for buffering incoming PC-9801 data for later processing. rcvQueue = xQueueCreate(MAX_PC9801_RCV_KEY_BUF, sizeof(t_rcvQueueMessage)); // Create a task pinned to core 1 which will fulfill the NEC PC-9801 interface. This task has the highest priority // and it will also hold spinlock and manipulate the watchdog to ensure a scan cycle timing can be met. This means // all other tasks running on Core 1 will suspend as needed. The HID devices will be serviced with core 0. // // Core 1 - NEC PC-9801 Interface ESP_LOGW(MAINTAG, "Starting NEC PC-9801 if thread..."); ::xTaskCreatePinnedToCore(&this->pcInterface, "pc9801if", 4096, this, 25, &this->TaskHostIF, 1); vTaskDelay(500); // Core 0 - Application // HID Interface handler thread. ESP_LOGW(MAINTAG, "Starting hidIf thread..."); ::xTaskCreatePinnedToCore(&this->hidInterface, "hidIf", 8192, this, 22, &this->TaskHIDIF, 0); } // Initialisation routine without hardware. void PC9801::init(NVS *hdlNVS, HID *hdlHID) { // Initialise control variables. this->pcCtrl.keyCtrl = 0xFF; // Negative logic, 0 - active, 1 = inactive. pcCtrl.optionSelect = false; pcCtrl.uartNum = UART_NUM_2; pcCtrl.uartBufferSize = 256; pcCtrl.uartQueueSize = 10; pcCtrl.keyMapFileName = pcCtrl.fsPath.append("/").append(PC9801IF_KEYMAP_FILE); pcCtrl.kmeRows = 0; pcCtrl.kme = NULL; pcCtrl.persistConfig = false; // Invoke the prototype init which initialises common variables and devices shared by all subclass. KeyInterface::init(getClassName(__PRETTY_FUNCTION__), hdlNVS, hdlHID); // Load the keyboard mapping table into memory. If the file doesnt exist, create it. loadKeyMap(); // Retrieve configuration, if it doesnt exist, set defaults. // if(nvs->retrieveData(getClassName(__PRETTY_FUNCTION__), &this->pcConfig, sizeof(t_pcConfig)) == false) { ESP_LOGW(MAINTAG, "PC9801 configuration set to default, no valid config in NVS found."); pcConfig.params.activeKeyboardMap = KEYMAP_STANDARD; pcConfig.params.activeMachineModel = PC9801_ALL; // Persist the data for next time. if(nvs->persistData(getClassName(__PRETTY_FUNCTION__), &this->pcConfig, sizeof(t_pcConfig)) == false) { ESP_LOGW(MAINTAG, "Persisting Default PC9801 configuration data failed, check NVS setup.\n"); } // Few other updates so make a commit here to ensure data is flushed and written. else if(this->nvs->commitData() == false) { ESP_LOGW(SELOPTTAG, "NVS Commit writes operation failed, some previous writes may not persist in future power cycles."); } } } // Constructor, basically initialise the Singleton interface and let the threads loose. PC9801::PC9801(uint32_t ifMode, NVS *hdlNVS, LED *hdlLED, HID *hdlHID, const char* fsPath) { // Setup the default path on the underlying filesystem. this->pcCtrl.fsPath = fsPath; // Initialise the interface. init(ifMode, hdlNVS, hdlLED, hdlHID); } // Constructor, basic without hardware. PC9801::PC9801(NVS *hdlNVS, HID *hdlHID, const char* fsPath) { // Setup the default path on the underlying filesystem. this->pcCtrl.fsPath = fsPath; // Initialise the interface. init(hdlNVS, hdlHID); } // Constructor, used for version reporting so no hardware is initialised. PC9801::PC9801(void) { return; } // Destructor - only ever called when the class is used for version reporting. PC9801::~PC9801(void) { return; }