470 lines
11 KiB
C
470 lines
11 KiB
C
/*
|
|
*
|
|
* Copyright © 1999 Keith Packard
|
|
*
|
|
* Permission to use, copy, modify, distribute, and sell this software and its
|
|
* documentation for any purpose is hereby granted without fee, provided that
|
|
* the above copyright notice appear in all copies and that both that
|
|
* copyright notice and this permission notice appear in supporting
|
|
* documentation, and that the name of Keith Packard not be used in
|
|
* advertising or publicity pertaining to distribution of the software without
|
|
* specific, written prior permission. Keith Packard makes no
|
|
* representations about the suitability of this software for any purpose. It
|
|
* is provided "as is" without express or implied warranty.
|
|
*
|
|
* KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
|
|
* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
|
|
* EVENT SHALL KEITH PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR
|
|
* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
|
|
* DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
|
|
* TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
|
|
* PERFORMANCE OF THIS SOFTWARE.
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include <kdrive-config.h>
|
|
#endif
|
|
#include "kdrive.h"
|
|
#include "kkeymap.h"
|
|
#include <linux/keyboard.h>
|
|
#include <linux/kd.h>
|
|
#define XK_PUBLISHING
|
|
#include <X11/keysym.h>
|
|
#include <termios.h>
|
|
#include <sys/ioctl.h>
|
|
|
|
extern int LinuxConsoleFd;
|
|
|
|
static const KeySym linux_to_x[256] = {
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
XK_BackSpace, XK_Tab, XK_Linefeed, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, XK_Escape,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
XK_space, XK_exclam, XK_quotedbl, XK_numbersign,
|
|
XK_dollar, XK_percent, XK_ampersand, XK_apostrophe,
|
|
XK_parenleft, XK_parenright, XK_asterisk, XK_plus,
|
|
XK_comma, XK_minus, XK_period, XK_slash,
|
|
XK_0, XK_1, XK_2, XK_3,
|
|
XK_4, XK_5, XK_6, XK_7,
|
|
XK_8, XK_9, XK_colon, XK_semicolon,
|
|
XK_less, XK_equal, XK_greater, XK_question,
|
|
XK_at, XK_A, XK_B, XK_C,
|
|
XK_D, XK_E, XK_F, XK_G,
|
|
XK_H, XK_I, XK_J, XK_K,
|
|
XK_L, XK_M, XK_N, XK_O,
|
|
XK_P, XK_Q, XK_R, XK_S,
|
|
XK_T, XK_U, XK_V, XK_W,
|
|
XK_X, XK_Y, XK_Z, XK_bracketleft,
|
|
XK_backslash, XK_bracketright, XK_asciicircum, XK_underscore,
|
|
XK_grave, XK_a, XK_b, XK_c,
|
|
XK_d, XK_e, XK_f, XK_g,
|
|
XK_h, XK_i, XK_j, XK_k,
|
|
XK_l, XK_m, XK_n, XK_o,
|
|
XK_p, XK_q, XK_r, XK_s,
|
|
XK_t, XK_u, XK_v, XK_w,
|
|
XK_x, XK_y, XK_z, XK_braceleft,
|
|
XK_bar, XK_braceright, XK_asciitilde, XK_BackSpace,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
NoSymbol, NoSymbol, NoSymbol, NoSymbol,
|
|
XK_nobreakspace, XK_exclamdown, XK_cent, XK_sterling,
|
|
XK_currency, XK_yen, XK_brokenbar, XK_section,
|
|
XK_diaeresis, XK_copyright, XK_ordfeminine, XK_guillemotleft,
|
|
XK_notsign, XK_hyphen, XK_registered, XK_macron,
|
|
XK_degree, XK_plusminus, XK_twosuperior, XK_threesuperior,
|
|
XK_acute, XK_mu, XK_paragraph, XK_periodcentered,
|
|
XK_cedilla, XK_onesuperior, XK_masculine, XK_guillemotright,
|
|
XK_onequarter, XK_onehalf, XK_threequarters, XK_questiondown,
|
|
XK_Agrave, XK_Aacute, XK_Acircumflex, XK_Atilde,
|
|
XK_Adiaeresis, XK_Aring, XK_AE, XK_Ccedilla,
|
|
XK_Egrave, XK_Eacute, XK_Ecircumflex, XK_Ediaeresis,
|
|
XK_Igrave, XK_Iacute, XK_Icircumflex, XK_Idiaeresis,
|
|
XK_ETH, XK_Ntilde, XK_Ograve, XK_Oacute,
|
|
XK_Ocircumflex, XK_Otilde, XK_Odiaeresis, XK_multiply,
|
|
XK_Ooblique, XK_Ugrave, XK_Uacute, XK_Ucircumflex,
|
|
XK_Udiaeresis, XK_Yacute, XK_THORN, XK_ssharp,
|
|
XK_agrave, XK_aacute, XK_acircumflex, XK_atilde,
|
|
XK_adiaeresis, XK_aring, XK_ae, XK_ccedilla,
|
|
XK_egrave, XK_eacute, XK_ecircumflex, XK_ediaeresis,
|
|
XK_igrave, XK_iacute, XK_icircumflex, XK_idiaeresis,
|
|
XK_eth, XK_ntilde, XK_ograve, XK_oacute,
|
|
XK_ocircumflex, XK_otilde, XK_odiaeresis, XK_division,
|
|
XK_oslash, XK_ugrave, XK_uacute, XK_ucircumflex,
|
|
XK_udiaeresis, XK_yacute, XK_thorn, XK_ydiaeresis
|
|
};
|
|
|
|
static unsigned char tbl[KD_MAX_WIDTH] = {
|
|
0,
|
|
1 << KG_SHIFT,
|
|
(1 << KG_ALTGR),
|
|
(1 << KG_ALTGR) | (1 << KG_SHIFT)
|
|
};
|
|
|
|
static void readKernelMapping(void)
|
|
{
|
|
KeySym *k;
|
|
int i, j;
|
|
struct kbentry kbe;
|
|
int minKeyCode, maxKeyCode;
|
|
int row;
|
|
|
|
minKeyCode = NR_KEYS;
|
|
maxKeyCode = 0;
|
|
row = 0;
|
|
for (i = 0; i < NR_KEYS && row < KD_MAX_LENGTH; ++i) {
|
|
kbe.kb_index = i;
|
|
|
|
k = kdKeymap + row * KD_MAX_WIDTH;
|
|
|
|
for (j = 0; j < KD_MAX_WIDTH; ++j) {
|
|
unsigned short kval;
|
|
|
|
k[j] = NoSymbol;
|
|
|
|
kbe.kb_table = tbl[j];
|
|
kbe.kb_value = 0;
|
|
if (ioctl(LinuxConsoleFd, KDGKBENT, &kbe))
|
|
continue;
|
|
|
|
kval = KVAL(kbe.kb_value);
|
|
switch (KTYP(kbe.kb_value)) {
|
|
case KT_LATIN:
|
|
case KT_LETTER:
|
|
k[j] = linux_to_x[kval];
|
|
break;
|
|
|
|
case KT_FN:
|
|
if (kval <= 19)
|
|
k[j] = XK_F1 + kval;
|
|
else
|
|
switch (kbe.kb_value) {
|
|
case K_FIND:
|
|
k[j] = XK_Home; /* or XK_Find */
|
|
break;
|
|
case K_INSERT:
|
|
k[j] = XK_Insert;
|
|
break;
|
|
case K_REMOVE:
|
|
k[j] = XK_Delete;
|
|
break;
|
|
case K_SELECT:
|
|
k[j] = XK_End; /* or XK_Select */
|
|
break;
|
|
case K_PGUP:
|
|
k[j] = XK_Prior;
|
|
break;
|
|
case K_PGDN:
|
|
k[j] = XK_Next;
|
|
break;
|
|
case K_HELP:
|
|
k[j] = XK_Help;
|
|
break;
|
|
case K_DO:
|
|
k[j] = XK_Execute;
|
|
break;
|
|
case K_PAUSE:
|
|
k[j] = XK_Pause;
|
|
break;
|
|
case K_MACRO:
|
|
k[j] = XK_Menu;
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case KT_SPEC:
|
|
switch (kbe.kb_value) {
|
|
case K_ENTER:
|
|
k[j] = XK_Return;
|
|
break;
|
|
case K_BREAK:
|
|
k[j] = XK_Break;
|
|
break;
|
|
case K_CAPS:
|
|
k[j] = XK_Caps_Lock;
|
|
break;
|
|
case K_NUM:
|
|
k[j] = XK_Num_Lock;
|
|
break;
|
|
case K_HOLD:
|
|
k[j] = XK_Scroll_Lock;
|
|
break;
|
|
case K_COMPOSE:
|
|
k[j] = XK_Multi_key;
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case KT_PAD:
|
|
switch (kbe.kb_value) {
|
|
case K_PPLUS:
|
|
k[j] = XK_KP_Add;
|
|
break;
|
|
case K_PMINUS:
|
|
k[j] = XK_KP_Subtract;
|
|
break;
|
|
case K_PSTAR:
|
|
k[j] = XK_KP_Multiply;
|
|
break;
|
|
case K_PSLASH:
|
|
k[j] = XK_KP_Divide;
|
|
break;
|
|
case K_PENTER:
|
|
k[j] = XK_KP_Enter;
|
|
break;
|
|
case K_PCOMMA:
|
|
k[j] = XK_KP_Separator;
|
|
break;
|
|
case K_PDOT:
|
|
k[j] = XK_KP_Decimal;
|
|
break;
|
|
case K_PPLUSMINUS:
|
|
k[j] = XK_KP_Subtract;
|
|
break;
|
|
default:
|
|
if (kval <= 9)
|
|
k[j] = XK_KP_0 + kval;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
/*
|
|
* KT_DEAD keys are for accelerated diacritical creation.
|
|
*/
|
|
case KT_DEAD:
|
|
switch (kbe.kb_value) {
|
|
case K_DGRAVE:
|
|
k[j] = XK_dead_grave;
|
|
break;
|
|
case K_DACUTE:
|
|
k[j] = XK_dead_acute;
|
|
break;
|
|
case K_DCIRCM:
|
|
k[j] = XK_dead_circumflex;
|
|
break;
|
|
case K_DTILDE:
|
|
k[j] = XK_dead_tilde;
|
|
break;
|
|
case K_DDIERE:
|
|
k[j] = XK_dead_diaeresis;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case KT_CUR:
|
|
switch (kbe.kb_value) {
|
|
case K_DOWN:
|
|
k[j] = XK_Down;
|
|
break;
|
|
case K_LEFT:
|
|
k[j] = XK_Left;
|
|
break;
|
|
case K_RIGHT:
|
|
k[j] = XK_Right;
|
|
break;
|
|
case K_UP:
|
|
k[j] = XK_Up;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case KT_SHIFT:
|
|
switch (kbe.kb_value) {
|
|
case K_ALTGR:
|
|
k[j] = XK_Mode_switch;
|
|
break;
|
|
case K_ALT:
|
|
k[j] = (kbe.kb_index == 0x64 ?
|
|
XK_Alt_R : XK_Alt_L);
|
|
break;
|
|
case K_CTRL:
|
|
k[j] = (kbe.kb_index == 0x61 ?
|
|
XK_Control_R : XK_Control_L);
|
|
break;
|
|
case K_CTRLL:
|
|
k[j] = XK_Control_L;
|
|
break;
|
|
case K_CTRLR:
|
|
k[j] = XK_Control_R;
|
|
break;
|
|
case K_SHIFT:
|
|
k[j] = (kbe.kb_index == 0x36 ?
|
|
XK_Shift_R : XK_Shift_L);
|
|
break;
|
|
case K_SHIFTL:
|
|
k[j] = XK_Shift_L;
|
|
break;
|
|
case K_SHIFTR:
|
|
k[j] = XK_Shift_R;
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
break;
|
|
|
|
/*
|
|
* KT_ASCII keys accumulate a 3 digit decimal number that gets
|
|
* emitted when the shift state changes. We can't emulate that.
|
|
*/
|
|
case KT_ASCII:
|
|
break;
|
|
|
|
case KT_LOCK:
|
|
if (kbe.kb_value == K_SHIFTLOCK)
|
|
k[j] = XK_Shift_Lock;
|
|
break;
|
|
|
|
#ifdef KT_X
|
|
case KT_X:
|
|
/* depends on new keyboard symbols in file linux/keyboard.h */
|
|
if (kbe.kb_value == K_XMENU)
|
|
k[j] = XK_Menu;
|
|
if (kbe.kb_value == K_XTELEPHONE)
|
|
k[j] = XK_telephone;
|
|
break;
|
|
#endif
|
|
#ifdef KT_XF
|
|
case KT_XF:
|
|
/* special linux keysyms which map directly to XF86 keysyms */
|
|
k[j] = (kbe.kb_value & 0xFF) + 0x1008FF00;
|
|
break;
|
|
#endif
|
|
|
|
default:
|
|
break;
|
|
}
|
|
if (i < minKeyCode)
|
|
minKeyCode = i;
|
|
if (i > maxKeyCode)
|
|
maxKeyCode = i;
|
|
}
|
|
|
|
if (minKeyCode == NR_KEYS)
|
|
continue;
|
|
|
|
if (k[3] == k[2])
|
|
k[3] = NoSymbol;
|
|
if (k[2] == k[1])
|
|
k[2] = NoSymbol;
|
|
if (k[1] == k[0])
|
|
k[1] = NoSymbol;
|
|
if (k[0] == k[2] && k[1] == k[3])
|
|
k[2] = k[3] = NoSymbol;
|
|
if (k[3] == k[0] && k[2] == k[1] && k[2] == NoSymbol)
|
|
k[3] = NoSymbol;
|
|
row++;
|
|
}
|
|
kdMinScanCode = minKeyCode;
|
|
kdMaxScanCode = maxKeyCode;
|
|
}
|
|
|
|
static void LinuxKeyboardLoad(void)
|
|
{
|
|
readKernelMapping();
|
|
}
|
|
|
|
static void LinuxKeyboardRead(int fd, void *closure)
|
|
{
|
|
unsigned char buf[256], *b;
|
|
int n;
|
|
|
|
while ((n = read(fd, buf, sizeof(buf))) > 0) {
|
|
b = buf;
|
|
while (n--) {
|
|
KdEnqueueKeyboardEvent(b[0] & 0x7f, b[0] & 0x80);
|
|
b++;
|
|
}
|
|
}
|
|
}
|
|
|
|
static int LinuxKbdTrans;
|
|
static struct termios LinuxTermios;
|
|
static int LinuxKbdType;
|
|
|
|
static int LinuxKeyboardEnable(int fd, void *closure)
|
|
{
|
|
struct termios nTty;
|
|
unsigned char buf[256];
|
|
int n;
|
|
|
|
ioctl(fd, KDGKBMODE, &LinuxKbdTrans);
|
|
tcgetattr(fd, &LinuxTermios);
|
|
|
|
ioctl(fd, KDSKBMODE, K_MEDIUMRAW);
|
|
nTty = LinuxTermios;
|
|
nTty.c_iflag = (IGNPAR | IGNBRK) & (~PARMRK) & (~ISTRIP);
|
|
nTty.c_oflag = 0;
|
|
nTty.c_cflag = CREAD | CS8;
|
|
nTty.c_lflag = 0;
|
|
nTty.c_cc[VTIME] = 0;
|
|
nTty.c_cc[VMIN] = 1;
|
|
cfsetispeed(&nTty, 9600);
|
|
cfsetospeed(&nTty, 9600);
|
|
tcsetattr(fd, TCSANOW, &nTty);
|
|
/*
|
|
* Flush any pending keystrokes
|
|
*/
|
|
while ((n = read(fd, buf, sizeof(buf))) > 0) ;
|
|
return fd;
|
|
}
|
|
|
|
static void LinuxKeyboardDisable(int fd, void *closure)
|
|
{
|
|
ioctl(LinuxConsoleFd, KDSKBMODE, LinuxKbdTrans);
|
|
tcsetattr(LinuxConsoleFd, TCSANOW, &LinuxTermios);
|
|
}
|
|
|
|
static int LinuxKeyboardInit(void)
|
|
{
|
|
if (!LinuxKbdType)
|
|
LinuxKbdType = KdAllocInputType();
|
|
|
|
KdRegisterFd(LinuxKbdType, LinuxConsoleFd, LinuxKeyboardRead, 0);
|
|
LinuxKeyboardEnable(LinuxConsoleFd, 0);
|
|
KdRegisterFdEnableDisable(LinuxConsoleFd,
|
|
LinuxKeyboardEnable, LinuxKeyboardDisable);
|
|
return 1;
|
|
}
|
|
|
|
static void LinuxKeyboardFini(void)
|
|
{
|
|
LinuxKeyboardDisable(LinuxConsoleFd, 0);
|
|
KdUnregisterFds(LinuxKbdType, FALSE);
|
|
}
|
|
|
|
static void LinuxKeyboardLeds(int leds)
|
|
{
|
|
ioctl(LinuxConsoleFd, KDSETLED, leds & 7);
|
|
}
|
|
|
|
static void LinuxKeyboardBell(int volume, int pitch, int duration)
|
|
{
|
|
if (volume && pitch) {
|
|
ioctl(LinuxConsoleFd, KDMKTONE,
|
|
((1193190 / pitch) & 0xffff) |
|
|
(((unsigned long)duration * volume / 50) << 16));
|
|
|
|
}
|
|
}
|
|
|
|
const KdKeyboardFuncs LinuxKeyboardFuncs = {
|
|
LinuxKeyboardLoad,
|
|
LinuxKeyboardInit,
|
|
LinuxKeyboardLeds,
|
|
LinuxKeyboardBell,
|
|
LinuxKeyboardFini,
|
|
3,
|
|
};
|