/* static char RCSId[] = "$Id: keyboard.c,v 1.2 1993/09/13 18:52:02 scott Exp $"; static char Copyright[] = "Copyright Scott A. Laird, Erik Bos 1993, 1994"; */ #include #include #include #include #include "windows.h" #include "keyboard.h" #include "stddebug.h" /* #define DEBUG_KEYBOARD */ #include "debug.h" #include "xmalloc.h" struct KeyTableEntry { int virtualkey; int ASCII; int scancode; const char *name; }; static const struct KeyTableEntry KeyTable[] = { { VK_CANCEL, 0x3, 0, "" }, { VK_BACK, 0x8, 0xe, "Backspace" }, { VK_TAB, 0x9, 0xf, "Tab" }, { VK_CLEAR, 0, 0x4c, "Clear" }, { VK_RETURN, 0xd, 0x1c, "Enter" }, { VK_SHIFT, 0, 0x2a, "Shift" }, { VK_CONTROL, 0, 0x1d, "Ctrl" }, { VK_MENU, 0, 0x38, "Alt" }, { VK_CAPITAL, 0, 0x3a, "Caps Lock" }, { VK_ESCAPE, 0x1b, 0x1, "Esc" }, { VK_SPACE, 0x20, 0x39, "Space" }, { VK_PRIOR, 0, 0x49, "Page Up" }, { VK_NEXT, 0, 0x51, "Page Down" }, { VK_END, 0, 0x4f, "End" }, { VK_HOME, 0, 0x47, "Home" }, { VK_LEFT, 0, 0x4b, "Left Arrow" }, { VK_UP, 0, 0x48, "Up Arrow" }, { VK_RIGHT, 0, 0x4d, "Right Arrow" }, { VK_DOWN, 0, 0x50, "Down Arrow" }, { VK_INSERT, 0, 0x52, "Ins" }, { VK_DELETE, 0, 0x53, "Del" }, { VK_0, 0x30, 0xb, "0" }, { VK_1, 0x31, 0x2, "1" }, { VK_2, 0x32, 0x3, "2" }, { VK_3, 0x33, 0x4, "3" }, { VK_4, 0x34, 0x5, "4" }, { VK_5, 0x35, 0x6, "5" }, { VK_6, 0x36, 0x7, "6" }, { VK_7, 0x37, 0x8, "7" }, { VK_8, 0x38, 0x9, "8" }, { VK_9, 0x39, 0xa, "9" }, { VK_A, 0x41, 0x1e, "A" }, { VK_B, 0x42, 0x30, "B" }, { VK_C, 0x43, 0x2e, "C" }, { VK_D, 0x44, 0x20, "D" }, { VK_E, 0x45, 0x12, "E" }, { VK_F, 0x46, 0x21, "F" }, { VK_G, 0x47, 0x22, "G" }, { VK_H, 0x48, 0x23, "H" }, { VK_I, 0x49, 0x17, "I" }, { VK_J, 0x4a, 0x24, "J" }, { VK_K, 0x4b, 0x25, "K" }, { VK_L, 0x4c, 0x26, "L" }, { VK_M, 0x4d, 0x32, "M" }, { VK_N, 0x4e, 0x31, "N" }, { VK_O, 0x4f, 0x18, "O" }, { VK_P, 0x50, 0x19, "P" }, { VK_Q, 0x51, 0x10, "Q" }, { VK_R, 0x52, 0x13, "R" }, { VK_S, 0x53, 0x1f, "S" }, { VK_T, 0x54, 0x14, "T" }, { VK_U, 0x55, 0x16, "U" }, { VK_V, 0x56, 0x2f, "V" }, { VK_W, 0x57, 0x11, "W" }, { VK_X, 0x58, 0x2d, "X" }, { VK_Y, 0x59, 0x15, "Y" }, { VK_Z, 0x5a, 0x2c, "Z" }, { VK_NUMPAD0, 0, 0x52, "Num 0" }, { VK_NUMPAD1, 0, 0x4f, "Num 1" }, { VK_NUMPAD2, 0, 0x50, "Num 2" }, { VK_NUMPAD3, 0, 0x51, "Num 3" }, { VK_NUMPAD4, 0, 0x4b, "Num 4" }, { VK_NUMPAD5, 0, 0x4c, "Num 5" }, { VK_NUMPAD6, 0, 0x4d, "Num 6" }, { VK_NUMPAD7, 0, 0x47, "Num 7" }, { VK_NUMPAD8, 0, 0x48, "Num 8" }, { VK_NUMPAD9, 0, 0x49, "Num 9" }, { VK_MULTIPLY, 0x2a, 0x37, "Num *" }, { VK_ADD, 0x2b, 0x4e, "Num +" }, { VK_SEPARATOR, 0, 0, "" }, { VK_SUBTRACT, 0x2d, 0x4a, "Num -" }, { VK_DECIMAL, 0x2e, 0x53, "Num Del" }, { VK_DIVIDE, 0x2f, 0, "Num /" }, { VK_F1, 0, 0x3b, "F1" }, { VK_F2, 0, 0x3c, "F2" }, { VK_F3, 0, 0x3d, "F3" }, { VK_F4, 0, 0x3e, "F4" }, { VK_F5, 0, 0x3f, "F5" }, { VK_F6, 0, 0x40, "F6" }, { VK_F7, 0, 0x41, "F7" }, { VK_F8, 0, 0x42, "F8" }, { VK_F9, 0, 0x43, "F9" }, { VK_F10, 0, 0x44, "F10" }, { VK_F11, 0, 0x57, "F11" }, { VK_F12, 0, 0x58, "F12" }, { VK_NUMLOCK, 0, 0x45, "Num Lock" }, { VK_SCROLL, 0, 0x46, "Scroll Lock" }, /* Allowable ranges for OEM-specific virtual-key codes */ /* - 0xBA-0xC0 OEM specific */ { 0xba, 0x3b, 0x27, ";" }, { 0xbb, 0x3d, 0xd, "=" }, { 0xbc, 0x2c, 0x33, "," }, { 0xbd, 0x2d, 0xc, "-" }, { 0xbe, 0x2e, 0x34, "." }, { 0xbf, 0x2f, 0x35, "/" }, { 0xc0, 0x60, 0x29, "`" }, /* - 0xDB-0xE4 OEM specific */ { 0xdb, 0x5b, 0x1a, "[" }, { 0xdc, 0x5c, 0x2b, "\\" }, { 0xdd, 0x5d, 0x1b, "]" }, { 0xde, 0x27, 0x28, "'" }, { 0xe2, 0x5c, 0x56, "\\" }, /* - 0xE6 OEM specific */ /* - 0xE9-0xF5 OEM specific */ }; #define KeyTableSize sizeof(KeyTable) / sizeof(struct KeyTableEntry) int ToAscii(WORD wVirtKey, WORD wScanCode, LPSTR lpKeyState, LPVOID lpChar, WORD wFlags) { #if 1 return EVENT_ToAscii(wVirtKey, wScanCode, lpKeyState, lpChar, wFlags); #else char shift = lpKeyState[VK_SHIFT] < 0; int i; dprintf_keyboard(stddeb, "ToAscii (%x,%x) -> ", wVirtKey, wScanCode); /* FIXME: codepage is broken */ *(BYTE*)lpChar = 0; switch (wVirtKey) { #define vkcase2(k1,k2,val) case val : *(BYTE*)lpChar = shift ? k2 : k1; break; #define vkcase(k, val) vkcase2(val, k, val) WINE_VKEY_MAPPINGS #undef vkcase #undef vkcase2 default : for (i = 0 ; ; i++) { if (i == KeyTableSize) { dprintf_keyboard(stddeb, "0\n"); return 0; } if (KeyTable[i].virtualkey == wVirtKey) { if (!isprint(KeyTable[i].ASCII) && !isspace(KeyTable[i].ASCII)) { dprintf_keyboard(stddeb, "0\n"); return 0; } dprintf_keyboard(stddeb,"\"%s\" ", KeyTable[i].name); *(BYTE*)lpChar = KeyTable[i].ASCII; *(((BYTE*)lpChar) + 1) = 0; if (isalpha(*(BYTE*)lpChar)) if( (lpKeyState[VK_CAPITAL]<0 && !lpKeyState[VK_SHIFT]) || (!lpKeyState[VK_CAPITAL] && lpKeyState[VK_SHIFT]<0) ) *(BYTE*)lpChar = toupper( *(BYTE*)lpChar ); else *(BYTE*)lpChar = tolower( *(BYTE*)lpChar ); break; } } } if (lpKeyState[VK_CONTROL] < 0) *(BYTE*)lpChar = *(BYTE*)lpChar & 0x1f; dprintf_keyboard(stddeb, "1 (%x)\n", *(BYTE*)lpChar); return 1; #endif } 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) { int i; dprintf_keyboard(stddeb,"VkKeyScan (%d)\n",cChar); for (i = 0 ; i != KeyTableSize ; i++) if (KeyTable[i].ASCII == cChar) return KeyTable[i].virtualkey; return -1; } 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) { int i; switch(wMapType) { case 0: /* vkey-code to scan-code */ for (i = 0 ; i != KeyTableSize ; i++) if (KeyTable[i].virtualkey == wCode) return KeyTable[i].scancode; return 0; case 1: /* scan-code to vkey-code */ for (i = 0 ; i != KeyTableSize ; i++) if (KeyTable[i].scancode == wCode) return KeyTable[i].virtualkey; return 0; case 2: /* vkey-code to unshifted ANSI code */ /* FIXME : what does unshifted mean ? 'a' or 'A' ? */ for (i = 0 ; i != KeyTableSize ; i++) if (KeyTable[i].virtualkey == wCode) return KeyTable[i].ASCII; 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,,%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); } *lpBuffer = 0; return 0; }