285 lines
7.9 KiB
C
285 lines
7.9 KiB
C
/*
|
|
* KEYBOARD driver
|
|
*
|
|
* Copyright 1993 Bob Amstadt
|
|
* Copyright 1996 Albrecht Kleine
|
|
* Copyright 1997 David Faure
|
|
* Copyright 1998 Morten Welinder
|
|
* Copyright 1998 Ulrich Weigand
|
|
*
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <ctype.h>
|
|
|
|
#include "winuser.h"
|
|
#include "wine/keyboard16.h"
|
|
#include "win.h"
|
|
#include "heap.h"
|
|
#include "keyboard.h"
|
|
#include "message.h"
|
|
#include "callback.h"
|
|
#include "builtin16.h"
|
|
#include "debugtools.h"
|
|
#include "struct32.h"
|
|
#include "winerror.h"
|
|
|
|
DECLARE_DEBUG_CHANNEL(event)
|
|
DECLARE_DEBUG_CHANNEL(keyboard)
|
|
|
|
/**********************************************************************/
|
|
|
|
KEYBOARD_DRIVER *KEYBOARD_Driver = NULL;
|
|
|
|
static LPKEYBD_EVENT_PROC DefKeybEventProc = NULL;
|
|
LPBYTE pKeyStateTable = NULL;
|
|
|
|
/***********************************************************************
|
|
* KEYBOARD_Inquire (KEYBOARD.1)
|
|
*/
|
|
WORD WINAPI KEYBOARD_Inquire(LPKBINFO kbInfo)
|
|
{
|
|
kbInfo->Begin_First_Range = 0;
|
|
kbInfo->End_First_Range = 0;
|
|
kbInfo->Begin_Second_Range = 0;
|
|
kbInfo->End_Second_Range = 0;
|
|
kbInfo->StateSize = 16;
|
|
|
|
return sizeof(KBINFO);
|
|
}
|
|
|
|
/***********************************************************************
|
|
* KEYBOARD_Enable (KEYBOARD.2)
|
|
*/
|
|
VOID WINAPI KEYBOARD_Enable( LPKEYBD_EVENT_PROC lpKeybEventProc,
|
|
LPBYTE lpKeyState )
|
|
{
|
|
static BOOL initDone = FALSE;
|
|
|
|
THUNK_Free( (FARPROC)DefKeybEventProc );
|
|
|
|
DefKeybEventProc = lpKeybEventProc;
|
|
pKeyStateTable = lpKeyState;
|
|
|
|
/* all states to false */
|
|
memset( lpKeyState, 0, sizeof(lpKeyState) );
|
|
|
|
if (!initDone) KEYBOARD_Driver->pInit();
|
|
initDone = TRUE;
|
|
}
|
|
|
|
static VOID WINAPI KEYBOARD_CallKeybdEventProc( FARPROC16 proc,
|
|
BYTE bVk, BYTE bScan,
|
|
DWORD dwFlags, DWORD dwExtraInfo )
|
|
{
|
|
CONTEXT86 context;
|
|
|
|
memset( &context, 0, sizeof(context) );
|
|
CS_reg(&context) = SELECTOROF( proc );
|
|
EIP_reg(&context) = OFFSETOF( proc );
|
|
AH_reg(&context) = (dwFlags & KEYEVENTF_KEYUP)? 0x80 : 0;
|
|
AL_reg(&context) = bVk;
|
|
BH_reg(&context) = (dwFlags & KEYEVENTF_EXTENDEDKEY)? 1 : 0;
|
|
BL_reg(&context) = bScan;
|
|
SI_reg(&context) = LOWORD( dwExtraInfo );
|
|
DI_reg(&context) = HIWORD( dwExtraInfo );
|
|
|
|
CallTo16RegisterShort( &context, 0 );
|
|
}
|
|
|
|
VOID WINAPI WIN16_KEYBOARD_Enable( FARPROC16 proc, LPBYTE lpKeyState )
|
|
{
|
|
LPKEYBD_EVENT_PROC thunk =
|
|
(LPKEYBD_EVENT_PROC)THUNK_Alloc( proc, (RELAY)KEYBOARD_CallKeybdEventProc );
|
|
|
|
KEYBOARD_Enable( thunk, lpKeyState );
|
|
}
|
|
|
|
/***********************************************************************
|
|
* KEYBOARD_Disable (KEYBOARD.3)
|
|
*/
|
|
VOID WINAPI KEYBOARD_Disable(VOID)
|
|
{
|
|
THUNK_Free( (FARPROC)DefKeybEventProc );
|
|
|
|
DefKeybEventProc = NULL;
|
|
pKeyStateTable = NULL;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* KEYBOARD_SendEvent
|
|
*/
|
|
void KEYBOARD_SendEvent( BYTE bVk, BYTE bScan, DWORD dwFlags,
|
|
DWORD posX, DWORD posY, DWORD time )
|
|
{
|
|
WINE_KEYBDEVENT wke;
|
|
int iWndsLocks;
|
|
|
|
if ( !DefKeybEventProc ) return;
|
|
|
|
TRACE_(event)("(%d,%d,%04lX)\n", bVk, bScan, dwFlags );
|
|
|
|
wke.magic = WINE_KEYBDEVENT_MAGIC;
|
|
wke.posX = posX;
|
|
wke.posY = posY;
|
|
wke.time = time;
|
|
|
|
/* To avoid deadlocks, we have to suspend all locks on windows structures
|
|
before the program control is passed to the keyboard driver */
|
|
iWndsLocks = WIN_SuspendWndsLock();
|
|
DefKeybEventProc( bVk, bScan, dwFlags, (DWORD)&wke );
|
|
WIN_RestoreWndsLock(iWndsLocks);
|
|
}
|
|
|
|
/**********************************************************************
|
|
* SetSpeed16 (KEYBOARD.7)
|
|
*/
|
|
WORD WINAPI SetSpeed16(WORD unused)
|
|
{
|
|
FIXME_(keyboard)("(%04x): stub\n",unused);
|
|
return 0xffff;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* ScreenSwitchEnable (KEYBOARD.100)
|
|
*/
|
|
VOID WINAPI ScreenSwitchEnable16(WORD unused)
|
|
{
|
|
FIXME_(keyboard)("(%04x): stub\n",unused);
|
|
}
|
|
|
|
/**********************************************************************
|
|
* OemKeyScan (KEYBOARD.128)(USER32.401)
|
|
*/
|
|
DWORD WINAPI OemKeyScan(WORD wOemChar)
|
|
{
|
|
TRACE_(keyboard)("*OemKeyScan (%d)\n",wOemChar);
|
|
|
|
return wOemChar;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* VkKeyScan [KEYBOARD.129]
|
|
*/
|
|
/* VkKeyScan translates an ANSI character to a virtual-key and shift code
|
|
* for the current keyboard.
|
|
* high-order byte yields :
|
|
* 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.
|
|
* FIXME : works ok except for dead chars :
|
|
* VkKeyScan '^'(0x5e, 94) ... got keycode 00 ... returning 00
|
|
* VkKeyScan '`'(0x60, 96) ... got keycode 00 ... returning 00
|
|
*/
|
|
|
|
WORD WINAPI VkKeyScan16(CHAR cChar)
|
|
{
|
|
return KEYBOARD_Driver->pVkKeyScan(cChar);
|
|
}
|
|
|
|
/******************************************************************************
|
|
* GetKeyboardType16 (KEYBOARD.130)
|
|
*/
|
|
INT16 WINAPI GetKeyboardType16(INT16 nTypeFlag)
|
|
{
|
|
TRACE_(keyboard)("(%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:
|
|
WARN_(keyboard)("Unknown type\n");
|
|
return 0; /* The book says 0 here, so 0 */
|
|
}
|
|
}
|
|
|
|
/******************************************************************************
|
|
* MapVirtualKey16 (KEYBOARD.131)
|
|
*
|
|
* MapVirtualKey translates keycodes from one format to another
|
|
*/
|
|
UINT16 WINAPI MapVirtualKey16(UINT16 wCode, UINT16 wMapType)
|
|
{
|
|
return KEYBOARD_Driver->pMapVirtualKey(wCode,wMapType);
|
|
}
|
|
|
|
/****************************************************************************
|
|
* GetKBCodePage16 (KEYBOARD.132)
|
|
*/
|
|
INT16 WINAPI GetKBCodePage16(void)
|
|
{
|
|
TRACE_(keyboard)("(void)\n");
|
|
return 850;
|
|
}
|
|
|
|
/****************************************************************************
|
|
* GetKeyNameText16 (KEYBOARD.133)
|
|
*/
|
|
INT16 WINAPI GetKeyNameText16(LONG lParam, LPSTR lpBuffer, INT16 nSize)
|
|
{
|
|
return KEYBOARD_Driver->pGetKeyNameText(lParam, lpBuffer, nSize);
|
|
}
|
|
|
|
/****************************************************************************
|
|
* ToAscii (KEYBOARD.4)
|
|
*
|
|
* The ToAscii function translates the specified virtual-key code and keyboard
|
|
* state to the corresponding Windows character or characters.
|
|
*
|
|
* If the specified key is a dead key, the return value is negative. Otherwise,
|
|
* it is one of the following values:
|
|
* Value Meaning
|
|
* 0 The specified virtual key has no translation for the current state of the keyboard.
|
|
* 1 One Windows character was copied to the buffer.
|
|
* 2 Two characters were copied to the buffer. This usually happens when a
|
|
* dead-key character (accent or diacritic) stored in the keyboard layout cannot
|
|
* be composed with the specified virtual key to form a single character.
|
|
*
|
|
* FIXME : should do the above (return 2 for non matching deadchar+char combinations)
|
|
*
|
|
*/
|
|
INT16 WINAPI ToAscii16(UINT16 virtKey,UINT16 scanCode, LPBYTE lpKeyState,
|
|
LPVOID lpChar, UINT16 flags)
|
|
{
|
|
return KEYBOARD_Driver->pToAscii(
|
|
virtKey, scanCode, lpKeyState, lpChar, flags
|
|
);
|
|
}
|
|
|
|
/***********************************************************************
|
|
* KEYBOARD_GetBeepActive
|
|
*/
|
|
BOOL KEYBOARD_GetBeepActive()
|
|
{
|
|
return KEYBOARD_Driver->pGetBeepActive();
|
|
}
|
|
|
|
/***********************************************************************
|
|
* KEYBOARD_SetBeepActive
|
|
*/
|
|
void KEYBOARD_SetBeepActive(BOOL bActivate)
|
|
{
|
|
KEYBOARD_Driver->pSetBeepActive(bActivate);
|
|
}
|
|
|
|
/***********************************************************************
|
|
* KEYBOARD_Beep
|
|
*/
|
|
void KEYBOARD_Beep(void)
|
|
{
|
|
KEYBOARD_Driver->pBeep();
|
|
}
|
|
|