ASCII character support for F256k and BREAK key
This commit is contained in:
Peter Weingartner
parent
ad4865cd1f
commit
1f1c9c7364
|
|
@ -9,16 +9,18 @@
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
#include <ctype.h>
|
||||||
|
#include <stdbool.h>
|
||||||
|
#include <stdint.h>
|
||||||
|
#include <stdio.h>
|
||||||
|
|
||||||
#include "log.h"
|
#include "log.h"
|
||||||
#include "ring_buffer.h"
|
#include "ring_buffer.h"
|
||||||
#include "dev/kbd_f256k.h"
|
#include "dev/kbd_f256k.h"
|
||||||
#include "F256/via_f256.h"
|
#include "F256/via_f256.h"
|
||||||
#include <stdbool.h>
|
|
||||||
#include <stdint.h>
|
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include "uart.h"
|
#include "uart.h"
|
||||||
#include "gabe_reg.h"
|
#include "gabe_reg.h"
|
||||||
|
#include "simpleio.h"
|
||||||
|
|
||||||
//
|
//
|
||||||
// Constants
|
// Constants
|
||||||
|
|
@ -41,6 +43,13 @@
|
||||||
#define KBD_MOD_OS 0x40
|
#define KBD_MOD_OS 0x40
|
||||||
#define KBD_MOD_MENU 0x80
|
#define KBD_MOD_MENU 0x80
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Special key scan codes
|
||||||
|
*/
|
||||||
|
|
||||||
|
#define KEY_C 0x2e
|
||||||
|
#define KEY_BREAK 0x61
|
||||||
|
|
||||||
//
|
//
|
||||||
// Map a key's matrix position to its scan code (FoenixMCP scan codes are used here)
|
// Map a key's matrix position to its scan code (FoenixMCP scan codes are used here)
|
||||||
//
|
//
|
||||||
|
|
@ -66,6 +75,173 @@ static const uint8_t kbd_scan_codes[KBD_ROWS][KBD_COLUMNS] = {
|
||||||
{0x02, 0x01, 0x1d, 0x03, 0x39, 0x5b, 0x10, 0x61, 0x00}
|
{0x02, 0x01, 0x1d, 0x03, 0x39, 0x5b, 0x10, 0x61, 0x00}
|
||||||
};
|
};
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Mapping of "codepoints" 0x80 - 0x98 (function keys, etc)
|
||||||
|
* to ANSI escape codes
|
||||||
|
*/
|
||||||
|
const char * ansi_keys[] = {
|
||||||
|
"1", /* HOME */
|
||||||
|
"2", /* INS */
|
||||||
|
"3", /* DELETE */
|
||||||
|
"4", /* END */
|
||||||
|
"5", /* PgUp */
|
||||||
|
"6", /* PgDn */
|
||||||
|
"A", /* Up */
|
||||||
|
"B", /* Left */
|
||||||
|
"C", /* Right */
|
||||||
|
"D", /* Down */
|
||||||
|
"11", /* F1 */
|
||||||
|
"12", /* F2 */
|
||||||
|
"13", /* F3 */
|
||||||
|
"14", /* F4 */
|
||||||
|
"15", /* F5 */
|
||||||
|
"17", /* F6 */
|
||||||
|
"18", /* F7 */
|
||||||
|
"19", /* F8 */
|
||||||
|
"20", /* F9 */
|
||||||
|
"21", /* F10 */
|
||||||
|
"23", /* F11 */
|
||||||
|
"24", /* F12 */
|
||||||
|
"30", /* MONITOR */
|
||||||
|
"31", /* CTX SWITCH */
|
||||||
|
"32" /* MENU HELP */
|
||||||
|
};
|
||||||
|
|
||||||
|
/*
|
||||||
|
* US keyboard layout scancode translation tables
|
||||||
|
*/
|
||||||
|
|
||||||
|
#define POUND 0x9c
|
||||||
|
|
||||||
|
const char kbd_256k_layout[] = {
|
||||||
|
// Unmodified
|
||||||
|
0x00, 0x1B, '1', '2', '3', '4', '5', '6', /* 0x00 - 0x07 */
|
||||||
|
'7', '8', '9', '0', '-', '=', 0x08, 0x09, /* 0x08 - 0x0F */
|
||||||
|
'q', 'w', 'e', 'r', 't', 'y', 'u', 'i', /* 0x10 - 0x17 */
|
||||||
|
'o', 'p', '[', ']', 0x0D, 0x00, 'a', 's', /* 0x18 - 0x1F */
|
||||||
|
'd', 'f', 'g', 'h', 'j', 'k', 'l', ';', /* 0x20 - 0x27 */
|
||||||
|
0x27, '`', 0x00, '\\', 'z', 'x', 'c', 'v', /* 0x28 - 0x2F */
|
||||||
|
'b', 'n', 'm', ',', '.', '/', 0x00, '*', /* 0x30 - 0x37 */
|
||||||
|
0x00, ' ', 0x00, 0x8A, 0x8B, 0x8C, 0x8D, 0x8E, /* 0x38 - 0x3F */
|
||||||
|
0x8F, 0x90, 0x91, 0x92, 0x93, 0x00, 0x00, 0x80, /* 0x40 - 0x47 */
|
||||||
|
0x86, 0x84, '-', 0x89, '5', 0x88, '+', 0x83, /* 0x48 - 0x4F */
|
||||||
|
0x87, 0x85, 0x81, 0x82, 0x96, 0x97, 0x98, 0x94, /* 0x50 - 0x57 */
|
||||||
|
0x95, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x58 - 0x5F */
|
||||||
|
0x00, 0x00, 0x81, 0x80, 0x84, 0x82, 0x83, 0x85, /* 0x60 - 0x67 */
|
||||||
|
0x86, 0x89, 0x87, 0x88, '/', 0x0D, 0x00, 0x00, /* 0x68 - 0x6F */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x70 - 0x77 */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x78 - 0x7F */
|
||||||
|
|
||||||
|
// Shifted
|
||||||
|
0x00, 0x1B, '!', '@', '#', '$', '%', '^', /* 0x00 - 0x07 */
|
||||||
|
'&', '*', '(', ')', '_', '+', 0x08, 0x09, /* 0x08 - 0x0F */
|
||||||
|
'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I', /* 0x10 - 0x17 */
|
||||||
|
'O', 'P', '{', '}', 0x0A, 0x00, 'A', 'S', /* 0x18 - 0x1F */
|
||||||
|
'D', 'F', 'G', 'H', 'J', 'K', 'L', ':', /* 0x20 - 0x27 */
|
||||||
|
0x22, '~', 0x00, '|', 'Z', 'X', 'C', 'V', /* 0x28 - 0x2F */
|
||||||
|
'B', 'N', 'M', '<', '>', '?', 0x00, 0x00, /* 0x30 - 0x37 */
|
||||||
|
0x00, ' ', 0x00, 0x8A, 0x8B, 0x8C, 0x8D, 0x8E, /* 0x38 - 0x3F */
|
||||||
|
0x8F, 0x90, 0x91, 0x92, 0x93, 0x00, 0x00, 0x80, /* 0x40 - 0x47 */
|
||||||
|
0x86, 0x84, '-', 0x89, '5', 0x88, '+', 0x83, /* 0x48 - 0x4F */
|
||||||
|
0x87, 0x85, 0x81, 0x82, 0x96, 0x97, 0x98, 0x94, /* 0x50 - 0x57 */
|
||||||
|
0x95, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x58 - 0x5F */
|
||||||
|
0x00, 0x00, 0x81, 0x80, 0x84, 0x82, 0x83, 0x85, /* 0x60 - 0x67 */
|
||||||
|
0x86, 0x89, 0x87, 0x88, '/', 0x0D, 0x00, 0x00, /* 0x68 - 0x6F */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x70 - 0x77 */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x78 - 0x7F */
|
||||||
|
|
||||||
|
// Control
|
||||||
|
0x00, 0x1B, '1', '2', '3', '4', '5', 0x1E, /* 0x00 - 0x07 */
|
||||||
|
'7', '8', '9', '0', 0x1F, '=', 0x08, 0x09, /* 0x08 - 0x0F */
|
||||||
|
0x11, 0x17, 0x05, 0x12, 0x14, 0x19, 0x15, 0x09, /* 0x10 - 0x17 */
|
||||||
|
0x0F, 0x10, 0x1B, 0x1D, 0x0A, 0x00, 0x01, 0x13, /* 0x18 - 0x1F */
|
||||||
|
0x04, 0x06, 0x07, 0x08, 0x0A, 0x0B, 0x0C, ';', /* 0x20 - 0x27 */
|
||||||
|
0x22, '`', 0x00, '\\', 0x1A, 0x18, 0x03, 0x16, /* 0x28 - 0x2F */
|
||||||
|
0x02, 0x0E, 0x0D, ',', '.', 0x1C, 0x00, 0x00, /* 0x30 - 0x37 */
|
||||||
|
0x00, ' ', 0x00, 0x8A, 0x8B, 0x8C, 0x8D, 0x8E, /* 0x38 - 0x3F */
|
||||||
|
0x8F, 0x90, 0x91, 0x92, 0x93, 0x00, 0x00, 0x80, /* 0x40 - 0x47 */
|
||||||
|
0x86, 0x84, '-', 0x89, '5', 0x88, '+', 0x83, /* 0x48 - 0x4F */
|
||||||
|
0x87, 0x85, 0x81, 0x82, 0x96, 0x97, 0x98, 0x94, /* 0x50 - 0x57 */
|
||||||
|
0x95, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x58 - 0x5F */
|
||||||
|
0x00, 0x00, 0x81, 0x80, 0x84, 0x82, 0x83, 0x85, /* 0x60 - 0x67 */
|
||||||
|
0x86, 0x89, 0x87, 0x88, '/', 0x0D, 0x00, 0x00, /* 0x68 - 0x6F */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x70 - 0x77 */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x78 - 0x7F */
|
||||||
|
|
||||||
|
|
||||||
|
// Control-Shift
|
||||||
|
0x00, 0x1B, '!', '@', '#', '$', '%', '^', /* 0x00 - 0x07 */
|
||||||
|
'&', '*', '(', ')', '_', '+', 0x08, 0x09, /* 0x08 - 0x0F */
|
||||||
|
0x11, 0x17, 0x05, 0x12, 0x14, 0x19, 0x15, 0x09, /* 0x10 - 0x17 */
|
||||||
|
0x0F, 0x10, 0x1B, 0x1D, 0x0A, 0x00, 0x01, 0x13, /* 0x18 - 0x1F */
|
||||||
|
0x04, 0x06, 0x07, 0x08, 0x0A, 0x0B, 0x0C, ';', /* 0x20 - 0x27 */
|
||||||
|
0x22, '`', 0x00, '\\', 0x1A, 0x18, 0x03, 0x16, /* 0x28 - 0x2F */
|
||||||
|
0x02, 0x0E, 0x0D, ',', '.', 0x1C, 0x00, 0x00, /* 0x30 - 0x37 */
|
||||||
|
0x00, ' ', 0x00, 0x8A, 0x8B, 0x8C, 0x8D, 0x8E, /* 0x38 - 0x3F */
|
||||||
|
0x8F, 0x90, 0x91, 0x92, 0x93, 0x00, 0x00, 0x80, /* 0x40 - 0x47 */
|
||||||
|
0x86, 0x84, '-', 0x89, '5', 0x88, '+', 0x83, /* 0x48 - 0x4F */
|
||||||
|
0x87, 0x85, 0x81, 0x82, 0x96, 0x97, 0x98, 0x94, /* 0x50 - 0x57 */
|
||||||
|
0x95, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x58 - 0x5F */
|
||||||
|
0x00, 0x00, 0x81, 0x80, 0x84, 0x82, 0x83, 0x85, /* 0x60 - 0x67 */
|
||||||
|
0x86, 0x89, 0x87, 0x88, '/', 0x0D, 0x00, 0x00, /* 0x68 - 0x6F */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x70 - 0x77 */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x78 - 0x7F */
|
||||||
|
|
||||||
|
// Capslock
|
||||||
|
0x00, 0x1B, '1', '2', '3', '4', '5', '6', /* 0x00 - 0x07 */
|
||||||
|
'7', '8', '9', '0', '-', '=', 0x08, 0x09, /* 0x08 - 0x0F */
|
||||||
|
'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I', /* 0x10 - 0x17 */
|
||||||
|
'O', 'P', '[', ']', 0x0D, 0x00, 'A', 'S', /* 0x18 - 0x1F */
|
||||||
|
'D', 'F', 'G', 'H', 'J', 'K', 'L', ';', /* 0x20 - 0x27 */
|
||||||
|
0x27, '`', 0x00, '\\', 'Z', 'X', 'C', 'V', /* 0x28 - 0x2F */
|
||||||
|
'B', 'N', 'M', ',', '.', '/', 0x00, 0x00, /* 0x30 - 0x37 */
|
||||||
|
0x00, ' ', 0x00, 0x8A, 0x8B, 0x8C, 0x8D, 0x8E, /* 0x38 - 0x3F */
|
||||||
|
0x8F, 0x90, 0x91, 0x92, 0x93, 0x00, 0x00, '7', /* 0x40 - 0x47 */
|
||||||
|
'8', '9', '-', '4', '5', '6', '+', '1', /* 0x48 - 0x4F */
|
||||||
|
'2', '3', '0', '.', 0x96, 0x97, 0x98, 0x94, /* 0x50 - 0x57 */
|
||||||
|
0x95, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x58 - 0x5F */
|
||||||
|
0x00, 0x00, 0x81, 0x80, 0x84, 0x82, 0x83, 0x85, /* 0x60 - 0x67 */
|
||||||
|
0x86, 0x89, 0x87, 0x88, '/', 0x0D, 0x00, 0x00, /* 0x68 - 0x6F */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x70 - 0x77 */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x78 - 0x7F */
|
||||||
|
|
||||||
|
// Caps-Shift
|
||||||
|
0x00, 0x1B, '!', '@', '#', '$', '%', '^', /* 0x00 - 0x07 */
|
||||||
|
'&', '*', '(', ')', '_', '+', 0x08, 0x09, /* 0x08 - 0x0F */
|
||||||
|
'q', 'w', 'e', 'r', 't', 'y', 'u', 'i', /* 0x10 - 0x17 */
|
||||||
|
'o', 'p', '{', '}', 0x0A, 0x00, 'a', 's', /* 0x18 - 0x1F */
|
||||||
|
'd', 'f', 'g', 'h', 'j', 'k', 'l', ':', /* 0x20 - 0x27 */
|
||||||
|
0x22, 0x00, 0x00, 0x00, 'z', 'x', 'c', 'v', /* 0x28 - 0x2F */
|
||||||
|
'b', 'n', 'm', '<', '>', '?', 0x00, 0x00, /* 0x30 - 0x37 */
|
||||||
|
0x00, ' ', 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x38 - 0x3F */
|
||||||
|
0x8F, 0x90, 0x91, 0x92, 0x93, 0x00, 0x00, '7', /* 0x40 - 0x47 */
|
||||||
|
'8', '9', '-', '4', '5', '6', '+', '1', /* 0x48 - 0x4F */
|
||||||
|
'2', '3', '0', '.', 0x96, 0x97, 0x98, 0x94, /* 0x50 - 0x57 */
|
||||||
|
0x95, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x58 - 0x5F */
|
||||||
|
0x00, 0x00, 0x81, 0x80, 0x84, 0x82, 0x83, 0x85, /* 0x60 - 0x67 */
|
||||||
|
0x86, 0x89, 0x87, 0x88, '/', 0x0D, 0x00, 0x00, /* 0x68 - 0x6F */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x70 - 0x77 */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x78 - 0x7F */
|
||||||
|
|
||||||
|
// ALT
|
||||||
|
0x00, 0x1B, '1', '2', '3', POUND, '5', '6', /* 0x00 - 0x07 */
|
||||||
|
'~', '`', '|', '\\', '-', '=', 0x08, 0x09, /* 0x08 - 0x0F */
|
||||||
|
'q', 'w', 'e', 'r', 't', 'y', 'u', 'i', /* 0x10 - 0x17 */
|
||||||
|
'o', 'p', '[', ']', 0x0D, 0x00, 'a', 's', /* 0x18 - 0x1F */
|
||||||
|
'd', 'f', 'g', 'h', 'j', 'k', 'l', ';', /* 0x20 - 0x27 */
|
||||||
|
0x27, 0x00, 0x00, 0x00, 'z', 'x', 'c', 'v', /* 0x28 - 0x2F */
|
||||||
|
'b', 'n', 'm', ',', '.', '/', 0x00, '*', /* 0x30 - 0x37 */
|
||||||
|
0x00, ' ', 0x00, 0x8A, 0x8B, 0x8C, 0x8D, 0x8E, /* 0x38 - 0x3F */
|
||||||
|
0x8F, 0x90, 0x91, 0x92, 0x93, 0x00, 0x00, 0x80, /* 0x40 - 0x47 */
|
||||||
|
0x86, 0x84, '-', 0x89, '5', 0x88, '+', 0x83, /* 0x48 - 0x4F */
|
||||||
|
0x87, 0x85, 0x81, 0x82, 0x96, 0x97, 0x98, 0x94, /* 0x50 - 0x57 */
|
||||||
|
0x95, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x58 - 0x5F */
|
||||||
|
0x00, 0x00, 0x81, 0x80, 0x84, 0x82, 0x83, 0x85, /* 0x60 - 0x67 */
|
||||||
|
0x86, 0x89, 0x87, 0x88, '/', 0x0D, 0x00, 0x00, /* 0x68 - 0x6F */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x70 - 0x77 */
|
||||||
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x78 - 0x7F */
|
||||||
|
};
|
||||||
|
|
||||||
//
|
//
|
||||||
// Driver variables
|
// Driver variables
|
||||||
//
|
//
|
||||||
|
|
@ -73,8 +249,20 @@ static const uint8_t kbd_scan_codes[KBD_ROWS][KBD_COLUMNS] = {
|
||||||
static uint16_t kbd_stat[KBD_MATRIX_SIZE];
|
static uint16_t kbd_stat[KBD_MATRIX_SIZE];
|
||||||
static short counter = 0;
|
static short counter = 0;
|
||||||
static uint8_t last_press = 0;
|
static uint8_t last_press = 0;
|
||||||
static t_word_ring scan_code_buffer;
|
static t_word_ring scan_code_buffer;
|
||||||
static uint8_t modifiers;
|
static t_word_ring char_buffer;
|
||||||
|
static uint8_t modifiers = 0;
|
||||||
|
static bool break_pressed = 0;
|
||||||
|
|
||||||
|
/* Scan code to character lookup tables */
|
||||||
|
|
||||||
|
static char keys_unmodified[128];
|
||||||
|
static char keys_shift[128];
|
||||||
|
static char keys_control[128];
|
||||||
|
static char keys_control_shift[128];
|
||||||
|
static char keys_caps[128];
|
||||||
|
static char keys_caps_shift[128];
|
||||||
|
static char keys_alt[128];
|
||||||
|
|
||||||
/**
|
/**
|
||||||
* @brief Get the keys selected in a given row
|
* @brief Get the keys selected in a given row
|
||||||
|
|
@ -177,6 +365,12 @@ static void kbd_process_key(short column, short row, bool is_pressed) {
|
||||||
last_press = scan_code;
|
last_press = scan_code;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// Set the break flag if the RUN/STOP or CTRL-C key was pressed
|
||||||
|
if ((scan_code == KEY_BREAK) ||
|
||||||
|
((scan_code == KEY_C) && ((modifiers & KBD_MOD_CTRL) != 0))) {
|
||||||
|
break_pressed = true;
|
||||||
|
}
|
||||||
|
|
||||||
if (!rb_word_full(&scan_code_buffer)) {
|
if (!rb_word_full(&scan_code_buffer)) {
|
||||||
rb_word_put(&scan_code_buffer, (modifiers << 8) | scan_code);
|
rb_word_put(&scan_code_buffer, (modifiers << 8) | scan_code);
|
||||||
}
|
}
|
||||||
|
|
@ -224,6 +418,204 @@ void kbd_handle_irq() {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Catch special keys and convert them to their ANSI terminal codes
|
||||||
|
*
|
||||||
|
* Characters 0x80 - 0x98 are reserved for function keys, arrow keys, etc.
|
||||||
|
* This function maps them to the ANSI escape codes
|
||||||
|
*
|
||||||
|
* Inputs:
|
||||||
|
* modifiers = the current modifier bit flags (ALT, CTRL, META, etc)
|
||||||
|
* c = the character found from the scan code.
|
||||||
|
*/
|
||||||
|
static unsigned char kbd_to_ansi(unsigned char modifiers, unsigned char c) {
|
||||||
|
if ((c >= 0x80) && (c <= 0x98)) {
|
||||||
|
/* The key is a function key or a special control key */
|
||||||
|
const char * ansi_key = ansi_keys[c - 0x80];
|
||||||
|
const char * sequence;
|
||||||
|
short modifiers_after = 0;
|
||||||
|
|
||||||
|
// Figure out if the modifiers come before or after the sequence code
|
||||||
|
if (isdigit(ansi_key[0])) {
|
||||||
|
// Sequence is numeric, modifiers come after
|
||||||
|
modifiers_after = 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
// After ESC, all sequences have [
|
||||||
|
rb_word_put(&char_buffer, '[');
|
||||||
|
|
||||||
|
if (modifiers_after) {
|
||||||
|
// Sequence is numberic, get the expanded sequence and put it in the queue
|
||||||
|
for (sequence = ansi_keys[c - 0x80]; *sequence != 0; sequence++) {
|
||||||
|
rb_word_put(&char_buffer, *sequence);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// Check to see if we need to send a modifier sequence
|
||||||
|
if (modifiers & (KBD_MOD_SHIFT | KBD_MOD_CTRL | KBD_MOD_ALT | KBD_MOD_OS)) {
|
||||||
|
unsigned char code_bcd;
|
||||||
|
short modifier_code = 0;
|
||||||
|
short i;
|
||||||
|
|
||||||
|
if (modifiers_after) {
|
||||||
|
// Sequence is numeric, so put modifiers after the sequence and a semicolon
|
||||||
|
rb_word_put(&char_buffer, ';');
|
||||||
|
}
|
||||||
|
|
||||||
|
modifier_code = ((modifiers >> 3) & 0x1F) + 1;
|
||||||
|
code_bcd = i_to_bcd(modifier_code);
|
||||||
|
|
||||||
|
if (code_bcd & 0xF0) {
|
||||||
|
rb_word_put(&char_buffer, ((code_bcd & 0xF0) >> 4) + '0');
|
||||||
|
}
|
||||||
|
rb_word_put(&char_buffer, (code_bcd & 0x0F) + '0');
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!modifiers_after) {
|
||||||
|
// Sequence is a letter code
|
||||||
|
rb_word_put(&char_buffer, ansi_key[0]);
|
||||||
|
} else {
|
||||||
|
// Sequence is numeric, close it with a tilda
|
||||||
|
rb_word_put(&char_buffer, '~');
|
||||||
|
}
|
||||||
|
|
||||||
|
return 0x1B; /* Start the sequence with an escape */
|
||||||
|
|
||||||
|
} else if (c == 0x1B) {
|
||||||
|
/* ESC should be doubled, to distinguish from the start of an escape sequence */
|
||||||
|
rb_word_put(&char_buffer, 0x1B);
|
||||||
|
return c;
|
||||||
|
|
||||||
|
} else {
|
||||||
|
/* Not a special key: return the character unmodified */
|
||||||
|
|
||||||
|
return c;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Try to get a character from the keyboard...
|
||||||
|
*
|
||||||
|
* Returns:
|
||||||
|
* the next character to be read from the keyboard (0 if none available)
|
||||||
|
*/
|
||||||
|
char kbd_getc() {
|
||||||
|
if (!rb_word_empty(&char_buffer)) {
|
||||||
|
// If there is a character waiting in the character buffer, return it...
|
||||||
|
return (char)rb_word_get(&char_buffer);
|
||||||
|
|
||||||
|
} else {
|
||||||
|
// Otherwise, we need to check the scan code queue...
|
||||||
|
unsigned short raw_code = kbd_get_scancode();
|
||||||
|
while (raw_code != 0) {
|
||||||
|
if ((raw_code & 0x80) == 0) {
|
||||||
|
// If it's a make code, let's try to look it up...
|
||||||
|
unsigned char modifiers = (raw_code >> 8) & 0xff; // Get the modifiers
|
||||||
|
unsigned char scan_code = raw_code & 0x7f; // Get the base code for the key
|
||||||
|
|
||||||
|
// Check the modifiers to see what we should lookup...
|
||||||
|
|
||||||
|
if ((modifiers & (KBD_MOD_ALT | KBD_MOD_SHIFT | KBD_MOD_CTRL | KBD_LOCK_CAPS)) == 0) {
|
||||||
|
// No modifiers... just return the base character
|
||||||
|
return kbd_to_ansi(modifiers, keys_unmodified[scan_code]);
|
||||||
|
|
||||||
|
} else if (modifiers & KBD_MOD_ALT) {
|
||||||
|
return kbd_to_ansi(modifiers, keys_alt[scan_code]);
|
||||||
|
|
||||||
|
} else if (modifiers & KBD_MOD_CTRL) {
|
||||||
|
// If CTRL is pressed...
|
||||||
|
if (modifiers & KBD_MOD_SHIFT) {
|
||||||
|
// If SHIFT is also pressed, return CTRL-SHIFT form
|
||||||
|
return kbd_to_ansi(modifiers, keys_control_shift[scan_code]);
|
||||||
|
|
||||||
|
} else {
|
||||||
|
// Otherwise, return just CTRL form
|
||||||
|
return kbd_to_ansi(modifiers, keys_control[scan_code]);
|
||||||
|
}
|
||||||
|
|
||||||
|
} else if (modifiers & KBD_LOCK_CAPS) {
|
||||||
|
// If CAPS is locked...
|
||||||
|
if (modifiers & KBD_MOD_SHIFT) {
|
||||||
|
// If SHIFT is also pressed, return CAPS-SHIFT form
|
||||||
|
return kbd_to_ansi(modifiers, keys_caps_shift[scan_code]);
|
||||||
|
|
||||||
|
} else {
|
||||||
|
// Otherwise, return just CAPS form
|
||||||
|
return kbd_to_ansi(modifiers, keys_caps[scan_code]);
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
// SHIFT is pressed, return SHIFT form
|
||||||
|
return kbd_to_ansi(modifiers, keys_shift[scan_code]);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// If we reach this point, it wasn't a useful scan-code...
|
||||||
|
// So try to fetch another
|
||||||
|
raw_code = kbd_get_scancode();
|
||||||
|
}
|
||||||
|
|
||||||
|
// If we reach this point, there are no useful scan codes
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Check to see if a BREAK code has been pressed recently
|
||||||
|
* If so, return true and reset the internal flag.
|
||||||
|
*
|
||||||
|
* BREAK will be RUN/STOP or CTRL-C on the F256K
|
||||||
|
*
|
||||||
|
* Returns:
|
||||||
|
* true if a BREAK has been pressed since the last check
|
||||||
|
*/
|
||||||
|
bool kbd_break() {
|
||||||
|
bool result = break_pressed;
|
||||||
|
break_pressed = 0;
|
||||||
|
return result;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Set the keyboard translation tables
|
||||||
|
*
|
||||||
|
* The translation tables provided to the keyboard consist of eight
|
||||||
|
* consecutive tables of 128 characters each. Each table maps from
|
||||||
|
* the MAKE scan code of a key to its appropriate 8-bit character code.
|
||||||
|
*
|
||||||
|
* The tables included must include, in order:
|
||||||
|
* - UNMODIFIED: Used when no modifier keys are pressed or active
|
||||||
|
* - SHIFT: Used when the SHIFT modifier is pressed
|
||||||
|
* - CTRL: Used when the CTRL modifier is pressed
|
||||||
|
* - CTRL-SHIFT: Used when both CTRL and SHIFT are pressed
|
||||||
|
* - CAPSLOCK: Used when CAPSLOCK is down but SHIFT is not pressed
|
||||||
|
* - CAPSLOCK-SHIFT: Used when CAPSLOCK is down and SHIFT is pressed
|
||||||
|
* - ALT: Used when only ALT is presse
|
||||||
|
* - ALT-SHIFT: Used when ALT is pressed and either CAPSLOCK is down
|
||||||
|
* or SHIFT is pressed (but not both)
|
||||||
|
*
|
||||||
|
* Inputs:
|
||||||
|
* tables = pointer to the keyboard translation tables
|
||||||
|
*/
|
||||||
|
short SYSTEMCALL kbd_layout(const char * tables) {
|
||||||
|
short i;
|
||||||
|
|
||||||
|
for (i = 0; i < 128; i++) {
|
||||||
|
keys_unmodified[i] = tables[i];
|
||||||
|
keys_shift[i] = tables[i + 128];
|
||||||
|
keys_control[i] = tables[i + 256];
|
||||||
|
// if (keys_control[i] == 0x03) {
|
||||||
|
// // We have set the scan code for CTRL-C?
|
||||||
|
// g_kbdmo_break_sc = i;
|
||||||
|
// }
|
||||||
|
// Check for CTRL-C
|
||||||
|
keys_control_shift[i] = tables[i + 384];
|
||||||
|
keys_caps[i] = tables[i + 512];
|
||||||
|
keys_caps_shift[i] = tables[i + 640];
|
||||||
|
keys_alt[i] = tables[i + 768];
|
||||||
|
}
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Initialize the matrix keyboard
|
* Initialize the matrix keyboard
|
||||||
*
|
*
|
||||||
|
|
@ -255,5 +647,8 @@ short kbd_init() {
|
||||||
// Set up and clear out the buffer for the scan codes
|
// Set up and clear out the buffer for the scan codes
|
||||||
rb_word_init(&scan_code_buffer);
|
rb_word_init(&scan_code_buffer);
|
||||||
|
|
||||||
|
// Set up the layout of the F256k keyboard
|
||||||
|
kbd_layout(kbd_256k_layout);
|
||||||
|
|
||||||
return 1;
|
return 1;
|
||||||
}
|
}
|
||||||
|
|
|
||||||
|
|
@ -12,6 +12,9 @@
|
||||||
#ifndef __kbd_f256k_h__
|
#ifndef __kbd_f256k_h__
|
||||||
#define __kbd_f256k_h__
|
#define __kbd_f256k_h__
|
||||||
|
|
||||||
|
#include <stdbool.h>
|
||||||
|
#include "sys_macros.h"
|
||||||
|
|
||||||
/**
|
/**
|
||||||
* @brief Handle an IRQ to query the keyboard
|
* @brief Handle an IRQ to query the keyboard
|
||||||
*
|
*
|
||||||
|
|
@ -26,6 +29,48 @@ extern void kbd_handle_irq();
|
||||||
*/
|
*/
|
||||||
extern unsigned short kbd_get_scancode();
|
extern unsigned short kbd_get_scancode();
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Check to see if a BREAK code has been pressed recently
|
||||||
|
* If so, return true and reset the internal flag.
|
||||||
|
*
|
||||||
|
* BREAK will be RUN/STOP or CTRL-C on the F256K
|
||||||
|
*
|
||||||
|
* Returns:
|
||||||
|
* true if a BREAK has been pressed since the last check
|
||||||
|
*/
|
||||||
|
extern bool kbd_break();
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Try to get a character from the keyboard...
|
||||||
|
*
|
||||||
|
* Returns:
|
||||||
|
* the next character to be read from the keyboard (0 if none available)
|
||||||
|
*/
|
||||||
|
extern char kbd_getc();
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Set the keyboard translation tables
|
||||||
|
*
|
||||||
|
* The translation tables provided to the keyboard consist of eight
|
||||||
|
* consecutive tables of 128 characters each. Each table maps from
|
||||||
|
* the MAKE scan code of a key to its appropriate 8-bit character code.
|
||||||
|
*
|
||||||
|
* The tables included must include, in order:
|
||||||
|
* - UNMODIFIED: Used when no modifier keys are pressed or active
|
||||||
|
* - SHIFT: Used when the SHIFT modifier is pressed
|
||||||
|
* - CTRL: Used when the CTRL modifier is pressed
|
||||||
|
* - CTRL-SHIFT: Used when both CTRL and SHIFT are pressed
|
||||||
|
* - CAPSLOCK: Used when CAPSLOCK is down but SHIFT is not pressed
|
||||||
|
* - CAPSLOCK-SHIFT: Used when CAPSLOCK is down and SHIFT is pressed
|
||||||
|
* - ALT: Used when only ALT is presse
|
||||||
|
* - ALT-SHIFT: Used when ALT is pressed and either CAPSLOCK is down
|
||||||
|
* or SHIFT is pressed (but not both)
|
||||||
|
*
|
||||||
|
* Inputs:
|
||||||
|
* tables = pointer to the keyboard translation tables
|
||||||
|
*/
|
||||||
|
extern SYSTEMCALL short kbd_layout(const char * tables);
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Initialize the matrix keyboard
|
* Initialize the matrix keyboard
|
||||||
*
|
*
|
||||||
|
|
|
||||||
|
|
@ -184,15 +184,16 @@ void initialize() {
|
||||||
INFO("Real time clock initialized");
|
INFO("Real time clock initialized");
|
||||||
|
|
||||||
t_time time;
|
t_time time;
|
||||||
time.year = 2024;
|
// time.year = 2024;
|
||||||
time.month = 6;
|
// time.month = 7;
|
||||||
time.day = 24;
|
// time.day = 3;
|
||||||
time.hour = 22;
|
// time.hour = 16;
|
||||||
time.minute = 0;
|
// time.minute = 05;
|
||||||
time.second = 0;
|
// time.second = 0;
|
||||||
rtc_set_time(&time);
|
// rtc_set_time(&time);
|
||||||
|
|
||||||
rtc_get_time(&time);
|
rtc_get_time(&time);
|
||||||
|
printf("%04d-%02d-%02d %02d:%02d\n", time.year, time.month, time.day, time.hour, time.minute);
|
||||||
INFO3("%04d-%02d-%02d", time.year, time.month, time.day);
|
INFO3("%04d-%02d-%02d", time.year, time.month, time.day);
|
||||||
|
|
||||||
// target_jiffies = sys_time_jiffies() + 300; /* 5 seconds minimum */
|
// target_jiffies = sys_time_jiffies() + 300; /* 5 seconds minimum */
|
||||||
|
|
@ -259,11 +260,11 @@ void initialize() {
|
||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
// // if (res = uart_install()) {
|
// if (res = uart_install()) {
|
||||||
// // log_num(LOG_ERROR, "FAILED: serial port initialization", res);
|
// log_num(LOG_ERROR, "FAILED: serial port initialization", res);
|
||||||
// // } else {
|
// } else {
|
||||||
// // log(LOG_INFO, "Serial ports initialized.");
|
// log(LOG_INFO, "Serial ports initialized.");
|
||||||
// // }
|
// }
|
||||||
|
|
||||||
// if ((res = fsys_init())) {
|
// if ((res = fsys_init())) {
|
||||||
// log_num(LOG_ERROR, "FAILED: file system initialization", res);
|
// log_num(LOG_ERROR, "FAILED: file system initialization", res);
|
||||||
|
|
@ -285,15 +286,21 @@ int main(int argc, char * argv[]) {
|
||||||
|
|
||||||
initialize();
|
initialize();
|
||||||
|
|
||||||
|
printf("Hello, world!\n");
|
||||||
|
printf("This is a test.\n");
|
||||||
|
|
||||||
kbd_init();
|
kbd_init();
|
||||||
while (1) {
|
printf("\n> ");
|
||||||
|
while (!kbd_break()) {
|
||||||
kbd_handle_irq();
|
kbd_handle_irq();
|
||||||
unsigned short scan_code = kbd_get_scancode();
|
char c = kbd_getc();
|
||||||
if (scan_code != 0) {
|
if (c != 0) {
|
||||||
INFO1("0x%04X ", scan_code);
|
txt_put(0, c);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
printf("\nDone.\n");
|
||||||
|
|
||||||
// Attempt to start up the user code
|
// Attempt to start up the user code
|
||||||
// log(LOG_INFO, "Looking for user startup code:");
|
// log(LOG_INFO, "Looking for user startup code:");
|
||||||
// boot_launch();
|
// boot_launch();
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue