home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 14 / CD_ASCQ_14_0694.iso / maj / 653 / keywatch.c < prev    next >
C/C++ Source or Header  |  1994-04-03  |  5KB  |  156 lines
  1. /* keywatch.c 12-29-91 Robert Mashlan, Public Domain                *\
  2.  
  3.    DOS compiler portability modifications added by Bob Stout,
  4.    1:106/2000.6
  5.  
  6.    This program monitors the keyboard interrupt, and stores the
  7.    status of each key as to whether it is pressed or released.
  8.  
  9.    This is done by capturing interrupt 9, and watching the make/break
  10.    codes.  The status is updated in the keys array, where 1 means
  11.    that the key is pressed, while 0 means the key is released.  The
  12.    key array is uses the scan code for an index instead of the ascii
  13.    character.  It is simple enough to find the scan code for a key,
  14.    just run this program and watch the display.
  15.  
  16.    The ekeys array will reflect the status of keys found on an AT
  17.    keyboard.  For instance, the left and right alt keys are
  18.    differentiated, as well as the edit control keys on the numeric
  19.    keypad and the one not on the numeric keypad.
  20.  
  21.    Since this program installs an interrupt handler, it should be
  22.    terminated normally, such the keyboard handler can be removed.
  23.    The ^C/^Break exit is captured via signal(), but all possible
  24.    exits should be trapped.
  25.  
  26. \*                                                                  */
  27.  
  28. #include <stdio.h>
  29. #include <dos.h>
  30. #include <conio.h>
  31. #include <signal.h>
  32.  
  33. #define BYTE unsigned char
  34. #if defined(__TURBOC__)
  35.  #define _interrupt interrupt
  36.  #define _far far
  37.  #define IN_PORT(port)           inportb(port)
  38.  #define IN_PORTW(port)          inport(port)
  39.  #define OUT_PORT(port, val)     outportb(port, val)
  40.  #define OUT_PORTW(port, val)    outport(port, val)
  41. #else
  42.  #if defined(__ZTC__)
  43.   #include <int.h>
  44.  #else /* MSC, QC, Watcom */
  45.   #define getvect(n) _dos_getvect(n)
  46.   #define setvect(n,v) _dos_setvect(n,v)
  47.  #endif
  48.  #define IN_PORT(port)           inp(port)
  49.  #define IN_PORTW(port)          inpw(port)
  50.  #define OUT_PORT(port, val)     outp(port, val)
  51.  #define OUT_PORTW(port, val)    outpw(port, val)
  52. #endif
  53.  
  54. volatile char keys[128];           /* array of key states           */
  55. volatile char ekeys[128];          /* array of AT key states        */
  56.  
  57. #define KEYPORT        0x60        /* keyboard scan code port       */
  58. #define keyport()      IN_PORT(KEYPORT)
  59.         /* macro that returns the scancode of the key that caused   */
  60.         /* the interrupt                                            */
  61.  
  62. /* Define:                                                          *\
  63.  
  64.    installisr()
  65.          installation macro, installs newkbisr() in the keyboard
  66.          interrupt chain
  67.  
  68.    removeisr()
  69.          removal macro, call to remove newkbisr() from interrupt
  70.          chain.  oldkbisr()  must be removed before program ends
  71. \*                                                                  */
  72.  
  73. #ifdef __ZTC__
  74.  #define installisr() int_intercept(0x09, newkbisr, 0)
  75.  #define removeisr()  int_restore(0x09);
  76. #else
  77.  #define installisr()  (oldkbisr=getvect(0x09),setvect(0x09,newkbisr))
  78.  #define removeisr()   setvect(0x09,oldkbisr)
  79.  #ifdef __TURBOC__
  80.   void _interrupt (_far *oldkbisr)(void);    /* address of old ISR   */
  81.  #else
  82.   void (_interrupt _far *oldkbisr)(void);    /* address of old ISR   */
  83.  #endif
  84. #endif
  85.  
  86. #ifdef __ZTC__
  87.  int newkbisr(struct INT_DATA *pd)
  88. #elif defined(__TURBOC__)
  89.  void _interrupt newkbisr(void)
  90. #else
  91.  void _interrupt _far newkbisr(void)
  92. #endif
  93. {
  94.       static extkey;
  95.       BYTE scancode = (BYTE)keyport();         /* read keyboard scan code */
  96.  
  97.       if (scancode == 0xe0)
  98.             extkey = 1;               /* use ekey array on next scan code */
  99.       else
  100.       {
  101.             if (scancode & 0x80)                          /* key released */
  102.                   (extkey ? ekeys : keys)[scancode & 0x7f] = 0;
  103.             else  (extkey ? ekeys : keys)[scancode] = 1;
  104.             extkey = 0;
  105.       }
  106.  
  107. #ifdef __ZTC__
  108.       return 0;                         /* chain to previous keyboard ISR */
  109. #else
  110.       oldkbisr();                       /* chain to previous keyboard ISR */
  111. #endif
  112. }
  113.  
  114. int keyspressed(void)           /* returns number of keys being held down */
  115. {
  116.       int i, result = 0;
  117.  
  118.       for (i = 0; i < 128; i++)
  119.       {
  120.             result += keys[i];
  121.             result += ekeys[i];
  122.       }
  123.       return result;
  124. }
  125.  
  126. int main(void)
  127. {
  128.       int lastkeycount = 0;
  129.  
  130.       signal(SIGINT,SIG_IGN);  /* ingnore ^C and ^Break */
  131.       installisr();            /* install interrupt handler */
  132.       while(1)
  133.       {
  134.             int i;
  135.  
  136.             if (keyspressed() != lastkeycount) /* change in keystatus */
  137.             {
  138.                   lastkeycount = keyspressed();
  139.                   puts("---");
  140.                   for(i = 0; i < 128; i++)
  141.                   {
  142.                         if (keys[i])
  143.                               printf("key with scan code %02x "
  144.                                     "has been pressed\n", i);
  145.                         if (ekeys[i])
  146.                               printf("key with scan codes e0 %02x "
  147.                                     "had been pressed\n", i);
  148.                   }
  149.             }
  150.             if (kbhit() && getch()==0x1b) /* terminate when Esc pressed */
  151.                   break;
  152.       }
  153.       removeisr();   /* remove interrupt handler */
  154.       return 0;
  155. }
  156.