934 lines
29 KiB
C
934 lines
29 KiB
C
/*
|
|
* Keyboard related functions
|
|
*
|
|
* Copyright 1993 Bob Amstadt
|
|
* Copyright 1996 Albrecht Kleine
|
|
* Copyright 1997 David Faure
|
|
*
|
|
*/
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <ctype.h>
|
|
#include <X11/keysym.h>
|
|
#include <X11/Xlib.h>
|
|
#include <X11/Xresource.h>
|
|
#include <X11/Xutil.h>
|
|
#include <X11/Xatom.h>
|
|
|
|
#include "windows.h"
|
|
#include "win.h"
|
|
#include "gdi.h"
|
|
#include "keyboard.h"
|
|
#include "message.h"
|
|
#include "stddebug.h"
|
|
/* #define DEBUG_KEYBOARD */
|
|
#include "debug.h"
|
|
#include "xmalloc.h"
|
|
#include "accel.h"
|
|
|
|
BOOL32 MouseButtonsStates[3];
|
|
BOOL32 AsyncMouseButtonsStates[3];
|
|
BYTE InputKeyStateTable[256];
|
|
BYTE QueueKeyStateTable[256];
|
|
BYTE AsyncKeyStateTable[256];
|
|
|
|
static int NumLockMask;
|
|
static int AltGrMask;
|
|
static int min_keycode, max_keycode;
|
|
static int keyc2vkey[256];
|
|
|
|
typedef union
|
|
{
|
|
struct
|
|
{
|
|
unsigned long count : 16;
|
|
unsigned long code : 8;
|
|
unsigned long extended : 1;
|
|
unsigned long unused : 2;
|
|
unsigned long win_internal : 2;
|
|
unsigned long context : 1;
|
|
unsigned long previous : 1;
|
|
unsigned long transition : 1;
|
|
} lp1;
|
|
unsigned long lp2;
|
|
} KEYLP;
|
|
|
|
typedef enum {OFF,INTERM,ON} ToggleKeyState;
|
|
|
|
/* Keyboard translation tables */
|
|
static const int special_key[] =
|
|
{
|
|
VK_BACK, VK_TAB, 0, VK_CLEAR, 0, VK_RETURN, 0, 0, /* FF08 */
|
|
0, 0, 0, VK_PAUSE, VK_SCROLL, 0, 0, 0, /* FF10 */
|
|
0, 0, 0, VK_ESCAPE /* FF18 */
|
|
};
|
|
|
|
static const int cursor_key[] =
|
|
{
|
|
VK_HOME, VK_LEFT, VK_UP, VK_RIGHT, VK_DOWN, VK_PRIOR,
|
|
VK_NEXT, VK_END /* FF50 */
|
|
};
|
|
|
|
static const int misc_key[] =
|
|
{
|
|
VK_SELECT, VK_SNAPSHOT, VK_EXECUTE, VK_INSERT, 0, 0, 0, 0, /* FF60 */
|
|
VK_CANCEL, VK_HELP, VK_CANCEL, VK_MENU /* FF68 */
|
|
};
|
|
|
|
static const int keypad_key[] =
|
|
{
|
|
0, VK_NUMLOCK, /* FF7E */
|
|
0, 0, 0, 0, 0, 0, 0, 0, /* FF80 */
|
|
0, 0, 0, 0, 0, VK_RETURN, 0, 0, /* FF88 */
|
|
0, 0, 0, 0, 0, VK_HOME, VK_LEFT, VK_UP, /* FF90 */
|
|
VK_RIGHT, VK_DOWN, VK_PRIOR, VK_NEXT, VK_END, 0,
|
|
VK_INSERT, VK_DELETE, /* FF98 */
|
|
0, 0, 0, 0, 0, 0, 0, 0, /* FFA0 */
|
|
0, 0, VK_MULTIPLY, VK_ADD, VK_SEPARATOR, VK_SUBTRACT,
|
|
VK_DECIMAL, VK_DIVIDE, /* FFA8 */
|
|
VK_NUMPAD0, VK_NUMPAD1, VK_NUMPAD2, VK_NUMPAD3, VK_NUMPAD4,
|
|
VK_NUMPAD5, VK_NUMPAD6, VK_NUMPAD7, /* FFB0 */
|
|
VK_NUMPAD8, VK_NUMPAD9 /* FFB8 */
|
|
};
|
|
|
|
static const int function_key[] =
|
|
{
|
|
VK_F1, VK_F2, /* FFBE */
|
|
VK_F3, VK_F4, VK_F5, VK_F6, VK_F7, VK_F8, VK_F9, VK_F10, /* FFC0 */
|
|
VK_F11, VK_F12, VK_F13, VK_F14, VK_F15, VK_F16 /* FFC8 */
|
|
};
|
|
|
|
static const int modifier_key[] =
|
|
{
|
|
VK_SHIFT, VK_SHIFT, VK_CONTROL, VK_CONTROL, VK_CAPITAL, 0, /* FFE1 */
|
|
VK_MENU, VK_MENU, VK_MENU, VK_MENU /* FFE7 */
|
|
};
|
|
|
|
|
|
static WORD EVENT_event_to_vkey( XKeyEvent *e)
|
|
{
|
|
KeySym keysym;
|
|
|
|
XLookupString(e, NULL, 0, &keysym, NULL);
|
|
|
|
if ((keysym >= 0xFFAE) && (keysym <= 0xFFB9) && (e->state & NumLockMask))
|
|
/* Only the Keypad keys 0-9 and . send different keysyms
|
|
* depending on the NumLock state */
|
|
return keypad_key[(keysym & 0xFF) - 0x7E];
|
|
|
|
return keyc2vkey[e->keycode];
|
|
}
|
|
|
|
/**********************************************************************
|
|
* KEYBOARD_Init
|
|
*/
|
|
BOOL32 KEYBOARD_Init(void)
|
|
{
|
|
int i, keysyms_per_keycode;
|
|
KeySym *ksp;
|
|
XModifierKeymap *mmp;
|
|
KeySym keysym;
|
|
KeyCode *kcp;
|
|
XKeyEvent e2;
|
|
WORD vkey, OEMvkey;
|
|
|
|
XDisplayKeycodes(display, &min_keycode, &max_keycode);
|
|
ksp = XGetKeyboardMapping(display, min_keycode,
|
|
max_keycode + 1 - min_keycode, &keysyms_per_keycode);
|
|
/* We are only interested in keysyms_per_keycode.
|
|
There is no need to hold a local copy of the keysyms table */
|
|
XFree(ksp);
|
|
mmp = XGetModifierMapping(display);
|
|
kcp = mmp->modifiermap;
|
|
for (i = 0; i < 8; i += 1) /* There are 8 modifier keys */
|
|
{
|
|
int j;
|
|
|
|
for (j = 0; j < mmp->max_keypermod; j += 1, kcp += 1)
|
|
if (*kcp)
|
|
{
|
|
int k;
|
|
|
|
for (k = 0; k < keysyms_per_keycode; k += 1)
|
|
if (XKeycodeToKeysym(display, *kcp, k) == XK_Mode_switch)
|
|
{
|
|
AltGrMask = 1 << i;
|
|
dprintf_key(stddeb, "AltGrMask is %x\n", AltGrMask);
|
|
}
|
|
else if (XKeycodeToKeysym(display, *kcp, k) == XK_Num_Lock)
|
|
{
|
|
NumLockMask = 1 << i;
|
|
dprintf_key(stddeb, "NumLockMask is %x\n", NumLockMask);
|
|
}
|
|
}
|
|
}
|
|
XFreeModifiermap(mmp);
|
|
|
|
/* Now build two conversion arrays :
|
|
* keycode -> vkey + extended
|
|
* vkey + extended -> keycode */
|
|
|
|
e2.display = display;
|
|
e2.state = 0;
|
|
|
|
OEMvkey = 0xb9; /* first OEM virtual key available is ba */
|
|
for (e2.keycode=min_keycode; e2.keycode<=max_keycode; e2.keycode++)
|
|
{
|
|
XLookupString(&e2, NULL, 0, &keysym, NULL);
|
|
vkey = 0;
|
|
if (keysym) /* otherwise, keycode not used */
|
|
{
|
|
if ((keysym >> 8) == 0xFF) /* non-character key */
|
|
{
|
|
int key = keysym & 0xff;
|
|
|
|
if (key >= 0x08 && key <= 0x1B) /* special key */
|
|
vkey = special_key[key - 0x08];
|
|
else if (key >= 0x50 && key <= 0x57) /* cursor key */
|
|
vkey = cursor_key[key - 0x50];
|
|
else if (key >= 0x60 && key <= 0x6B) /* miscellaneous key */
|
|
vkey = misc_key[key - 0x60];
|
|
else if (key >= 0x7E && key <= 0xB9) /* keypad key */
|
|
vkey = keypad_key[key - 0x7E];
|
|
else if (key >= 0xBE && key <= 0xCD) /* function key */
|
|
{
|
|
vkey = function_key[key - 0xBE];
|
|
vkey |= 0x100; /* set extended bit */
|
|
}
|
|
else if (key >= 0xE1 && key <= 0xEA) /* modifier key */
|
|
vkey = modifier_key[key - 0xE1];
|
|
else if (key == 0xFF) /* DEL key */
|
|
vkey = VK_DELETE;
|
|
/* extended must also be set for ALT_R, CTRL_R,
|
|
INS, DEL, HOME, END, PAGE_UP, PAGE_DOWN, ARROW keys,
|
|
keypad / and keypad ENTER (SDK 3.1 Vol.3 p 138) */
|
|
/* FIXME should we set extended bit for NumLock ? My
|
|
* Windows does ... DF */
|
|
switch (keysym)
|
|
{
|
|
case XK_Control_R :
|
|
case XK_Alt_R :
|
|
case XK_Insert :
|
|
case XK_Delete :
|
|
case XK_Home :
|
|
case XK_End :
|
|
case XK_Prior :
|
|
case XK_Next :
|
|
case XK_Left :
|
|
case XK_Up :
|
|
case XK_Right :
|
|
case XK_Down :
|
|
case XK_KP_Divide :
|
|
case XK_KP_Enter :
|
|
vkey |= 0x100;
|
|
}
|
|
}
|
|
for (i = 0; (i < keysyms_per_keycode) && (!vkey); i++)
|
|
{
|
|
keysym = XLookupKeysym(&e2, i);
|
|
if ((keysym >= VK_0 && keysym <= VK_9)
|
|
|| (keysym >= VK_A && keysym <= VK_Z)
|
|
|| keysym == VK_SPACE)
|
|
vkey = keysym;
|
|
}
|
|
|
|
if (!vkey)
|
|
{
|
|
/* Others keys: let's assign OEM virtual key codes in the allowed range,
|
|
* that is ([0xba,0xc0], [0xdb,0xe4], 0xe6 (given up) et [0xe9,0xf5]) */
|
|
switch (++OEMvkey)
|
|
{
|
|
case 0xc1 : OEMvkey=0xdb; break;
|
|
case 0xe5 : OEMvkey=0xe9; break;
|
|
case 0xf6 : OEMvkey=0xf5; fprintf(stderr,"No more OEM vkey available!\n");
|
|
}
|
|
|
|
vkey = OEMvkey;
|
|
|
|
if (debugging_keyboard)
|
|
{
|
|
fprintf(stddeb,"OEM specific virtual key %X assigned to keycode %X :\n ("
|
|
,OEMvkey,e2.keycode);
|
|
for (i = 0; i < keysyms_per_keycode; i += 1)
|
|
{
|
|
char *ksname;
|
|
|
|
keysym = XLookupKeysym(&e2, i);
|
|
ksname = XKeysymToString(keysym);
|
|
if (!ksname)
|
|
ksname = "NoSymbol";
|
|
fprintf(stddeb, "%lX (%s) ", keysym, ksname);
|
|
}
|
|
fprintf(stddeb, ")\n");
|
|
}
|
|
}
|
|
}
|
|
keyc2vkey[e2.keycode] = vkey;
|
|
} /* for */
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* KEYBOARD_HandleEvent
|
|
*
|
|
* Handle a X key event
|
|
*/
|
|
void KEYBOARD_HandleEvent( XKeyEvent *event )
|
|
{
|
|
char Str[24];
|
|
XComposeStatus cs;
|
|
KeySym keysym;
|
|
WORD vkey = 0;
|
|
KEYLP keylp;
|
|
WORD message;
|
|
static BOOL force_extended = FALSE; /* hack for AltGr translation */
|
|
BOOL DontPropagate;
|
|
ToggleKeyState * State;
|
|
static ToggleKeyState NumState=OFF, CapsState=OFF;
|
|
|
|
int ascii_chars = XLookupString(event, Str, 1, &keysym, &cs);
|
|
|
|
dprintf_key(stddeb, "EVENT_key : state = %X\n", event->state);
|
|
if (keysym == XK_Mode_switch)
|
|
{
|
|
dprintf_key(stddeb, "Alt Gr key event received\n");
|
|
event->keycode = XKeysymToKeycode(event->display, XK_Control_L);
|
|
dprintf_key(stddeb, "Control_L is keycode 0x%x\n", event->keycode);
|
|
KEYBOARD_HandleEvent(event);
|
|
event->keycode = XKeysymToKeycode(event->display, XK_Alt_L);
|
|
dprintf_key(stddeb, "Alt_L is keycode 0x%x\n", event->keycode);
|
|
force_extended = TRUE;
|
|
KEYBOARD_HandleEvent(event);
|
|
force_extended = FALSE;
|
|
return;
|
|
}
|
|
|
|
Str[ascii_chars] = '\0';
|
|
if (debugging_key)
|
|
{
|
|
char *ksname;
|
|
|
|
ksname = XKeysymToString(keysym);
|
|
if (!ksname)
|
|
ksname = "No Name";
|
|
fprintf(stddeb, "%s : keysym=%lX (%s), ascii chars=%u / %X / '%s'\n",
|
|
(event->type == KeyPress) ? "KeyPress" : "KeyRelease",
|
|
keysym, ksname, ascii_chars, Str[0] & 0xff, Str);
|
|
}
|
|
|
|
#if 0
|
|
/* Ctrl-Alt-Return enters the debugger */
|
|
if ((keysym == XK_Return) && (event->type == KeyPress) &&
|
|
(event->state & ControlMask) && (event->state & Mod1Mask))
|
|
DEBUG_EnterDebugger();
|
|
#endif
|
|
|
|
vkey = EVENT_event_to_vkey(event);
|
|
if (force_extended) vkey |= 0x100;
|
|
|
|
dprintf_key(stddeb, "keycode 0x%x converted to vkey 0x%x\n",
|
|
event->keycode, vkey);
|
|
|
|
if (vkey)
|
|
{
|
|
keylp.lp1.count = 1;
|
|
keylp.lp1.code = LOBYTE(event->keycode) - 8;
|
|
keylp.lp1.extended = (vkey & 0x100 ? 1 : 0);
|
|
keylp.lp1.win_internal = 0; /* this has something to do with dialogs,
|
|
* don't remember where I read it - AK */
|
|
/* it's '1' under windows, when a dialog box appears
|
|
* and you press one of the underlined keys - DF*/
|
|
vkey &= 0xff;
|
|
if (event->type == KeyPress)
|
|
{
|
|
keylp.lp1.previous = (InputKeyStateTable[vkey] & 0x80) != 0;
|
|
if (!(InputKeyStateTable[vkey] & 0x80))
|
|
InputKeyStateTable[vkey] ^= 0x01;
|
|
InputKeyStateTable[vkey] |= 0x80;
|
|
keylp.lp1.transition = 0;
|
|
message = (InputKeyStateTable[VK_MENU] & 0x80)
|
|
&& !(InputKeyStateTable[VK_CONTROL] & 0x80)
|
|
? WM_SYSKEYDOWN : WM_KEYDOWN;
|
|
}
|
|
else
|
|
{
|
|
UINT sysKey = (InputKeyStateTable[VK_MENU] & 0x80)
|
|
&& !(InputKeyStateTable[VK_CONTROL] & 0x80)
|
|
&& (force_extended == FALSE); /* for Alt from AltGr */
|
|
|
|
InputKeyStateTable[vkey] &= ~0x80;
|
|
keylp.lp1.previous = 1;
|
|
keylp.lp1.transition = 1;
|
|
message = sysKey ? WM_SYSKEYUP : WM_KEYUP;
|
|
}
|
|
keylp.lp1.context = ( (event->state & Mod1Mask) ||
|
|
(InputKeyStateTable[VK_MENU] & 0x80)) ? 1 : 0;
|
|
DontPropagate = FALSE;
|
|
if ((vkey==VK_NUMLOCK) || (vkey==VK_CAPITAL))
|
|
{
|
|
|
|
switch (*( State = (vkey==VK_NUMLOCK? &NumState : &CapsState))) {
|
|
case OFF:if (event->type==KeyPress)
|
|
{
|
|
dprintf_keyboard(stddeb,"OFF + Keypress => DOWN and UP generated. \n");
|
|
hardware_event( message, vkey, keylp.lp2, event->x_root - desktopX,
|
|
event->y_root - desktopY, event->time - MSG_WineStartTicks, 0);
|
|
message += WM_KEYUP - WM_KEYDOWN; /* create a *UP message from the *DOWN one */
|
|
keylp.lp1.previous = 1;
|
|
keylp.lp1.transition = 1;
|
|
*State = INTERM;
|
|
} break;
|
|
case INTERM:
|
|
/* The 'INTERM' state means : just after a 'press' event, if a 'release' event comes,
|
|
don't "propagate" it. It's from the same key press. Then the state goes to ON.
|
|
And from there, a 'release' event will switch off the toggle key. */
|
|
DontPropagate = TRUE;
|
|
*State=ON;
|
|
InputKeyStateTable[vkey] |= 0x01; /* force to 'on' event if a release event was received */
|
|
dprintf_keyboard(stddeb,"INTERM : don\'t propagate press/release of toggle key. InputKeyStateTable[%#x] = %#x",vkey,InputKeyStateTable[vkey]);
|
|
break;
|
|
case ON: if (event->type==KeyPress) DontPropagate = TRUE; else
|
|
{
|
|
KEYLP downkeylp = keylp;
|
|
dprintf_keyboard(stddeb,"ON + KeyRelease => generating DOWN msg before the UP\n");
|
|
message += WM_KEYDOWN - WM_KEYUP; /* create the *DOWN from the *UP */
|
|
downkeylp.lp1.previous = 0; /* ? */
|
|
downkeylp.lp1.transition = 0;
|
|
hardware_event( message, vkey, downkeylp.lp2, event->x_root - desktopX,
|
|
event->y_root - desktopY, event->time - MSG_WineStartTicks, 0);
|
|
message += WM_KEYUP - WM_KEYDOWN; /* back to the UP message */
|
|
*State=OFF;
|
|
} break;
|
|
}
|
|
dprintf_keyboard(stddeb,"Internal State : %d (0=OFF 1=INTERM 2=ON). InputTable state : %#x \n",*State,InputKeyStateTable[vkey]);
|
|
} else {
|
|
if (NumState == INTERM) NumState = ON;
|
|
if (CapsState == INTERM) CapsState = ON;
|
|
}
|
|
|
|
if (!DontPropagate)
|
|
{
|
|
dprintf_key(stddeb," wParam=%04X, lParam=%08lX\n",
|
|
vkey, keylp.lp2 );
|
|
dprintf_key(stddeb," InputKeyState=%X\n",
|
|
InputKeyStateTable[vkey]);
|
|
|
|
hardware_event( message, vkey, keylp.lp2, event->x_root - desktopX,
|
|
event->y_root - desktopY, event->time - MSG_WineStartTicks, 0 );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
/**********************************************************************
|
|
* GetKeyState [USER.106]
|
|
* An application calls the GetKeyState function in response to a
|
|
* keyboard-input message. This function retrieves the state of the key
|
|
* at the time the input message was generated. (SDK 3.1 Vol 2. p 390)
|
|
*/
|
|
INT GetKeyState(INT vkey)
|
|
{
|
|
INT retval;
|
|
|
|
switch (vkey)
|
|
{
|
|
case VK_LBUTTON : /* VK_LBUTTON is 1 */
|
|
retval = MouseButtonsStates[0];
|
|
break;
|
|
case VK_MBUTTON : /* VK_MBUTTON is 4 */
|
|
retval = MouseButtonsStates[1];
|
|
break;
|
|
case VK_RBUTTON : /* VK_RBUTTON is 2 */
|
|
retval = MouseButtonsStates[2];
|
|
break;
|
|
default :
|
|
if (vkey >= 'a' && vkey <= 'z')
|
|
vkey += 'A' - 'a';
|
|
retval = ( (INT)(QueueKeyStateTable[vkey] & 0x80) << 8 ) |
|
|
(INT)(QueueKeyStateTable[vkey] & 0x01);
|
|
}
|
|
dprintf_key(stddeb, "GetKeyState(0x%x) -> %x\n", vkey, retval);
|
|
return retval;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* GetKeyboardState [USER.222]
|
|
* An application calls the GetKeyboardState function in response to a
|
|
* keyboard-input message. This function retrieves the state of the keyboard
|
|
* at the time the input message was generated. (SDK 3.1 Vol 2. p 387)
|
|
*/
|
|
void GetKeyboardState(BYTE *lpKeyState)
|
|
{
|
|
dprintf_key(stddeb, "GetKeyboardState()\n");
|
|
if (lpKeyState != NULL) {
|
|
QueueKeyStateTable[VK_LBUTTON] = MouseButtonsStates[0] >> 8;
|
|
QueueKeyStateTable[VK_MBUTTON] = MouseButtonsStates[1] >> 8;
|
|
QueueKeyStateTable[VK_RBUTTON] = MouseButtonsStates[2] >> 8;
|
|
memcpy(lpKeyState, QueueKeyStateTable, 256);
|
|
}
|
|
}
|
|
|
|
/**********************************************************************
|
|
* SetKeyboardState [USER.223]
|
|
*/
|
|
void SetKeyboardState(BYTE *lpKeyState)
|
|
{
|
|
dprintf_key(stddeb, "SetKeyboardState()\n");
|
|
if (lpKeyState != NULL) {
|
|
memcpy(QueueKeyStateTable, lpKeyState, 256);
|
|
MouseButtonsStates[0] = QueueKeyStateTable[VK_LBUTTON]? 0x8000: 0;
|
|
MouseButtonsStates[1] = QueueKeyStateTable[VK_MBUTTON]? 0x8000: 0;
|
|
MouseButtonsStates[2] = QueueKeyStateTable[VK_RBUTTON]? 0x8000: 0;
|
|
}
|
|
}
|
|
|
|
/**********************************************************************
|
|
* GetAsyncKeyState (USER.249)
|
|
*
|
|
* Determine if a key is or was pressed. retval has high-order
|
|
* bit set to 1 if currently pressed, low-order bit set to 1 if key has
|
|
* been pressed.
|
|
*
|
|
* This uses the variable AsyncMouseButtonsStates and
|
|
* AsyncKeyStateTable (set in event.c) which have the mouse button
|
|
* number or key number (whichever is applicable) set to true if the
|
|
* mouse or key had been depressed since the last call to
|
|
* GetAsyncKeyState.
|
|
*/
|
|
int GetAsyncKeyState(int nKey)
|
|
{
|
|
short retval;
|
|
|
|
switch (nKey) {
|
|
case VK_LBUTTON:
|
|
retval = AsyncMouseButtonsStates[0] |
|
|
MouseButtonsStates[0]? 0x0001: 0;
|
|
break;
|
|
case VK_MBUTTON:
|
|
retval = AsyncMouseButtonsStates[1] |
|
|
MouseButtonsStates[1]? 0x0001: 0;
|
|
break;
|
|
case VK_RBUTTON:
|
|
retval = AsyncMouseButtonsStates[2] |
|
|
MouseButtonsStates[2]? 0x0001: 0;
|
|
break;
|
|
default:
|
|
retval = AsyncKeyStateTable[nKey] |
|
|
(InputKeyStateTable[nKey] ? 0x8000 : 0);
|
|
break;
|
|
}
|
|
|
|
memset( AsyncMouseButtonsStates, 0, 3 ); /* all states to false */
|
|
memset( AsyncKeyStateTable, 0, 256 );
|
|
|
|
dprintf_key(stddeb, "GetAsyncKeyState(%x) -> %x\n", nKey, retval);
|
|
return retval;
|
|
}
|
|
|
|
|
|
/**********************************************************************
|
|
* TranslateAccelerator [USER.178]
|
|
*
|
|
* FIXME: should send some WM_INITMENU or/and WM_INITMENUPOPUP -messages
|
|
*/
|
|
INT16 TranslateAccelerator(HWND hWnd, HACCEL16 hAccel, LPMSG16 msg)
|
|
{
|
|
ACCELHEADER *lpAccelTbl;
|
|
int i;
|
|
BOOL sendmsg;
|
|
|
|
if (hAccel == 0 || msg == NULL) return 0;
|
|
if (msg->message != WM_KEYDOWN &&
|
|
msg->message != WM_KEYUP &&
|
|
msg->message != WM_SYSKEYDOWN &&
|
|
msg->message != WM_SYSKEYUP &&
|
|
msg->message != WM_CHAR) return 0;
|
|
|
|
dprintf_accel(stddeb, "TranslateAccelerators hAccel=%04x, hWnd=%04x,\
|
|
msg->hwnd=%04x, msg->message=%04x\n", hAccel,hWnd,msg->hwnd,msg->message);
|
|
|
|
lpAccelTbl = (LPACCELHEADER)GlobalLock16(hAccel);
|
|
for (sendmsg= i = 0; i < lpAccelTbl->wCount; i++)
|
|
{
|
|
if(msg->wParam == lpAccelTbl->tbl[i].wEvent)
|
|
{
|
|
if (msg->message == WM_CHAR)
|
|
{
|
|
if ( !(lpAccelTbl->tbl[i].type & ALT_ACCEL) &&
|
|
!(lpAccelTbl->tbl[i].type & VIRTKEY_ACCEL) )
|
|
{
|
|
dprintf_accel(stddeb,"found accel for WM_CHAR: ('%c')",msg->wParam&0xff);
|
|
sendmsg=TRUE;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if(lpAccelTbl->tbl[i].type & VIRTKEY_ACCEL)
|
|
{
|
|
INT mask = 0;
|
|
dprintf_accel(stddeb,"found accel for virt_key %04x (scan %04x)",
|
|
msg->wParam,0xff & HIWORD(msg->lParam));
|
|
if(GetKeyState(VK_SHIFT) & 0x8000) mask |= SHIFT_ACCEL;
|
|
if(GetKeyState(VK_CONTROL) & 0x8000) mask |= CONTROL_ACCEL;
|
|
if(GetKeyState(VK_MENU) & 0x8000) mask |= ALT_ACCEL;
|
|
if(mask == (lpAccelTbl->tbl[i].type &
|
|
(SHIFT_ACCEL | CONTROL_ACCEL | ALT_ACCEL)))
|
|
sendmsg=TRUE;
|
|
else
|
|
dprintf_accel(stddeb,", but incorrect SHIFT/CTRL/ALT-state\n");
|
|
}
|
|
else
|
|
{
|
|
if (!(msg->lParam & 0x01000000)) /* no special_key */
|
|
{
|
|
if ((lpAccelTbl->tbl[i].type & ALT_ACCEL) && (msg->lParam & 0x20000000))
|
|
{ /* ^^ ALT pressed */
|
|
dprintf_accel(stddeb,"found accel for Alt-%c", msg->wParam&0xff);
|
|
sendmsg=TRUE;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if (sendmsg) /* found an accelerator, but send a message... ? */
|
|
{
|
|
INT16 iSysStat,iStat,mesg=0;
|
|
HMENU16 hSysMenu,hMenu;
|
|
|
|
if (msg->message == WM_KEYUP || msg->message == WM_SYSKEYUP)
|
|
mesg=1;
|
|
else
|
|
if (GetCapture16())
|
|
mesg=2;
|
|
else
|
|
if (!IsWindowEnabled16(hWnd))
|
|
mesg=3;
|
|
else
|
|
{
|
|
hMenu=GetMenu32(hWnd);
|
|
hSysMenu=GetSystemMenu32(hWnd,FALSE);
|
|
if (hSysMenu)
|
|
iSysStat=GetMenuState32(hSysMenu,lpAccelTbl->tbl[i].wIDval,MF_BYCOMMAND);
|
|
else
|
|
iSysStat=-1;
|
|
if (hMenu)
|
|
iStat=GetMenuState32(hMenu,lpAccelTbl->tbl[i].wIDval,MF_BYCOMMAND);
|
|
else
|
|
iStat=-1;
|
|
if (iSysStat!=-1)
|
|
{
|
|
if (iSysStat & (MF_DISABLED|MF_GRAYED))
|
|
mesg=4;
|
|
else
|
|
mesg=WM_SYSCOMMAND;
|
|
}
|
|
else
|
|
{
|
|
if (iStat!=-1)
|
|
{
|
|
if (IsIconic32(hWnd))
|
|
mesg=5;
|
|
else
|
|
{
|
|
if (iStat & (MF_DISABLED|MF_GRAYED))
|
|
mesg=6;
|
|
else
|
|
mesg=WM_COMMAND;
|
|
}
|
|
}
|
|
else
|
|
mesg=WM_COMMAND;
|
|
}
|
|
}
|
|
if ( mesg==WM_COMMAND || mesg==WM_SYSCOMMAND )
|
|
{
|
|
dprintf_accel(stddeb,", sending %s, wParam=%0x\n",
|
|
mesg==WM_COMMAND ? "WM_COMMAND" : "WM_SYSCOMMAND",
|
|
lpAccelTbl->tbl[i].wIDval);
|
|
SendMessage16(hWnd, mesg, lpAccelTbl->tbl[i].wIDval,0x00010000L);
|
|
}
|
|
else
|
|
{
|
|
/* some reasons for NOT sending the WM_{SYS}COMMAND message:
|
|
* #0: unknown (please report!)
|
|
* #1: for WM_KEYUP,WM_SYSKEYUP
|
|
* #2: mouse is captured
|
|
* #3: window is disabled
|
|
* #4: it's a disabled system menu option
|
|
* #5: it's a menu option, but window is iconic
|
|
* #6: it's a menu option, but disabled
|
|
*/
|
|
dprintf_accel(stddeb,", but won't send WM_{SYS}COMMAND, reason is #%d\n",mesg);
|
|
}
|
|
GlobalUnlock16(hAccel);
|
|
return 1;
|
|
}
|
|
}
|
|
}
|
|
GlobalUnlock16(hAccel);
|
|
return 0;
|
|
}
|
|
|
|
|
|
DWORD OemKeyScan(WORD wOemChar)
|
|
{
|
|
dprintf_keyboard(stddeb,"*OemKeyScan (%d)\n",wOemChar);
|
|
|
|
return wOemChar;
|
|
}
|
|
|
|
/* VkKeyScan translates an ANSI character to a virtual-key and shift code
|
|
* for the current keyboard.
|
|
* FIXME high-order byte should yield :
|
|
* 0 Unshifted
|
|
* 1 Shift
|
|
* 2 Ctrl
|
|
* 3-5 Shift-key combinations that are not used for characters
|
|
* 6 Ctrl-Alt
|
|
* 7 Ctrl-Alt-Shift
|
|
* I.e. : Shift = 1, Ctrl = 2, Alt = 4.
|
|
*/
|
|
|
|
WORD VkKeyScan(WORD cChar)
|
|
{
|
|
KeyCode keycode;
|
|
dprintf_keyboard(stddeb,"VkKeyScan '%c'(%d) ",cChar,cChar);
|
|
|
|
/* let's do this : char = keysym (for ANSI chars) -> keyc [ + shift ... (?? how ??)]
|
|
keyc -> (keyc2vkey) vkey */
|
|
|
|
keycode = XKeysymToKeycode(display, cChar & 0xFF);
|
|
|
|
dprintf_keyboard(stddeb," ... got keycode 0x%x ... returning 0x%x\n",
|
|
keycode,keyc2vkey[keycode]);
|
|
return keyc2vkey[keycode];
|
|
}
|
|
|
|
WORD VkKeyScan32W(WORD cChar)
|
|
{
|
|
/* lower part of cChar is used anyway */
|
|
return VkKeyScan(cChar);
|
|
}
|
|
|
|
int GetKeyboardType(int nTypeFlag)
|
|
{
|
|
dprintf_keyboard(stddeb,"GetKeyboardType(%d)\n",nTypeFlag);
|
|
switch(nTypeFlag)
|
|
{
|
|
case 0: /* Keyboard type */
|
|
return 4; /* AT-101 */
|
|
break;
|
|
case 1: /* Keyboard Subtype */
|
|
return 0; /* There are no defined subtypes */
|
|
break;
|
|
case 2: /* Number of F-keys */
|
|
return 12; /* We're doing an 101 for now, so return 12 F-keys */
|
|
break;
|
|
default:
|
|
fprintf(stderr, "Unknown type on GetKeyboardType\n");
|
|
return 0; /* The book says 0 here, so 0 */
|
|
}
|
|
}
|
|
|
|
/* MapVirtualKey translates keycodes from one format to another. */
|
|
|
|
WORD MapVirtualKey(WORD wCode, WORD wMapType)
|
|
{
|
|
#define returnMVK(value) { dprintf_keyboard(stddeb,"returning 0x%x.\n",value); return value; }
|
|
|
|
dprintf_keyboard(stddeb,"MapVirtualKey wCode=0x%x wMapType=%d ... ",wCode,wMapType);
|
|
switch(wMapType) {
|
|
case 0: { /* vkey-code to scan-code */
|
|
/* let's do vkey -> keycode -> scan */
|
|
KeyCode keyc;
|
|
for (keyc=min_keycode; keyc<=max_keycode; keyc++) /* see event.c */
|
|
if ((keyc2vkey[keyc] & 0xFF)== wCode)
|
|
returnMVK (keyc - 8);
|
|
return 0; }
|
|
|
|
case 1: /* scan-code to vkey-code */
|
|
/* let's do scan -> keycode -> vkey */
|
|
|
|
returnMVK (keyc2vkey[(wCode & 0xFF) + 8]);
|
|
|
|
case 2: { /* vkey-code to unshifted ANSI code */
|
|
/* (was FIXME) : what does unshifted mean ? 'a' or 'A' ? */
|
|
/* My Windows returns 'A'. */
|
|
/* let's do vkey -> keycode -> (XLookupString) ansi char */
|
|
XKeyEvent e;
|
|
KeySym keysym;
|
|
char s[2];
|
|
e.display = display;
|
|
e.state = 0; /* unshifted */
|
|
e.keycode = MapVirtualKey( wCode, 0);
|
|
if (!XLookupString(&e, s , 2 , &keysym, NULL))
|
|
returnMVK (*s);
|
|
|
|
return 0;
|
|
}
|
|
default: /* reserved */
|
|
fprintf(stderr, "MapVirtualKey: unknown wMapType %d !\n",
|
|
wMapType);
|
|
return 0;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int GetKbCodePage(void)
|
|
{
|
|
dprintf_keyboard(stddeb,"GetKbCodePage()\n");
|
|
return 850;
|
|
}
|
|
|
|
/****************************************************************************
|
|
* GetKeyNameText32W (USER32.247)
|
|
*/
|
|
INT32 GetKeyNameText32W(LONG lParam, LPWSTR lpBuffer, INT32 nSize)
|
|
{
|
|
LPSTR buf = xmalloc(nSize);
|
|
int res = GetKeyNameText32A(lParam,buf,nSize);
|
|
|
|
lstrcpynAtoW(lpBuffer,buf,nSize);
|
|
free(buf);
|
|
return res;
|
|
}
|
|
|
|
/****************************************************************************
|
|
* GetKeyNameText32A (USER32.246)
|
|
*/
|
|
INT32 GetKeyNameText32A(LONG lParam, LPSTR lpBuffer, INT32 nSize)
|
|
{
|
|
return GetKeyNameText16(lParam,lpBuffer,nSize);
|
|
}
|
|
|
|
/****************************************************************************
|
|
* GetKeyNameText16 (KEYBOARD.133)
|
|
*/
|
|
INT16 GetKeyNameText16(LONG lParam, LPSTR lpBuffer, INT16 nSize)
|
|
{
|
|
/* int i; */
|
|
|
|
dprintf_keyboard(stddeb,"GetKeyNameText(%ld,<ptr>,%d)\n",lParam,nSize);
|
|
|
|
lParam >>= 16;
|
|
lParam &= 0xff;
|
|
|
|
/* for (i = 0 ; i != KeyTableSize ; i++)
|
|
if (KeyTable[i].scancode == lParam) {
|
|
lstrcpyn32A( lpBuffer, KeyTable[i].name, nSize );
|
|
return strlen(lpBuffer);
|
|
}
|
|
*/
|
|
/* FIXME ! GetKeyNameText is still to do...
|
|
*/
|
|
*lpBuffer = 0;
|
|
return 0;
|
|
}
|
|
|
|
int ToAscii(WORD wVirtKey, WORD wScanCode, LPSTR lpKeyState,
|
|
LPVOID lpChar, WORD wFlags)
|
|
{
|
|
XKeyEvent e;
|
|
KeySym keysym;
|
|
static XComposeStatus cs;
|
|
int ret;
|
|
WORD keyc;
|
|
|
|
e.display = display;
|
|
e.keycode = 0;
|
|
for (keyc=min_keycode; keyc<=max_keycode; keyc++)
|
|
{ /* this could be speeded up by making another table, an array of struct vkey,keycode
|
|
* (vkey -> keycode) with vkeys sorted .... but it takes memory (512*3 bytes)! DF */
|
|
if ((keyc2vkey[keyc] & 0xFF)== wVirtKey) /* no need to make a more precise test (with the extended bit correctly set above wVirtKey ... VK* are different enough... */
|
|
{
|
|
if ((e.keycode) && ((wVirtKey<0x10) || (wVirtKey>0x12)))
|
|
/* it's normal to have 2 shift, control, and alt ! */
|
|
dprintf_keyboard(stddeb,"ToAscii : The keycodes %X and %X are matching the same vkey %X\n",
|
|
e.keycode,keyc,wVirtKey);
|
|
e.keycode = keyc;
|
|
}
|
|
}
|
|
if ((!e.keycode) && (lpKeyState[VK_NUMLOCK] & 0x01))
|
|
{
|
|
if ((wVirtKey>=VK_NUMPAD0) && (wVirtKey<=VK_NUMPAD9))
|
|
e.keycode = XKeysymToKeycode(e.display, wVirtKey-VK_NUMPAD0+XK_KP_0);
|
|
if (wVirtKey==VK_DECIMAL)
|
|
e.keycode = XKeysymToKeycode(e.display, XK_KP_Decimal);
|
|
}
|
|
if (!e.keycode)
|
|
{
|
|
fprintf(stderr,"ToAscii : Unknown virtual key %X !!! \n",wVirtKey);
|
|
return wVirtKey; /* whatever */
|
|
}
|
|
e.state = 0;
|
|
if (lpKeyState[VK_SHIFT] & 0x80)
|
|
e.state |= ShiftMask;
|
|
dprintf_keyboard(stddeb,"ToAscii : lpKeyState[0x14(VK_CAPITAL)]=%#x\n",lpKeyState[VK_CAPITAL]);
|
|
if (lpKeyState[VK_CAPITAL] & 0x01)
|
|
e.state |= LockMask;
|
|
if (lpKeyState[VK_CONTROL] & 0x80)
|
|
if (lpKeyState[VK_MENU] & 0x80)
|
|
e.state |= AltGrMask;
|
|
else
|
|
e.state |= ControlMask;
|
|
if (lpKeyState[VK_NUMLOCK] & 0x01)
|
|
e.state |= NumLockMask;
|
|
dprintf_key(stddeb, "ToAscii(%04X, %04X) : faked state = %X\n",
|
|
wVirtKey, wScanCode, e.state);
|
|
ret = XLookupString(&e, lpChar, 2, &keysym, &cs);
|
|
if (ret == 0)
|
|
{
|
|
BYTE dead_char = 0;
|
|
|
|
((char*)lpChar)[1] = '\0';
|
|
switch (keysym)
|
|
{
|
|
case XK_dead_tilde :
|
|
case 0x1000FE7E : /* Xfree's XK_Dtilde */
|
|
dead_char = '~';
|
|
break;
|
|
case XK_dead_acute :
|
|
case 0x1000FE27 : /* Xfree's XK_Dacute_accent */
|
|
dead_char = 0xb4;
|
|
break;
|
|
case XK_dead_circumflex :
|
|
case 0x1000FE5E : /* Xfree's XK_Dcircumflex_accent */
|
|
dead_char = '^';
|
|
break;
|
|
case XK_dead_grave :
|
|
case 0x1000FE60 : /* Xfree's XK_Dgrave_accent */
|
|
dead_char = '`';
|
|
break;
|
|
case XK_dead_diaeresis :
|
|
case 0x1000FE22 : /* Xfree's XK_Ddiaeresis */
|
|
dead_char = 0xa8;
|
|
break;
|
|
}
|
|
if (dead_char)
|
|
{
|
|
*(char*)lpChar = dead_char;
|
|
ret = -1;
|
|
}
|
|
else
|
|
{
|
|
char *ksname;
|
|
|
|
ksname = XKeysymToString(keysym);
|
|
if (!ksname)
|
|
ksname = "No Name";
|
|
if ((keysym >> 8) != 0xff)
|
|
{
|
|
fprintf(stderr, "Please report : no char for keysym %04lX (%s) :\n",
|
|
keysym, ksname);
|
|
fprintf(stderr, " wVirtKey = %X, wScanCode = %X, keycode = %X, state = %X\n",
|
|
wVirtKey, wScanCode, e.keycode, e.state);
|
|
}
|
|
}
|
|
}
|
|
dprintf_key(stddeb, "ToAscii about to return %d with char %x\n",
|
|
ret, *(char*)lpChar);
|
|
return ret;
|
|
}
|