windows/keyboard.c

   1 /*
   2  * KEYBOARD driver
   3  *
   4  * Copyright 1993 Bob Amstadt
   5  * Copyright 1996 Albrecht Kleine
   6  * Copyright 1997 David Faure
   7  * Copyright 1998 Morten Welinder
   8  * Copyright 1998 Ulrich Weigand
   9  *
  10  */
  11
  12 #include <stdlib.h>
  13 #include <string.h>
  14 #include <ctype.h>
  15
  16 #include "winuser.h"
  17 #include "wine/keyboard16.h"
  18 #include "win.h"
  19 #include "heap.h"
  20 #include "keyboard.h"
  21 #include "message.h"
  22 #include "debugtools.h"
  23 #include "debugtools.h"
  24 #include "struct32.h"
  25 #include "winerror.h"
  26
  27 DECLARE_DEBUG_CHANNEL(event)
  28 DECLARE_DEBUG_CHANNEL(keyboard)
  29
  30 /**********************************************************************/
  31
  32 KEYBOARD_DRIVER *KEYBOARD_Driver = NULL;
  33
  34 static LPKEYBD_EVENT_PROC DefKeybEventProc = NULL;
  35 LPBYTE pKeyStateTable = NULL;
  36
  37 /***********************************************************************
  38  *           KEYBOARD_Inquire                   (KEYBOARD.1)
  39  */
  40 WORD WINAPI KEYBOARD_Inquire(LPKBINFO kbInfo)
  41 {
  42   kbInfo->Begin_First_Range = 0;
  43   kbInfo->End_First_Range = 0;
  44   kbInfo->Begin_Second_Range = 0;
  45   kbInfo->End_Second_Range = 0;
  46   kbInfo->StateSize = 16;
  47
  48   return sizeof(KBINFO);
  49 }
  50
  51 /***********************************************************************
  52  *           KEYBOARD_Enable                    (KEYBOARD.2)
  53  */
  54 VOID WINAPI KEYBOARD_Enable( LPKEYBD_EVENT_PROC lpKeybEventProc,
  55                              LPBYTE lpKeyState )
  56 {
  57   static BOOL initDone = FALSE;
  58
  59   DefKeybEventProc = lpKeybEventProc;
  60   pKeyStateTable = lpKeyState;
  61
  62   /* all states to false */
  63   memset( lpKeyState, 0, sizeof(lpKeyState) );
  64
  65   if (!initDone) KEYBOARD_Driver->pInit();
  66   initDone = TRUE;
  67 }
  68
  69 /***********************************************************************
  70  *           KEYBOARD_Disable                   (KEYBOARD.3)
  71  */
  72 VOID WINAPI KEYBOARD_Disable(VOID)
  73 {
  74   DefKeybEventProc = NULL;
  75   pKeyStateTable = NULL;
  76 }
  77
  78 /***********************************************************************
  79  *           KEYBOARD_SendEvent
  80  */
  81 void KEYBOARD_SendEvent( BYTE bVk, BYTE bScan, DWORD dwFlags,
  82                          DWORD posX, DWORD posY, DWORD time )
  83 {
  84   WINE_KEYBDEVENT wke;
  85   int iWndsLocks;
  86
  87   if ( !DefKeybEventProc ) return;
  88
  89   TRACE_(event)("(%d,%d,%04lX)\n", bVk, bScan, dwFlags );
  90
  91   wke.magic = WINE_KEYBDEVENT_MAGIC;
  92   wke.posX  = posX;
  93   wke.posY  = posY;
  94   wke.time  = time;
  95
  96   /* To avoid deadlocks, we have to suspend all locks on windows structures
  97      before the program control is passed to the keyboard driver */
  98   iWndsLocks = WIN_SuspendWndsLock();
  99   DefKeybEventProc( bVk, bScan, dwFlags, (DWORD)&wke );
 100   WIN_RestoreWndsLock(iWndsLocks);
 101 }
 102
 103 /**********************************************************************
 104  *           SetSpeed16      (KEYBOARD.7)
 105  */
 106 WORD WINAPI SetSpeed16(WORD unused)
 107 {
 108     FIXME_(keyboard)("(%04x): stub\n",unused);
 109     return 0xffff;
 110 }
 111
 112 /**********************************************************************
 113  *           ScreenSwitchEnable      (KEYBOARD.100)
 114  */
 115 VOID WINAPI ScreenSwitchEnable16(WORD unused)
 116 {
 117   FIXME_(keyboard)("(%04x): stub\n",unused);
 118 }
 119
 120 /**********************************************************************
 121  *           OemKeyScan      (KEYBOARD.128)(USER32.401)
 122  */
 123 DWORD WINAPI OemKeyScan(WORD wOemChar)
 124 {
 125   TRACE_(keyboard)("*OemKeyScan (%d)\n",wOemChar);
 126
 127   return wOemChar;
 128 }
 129
 130 /**********************************************************************
 131  *      VkKeyScan                       [KEYBOARD.129]
 132  */
 133 /* VkKeyScan translates an ANSI character to a virtual-key and shift code
 134  * for the current keyboard.
 135  * high-order byte yields :
 136  *      0       Unshifted
 137  *      1       Shift
 138  *      2       Ctrl
 139  *      3-5     Shift-key combinations that are not used for characters
 140  *      6       Ctrl-Alt
 141  *      7       Ctrl-Alt-Shift
 142  *      I.e. :  Shift = 1, Ctrl = 2, Alt = 4.
 143  * FIXME : works ok except for dead chars :
 144  * VkKeyScan '^'(0x5e, 94) ... got keycode 00 ... returning 00
 145  * VkKeyScan '`'(0x60, 96) ... got keycode 00 ... returning 00
 146  */
 147
 148 WORD WINAPI VkKeyScan16(CHAR cChar)
 149 {
 150   return KEYBOARD_Driver->pVkKeyScan(cChar);
 151 }
 152
 153 /******************************************************************************
 154  *      GetKeyboardType16      (KEYBOARD.130)
 155  */
 156 INT16 WINAPI GetKeyboardType16(INT16 nTypeFlag)
 157 {
 158   TRACE_(keyboard)("(%d)\n",nTypeFlag);
 159   switch(nTypeFlag)
 160     {
 161     case 0:      /* Keyboard type */
 162       return 4;    /* AT-101 */
 163       break;
 164     case 1:      /* Keyboard Subtype */
 165       return 0;    /* There are no defined subtypes */
 166       break;
 167     case 2:      /* Number of F-keys */
 168       return 12;   /* We're doing an 101 for now, so return 12 F-keys */
 169       break;
 170     default:
 171       WARN_(keyboard)("Unknown type\n");
 172       return 0;    /* The book says 0 here, so 0 */
 173     }
 174 }
 175
 176 /******************************************************************************
 177  *      MapVirtualKey16      (KEYBOARD.131)
 178  *
 179  * MapVirtualKey translates keycodes from one format to another
 180  */
 181 UINT16 WINAPI MapVirtualKey16(UINT16 wCode, UINT16 wMapType)
 182 {
 183   return KEYBOARD_Driver->pMapVirtualKey(wCode,wMapType);
 184 }
 185
 186 /****************************************************************************
 187  *      GetKBCodePage16   (KEYBOARD.132)
 188  */
 189 INT16 WINAPI GetKBCodePage16(void)
 190 {
 191   TRACE_(keyboard)("(void)\n");
 192   return 850;
 193 }
 194
 195 /****************************************************************************
 196  *      GetKeyNameText16   (KEYBOARD.133)
 197  */
 198 INT16 WINAPI GetKeyNameText16(LONG lParam, LPSTR lpBuffer, INT16 nSize)
 199 {
 200   return KEYBOARD_Driver->pGetKeyNameText(lParam, lpBuffer, nSize);
 201 }
 202
 203 /****************************************************************************
 204  *      ToAscii   (KEYBOARD.4)
 205  *
 206  * The ToAscii function translates the specified virtual-key code and keyboard
 207  * state to the corresponding Windows character or characters.
 208  *
 209  * If the specified key is a dead key, the return value is negative. Otherwise,
 210  * it is one of the following values:
 211  * Value        Meaning
 212  * 0    The specified virtual key has no translation for the current state of the keyboard.
 213  * 1    One Windows character was copied to the buffer.
 214  * 2    Two characters were copied to the buffer. This usually happens when a
 215  *      dead-key character (accent or diacritic) stored in the keyboard layout cannot
 216  *      be composed with the specified virtual key to form a single character.
 217  *
 218  * FIXME : should do the above (return 2 for non matching deadchar+char combinations)
 219  *
 220  */
 221 INT16 WINAPI ToAscii16(UINT16 virtKey,UINT16 scanCode, LPBYTE lpKeyState,
 222                        LPVOID lpChar, UINT16 flags)
 223 {
 224     return KEYBOARD_Driver->pToAscii(
 225         virtKey, scanCode, lpKeyState, lpChar, flags
 226     );
 227 }
 228
 229 /***********************************************************************
 230  *              KEYBOARD_GetBeepActive
 231  */
 232 BOOL KEYBOARD_GetBeepActive()
 233 {
 234   return KEYBOARD_Driver->pGetBeepActive();
 235 }
 236
 237 /***********************************************************************
 238  *              KEYBOARD_SetBeepActive
 239  */
 240 void KEYBOARD_SetBeepActive(BOOL bActivate)
 241 {
 242   KEYBOARD_Driver->pSetBeepActive(bActivate);
 243 }
 244
 245 /***********************************************************************
 246  *              KEYBOARD_Beep
 247  */
 248 void KEYBOARD_Beep(void)
 249 {
 250   KEYBOARD_Driver->pBeep();
 251 }
 252