home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 581b.lha / GetKeyMap / GetKeyMap.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-12-02  |  4.3 KB  |  193 lines
  1. /* include files */
  2.  
  3. #include <intuition/intuition.h>
  4. #include <devices/keymap.h>
  5. #include <devices/console.h>
  6. #include <string.h>
  7.  
  8. struct IntuitionBase * GKM_IntuitionBase;
  9.  
  10. #define INT_REV 0
  11.  
  12. /* These ports are neccessary to open the console device to get the current
  13.    keymap */
  14.      
  15. struct MsgPort * CreatePort();
  16. struct IOStdReq * CreateStdIO();
  17. void DeletePort();
  18. void DeleteStdIO();
  19. short openerror;
  20.  
  21. struct MsgPort * ConPort;
  22. struct IOStdReq * ConMsg;
  23.  
  24. /* The keymap that the console will return is not changeable.  I tried.
  25.    First we get the keymap that the console returns and then copy it into
  26.      the keymap structure that you passed to the GetKeyMap function.  This
  27.      structure with hold the one that the console returns. */
  28.      
  29. struct KeyMap nochange_keymap;
  30.  
  31. /* Following is a clean exit routine. */
  32.  
  33. void GKM_Close_All()
  34. {
  35.     if(!openerror) CloseDevice(ConMsg);
  36.     if(ConMsg) DeleteStdIO(ConMsg);
  37.     if(ConPort) DeletePort(ConPort);
  38.     if(GKM_IntuitionBase) CloseLibrary(GKM_IntuitionBase);
  39. }
  40.  
  41. /* Here we open the libraries, port and message. */
  42.  
  43. BOOL GKM_Open_All()
  44. {
  45.     if((GKM_IntuitionBase = (struct IntuitionBase *)
  46.             OpenLibrary("intuition.library", INT_REV)) == NULL)
  47.     {
  48.         GKM_Close_All();
  49.         return(FALSE);
  50.     }
  51.     
  52.     if(!(ConPort = CreatePort(0L, 0L)))
  53.     {
  54.         GKM_Close_All();
  55.         return(FALSE);
  56.     }
  57.     
  58.     if(!(ConMsg = CreateStdIO(ConPort)))
  59.     {
  60.         GKM_Close_All();
  61.         return(FALSE);
  62.     }
  63.     return(TRUE);
  64. }
  65.  
  66. /* This function sends a command to the console device.  And checks for 
  67.    errors. */
  68.  
  69. BOOL DoIt(UWORD cmd, ULONG len, APTR ptr)
  70. {
  71.     BYTE Error;
  72.     
  73.     ConMsg->io_Command = cmd;
  74.     ConMsg->io_Length = len;
  75.     ConMsg->io_Data = ptr;
  76.     
  77.     DoIO(ConMsg);
  78.     
  79.     Error = ConMsg->io_Error;
  80.     
  81.     if(Error)
  82.     {
  83.         GKM_Close_All();
  84.         return(FALSE);
  85.     }
  86.     return(TRUE);
  87. }
  88.  
  89. /* The console device needs a window to receive and send data through.  Here
  90.    is a small window off of the workbench. */
  91.      
  92. struct Window * GKM_Window()
  93. {
  94.     struct NewWindow nw;
  95.     
  96.     nw.LeftEdge = 0;
  97.     nw.TopEdge = 0;
  98.     nw.Width = 10;
  99.     nw.Height = 10;
  100.     nw.DetailPen = 1;
  101.     nw.BlockPen = 1;
  102.     nw.Flags = NULL;
  103.     nw.IDCMPFlags = NULL;
  104.     nw.FirstGadget = NULL;
  105.     nw.CheckMark = NULL;
  106.     nw.Title = NULL;
  107.     nw.Screen = NULL;
  108.     nw.BitMap = NULL;
  109.     nw.MinWidth = 0;
  110.     nw.MinHeight = 0;
  111.     nw.MaxWidth = 0;
  112.     nw.MaxHeight = 0;
  113.     nw.Type = WBENCHSCREEN;
  114.     
  115.     return((struct Window *) OpenWindow(&nw));
  116. }
  117.  
  118. /* This is the actual function. */
  119.  
  120. BOOL GetKeyMap(struct KeyMap * your_keymap)
  121. {
  122.     /* Structure pointer for our small window. */
  123.     
  124.     struct Window * Wnd;
  125.     
  126.     /* Open everthing. */
  127.                                                     
  128.     if(!GKM_Open_All()) return(FALSE);
  129.     
  130.     /* Open our window.  You will see that it does not stay open any longer
  131.        than the time that we need it. */
  132.          
  133.     if((Wnd = GKM_Window()) == NULL)
  134.     {
  135.         GKM_Close_All();
  136.         return(FALSE);
  137.     }
  138.     
  139.     /* Assign the window pointer to the IO message for the console open. */
  140.     
  141.     ConMsg->io_Data = (APTR)Wnd;
  142.     
  143.     /* Open the console device and check for errors. */
  144.     
  145.     if(openerror = OpenDevice("console.device", 0L, ConMsg, 0L))
  146.     {
  147.         GKM_Close_All();
  148.         return(FALSE);
  149.     }
  150.     
  151.     /* Ask the console device to return the current keymap in the
  152.        non-changeable structure. */
  153.          
  154.     if(!DoIt(CD_ASKKEYMAP, sizeof(struct KeyMap), (APTR)&nochange_keymap))
  155.         return(FALSE);
  156.  
  157.     /* Copy the non-changeable structure into the structure that was supplied
  158.        to the function. */
  159.          
  160.     memcpy((char *)your_keymap->km_LoKeyMapTypes,
  161.                     (char *) nochange_keymap.km_LoKeyMapTypes,
  162.                     sizeof(UBYTE) * 0x40);
  163.     memcpy((char *)your_keymap->km_LoKeyMap,
  164.                     (char *) nochange_keymap.km_LoKeyMap,
  165.                     sizeof(ULONG) * 0x40);
  166.     memcpy((char *)your_keymap->km_LoCapsable,
  167.                     (char *) nochange_keymap.km_LoCapsable,
  168.                     sizeof(UBYTE) * 8);
  169.     memcpy((char *)your_keymap->km_LoRepeatable,
  170.                     (char *) nochange_keymap.km_LoRepeatable,
  171.                     sizeof(UBYTE) * 8);
  172.  
  173.     memcpy((char *)your_keymap->km_HiKeyMapTypes,
  174.                     (char *) nochange_keymap.km_HiKeyMapTypes,
  175.                     sizeof(UBYTE) * 0x40);
  176.     memcpy((char *)your_keymap->km_HiKeyMap,
  177.                     (char *) nochange_keymap.km_HiKeyMap,
  178.                     sizeof(ULONG) * 0x40);
  179.     memcpy((char *)your_keymap->km_HiCapsable,
  180.                     (char *) nochange_keymap.km_HiCapsable,
  181.                     sizeof(UBYTE) * 8);
  182.     memcpy((char *)your_keymap->km_HiRepeatable,
  183.                     (char *) nochange_keymap.km_HiRepeatable,
  184.                     sizeof(UBYTE) * 8);
  185.     
  186.     /* Here we end the short life-span of our little window and close up shop.
  187.        Non of the openned libraries or console device has to remain open. */
  188.          
  189.     CloseWindow(Wnd);
  190.     GKM_Close_All();
  191.     return(TRUE);
  192. }
  193.