mirror of
https://github.com/vivier/EMILE.git
synced 2024-12-22 10:29:31 +00:00
373 lines
9.4 KiB
C
373 lines
9.4 KiB
C
/*
|
|
*
|
|
* (c) 2005 Laurent Vivier <Laurent@lvivier.info>
|
|
*
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <sys/types.h>
|
|
|
|
#include <macos/lowmem.h>
|
|
#include <macos/events.h>
|
|
|
|
#include "misc.h"
|
|
#include "keyboard.h"
|
|
#include "vga.h"
|
|
|
|
#define test_bit(n,m) (((char*)(m))[(n) / 8] & (1L << (n % 8)))
|
|
|
|
typedef struct keyboard_map {
|
|
char character;
|
|
char shift;
|
|
char control;
|
|
} keyboard_map_t;
|
|
|
|
static keyboard_map_t symbols[scancode_Last] = {
|
|
{ 'a', 'A', 0x01 }, /* 00 scancode_A */
|
|
{ 's', 'S', 0x13 }, /* 01 scancode_S */
|
|
{ 'd', 'D', 0x04 }, /* 02 scancode_D */
|
|
{ 'f', 'F', 0x06 }, /* 03 scancode_F */
|
|
{ 'h', 'H', 0x08 }, /* 04 scancode_H */
|
|
{ 'g', 'G', 0x07 }, /* 05 scancode_G */
|
|
{ 'z', 'Z', 0x1a }, /* 06 scancode_Z */
|
|
{ 'x', 'X', 0x18 }, /* 07 scancode_X */
|
|
{ 'c', 'C', 0x03 }, /* 08 scancode_C */
|
|
{ 'v', 'V', 0x16 }, /* 09 scancode_V */
|
|
{ 0, 0, 0 }, /* 0a ? */
|
|
{ 'b', 'B', 0x02 }, /* 0b scancode_B */
|
|
{ 'q', 'Q', 0x11 }, /* 0c scancode_Q */
|
|
{ 'w', 'W', 0x17 }, /* 0d scancode_W */
|
|
{ 'e', 'E', 0x05 }, /* 0e scancode_E */
|
|
{ 'r', 'R', 0x12 }, /* 0f scancode_R */
|
|
{ 'y', 'Y', 0x19 }, /* 10 scancode_Y */
|
|
{ 't', 'T', 0x14 }, /* 11 scancode_T */
|
|
{ '1', '!', 0 }, /* 12 scancode_1 */
|
|
{ '2', '@', 0 }, /* 13 scancode_2 */
|
|
{ '3', '#', 0 }, /* 14 scancode_3 */
|
|
{ '4', '$', 0 }, /* 15 scancode_4 */
|
|
{ '6', '^', 0x1e }, /* 16 scancode_6 */
|
|
{ '5', '%', 0 }, /* 17 scancode_5 */
|
|
{ '=', '=', 0 }, /* 18 scancode_Equals */
|
|
{ '9', '(', 0 }, /* 19 scancode_9 */
|
|
{ '7', '&', 0 }, /* 1a scancode_7 */
|
|
{ '-', '_', 0x1f }, /* 1b scancode_Minus */
|
|
{ '8', '*', 0 }, /* 1c scancode_8 */
|
|
{ '0', ')', 0 }, /* 1d scancode_0 */
|
|
{ ']', '}', 0x1d }, /* 1e scancode_CloseBrace */
|
|
{ 'o', 'O', 0x0f }, /* 1f scancode_O */
|
|
{ 'u', 'U', 0x15 }, /* 20 scancode_U */
|
|
{ '[', '{', 0x1b }, /* 21 scancode_OpenBrace */
|
|
{ 'i', 'I', 0x09 }, /* 22 scancode_I */
|
|
{ 'p', 'P', 0x10 }, /* 23 scancode_P */
|
|
{ '\r', '\r', 0 }, /* 24 scancode_Return */
|
|
{ 'l', 'L', 0x0c }, /* 25 scancode_L */
|
|
{ 'j', 'J', 0x0a }, /* 26 scancode_J */
|
|
{ '\'', '"', 0 }, /* 27 scancode_Quote */
|
|
{ 'k', 'K', 0x0b }, /* 28 scancode_K */
|
|
{ ';', ':', 0 }, /* 29 scancode_Colon */
|
|
{ '\\', '|', 0x1c }, /* 2a scancode_Backslash */
|
|
{ ',', '<', 0 }, /* 2b scancode_Comma */
|
|
{ '/', '?', 0 }, /* 2c scancode_Comma */
|
|
{ 'n', 'N', 0x0e }, /* 2d scancode_N */
|
|
{ 'm', 'M', 0x0d }, /* 2e scancode_M */
|
|
{ 0, 0, 0 }, /* 2f scancode_Stop */
|
|
{ '\t', '\t', 0 }, /* 30 scancode_Tab */
|
|
{ ' ', ' ', 0 }, /* 31 scancode_Space */
|
|
{ '`', '~', 0 }, /* 32 scancode_Tilde */
|
|
{ '\b', '\b', 0 }, /* 33 scancode_Backspace */
|
|
{ 0, 0, 0 }, /* 34 ? */
|
|
{ 0x1b, 0, 0 }, /* 35 scancode_Escape */
|
|
{ 0, 0, 0 }, /* 36 ? */
|
|
{ 0, 0, 0 }, /* 37 scancode_Command */
|
|
{ 0, 0, 0 }, /* 38 scancode_LeftShift */
|
|
{ 0, 0, 0 }, /* 39 scancode_CapsLock */
|
|
{ 0, 0, 0 }, /* 3a scancode_LeftOption */
|
|
{ 0, 0, 0 }, /* 3b scancode_LeftControl */
|
|
{ 0, 0, 0 }, /* 3c scancode_RightShift */
|
|
{ 0, 0, 0 }, /* 3d scancode_RightOption */
|
|
{ 0, 0, 0 }, /* 3e scancode_RightControl */
|
|
{ 0, 0, 0 }, /* 3f ? */
|
|
{ 0, 0, 0 }, /* 40 ? */
|
|
{ 0, 0, 0 }, /* 41 scancode_KeypadStop */
|
|
{ 0, 0, 0 }, /* 42 ? */
|
|
{ '*', '*', 0 }, /* 43 scancode_KeypadAsterisk */
|
|
{ 0, 0, 0 }, /* 44 ? */
|
|
{ '+', '+', 0 }, /* 45 scancode_KeypadPlus */
|
|
{ 0, 0, 0 }, /* 46 ? */
|
|
{ 0, 0, 0 }, /* 47 scancode_NumLock */
|
|
{ 0, 0, 0 }, /* 48 ? */
|
|
{ 0, 0, 0 }, /* 49 ? */
|
|
{ 0, 0, 0 }, /* 4a ? */
|
|
{ '/', '/', 0 }, /* 4b scancode_KeypadSlash */
|
|
{ '\r', '\r', 0 }, /* 4c scancode_KeypadEnter */
|
|
{ 0, 0, 0 }, /* 4d ? */
|
|
{ '-', '-', 0 }, /* 4e scancode_KeypadSlash */
|
|
{ 0, 0, 0 }, /* 4f ? */
|
|
{ 0, 0, 0 }, /* 50 ? */
|
|
{ '=', '=', 0 }, /* 51 scancode_KeypadEquals */
|
|
{ '0', '0', 0 }, /* 52 scancode_Keypad0 */
|
|
{ '1', '1', 0 }, /* 53 scancode_Keypad1 */
|
|
{ '2', '2', 0 }, /* 54 scancode_Keypad2 */
|
|
{ '3', '3', 0 }, /* 55 scancode_Keypad3 */
|
|
{ '4', '4', 0 }, /* 56 scancode_Keypad4 */
|
|
{ '5', '5', 0 }, /* 57 scancode_Keypad5 */
|
|
{ '6', '6', 0 }, /* 58 scancode_Keypad6 */
|
|
{ '7', '7', 0 }, /* 59 scancode_Keypad7 */
|
|
{ 0, 0, 0 }, /* 5a ? */
|
|
{ '8', '8', 0 }, /* 5b scancode_Keypad8 */
|
|
{ '9', '9', 0 }, /* 5c scancode_Keypad9 */
|
|
{ 0, 0, 0 }, /* 5d ? */
|
|
{ 0, 0, 0 }, /* 5e ? */
|
|
{ 0, 0, 0 }, /* 5f ? */
|
|
{ 0x1b, 0, 0 }, /* 60 scancode_F5 */
|
|
{ 0x1b, 0, 0 }, /* 61 scancode_F6 */
|
|
{ 0x1b, 0, 0 }, /* 62 scancode_F7 */
|
|
{ 0x1b, 0, 0 }, /* 63 scancode_F3 */
|
|
{ 0x1b, 0, 0 }, /* 64 scancode_F8 */
|
|
{ 0x1b, 0, 0 }, /* 65 scancode_F9 */
|
|
{ 0, 0, 0 }, /* 66 ? */
|
|
{ 0x1b, 0, 0 }, /* 67 scancode_F11 */
|
|
{ 0, 0, 0 }, /* 68 ? */
|
|
{ 0, 0, 0 }, /* 69 scancode_PrintScreen */
|
|
{ 0, 0, 0 }, /* 6a ? */
|
|
{ 0, 0, 0 }, /* 6b scancode_ScreenLock */
|
|
{ 0, 0, 0 }, /* 6c ? */
|
|
{ 0x1b, 0, 0 }, /* 6d scancode_F10 */
|
|
{ 0, 0, 0 }, /* 6e ? */
|
|
{ 0x1b, 0, 0 }, /* 6f scancode_F12 */
|
|
{ 0, 0, 0 }, /* 70 ? */
|
|
{ 0, 0, 0 }, /* 71 scancode_Pause */
|
|
{ 0x1b, 0, 0 }, /* 72 scancode_Insert */
|
|
{ 0x1b, 0, 0 }, /* 73 scancode_Home */
|
|
{ 0x1b, 0, 0 }, /* 74 scancode_PageUp */
|
|
{ 0x1b, 0, 0 }, /* 75 scancode_Del */
|
|
{ 0x1b, 0, 0 }, /* 76 scancode_F4 */
|
|
{ 0x1b, 0, 0 }, /* 77 scancode_End */
|
|
{ 0x1b, 0, 0 }, /* 78 scancode_F2 */
|
|
{ 0x1b, 0, 0 }, /* 79 scancode_PageDown */
|
|
{ 0x1b, 0, 0 }, /* 7a scancode_F1 */
|
|
{ 0x1b, 0, 0 }, /* 7b scancode_Left */
|
|
{ 0x1b, 0, 0 }, /* 7c scancode_Right */
|
|
{ 0x1b, 0, 0 }, /* 7d scancode_Down */
|
|
{ 0x1b, 0, 0 }, /* 7e scancode_Up */
|
|
{ 0, 0, 0 }, /* 7f ? */
|
|
};
|
|
|
|
#define BUFFER_SIZE 64
|
|
static int head = 0;
|
|
static int length = 0;
|
|
static char buffer[BUFFER_SIZE];
|
|
|
|
static inline void buffer_put(char c)
|
|
{
|
|
buffer[(head + length) % BUFFER_SIZE] = c;
|
|
length++;
|
|
}
|
|
|
|
static inline int buffer_get(void)
|
|
{
|
|
int c;
|
|
|
|
if (length == 0)
|
|
return 0;
|
|
|
|
c = buffer[head];
|
|
head = (head + 1) % BUFFER_SIZE;
|
|
length--;
|
|
|
|
return c;
|
|
}
|
|
|
|
static inline void buffer_putstring(char *s)
|
|
{
|
|
if (!s)
|
|
return;
|
|
|
|
while(*s)
|
|
buffer_put(*s++);
|
|
}
|
|
|
|
void keyboard_get_scancode(int *modifiers, int *code)
|
|
{
|
|
KeyMap keyboard= {0,0,0,0};
|
|
int scancode;
|
|
|
|
GetKeys(keyboard);
|
|
|
|
/* modifier keys */
|
|
|
|
*modifiers = 0;
|
|
if (test_bit(scancode_Command, keyboard))
|
|
*modifiers |= modifier_command;
|
|
if (test_bit(scancode_LeftShift, keyboard) ||
|
|
test_bit(scancode_RightShift, keyboard))
|
|
*modifiers |= modifier_shift;
|
|
if (test_bit(scancode_CapsLock, keyboard))
|
|
*modifiers |= modifier_capslock;
|
|
if (test_bit(scancode_LeftOption, keyboard) ||
|
|
test_bit(scancode_RightOption, keyboard))
|
|
*modifiers |= modifier_option;
|
|
if (test_bit(scancode_LeftControl, keyboard) ||
|
|
test_bit(scancode_RightControl, keyboard))
|
|
*modifiers |= modifier_control;
|
|
|
|
/* other keys */
|
|
|
|
for (scancode = 0; scancode < scancode_Last; scancode++)
|
|
{
|
|
/* modifiers */
|
|
|
|
if ( (scancode == scancode_Command) ||
|
|
(scancode == scancode_LeftShift) ||
|
|
(scancode == scancode_RightShift) ||
|
|
(scancode == scancode_CapsLock) ||
|
|
(scancode == scancode_LeftOption) ||
|
|
(scancode == scancode_RightOption) ||
|
|
(scancode == scancode_LeftControl) ||
|
|
(scancode == scancode_RightControl) )
|
|
continue;
|
|
|
|
/* other keys */
|
|
|
|
if (test_bit(scancode, keyboard))
|
|
break;
|
|
}
|
|
*code = scancode;
|
|
}
|
|
|
|
int keyboard_convert_scancode(int modifiers, int scancode)
|
|
{
|
|
int c;
|
|
|
|
if ((modifiers & modifier_shift) ||
|
|
(modifiers & modifier_capslock))
|
|
{
|
|
c = symbols[scancode].shift;
|
|
} else if (modifiers & modifier_control)
|
|
{
|
|
c = symbols[scancode].control;
|
|
} else
|
|
{
|
|
c = symbols[scancode].character;
|
|
}
|
|
|
|
return c;
|
|
}
|
|
|
|
static int keyboard_catch()
|
|
{
|
|
static long last_KeyTime = -1;
|
|
long current_keytime = KeyTime;
|
|
int modifiers, scancode;
|
|
int c;
|
|
|
|
keyboard_get_scancode(&modifiers, &scancode);
|
|
|
|
if (current_keytime != last_KeyTime)
|
|
{
|
|
last_KeyTime = current_keytime;
|
|
|
|
c = keyboard_convert_scancode(modifiers, scancode);
|
|
|
|
if (c == 0x1b)
|
|
{
|
|
buffer_put(0x1b);
|
|
switch(scancode)
|
|
{
|
|
case scancode_F5:
|
|
buffer_putstring("[15~");
|
|
break;
|
|
case scancode_F6:
|
|
buffer_putstring("[17~");
|
|
break;
|
|
case scancode_F7:
|
|
buffer_putstring("[18~");
|
|
break;
|
|
case scancode_F3:
|
|
buffer_putstring("OR");
|
|
break;
|
|
case scancode_F8:
|
|
buffer_putstring("[19~");
|
|
break;
|
|
case scancode_F9:
|
|
buffer_putstring("[20~");
|
|
break;
|
|
case scancode_F11:
|
|
buffer_putstring("[23~");
|
|
break;
|
|
case scancode_F10:
|
|
buffer_putstring("[21~");
|
|
break;
|
|
case scancode_F12:
|
|
buffer_putstring("[24~");
|
|
break;
|
|
case scancode_Insert:
|
|
buffer_putstring("[2~");
|
|
break;
|
|
case scancode_Home:
|
|
buffer_putstring("[1~");
|
|
break;
|
|
case scancode_PageUp:
|
|
buffer_putstring("[5~");
|
|
break;
|
|
case scancode_Del:
|
|
buffer_putstring("[3~");
|
|
break;
|
|
case scancode_F4:
|
|
buffer_putstring("OS");
|
|
break;
|
|
case scancode_End:
|
|
buffer_putstring("[4~");
|
|
break;
|
|
case scancode_F2:
|
|
buffer_putstring("OQ");
|
|
break;
|
|
case scancode_PageDown:
|
|
buffer_putstring("[6~");
|
|
break;
|
|
case scancode_F1:
|
|
buffer_putstring("OP");
|
|
break;
|
|
case scancode_Left:
|
|
buffer_putstring("[D");
|
|
break;
|
|
case scancode_Right:
|
|
buffer_putstring("[C");
|
|
break;
|
|
case scancode_Down:
|
|
buffer_putstring("[B");
|
|
break;
|
|
case scancode_Up:
|
|
buffer_putstring("[A");
|
|
break;
|
|
}
|
|
}
|
|
else if (c != 0)
|
|
buffer_put(c);
|
|
}
|
|
|
|
vga_cursor_refresh();
|
|
|
|
if (modifiers || (scancode < scancode_Last - 1))
|
|
return 1;
|
|
|
|
return 0;
|
|
}
|
|
|
|
int keyboard_keypressed()
|
|
{
|
|
return keyboard_catch();
|
|
}
|
|
|
|
int keyboard_getchar()
|
|
{
|
|
keyboard_catch();
|
|
|
|
return buffer_get();
|
|
}
|
|
|
|
void keyboard_inject(char *s)
|
|
{
|
|
buffer_putstring(s);
|
|
}
|