misc/keyboard.c

   1 /*
   2 static char RCSId[] = "$Id: keyboard.c,v 1.2 1993/09/13 18:52:02 scott Exp $";
   3 static char Copyright[] = "Copyright  Scott A. Laird, Erik Bos  1993, 1994";
   4 */
   5
   6 #include <stdlib.h>
   7 #include <stdio.h>
   8 #include <string.h>
   9 #include "prototypes.h"
  10 #include "windows.h"
  11 #include "keyboard.h"
  12 #include "stddebug.h"
  13 /* #define DEBUG_KEYBOARD */
  14 #include "debug.h"
  15
  16 int ToAscii(WORD wVirtKey, WORD wScanCode, LPSTR lpKeyState,
  17         LPVOID lpChar, WORD wFlags)
  18 {
  19         int i;
  20
  21         dprintf_keyboard(stddeb,"ToAscii (%d,%d)\n",wVirtKey, wScanCode);
  22
  23         /* FIXME: this is not sufficient but better than returing -1 */
  24
  25         for (i = 0 ; i != KeyTableSize ; i++)
  26                 if (KeyTable[i].virtualkey == wVirtKey)  {
  27                         *(BYTE*)lpChar++ = *KeyTable[i].name;
  28                         *(BYTE*)lpChar = 0;
  29                         return 1;
  30                 }
  31
  32         *(BYTE*)lpChar = 0;
  33         return 0;
  34 }
  35
  36 DWORD OemKeyScan(WORD wOemChar)
  37 {
  38     dprintf_keyboard(stddeb,"*OemKeyScan (%d)\n",wOemChar);
  39
  40         return wOemChar;
  41 }
  42
  43 /* VkKeyScan translates an ANSI character to a virtual-key and shift code
  44  * for the current keyboard. */
  45
  46 WORD VkKeyScan(WORD cChar)
  47 {
  48         int i;
  49
  50         dprintf_keyboard(stddeb,"VkKeyScan (%d)\n",cChar);
  51
  52         for (i = 0 ; i != KeyTableSize ; i++)
  53                 if (KeyTable[i].ASCII == cChar)
  54                         return KeyTable[i].virtualkey;
  55
  56         return -1;
  57 }
  58
  59 int GetKeyboardType(int nTypeFlag)
  60 {
  61   dprintf_keyboard(stddeb,"GetKeyboardType(%d)\n",nTypeFlag);
  62   switch(nTypeFlag)
  63     {
  64     case 0:      /* Keyboard type */
  65       return 4;    /* AT-101 */
  66       break;
  67     case 1:      /* Keyboard Subtype */
  68       return 0;    /* There are no defined subtypes */
  69       break;
  70     case 2:      /* Number of F-keys */
  71       return 12;   /* We're doing an 101 for now, so return 12 F-keys */
  72       break;
  73     default:
  74       fprintf(stderr, "Unknown type on GetKeyboardType\n");
  75       return 0;    /* The book says 0 here, so 0 */
  76     }
  77 }
  78
  79 /* MapVirtualKey translates keycodes from one format to another. */
  80
  81 WORD MapVirtualKey(WORD wCode, WORD wMapType)
  82 {
  83         int i;
  84
  85         switch(wMapType) {
  86                 case 0:
  87                         for (i = 0 ; i != KeyTableSize ; i++)
  88                                 if (KeyTable[i].virtualkey == wCode)
  89                                         return KeyTable[i].scancode;
  90                         return 0;
  91
  92                 case 1:
  93                         for (i = 0 ; i != KeyTableSize ; i++)
  94                                 if (KeyTable[i].scancode == wCode)
  95                                         return KeyTable[i].virtualkey;
  96                         return 0;
  97
  98                 case 2:
  99                         for (i = 0 ; i != KeyTableSize ; i++)
 100                                 if (KeyTable[i].virtualkey == wCode)
 101                                         return KeyTable[i].ASCII;
 102                         return 0;
 103
 104                 default:
 105                         fprintf(stderr, "MapVirtualKey: unknown wMapType!\n");
 106                         return 0;
 107         }
 108         return 0;
 109 }
 110
 111 int GetKbCodePage(void)
 112 {
 113         dprintf_keyboard(stddeb,"GetKbCodePage()\n");
 114         return 850;
 115 }
 116
 117 int GetKeyNameText(LONG lParam, LPSTR lpBuffer, int nSize)
 118 {
 119         int i;
 120
 121         dprintf_keyboard(stddeb,"GetKeyNameText(%ld,<ptr>,%d)\n",lParam,nSize);
 122
 123         lParam >>= 16;
 124         lParam &= 0xff;
 125
 126         for (i = 0 ; i != KeyTableSize ; i++)
 127                 if (KeyTable[i].scancode == lParam)  {
 128                         strncpy(lpBuffer, KeyTable[i].name, nSize);
 129                         return strlen(lpBuffer);
 130                 }
 131
 132         *lpBuffer = 0;
 133         return 0;
 134 }