freeglut_input_devices.c
上传用户:gb3593
上传日期:2022-01-07
资源大小:3028k
文件大小:11k
源码类别:

游戏引擎

开发平台:

Visual C++

  1. /*
  2.  * freeglut_input_devices.c
  3.  *
  4.  * Handles miscellaneous input devices via direct serial-port access.
  5.  * Proper X11 XInput device support is not yet supported.
  6.  * Also lacks Mac support.
  7.  *
  8.  * Written by Joe Krahn <krahn@niehs.nih.gov> 2005
  9.  *
  10.  * Copyright (c) 2005 Stephen J. Baker. All Rights Reserved.
  11.  *
  12.  * Permission is hereby granted, free of charge, to any person obtaining a
  13.  * copy of this software and associated documentation files (the "Software"),
  14.  * to deal in the Software without restriction, including without limitation
  15.  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
  16.  * and/or sell copies of the Software, and to permit persons to whom the
  17.  * Software is furnished to do so, subject to the following conditions:
  18.  *
  19.  * The above copyright notice and this permission notice shall be included
  20.  * in all copies or substantial portions of the Software.
  21.  *
  22.  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  23.  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  24.  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
  25.  * PAWEL W. OLSZTA OR STEPHEN J. BAKER BE LIABLE FOR ANY CLAIM, DAMAGES OR
  26.  * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
  27.  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
  28.  * DEALINGS IN THE SOFTWARE.
  29.  */
  30. #ifdef HAVE_CONFIG_H
  31. #    include "config.h"
  32. #endif
  33. #include <GL/freeglut.h>
  34. #include "freeglut_internal.h"
  35. #if TARGET_HOST_POSIX_X11
  36. #if HAVE_ERRNO
  37. #include <errno.h>
  38. #endif
  39. #include <sys/ioctl.h>
  40. #include <sys/time.h>
  41. #include <time.h>
  42. #include <stdio.h>
  43. #include <stdlib.h>
  44. #include <unistd.h>
  45. #include <string.h>
  46. #include <termios.h>
  47. #include <fcntl.h>
  48. #include <sys/types.h>
  49. typedef struct {
  50.    int fd;
  51.    struct termios termio, termio_save;
  52. } SERIALPORT;
  53. #elif TARGET_HOST_MS_WINDOWS
  54. #include <sys/types.h>
  55. #include <winbase.h>
  56. typedef struct {
  57.    HANDLE fh;
  58.    COMMTIMEOUTS timeouts_save;
  59.    DCB dcb_save;
  60. } SERIALPORT;
  61. #endif
  62. /********************* Dialbox definitions ***********************/
  63. #define DIAL_NUM_VALUATORS 8
  64. /* dial parser state machine states */
  65. #define DIAL_NEW                (-1)
  66. #define DIAL_WHICH_DEVICE       0
  67. #define DIAL_VALUE_HIGH         1
  68. #define DIAL_VALUE_LOW          2
  69. /* dial/button box commands */
  70. #define DIAL_INITIALIZE                 0x20
  71. #define DIAL_SET_LEDS                   0x75
  72. #define DIAL_SET_TEXT                   0x61
  73. #define DIAL_SET_AUTO_DIALS             0x50
  74. #define DIAL_SET_AUTO_DELTA_DIALS       0x51
  75. #define DIAL_SET_FILTER                 0x53
  76. #define DIAL_SET_BUTTONS_MOM_TYPE       0x71
  77. #define DIAL_SET_AUTO_MOM_BUTTONS       0x73
  78. #define DIAL_SET_ALL_LEDS               0x4b
  79. #define DIAL_CLEAR_ALL_LEDS             0x4c
  80. /* dial/button box replies and events */
  81. #define DIAL_INITIALIZED        0x20
  82. #define DIAL_BASE               0x30
  83. #define DIAL_DELTA_BASE         0x40
  84. #define DIAL_PRESS_BASE         0xc0
  85. #define DIAL_RELEASE_BASE       0xe0
  86. /* macros to determine reply type */
  87. #define IS_DIAL_EVENT(ch)       (((ch)>=DIAL_BASE)&&((ch)<DIAL_BASE+DIAL_NUM_VALUATORS))
  88. #define IS_KEY_PRESS(ch)        (((ch)>=DIAL_PRESS_BASE)&&((ch)<DIAL_PRESS_BASE+DIAL_NUM_BUTTONS))
  89. #define IS_KEY_RELEASE(ch)      (((ch)>=DIAL_RELEASE_BASE)&&((ch)<DIAL_RELEASE_BASE+DIAL_NUM_BUTTONS))
  90. #define IS_INIT_EVENT(ch)       ((ch)==DIAL_INITIALIZED)
  91. /*****************************************************************/
  92. static SERIALPORT *serial_open ( const char *device );
  93. static void serial_close ( SERIALPORT *port );
  94. static int serial_getchar ( SERIALPORT *port );
  95. static int serial_putchar ( SERIALPORT *port, unsigned char ch );
  96. static void serial_flush ( SERIALPORT *port );
  97. static void send_dial_event(int dial, int value);
  98. static void poll_dials(int id);
  99. /* local variables */
  100. static SERIALPORT *dialbox_port=NULL;
  101. /*****************************************************************/
  102. /*
  103.  * Implementation for glutDeviceGet(GLUT_HAS_DIAL_AND_BUTTON_BOX)
  104.  */
  105. int fgInputDeviceDetect( void )
  106. {
  107.     fgInitialiseInputDevices ();
  108.     if ( !dialbox_port )
  109.         return 0;
  110.     if ( !fgState.InputDevsInitialised )
  111.         return 0;
  112.     return 1;
  113. }
  114. /*
  115.  * Try initializing the input device(s)
  116.  */
  117. void fgInitialiseInputDevices ( void )
  118. {
  119.     if( !fgState.InputDevsInitialised )
  120.     {
  121.       /* will return true for VC8 (VC2005) and higher */
  122. #if TARGET_HOST_MS_WINDOWS && ( _MSC_VER >= 1400 ) && HAVE_ERRNO
  123.         char *dial_device=NULL;
  124.         size_t sLen;
  125.         errno_t err = _dupenv_s( &dial_device, &sLen, "GLUT_DIALS_SERIAL" );
  126.         if (err)
  127.             fgError("Error getting GLUT_DIALS_SERIAL environment variable");
  128. #else
  129.         const char *dial_device=NULL;
  130.         dial_device = getenv ( "GLUT_DIALS_SERIAL" );
  131. #endif
  132. #if TARGET_HOST_MS_WINDOWS
  133.         if (!dial_device){
  134.             static char devname[256];
  135.             DWORD size=sizeof(devname);
  136.             DWORD type = REG_SZ;
  137.             HKEY key;
  138.             if (RegOpenKeyA(HKEY_LOCAL_MACHINE,"SOFTWARE\FreeGLUT",&key)==ERROR_SUCCESS) {
  139.                 if (RegQueryValueExA(key,"DialboxSerialPort",NULL,&type,(LPBYTE)devname,&size)==ERROR_SUCCESS){
  140.                     dial_device=devname;
  141.                 }
  142.                 RegCloseKey(key);
  143.             }
  144.         }
  145. #endif
  146.         if ( !dial_device ) return;
  147.         if ( !( dialbox_port = serial_open ( dial_device ) ) ) return;
  148.       /* will return true for VC8 (VC2005) and higher */
  149. #if TARGET_HOST_MS_WINDOWS && ( _MSC_VER >= 1400 ) && HAVE_ERRNO
  150.         free ( dial_device );  dial_device = NULL;  /* dupenv_s allocates a string that we must free */
  151. #endif
  152.         serial_putchar(dialbox_port,DIAL_INITIALIZE);
  153.         glutTimerFunc ( 10, poll_dials, 0 );
  154.         fgState.InputDevsInitialised = GL_TRUE;
  155.     }
  156. }
  157. /*
  158.  *
  159.  */
  160. void fgInputDeviceClose( void )
  161. {
  162.     if ( fgState.InputDevsInitialised )
  163.     {
  164.         serial_close ( dialbox_port );
  165.         dialbox_port = NULL;
  166.         fgState.InputDevsInitialised = GL_FALSE;
  167.     }
  168. }
  169. /********************************************************************/
  170. /* Check all windows for dialbox callbacks */
  171. static void fghcbEnumDialCallbacks ( SFG_Window *window, SFG_Enumerator *enumerator )
  172. {
  173.     /* Built-in to INVOKE_WCB():  if window->Callbacks[CB_Dials] */
  174.     INVOKE_WCB ( *window,Dials, ( ((int*)enumerator->data)[0], ((int*)enumerator->data)[1]) );
  175.     fgEnumSubWindows ( window, fghcbEnumDialCallbacks, enumerator );
  176. }
  177. static void send_dial_event ( int num, int value )
  178. {
  179.     SFG_Enumerator enumerator;
  180.     int data[2];
  181.     data[0] = num;
  182.     data[1] = value;
  183.     enumerator.found = GL_FALSE;
  184.     enumerator.data  =  data;
  185.     fgEnumWindows ( fghcbEnumDialCallbacks, &enumerator );
  186. }
  187. /********************************************************************/
  188. static void poll_dials ( int id )
  189. {
  190.     int data;
  191.     static int dial_state = DIAL_NEW;
  192.     static int dial_which;
  193.     static int dial_value;
  194.     static int dials[8] = { 0, 0, 0, 0, 0, 0, 0, 0 };
  195.     if ( !dialbox_port ) return;
  196.     while ( (data=serial_getchar(dialbox_port)) != EOF )
  197.     {
  198.         if ( ( dial_state > DIAL_WHICH_DEVICE ) || IS_DIAL_EVENT ( data ) )
  199.         {
  200.             switch ( dial_state )
  201.             {
  202.             case DIAL_WHICH_DEVICE:
  203.                 dial_which = data - DIAL_BASE;
  204.                 dial_state++;
  205.                 break;
  206.             case DIAL_VALUE_HIGH:
  207.                 dial_value = ( data << 8 );
  208.                 dial_state++;
  209.                 break;
  210.             case DIAL_VALUE_LOW:
  211.                 dial_value |= data;
  212.                 if ( dial_value & 0x8000 ) dial_value -= 0x10000;
  213.                 dials[dial_which] = dial_value;
  214.                 send_dial_event ( dial_which + 1, dial_value * 360 / 256 );
  215.                 dial_state = DIAL_WHICH_DEVICE;
  216.                 break;
  217.             default:
  218.                 /* error: Impossible state value! */
  219.                 break;
  220.             }
  221.         }
  222.         else if ( data == DIAL_INITIALIZED )
  223.         {
  224.             fgState.InputDevsInitialised = GL_TRUE;
  225.             dial_state = DIAL_WHICH_DEVICE;
  226.             serial_putchar(dialbox_port,DIAL_SET_AUTO_DIALS);
  227.             serial_putchar(dialbox_port,0xff);
  228.             serial_putchar(dialbox_port,0xff);
  229.         }
  230.         else  /* Unknown data; try flushing. */
  231.             serial_flush(dialbox_port);
  232.     }
  233.     glutTimerFunc ( 2, poll_dials, 0 );
  234. }
  235. /******** OS Specific Serial I/O routines *******/
  236. #if TARGET_HOST_POSIX_X11 /* ==> Linux/BSD/UNIX POSIX serial I/O */
  237. static SERIALPORT *serial_open ( const char *device )
  238. {
  239.     int fd;
  240.     struct termios termio;
  241.     SERIALPORT *port;
  242.     fd = open(device, O_RDWR | O_NONBLOCK );
  243.     if (fd <0) {
  244.         perror(device);
  245.         return NULL;
  246.     }
  247.     port = malloc(sizeof(SERIALPORT));
  248.     memset(port, 0, sizeof(SERIALPORT));
  249.     port->fd = fd;
  250.     /* save current port settings */
  251.     tcgetattr(fd,&port->termio_save);
  252.     memset(&termio, 0, sizeof(termio));
  253.     termio.c_cflag = CS8 | CREAD | HUPCL ;
  254.     termio.c_iflag = IGNPAR | IGNBRK ;
  255.     termio.c_cc[VTIME]    = 0;   /* inter-character timer */
  256.     termio.c_cc[VMIN]     = 1;   /* block read until 1 chars received, when blocking I/O */
  257.     cfsetispeed(&termio, B9600);
  258.     cfsetospeed(&termio, B9600);
  259.     tcsetattr(fd,TCSANOW,&termio);
  260.     serial_flush(port);
  261.     return port;
  262. }
  263. static void serial_close(SERIALPORT *port)
  264. {
  265.     if (port)
  266.     {
  267.         /* restore old port settings */
  268.         tcsetattr(port->fd,TCSANOW,&port->termio_save);
  269.         close(port->fd);
  270.         free(port);
  271.     }
  272. }
  273. static int serial_getchar(SERIALPORT *port)
  274. {
  275.     unsigned char ch;
  276.     if (!port) return EOF;
  277.     if (read(port->fd,&ch,1)) return ch;
  278.     return EOF;
  279. }
  280. static int serial_putchar(SERIALPORT *port, unsigned char ch){
  281.     if (!port) return 0;
  282.     return write(port->fd,&ch,1);
  283. }
  284. static void serial_flush ( SERIALPORT *port )
  285. {
  286.     tcflush ( port->fd, TCIOFLUSH );
  287. }
  288. #elif TARGET_HOST_MS_WINDOWS
  289. static SERIALPORT *serial_open(const char *device){
  290.     HANDLE fh;
  291.     DCB dcb={sizeof(DCB)};
  292.     COMMTIMEOUTS timeouts;
  293.     SERIALPORT *port;
  294.     fh = CreateFile(device,GENERIC_READ|GENERIC_WRITE,0,NULL,
  295.       OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
  296.     if (!fh) return NULL;
  297.     port = malloc(sizeof(SERIALPORT));
  298.     ZeroMemory(port, sizeof(SERIALPORT));
  299.     port->fh = fh;
  300.     /* save current port settings */
  301.     GetCommState(fh,&port->dcb_save);
  302.     GetCommTimeouts(fh,&port->timeouts_save);
  303.     dcb.DCBlength=sizeof(DCB);
  304.     BuildCommDCB("96,n,8,1",&dcb);
  305.     SetCommState(fh,&dcb);
  306.     ZeroMemory(&timeouts,sizeof(timeouts));
  307.     timeouts.ReadTotalTimeoutConstant=1;
  308.     timeouts.WriteTotalTimeoutConstant=1;
  309.     SetCommTimeouts(fh,&timeouts);
  310.     serial_flush(port);
  311.     return port;
  312. }
  313. static void serial_close(SERIALPORT *port){
  314.     if (port){
  315.         /* restore old port settings */
  316.         SetCommState(port->fh,&port->dcb_save);
  317.         SetCommTimeouts(port->fh,&port->timeouts_save);
  318.         CloseHandle(port->fh);
  319.         free(port);
  320.     }
  321. }
  322. static int serial_getchar(SERIALPORT *port){
  323.     DWORD n;
  324.     unsigned char ch;
  325.     if (!port) return EOF;
  326.     if (!ReadFile(port->fh,&ch,1,&n,NULL)) return EOF;
  327.     if (n==1) return ch;
  328.     return EOF;
  329. }
  330. static int serial_putchar(SERIALPORT *port, unsigned char ch){
  331.     DWORD n;
  332.     if (!port) return 0;
  333.     return WriteFile(port->fh,&ch,1,&n,NULL);
  334. }
  335. static void serial_flush ( SERIALPORT *port )
  336. {
  337.     FlushFileBuffers(port->fh);
  338. }
  339. #endif