4 * The windows message processing methods.
6 * Copyright (c) 1999-2000 Pawel W. Olszta. All Rights Reserved.
7 * Written by Pawel W. Olszta, <olszta@sourceforge.net>
8 * Creation date: Fri Dec 3 1999
10 * Permission is hereby granted, free of charge, to any person obtaining a
11 * copy of this software and associated documentation files (the "Software"),
12 * to deal in the Software without restriction, including without limitation
13 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
14 * and/or sell copies of the Software, and to permit persons to whom the
15 * Software is furnished to do so, subject to the following conditions:
17 * The above copyright notice and this permission notice shall be included
18 * in all copies or substantial portions of the Software.
20 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
21 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
22 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
23 * PAWEL W. OLSZTA BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
24 * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
25 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
33 #include <GL/freeglut.h>
34 #include "freeglut_internal.h"
37 #if TARGET_HOST_UNIX_X11
38 #include <sys/types.h>
43 #elif TARGET_HOST_WIN32
44 #elif TARGET_HOST_WINCE
46 typedef struct GXDisplayProperties GXDisplayProperties;
47 typedef struct GXKeyList GXKeyList;
50 typedef struct GXKeyList (*GXGETDEFAULTKEYS)(int);
51 typedef int (*GXOPENINPUT)();
53 GXGETDEFAULTKEYS GXGetDefaultKeys_ = NULL;
54 GXOPENINPUT GXOpenInput_ = NULL;
56 struct GXKeyList gxKeyList;
61 #define MAX(a,b) (((a)>(b)) ? (a) : (b))
65 #define MIN(a,b) (((a)<(b)) ? (a) : (b))
70 * TODO BEFORE THE STABLE RELEASE:
72 * There are some issues concerning window redrawing under X11, and maybe
73 * some events are not handled. The Win32 version lacks some more features,
74 * but seems acceptable for not demanding purposes.
76 * Need to investigate why the X11 version breaks out with an error when
77 * closing a window (using the window manager, not glutDestroyWindow)...
80 /* -- PRIVATE FUNCTIONS ---------------------------------------------------- */
83 * Handle a window configuration change. When no reshape
84 * callback is hooked, the viewport size is updated to
85 * match the new window size.
87 static void fghReshapeWindowByHandle ( SFG_WindowHandleType handle,
88 int width, int height )
90 SFG_Window *current_window = fgStructure.Window;
92 SFG_Window* window = fgWindowByHandle( handle );
93 freeglut_return_if_fail( window != NULL );
96 #if TARGET_HOST_UNIX_X11
98 XResizeWindow( fgDisplay.Display, window->Window.Handle,
100 XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
102 #elif TARGET_HOST_WIN32 || TARGET_HOST_WINCE
104 #if !TARGET_HOST_WINCE
109 * For windowed mode, get the current position of the
110 * window and resize taking the size of the frame
111 * decorations into account.
114 GetWindowRect( window->Window.Handle, &rect );
115 rect.right = rect.left + width;
116 rect.bottom = rect.top + height;
118 if ( window->Parent == NULL )
120 if ( ! window->IsMenu && !window->State.IsGameMode )
122 rect.right += GetSystemMetrics( SM_CXSIZEFRAME ) * 2;
123 rect.bottom += GetSystemMetrics( SM_CYSIZEFRAME ) * 2 +
124 GetSystemMetrics( SM_CYCAPTION );
129 GetWindowRect( window->Parent->Window.Handle, &rect );
130 AdjustWindowRect ( &rect, WS_OVERLAPPEDWINDOW | WS_CLIPSIBLINGS |
131 WS_CLIPCHILDREN, FALSE );
135 * SWP_NOACTIVATE Do not activate the window
136 * SWP_NOOWNERZORDER Do not change position in z-order
137 * SWP_NOSENDCHANGING Supress WM_WINDOWPOSCHANGING message
138 * SWP_NOZORDER Retains the current Z order (ignore 2nd param)
141 SetWindowPos( window->Window.Handle,
145 rect.right - rect.left,
146 rect.bottom - rect.top,
147 SWP_NOACTIVATE | SWP_NOOWNERZORDER | SWP_NOSENDCHANGING |
151 #endif /* TARGET_HOST_WINCE */
154 * XXX Should update {window->State.OldWidth, window->State.OldHeight}
155 * XXX to keep in lockstep with UNIX_X11 code.
157 if( FETCH_WCB( *window, Reshape ) )
158 INVOKE_WCB( *window, Reshape, ( width, height ) );
161 fgSetWindow( window );
162 glViewport( 0, 0, width, height );
168 * Force a window redraw. In Windows at least this is only a partial
169 * solution: if the window is increasing in size in either dimension,
170 * the already-drawn part does not get drawn again and things look funny.
171 * But without this we get this bad behaviour whenever we resize the
174 window->State.Redisplay = GL_TRUE;
177 fgSetWindow( current_window );
181 * Calls a window's redraw method. This is used when
182 * a redraw is forced by the incoming window messages.
184 static void fghRedrawWindowByHandle ( SFG_WindowHandleType handle )
186 SFG_Window* window = fgWindowByHandle( handle );
187 freeglut_return_if_fail( window );
188 freeglut_return_if_fail( FETCH_WCB ( *window, Display ) );
190 window->State.Redisplay = GL_FALSE;
192 freeglut_return_if_fail( window->State.Visible );
194 if( window->State.NeedToResize )
196 SFG_Window *current_window = fgStructure.Window;
198 fgSetWindow( window );
200 fghReshapeWindowByHandle(
201 window->Window.Handle,
206 window->State.NeedToResize = GL_FALSE;
207 fgSetWindow( current_window );
210 INVOKE_WCB( *window, Display, ( ) );
214 * A static helper function to execute display callback for a window
216 static void fghcbDisplayWindow( SFG_Window *window,
217 SFG_Enumerator *enumerator )
219 if( window->State.NeedToResize )
221 SFG_Window *current_window = fgStructure.Window;
223 fgSetWindow( window );
225 fghReshapeWindowByHandle(
226 window->Window.Handle,
231 window->State.NeedToResize = GL_FALSE;
232 fgSetWindow ( current_window );
235 if( window->State.Redisplay &&
236 window->State.Visible )
238 window->State.Redisplay = GL_FALSE;
240 #if TARGET_HOST_UNIX_X11
242 SFG_Window *current_window = fgStructure.Window;
244 INVOKE_WCB( *window, Display, ( ) );
245 fgSetWindow( current_window );
247 #elif TARGET_HOST_WIN32 || TARGET_HOST_WINCE
249 window->Window.Handle, NULL, NULL,
250 RDW_NOERASE | RDW_INTERNALPAINT | RDW_INVALIDATE | RDW_UPDATENOW
255 fgEnumSubWindows( window, fghcbDisplayWindow, enumerator );
259 * Make all windows perform a display call
261 static void fghDisplayAll( void )
263 SFG_Enumerator enumerator;
265 enumerator.found = GL_FALSE;
266 enumerator.data = NULL;
268 fgEnumWindows( fghcbDisplayWindow, &enumerator );
272 * Window enumerator callback to check for the joystick polling code
274 static void fghcbCheckJoystickPolls( SFG_Window *window,
275 SFG_Enumerator *enumerator )
277 long int checkTime = fgElapsedTime( );
279 if( window->State.JoystickLastPoll + window->State.JoystickPollRate <=
282 #if !TARGET_HOST_WINCE
283 fgJoystickPollWindow( window );
284 #endif /* !TARGET_HOST_WINCE */
285 window->State.JoystickLastPoll = checkTime;
288 fgEnumSubWindows( window, fghcbCheckJoystickPolls, enumerator );
292 * Check all windows for joystick polling
294 static void fghCheckJoystickPolls( void )
296 SFG_Enumerator enumerator;
298 enumerator.found = GL_FALSE;
299 enumerator.data = NULL;
301 fgEnumWindows( fghcbCheckJoystickPolls, &enumerator );
305 * Check the global timers
307 static void fghCheckTimers( void )
309 long checkTime = fgElapsedTime( );
311 while( fgState.Timers.First )
313 SFG_Timer *timer = fgState.Timers.First;
315 if( timer->TriggerTime > checkTime )
318 fgListRemove( &fgState.Timers, &timer->Node );
319 fgListAppend( &fgState.FreeTimers, &timer->Node );
321 timer->Callback( timer->ID );
328 long fgElapsedTime( void )
330 if ( fgState.Time.Set )
332 #if TARGET_HOST_UNIX_X11
336 gettimeofday( &now, NULL );
338 elapsed = (now.tv_usec - fgState.Time.Value.tv_usec) / 1000;
339 elapsed += (now.tv_sec - fgState.Time.Value.tv_sec) * 1000;
342 #elif TARGET_HOST_WIN32
343 return timeGetTime() - fgState.Time.Value;
344 #elif TARGET_HOST_WINCE
345 return GetTickCount() - fgState.Time.Value;
350 #if TARGET_HOST_UNIX_X11
351 gettimeofday( &fgState.Time.Value, NULL );
352 #elif TARGET_HOST_WIN32
353 fgState.Time.Value = timeGetTime ();
354 #elif TARGET_HOST_WINCE
355 fgState.Time.Value = GetTickCount();
357 fgState.Time.Set = GL_TRUE ;
366 void fgError( const char *fmt, ... )
372 fprintf( stderr, "freeglut ");
373 if( fgState.ProgramName )
374 fprintf (stderr, "(%s): ", fgState.ProgramName);
375 vfprintf( stderr, fmt, ap );
376 fprintf( stderr, "\n" );
380 if ( fgState.Initialised )
386 void fgWarning( const char *fmt, ... )
392 fprintf( stderr, "freeglut ");
393 if( fgState.ProgramName )
394 fprintf( stderr, "(%s): ", fgState.ProgramName );
395 vfprintf( stderr, fmt, ap );
396 fprintf( stderr, "\n" );
402 * Indicates whether Joystick events are being used by ANY window.
404 * The current mechanism is to walk all of the windows and ask if
405 * there is a joystick callback. We have a short-circuit early
406 * return if we find any joystick handler registered.
408 * The real way to do this is to make use of the glutTimer() API
409 * to more cleanly re-implement the joystick API. Then, this code
410 * and all other "joystick timer" code can be yanked.
413 static void fgCheckJoystickCallback( SFG_Window* w, SFG_Enumerator* e)
415 if( FETCH_WCB( *w, Joystick ) )
420 fgEnumSubWindows( w, fgCheckJoystickCallback, e );
422 static int fgHaveJoystick( void )
424 SFG_Enumerator enumerator;
425 enumerator.found = GL_FALSE;
426 enumerator.data = NULL;
427 fgEnumWindows( fgCheckJoystickCallback, &enumerator );
428 return !!enumerator.data;
430 static void fgHavePendingRedisplaysCallback( SFG_Window* w, SFG_Enumerator* e)
432 if( w->State.Redisplay )
437 fgEnumSubWindows( w, fgHavePendingRedisplaysCallback, e );
439 static int fgHavePendingRedisplays (void)
441 SFG_Enumerator enumerator;
442 enumerator.found = GL_FALSE;
443 enumerator.data = NULL;
444 fgEnumWindows( fgHavePendingRedisplaysCallback, &enumerator );
445 return !!enumerator.data;
448 * Returns the number of GLUT ticks (milliseconds) till the next timer event.
450 static long fgNextTimer( void )
453 SFG_Timer *timer = fgState.Timers.First;
456 ret = timer->TriggerTime - fgElapsedTime();
463 * Does the magic required to relinquish the CPU until something interesting
466 static void fgSleepForEvents( void )
470 if( fgState.IdleCallback || fgHavePendingRedisplays( ) )
473 msec = fgNextTimer( );
474 if( fgHaveJoystick( ) ) /* XXX Use GLUT timers for joysticks... */
475 msec = MIN( msec, 10 ); /* XXX Dumb; forces granularity to .01sec */
477 #if TARGET_HOST_UNIX_X11
479 * Possibly due to aggressive use of XFlush() and friends,
480 * it is possible to have our socket drained but still have
481 * unprocessed events. (Or, this may just be normal with
482 * X, anyway?) We do non-trivial processing of X events
483 * after tham in event-reading loop, in any case, so we
484 * need to allow that we may have an empty socket but non-
487 if( ! XPending( fgDisplay.Display ) )
494 socket = ConnectionNumber( fgDisplay.Display );
496 FD_SET( socket, &fdset );
497 wait.tv_sec = msec / 1000;
498 wait.tv_usec = (msec % 1000) * 1000;
499 err = select( socket+1, &fdset, NULL, NULL, &wait );
502 fgWarning ( "freeglut select() error: %d\n", errno );
504 #elif TARGET_HOST_WIN32 || TARGET_HOST_WINCE
505 MsgWaitForMultipleObjects( 0, NULL, FALSE, msec, QS_ALLEVENTS );
509 #if TARGET_HOST_UNIX_X11
511 * Returns GLUT modifier mask for an XEvent.
513 int fgGetXModifiers( XEvent *event )
517 if( event->xkey.state & ( ShiftMask | LockMask ) )
518 ret |= GLUT_ACTIVE_SHIFT;
519 if( event->xkey.state & ControlMask )
520 ret |= GLUT_ACTIVE_CTRL;
521 if( event->xkey.state & Mod1Mask )
522 ret |= GLUT_ACTIVE_ALT;
529 /* -- INTERFACE FUNCTIONS -------------------------------------------------- */
532 * Executes a single iteration in the freeglut processing loop.
534 void FGAPIENTRY glutMainLoopEvent( void )
536 #if TARGET_HOST_UNIX_X11
541 * This code was repeated constantly, so here it goes into a definition:
543 #define GETWINDOW(a) \
544 window = fgWindowByHandle( event.a.window ); \
545 if( window == NULL ) \
548 #define GETMOUSE(a) \
549 window->State.MouseX = event.a.x; \
550 window->State.MouseY = event.a.y;
552 freeglut_assert_ready;
554 while( XPending( fgDisplay.Display ) )
556 XNextEvent( fgDisplay.Display, &event );
562 * Destroy the window when the WM_DELETE_WINDOW message arrives
564 if( (Atom) event.xclient.data.l[ 0 ] == fgDisplay.DeleteWindow )
566 GETWINDOW( xclient );
568 fgDestroyWindow ( window );
570 if( fgState.ActionOnWindowClose == GLUT_ACTION_EXIT )
575 else if( fgState.ActionOnWindowClose == GLUT_ACTION_GLUTMAINLOOP_RETURNS )
576 fgState.ExecState = GLUT_EXEC_STATE_STOP;
583 * CreateNotify causes a configure-event so that sub-windows are
584 * handled compatibly with GLUT. Otherwise, your sub-windows
585 * (in freeglut only) will not get an initial reshape event,
586 * which can break things.
588 * GLUT presumably does this because it generally tries to treat
589 * sub-windows the same as windows.
591 * XXX Technically, GETWINDOW( xconfigure ) and
592 * XXX {event.xconfigure} may not be legit ways to get at
593 * XXX data for CreateNotify events. In practice, the data
594 * XXX is in a union which is laid out much the same either
595 * XXX way. But if you want to split hairs, this isn't legit,
596 * XXX and we should instead duplicate some code.
599 case ConfigureNotify:
600 GETWINDOW( xconfigure );
602 int width = event.xconfigure.width;
603 int height = event.xconfigure.height;
605 if( ( width != window->State.OldWidth ) ||
606 ( height != window->State.OldHeight ) )
608 window->State.OldWidth = width;
609 window->State.OldHeight = height;
610 if( FETCH_WCB( *window, Reshape ) )
611 INVOKE_WCB( *window, Reshape, ( width, height ) );
614 fgSetWindow( window );
615 glViewport( 0, 0, width, height );
617 glutPostRedisplay( );
624 * This is sent to confirm the XDestroyWindow call.
626 * XXX WHY is this commented out? Should we re-enable it?
628 /* fgAddToWindowDestroyList ( window ); */
633 * We are too dumb to process partial exposes...
635 * XXX Well, we could do it. However, it seems to only
636 * XXX be potentially useful for single-buffered (since
637 * XXX double-buffered does not respect viewport when we
638 * XXX do a buffer-swap).
641 if( event.xexpose.count == 0 )
643 GETWINDOW( xexpose );
644 fgSetWindow( window );
645 glutPostRedisplay( );
652 * If we never do anything with this, can we just not ask to
653 * get these messages?
659 * Have the client's keyboard knowledge updated (xlib.ps,
660 * page 206, says that's a good thing to do)
662 XRefreshKeyboardMapping( (XMappingEvent *) &event );
665 case VisibilityNotify:
667 GETWINDOW( xvisibility );
669 * XXX INVOKE_WCB() does this check for us.
671 if( ! FETCH_WCB( *window, WindowStatus ) )
673 fgSetWindow( window );
676 * Sending this event, the X server can notify us that the window
677 * has just acquired one of the three possible visibility states:
678 * VisibilityUnobscured, VisibilityPartiallyObscured or
679 * VisibilityFullyObscured
681 switch( event.xvisibility.state )
683 case VisibilityUnobscured:
684 INVOKE_WCB( *window, WindowStatus, ( GLUT_FULLY_RETAINED ) );
685 window->State.Visible = GL_TRUE;
688 case VisibilityPartiallyObscured:
689 INVOKE_WCB( *window, WindowStatus,
690 ( GLUT_PARTIALLY_RETAINED ) );
691 window->State.Visible = GL_TRUE;
694 case VisibilityFullyObscured:
695 INVOKE_WCB( *window, WindowStatus, ( GLUT_FULLY_COVERED ) );
696 window->State.Visible = GL_FALSE;
700 fgWarning( "Uknown X visibility state: %d",
701 event.xvisibility.state );
709 GETWINDOW( xcrossing );
710 GETMOUSE( xcrossing );
711 INVOKE_WCB( *window, Entry, ( ( EnterNotify == event.type ) ?
718 GETWINDOW( xmotion );
721 if( window->ActiveMenu )
723 if( window == window->ActiveMenu->ParentWindow )
725 window->ActiveMenu->Window->State.MouseX =
726 event.xmotion.x_root - window->ActiveMenu->X;
727 window->ActiveMenu->Window->State.MouseY =
728 event.xmotion.y_root - window->ActiveMenu->Y;
730 window->ActiveMenu->Window->State.Redisplay = GL_TRUE ;
731 fgSetWindow( window->ActiveMenu->ParentWindow );
737 * XXX For more than 5 buttons, just check {event.xmotion.state},
738 * XXX rather than a host of bit-masks? Or maybe we need to
739 * XXX track ButtonPress/ButtonRelease events in our own
742 #define BUTTON_MASK \
743 ( Button1Mask | Button2Mask | Button3Mask | Button4Mask | Button5Mask )
744 if ( event.xmotion.state & BUTTON_MASK )
745 INVOKE_WCB( *window, Motion, ( event.xmotion.x,
748 INVOKE_WCB( *window, Passive, ( event.xmotion.x,
756 GLboolean pressed = GL_TRUE;
759 if( event.type == ButtonRelease )
763 * A mouse button has been pressed or released. Traditionally,
764 * break if the window was found within the freeglut structures.
766 GETWINDOW( xbutton );
770 * An X button (at least in XFree86) is numbered from 1.
771 * A GLUT button is numbered from 0.
772 * Old GLUT passed through buttons other than just the first
773 * three, though it only gave symbolic names and official
774 * support to the first three.
776 button = event.xbutton.button - 1;
779 * XXX This comment is replicated in the WIN32 section and
780 * XXX maybe also in the menu code. Can we move the info
781 * XXX to one central place and *reference* it from here?
783 * Do not execute the application's mouse callback if a menu
784 * is hooked to this button. In that case an appropriate
785 * private call should be generated.
786 * Near as I can tell, this is the menu behaviour:
787 * - Down-click the menu button, menu not active: activate
788 * the menu with its upper left-hand corner at the mouse
790 * - Down-click any button outside the menu, menu active:
791 * deactivate the menu
792 * - Down-click any button inside the menu, menu active:
793 * select the menu entry and deactivate the menu
794 * - Up-click the menu button, menu not active: nothing happens
795 * - Up-click the menu button outside the menu, menu active:
797 * - Up-click the menu button inside the menu, menu active:
798 * select the menu entry and deactivate the menu
800 /* Window has an active menu, it absorbs any mouse click */
801 if( window->ActiveMenu )
803 if( window == window->ActiveMenu->ParentWindow )
805 window->ActiveMenu->Window->State.MouseX =
806 event.xbutton.x_root - window->ActiveMenu->X;
807 window->ActiveMenu->Window->State.MouseY =
808 event.xbutton.y_root - window->ActiveMenu->Y;
811 /* In the menu, invoke the callback and deactivate the menu*/
812 if( fgCheckActiveMenu( window->ActiveMenu->Window,
813 window->ActiveMenu ) )
816 * Save the current window and menu and set the current
817 * window to the window whose menu this is
819 SFG_Window *save_window = fgStructure.Window;
820 SFG_Menu *save_menu = fgStructure.Menu;
821 SFG_Window *parent_window =
822 window->ActiveMenu->ParentWindow;
823 fgSetWindow( parent_window );
824 fgStructure.Menu = window->ActiveMenu;
826 /* Execute the menu callback */
827 fgExecuteMenuCallback( window->ActiveMenu );
828 fgDeactivateMenu( parent_window );
830 /* Restore the current window and menu */
831 fgSetWindow( save_window );
832 fgStructure.Menu = save_menu;
836 * Outside the menu, deactivate if it's a downclick
838 * XXX This isn't enough. A downclick outside of
839 * XXX the interior of our freeglut windows should also
840 * XXX deactivate the menu. This is more complicated.
842 fgDeactivateMenu( window->ActiveMenu->ParentWindow );
845 * XXX Why does an active menu require a redisplay at
846 * XXX this point? If this can come out cleanly, then
847 * XXX it probably should do so; if not, a comment should
850 window->State.Redisplay = GL_TRUE;
855 * No active menu, let's check whether we need to activate one.
857 if( ( 0 <= button ) &&
858 ( FREEGLUT_MAX_MENUS > button ) &&
859 ( window->Menu[ button ] ) &&
863 * XXX Posting a requisite Redisplay seems bogus.
865 window->State.Redisplay = GL_TRUE;
866 fgSetWindow( window );
867 fgActivateMenu( window, button );
872 * Check if there is a mouse or mouse wheel callback hooked to the
875 if( ! FETCH_WCB( *window, Mouse ) &&
876 ! FETCH_WCB( *window, MouseWheel ) )
879 fgState.Modifiers = fgGetXModifiers( &event );
882 * Finally execute the mouse or mouse wheel callback
884 * XXX Use a symbolic constant, *not* "4"! ("3, sire!")
886 if( ( button < 3 ) || ( ! FETCH_WCB( *window, MouseWheel ) ) )
887 INVOKE_WCB( *window, Mouse, ( button,
888 pressed ? GLUT_DOWN : GLUT_UP,
895 * Map 4 and 5 to wheel zero; EVEN to +1, ODD to -1
896 * " 6 and 7 " " one; ...
898 * XXX This *should* be behind some variables/macros,
899 * XXX since the order and numbering isn't certain
900 * XXX See XFree86 configuration docs (even back in the
901 * XXX 3.x days, and especially with 4.x).
903 * XXX Note that {button} has already been decremeted
904 * XXX in mapping from X button numbering to GLUT.
906 int wheel_number = (button - 3) / 2;
912 INVOKE_WCB( *window, MouseWheel, ( wheel_number,
920 * Trash the modifiers state
922 fgState.Modifiers = 0xffffffff;
929 FGCBKeyboard keyboard_cb;
930 FGCBSpecial special_cb;
935 /* Detect auto repeated keys, if configured globally or per-window */
937 if ( fgState.KeyRepeat==GLUT_KEY_REPEAT_OFF || window->State.IgnoreKeyRepeat==GL_TRUE )
939 if (event.type==KeyRelease)
942 * Look at X11 keystate to detect repeat mode.
943 * While X11 says the key is actually held down, we'll ignore KeyRelease/KeyPress pairs.
947 XQueryKeymap( fgDisplay.Display, keys ); /* Look at X11 keystate to detect repeat mode */
949 if ( event.xkey.keycode<256 ) /* XQueryKeymap is limited to 256 keycodes */
951 if ( keys[event.xkey.keycode>>3] & (1<<(event.xkey.keycode%8)) )
952 window->State.KeyRepeating = GL_TRUE;
954 window->State.KeyRepeating = GL_FALSE;
959 window->State.KeyRepeating = GL_FALSE;
961 /* Cease processing this event if it is auto repeated */
963 if (window->State.KeyRepeating)
966 if( event.type == KeyPress )
968 keyboard_cb = FETCH_WCB( *window, Keyboard );
969 special_cb = FETCH_WCB( *window, Special );
973 keyboard_cb = FETCH_WCB( *window, KeyboardUp );
974 special_cb = FETCH_WCB( *window, SpecialUp );
978 * Is there a keyboard/special callback hooked for this window?
980 if( keyboard_cb || special_cb )
982 XComposeStatus composeStatus;
983 char asciiCode[ 32 ];
988 * Check for the ASCII/KeySym codes associated with the event:
990 len = XLookupString( &event.xkey, asciiCode, sizeof(asciiCode),
991 &keySym, &composeStatus
995 * GLUT API tells us to have two separate callbacks...
1000 * ...one for the ASCII translateable keypresses...
1004 fgSetWindow( window );
1005 fgState.Modifiers = fgGetXModifiers( &event );
1006 keyboard_cb( asciiCode[ 0 ],
1007 event.xkey.x, event.xkey.y
1009 fgState.Modifiers = 0xffffffff;
1017 * ...and one for all the others, which need to be
1018 * translated to GLUT_KEY_Xs...
1022 case XK_F1: special = GLUT_KEY_F1; break;
1023 case XK_F2: special = GLUT_KEY_F2; break;
1024 case XK_F3: special = GLUT_KEY_F3; break;
1025 case XK_F4: special = GLUT_KEY_F4; break;
1026 case XK_F5: special = GLUT_KEY_F5; break;
1027 case XK_F6: special = GLUT_KEY_F6; break;
1028 case XK_F7: special = GLUT_KEY_F7; break;
1029 case XK_F8: special = GLUT_KEY_F8; break;
1030 case XK_F9: special = GLUT_KEY_F9; break;
1031 case XK_F10: special = GLUT_KEY_F10; break;
1032 case XK_F11: special = GLUT_KEY_F11; break;
1033 case XK_F12: special = GLUT_KEY_F12; break;
1035 case XK_Left: special = GLUT_KEY_LEFT; break;
1036 case XK_Right: special = GLUT_KEY_RIGHT; break;
1037 case XK_Up: special = GLUT_KEY_UP; break;
1038 case XK_Down: special = GLUT_KEY_DOWN; break;
1041 case XK_Prior: special = GLUT_KEY_PAGE_UP; break;
1043 case XK_Next: special = GLUT_KEY_PAGE_DOWN; break;
1045 case XK_Home: special = GLUT_KEY_HOME; break;
1047 case XK_End: special = GLUT_KEY_END; break;
1049 case XK_Insert: special = GLUT_KEY_INSERT; break;
1053 * Execute the callback (if one has been specified),
1054 * given that the special code seems to be valid...
1056 if( special_cb && (special != -1) )
1058 fgSetWindow( window );
1059 fgState.Modifiers = fgGetXModifiers( &event );
1060 special_cb( special, event.xkey.x, event.xkey.y );
1061 fgState.Modifiers = 0xffffffff;
1068 case ReparentNotify:
1069 break; /* XXX Should disable this event */
1072 fgWarning ("Unknown X event type: %d", event.type);
1077 #elif TARGET_HOST_WIN32 || TARGET_HOST_WINCE
1081 while( PeekMessage( &stMsg, NULL, 0, 0, PM_NOREMOVE ) )
1083 if( GetMessage( &stMsg, NULL, 0, 0 ) == 0 )
1085 if( fgState.ActionOnWindowClose == GLUT_ACTION_EXIT )
1090 else if( fgState.ActionOnWindowClose == GLUT_ACTION_GLUTMAINLOOP_RETURNS )
1091 fgState.ExecState = GLUT_EXEC_STATE_STOP;
1096 TranslateMessage( &stMsg );
1097 DispatchMessage( &stMsg );
1101 if( fgState.Timers.First )
1103 fghCheckJoystickPolls( );
1110 * Enters the freeglut processing loop.
1111 * Stays until the "ExecState" changes to "GLUT_EXEC_STATE_STOP".
1113 void FGAPIENTRY glutMainLoop( void )
1117 #if TARGET_HOST_WIN32 || TARGET_HOST_WINCE
1118 SFG_Window *window = (SFG_Window *)fgStructure.Windows.First ;
1121 freeglut_assert_ready;
1123 #if TARGET_HOST_WIN32 || TARGET_HOST_WINCE
1125 * Processing before the main loop: If there is a window which is open and
1126 * which has a visibility callback, call it. I know this is an ugly hack,
1127 * but I'm not sure what else to do about it. Ideally we should leave
1128 * something uninitialized in the create window code and initialize it in
1129 * the main loop, and have that initialization create a "WM_ACTIVATE"
1130 * message. Then we would put the visibility callback code in the
1131 * "case WM_ACTIVATE" block below. - John Fay -- 10/24/02
1135 if ( FETCH_WCB( *window, Visibility ) )
1137 SFG_Window *current_window = fgStructure.Window ;
1139 INVOKE_WCB( *window, Visibility, ( window->State.Visible ) );
1140 fgSetWindow( current_window );
1143 window = (SFG_Window *)window->Node.Next ;
1147 fgState.ExecState = GLUT_EXEC_STATE_RUNNING ;
1148 while( fgState.ExecState == GLUT_EXEC_STATE_RUNNING )
1152 glutMainLoopEvent( );
1154 * Step through the list of windows, seeing if there are any
1155 * that are not menus
1157 for( window = ( SFG_Window * )fgStructure.Windows.First;
1159 window = ( SFG_Window * )window->Node.Next )
1160 if ( ! ( window->IsMenu ) )
1164 fgState.ExecState = GLUT_EXEC_STATE_STOP;
1167 if( fgState.IdleCallback )
1168 fgState.IdleCallback( );
1170 fgSleepForEvents( );
1175 * When this loop terminates, destroy the display, state and structure
1176 * of a freeglut session, so that another glutInit() call can happen
1178 * Save the "ActionOnWindowClose" because "fgDeinitialize" resets it.
1180 action = fgState.ActionOnWindowClose;
1182 if( action == GLUT_ACTION_EXIT )
1187 * Leaves the freeglut processing loop.
1189 void FGAPIENTRY glutLeaveMainLoop( void )
1191 fgState.ExecState = GLUT_EXEC_STATE_STOP ;
1195 #if TARGET_HOST_WIN32 || TARGET_HOST_WINCE
1197 * Determine a GLUT modifer mask based on MS-WINDOWS system info.
1199 int fgGetWin32Modifiers (void)
1202 ( ( ( GetKeyState( VK_LSHIFT ) < 0 ) ||
1203 ( GetKeyState( VK_RSHIFT ) < 0 )) ? GLUT_ACTIVE_SHIFT : 0 ) |
1204 ( ( ( GetKeyState( VK_LCONTROL ) < 0 ) ||
1205 ( GetKeyState( VK_RCONTROL ) < 0 )) ? GLUT_ACTIVE_CTRL : 0 ) |
1206 ( ( ( GetKeyState( VK_LMENU ) < 0 ) ||
1207 ( GetKeyState( VK_RMENU ) < 0 )) ? GLUT_ACTIVE_ALT : 0 );
1211 * The window procedure for handling Win32 events
1213 LRESULT CALLBACK fgWindowProc( HWND hWnd, UINT uMsg, WPARAM wParam,
1216 SFG_Window* window = fgWindowByHandle( hWnd );
1220 if ( ( window == NULL ) && ( uMsg != WM_CREATE ) )
1221 return DefWindowProc( hWnd, uMsg, wParam, lParam );
1223 /* printf ( "Window %3d message <%04x> %12d %12d\n", window?window->ID:0,
1224 uMsg, wParam, lParam ); */
1229 * The window structure is passed as the creation structure paramter...
1231 window = (SFG_Window *) (((LPCREATESTRUCT) lParam)->lpCreateParams);
1232 assert( window != NULL );
1234 window->Window.Handle = hWnd;
1235 window->Window.Device = GetDC( hWnd );
1236 if( window->IsMenu )
1238 unsigned int current_DisplayMode = fgState.DisplayMode;
1239 fgState.DisplayMode = GLUT_DOUBLE | GLUT_RGB | GLUT_DEPTH;
1240 #if !TARGET_HOST_WINCE
1241 fgSetupPixelFormat( window, GL_FALSE, PFD_MAIN_PLANE );
1243 fgState.DisplayMode = current_DisplayMode;
1245 if( fgStructure.MenuContext )
1246 wglMakeCurrent( window->Window.Device,
1247 fgStructure.MenuContext->Context
1251 fgStructure.MenuContext =
1252 (SFG_MenuContext *)malloc( sizeof(SFG_MenuContext) );
1253 fgStructure.MenuContext->Context =
1254 wglCreateContext( window->Window.Device );
1257 /* window->Window.Context = wglGetCurrentContext (); */
1258 window->Window.Context = wglCreateContext( window->Window.Device );
1262 #if !TARGET_HOST_WINCE
1263 fgSetupPixelFormat( window, GL_FALSE, PFD_MAIN_PLANE );
1266 if( ! fgState.UseCurrentContext )
1267 window->Window.Context =
1268 wglCreateContext( window->Window.Device );
1271 window->Window.Context = wglGetCurrentContext( );
1272 if( ! window->Window.Context )
1273 window->Window.Context =
1274 wglCreateContext( window->Window.Device );
1278 window->State.NeedToResize = GL_TRUE;
1279 window->State.Width = fgState.Size.X;
1280 window->State.Height = fgState.Size.Y;
1282 ReleaseDC( window->Window.Handle, window->Window.Device );
1284 #if TARGET_HOST_WINCE
1285 /* Take over button handling */
1287 HINSTANCE dxDllLib=LoadLibrary(_T("gx.dll"));
1290 GXGetDefaultKeys_=(GXGETDEFAULTKEYS)GetProcAddress(dxDllLib, _T("?GXGetDefaultKeys@@YA?AUGXKeyList@@H@Z"));
1291 GXOpenInput_=(GXOPENINPUT)GetProcAddress(dxDllLib, _T("?GXOpenInput@@YAHXZ"));
1296 if(GXGetDefaultKeys_)
1297 gxKeyList = (*GXGetDefaultKeys_)(GX_LANDSCAPEKEYS);
1300 #endif /* TARGET_HOST_WINCE */
1305 * If the window is visible, then it is the user manually resizing it.
1306 * If it is not, then it is the system sending us a dummy resize with
1307 * zero dimensions on a "glutIconifyWindow" call.
1309 if( window->State.Visible )
1311 window->State.NeedToResize = GL_TRUE;
1312 #if TARGET_HOST_WINCE
1313 window->State.Width = HIWORD(lParam);
1314 window->State.Height = LOWORD(lParam);
1316 window->State.Width = LOWORD(lParam);
1317 window->State.Height = HIWORD(lParam);
1318 #endif /* TARGET_HOST_WINCE */
1324 /* printf("WM_SETFOCUS: %p\n", window ); */
1325 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1329 if (LOWORD(wParam) != WA_INACTIVE)
1331 /* glutSetCursor( fgStructure.Window->State.Cursor ); */
1332 /* printf("WM_ACTIVATE: glutSetCursor( %p, %d)\n", window,
1333 window->State.Cursor ); */
1334 glutSetCursor( window->State.Cursor );
1337 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1342 * XXX Why not re-use some common code with the glutSetCursor()
1343 * XXX function (or perhaps invoke glutSetCursor())?
1344 * XXX That is, why are we duplicating code, here, from
1345 * XXX glutSetCursor()? The WIN32 code should be able to just
1346 * XXX call glutSetCurdsor() instead of defining two macros
1347 * XXX and implementing a nested case in-line.
1350 /* Set the cursor AND change it for this window class. */
1351 #define MAP_CURSOR(a,b) \
1353 SetCursor( LoadCursor( NULL, b ) ); \
1356 /* Nuke the cursor AND change it for this window class. */
1357 #define ZAP_CURSOR(a,b) \
1359 SetCursor( NULL ); \
1362 if( LOWORD( lParam ) == HTCLIENT )
1363 switch( window->State.Cursor )
1365 MAP_CURSOR( GLUT_CURSOR_RIGHT_ARROW, IDC_ARROW );
1366 MAP_CURSOR( GLUT_CURSOR_LEFT_ARROW, IDC_ARROW );
1367 MAP_CURSOR( GLUT_CURSOR_INFO, IDC_HELP );
1368 MAP_CURSOR( GLUT_CURSOR_DESTROY, IDC_CROSS );
1369 MAP_CURSOR( GLUT_CURSOR_HELP, IDC_HELP );
1370 MAP_CURSOR( GLUT_CURSOR_CYCLE, IDC_SIZEALL );
1371 MAP_CURSOR( GLUT_CURSOR_SPRAY, IDC_CROSS );
1372 MAP_CURSOR( GLUT_CURSOR_WAIT, IDC_WAIT );
1373 MAP_CURSOR( GLUT_CURSOR_TEXT, IDC_UPARROW );
1374 MAP_CURSOR( GLUT_CURSOR_CROSSHAIR, IDC_CROSS );
1375 /* MAP_CURSOR( GLUT_CURSOR_NONE, IDC_NO ); */
1376 ZAP_CURSOR( GLUT_CURSOR_NONE, NULL );
1379 MAP_CURSOR( GLUT_CURSOR_UP_DOWN, IDC_ARROW );
1382 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1386 window->State.Visible = GL_TRUE;
1387 window->State.Redisplay = GL_TRUE;
1391 /* Turn on the visibility in case it was turned off somehow */
1392 window->State.Visible = GL_TRUE;
1393 BeginPaint( hWnd, &ps );
1394 fghRedrawWindowByHandle( hWnd );
1395 EndPaint( hWnd, &ps );
1399 fgDestroyWindow ( window );
1400 if ( fgState.ActionOnWindowClose != GLUT_ACTION_CONTINUE_EXECUTION )
1406 * The window already got destroyed, so don't bother with it.
1412 #if TARGET_HOST_WINCE
1413 window->State.MouseX = 320-HIWORD( lParam );
1414 window->State.MouseY = LOWORD( lParam );
1416 window->State.MouseX = LOWORD( lParam );
1417 window->State.MouseY = HIWORD( lParam );
1418 #endif /* TARGET_HOST_WINCE */
1420 if ( window->ActiveMenu )
1422 window->State.Redisplay = GL_TRUE;
1423 fgSetWindow ( window->ActiveMenu->ParentWindow );
1427 fgState.Modifiers = fgGetWin32Modifiers( );
1429 if( ( wParam & MK_LBUTTON ) ||
1430 ( wParam & MK_MBUTTON ) ||
1431 ( wParam & MK_RBUTTON ) )
1432 INVOKE_WCB( *window, Motion, ( window->State.MouseX,
1433 window->State.MouseY ) );
1435 INVOKE_WCB( *window, Passive, ( window->State.MouseX,
1436 window->State.MouseY ) );
1438 fgState.Modifiers = 0xffffffff;
1442 case WM_LBUTTONDOWN:
1443 case WM_MBUTTONDOWN:
1444 case WM_RBUTTONDOWN:
1449 GLboolean pressed = GL_TRUE;
1452 #if TARGET_HOST_WINCE
1453 window->State.MouseX = 320-HIWORD( lParam );
1454 window->State.MouseY = LOWORD( lParam );
1456 window->State.MouseX = LOWORD( lParam );
1457 window->State.MouseY = HIWORD( lParam );
1458 #endif /* TARGET_HOST_WINCE */
1462 case WM_LBUTTONDOWN:
1464 button = GLUT_LEFT_BUTTON;
1466 case WM_MBUTTONDOWN:
1468 button = GLUT_MIDDLE_BUTTON;
1470 case WM_RBUTTONDOWN:
1472 button = GLUT_RIGHT_BUTTON;
1476 button = GLUT_LEFT_BUTTON;
1480 button = GLUT_MIDDLE_BUTTON;
1484 button = GLUT_RIGHT_BUTTON;
1492 #if !TARGET_HOST_WINCE
1493 if( GetSystemMetrics( SM_SWAPBUTTON ) )
1495 if( button == GLUT_LEFT_BUTTON )
1496 button = GLUT_RIGHT_BUTTON;
1498 if( button == GLUT_RIGHT_BUTTON )
1499 button = GLUT_LEFT_BUTTON;
1501 #endif /* !TARGET_HOST_WINCE */
1504 return DefWindowProc( hWnd, uMsg, lParam, wParam );
1507 * XXX This comment is duplicated in two other spots.
1508 * XXX Can we centralize it?
1510 * Do not execute the application's mouse callback if a
1511 * menu is hooked to this button.
1512 * In that case an appropriate private call should be generated.
1513 * Near as I can tell, this is the menu behaviour:
1514 * - Down-click the menu button, menu not active: activate
1515 * the menu with its upper left-hand corner at the mouse location.
1516 * - Down-click any button outside the menu, menu active:
1517 * deactivate the menu
1518 * - Down-click any button inside the menu, menu active:
1519 * select the menu entry and deactivate the menu
1520 * - Up-click the menu button, menu not active: nothing happens
1521 * - Up-click the menu button outside the menu, menu active:
1523 * - Up-click the menu button inside the menu, menu active:
1524 * select the menu entry and deactivate the menu
1526 /* Window has an active menu, it absorbs any mouse click */
1527 if( window->ActiveMenu )
1529 /* Outside the menu, deactivate the menu if it's a downclick */
1530 if( ! fgCheckActiveMenu( window, window->ActiveMenu ) )
1533 fgDeactivateMenu( window->ActiveMenu->ParentWindow );
1535 else /* In menu, invoke the callback and deactivate the menu*/
1538 * Save the current window and menu and set the current
1539 * window to the window whose menu this is
1541 SFG_Window *save_window = fgStructure.Window;
1542 SFG_Menu *save_menu = fgStructure.Menu;
1543 SFG_Window *parent_window = window->ActiveMenu->ParentWindow;
1544 fgSetWindow( parent_window );
1545 fgStructure.Menu = window->ActiveMenu;
1547 /* Execute the menu callback */
1548 fgExecuteMenuCallback( window->ActiveMenu );
1549 fgDeactivateMenu( parent_window );
1551 /* Restore the current window and menu */
1552 fgSetWindow( save_window );
1553 fgStructure.Menu = save_menu;
1557 * Let's make the window redraw as a result of the mouse
1558 * click and menu activity.
1560 if( ! window->IsMenu )
1561 window->State.Redisplay = GL_TRUE;
1566 if( window->Menu[ button ] && pressed )
1568 window->State.Redisplay = GL_TRUE;
1569 fgSetWindow( window );
1570 fgActivateMenu( window, button );
1575 if( ! FETCH_WCB( *window, Mouse ) )
1578 fgSetWindow( window );
1579 fgState.Modifiers = fgGetWin32Modifiers( );
1584 pressed ? GLUT_DOWN : GLUT_UP,
1585 window->State.MouseX,
1586 window->State.MouseY
1590 fgState.Modifiers = 0xffffffff;
1595 /* Should be WM_MOUSEWHEEL but my compiler doesn't recognize it */
1598 * XXX THIS IS SPECULATIVE -- John Fay, 10/2/03
1599 * XXX Should use WHEEL_DELTA instead of 120
1601 int wheel_number = LOWORD( wParam );
1602 short ticks = ( short )HIWORD( wParam ) / 120;
1612 * The mouse cursor has moved. Remember the new mouse cursor's position
1614 /* window->State.MouseX = LOWORD( lParam ); */
1615 /* Need to adjust by window position, */
1616 /* window->State.MouseY = HIWORD( lParam ); */
1617 /* change "lParam" to other parameter */
1619 if( ! FETCH_WCB( *window, MouseWheel ) &&
1620 ! FETCH_WCB( *window, Mouse ) )
1623 fgSetWindow( window );
1624 fgState.Modifiers = fgGetWin32Modifiers( );
1627 if( FETCH_WCB( *window, MouseWheel ) )
1628 INVOKE_WCB( *window, MouseWheel,
1631 window->State.MouseX,
1632 window->State.MouseY
1635 else /* No mouse wheel, call the mouse button callback twice */
1638 * XXX The below assumes that you have no more than 3 mouse
1639 * XXX buttons. Sorry.
1641 int button = wheel_number*2 + 4;
1644 INVOKE_WCB( *window, Mouse,
1645 ( button, GLUT_DOWN,
1646 window->State.MouseX, window->State.MouseY )
1648 INVOKE_WCB( *window, Mouse,
1650 window->State.MouseX, window->State.MouseX )
1654 fgState.Modifiers = 0xffffffff;
1664 if( ( fgState.KeyRepeat==GLUT_KEY_REPEAT_OFF || window->State.IgnoreKeyRepeat==GL_TRUE ) && (HIWORD(lParam) & KF_REPEAT) )
1668 * Remember the current modifiers state. This is done here in order
1669 * to make sure the VK_DELETE keyboard callback is executed properly.
1671 fgState.Modifiers = fgGetWin32Modifiers( );
1673 GetCursorPos( &mouse_pos );
1674 ScreenToClient( window->Window.Handle, &mouse_pos );
1676 window->State.MouseX = mouse_pos.x;
1677 window->State.MouseY = mouse_pos.y;
1680 * Convert the Win32 keystroke codes to GLUTtish way
1682 # define KEY(a,b) case a: keypress = b; break;
1686 KEY( VK_F1, GLUT_KEY_F1 );
1687 KEY( VK_F2, GLUT_KEY_F2 );
1688 KEY( VK_F3, GLUT_KEY_F3 );
1689 KEY( VK_F4, GLUT_KEY_F4 );
1690 KEY( VK_F5, GLUT_KEY_F5 );
1691 KEY( VK_F6, GLUT_KEY_F6 );
1692 KEY( VK_F7, GLUT_KEY_F7 );
1693 KEY( VK_F8, GLUT_KEY_F8 );
1694 KEY( VK_F9, GLUT_KEY_F9 );
1695 KEY( VK_F10, GLUT_KEY_F10 );
1696 KEY( VK_F11, GLUT_KEY_F11 );
1697 KEY( VK_F12, GLUT_KEY_F12 );
1698 KEY( VK_PRIOR, GLUT_KEY_PAGE_UP );
1699 KEY( VK_NEXT, GLUT_KEY_PAGE_DOWN );
1700 KEY( VK_HOME, GLUT_KEY_HOME );
1701 KEY( VK_END, GLUT_KEY_END );
1702 KEY( VK_LEFT, GLUT_KEY_LEFT );
1703 KEY( VK_UP, GLUT_KEY_UP );
1704 KEY( VK_RIGHT, GLUT_KEY_RIGHT );
1705 KEY( VK_DOWN, GLUT_KEY_DOWN );
1706 KEY( VK_INSERT, GLUT_KEY_INSERT );
1710 * The delete key should be treated as an ASCII keypress:
1712 INVOKE_WCB( *window, Keyboard,
1713 ( 127, window->State.MouseX, window->State.MouseY )
1717 #if TARGET_HOST_WINCE
1718 if(!(lParam & 0x40000000)) /* Prevent auto-repeat */
1720 if(wParam==(unsigned)gxKeyList.vkRight)
1721 keypress = GLUT_KEY_RIGHT;
1722 else if(wParam==(unsigned)gxKeyList.vkLeft)
1723 keypress = GLUT_KEY_LEFT;
1724 else if(wParam==(unsigned)gxKeyList.vkUp)
1725 keypress = GLUT_KEY_UP;
1726 else if(wParam==(unsigned)gxKeyList.vkDown)
1727 keypress = GLUT_KEY_DOWN;
1728 else if(wParam==(unsigned)gxKeyList.vkA)
1729 keypress = GLUT_KEY_F1;
1730 else if(wParam==(unsigned)gxKeyList.vkB)
1731 keypress = GLUT_KEY_F2;
1732 else if(wParam==(unsigned)gxKeyList.vkC)
1733 keypress = GLUT_KEY_F3;
1734 else if(wParam==(unsigned)gxKeyList.vkStart)
1735 keypress = GLUT_KEY_F4;
1739 if( keypress != -1 )
1740 INVOKE_WCB( *window, Special,
1742 window->State.MouseX, window->State.MouseY )
1745 fgState.Modifiers = 0xffffffff;
1756 * Remember the current modifiers state. This is done here in order
1757 * to make sure the VK_DELETE keyboard callback is executed properly.
1759 fgState.Modifiers = fgGetWin32Modifiers( );
1761 GetCursorPos( &mouse_pos );
1762 ScreenToClient( window->Window.Handle, &mouse_pos );
1764 window->State.MouseX = mouse_pos.x;
1765 window->State.MouseY = mouse_pos.y;
1768 * Convert the Win32 keystroke codes to GLUTtish way.
1769 * "KEY(a,b)" was defined under "WM_KEYDOWN"
1774 KEY( VK_F1, GLUT_KEY_F1 );
1775 KEY( VK_F2, GLUT_KEY_F2 );
1776 KEY( VK_F3, GLUT_KEY_F3 );
1777 KEY( VK_F4, GLUT_KEY_F4 );
1778 KEY( VK_F5, GLUT_KEY_F5 );
1779 KEY( VK_F6, GLUT_KEY_F6 );
1780 KEY( VK_F7, GLUT_KEY_F7 );
1781 KEY( VK_F8, GLUT_KEY_F8 );
1782 KEY( VK_F9, GLUT_KEY_F9 );
1783 KEY( VK_F10, GLUT_KEY_F10 );
1784 KEY( VK_F11, GLUT_KEY_F11 );
1785 KEY( VK_F12, GLUT_KEY_F12 );
1786 KEY( VK_PRIOR, GLUT_KEY_PAGE_UP );
1787 KEY( VK_NEXT, GLUT_KEY_PAGE_DOWN );
1788 KEY( VK_HOME, GLUT_KEY_HOME );
1789 KEY( VK_END, GLUT_KEY_END );
1790 KEY( VK_LEFT, GLUT_KEY_LEFT );
1791 KEY( VK_UP, GLUT_KEY_UP );
1792 KEY( VK_RIGHT, GLUT_KEY_RIGHT );
1793 KEY( VK_DOWN, GLUT_KEY_DOWN );
1794 KEY( VK_INSERT, GLUT_KEY_INSERT );
1798 * The delete key should be treated as an ASCII keypress:
1800 INVOKE_WCB( *window, KeyboardUp,
1801 ( 127, window->State.MouseX, window->State.MouseY )
1807 #if !TARGET_HOST_WINCE
1811 GetKeyboardState( state );
1813 if( ToAscii( wParam, 0, state, code, 0 ) == 1 )
1816 INVOKE_WCB( *window, KeyboardUp,
1818 window->State.MouseX, window->State.MouseY )
1820 #endif /* !TARGET_HOST_WINCE */
1824 if( keypress != -1 )
1825 INVOKE_WCB( *window, SpecialUp,
1827 window->State.MouseX, window->State.MouseY )
1830 fgState.Modifiers = 0xffffffff;
1837 if( (fgState.KeyRepeat==GLUT_KEY_REPEAT_OFF || window->State.IgnoreKeyRepeat==GL_TRUE) && (HIWORD(lParam) & KF_REPEAT) )
1840 fgState.Modifiers = fgGetWin32Modifiers( );
1841 INVOKE_WCB( *window, Keyboard,
1843 window->State.MouseX, window->State.MouseY )
1845 fgState.Modifiers = 0xffffffff;
1849 case WM_CAPTURECHANGED:
1850 /* User has finished resizing the window, force a redraw */
1851 INVOKE_WCB( *window, Display, ( ) );
1853 /*lRet = DefWindowProc( hWnd, uMsg, wParam, lParam ); */
1857 * Other messages that I have seen and which are not handled already
1859 case WM_SETTEXT: /* 0x000c */
1860 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1861 /* Pass it on to "DefWindowProc" to set the window text */
1864 case WM_GETTEXT: /* 0x000d */
1865 /* Ideally we would copy the title of the window into "lParam" */
1866 /* strncpy ( (char *)lParam, "Window Title", wParam );
1867 lRet = ( wParam > 12 ) ? 12 : wParam; */
1868 /* the number of characters copied */
1869 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1872 case WM_GETTEXTLENGTH: /* 0x000e */
1873 /* Ideally we would get the length of the title of the window */
1875 /* the number of characters in "Window Title\0" (see above) */
1878 case WM_ERASEBKGND: /* 0x0014 */
1879 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1882 #if !TARGET_HOST_WINCE
1883 case WM_SYNCPAINT: /* 0x0088 */
1884 /* Another window has moved, need to update this one */
1885 window->State.Redisplay = GL_TRUE;
1886 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1887 /* Help screen says this message must be passed to "DefWindowProc" */
1890 case WM_NCPAINT: /* 0x0085 */
1891 /* Need to update the border of this window */
1892 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1893 /* Pass it on to "DefWindowProc" to repaint a standard border */
1896 case WM_SYSCOMMAND : /* 0x0112 */
1899 * We have received a system command message. Try to act on it.
1900 * The commands are passed in through the "wParam" parameter:
1901 * The least significant digit seems to be which edge of the window
1902 * is being used for a resize event:
1906 * Congratulations and thanks to Richard Rauch for figuring this out..
1908 switch ( wParam & 0xfff0 )
1917 /* User has clicked on the "-" to minimize the window */
1918 /* Turn off the visibility */
1919 window->State.Visible = GL_FALSE ;
1926 case SC_NEXTWINDOW :
1929 case SC_PREVWINDOW :
1933 /* Followed very closely by a WM_CLOSE message */
1957 case SC_SCREENSAVE :
1965 fgWarning( "Unknown wParam type 0x%x\n", wParam );
1970 #endif /* !TARGET_HOST_WINCE */
1972 /* We need to pass the message on to the operating system as well */
1973 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1978 * Handle unhandled messages
1980 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1988 /*** END OF FILE ***/