Splitting the rest of the Windows-specific code from "freeglut_main.c" into its own...
authorJohn F. Fay <johnffay@nettally.com>
Sun, 22 Jan 2012 19:25:56 +0000 (19:25 +0000)
committerJohn F. Fay <johnffay@nettally.com>
Sun, 22 Jan 2012 19:25:56 +0000 (19:25 +0000)
git-svn-id: svn+ssh://svn.code.sf.net/p/freeglut/code/trunk/freeglut/freeglut@995 7f0cb862-5218-0410-a997-914c9d46530a

src/Common/freeglut_main.c
src/Common/freeglut_xinput.c
src/mswin/freeglut_main_mswin.c

index 5287010..e7b4cb8 100644 (file)
@@ -81,6 +81,7 @@ extern void fghPlatformReshapeWindow ( SFG_Window *window, int width, int height
 extern void fghcbPlatformDisplayWindow ( SFG_Window *window );\r
 extern void fghPlatformSleepForEvents( long msec );\r
 extern void fghProcessSingleEvent ( void );\r
+extern void fghMainLoopPreliminaryWork ( void );\r
 \r
 \r
 /*\r
@@ -143,7 +144,7 @@ static void fghReshapeWindow ( SFG_Window *window, int width, int height )
  * Calls a window's redraw method. This is used when\r
  * a redraw is forced by the incoming window messages.\r
  */\r
-static void fghRedrawWindow ( SFG_Window *window )\r
+void fghRedrawWindow ( SFG_Window *window )\r
 {\r
     SFG_Window *current_window = fgStructure.CurrentWindow;\r
 \r
@@ -475,7 +476,7 @@ static void fghSleepForEvents( void )
 /*\r
  * Returns GLUT modifier mask for the state field of an X11 event.\r
  */\r
-int fghGetXModifiers( int state )\r
+int fghGetModifiers( int state )\r
 {\r
     int ret = 0;\r
 \r
@@ -1146,7 +1147,7 @@ void fghProcessSingleEvent ( void )
              * XXX track ButtonPress/ButtonRelease events in our own\r
              * XXX bit-mask?\r
              */\r
-            fgState.Modifiers = fghGetXModifiers( event.xmotion.state );\r
+            fgState.Modifiers = fghGetModifiers( event.xmotion.state );\r
             if ( event.xmotion.state & ( Button1Mask | Button2Mask | Button3Mask | Button4Mask | Button5Mask ) ) {\r
                 INVOKE_WCB( *window, Motion, ( event.xmotion.x,\r
                                                event.xmotion.y ) );\r
@@ -1200,7 +1201,7 @@ void fghProcessSingleEvent ( void )
                 ! FETCH_WCB( *window, MouseWheel ) )\r
                 break;\r
 \r
-            fgState.Modifiers = fghGetXModifiers( event.xbutton.state );\r
+            fgState.Modifiers = fghGetModifiers( event.xbutton.state );\r
 \r
             /* Finally execute the mouse or mouse wheel callback */\r
             if( ( button < glutDeviceGet ( GLUT_NUM_MOUSE_BUTTONS ) ) || ( ! FETCH_WCB( *window, MouseWheel ) ) )\r
@@ -1315,7 +1316,7 @@ void fghProcessSingleEvent ( void )
                     if( keyboard_cb )\r
                     {\r
                         fgSetWindow( window );\r
-                        fgState.Modifiers = fghGetXModifiers( event.xkey.state );\r
+                        fgState.Modifiers = fghGetModifiers( event.xkey.state );\r
                         keyboard_cb( asciiCode[ 0 ],\r
                                      event.xkey.x, event.xkey.y\r
                         );\r
@@ -1384,7 +1385,7 @@ void fghProcessSingleEvent ( void )
                     if( special_cb && (special != -1) )\r
                     {\r
                         fgSetWindow( window );\r
-                        fgState.Modifiers = fghGetXModifiers( event.xkey.state );\r
+                        fgState.Modifiers = fghGetModifiers( event.xkey.state );\r
                         special_cb( special, event.xkey.x, event.xkey.y );\r
                         fgState.Modifiers = INVALID_MODIFIERS;\r
                     }\r
@@ -1409,6 +1410,11 @@ void fghProcessSingleEvent ( void )
         }\r
     }\r
 }\r
+\r
+\r
+static void fghMainLoopPreliminaryWork ( void )\r
+{\r
+}\r
 #endif\r
 \r
 /* -- INTERFACE FUNCTIONS -------------------------------------------------- */\r
@@ -1436,35 +1442,9 @@ void FGAPIENTRY glutMainLoop( void )
 {\r
     int action;\r
 \r
-#if TARGET_HOST_MS_WINDOWS\r
-    SFG_Window *window = (SFG_Window *)fgStructure.Windows.First ;\r
-#endif\r
-\r
     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutMainLoop" );\r
 \r
-#if TARGET_HOST_MS_WINDOWS\r
-    /*\r
-     * Processing before the main loop:  If there is a window which is open and\r
-     * which has a visibility callback, call it.  I know this is an ugly hack,\r
-     * but I'm not sure what else to do about it.  Ideally we should leave\r
-     * something uninitialized in the create window code and initialize it in\r
-     * the main loop, and have that initialization create a "WM_ACTIVATE"\r
-     * message.  Then we would put the visibility callback code in the\r
-     * "case WM_ACTIVATE" block below.         - John Fay -- 10/24/02\r
-     */\r
-    while( window )\r
-    {\r
-        if ( FETCH_WCB( *window, Visibility ) )\r
-        {\r
-            SFG_Window *current_window = fgStructure.CurrentWindow ;\r
-\r
-            INVOKE_WCB( *window, Visibility, ( window->State.Visible ) );\r
-            fgSetWindow( current_window );\r
-        }\r
-\r
-        window = (SFG_Window *)window->Node.Next ;\r
-    }\r
-#endif\r
+       fghMainLoopPreliminaryWork ();\r
 \r
     fgState.ExecState = GLUT_EXEC_STATE_RUNNING ;\r
     while( fgState.ExecState == GLUT_EXEC_STATE_RUNNING )\r
@@ -1521,932 +1501,5 @@ void FGAPIENTRY glutLeaveMainLoop( void )
 }\r
 \r
 \r
-#if TARGET_HOST_MS_WINDOWS\r
-/*\r
- * Determine a GLUT modifer mask based on MS-WINDOWS system info.\r
- */\r
-static int fghGetWin32Modifiers (void)\r
-{\r
-    return\r
-        ( ( ( GetKeyState( VK_LSHIFT   ) < 0 ) ||\r
-            ( GetKeyState( VK_RSHIFT   ) < 0 )) ? GLUT_ACTIVE_SHIFT : 0 ) |\r
-        ( ( ( GetKeyState( VK_LCONTROL ) < 0 ) ||\r
-            ( GetKeyState( VK_RCONTROL ) < 0 )) ? GLUT_ACTIVE_CTRL  : 0 ) |\r
-        ( ( ( GetKeyState( VK_LMENU    ) < 0 ) ||\r
-            ( GetKeyState( VK_RMENU    ) < 0 )) ? GLUT_ACTIVE_ALT   : 0 );\r
-}\r
-\r
-/*\r
- * The window procedure for handling Win32 events\r
- */\r
-LRESULT CALLBACK fgWindowProc( HWND hWnd, UINT uMsg, WPARAM wParam,\r
-                               LPARAM lParam )\r
-{\r
-    static unsigned char lControl = 0, rControl = 0, lShift = 0,\r
-                         rShift = 0, lAlt = 0, rAlt = 0;\r
-\r
-    SFG_Window* window;\r
-    PAINTSTRUCT ps;\r
-    LRESULT lRet = 1;\r
-\r
-    FREEGLUT_INTERNAL_ERROR_EXIT_IF_NOT_INITIALISED ( "Event Handler" ) ;\r
-\r
-    window = fgWindowByHandle( hWnd );\r
-\r
-    if ( ( window == NULL ) && ( uMsg != WM_CREATE ) )\r
-      return DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-\r
-    /* printf ( "Window %3d message <%04x> %12d %12d\n", window?window->ID:0,\r
-             uMsg, wParam, lParam ); */\r
-\r
-    if ( window )\r
-    {\r
-      /* Checking for CTRL, ALT, and SHIFT key positions:  Key Down! */\r
-      if ( !lControl && GetAsyncKeyState ( VK_LCONTROL ) )\r
-      {\r
-          INVOKE_WCB   ( *window, Special,\r
-                        ( GLUT_KEY_CTRL_L, window->State.MouseX, window->State.MouseY )\r
-                      );\r
-\r
-          lControl = 1;\r
-      }\r
-\r
-      if ( !rControl && GetAsyncKeyState ( VK_RCONTROL ) )\r
-      {\r
-          INVOKE_WCB ( *window, Special,\r
-                       ( GLUT_KEY_CTRL_R, window->State.MouseX, window->State.MouseY )\r
-                     );\r
-\r
-          rControl = 1;\r
-      }\r
-\r
-      if ( !lShift && GetAsyncKeyState ( VK_LSHIFT ) )\r
-      {\r
-          INVOKE_WCB ( *window, Special,\r
-                       ( GLUT_KEY_SHIFT_L, window->State.MouseX, window->State.MouseY )\r
-                     );\r
-\r
-          lShift = 1;\r
-      }\r
-\r
-      if ( !rShift && GetAsyncKeyState ( VK_RSHIFT ) )\r
-      {\r
-          INVOKE_WCB ( *window, Special,\r
-                       ( GLUT_KEY_SHIFT_R, window->State.MouseX, window->State.MouseY )\r
-                     );\r
-\r
-          rShift = 1;\r
-      }\r
-\r
-      if ( !lAlt && GetAsyncKeyState ( VK_LMENU ) )\r
-      {\r
-          INVOKE_WCB ( *window, Special,\r
-                       ( GLUT_KEY_ALT_L, window->State.MouseX, window->State.MouseY )\r
-                     );\r
-\r
-          lAlt = 1;\r
-      }\r
-\r
-      if ( !rAlt && GetAsyncKeyState ( VK_RMENU ) )\r
-      {\r
-          INVOKE_WCB ( *window, Special,\r
-                       ( GLUT_KEY_ALT_R, window->State.MouseX, window->State.MouseY )\r
-                     );\r
-\r
-          rAlt = 1;\r
-      }\r
-\r
-      /* Checking for CTRL, ALT, and SHIFT key positions:  Key Up! */\r
-      if ( lControl && !GetAsyncKeyState ( VK_LCONTROL ) )\r
-      {\r
-          INVOKE_WCB ( *window, SpecialUp,\r
-                       ( GLUT_KEY_CTRL_L, window->State.MouseX, window->State.MouseY )\r
-                     );\r
-\r
-          lControl = 0;\r
-      }\r
-\r
-      if ( rControl && !GetAsyncKeyState ( VK_RCONTROL ) )\r
-      {\r
-          INVOKE_WCB ( *window, SpecialUp,\r
-                       ( GLUT_KEY_CTRL_R, window->State.MouseX, window->State.MouseY )\r
-                     );\r
-\r
-          rControl = 0;\r
-      }\r
-\r
-      if ( lShift && !GetAsyncKeyState ( VK_LSHIFT ) )\r
-      {\r
-          INVOKE_WCB ( *window, SpecialUp,\r
-                       ( GLUT_KEY_SHIFT_L, window->State.MouseX, window->State.MouseY )\r
-                     );\r
-\r
-          lShift = 0;\r
-      }\r
-\r
-      if ( rShift && !GetAsyncKeyState ( VK_RSHIFT ) )\r
-      {\r
-          INVOKE_WCB ( *window, SpecialUp,\r
-                       ( GLUT_KEY_SHIFT_R, window->State.MouseX, window->State.MouseY )\r
-                     );\r
-\r
-          rShift = 0;\r
-      }\r
-\r
-      if ( lAlt && !GetAsyncKeyState ( VK_LMENU ) )\r
-      {\r
-          INVOKE_WCB ( *window, SpecialUp,\r
-                       ( GLUT_KEY_ALT_L, window->State.MouseX, window->State.MouseY )\r
-                     );\r
-\r
-          lAlt = 0;\r
-      }\r
-\r
-      if ( rAlt && !GetAsyncKeyState ( VK_RMENU ) )\r
-      {\r
-          INVOKE_WCB ( *window, SpecialUp,\r
-                       ( GLUT_KEY_ALT_R, window->State.MouseX, window->State.MouseY )\r
-                     );\r
-\r
-          rAlt = 0;\r
-      }\r
-    }\r
-\r
-    switch( uMsg )\r
-    {\r
-    case WM_CREATE:\r
-        /* The window structure is passed as the creation structure parameter... */\r
-        window = (SFG_Window *) (((LPCREATESTRUCT) lParam)->lpCreateParams);\r
-        FREEGLUT_INTERNAL_ERROR_EXIT ( ( window != NULL ), "Cannot create window",\r
-                                       "fgWindowProc" );\r
-\r
-        window->Window.Handle = hWnd;\r
-        window->Window.Device = GetDC( hWnd );\r
-        if( window->IsMenu )\r
-        {\r
-            unsigned int current_DisplayMode = fgState.DisplayMode;\r
-            fgState.DisplayMode = GLUT_DOUBLE | GLUT_RGB | GLUT_DEPTH;\r
-#if !defined(_WIN32_WCE)\r
-            fgSetupPixelFormat( window, GL_FALSE, PFD_MAIN_PLANE );\r
-#endif\r
-            fgState.DisplayMode = current_DisplayMode;\r
-\r
-            if( fgStructure.MenuContext )\r
-                wglMakeCurrent( window->Window.Device,\r
-                                fgStructure.MenuContext->MContext\r
-                );\r
-            else\r
-            {\r
-                fgStructure.MenuContext =\r
-                    (SFG_MenuContext *)malloc( sizeof(SFG_MenuContext) );\r
-                fgStructure.MenuContext->MContext =\r
-                    wglCreateContext( window->Window.Device );\r
-            }\r
-\r
-            /* window->Window.Context = wglGetCurrentContext ();   */\r
-            window->Window.Context = wglCreateContext( window->Window.Device );\r
-        }\r
-        else\r
-        {\r
-#if !defined(_WIN32_WCE)\r
-            fgSetupPixelFormat( window, GL_FALSE, PFD_MAIN_PLANE );\r
-#endif\r
-\r
-            if( ! fgState.UseCurrentContext )\r
-                window->Window.Context =\r
-                    wglCreateContext( window->Window.Device );\r
-            else\r
-            {\r
-                window->Window.Context = wglGetCurrentContext( );\r
-                if( ! window->Window.Context )\r
-                    window->Window.Context =\r
-                        wglCreateContext( window->Window.Device );\r
-            }\r
-\r
-#if !defined(_WIN32_WCE)\r
-            fgNewWGLCreateContext( window );\r
-#endif\r
-        }\r
-\r
-        window->State.NeedToResize = GL_TRUE;\r
-        /* if we used CW_USEDEFAULT (thats a negative value) for the size\r
-         * of the window, query the window now for the size at which it\r
-         * was created.\r
-         */\r
-        if( ( window->State.Width < 0 ) || ( window->State.Height < 0 ) )\r
-        {\r
-            SFG_Window *current_window = fgStructure.CurrentWindow;\r
-\r
-            fgSetWindow( window );\r
-            window->State.Width = glutGet( GLUT_WINDOW_WIDTH );\r
-            window->State.Height = glutGet( GLUT_WINDOW_HEIGHT );\r
-            fgSetWindow( current_window );\r
-        }\r
-\r
-        ReleaseDC( window->Window.Handle, window->Window.Device );\r
-\r
-#if defined(_WIN32_WCE)\r
-        /* Take over button handling */\r
-        {\r
-            HINSTANCE dxDllLib=LoadLibrary(_T("gx.dll"));\r
-            if (dxDllLib)\r
-            {\r
-                GXGetDefaultKeys_=(GXGETDEFAULTKEYS)GetProcAddress(dxDllLib, _T("?GXGetDefaultKeys@@YA?AUGXKeyList@@H@Z"));\r
-                GXOpenInput_=(GXOPENINPUT)GetProcAddress(dxDllLib, _T("?GXOpenInput@@YAHXZ"));\r
-            }\r
-\r
-            if(GXOpenInput_)\r
-                (*GXOpenInput_)();\r
-            if(GXGetDefaultKeys_)\r
-                gxKeyList = (*GXGetDefaultKeys_)(GX_LANDSCAPEKEYS);\r
-        }\r
-\r
-#endif /* defined(_WIN32_WCE) */\r
-        break;\r
-\r
-    case WM_SIZE:\r
-        /*\r
-         * If the window is visible, then it is the user manually resizing it.\r
-         * If it is not, then it is the system sending us a dummy resize with\r
-         * zero dimensions on a "glutIconifyWindow" call.\r
-         */\r
-        if( window->State.Visible )\r
-        {\r
-            window->State.NeedToResize = GL_TRUE;\r
-#if defined(_WIN32_WCE)\r
-            window->State.Width  = HIWORD(lParam);\r
-            window->State.Height = LOWORD(lParam);\r
-#else\r
-            window->State.Width  = LOWORD(lParam);\r
-            window->State.Height = HIWORD(lParam);\r
-#endif /* defined(_WIN32_WCE) */\r
-        }\r
-\r
-        break;\r
-\r
-    case WM_SETFOCUS:\r
-/*        printf("WM_SETFOCUS: %p\n", window ); */\r
-        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-        INVOKE_WCB( *window, Entry, ( GLUT_ENTERED ) );\r
-        break;\r
-\r
-    case WM_KILLFOCUS:\r
-/*        printf("WM_KILLFOCUS: %p\n", window ); */\r
-        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-        INVOKE_WCB( *window, Entry, ( GLUT_LEFT ) );\r
-\r
-        if( window->IsMenu &&\r
-            window->ActiveMenu && window->ActiveMenu->IsActive )\r
-            fgUpdateMenuHighlight( window->ActiveMenu );\r
-\r
-        break;\r
-\r
-#if 0\r
-    case WM_ACTIVATE:\r
-        if (LOWORD(wParam) != WA_INACTIVE)\r
-        {\r
-/*            printf("WM_ACTIVATE: fgSetCursor( %p, %d)\n", window,\r
-                   window->State.Cursor ); */\r
-            fgSetCursor( window, window->State.Cursor );\r
-        }\r
-\r
-        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-        break;\r
-#endif\r
-\r
-    case WM_SETCURSOR:\r
-/*      printf ( "Cursor event %x %x %x %x\n", window, window->State.Cursor, lParam, wParam ) ; */\r
-        if( LOWORD( lParam ) == HTCLIENT )\r
-            fgSetCursor ( window, window->State.Cursor ) ;\r
-        else\r
-            lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-        break;\r
-\r
-    case WM_SHOWWINDOW:\r
-        window->State.Visible = GL_TRUE;\r
-        window->State.Redisplay = GL_TRUE;\r
-        break;\r
-\r
-    case WM_PAINT:\r
-        /* Turn on the visibility in case it was turned off somehow */\r
-        window->State.Visible = GL_TRUE;\r
-        BeginPaint( hWnd, &ps );\r
-        fghRedrawWindow( window );\r
-        EndPaint( hWnd, &ps );\r
-        break;\r
-\r
-    case WM_CLOSE:\r
-        fgDestroyWindow ( window );\r
-        if ( fgState.ActionOnWindowClose != GLUT_ACTION_CONTINUE_EXECUTION )\r
-            PostQuitMessage(0);\r
-        break;\r
-\r
-    case WM_DESTROY:\r
-        /*\r
-         * The window already got destroyed, so don't bother with it.\r
-         */\r
-        return 0;\r
-\r
-    case WM_MOUSEMOVE:\r
-    {\r
-#if defined(_WIN32_WCE)\r
-        window->State.MouseX = 320-HIWORD( lParam );\r
-        window->State.MouseY = LOWORD( lParam );\r
-#else\r
-        window->State.MouseX = LOWORD( lParam );\r
-        window->State.MouseY = HIWORD( lParam );\r
-#endif /* defined(_WIN32_WCE) */\r
-        /* Restrict to [-32768, 32767] to match X11 behaviour       */\r
-        /* See comment in "freeglut_developer" mailing list 10/4/04 */\r
-        if ( window->State.MouseX > 32767 ) window->State.MouseX -= 65536;\r
-        if ( window->State.MouseY > 32767 ) window->State.MouseY -= 65536;\r
-\r
-        if ( window->ActiveMenu )\r
-        {\r
-            fgUpdateMenuHighlight( window->ActiveMenu );\r
-            break;\r
-        }\r
-        SetFocus(window->Window.Handle);\r
-\r
-        fgState.Modifiers = fghGetWin32Modifiers( );\r
-\r
-        if( ( wParam & MK_LBUTTON ) ||\r
-            ( wParam & MK_MBUTTON ) ||\r
-            ( wParam & MK_RBUTTON ) )\r
-            INVOKE_WCB( *window, Motion, ( window->State.MouseX,\r
-                                           window->State.MouseY ) );\r
-        else\r
-            INVOKE_WCB( *window, Passive, ( window->State.MouseX,\r
-                                            window->State.MouseY ) );\r
-\r
-        fgState.Modifiers = INVALID_MODIFIERS;\r
-    }\r
-    break;\r
-\r
-    case WM_LBUTTONDOWN:\r
-    case WM_MBUTTONDOWN:\r
-    case WM_RBUTTONDOWN:\r
-    case WM_LBUTTONUP:\r
-    case WM_MBUTTONUP:\r
-    case WM_RBUTTONUP:\r
-    {\r
-        GLboolean pressed = GL_TRUE;\r
-        int button;\r
-\r
-#if defined(_WIN32_WCE)\r
-        window->State.MouseX = 320-HIWORD( lParam );\r
-        window->State.MouseY = LOWORD( lParam );\r
-#else\r
-        window->State.MouseX = LOWORD( lParam );\r
-        window->State.MouseY = HIWORD( lParam );\r
-#endif /* defined(_WIN32_WCE) */\r
-\r
-        /* Restrict to [-32768, 32767] to match X11 behaviour       */\r
-        /* See comment in "freeglut_developer" mailing list 10/4/04 */\r
-        if ( window->State.MouseX > 32767 ) window->State.MouseX -= 65536;\r
-        if ( window->State.MouseY > 32767 ) window->State.MouseY -= 65536;\r
-\r
-        switch( uMsg )\r
-        {\r
-        case WM_LBUTTONDOWN:\r
-            pressed = GL_TRUE;\r
-            button = GLUT_LEFT_BUTTON;\r
-            break;\r
-        case WM_MBUTTONDOWN:\r
-            pressed = GL_TRUE;\r
-            button = GLUT_MIDDLE_BUTTON;\r
-            break;\r
-        case WM_RBUTTONDOWN:\r
-            pressed = GL_TRUE;\r
-            button = GLUT_RIGHT_BUTTON;\r
-            break;\r
-        case WM_LBUTTONUP:\r
-            pressed = GL_FALSE;\r
-            button = GLUT_LEFT_BUTTON;\r
-            break;\r
-        case WM_MBUTTONUP:\r
-            pressed = GL_FALSE;\r
-            button = GLUT_MIDDLE_BUTTON;\r
-            break;\r
-        case WM_RBUTTONUP:\r
-            pressed = GL_FALSE;\r
-            button = GLUT_RIGHT_BUTTON;\r
-            break;\r
-        default:\r
-            pressed = GL_FALSE;\r
-            button = -1;\r
-            break;\r
-        }\r
-\r
-#if !defined(_WIN32_WCE)\r
-        if( GetSystemMetrics( SM_SWAPBUTTON ) )\r
-        {\r
-            if( button == GLUT_LEFT_BUTTON )\r
-                button = GLUT_RIGHT_BUTTON;\r
-            else\r
-                if( button == GLUT_RIGHT_BUTTON )\r
-                    button = GLUT_LEFT_BUTTON;\r
-        }\r
-#endif /* !defined(_WIN32_WCE) */\r
-\r
-        if( button == -1 )\r
-            return DefWindowProc( hWnd, uMsg, lParam, wParam );\r
-\r
-        /*\r
-         * Do not execute the application's mouse callback if a menu\r
-         * is hooked to this button.  In that case an appropriate\r
-         * private call should be generated.\r
-         */\r
-        if( fgCheckActiveMenu( window, button, pressed,\r
-                               window->State.MouseX, window->State.MouseY ) )\r
-            break;\r
-\r
-        /* Set capture so that the window captures all the mouse messages */\r
-        /*\r
-         * XXX - Multiple button support:  Under X11, the mouse is not released\r
-         * XXX - from the window until all buttons have been released, even if the\r
-         * XXX - user presses a button in another window.  This will take more\r
-         * XXX - code changes than I am up to at the moment (10/5/04).  The present\r
-         * XXX - is a 90 percent solution.\r
-         */\r
-        if ( pressed == GL_TRUE )\r
-          SetCapture ( window->Window.Handle ) ;\r
-        else\r
-          ReleaseCapture () ;\r
-\r
-        if( ! FETCH_WCB( *window, Mouse ) )\r
-            break;\r
-\r
-        fgSetWindow( window );\r
-        fgState.Modifiers = fghGetWin32Modifiers( );\r
-\r
-        INVOKE_WCB(\r
-            *window, Mouse,\r
-            ( button,\r
-              pressed ? GLUT_DOWN : GLUT_UP,\r
-              window->State.MouseX,\r
-              window->State.MouseY\r
-            )\r
-        );\r
-\r
-        fgState.Modifiers = INVALID_MODIFIERS;\r
-    }\r
-    break;\r
-\r
-    case 0x020a:\r
-        /* Should be WM_MOUSEWHEEL but my compiler doesn't recognize it */\r
-    {\r
-        int wheel_number = LOWORD( wParam );\r
-        short ticks = ( short )HIWORD( wParam );\r
-               fgState.MouseWheelTicks += ticks;\r
-\r
-        /*\r
-         * XXX Should use WHEEL_DELTA instead of 120\r
-         */\r
-               if ( abs ( fgState.MouseWheelTicks ) > 120 )\r
-               {\r
-                       int direction = ( fgState.MouseWheelTicks > 0 ) ? 1 : -1;\r
-\r
-            if( ! FETCH_WCB( *window, MouseWheel ) &&\r
-                ! FETCH_WCB( *window, Mouse ) )\r
-                break;\r
-\r
-            fgSetWindow( window );\r
-            fgState.Modifiers = fghGetWin32Modifiers( );\r
-\r
-            /*\r
-             * XXX Should use WHEEL_DELTA instead of 120\r
-             */\r
-            while( abs ( fgState.MouseWheelTicks ) > 120 )\r
-                       {\r
-                if( FETCH_WCB( *window, MouseWheel ) )\r
-                    INVOKE_WCB( *window, MouseWheel,\r
-                                ( wheel_number,\r
-                                  direction,\r
-                                  window->State.MouseX,\r
-                                  window->State.MouseY\r
-                                )\r
-                    );\r
-                else  /* No mouse wheel, call the mouse button callback twice */\r
-                               {\r
-                    /*\r
-                     * Map wheel zero to button 3 and 4; +1 to 3, -1 to 4\r
-                     *  "    "   one                     +1 to 5, -1 to 6, ...\r
-                     *\r
-                     * XXX The below assumes that you have no more than 3 mouse\r
-                     * XXX buttons.  Sorry.\r
-                     */\r
-                    int button = wheel_number * 2 + 3;\r
-                    if( direction < 0 )\r
-                        ++button;\r
-                    INVOKE_WCB( *window, Mouse,\r
-                                ( button, GLUT_DOWN,\r
-                                  window->State.MouseX, window->State.MouseY )\r
-                    );\r
-                    INVOKE_WCB( *window, Mouse,\r
-                                ( button, GLUT_UP,\r
-                                  window->State.MouseX, window->State.MouseY )\r
-                    );\r
-                               }\r
-\r
-                /*\r
-                 * XXX Should use WHEEL_DELTA instead of 120\r
-                 */\r
-                               fgState.MouseWheelTicks -= 120 * direction;\r
-                       }\r
-\r
-            fgState.Modifiers = INVALID_MODIFIERS;\r
-               }\r
-    }\r
-    break ;\r
-\r
-    case WM_SYSKEYDOWN:\r
-    case WM_KEYDOWN:\r
-    {\r
-        int keypress = -1;\r
-        POINT mouse_pos ;\r
-\r
-        if( ( fgState.KeyRepeat==GLUT_KEY_REPEAT_OFF || window->State.IgnoreKeyRepeat==GL_TRUE ) && (HIWORD(lParam) & KF_REPEAT) )\r
-            break;\r
-\r
-        /*\r
-         * Remember the current modifiers state. This is done here in order\r
-         * to make sure the VK_DELETE keyboard callback is executed properly.\r
-         */\r
-        fgState.Modifiers = fghGetWin32Modifiers( );\r
-\r
-        GetCursorPos( &mouse_pos );\r
-        ScreenToClient( window->Window.Handle, &mouse_pos );\r
-\r
-        window->State.MouseX = mouse_pos.x;\r
-        window->State.MouseY = mouse_pos.y;\r
-\r
-        /* Convert the Win32 keystroke codes to GLUTtish way */\r
-#       define KEY(a,b) case a: keypress = b; break;\r
-\r
-        switch( wParam )\r
-        {\r
-            KEY( VK_F1,     GLUT_KEY_F1        );\r
-            KEY( VK_F2,     GLUT_KEY_F2        );\r
-            KEY( VK_F3,     GLUT_KEY_F3        );\r
-            KEY( VK_F4,     GLUT_KEY_F4        );\r
-            KEY( VK_F5,     GLUT_KEY_F5        );\r
-            KEY( VK_F6,     GLUT_KEY_F6        );\r
-            KEY( VK_F7,     GLUT_KEY_F7        );\r
-            KEY( VK_F8,     GLUT_KEY_F8        );\r
-            KEY( VK_F9,     GLUT_KEY_F9        );\r
-            KEY( VK_F10,    GLUT_KEY_F10       );\r
-            KEY( VK_F11,    GLUT_KEY_F11       );\r
-            KEY( VK_F12,    GLUT_KEY_F12       );\r
-            KEY( VK_PRIOR,  GLUT_KEY_PAGE_UP   );\r
-            KEY( VK_NEXT,   GLUT_KEY_PAGE_DOWN );\r
-            KEY( VK_HOME,   GLUT_KEY_HOME      );\r
-            KEY( VK_END,    GLUT_KEY_END       );\r
-            KEY( VK_LEFT,   GLUT_KEY_LEFT      );\r
-            KEY( VK_UP,     GLUT_KEY_UP        );\r
-            KEY( VK_RIGHT,  GLUT_KEY_RIGHT     );\r
-            KEY( VK_DOWN,   GLUT_KEY_DOWN      );\r
-            KEY( VK_INSERT, GLUT_KEY_INSERT    );\r
-            KEY( VK_LCONTROL, GLUT_KEY_CTRL_L  );\r
-            KEY( VK_RCONTROL, GLUT_KEY_CTRL_R  );\r
-            KEY( VK_LSHIFT, GLUT_KEY_SHIFT_L   );\r
-            KEY( VK_RSHIFT, GLUT_KEY_SHIFT_R   );\r
-            KEY( VK_LMENU,  GLUT_KEY_ALT_L     );\r
-            KEY( VK_RMENU,  GLUT_KEY_ALT_R     );\r
-\r
-        case VK_DELETE:\r
-            /* The delete key should be treated as an ASCII keypress: */\r
-            INVOKE_WCB( *window, Keyboard,\r
-                        ( 127, window->State.MouseX, window->State.MouseY )\r
-            );\r
-        }\r
-\r
-#if defined(_WIN32_WCE)\r
-        if(!(lParam & 0x40000000)) /* Prevent auto-repeat */\r
-        {\r
-            if(wParam==(unsigned)gxKeyList.vkRight)\r
-                keypress = GLUT_KEY_RIGHT;\r
-            else if(wParam==(unsigned)gxKeyList.vkLeft)\r
-                keypress = GLUT_KEY_LEFT;\r
-            else if(wParam==(unsigned)gxKeyList.vkUp)\r
-                keypress = GLUT_KEY_UP;\r
-            else if(wParam==(unsigned)gxKeyList.vkDown)\r
-                keypress = GLUT_KEY_DOWN;\r
-            else if(wParam==(unsigned)gxKeyList.vkA)\r
-                keypress = GLUT_KEY_F1;\r
-            else if(wParam==(unsigned)gxKeyList.vkB)\r
-                keypress = GLUT_KEY_F2;\r
-            else if(wParam==(unsigned)gxKeyList.vkC)\r
-                keypress = GLUT_KEY_F3;\r
-            else if(wParam==(unsigned)gxKeyList.vkStart)\r
-                keypress = GLUT_KEY_F4;\r
-        }\r
-#endif\r
-\r
-        if( keypress != -1 )\r
-            INVOKE_WCB( *window, Special,\r
-                        ( keypress,\r
-                          window->State.MouseX, window->State.MouseY )\r
-            );\r
-\r
-        fgState.Modifiers = INVALID_MODIFIERS;\r
-    }\r
-    break;\r
-\r
-    case WM_SYSKEYUP:\r
-    case WM_KEYUP:\r
-    {\r
-        int keypress = -1;\r
-        POINT mouse_pos;\r
-\r
-        /*\r
-         * Remember the current modifiers state. This is done here in order\r
-         * to make sure the VK_DELETE keyboard callback is executed properly.\r
-         */\r
-        fgState.Modifiers = fghGetWin32Modifiers( );\r
-\r
-        GetCursorPos( &mouse_pos );\r
-        ScreenToClient( window->Window.Handle, &mouse_pos );\r
-\r
-        window->State.MouseX = mouse_pos.x;\r
-        window->State.MouseY = mouse_pos.y;\r
-\r
-        /*\r
-         * Convert the Win32 keystroke codes to GLUTtish way.\r
-         * "KEY(a,b)" was defined under "WM_KEYDOWN"\r
-         */\r
-\r
-        switch( wParam )\r
-        {\r
-            KEY( VK_F1,     GLUT_KEY_F1        );\r
-            KEY( VK_F2,     GLUT_KEY_F2        );\r
-            KEY( VK_F3,     GLUT_KEY_F3        );\r
-            KEY( VK_F4,     GLUT_KEY_F4        );\r
-            KEY( VK_F5,     GLUT_KEY_F5        );\r
-            KEY( VK_F6,     GLUT_KEY_F6        );\r
-            KEY( VK_F7,     GLUT_KEY_F7        );\r
-            KEY( VK_F8,     GLUT_KEY_F8        );\r
-            KEY( VK_F9,     GLUT_KEY_F9        );\r
-            KEY( VK_F10,    GLUT_KEY_F10       );\r
-            KEY( VK_F11,    GLUT_KEY_F11       );\r
-            KEY( VK_F12,    GLUT_KEY_F12       );\r
-            KEY( VK_PRIOR,  GLUT_KEY_PAGE_UP   );\r
-            KEY( VK_NEXT,   GLUT_KEY_PAGE_DOWN );\r
-            KEY( VK_HOME,   GLUT_KEY_HOME      );\r
-            KEY( VK_END,    GLUT_KEY_END       );\r
-            KEY( VK_LEFT,   GLUT_KEY_LEFT      );\r
-            KEY( VK_UP,     GLUT_KEY_UP        );\r
-            KEY( VK_RIGHT,  GLUT_KEY_RIGHT     );\r
-            KEY( VK_DOWN,   GLUT_KEY_DOWN      );\r
-            KEY( VK_INSERT, GLUT_KEY_INSERT    );\r
-            KEY( VK_LCONTROL, GLUT_KEY_CTRL_L  );\r
-            KEY( VK_RCONTROL, GLUT_KEY_CTRL_R  );\r
-            KEY( VK_LSHIFT, GLUT_KEY_SHIFT_L   );\r
-            KEY( VK_RSHIFT, GLUT_KEY_SHIFT_R   );\r
-            KEY( VK_LMENU,  GLUT_KEY_ALT_L     );\r
-            KEY( VK_RMENU,  GLUT_KEY_ALT_R     );\r
-\r
-          case VK_DELETE:\r
-              /* The delete key should be treated as an ASCII keypress: */\r
-              INVOKE_WCB( *window, KeyboardUp,\r
-                          ( 127, window->State.MouseX, window->State.MouseY )\r
-              );\r
-              break;\r
-\r
-        default:\r
-        {\r
-#if !defined(_WIN32_WCE)\r
-            BYTE state[ 256 ];\r
-            WORD code[ 2 ];\r
-\r
-            GetKeyboardState( state );\r
-\r
-            if( ToAscii( (UINT)wParam, 0, state, code, 0 ) == 1 )\r
-                wParam=code[ 0 ];\r
-\r
-            INVOKE_WCB( *window, KeyboardUp,\r
-                        ( (char)wParam,\r
-                          window->State.MouseX, window->State.MouseY )\r
-            );\r
-#endif /* !defined(_WIN32_WCE) */\r
-        }\r
-        }\r
-\r
-        if( keypress != -1 )\r
-            INVOKE_WCB( *window, SpecialUp,\r
-                        ( keypress,\r
-                          window->State.MouseX, window->State.MouseY )\r
-            );\r
-\r
-        fgState.Modifiers = INVALID_MODIFIERS;\r
-    }\r
-    break;\r
-\r
-    case WM_SYSCHAR:\r
-    case WM_CHAR:\r
-    {\r
-      if( (fgState.KeyRepeat==GLUT_KEY_REPEAT_OFF || window->State.IgnoreKeyRepeat==GL_TRUE) && (HIWORD(lParam) & KF_REPEAT) )\r
-            break;\r
-\r
-        fgState.Modifiers = fghGetWin32Modifiers( );\r
-        INVOKE_WCB( *window, Keyboard,\r
-                    ( (char)wParam,\r
-                      window->State.MouseX, window->State.MouseY )\r
-        );\r
-        fgState.Modifiers = INVALID_MODIFIERS;\r
-    }\r
-    break;\r
-\r
-    case WM_CAPTURECHANGED:\r
-        /* User has finished resizing the window, force a redraw */\r
-        INVOKE_WCB( *window, Display, ( ) );\r
-\r
-        /*lRet = DefWindowProc( hWnd, uMsg, wParam, lParam ); */\r
-        break;\r
-\r
-        /* Other messages that I have seen and which are not handled already */\r
-    case WM_SETTEXT:  /* 0x000c */\r
-        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-        /* Pass it on to "DefWindowProc" to set the window text */\r
-        break;\r
-\r
-    case WM_GETTEXT:  /* 0x000d */\r
-        /* Ideally we would copy the title of the window into "lParam" */\r
-        /* strncpy ( (char *)lParam, "Window Title", wParam );\r
-           lRet = ( wParam > 12 ) ? 12 : wParam;  */\r
-        /* the number of characters copied */\r
-        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-        break;\r
-\r
-    case WM_GETTEXTLENGTH:  /* 0x000e */\r
-        /* Ideally we would get the length of the title of the window */\r
-        lRet = 12;\r
-        /* the number of characters in "Window Title\0" (see above) */\r
-        break;\r
-\r
-    case WM_ERASEBKGND:  /* 0x0014 */\r
-        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-        break;\r
-\r
-#if !defined(_WIN32_WCE)\r
-    case WM_SYNCPAINT:  /* 0x0088 */\r
-        /* Another window has moved, need to update this one */\r
-        window->State.Redisplay = GL_TRUE;\r
-        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-        /* Help screen says this message must be passed to "DefWindowProc" */\r
-        break;\r
-\r
-    case WM_NCPAINT:  /* 0x0085 */\r
-      /* Need to update the border of this window */\r
-        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-        /* Pass it on to "DefWindowProc" to repaint a standard border */\r
-        break;\r
-\r
-    case WM_SYSCOMMAND :  /* 0x0112 */\r
-        {\r
-          /*\r
-           * We have received a system command message.  Try to act on it.\r
-           * The commands are passed in through the "wParam" parameter:\r
-           * The least significant digit seems to be which edge of the window\r
-           * is being used for a resize event:\r
-           *     4  3  5\r
-           *     1     2\r
-           *     7  6  8\r
-           * Congratulations and thanks to Richard Rauch for figuring this out..\r
-           */\r
-            switch ( wParam & 0xfff0 )\r
-            {\r
-            case SC_SIZE       :\r
-                break ;\r
-\r
-            case SC_MOVE       :\r
-                break ;\r
-\r
-            case SC_MINIMIZE   :\r
-                /* User has clicked on the "-" to minimize the window */\r
-                /* Turn off the visibility */\r
-                window->State.Visible = GL_FALSE ;\r
-\r
-                break ;\r
-\r
-            case SC_MAXIMIZE   :\r
-                break ;\r
-\r
-            case SC_NEXTWINDOW :\r
-                break ;\r
-\r
-            case SC_PREVWINDOW :\r
-                break ;\r
-\r
-            case SC_CLOSE      :\r
-                /* Followed very closely by a WM_CLOSE message */\r
-                break ;\r
-\r
-            case SC_VSCROLL    :\r
-                break ;\r
-\r
-            case SC_HSCROLL    :\r
-                break ;\r
-\r
-            case SC_MOUSEMENU  :\r
-                break ;\r
-\r
-            case SC_KEYMENU    :\r
-                break ;\r
-\r
-            case SC_ARRANGE    :\r
-                break ;\r
-\r
-            case SC_RESTORE    :\r
-                break ;\r
-\r
-            case SC_TASKLIST   :\r
-                break ;\r
-\r
-            case SC_SCREENSAVE :\r
-                break ;\r
-\r
-            case SC_HOTKEY     :\r
-                break ;\r
-\r
-#if(WINVER >= 0x0400)\r
-            case SC_DEFAULT    :\r
-                break ;\r
-\r
-            case SC_MONITORPOWER    :\r
-                break ;\r
-\r
-            case SC_CONTEXTHELP    :\r
-                break ;\r
-#endif /* WINVER >= 0x0400 */\r
-\r
-            default:\r
-#if _DEBUG\r
-                fgWarning( "Unknown wParam type 0x%x", wParam );\r
-#endif\r
-                break;\r
-            }\r
-        }\r
-#endif /* !defined(_WIN32_WCE) */\r
-\r
-        /* We need to pass the message on to the operating system as well */\r
-        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-        break;\r
-\r
-#ifdef WM_TOUCH\r
-       /* handle multi-touch messages */\r
-       case WM_TOUCH:\r
-       {\r
-               unsigned int numInputs = (unsigned int)wParam;\r
-               unsigned int i = 0;\r
-               TOUCHINPUT* ti = (TOUCHINPUT*)malloc( sizeof(TOUCHINPUT)*numInputs);\r
-\r
-               if (fghGetTouchInputInfo == (pGetTouchInputInfo)0xDEADBEEF) {\r
-                   fghGetTouchInputInfo = (pGetTouchInputInfo)GetProcAddress(GetModuleHandle("user32"),"GetTouchInputInfo");\r
-                   fghCloseTouchInputHandle = (pCloseTouchInputHandle)GetProcAddress(GetModuleHandle("user32"),"CloseTouchInputHandle");\r
-               }\r
-\r
-               if (!fghGetTouchInputInfo) { \r
-                       free( (void*)ti );\r
-                       break;\r
-               }\r
-\r
-               if (fghGetTouchInputInfo( (HTOUCHINPUT)lParam, numInputs, ti, sizeof(TOUCHINPUT) )) {\r
-                       /* Handle each contact point */\r
-                       for (i = 0; i < numInputs; ++i ) {\r
-\r
-                               POINT tp;\r
-                               tp.x = TOUCH_COORD_TO_PIXEL(ti[i].x);\r
-                               tp.y = TOUCH_COORD_TO_PIXEL(ti[i].y);\r
-                               ScreenToClient( hWnd, &tp );\r
-\r
-                               ti[i].dwID = ti[i].dwID * 2;\r
-\r
-                               if (ti[i].dwFlags & TOUCHEVENTF_DOWN) {\r
-                                       INVOKE_WCB( *window, MultiEntry,  ( ti[i].dwID, GLUT_ENTERED ) );\r
-                                       INVOKE_WCB( *window, MultiButton, ( ti[i].dwID, tp.x, tp.y, 0, GLUT_DOWN ) );\r
-                               } else if (ti[i].dwFlags & TOUCHEVENTF_MOVE) {\r
-                                       INVOKE_WCB( *window, MultiMotion, ( ti[i].dwID, tp.x, tp.y ) );\r
-                               } else if (ti[i].dwFlags & TOUCHEVENTF_UP)   { \r
-                                       INVOKE_WCB( *window, MultiButton, ( ti[i].dwID, tp.x, tp.y, 0, GLUT_UP ) );\r
-                                       INVOKE_WCB( *window, MultiEntry,  ( ti[i].dwID, GLUT_LEFT ) );\r
-                               }\r
-                       }\r
-               }\r
-               fghCloseTouchInputHandle((HTOUCHINPUT)lParam);\r
-               free( (void*)ti );\r
-               lRet = 0; /*DefWindowProc( hWnd, uMsg, wParam, lParam );*/\r
-               break;\r
-       }\r
-#endif\r
-    default:\r
-        /* Handle unhandled messages */\r
-        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
-        break;\r
-    }\r
-\r
-    return lRet;\r
-}\r
-#endif\r
 \r
 /*** END OF FILE ***/\r
index b0d8cc7..548d2cf 100644 (file)
@@ -14,7 +14,7 @@
 #include <X11/extensions/XInput2.h>
 
 /* import function from freeglut_main.c */
-int fghGetXModifiers( int state );
+int fghGetModifiers( int state );
 
 /* extension opcode for XInput */
 int xi_opcode = -1;
@@ -160,7 +160,7 @@ void fgHandleExtensionEvents( XEvent* base_ev ) {
 
                        case XI_Enter:
                        case XI_Leave:
-                               fgState.Modifiers = fghGetXModifiers( ((XIEnterEvent*)event)->mods.base );
+                               fgState.Modifiers = fghGetModifiers( ((XIEnterEvent*)event)->mods.base );
                                INVOKE_WCB( *window, MultiEntry, (
                                        event->deviceid, 
                                        (event->evtype == XI_Enter ? GLUT_ENTERED : GLUT_LEFT)
@@ -172,7 +172,7 @@ void fgHandleExtensionEvents( XEvent* base_ev ) {
 
                        case XI_ButtonPress:
                        case XI_ButtonRelease:
-                               fgState.Modifiers = fghGetXModifiers( event->mods.base );
+                               fgState.Modifiers = fghGetModifiers( event->mods.base );
                                INVOKE_WCB( *window, MultiButton, (
                                        event->deviceid, 
                                        event->event_x,
@@ -189,7 +189,7 @@ void fgHandleExtensionEvents( XEvent* base_ev ) {
                                break;
 
                        case XI_Motion:
-                               fgState.Modifiers = fghGetXModifiers( event->mods.base );
+                               fgState.Modifiers = fghGetModifiers( event->mods.base );
                                for (i = 0; i < event->buttons.mask_len; i++) if (event->buttons.mask[i]) button = 1;
                                if (button) {
                                        INVOKE_WCB( *window, MultiMotion,  ( event->deviceid, event->event_x, event->event_y ) );
index 6a7fbc2..81013d3 100644 (file)
@@ -29,6 +29,7 @@
 #include "freeglut_internal_mswin.h"\r
 \r
 \r
+extern void fghRedrawWindow ( SFG_Window *window );\r
 \r
 \r
 void fghPlatformReshapeWindow ( SFG_Window *window, int width, int height )\r
@@ -121,3 +122,957 @@ void fghProcessSingleEvent ( void )
 }\r
 \r
 \r
+\r
+void fghMainLoopPreliminaryWork ( void )\r
+{\r
+    SFG_Window *window = (SFG_Window *)fgStructure.Windows.First ;\r
+\r
+    /*\r
+     * Processing before the main loop:  If there is a window which is open and\r
+     * which has a visibility callback, call it.  I know this is an ugly hack,\r
+     * but I'm not sure what else to do about it.  Ideally we should leave\r
+     * something uninitialized in the create window code and initialize it in\r
+     * the main loop, and have that initialization create a "WM_ACTIVATE"\r
+     * message.  Then we would put the visibility callback code in the\r
+     * "case WM_ACTIVATE" block below.         - John Fay -- 10/24/02\r
+     */\r
+    while( window )\r
+    {\r
+        if ( FETCH_WCB( *window, Visibility ) )\r
+        {\r
+            SFG_Window *current_window = fgStructure.CurrentWindow ;\r
+\r
+            INVOKE_WCB( *window, Visibility, ( window->State.Visible ) );\r
+            fgSetWindow( current_window );\r
+        }\r
+\r
+        window = (SFG_Window *)window->Node.Next ;\r
+    }\r
+}\r
+\r
+\r
+/*\r
+ * Determine a GLUT modifer mask based on MS-WINDOWS system info.\r
+ */\r
+static int fghGetModifiers (void)\r
+{\r
+    return\r
+        ( ( ( GetKeyState( VK_LSHIFT   ) < 0 ) ||\r
+            ( GetKeyState( VK_RSHIFT   ) < 0 )) ? GLUT_ACTIVE_SHIFT : 0 ) |\r
+        ( ( ( GetKeyState( VK_LCONTROL ) < 0 ) ||\r
+            ( GetKeyState( VK_RCONTROL ) < 0 )) ? GLUT_ACTIVE_CTRL  : 0 ) |\r
+        ( ( ( GetKeyState( VK_LMENU    ) < 0 ) ||\r
+            ( GetKeyState( VK_RMENU    ) < 0 )) ? GLUT_ACTIVE_ALT   : 0 );\r
+}\r
+\r
+/*\r
+ * The window procedure for handling Win32 events\r
+ */\r
+LRESULT CALLBACK fgWindowProc( HWND hWnd, UINT uMsg, WPARAM wParam,\r
+                               LPARAM lParam )\r
+{\r
+    static unsigned char lControl = 0, rControl = 0, lShift = 0,\r
+                         rShift = 0, lAlt = 0, rAlt = 0;\r
+\r
+    SFG_Window* window;\r
+    PAINTSTRUCT ps;\r
+    LRESULT lRet = 1;\r
+\r
+    FREEGLUT_INTERNAL_ERROR_EXIT_IF_NOT_INITIALISED ( "Event Handler" ) ;\r
+\r
+    window = fgWindowByHandle( hWnd );\r
+\r
+    if ( ( window == NULL ) && ( uMsg != WM_CREATE ) )\r
+      return DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+\r
+    /* printf ( "Window %3d message <%04x> %12d %12d\n", window?window->ID:0,\r
+             uMsg, wParam, lParam ); */\r
+\r
+    if ( window )\r
+    {\r
+      /* Checking for CTRL, ALT, and SHIFT key positions:  Key Down! */\r
+      if ( !lControl && GetAsyncKeyState ( VK_LCONTROL ) )\r
+      {\r
+          INVOKE_WCB   ( *window, Special,\r
+                        ( GLUT_KEY_CTRL_L, window->State.MouseX, window->State.MouseY )\r
+                      );\r
+\r
+          lControl = 1;\r
+      }\r
+\r
+      if ( !rControl && GetAsyncKeyState ( VK_RCONTROL ) )\r
+      {\r
+          INVOKE_WCB ( *window, Special,\r
+                       ( GLUT_KEY_CTRL_R, window->State.MouseX, window->State.MouseY )\r
+                     );\r
+\r
+          rControl = 1;\r
+      }\r
+\r
+      if ( !lShift && GetAsyncKeyState ( VK_LSHIFT ) )\r
+      {\r
+          INVOKE_WCB ( *window, Special,\r
+                       ( GLUT_KEY_SHIFT_L, window->State.MouseX, window->State.MouseY )\r
+                     );\r
+\r
+          lShift = 1;\r
+      }\r
+\r
+      if ( !rShift && GetAsyncKeyState ( VK_RSHIFT ) )\r
+      {\r
+          INVOKE_WCB ( *window, Special,\r
+                       ( GLUT_KEY_SHIFT_R, window->State.MouseX, window->State.MouseY )\r
+                     );\r
+\r
+          rShift = 1;\r
+      }\r
+\r
+      if ( !lAlt && GetAsyncKeyState ( VK_LMENU ) )\r
+      {\r
+          INVOKE_WCB ( *window, Special,\r
+                       ( GLUT_KEY_ALT_L, window->State.MouseX, window->State.MouseY )\r
+                     );\r
+\r
+          lAlt = 1;\r
+      }\r
+\r
+      if ( !rAlt && GetAsyncKeyState ( VK_RMENU ) )\r
+      {\r
+          INVOKE_WCB ( *window, Special,\r
+                       ( GLUT_KEY_ALT_R, window->State.MouseX, window->State.MouseY )\r
+                     );\r
+\r
+          rAlt = 1;\r
+      }\r
+\r
+      /* Checking for CTRL, ALT, and SHIFT key positions:  Key Up! */\r
+      if ( lControl && !GetAsyncKeyState ( VK_LCONTROL ) )\r
+      {\r
+          INVOKE_WCB ( *window, SpecialUp,\r
+                       ( GLUT_KEY_CTRL_L, window->State.MouseX, window->State.MouseY )\r
+                     );\r
+\r
+          lControl = 0;\r
+      }\r
+\r
+      if ( rControl && !GetAsyncKeyState ( VK_RCONTROL ) )\r
+      {\r
+          INVOKE_WCB ( *window, SpecialUp,\r
+                       ( GLUT_KEY_CTRL_R, window->State.MouseX, window->State.MouseY )\r
+                     );\r
+\r
+          rControl = 0;\r
+      }\r
+\r
+      if ( lShift && !GetAsyncKeyState ( VK_LSHIFT ) )\r
+      {\r
+          INVOKE_WCB ( *window, SpecialUp,\r
+                       ( GLUT_KEY_SHIFT_L, window->State.MouseX, window->State.MouseY )\r
+                     );\r
+\r
+          lShift = 0;\r
+      }\r
+\r
+      if ( rShift && !GetAsyncKeyState ( VK_RSHIFT ) )\r
+      {\r
+          INVOKE_WCB ( *window, SpecialUp,\r
+                       ( GLUT_KEY_SHIFT_R, window->State.MouseX, window->State.MouseY )\r
+                     );\r
+\r
+          rShift = 0;\r
+      }\r
+\r
+      if ( lAlt && !GetAsyncKeyState ( VK_LMENU ) )\r
+      {\r
+          INVOKE_WCB ( *window, SpecialUp,\r
+                       ( GLUT_KEY_ALT_L, window->State.MouseX, window->State.MouseY )\r
+                     );\r
+\r
+          lAlt = 0;\r
+      }\r
+\r
+      if ( rAlt && !GetAsyncKeyState ( VK_RMENU ) )\r
+      {\r
+          INVOKE_WCB ( *window, SpecialUp,\r
+                       ( GLUT_KEY_ALT_R, window->State.MouseX, window->State.MouseY )\r
+                     );\r
+\r
+          rAlt = 0;\r
+      }\r
+    }\r
+\r
+    switch( uMsg )\r
+    {\r
+    case WM_CREATE:\r
+        /* The window structure is passed as the creation structure parameter... */\r
+        window = (SFG_Window *) (((LPCREATESTRUCT) lParam)->lpCreateParams);\r
+        FREEGLUT_INTERNAL_ERROR_EXIT ( ( window != NULL ), "Cannot create window",\r
+                                       "fgWindowProc" );\r
+\r
+        window->Window.Handle = hWnd;\r
+        window->Window.Device = GetDC( hWnd );\r
+        if( window->IsMenu )\r
+        {\r
+            unsigned int current_DisplayMode = fgState.DisplayMode;\r
+            fgState.DisplayMode = GLUT_DOUBLE | GLUT_RGB | GLUT_DEPTH;\r
+#if !defined(_WIN32_WCE)\r
+            fgSetupPixelFormat( window, GL_FALSE, PFD_MAIN_PLANE );\r
+#endif\r
+            fgState.DisplayMode = current_DisplayMode;\r
+\r
+            if( fgStructure.MenuContext )\r
+                wglMakeCurrent( window->Window.Device,\r
+                                fgStructure.MenuContext->MContext\r
+                );\r
+            else\r
+            {\r
+                fgStructure.MenuContext =\r
+                    (SFG_MenuContext *)malloc( sizeof(SFG_MenuContext) );\r
+                fgStructure.MenuContext->MContext =\r
+                    wglCreateContext( window->Window.Device );\r
+            }\r
+\r
+            /* window->Window.Context = wglGetCurrentContext ();   */\r
+            window->Window.Context = wglCreateContext( window->Window.Device );\r
+        }\r
+        else\r
+        {\r
+#if !defined(_WIN32_WCE)\r
+            fgSetupPixelFormat( window, GL_FALSE, PFD_MAIN_PLANE );\r
+#endif\r
+\r
+            if( ! fgState.UseCurrentContext )\r
+                window->Window.Context =\r
+                    wglCreateContext( window->Window.Device );\r
+            else\r
+            {\r
+                window->Window.Context = wglGetCurrentContext( );\r
+                if( ! window->Window.Context )\r
+                    window->Window.Context =\r
+                        wglCreateContext( window->Window.Device );\r
+            }\r
+\r
+#if !defined(_WIN32_WCE)\r
+            fgNewWGLCreateContext( window );\r
+#endif\r
+        }\r
+\r
+        window->State.NeedToResize = GL_TRUE;\r
+        /* if we used CW_USEDEFAULT (thats a negative value) for the size\r
+         * of the window, query the window now for the size at which it\r
+         * was created.\r
+         */\r
+        if( ( window->State.Width < 0 ) || ( window->State.Height < 0 ) )\r
+        {\r
+            SFG_Window *current_window = fgStructure.CurrentWindow;\r
+\r
+            fgSetWindow( window );\r
+            window->State.Width = glutGet( GLUT_WINDOW_WIDTH );\r
+            window->State.Height = glutGet( GLUT_WINDOW_HEIGHT );\r
+            fgSetWindow( current_window );\r
+        }\r
+\r
+        ReleaseDC( window->Window.Handle, window->Window.Device );\r
+\r
+#if defined(_WIN32_WCE)\r
+        /* Take over button handling */\r
+        {\r
+            HINSTANCE dxDllLib=LoadLibrary(_T("gx.dll"));\r
+            if (dxDllLib)\r
+            {\r
+                GXGetDefaultKeys_=(GXGETDEFAULTKEYS)GetProcAddress(dxDllLib, _T("?GXGetDefaultKeys@@YA?AUGXKeyList@@H@Z"));\r
+                GXOpenInput_=(GXOPENINPUT)GetProcAddress(dxDllLib, _T("?GXOpenInput@@YAHXZ"));\r
+            }\r
+\r
+            if(GXOpenInput_)\r
+                (*GXOpenInput_)();\r
+            if(GXGetDefaultKeys_)\r
+                gxKeyList = (*GXGetDefaultKeys_)(GX_LANDSCAPEKEYS);\r
+        }\r
+\r
+#endif /* defined(_WIN32_WCE) */\r
+        break;\r
+\r
+    case WM_SIZE:\r
+        /*\r
+         * If the window is visible, then it is the user manually resizing it.\r
+         * If it is not, then it is the system sending us a dummy resize with\r
+         * zero dimensions on a "glutIconifyWindow" call.\r
+         */\r
+        if( window->State.Visible )\r
+        {\r
+            window->State.NeedToResize = GL_TRUE;\r
+#if defined(_WIN32_WCE)\r
+            window->State.Width  = HIWORD(lParam);\r
+            window->State.Height = LOWORD(lParam);\r
+#else\r
+            window->State.Width  = LOWORD(lParam);\r
+            window->State.Height = HIWORD(lParam);\r
+#endif /* defined(_WIN32_WCE) */\r
+        }\r
+\r
+        break;\r
+\r
+    case WM_SETFOCUS:\r
+/*        printf("WM_SETFOCUS: %p\n", window ); */\r
+        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+        INVOKE_WCB( *window, Entry, ( GLUT_ENTERED ) );\r
+        break;\r
+\r
+    case WM_KILLFOCUS:\r
+/*        printf("WM_KILLFOCUS: %p\n", window ); */\r
+        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+        INVOKE_WCB( *window, Entry, ( GLUT_LEFT ) );\r
+\r
+        if( window->IsMenu &&\r
+            window->ActiveMenu && window->ActiveMenu->IsActive )\r
+            fgUpdateMenuHighlight( window->ActiveMenu );\r
+\r
+        break;\r
+\r
+#if 0\r
+    case WM_ACTIVATE:\r
+        if (LOWORD(wParam) != WA_INACTIVE)\r
+        {\r
+/*            printf("WM_ACTIVATE: fgSetCursor( %p, %d)\n", window,\r
+                   window->State.Cursor ); */\r
+            fgSetCursor( window, window->State.Cursor );\r
+        }\r
+\r
+        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+        break;\r
+#endif\r
+\r
+    case WM_SETCURSOR:\r
+/*      printf ( "Cursor event %x %x %x %x\n", window, window->State.Cursor, lParam, wParam ) ; */\r
+        if( LOWORD( lParam ) == HTCLIENT )\r
+            fgSetCursor ( window, window->State.Cursor ) ;\r
+        else\r
+            lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+        break;\r
+\r
+    case WM_SHOWWINDOW:\r
+        window->State.Visible = GL_TRUE;\r
+        window->State.Redisplay = GL_TRUE;\r
+        break;\r
+\r
+    case WM_PAINT:\r
+        /* Turn on the visibility in case it was turned off somehow */\r
+        window->State.Visible = GL_TRUE;\r
+        BeginPaint( hWnd, &ps );\r
+        fghRedrawWindow( window );\r
+        EndPaint( hWnd, &ps );\r
+        break;\r
+\r
+    case WM_CLOSE:\r
+        fgDestroyWindow ( window );\r
+        if ( fgState.ActionOnWindowClose != GLUT_ACTION_CONTINUE_EXECUTION )\r
+            PostQuitMessage(0);\r
+        break;\r
+\r
+    case WM_DESTROY:\r
+        /*\r
+         * The window already got destroyed, so don't bother with it.\r
+         */\r
+        return 0;\r
+\r
+    case WM_MOUSEMOVE:\r
+    {\r
+#if defined(_WIN32_WCE)\r
+        window->State.MouseX = 320-HIWORD( lParam );\r
+        window->State.MouseY = LOWORD( lParam );\r
+#else\r
+        window->State.MouseX = LOWORD( lParam );\r
+        window->State.MouseY = HIWORD( lParam );\r
+#endif /* defined(_WIN32_WCE) */\r
+        /* Restrict to [-32768, 32767] to match X11 behaviour       */\r
+        /* See comment in "freeglut_developer" mailing list 10/4/04 */\r
+        if ( window->State.MouseX > 32767 ) window->State.MouseX -= 65536;\r
+        if ( window->State.MouseY > 32767 ) window->State.MouseY -= 65536;\r
+\r
+        if ( window->ActiveMenu )\r
+        {\r
+            fgUpdateMenuHighlight( window->ActiveMenu );\r
+            break;\r
+        }\r
+        SetFocus(window->Window.Handle);\r
+\r
+        fgState.Modifiers = fghGetModifiers( );\r
+\r
+        if( ( wParam & MK_LBUTTON ) ||\r
+            ( wParam & MK_MBUTTON ) ||\r
+            ( wParam & MK_RBUTTON ) )\r
+            INVOKE_WCB( *window, Motion, ( window->State.MouseX,\r
+                                           window->State.MouseY ) );\r
+        else\r
+            INVOKE_WCB( *window, Passive, ( window->State.MouseX,\r
+                                            window->State.MouseY ) );\r
+\r
+        fgState.Modifiers = INVALID_MODIFIERS;\r
+    }\r
+    break;\r
+\r
+    case WM_LBUTTONDOWN:\r
+    case WM_MBUTTONDOWN:\r
+    case WM_RBUTTONDOWN:\r
+    case WM_LBUTTONUP:\r
+    case WM_MBUTTONUP:\r
+    case WM_RBUTTONUP:\r
+    {\r
+        GLboolean pressed = GL_TRUE;\r
+        int button;\r
+\r
+#if defined(_WIN32_WCE)\r
+        window->State.MouseX = 320-HIWORD( lParam );\r
+        window->State.MouseY = LOWORD( lParam );\r
+#else\r
+        window->State.MouseX = LOWORD( lParam );\r
+        window->State.MouseY = HIWORD( lParam );\r
+#endif /* defined(_WIN32_WCE) */\r
+\r
+        /* Restrict to [-32768, 32767] to match X11 behaviour       */\r
+        /* See comment in "freeglut_developer" mailing list 10/4/04 */\r
+        if ( window->State.MouseX > 32767 ) window->State.MouseX -= 65536;\r
+        if ( window->State.MouseY > 32767 ) window->State.MouseY -= 65536;\r
+\r
+        switch( uMsg )\r
+        {\r
+        case WM_LBUTTONDOWN:\r
+            pressed = GL_TRUE;\r
+            button = GLUT_LEFT_BUTTON;\r
+            break;\r
+        case WM_MBUTTONDOWN:\r
+            pressed = GL_TRUE;\r
+            button = GLUT_MIDDLE_BUTTON;\r
+            break;\r
+        case WM_RBUTTONDOWN:\r
+            pressed = GL_TRUE;\r
+            button = GLUT_RIGHT_BUTTON;\r
+            break;\r
+        case WM_LBUTTONUP:\r
+            pressed = GL_FALSE;\r
+            button = GLUT_LEFT_BUTTON;\r
+            break;\r
+        case WM_MBUTTONUP:\r
+            pressed = GL_FALSE;\r
+            button = GLUT_MIDDLE_BUTTON;\r
+            break;\r
+        case WM_RBUTTONUP:\r
+            pressed = GL_FALSE;\r
+            button = GLUT_RIGHT_BUTTON;\r
+            break;\r
+        default:\r
+            pressed = GL_FALSE;\r
+            button = -1;\r
+            break;\r
+        }\r
+\r
+#if !defined(_WIN32_WCE)\r
+        if( GetSystemMetrics( SM_SWAPBUTTON ) )\r
+        {\r
+            if( button == GLUT_LEFT_BUTTON )\r
+                button = GLUT_RIGHT_BUTTON;\r
+            else\r
+                if( button == GLUT_RIGHT_BUTTON )\r
+                    button = GLUT_LEFT_BUTTON;\r
+        }\r
+#endif /* !defined(_WIN32_WCE) */\r
+\r
+        if( button == -1 )\r
+            return DefWindowProc( hWnd, uMsg, lParam, wParam );\r
+\r
+        /*\r
+         * Do not execute the application's mouse callback if a menu\r
+         * is hooked to this button.  In that case an appropriate\r
+         * private call should be generated.\r
+         */\r
+        if( fgCheckActiveMenu( window, button, pressed,\r
+                               window->State.MouseX, window->State.MouseY ) )\r
+            break;\r
+\r
+        /* Set capture so that the window captures all the mouse messages */\r
+        /*\r
+         * XXX - Multiple button support:  Under X11, the mouse is not released\r
+         * XXX - from the window until all buttons have been released, even if the\r
+         * XXX - user presses a button in another window.  This will take more\r
+         * XXX - code changes than I am up to at the moment (10/5/04).  The present\r
+         * XXX - is a 90 percent solution.\r
+         */\r
+        if ( pressed == GL_TRUE )\r
+          SetCapture ( window->Window.Handle ) ;\r
+        else\r
+          ReleaseCapture () ;\r
+\r
+        if( ! FETCH_WCB( *window, Mouse ) )\r
+            break;\r
+\r
+        fgSetWindow( window );\r
+        fgState.Modifiers = fghGetModifiers( );\r
+\r
+        INVOKE_WCB(\r
+            *window, Mouse,\r
+            ( button,\r
+              pressed ? GLUT_DOWN : GLUT_UP,\r
+              window->State.MouseX,\r
+              window->State.MouseY\r
+            )\r
+        );\r
+\r
+        fgState.Modifiers = INVALID_MODIFIERS;\r
+    }\r
+    break;\r
+\r
+    case 0x020a:\r
+        /* Should be WM_MOUSEWHEEL but my compiler doesn't recognize it */\r
+    {\r
+        int wheel_number = LOWORD( wParam );\r
+        short ticks = ( short )HIWORD( wParam );\r
+               fgState.MouseWheelTicks += ticks;\r
+\r
+        /*\r
+         * XXX Should use WHEEL_DELTA instead of 120\r
+         */\r
+               if ( abs ( fgState.MouseWheelTicks ) > 120 )\r
+               {\r
+                       int direction = ( fgState.MouseWheelTicks > 0 ) ? 1 : -1;\r
+\r
+            if( ! FETCH_WCB( *window, MouseWheel ) &&\r
+                ! FETCH_WCB( *window, Mouse ) )\r
+                break;\r
+\r
+            fgSetWindow( window );\r
+            fgState.Modifiers = fghGetModifiers( );\r
+\r
+            /*\r
+             * XXX Should use WHEEL_DELTA instead of 120\r
+             */\r
+            while( abs ( fgState.MouseWheelTicks ) > 120 )\r
+                       {\r
+                if( FETCH_WCB( *window, MouseWheel ) )\r
+                    INVOKE_WCB( *window, MouseWheel,\r
+                                ( wheel_number,\r
+                                  direction,\r
+                                  window->State.MouseX,\r
+                                  window->State.MouseY\r
+                                )\r
+                    );\r
+                else  /* No mouse wheel, call the mouse button callback twice */\r
+                               {\r
+                    /*\r
+                     * Map wheel zero to button 3 and 4; +1 to 3, -1 to 4\r
+                     *  "    "   one                     +1 to 5, -1 to 6, ...\r
+                     *\r
+                     * XXX The below assumes that you have no more than 3 mouse\r
+                     * XXX buttons.  Sorry.\r
+                     */\r
+                    int button = wheel_number * 2 + 3;\r
+                    if( direction < 0 )\r
+                        ++button;\r
+                    INVOKE_WCB( *window, Mouse,\r
+                                ( button, GLUT_DOWN,\r
+                                  window->State.MouseX, window->State.MouseY )\r
+                    );\r
+                    INVOKE_WCB( *window, Mouse,\r
+                                ( button, GLUT_UP,\r
+                                  window->State.MouseX, window->State.MouseY )\r
+                    );\r
+                               }\r
+\r
+                /*\r
+                 * XXX Should use WHEEL_DELTA instead of 120\r
+                 */\r
+                               fgState.MouseWheelTicks -= 120 * direction;\r
+                       }\r
+\r
+            fgState.Modifiers = INVALID_MODIFIERS;\r
+               }\r
+    }\r
+    break ;\r
+\r
+    case WM_SYSKEYDOWN:\r
+    case WM_KEYDOWN:\r
+    {\r
+        int keypress = -1;\r
+        POINT mouse_pos ;\r
+\r
+        if( ( fgState.KeyRepeat==GLUT_KEY_REPEAT_OFF || window->State.IgnoreKeyRepeat==GL_TRUE ) && (HIWORD(lParam) & KF_REPEAT) )\r
+            break;\r
+\r
+        /*\r
+         * Remember the current modifiers state. This is done here in order\r
+         * to make sure the VK_DELETE keyboard callback is executed properly.\r
+         */\r
+        fgState.Modifiers = fghGetModifiers( );\r
+\r
+        GetCursorPos( &mouse_pos );\r
+        ScreenToClient( window->Window.Handle, &mouse_pos );\r
+\r
+        window->State.MouseX = mouse_pos.x;\r
+        window->State.MouseY = mouse_pos.y;\r
+\r
+        /* Convert the Win32 keystroke codes to GLUTtish way */\r
+#       define KEY(a,b) case a: keypress = b; break;\r
+\r
+        switch( wParam )\r
+        {\r
+            KEY( VK_F1,     GLUT_KEY_F1        );\r
+            KEY( VK_F2,     GLUT_KEY_F2        );\r
+            KEY( VK_F3,     GLUT_KEY_F3        );\r
+            KEY( VK_F4,     GLUT_KEY_F4        );\r
+            KEY( VK_F5,     GLUT_KEY_F5        );\r
+            KEY( VK_F6,     GLUT_KEY_F6        );\r
+            KEY( VK_F7,     GLUT_KEY_F7        );\r
+            KEY( VK_F8,     GLUT_KEY_F8        );\r
+            KEY( VK_F9,     GLUT_KEY_F9        );\r
+            KEY( VK_F10,    GLUT_KEY_F10       );\r
+            KEY( VK_F11,    GLUT_KEY_F11       );\r
+            KEY( VK_F12,    GLUT_KEY_F12       );\r
+            KEY( VK_PRIOR,  GLUT_KEY_PAGE_UP   );\r
+            KEY( VK_NEXT,   GLUT_KEY_PAGE_DOWN );\r
+            KEY( VK_HOME,   GLUT_KEY_HOME      );\r
+            KEY( VK_END,    GLUT_KEY_END       );\r
+            KEY( VK_LEFT,   GLUT_KEY_LEFT      );\r
+            KEY( VK_UP,     GLUT_KEY_UP        );\r
+            KEY( VK_RIGHT,  GLUT_KEY_RIGHT     );\r
+            KEY( VK_DOWN,   GLUT_KEY_DOWN      );\r
+            KEY( VK_INSERT, GLUT_KEY_INSERT    );\r
+            KEY( VK_LCONTROL, GLUT_KEY_CTRL_L  );\r
+            KEY( VK_RCONTROL, GLUT_KEY_CTRL_R  );\r
+            KEY( VK_LSHIFT, GLUT_KEY_SHIFT_L   );\r
+            KEY( VK_RSHIFT, GLUT_KEY_SHIFT_R   );\r
+            KEY( VK_LMENU,  GLUT_KEY_ALT_L     );\r
+            KEY( VK_RMENU,  GLUT_KEY_ALT_R     );\r
+\r
+        case VK_DELETE:\r
+            /* The delete key should be treated as an ASCII keypress: */\r
+            INVOKE_WCB( *window, Keyboard,\r
+                        ( 127, window->State.MouseX, window->State.MouseY )\r
+            );\r
+        }\r
+\r
+#if defined(_WIN32_WCE)\r
+        if(!(lParam & 0x40000000)) /* Prevent auto-repeat */\r
+        {\r
+            if(wParam==(unsigned)gxKeyList.vkRight)\r
+                keypress = GLUT_KEY_RIGHT;\r
+            else if(wParam==(unsigned)gxKeyList.vkLeft)\r
+                keypress = GLUT_KEY_LEFT;\r
+            else if(wParam==(unsigned)gxKeyList.vkUp)\r
+                keypress = GLUT_KEY_UP;\r
+            else if(wParam==(unsigned)gxKeyList.vkDown)\r
+                keypress = GLUT_KEY_DOWN;\r
+            else if(wParam==(unsigned)gxKeyList.vkA)\r
+                keypress = GLUT_KEY_F1;\r
+            else if(wParam==(unsigned)gxKeyList.vkB)\r
+                keypress = GLUT_KEY_F2;\r
+            else if(wParam==(unsigned)gxKeyList.vkC)\r
+                keypress = GLUT_KEY_F3;\r
+            else if(wParam==(unsigned)gxKeyList.vkStart)\r
+                keypress = GLUT_KEY_F4;\r
+        }\r
+#endif\r
+\r
+        if( keypress != -1 )\r
+            INVOKE_WCB( *window, Special,\r
+                        ( keypress,\r
+                          window->State.MouseX, window->State.MouseY )\r
+            );\r
+\r
+        fgState.Modifiers = INVALID_MODIFIERS;\r
+    }\r
+    break;\r
+\r
+    case WM_SYSKEYUP:\r
+    case WM_KEYUP:\r
+    {\r
+        int keypress = -1;\r
+        POINT mouse_pos;\r
+\r
+        /*\r
+         * Remember the current modifiers state. This is done here in order\r
+         * to make sure the VK_DELETE keyboard callback is executed properly.\r
+         */\r
+        fgState.Modifiers = fghGetModifiers( );\r
+\r
+        GetCursorPos( &mouse_pos );\r
+        ScreenToClient( window->Window.Handle, &mouse_pos );\r
+\r
+        window->State.MouseX = mouse_pos.x;\r
+        window->State.MouseY = mouse_pos.y;\r
+\r
+        /*\r
+         * Convert the Win32 keystroke codes to GLUTtish way.\r
+         * "KEY(a,b)" was defined under "WM_KEYDOWN"\r
+         */\r
+\r
+        switch( wParam )\r
+        {\r
+            KEY( VK_F1,     GLUT_KEY_F1        );\r
+            KEY( VK_F2,     GLUT_KEY_F2        );\r
+            KEY( VK_F3,     GLUT_KEY_F3        );\r
+            KEY( VK_F4,     GLUT_KEY_F4        );\r
+            KEY( VK_F5,     GLUT_KEY_F5        );\r
+            KEY( VK_F6,     GLUT_KEY_F6        );\r
+            KEY( VK_F7,     GLUT_KEY_F7        );\r
+            KEY( VK_F8,     GLUT_KEY_F8        );\r
+            KEY( VK_F9,     GLUT_KEY_F9        );\r
+            KEY( VK_F10,    GLUT_KEY_F10       );\r
+            KEY( VK_F11,    GLUT_KEY_F11       );\r
+            KEY( VK_F12,    GLUT_KEY_F12       );\r
+            KEY( VK_PRIOR,  GLUT_KEY_PAGE_UP   );\r
+            KEY( VK_NEXT,   GLUT_KEY_PAGE_DOWN );\r
+            KEY( VK_HOME,   GLUT_KEY_HOME      );\r
+            KEY( VK_END,    GLUT_KEY_END       );\r
+            KEY( VK_LEFT,   GLUT_KEY_LEFT      );\r
+            KEY( VK_UP,     GLUT_KEY_UP        );\r
+            KEY( VK_RIGHT,  GLUT_KEY_RIGHT     );\r
+            KEY( VK_DOWN,   GLUT_KEY_DOWN      );\r
+            KEY( VK_INSERT, GLUT_KEY_INSERT    );\r
+            KEY( VK_LCONTROL, GLUT_KEY_CTRL_L  );\r
+            KEY( VK_RCONTROL, GLUT_KEY_CTRL_R  );\r
+            KEY( VK_LSHIFT, GLUT_KEY_SHIFT_L   );\r
+            KEY( VK_RSHIFT, GLUT_KEY_SHIFT_R   );\r
+            KEY( VK_LMENU,  GLUT_KEY_ALT_L     );\r
+            KEY( VK_RMENU,  GLUT_KEY_ALT_R     );\r
+\r
+          case VK_DELETE:\r
+              /* The delete key should be treated as an ASCII keypress: */\r
+              INVOKE_WCB( *window, KeyboardUp,\r
+                          ( 127, window->State.MouseX, window->State.MouseY )\r
+              );\r
+              break;\r
+\r
+        default:\r
+        {\r
+#if !defined(_WIN32_WCE)\r
+            BYTE state[ 256 ];\r
+            WORD code[ 2 ];\r
+\r
+            GetKeyboardState( state );\r
+\r
+            if( ToAscii( (UINT)wParam, 0, state, code, 0 ) == 1 )\r
+                wParam=code[ 0 ];\r
+\r
+            INVOKE_WCB( *window, KeyboardUp,\r
+                        ( (char)wParam,\r
+                          window->State.MouseX, window->State.MouseY )\r
+            );\r
+#endif /* !defined(_WIN32_WCE) */\r
+        }\r
+        }\r
+\r
+        if( keypress != -1 )\r
+            INVOKE_WCB( *window, SpecialUp,\r
+                        ( keypress,\r
+                          window->State.MouseX, window->State.MouseY )\r
+            );\r
+\r
+        fgState.Modifiers = INVALID_MODIFIERS;\r
+    }\r
+    break;\r
+\r
+    case WM_SYSCHAR:\r
+    case WM_CHAR:\r
+    {\r
+      if( (fgState.KeyRepeat==GLUT_KEY_REPEAT_OFF || window->State.IgnoreKeyRepeat==GL_TRUE) && (HIWORD(lParam) & KF_REPEAT) )\r
+            break;\r
+\r
+        fgState.Modifiers = fghGetModifiers( );\r
+        INVOKE_WCB( *window, Keyboard,\r
+                    ( (char)wParam,\r
+                      window->State.MouseX, window->State.MouseY )\r
+        );\r
+        fgState.Modifiers = INVALID_MODIFIERS;\r
+    }\r
+    break;\r
+\r
+    case WM_CAPTURECHANGED:\r
+        /* User has finished resizing the window, force a redraw */\r
+        INVOKE_WCB( *window, Display, ( ) );\r
+\r
+        /*lRet = DefWindowProc( hWnd, uMsg, wParam, lParam ); */\r
+        break;\r
+\r
+        /* Other messages that I have seen and which are not handled already */\r
+    case WM_SETTEXT:  /* 0x000c */\r
+        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+        /* Pass it on to "DefWindowProc" to set the window text */\r
+        break;\r
+\r
+    case WM_GETTEXT:  /* 0x000d */\r
+        /* Ideally we would copy the title of the window into "lParam" */\r
+        /* strncpy ( (char *)lParam, "Window Title", wParam );\r
+           lRet = ( wParam > 12 ) ? 12 : wParam;  */\r
+        /* the number of characters copied */\r
+        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+        break;\r
+\r
+    case WM_GETTEXTLENGTH:  /* 0x000e */\r
+        /* Ideally we would get the length of the title of the window */\r
+        lRet = 12;\r
+        /* the number of characters in "Window Title\0" (see above) */\r
+        break;\r
+\r
+    case WM_ERASEBKGND:  /* 0x0014 */\r
+        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+        break;\r
+\r
+#if !defined(_WIN32_WCE)\r
+    case WM_SYNCPAINT:  /* 0x0088 */\r
+        /* Another window has moved, need to update this one */\r
+        window->State.Redisplay = GL_TRUE;\r
+        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+        /* Help screen says this message must be passed to "DefWindowProc" */\r
+        break;\r
+\r
+    case WM_NCPAINT:  /* 0x0085 */\r
+      /* Need to update the border of this window */\r
+        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+        /* Pass it on to "DefWindowProc" to repaint a standard border */\r
+        break;\r
+\r
+    case WM_SYSCOMMAND :  /* 0x0112 */\r
+        {\r
+          /*\r
+           * We have received a system command message.  Try to act on it.\r
+           * The commands are passed in through the "wParam" parameter:\r
+           * The least significant digit seems to be which edge of the window\r
+           * is being used for a resize event:\r
+           *     4  3  5\r
+           *     1     2\r
+           *     7  6  8\r
+           * Congratulations and thanks to Richard Rauch for figuring this out..\r
+           */\r
+            switch ( wParam & 0xfff0 )\r
+            {\r
+            case SC_SIZE       :\r
+                break ;\r
+\r
+            case SC_MOVE       :\r
+                break ;\r
+\r
+            case SC_MINIMIZE   :\r
+                /* User has clicked on the "-" to minimize the window */\r
+                /* Turn off the visibility */\r
+                window->State.Visible = GL_FALSE ;\r
+\r
+                break ;\r
+\r
+            case SC_MAXIMIZE   :\r
+                break ;\r
+\r
+            case SC_NEXTWINDOW :\r
+                break ;\r
+\r
+            case SC_PREVWINDOW :\r
+                break ;\r
+\r
+            case SC_CLOSE      :\r
+                /* Followed very closely by a WM_CLOSE message */\r
+                break ;\r
+\r
+            case SC_VSCROLL    :\r
+                break ;\r
+\r
+            case SC_HSCROLL    :\r
+                break ;\r
+\r
+            case SC_MOUSEMENU  :\r
+                break ;\r
+\r
+            case SC_KEYMENU    :\r
+                break ;\r
+\r
+            case SC_ARRANGE    :\r
+                break ;\r
+\r
+            case SC_RESTORE    :\r
+                break ;\r
+\r
+            case SC_TASKLIST   :\r
+                break ;\r
+\r
+            case SC_SCREENSAVE :\r
+                break ;\r
+\r
+            case SC_HOTKEY     :\r
+                break ;\r
+\r
+#if(WINVER >= 0x0400)\r
+            case SC_DEFAULT    :\r
+                break ;\r
+\r
+            case SC_MONITORPOWER    :\r
+                break ;\r
+\r
+            case SC_CONTEXTHELP    :\r
+                break ;\r
+#endif /* WINVER >= 0x0400 */\r
+\r
+            default:\r
+#if _DEBUG\r
+                fgWarning( "Unknown wParam type 0x%x", wParam );\r
+#endif\r
+                break;\r
+            }\r
+        }\r
+#endif /* !defined(_WIN32_WCE) */\r
+\r
+        /* We need to pass the message on to the operating system as well */\r
+        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+        break;\r
+\r
+#ifdef WM_TOUCH\r
+       /* handle multi-touch messages */\r
+       case WM_TOUCH:\r
+       {\r
+               unsigned int numInputs = (unsigned int)wParam;\r
+               unsigned int i = 0;\r
+               TOUCHINPUT* ti = (TOUCHINPUT*)malloc( sizeof(TOUCHINPUT)*numInputs);\r
+\r
+               if (fghGetTouchInputInfo == (pGetTouchInputInfo)0xDEADBEEF) {\r
+                   fghGetTouchInputInfo = (pGetTouchInputInfo)GetProcAddress(GetModuleHandle("user32"),"GetTouchInputInfo");\r
+                   fghCloseTouchInputHandle = (pCloseTouchInputHandle)GetProcAddress(GetModuleHandle("user32"),"CloseTouchInputHandle");\r
+               }\r
+\r
+               if (!fghGetTouchInputInfo) { \r
+                       free( (void*)ti );\r
+                       break;\r
+               }\r
+\r
+               if (fghGetTouchInputInfo( (HTOUCHINPUT)lParam, numInputs, ti, sizeof(TOUCHINPUT) )) {\r
+                       /* Handle each contact point */\r
+                       for (i = 0; i < numInputs; ++i ) {\r
+\r
+                               POINT tp;\r
+                               tp.x = TOUCH_COORD_TO_PIXEL(ti[i].x);\r
+                               tp.y = TOUCH_COORD_TO_PIXEL(ti[i].y);\r
+                               ScreenToClient( hWnd, &tp );\r
+\r
+                               ti[i].dwID = ti[i].dwID * 2;\r
+\r
+                               if (ti[i].dwFlags & TOUCHEVENTF_DOWN) {\r
+                                       INVOKE_WCB( *window, MultiEntry,  ( ti[i].dwID, GLUT_ENTERED ) );\r
+                                       INVOKE_WCB( *window, MultiButton, ( ti[i].dwID, tp.x, tp.y, 0, GLUT_DOWN ) );\r
+                               } else if (ti[i].dwFlags & TOUCHEVENTF_MOVE) {\r
+                                       INVOKE_WCB( *window, MultiMotion, ( ti[i].dwID, tp.x, tp.y ) );\r
+                               } else if (ti[i].dwFlags & TOUCHEVENTF_UP)   { \r
+                                       INVOKE_WCB( *window, MultiButton, ( ti[i].dwID, tp.x, tp.y, 0, GLUT_UP ) );\r
+                                       INVOKE_WCB( *window, MultiEntry,  ( ti[i].dwID, GLUT_LEFT ) );\r
+                               }\r
+                       }\r
+               }\r
+               fghCloseTouchInputHandle((HTOUCHINPUT)lParam);\r
+               free( (void*)ti );\r
+               lRet = 0; /*DefWindowProc( hWnd, uMsg, wParam, lParam );*/\r
+               break;\r
+       }\r
+#endif\r
+    default:\r
+        /* Handle unhandled messages */\r
+        lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );\r
+        break;\r
+    }\r
+\r
+    return lRet;\r
+}\r