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.
32 #include "../include/GL/freeglut.h"
33 #include "freeglut_internal.h"
36 #if TARGET_HOST_UNIX_X11
37 #include <sys/types.h>
42 #elif TARGET_HOST_WIN32
46 #define MAX(a,b) (((a)>(b)) ? (a) : (b))
50 #define MIN(a,b) (((a)<(b)) ? (a) : (b))
55 * TODO BEFORE THE STABLE RELEASE:
57 * There are some issues concerning window redrawing under X11, and maybe
58 * some events are not handled. The Win32 version lacks some more features,
59 * but seems acceptable for not demanding purposes.
61 * Need to investigate why the X11 version breaks out with an error when
62 * closing a window (using the window manager, not glutDestroyWindow)...
65 /* -- PRIVATE FUNCTIONS ---------------------------------------------------- */
68 * Handle a window configuration change. When no reshape
69 * callback is hooked, the viewport size is updated to
70 * match the new window size.
72 static void fghReshapeWindowByHandle ( SFG_WindowHandleType handle,
73 int width, int height )
75 SFG_Window *current_window = fgStructure.Window;
77 SFG_Window* window = fgWindowByHandle( handle );
78 freeglut_return_if_fail( window != NULL );
81 #if TARGET_HOST_UNIX_X11
83 XResizeWindow( fgDisplay.Display, window->Window.Handle,
85 XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
87 #elif TARGET_HOST_WIN32
93 * For windowed mode, get the current position of the
94 * window and resize taking the size of the frame
95 * decorations into account.
98 GetWindowRect( window->Window.Handle, &rect );
99 rect.right = rect.left + width;
100 rect.bottom = rect.top + height;
102 if ( window->Parent == NULL )
104 if ( ! window->IsMenu && !window->State.IsGameMode )
106 rect.right += GetSystemMetrics( SM_CXSIZEFRAME ) * 2;
107 rect.bottom += GetSystemMetrics( SM_CYSIZEFRAME ) * 2 +
108 GetSystemMetrics( SM_CYCAPTION );
113 GetWindowRect( window->Parent->Window.Handle, &rect );
114 AdjustWindowRect ( &rect, WS_OVERLAPPEDWINDOW | WS_CLIPSIBLINGS |
115 WS_CLIPCHILDREN, FALSE );
119 * SWP_NOACTIVATE Do not activate the window
120 * SWP_NOOWNERZORDER Do not change position in z-order
121 * SWP_NOSENDCHANGING Supress WM_WINDOWPOSCHANGING message
122 * SWP_NOZORDER Retains the current Z order (ignore 2nd param)
125 SetWindowPos( window->Window.Handle,
129 rect.right - rect.left,
130 rect.bottom - rect.top,
131 SWP_NOACTIVATE | SWP_NOOWNERZORDER | SWP_NOSENDCHANGING |
137 * XXX Should update {window->State.OldWidth, window->State.OldHeight}
138 * XXX to keep in lockstep with UNIX_X11 code.
140 if( FETCH_WCB( *window, Reshape ) )
141 INVOKE_WCB( *window, Reshape, ( width, height ) );
144 fgSetWindow( window );
145 glViewport( 0, 0, width, height );
151 * Force a window redraw. In Windows at least this is only a partial
152 * solution: if the window is increasing in size in either dimension,
153 * the already-drawn part does not get drawn again and things look funny.
154 * But without this we get this bad behaviour whenever we resize the
157 window->State.Redisplay = GL_TRUE;
160 fgSetWindow( current_window );
164 * Calls a window's redraw method. This is used when
165 * a redraw is forced by the incoming window messages.
167 static void fghRedrawWindowByHandle ( SFG_WindowHandleType handle )
169 SFG_Window* window = fgWindowByHandle( handle );
170 freeglut_return_if_fail( window );
171 freeglut_return_if_fail( FETCH_WCB ( *window, Display ) );
173 window->State.Redisplay = GL_FALSE;
175 freeglut_return_if_fail( window->State.Visible );
177 if( window->State.NeedToResize )
179 SFG_Window *current_window = fgStructure.Window;
181 fgSetWindow( window );
183 fghReshapeWindowByHandle(
184 window->Window.Handle,
189 window->State.NeedToResize = GL_FALSE;
190 fgSetWindow( current_window );
193 INVOKE_WCB( *window, Display, ( ) );
197 * A static helper function to execute display callback for a window
199 static void fghcbDisplayWindow( SFG_Window *window,
200 SFG_Enumerator *enumerator )
202 if( window->State.NeedToResize )
204 SFG_Window *current_window = fgStructure.Window;
206 fgSetWindow( window );
208 fghReshapeWindowByHandle(
209 window->Window.Handle,
214 window->State.NeedToResize = GL_FALSE;
215 fgSetWindow ( current_window );
218 if( window->State.Redisplay &&
219 window->State.Visible )
221 window->State.Redisplay = GL_FALSE;
223 #if TARGET_HOST_UNIX_X11
225 SFG_Window *current_window = fgStructure.Window;
227 INVOKE_WCB( *window, Display, ( ) );
228 fgSetWindow( current_window );
230 #elif TARGET_HOST_WIN32
232 window->Window.Handle, NULL, NULL,
233 RDW_NOERASE | RDW_INTERNALPAINT | RDW_INVALIDATE | RDW_UPDATENOW
238 fgEnumSubWindows( window, fghcbDisplayWindow, enumerator );
242 * Make all windows perform a display call
244 static void fghDisplayAll( void )
246 SFG_Enumerator enumerator;
248 enumerator.found = GL_FALSE;
249 enumerator.data = NULL;
251 fgEnumWindows( fghcbDisplayWindow, &enumerator );
255 * Window enumerator callback to check for the joystick polling code
257 static void fghcbCheckJoystickPolls( SFG_Window *window,
258 SFG_Enumerator *enumerator )
260 long int checkTime = fgElapsedTime( );
262 if( window->State.JoystickLastPoll + window->State.JoystickPollRate <=
265 fgJoystickPollWindow( window );
266 window->State.JoystickLastPoll = checkTime;
269 fgEnumSubWindows( window, fghcbCheckJoystickPolls, enumerator );
273 * Check all windows for joystick polling
275 static void fghCheckJoystickPolls( void )
277 SFG_Enumerator enumerator;
279 enumerator.found = GL_FALSE;
280 enumerator.data = NULL;
282 fgEnumWindows( fghcbCheckJoystickPolls, &enumerator );
286 * Check the global timers
288 static void fghCheckTimers( void )
290 long checkTime = fgElapsedTime( );
292 while( fgState.Timers.First )
294 SFG_Timer *timer = fgState.Timers.First;
296 if( timer->TriggerTime > checkTime )
299 fgListRemove( &fgState.Timers, &timer->Node );
300 fgListAppend( &fgState.FreeTimers, &timer->Node );
302 timer->Callback( timer->ID );
309 long fgElapsedTime( void )
311 if ( fgState.Time.Set )
313 #if TARGET_HOST_UNIX_X11
317 gettimeofday( &now, NULL );
319 elapsed = (now.tv_usec - fgState.Time.Value.tv_usec) / 1000;
320 elapsed += (now.tv_sec - fgState.Time.Value.tv_sec) * 1000;
323 #elif TARGET_HOST_WIN32
324 return timeGetTime() - fgState.Time.Value;
329 #if TARGET_HOST_UNIX_X11
330 gettimeofday( &fgState.Time.Value, NULL );
331 #elif TARGET_HOST_WIN32
332 fgState.Time.Value = timeGetTime ();
334 fgState.Time.Set = GL_TRUE ;
343 void fgError( const char *fmt, ... )
349 fprintf( stderr, "freeglut ");
350 if( fgState.ProgramName )
351 fprintf (stderr, "(%s): ", fgState.ProgramName);
352 vfprintf( stderr, fmt, ap );
353 fprintf( stderr, "\n" );
357 if ( fgState.Initialised )
363 void fgWarning( const char *fmt, ... )
369 fprintf( stderr, "freeglut ");
370 if( fgState.ProgramName )
371 fprintf( stderr, "(%s): ", fgState.ProgramName );
372 vfprintf( stderr, fmt, ap );
373 fprintf( stderr, "\n" );
379 * Indicates whether Joystick events are being used by ANY window.
381 * The current mechanism is to walk all of the windows and ask if
382 * there is a joystick callback. We have a short-circuit early
383 * return if we find any joystick handler registered.
385 * The real way to do this is to make use of the glutTimer() API
386 * to more cleanly re-implement the joystick API. Then, this code
387 * and all other "joystick timer" code can be yanked.
390 static void fgCheckJoystickCallback( SFG_Window* w, SFG_Enumerator* e)
392 if( FETCH_WCB( *w, Joystick ) )
397 fgEnumSubWindows( w, fgCheckJoystickCallback, e );
399 static int fgHaveJoystick( void )
401 SFG_Enumerator enumerator;
402 enumerator.found = GL_FALSE;
403 enumerator.data = NULL;
404 fgEnumWindows( fgCheckJoystickCallback, &enumerator );
405 return !!enumerator.data;
407 static void fgHavePendingRedisplaysCallback( SFG_Window* w, SFG_Enumerator* e)
409 if( w->State.Redisplay )
414 fgEnumSubWindows( w, fgHavePendingRedisplaysCallback, e );
416 static int fgHavePendingRedisplays (void)
418 SFG_Enumerator enumerator;
419 enumerator.found = GL_FALSE;
420 enumerator.data = NULL;
421 fgEnumWindows( fgHavePendingRedisplaysCallback, &enumerator );
422 return !!enumerator.data;
425 * Returns the number of GLUT ticks (milliseconds) till the next timer event.
427 static long fgNextTimer( void )
430 SFG_Timer *timer = fgState.Timers.First;
433 ret = timer->TriggerTime - fgElapsedTime();
440 * Does the magic required to relinquish the CPU until something interesting
443 static void fgSleepForEvents( void )
447 if( fgState.IdleCallback || fgHavePendingRedisplays( ) )
450 msec = fgNextTimer( );
451 if( fgHaveJoystick( ) ) /* XXX Use GLUT timers for joysticks... */
452 msec = MIN( msec, 10 ); /* XXX Dumb; forces granularity to .01sec */
454 #if TARGET_HOST_UNIX_X11
456 * Possibly due to aggressive use of XFlush() and friends,
457 * it is possible to have our socket drained but still have
458 * unprocessed events. (Or, this may just be normal with
459 * X, anyway?) We do non-trivial processing of X events
460 * after tham in event-reading loop, in any case, so we
461 * need to allow that we may have an empty socket but non-
464 if( ! XPending( fgDisplay.Display ) )
471 socket = ConnectionNumber( fgDisplay.Display );
473 FD_SET( socket, &fdset );
474 wait.tv_sec = msec / 1000;
475 wait.tv_usec = (msec % 1000) * 1000;
476 err = select( socket+1, &fdset, NULL, NULL, &wait );
479 fgWarning ( "freeglut select() error: %d\n", errno );
481 #elif TARGET_HOST_WIN32
482 MsgWaitForMultipleObjects( 0, NULL, FALSE, msec, QS_ALLEVENTS );
486 #if TARGET_HOST_UNIX_X11
488 * Returns GLUT modifier mask for an XEvent.
490 int fgGetXModifiers( XEvent *event )
494 if( event->xkey.state & ( ShiftMask | LockMask ) )
495 ret |= GLUT_ACTIVE_SHIFT;
496 if( event->xkey.state & ControlMask )
497 ret |= GLUT_ACTIVE_CTRL;
498 if( event->xkey.state & Mod1Mask )
499 ret |= GLUT_ACTIVE_ALT;
506 /* -- INTERFACE FUNCTIONS -------------------------------------------------- */
509 * Executes a single iteration in the freeglut processing loop.
511 void FGAPIENTRY glutMainLoopEvent( void )
513 #if TARGET_HOST_UNIX_X11
518 * This code was repeated constantly, so here it goes into a definition:
520 #define GETWINDOW(a) \
521 window = fgWindowByHandle( event.a.window ); \
522 if( window == NULL ) \
525 #define GETMOUSE(a) \
526 window->State.MouseX = event.a.x; \
527 window->State.MouseY = event.a.y;
529 freeglut_assert_ready;
531 while( XPending( fgDisplay.Display ) )
533 XNextEvent( fgDisplay.Display, &event );
539 * Destroy the window when the WM_DELETE_WINDOW message arrives
541 if( (Atom) event.xclient.data.l[ 0 ] == fgDisplay.DeleteWindow )
543 GETWINDOW( xclient );
545 fgDestroyWindow ( window );
547 if( fgState.ActionOnWindowClose == GLUT_ACTION_EXIT )
553 fgState.ExecState = GLUT_EXEC_STATE_STOP;
559 * CreateNotify causes a configure-event so that sub-windows are
560 * handled compatibly with GLUT. Otherwise, your sub-windows
561 * (in freeglut only) will not get an initial reshape event,
562 * which can break things.
564 * GLUT presumably does this because it generally tries to treat
565 * sub-windows the same as windows.
567 * XXX Technically, GETWINDOW( xconfigure ) and
568 * XXX {event.xconfigure} may not be legit ways to get at
569 * XXX data for CreateNotify events. In practice, the data
570 * XXX is in a union which is laid out much the same either
571 * XXX way. But if you want to split hairs, this isn't legit,
572 * XXX and we should instead duplicate some code.
575 case ConfigureNotify:
576 GETWINDOW( xconfigure );
578 int width = event.xconfigure.width;
579 int height = event.xconfigure.height;
581 if( ( width != window->State.OldWidth ) ||
582 ( height != window->State.OldHeight ) )
584 window->State.OldWidth = width;
585 window->State.OldHeight = height;
586 if( FETCH_WCB( *window, Reshape ) )
587 INVOKE_WCB( *window, Reshape, ( width, height ) );
590 fgSetWindow( window );
591 glViewport( 0, 0, width, height );
593 glutPostRedisplay( );
600 * This is sent to confirm the XDestroyWindow call.
602 * XXX WHY is this commented out? Should we re-enable it?
604 /* fgAddToWindowDestroyList ( window ); */
609 * We are too dumb to process partial exposes...
611 * XXX Well, we could do it. However, it seems to only
612 * XXX be potentially useful for single-buffered (since
613 * XXX double-buffered does not respect viewport when we
614 * XXX do a buffer-swap).
616 * XXX GETWINDOW( xexpose );
617 * XXX fgSetWindow( window );
618 * XXX glutPostRedisplay( );
620 if( event.xexpose.count == 0 )
621 fghRedrawWindowByHandle( event.xexpose.window );
627 * If we never do anything with this, can we just not ask to
628 * get these messages?
634 * Have the client's keyboard knowledge updated (xlib.ps,
635 * page 206, says that's a good thing to do)
637 XRefreshKeyboardMapping( (XMappingEvent *) &event );
640 case VisibilityNotify:
642 GETWINDOW( xvisibility );
644 * XXX INVOKE_WCB() does this check for us.
646 if( ! FETCH_WCB( *window, WindowStatus ) )
648 fgSetWindow( window );
651 * Sending this event, the X server can notify us that the window
652 * has just acquired one of the three possible visibility states:
653 * VisibilityUnobscured, VisibilityPartiallyObscured or
654 * VisibilityFullyObscured
656 switch( event.xvisibility.state )
658 case VisibilityUnobscured:
659 INVOKE_WCB( *window, WindowStatus, ( GLUT_FULLY_RETAINED ) );
660 window->State.Visible = GL_TRUE;
663 case VisibilityPartiallyObscured:
664 INVOKE_WCB( *window, WindowStatus,
665 ( GLUT_PARTIALLY_RETAINED ) );
666 window->State.Visible = GL_TRUE;
669 case VisibilityFullyObscured:
670 INVOKE_WCB( *window, WindowStatus, ( GLUT_FULLY_COVERED ) );
671 window->State.Visible = GL_FALSE;
675 fgWarning( "Uknown X visibility state: %d",
676 event.xvisibility.state );
684 GETWINDOW( xcrossing );
685 GETMOUSE( xcrossing );
686 INVOKE_WCB( *window, Entry, ( ( EnterNotify == event.type ) ?
693 GETWINDOW( xmotion );
696 if( window->ActiveMenu )
698 if( window == window->ActiveMenu->ParentWindow )
700 window->ActiveMenu->Window->State.MouseX =
701 event.xmotion.x_root - window->ActiveMenu->X;
702 window->ActiveMenu->Window->State.MouseY =
703 event.xmotion.y_root - window->ActiveMenu->Y;
705 window->ActiveMenu->Window->State.Redisplay = GL_TRUE ;
706 fgSetWindow( window->ActiveMenu->ParentWindow );
712 * XXX For more than 5 buttons, just check {event.xmotion.state},
713 * XXX rather than a host of bit-masks? Or maybe we need to
714 * XXX track ButtonPress/ButtonRelease events in our own
717 #define BUTTON_MASK \
718 ( Button1Mask | Button2Mask | Button3Mask | Button4Mask | Button5Mask )
719 if ( event.xmotion.state & BUTTON_MASK )
720 INVOKE_WCB( *window, Motion, ( event.xmotion.x,
723 INVOKE_WCB( *window, Passive, ( event.xmotion.x,
731 GLboolean pressed = GL_TRUE;
734 if( event.type == ButtonRelease )
738 * A mouse button has been pressed or released. Traditionally,
739 * break if the window was found within the freeglut structures.
741 GETWINDOW( xbutton );
745 * An X button (at least in XFree86) is numbered from 1.
746 * A GLUT button is numbered from 0.
747 * Old GLUT passed through buttons other than just the first
748 * three, though it only gave symbolic names and official
749 * support to the first three.
751 button = event.xbutton.button - 1;
754 * XXX This comment is replicated in the WIN32 section and
755 * XXX maybe also in the menu code. Can we move the info
756 * XXX to one central place and *reference* it from here?
758 * Do not execute the application's mouse callback if a menu
759 * is hooked to this button. In that case an appropriate
760 * private call should be generated.
761 * Near as I can tell, this is the menu behaviour:
762 * - Down-click the menu button, menu not active: activate
763 * the menu with its upper left-hand corner at the mouse
765 * - Down-click any button outside the menu, menu active:
766 * deactivate the menu
767 * - Down-click any button inside the menu, menu active:
768 * select the menu entry and deactivate the menu
769 * - Up-click the menu button, menu not active: nothing happens
770 * - Up-click the menu button outside the menu, menu active:
772 * - Up-click the menu button inside the menu, menu active:
773 * select the menu entry and deactivate the menu
775 /* Window has an active menu, it absorbs any mouse click */
776 if( window->ActiveMenu )
778 if( window == window->ActiveMenu->ParentWindow )
780 window->ActiveMenu->Window->State.MouseX =
781 event.xbutton.x_root - window->ActiveMenu->X;
782 window->ActiveMenu->Window->State.MouseY =
783 event.xbutton.y_root - window->ActiveMenu->Y;
786 /* In the menu, invoke the callback and deactivate the menu*/
787 if( fgCheckActiveMenu( window->ActiveMenu->Window,
788 window->ActiveMenu ) )
791 * Save the current window and menu and set the current
792 * window to the window whose menu this is
794 SFG_Window *save_window = fgStructure.Window;
795 SFG_Menu *save_menu = fgStructure.Menu;
796 SFG_Window *parent_window =
797 window->ActiveMenu->ParentWindow;
798 fgSetWindow( parent_window );
799 fgStructure.Menu = window->ActiveMenu;
801 /* Execute the menu callback */
802 fgExecuteMenuCallback( window->ActiveMenu );
803 fgDeactivateMenu( parent_window );
805 /* Restore the current window and menu */
806 fgSetWindow( save_window );
807 fgStructure.Menu = save_menu;
811 * Outside the menu, deactivate if it's a downclick
813 * XXX This isn't enough. A downclick outside of
814 * XXX the interior of our freeglut windows should also
815 * XXX deactivate the menu. This is more complicated.
817 fgDeactivateMenu( window->ActiveMenu->ParentWindow );
820 * XXX Why does an active menu require a redisplay at
821 * XXX this point? If this can come out cleanly, then
822 * XXX it probably should do so; if not, a comment should
825 window->State.Redisplay = GL_TRUE;
830 * No active menu, let's check whether we need to activate one.
832 if( ( 0 <= button ) &&
833 ( FREEGLUT_MAX_MENUS > button ) &&
834 ( window->Menu[ button ] ) &&
838 * XXX Posting a requisite Redisplay seems bogus.
840 window->State.Redisplay = GL_TRUE;
841 fgSetWindow( window );
842 fgActivateMenu( window, button );
847 * Check if there is a mouse or mouse wheel callback hooked to the
850 if( ! FETCH_WCB( *window, Mouse ) &&
851 ! FETCH_WCB( *window, MouseWheel ) )
854 fgState.Modifiers = fgGetXModifiers( &event );
857 * Finally execute the mouse or mouse wheel callback
859 * XXX Use a symbolic constant, *not* "4"! ("3, sire!")
861 if( ( button < 3 ) || ( ! FETCH_WCB( *window, MouseWheel ) ) )
862 INVOKE_WCB( *window, Mouse, ( button,
863 pressed ? GLUT_DOWN : GLUT_UP,
870 * Map 4 and 5 to wheel zero; EVEN to +1, ODD to -1
871 * " 6 and 7 " " one; ...
873 * XXX This *should* be behind some variables/macros,
874 * XXX since the order and numbering isn't certain
875 * XXX See XFree86 configuration docs (even back in the
876 * XXX 3.x days, and especially with 4.x).
878 * XXX Note that {button} has already been decremeted
879 * XXX in mapping from X button numbering to GLUT.
881 int wheel_number = (button - 3) / 2;
887 INVOKE_WCB( *window, MouseWheel, ( wheel_number,
895 * Trash the modifiers state
897 fgState.Modifiers = 0xffffffff;
904 FGCBKeyboard keyboard_cb;
905 FGCBSpecial special_cb;
910 if( event.type == KeyPress )
912 keyboard_cb = FETCH_WCB( *window, Keyboard );
913 special_cb = FETCH_WCB( *window, Special );
917 keyboard_cb = FETCH_WCB( *window, KeyboardUp );
918 special_cb = FETCH_WCB( *window, SpecialUp );
922 * Is there a keyboard/special callback hooked for this window?
924 if( keyboard_cb || special_cb )
926 XComposeStatus composeStatus;
927 char asciiCode[ 32 ];
932 * Check for the ASCII/KeySym codes associated with the event:
934 len = XLookupString( &event.xkey, asciiCode, sizeof(asciiCode),
935 &keySym, &composeStatus
939 * GLUT API tells us to have two separate callbacks...
944 * ...one for the ASCII translateable keypresses...
948 fgSetWindow( window );
949 fgState.Modifiers = fgGetXModifiers( &event );
950 keyboard_cb( asciiCode[ 0 ],
951 event.xkey.x, event.xkey.y
953 fgState.Modifiers = 0xffffffff;
961 * ...and one for all the others, which need to be
962 * translated to GLUT_KEY_Xs...
966 case XK_F1: special = GLUT_KEY_F1; break;
967 case XK_F2: special = GLUT_KEY_F2; break;
968 case XK_F3: special = GLUT_KEY_F3; break;
969 case XK_F4: special = GLUT_KEY_F4; break;
970 case XK_F5: special = GLUT_KEY_F5; break;
971 case XK_F6: special = GLUT_KEY_F6; break;
972 case XK_F7: special = GLUT_KEY_F7; break;
973 case XK_F8: special = GLUT_KEY_F8; break;
974 case XK_F9: special = GLUT_KEY_F9; break;
975 case XK_F10: special = GLUT_KEY_F10; break;
976 case XK_F11: special = GLUT_KEY_F11; break;
977 case XK_F12: special = GLUT_KEY_F12; break;
979 case XK_Left: special = GLUT_KEY_LEFT; break;
980 case XK_Right: special = GLUT_KEY_RIGHT; break;
981 case XK_Up: special = GLUT_KEY_UP; break;
982 case XK_Down: special = GLUT_KEY_DOWN; break;
985 case XK_Prior: special = GLUT_KEY_PAGE_UP; break;
987 case XK_Next: special = GLUT_KEY_PAGE_DOWN; break;
989 case XK_Home: special = GLUT_KEY_HOME; break;
991 case XK_End: special = GLUT_KEY_END; break;
993 case XK_Insert: special = GLUT_KEY_INSERT; break;
997 * Execute the callback (if one has been specified),
998 * given that the special code seems to be valid...
1000 if( special_cb && (special != -1) )
1002 fgSetWindow( window );
1003 fgState.Modifiers = fgGetXModifiers( &event );
1004 special_cb( special, event.xkey.x, event.xkey.y );
1005 fgState.Modifiers = 0xffffffff;
1012 case ReparentNotify:
1013 break; /* XXX Should disable this event */
1016 fgWarning ("Unknown X event type: %d", event.type);
1021 #elif TARGET_HOST_WIN32
1025 while( PeekMessage( &stMsg, NULL, 0, 0, PM_NOREMOVE ) )
1027 if( GetMessage( &stMsg, NULL, 0, 0 ) == 0 )
1029 if( fgState.ActionOnWindowClose == GLUT_ACTION_EXIT )
1034 fgState.ExecState = GLUT_EXEC_STATE_STOP;
1038 TranslateMessage( &stMsg );
1039 DispatchMessage( &stMsg );
1043 if( fgState.Timers.First )
1045 fghCheckJoystickPolls( );
1052 * Enters the freeglut processing loop.
1053 * Stays until the "ExecState" changes to "GLUT_EXEC_STATE_STOP".
1055 void FGAPIENTRY glutMainLoop( void )
1059 #if TARGET_HOST_WIN32
1060 SFG_Window *window = (SFG_Window *)fgStructure.Windows.First ;
1063 freeglut_assert_ready;
1065 #if TARGET_HOST_WIN32
1067 * Processing before the main loop: If there is a window which is open and
1068 * which has a visibility callback, call it. I know this is an ugly hack,
1069 * but I'm not sure what else to do about it. Ideally we should leave
1070 * something uninitialized in the create window code and initialize it in
1071 * the main loop, and have that initialization create a "WM_ACTIVATE"
1072 * message. Then we would put the visibility callback code in the
1073 * "case WM_ACTIVATE" block below. - John Fay -- 10/24/02
1077 if ( FETCH_WCB( *window, Visibility ) )
1079 SFG_Window *current_window = fgStructure.Window ;
1081 INVOKE_WCB( *window, Visibility, ( window->State.Visible ) );
1082 fgSetWindow( current_window );
1085 window = (SFG_Window *)window->Node.Next ;
1089 fgState.ExecState = GLUT_EXEC_STATE_RUNNING ;
1090 while( fgState.ExecState == GLUT_EXEC_STATE_RUNNING )
1094 glutMainLoopEvent( );
1096 * Step through the list of windows, seeing if there are any
1097 * that are not menus
1099 for( window = ( SFG_Window * )fgStructure.Windows.First;
1101 window = ( SFG_Window * )window->Node.Next )
1102 if ( ! ( window->IsMenu ) )
1106 fgState.ExecState = GLUT_EXEC_STATE_STOP;
1109 if( fgState.IdleCallback )
1110 fgState.IdleCallback( );
1112 fgSleepForEvents( );
1117 * When this loop terminates, destroy the display, state and structure
1118 * of a freeglut session, so that another glutInit() call can happen
1120 * Save the "ActionOnWindowClose" because "fgDeinitialize" resets it.
1122 action = fgState.ActionOnWindowClose;
1124 if( action == GLUT_ACTION_EXIT )
1129 * Leaves the freeglut processing loop.
1131 void FGAPIENTRY glutLeaveMainLoop( void )
1133 fgState.ExecState = GLUT_EXEC_STATE_STOP ;
1137 #if TARGET_HOST_WIN32
1139 * Determine a GLUT modifer mask based on MS-WINDOWS system info.
1141 int fgGetWin32Modifiers (void)
1144 ( ( ( GetKeyState( VK_LSHIFT ) < 0 ) ||
1145 ( GetKeyState( VK_RSHIFT ) < 0 )) ? GLUT_ACTIVE_SHIFT : 0 ) |
1146 ( ( ( GetKeyState( VK_LCONTROL ) < 0 ) ||
1147 ( GetKeyState( VK_RCONTROL ) < 0 )) ? GLUT_ACTIVE_CTRL : 0 ) |
1148 ( ( ( GetKeyState( VK_LMENU ) < 0 ) ||
1149 ( GetKeyState( VK_RMENU ) < 0 )) ? GLUT_ACTIVE_ALT : 0 );
1153 * The window procedure for handling Win32 events
1155 LRESULT CALLBACK fgWindowProc( HWND hWnd, UINT uMsg, WPARAM wParam,
1158 SFG_Window* window = fgWindowByHandle( hWnd );
1162 if ( ( window == NULL ) && ( uMsg != WM_CREATE ) )
1163 return DefWindowProc( hWnd, uMsg, wParam, lParam );
1165 /* printf ( "Window %3d message <%04x> %12d %12d\n", window?window->ID:0,
1166 uMsg, wParam, lParam ); */
1171 * The window structure is passed as the creation structure paramter...
1173 window = (SFG_Window *) (((LPCREATESTRUCT) lParam)->lpCreateParams);
1174 assert( window != NULL );
1176 window->Window.Handle = hWnd;
1177 window->Window.Device = GetDC( hWnd );
1178 if( window->IsMenu )
1180 unsigned int current_DisplayMode = fgState.DisplayMode;
1181 fgState.DisplayMode = GLUT_DOUBLE | GLUT_RGB | GLUT_DEPTH;
1182 fgSetupPixelFormat( window, GL_FALSE, PFD_MAIN_PLANE );
1183 fgState.DisplayMode = current_DisplayMode;
1185 if( fgStructure.MenuContext )
1186 wglMakeCurrent( window->Window.Device,
1187 fgStructure.MenuContext->Context
1191 fgStructure.MenuContext =
1192 (SFG_MenuContext *)malloc( sizeof(SFG_MenuContext) );
1193 fgStructure.MenuContext->Context =
1194 wglCreateContext( window->Window.Device );
1197 /* window->Window.Context = wglGetCurrentContext (); */
1198 window->Window.Context = wglCreateContext( window->Window.Device );
1202 fgSetupPixelFormat( window, GL_FALSE, PFD_MAIN_PLANE );
1204 if( ! fgState.UseCurrentContext )
1205 window->Window.Context =
1206 wglCreateContext( window->Window.Device );
1209 window->Window.Context = wglGetCurrentContext( );
1210 if( ! window->Window.Context )
1211 window->Window.Context =
1212 wglCreateContext( window->Window.Device );
1216 window->State.NeedToResize = GL_TRUE;
1217 window->State.Width = fgState.Size.X;
1218 window->State.Height = fgState.Size.Y;
1220 ReleaseDC( window->Window.Handle, window->Window.Device );
1225 * If the window is visible, then it is the user manually resizing it.
1226 * If it is not, then it is the system sending us a dummy resize with
1227 * zero dimensions on a "glutIconifyWindow" call.
1229 if( window->State.Visible )
1231 window->State.NeedToResize = GL_TRUE;
1232 window->State.Width = LOWORD(lParam);
1233 window->State.Height = HIWORD(lParam);
1239 printf("WM_SETFOCUS: %p\n", window );
1240 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1244 if (LOWORD(wParam) != WA_INACTIVE)
1246 /* glutSetCursor( fgStructure.Window->State.Cursor ); */
1247 printf("WM_ACTIVATE: glutSetCursor( %p, %d)\n", window,
1248 window->State.Cursor );
1249 glutSetCursor( window->State.Cursor );
1252 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1257 * XXX Why not re-use some common code with the glutSetCursor()
1258 * XXX function (or perhaps invoke glutSetCursor())?
1259 * XXX That is, why are we duplicating code, here, from
1260 * XXX glutSetCursor()? The WIN32 code should be able to just
1261 * XXX call glutSetCurdsor() instead of defining two macros
1262 * XXX and implementing a nested case in-line.
1265 /* Set the cursor AND change it for this window class. */
1266 #define MAP_CURSOR(a,b) \
1268 SetCursor( LoadCursor( NULL, b ) ); \
1271 /* Nuke the cursor AND change it for this window class. */
1272 #define ZAP_CURSOR(a,b) \
1274 SetCursor( NULL ); \
1277 if( LOWORD( lParam ) == HTCLIENT )
1278 switch( window->State.Cursor )
1280 MAP_CURSOR( GLUT_CURSOR_RIGHT_ARROW, IDC_ARROW );
1281 MAP_CURSOR( GLUT_CURSOR_LEFT_ARROW, IDC_ARROW );
1282 MAP_CURSOR( GLUT_CURSOR_INFO, IDC_HELP );
1283 MAP_CURSOR( GLUT_CURSOR_DESTROY, IDC_CROSS );
1284 MAP_CURSOR( GLUT_CURSOR_HELP, IDC_HELP );
1285 MAP_CURSOR( GLUT_CURSOR_CYCLE, IDC_SIZEALL );
1286 MAP_CURSOR( GLUT_CURSOR_SPRAY, IDC_CROSS );
1287 MAP_CURSOR( GLUT_CURSOR_WAIT, IDC_WAIT );
1288 MAP_CURSOR( GLUT_CURSOR_TEXT, IDC_UPARROW );
1289 MAP_CURSOR( GLUT_CURSOR_CROSSHAIR, IDC_CROSS );
1290 /* MAP_CURSOR( GLUT_CURSOR_NONE, IDC_NO ); */
1291 ZAP_CURSOR( GLUT_CURSOR_NONE, NULL );
1294 MAP_CURSOR( GLUT_CURSOR_UP_DOWN, IDC_ARROW );
1297 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1301 window->State.Visible = GL_TRUE;
1302 window->State.Redisplay = GL_TRUE;
1306 /* Turn on the visibility in case it was turned off somehow */
1307 window->State.Visible = GL_TRUE;
1308 BeginPaint( hWnd, &ps );
1309 fghRedrawWindowByHandle( hWnd );
1310 EndPaint( hWnd, &ps );
1314 fgDestroyWindow ( window );
1315 if ( fgState.ActionOnWindowClose != GLUT_ACTION_CONTINUE_EXECUTION )
1321 * The window already got destroyed, so don't bother with it.
1327 window->State.MouseX = LOWORD( lParam );
1328 window->State.MouseY = HIWORD( lParam );
1330 if ( window->ActiveMenu )
1332 window->State.Redisplay = GL_TRUE;
1333 fgSetWindow ( window->ActiveMenu->ParentWindow );
1337 fgState.Modifiers = fgGetWin32Modifiers( );
1339 if( ( wParam & MK_LBUTTON ) ||
1340 ( wParam & MK_MBUTTON ) ||
1341 ( wParam & MK_RBUTTON ) )
1342 INVOKE_WCB( *window, Motion, ( window->State.MouseX,
1343 window->State.MouseY ) );
1345 INVOKE_WCB( *window, Passive, ( window->State.MouseX,
1346 window->State.MouseY ) );
1348 fgState.Modifiers = 0xffffffff;
1352 case WM_LBUTTONDOWN:
1353 case WM_MBUTTONDOWN:
1354 case WM_RBUTTONDOWN:
1359 GLboolean pressed = GL_TRUE;
1362 window->State.MouseX = LOWORD( lParam );
1363 window->State.MouseY = HIWORD( lParam );
1367 case WM_LBUTTONDOWN:
1369 button = GLUT_LEFT_BUTTON;
1371 case WM_MBUTTONDOWN:
1373 button = GLUT_MIDDLE_BUTTON;
1375 case WM_RBUTTONDOWN:
1377 button = GLUT_RIGHT_BUTTON;
1381 button = GLUT_LEFT_BUTTON;
1385 button = GLUT_MIDDLE_BUTTON;
1389 button = GLUT_RIGHT_BUTTON;
1397 if( GetSystemMetrics( SM_SWAPBUTTON ) )
1399 if( button == GLUT_LEFT_BUTTON )
1400 button = GLUT_RIGHT_BUTTON;
1402 if( button == GLUT_RIGHT_BUTTON )
1403 button = GLUT_LEFT_BUTTON;
1407 return DefWindowProc( hWnd, uMsg, lParam, wParam );
1410 * XXX This comment is duplicated in two other spots.
1411 * XXX Can we centralize it?
1413 * Do not execute the application's mouse callback if a
1414 * menu is hooked to this button.
1415 * In that case an appropriate private call should be generated.
1416 * Near as I can tell, this is the menu behaviour:
1417 * - Down-click the menu button, menu not active: activate
1418 * the menu with its upper left-hand corner at the mouse location.
1419 * - Down-click any button outside the menu, menu active:
1420 * deactivate the menu
1421 * - Down-click any button inside the menu, menu active:
1422 * select the menu entry and deactivate the menu
1423 * - Up-click the menu button, menu not active: nothing happens
1424 * - Up-click the menu button outside the menu, menu active:
1426 * - Up-click the menu button inside the menu, menu active:
1427 * select the menu entry and deactivate the menu
1429 /* Window has an active menu, it absorbs any mouse click */
1430 if( window->ActiveMenu )
1432 /* Outside the menu, deactivate the menu if it's a downclick */
1433 if( ! fgCheckActiveMenu( window, window->ActiveMenu ) )
1436 fgDeactivateMenu( window->ActiveMenu->ParentWindow );
1438 else /* In menu, invoke the callback and deactivate the menu*/
1441 * Save the current window and menu and set the current
1442 * window to the window whose menu this is
1444 SFG_Window *save_window = fgStructure.Window;
1445 SFG_Menu *save_menu = fgStructure.Menu;
1446 SFG_Window *parent_window = window->ActiveMenu->ParentWindow;
1447 fgSetWindow( parent_window );
1448 fgStructure.Menu = window->ActiveMenu;
1450 /* Execute the menu callback */
1451 fgExecuteMenuCallback( window->ActiveMenu );
1452 fgDeactivateMenu( parent_window );
1454 /* Restore the current window and menu */
1455 fgSetWindow( save_window );
1456 fgStructure.Menu = save_menu;
1460 * Let's make the window redraw as a result of the mouse
1461 * click and menu activity.
1463 if( ! window->IsMenu )
1464 window->State.Redisplay = GL_TRUE;
1469 if( window->Menu[ button ] && pressed )
1471 window->State.Redisplay = GL_TRUE;
1472 fgSetWindow( window );
1473 fgActivateMenu( window, button );
1478 if( ! FETCH_WCB( *window, Mouse ) )
1481 fgSetWindow( window );
1482 fgState.Modifiers = fgGetWin32Modifiers( );
1487 pressed ? GLUT_DOWN : GLUT_UP,
1488 window->State.MouseX,
1489 window->State.MouseY
1493 fgState.Modifiers = 0xffffffff;
1498 /* Should be WM_MOUSEWHEEL but my compiler doesn't recognize it */
1501 * XXX THIS IS SPECULATIVE -- John Fay, 10/2/03
1502 * XXX Should use WHEEL_DELTA instead of 120
1504 int wheel_number = LOWORD( wParam );
1505 short ticks = ( short )HIWORD( wParam ) / 120;
1515 * The mouse cursor has moved. Remember the new mouse cursor's position
1517 /* window->State.MouseX = LOWORD( lParam ); */
1518 /* Need to adjust by window position, */
1519 /* window->State.MouseY = HIWORD( lParam ); */
1520 /* change "lParam" to other parameter */
1522 if( ! FETCH_WCB( *window, MouseWheel ) &&
1523 ! FETCH_WCB( *window, Mouse ) )
1526 fgSetWindow( window );
1527 fgState.Modifiers = fgGetWin32Modifiers( );
1530 if( FETCH_WCB( *window, MouseWheel ) )
1531 INVOKE_WCB( *window, MouseWheel,
1534 window->State.MouseX,
1535 window->State.MouseY
1538 else /* No mouse wheel, call the mouse button callback twice */
1541 * XXX The below assumes that you have no more than 3 mouse
1542 * XXX buttons. Sorry.
1544 int button = wheel_number*2 + 4;
1547 INVOKE_WCB( *window, Mouse,
1548 ( button, GLUT_DOWN,
1549 window->State.MouseX, window->State.MouseY )
1551 INVOKE_WCB( *window, Mouse,
1553 window->State.MouseX, window->State.MouseX )
1557 fgState.Modifiers = 0xffffffff;
1567 if( fgState.IgnoreKeyRepeat && (lParam & KF_REPEAT) )
1571 * Remember the current modifiers state. This is done here in order
1572 * to make sure the VK_DELETE keyboard callback is executed properly.
1574 fgState.Modifiers = fgGetWin32Modifiers( );
1576 GetCursorPos( &mouse_pos );
1577 ScreenToClient( window->Window.Handle, &mouse_pos );
1579 window->State.MouseX = mouse_pos.x;
1580 window->State.MouseY = mouse_pos.y;
1583 * Convert the Win32 keystroke codes to GLUTtish way
1585 # define KEY(a,b) case a: keypress = b; break;
1589 KEY( VK_F1, GLUT_KEY_F1 );
1590 KEY( VK_F2, GLUT_KEY_F2 );
1591 KEY( VK_F3, GLUT_KEY_F3 );
1592 KEY( VK_F4, GLUT_KEY_F4 );
1593 KEY( VK_F5, GLUT_KEY_F5 );
1594 KEY( VK_F6, GLUT_KEY_F6 );
1595 KEY( VK_F7, GLUT_KEY_F7 );
1596 KEY( VK_F8, GLUT_KEY_F8 );
1597 KEY( VK_F9, GLUT_KEY_F9 );
1598 KEY( VK_F10, GLUT_KEY_F10 );
1599 KEY( VK_F11, GLUT_KEY_F11 );
1600 KEY( VK_F12, GLUT_KEY_F12 );
1601 KEY( VK_PRIOR, GLUT_KEY_PAGE_UP );
1602 KEY( VK_NEXT, GLUT_KEY_PAGE_DOWN );
1603 KEY( VK_HOME, GLUT_KEY_HOME );
1604 KEY( VK_END, GLUT_KEY_END );
1605 KEY( VK_LEFT, GLUT_KEY_LEFT );
1606 KEY( VK_UP, GLUT_KEY_UP );
1607 KEY( VK_RIGHT, GLUT_KEY_RIGHT );
1608 KEY( VK_DOWN, GLUT_KEY_DOWN );
1609 KEY( VK_INSERT, GLUT_KEY_INSERT );
1613 * The delete key should be treated as an ASCII keypress:
1615 INVOKE_WCB( *window, Keyboard,
1616 ( 127, window->State.MouseX, window->State.MouseY )
1620 if( keypress != -1 )
1621 INVOKE_WCB( *window, Special,
1623 window->State.MouseX, window->State.MouseY )
1626 fgState.Modifiers = 0xffffffff;
1637 * Remember the current modifiers state. This is done here in order
1638 * to make sure the VK_DELETE keyboard callback is executed properly.
1640 fgState.Modifiers = fgGetWin32Modifiers( );
1642 GetCursorPos( &mouse_pos );
1643 ScreenToClient( window->Window.Handle, &mouse_pos );
1645 window->State.MouseX = mouse_pos.x;
1646 window->State.MouseY = mouse_pos.y;
1649 * Convert the Win32 keystroke codes to GLUTtish way.
1650 * "KEY(a,b)" was defined under "WM_KEYDOWN"
1655 KEY( VK_F1, GLUT_KEY_F1 );
1656 KEY( VK_F2, GLUT_KEY_F2 );
1657 KEY( VK_F3, GLUT_KEY_F3 );
1658 KEY( VK_F4, GLUT_KEY_F4 );
1659 KEY( VK_F5, GLUT_KEY_F5 );
1660 KEY( VK_F6, GLUT_KEY_F6 );
1661 KEY( VK_F7, GLUT_KEY_F7 );
1662 KEY( VK_F8, GLUT_KEY_F8 );
1663 KEY( VK_F9, GLUT_KEY_F9 );
1664 KEY( VK_F10, GLUT_KEY_F10 );
1665 KEY( VK_F11, GLUT_KEY_F11 );
1666 KEY( VK_F12, GLUT_KEY_F12 );
1667 KEY( VK_PRIOR, GLUT_KEY_PAGE_UP );
1668 KEY( VK_NEXT, GLUT_KEY_PAGE_DOWN );
1669 KEY( VK_HOME, GLUT_KEY_HOME );
1670 KEY( VK_END, GLUT_KEY_END );
1671 KEY( VK_LEFT, GLUT_KEY_LEFT );
1672 KEY( VK_UP, GLUT_KEY_UP );
1673 KEY( VK_RIGHT, GLUT_KEY_RIGHT );
1674 KEY( VK_DOWN, GLUT_KEY_DOWN );
1675 KEY( VK_INSERT, GLUT_KEY_INSERT );
1679 * The delete key should be treated as an ASCII keypress:
1681 INVOKE_WCB( *window, KeyboardUp,
1682 ( 127, window->State.MouseX, window->State.MouseY )
1691 GetKeyboardState( state );
1693 if( ToAscii( wParam, 0, state, code, 0 ) == 1 )
1696 INVOKE_WCB( *window, KeyboardUp,
1698 window->State.MouseX, window->State.MouseY )
1703 if( keypress != -1 )
1704 INVOKE_WCB( *window, SpecialUp,
1706 window->State.MouseX, window->State.MouseY )
1709 fgState.Modifiers = 0xffffffff;
1716 if( fgState.IgnoreKeyRepeat && (lParam & KF_REPEAT) )
1719 fgState.Modifiers = fgGetWin32Modifiers( );
1720 INVOKE_WCB( *window, Keyboard,
1722 window->State.MouseX, window->State.MouseY )
1724 fgState.Modifiers = 0xffffffff;
1728 case WM_CAPTURECHANGED:
1729 /* User has finished resizing the window, force a redraw */
1730 INVOKE_WCB( *window, Display, ( ) );
1732 /*lRet = DefWindowProc( hWnd, uMsg, wParam, lParam ); */
1736 * Other messages that I have seen and which are not handled already
1738 case WM_SETTEXT: /* 0x000c */
1739 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1740 /* Pass it on to "DefWindowProc" to set the window text */
1743 case WM_GETTEXT: /* 0x000d */
1744 /* Ideally we would copy the title of the window into "lParam" */
1745 /* strncpy ( (char *)lParam, "Window Title", wParam );
1746 lRet = ( wParam > 12 ) ? 12 : wParam; */
1747 /* the number of characters copied */
1748 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1751 case WM_GETTEXTLENGTH: /* 0x000e */
1752 /* Ideally we would get the length of the title of the window */
1754 /* the number of characters in "Window Title\0" (see above) */
1757 case WM_ERASEBKGND: /* 0x0014 */
1758 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1761 case WM_SYNCPAINT: /* 0x0088 */
1762 /* Another window has moved, need to update this one */
1763 window->State.Redisplay = GL_TRUE;
1764 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1765 /* Help screen says this message must be passed to "DefWindowProc" */
1768 case WM_NCPAINT: /* 0x0085 */
1769 /* Need to update the border of this window */
1770 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1771 /* Pass it on to "DefWindowProc" to repaint a standard border */
1774 case WM_SYSCOMMAND : /* 0x0112 */
1777 * We have received a system command message. Try to act on it.
1778 * The commands are passed in through the "lParam" parameter:
1779 * Clicking on a corner to resize the window gives a "F004" message
1780 * but this is not defined in my header file.
1791 /* User has clicked on the "-" to minimize the window */
1792 /* Turn off the visibility */
1793 window->State.Visible = GL_FALSE ;
1800 case SC_NEXTWINDOW :
1803 case SC_PREVWINDOW :
1807 /* Followed very closely by a WM_CLOSE message */
1831 case SC_SCREENSAVE :
1839 /* We need to pass the message on to the operating system as well */
1840 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1845 * Handle unhandled messages
1847 lRet = DefWindowProc( hWnd, uMsg, wParam, lParam );
1855 /*** END OF FILE ***/