60a72f156a070e57a1462b294ca7c3e306f29db8
[freeglut] / src / freeglut_window.c
1 /*
2  * freeglut_window.c
3  *
4  * Window management methods.
5  *
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
9  *
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:
16  *
17  * The above copyright notice and this permission notice shall be included
18  * in all copies or substantial portions of the Software.
19  *
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.
26  */
27
28 #ifdef HAVE_CONFIG_H
29 #include "config.h"
30 #endif
31
32 #include "../include/GL/freeglut.h"
33 #include "freeglut_internal.h"
34
35 /*
36  * TODO BEFORE THE STABLE RELEASE:
37  *
38  *  fgChooseVisual()        -- OK, but what about glutInitDisplayString()?
39  *  fgSetupPixelFormat      -- ignores the display mode settings
40  *  fgOpenWindow()          -- check the Win32 version, -iconic handling!
41  *  fgCloseWindow()         -- check the Win32 version
42  *  glutCreateWindow()      -- Check when default position and size is {-1,-1}
43  *  glutCreateSubWindow()   -- Check when default position and size is {-1,-1}
44  *  glutDestroyWindow()     -- check the Win32 version
45  *  glutSetWindow()         -- check the Win32 version
46  *  glutGetWindow()         -- OK
47  *  glutSetWindowTitle()    -- check the Win32 version
48  *  glutSetIconTitle()      -- check the Win32 version
49  *  glutShowWindow()        -- check the Win32 version
50  *  glutHideWindow()        -- check the Win32 version
51  *  glutIconifyWindow()     -- check the Win32 version
52  *  glutReshapeWindow()     -- check the Win32 version
53  *  glutPositionWindow()    -- check the Win32 version
54  *  glutPushWindow()        -- check the Win32 version
55  *  glutPopWindow()         -- check the Win32 version
56  */
57
58 /* -- PRIVATE FUNCTIONS ---------------------------------------------------- */
59
60 /*
61  * Chooses a visual basing on the current display mode settings
62  */
63 #if TARGET_HOST_UNIX_X11
64
65 XVisualInfo* fgChooseVisual( void )
66 {
67 #define BUFFER_SIZES 6
68     int bufferSize[BUFFER_SIZES] = { 16, 12, 8, 4, 2, 1 };
69     GLboolean wantIndexedMode = GL_FALSE;
70     int attributes[ 32 ];
71     int where = 0;
72
73     /*
74      * First we have to process the display mode settings...
75      */
76 /*
77  * Why is there a semi-colon in this #define?  The code
78  * that uses the macro seems to always add more semicolons...
79  */
80 #define ATTRIB(a) attributes[where++]=a;
81 #define ATTRIB_VAL(a,v) {ATTRIB(a); ATTRIB(v);}
82
83     if( fgState.DisplayMode & GLUT_INDEX )
84     {
85         ATTRIB_VAL( GLX_BUFFER_SIZE, 8 );
86         wantIndexedMode = GL_TRUE;
87     }
88     else
89     {
90         ATTRIB( GLX_RGBA );
91         ATTRIB_VAL( GLX_RED_SIZE,   1 );
92         ATTRIB_VAL( GLX_GREEN_SIZE, 1 );
93         ATTRIB_VAL( GLX_BLUE_SIZE,  1 );
94         if( fgState.DisplayMode & GLUT_ALPHA )
95             ATTRIB_VAL( GLX_ALPHA_SIZE, 1 );
96     }
97
98     if( fgState.DisplayMode & GLUT_DOUBLE )
99         ATTRIB( GLX_DOUBLEBUFFER );
100
101     if( fgState.DisplayMode & GLUT_STEREO )
102         ATTRIB( GLX_STEREO );
103
104     if( fgState.DisplayMode & GLUT_DEPTH )
105         ATTRIB_VAL( GLX_DEPTH_SIZE, 1 );
106
107     if( fgState.DisplayMode & GLUT_STENCIL )
108         ATTRIB_VAL( GLX_STENCIL_SIZE, 1 );
109
110     if( fgState.DisplayMode & GLUT_ACCUM )
111     {
112         ATTRIB_VAL( GLX_ACCUM_RED_SIZE,   1 );
113         ATTRIB_VAL( GLX_ACCUM_GREEN_SIZE, 1 );
114         ATTRIB_VAL( GLX_ACCUM_BLUE_SIZE,  1 );
115         if( fgState.DisplayMode & GLUT_ALPHA )
116             ATTRIB_VAL( GLX_ACCUM_ALPHA_SIZE, 1 );
117     }
118
119     /*
120      * Push a null at the end of the list
121      */
122     ATTRIB( None );
123
124     if( ! wantIndexedMode )
125         return glXChooseVisual( fgDisplay.Display, fgDisplay.Screen,
126                                 attributes );
127     else
128     {
129         XVisualInfo* visualInfo;
130         int i;
131
132         /*
133          * In indexed mode, we need to check how many bits of depth can we
134          * achieve.  We do this by trying each possibility from the list
135          * given in the {bufferSize} array.  If we match, we return to caller.
136          */
137         for( i=0; i<BUFFER_SIZES; i++ )
138         {
139             attributes[ 1 ] = bufferSize[ i ];
140             visualInfo = glXChooseVisual( fgDisplay.Display, fgDisplay.Screen,
141                                           attributes );
142             if( visualInfo != NULL )
143                 return visualInfo;
144         }
145         return NULL;
146     }
147 }
148 #endif
149
150 /*
151  * Setup the pixel format for a Win32 window
152  */
153 #if TARGET_HOST_WIN32
154 GLboolean fgSetupPixelFormat( SFG_Window* window, GLboolean checkOnly,
155                               unsigned char layer_type )
156 {
157     PIXELFORMATDESCRIPTOR* ppfd, pfd;
158     int flags, pixelformat;
159
160     freeglut_return_val_if_fail( window != NULL, 0 );
161     flags = PFD_DRAW_TO_WINDOW | PFD_SUPPORT_OPENGL;
162     if( fgState.DisplayMode & GLUT_DOUBLE )
163         flags |= PFD_DOUBLEBUFFER;
164
165 #if defined(_MSC_VER)
166 #pragma message( "fgSetupPixelFormat(): there is still some work to do here!" )
167 #endif
168
169     /*
170      * Specify which pixel format do we opt for...
171      */
172     pfd.nSize           = sizeof(PIXELFORMATDESCRIPTOR);
173     pfd.nVersion        = 1;
174     pfd.dwFlags         = flags;
175     pfd.iPixelType      = PFD_TYPE_RGBA;
176     pfd.cColorBits      = 24;
177     pfd.cRedBits        = 0;
178     pfd.cRedShift       = 0;
179     pfd.cGreenBits      = 0;
180     pfd.cGreenShift     = 0;
181     pfd.cBlueBits       = 0;
182     pfd.cBlueShift      = 0;
183     pfd.cAlphaBits      = 0;
184     pfd.cAlphaShift     = 0;
185     pfd.cAccumBits      = 0;
186     pfd.cAccumRedBits   = 0;
187     pfd.cAccumGreenBits = 0;
188     pfd.cAccumBlueBits  = 0;
189     pfd.cAccumAlphaBits = 0;
190 #if 0
191     pfd.cDepthBits      = 32;
192     pfd.cStencilBits    = 0;
193 #else
194     pfd.cDepthBits      = 24;
195     pfd.cStencilBits    = 8;
196 #endif
197     pfd.cAuxBuffers     = 0;
198     pfd.iLayerType      = layer_type;
199     pfd.bReserved       = 0;
200     pfd.dwLayerMask     = 0;
201     pfd.dwVisibleMask   = 0;
202     pfd.dwDamageMask    = 0;
203
204     pfd.cColorBits = (BYTE) GetDeviceCaps( window->Window.Device, BITSPIXEL );
205     ppfd = &pfd;
206     
207     pixelformat = ChoosePixelFormat( window->Window.Device, ppfd );
208     if( pixelformat == 0 )
209         return GL_FALSE;
210
211     if( checkOnly )
212         return GL_TRUE;
213     return SetPixelFormat( window->Window.Device, pixelformat, ppfd );
214 }
215 #endif
216
217 /*
218  * Sets the OpenGL context and the fgStructure "Current Window" pointer to
219  * the window structure passed in.
220  */
221 void fgSetWindow ( SFG_Window *window )
222 {
223 #if TARGET_HOST_UNIX_X11
224     if ( window )
225         glXMakeCurrent(
226             fgDisplay.Display,
227             window->Window.Handle,
228             window->Window.Context
229         );
230 #elif TARGET_HOST_WIN32
231     if( fgStructure.Window )
232         ReleaseDC( fgStructure.Window->Window.Handle,
233                    fgStructure.Window->Window.Device );
234
235     if ( window )
236     {
237         window->Window.Device = GetDC( window->Window.Handle );
238         wglMakeCurrent( 
239             window->Window.Device, 
240             window->Window.Context
241         );
242     }
243 #endif
244     fgStructure.Window = window;
245 }
246
247
248 /*
249  * Opens a window. Requires a SFG_Window object created and attached
250  * to the freeglut structure. OpenGL context is created here.
251  */
252 void fgOpenWindow( SFG_Window* window, const char* title,
253                    int x, int y, int w, int h,
254                    GLboolean gameMode, GLboolean isSubWindow )
255 {
256 #if TARGET_HOST_UNIX_X11
257     XSetWindowAttributes winAttr;
258     XTextProperty textProperty;
259     XSizeHints sizeHints;
260     XWMHints wmHints;
261     unsigned long mask;
262
263     freeglut_assert_ready;
264
265     /*
266      * XXX fgChooseVisual() is a common part of all three.
267      * XXX With a little thought, we should be able to greatly
268      * XXX simplify this.
269      */
270     if( !window->IsMenu )
271         window->Window.VisualInfo = fgChooseVisual( );
272     else if( fgStructure.MenuContext )
273         window->Window.VisualInfo = fgChooseVisual( );
274     else
275     {
276         /* XXX Why are menus double- and depth-buffered? */
277         unsigned int current_DisplayMode = fgState.DisplayMode ;
278         fgState.DisplayMode = GLUT_DOUBLE | GLUT_RGB | GLUT_DEPTH ;
279         window->Window.VisualInfo = fgChooseVisual( );
280         fgState.DisplayMode = current_DisplayMode ;
281     }
282
283     if( ! window->Window.VisualInfo )
284     {
285         /*
286          * The "fgChooseVisual" returned a null meaning that the visual
287          * context is not available.
288          * Try a couple of variations to see if they will work.
289          */
290         if( !( fgState.DisplayMode & GLUT_DOUBLE ) )
291         {
292             fgState.DisplayMode |= GLUT_DOUBLE ;
293             window->Window.VisualInfo = fgChooseVisual( );
294             fgState.DisplayMode &= ~GLUT_DOUBLE;
295         }
296         
297         /*
298          * GLUT also checks for multi-sampling, but I don't see that
299          * anywhere else in FREEGLUT so I won't bother with it for the moment.
300          */
301     }
302
303     /*
304      * XXX This seems to be abusing an assert() for error-checking.
305      * XXX It is possible that the visual simply can't be found,
306      * XXX in which case we should print an error and return a 0
307      * XXX for the window id, I think.
308      */
309     assert( window->Window.VisualInfo != NULL );
310
311     window->State.IsOffscreen = GL_FALSE;
312     if( fgState.DisplayMode & GLUT_OFFSCREEN )
313     {
314         window->State.IsOffscreen = GL_TRUE;
315         window->Window.Pixmap = XCreatePixmap(
316             fgDisplay.Display, fgDisplay.RootWindow,
317             w, h,
318             window->Window.VisualInfo->depth
319         );
320         if( False != window->Window.Pixmap )
321         {
322             window->Window.Handle = glXCreateGLXPixmap(
323                 fgDisplay.Display,
324                 window->Window.VisualInfo,
325                 window->Window.Pixmap
326             );
327             if( False == window->Window.Handle )
328                 XFreePixmap( fgDisplay.Display, window->Window.Pixmap );
329         }
330     }
331     else
332     {
333         /*
334          * XXX HINT: the masks should be updated when adding/removing callbacks.
335          * XXX       This might speed up message processing. Is that true?
336          * XXX
337          * XXX A: Not appreciably, but it WILL make it easier to debug.
338          * XXX    Try tracing old GLUT and try tracing freeglut.  Old GLUT
339          * XXX    turns off events that it doesn't need and is a whole lot
340          * XXX    more pleasant to trace.  (Think mouse-motion!  Tons of
341          * XXX    ``bonus'' GUI events stream in.)
342          */
343         winAttr.event_mask        =
344             StructureNotifyMask | SubstructureNotifyMask | ExposureMask |
345             ButtonPressMask | ButtonReleaseMask | KeyPressMask | KeyRelease |
346             VisibilityChangeMask | EnterWindowMask | LeaveWindowMask |
347             PointerMotionMask | ButtonMotionMask;
348         winAttr.background_pixmap = None;
349         winAttr.background_pixel  = 0;
350         winAttr.border_pixel      = 0;
351
352         winAttr.colormap = XCreateColormap(
353             fgDisplay.Display, fgDisplay.RootWindow,
354             window->Window.VisualInfo->visual, AllocNone
355         );
356
357         mask = CWBackPixmap | CWBorderPixel | CWColormap | CWEventMask;
358
359         if ( window->IsMenu )
360         {
361             winAttr.override_redirect = True;
362             mask |= CWOverrideRedirect;
363         }
364
365         window->Window.Handle = XCreateWindow(
366             fgDisplay.Display,
367             window->Parent == NULL ? fgDisplay.RootWindow :
368                                      window->Parent->Window.Handle,
369             x, y, w, h, 0,
370             window->Window.VisualInfo->depth, InputOutput,
371             window->Window.VisualInfo->visual, mask,
372             &winAttr
373         );
374     }
375     /*
376      * The GLX context creation, possibly trying the direct context rendering
377      *  or else use the current context if the user has so specified
378      */
379     if( window->IsMenu )
380     {
381         /*
382          * If there isn't already an OpenGL rendering context for menu
383          * windows, make one
384          */
385         if( !fgStructure.MenuContext )
386         {
387             fgStructure.MenuContext =
388                 (SFG_MenuContext *)malloc( sizeof(SFG_MenuContext) );
389             fgStructure.MenuContext->VisualInfo = window->Window.VisualInfo;
390             fgStructure.MenuContext->Context = glXCreateContext(
391                 fgDisplay.Display, fgStructure.MenuContext->VisualInfo,
392                 NULL, fgState.ForceDirectContext | fgState.TryDirectContext
393             );
394         }
395
396         /* window->Window.Context = fgStructure.MenuContext->Context; */
397         window->Window.Context = glXCreateContext(
398             fgDisplay.Display, window->Window.VisualInfo,
399             NULL, fgState.ForceDirectContext | fgState.TryDirectContext
400         );
401     }
402     else if( fgState.UseCurrentContext )
403     {
404         window->Window.Context = glXGetCurrentContext( );
405
406         if( ! window->Window.Context )
407             window->Window.Context = glXCreateContext(
408                 fgDisplay.Display, window->Window.VisualInfo,
409                 NULL, fgState.ForceDirectContext | fgState.TryDirectContext
410             );
411     }
412     else
413         window->Window.Context = glXCreateContext(
414             fgDisplay.Display, window->Window.VisualInfo,
415             NULL, fgState.ForceDirectContext | fgState.TryDirectContext
416         );
417
418     if( fgState.ForceDirectContext &&
419         !glXIsDirect( fgDisplay.Display, window->Window.Context ) )
420         fgError( "unable to force direct context rendering for window '%s'",
421                  title );
422
423     glXMakeCurrent(
424         fgDisplay.Display,
425         window->Window.Handle,
426         window->Window.Context
427     );
428
429     /*
430      * XXX Assume the new window is visible by default
431      * XXX Is this a  safe assumption?
432      */
433     window->State.Visible = GL_TRUE;
434
435     sizeHints.flags = 0;
436     if ( fgState.Position.Use )
437         sizeHints.flags |= USPosition;
438     if ( fgState.Size.Use )
439         sizeHints.flags |= USSize;
440
441     /*
442      * Fill in the size hints values now (the x, y, width and height
443      * settings are obsolote, are there any more WMs that support them?)
444      * Unless the X servers actually stop supporting these, we should
445      * continue to fill them in.  It is *not* our place to tell the user
446      * that they should replace a window manager that they like, and which
447      * works, just because *we* think that it's not "modern" enough.
448      */
449     sizeHints.x      = x;
450     sizeHints.y      = y;
451     sizeHints.width  = w;
452     sizeHints.height = h;
453
454     wmHints.flags = StateHint;
455     wmHints.initial_state = fgState.ForceIconic ? IconicState : NormalState;
456     if( GL_FALSE == window->State.IsOffscreen )
457     {
458         /*
459          * Prepare the window and iconified window names...
460          */
461         XStringListToTextProperty( (char **) &title, 1, &textProperty );
462
463         XSetWMProperties(
464             fgDisplay.Display,
465             window->Window.Handle,
466             &textProperty,
467             &textProperty,
468             0,
469             0,
470             &sizeHints,
471             &wmHints,
472             NULL
473         );
474     
475         XSetWMProtocols( fgDisplay.Display, window->Window.Handle,
476                          &fgDisplay.DeleteWindow, 1 );
477     
478         XMapWindow( fgDisplay.Display, window->Window.Handle );
479     }
480     
481 #elif TARGET_HOST_WIN32
482
483     WNDCLASS wc;
484     int flags;
485     ATOM atom;
486
487     freeglut_assert_ready;
488     
489     /*
490      * Grab the window class we have registered on glutInit():
491      */
492     atom = GetClassInfo( fgDisplay.Instance, "FREEGLUT", &wc );
493     assert( atom != 0 );
494     
495     if( gameMode )
496     {
497         assert( window->Parent == NULL );
498
499         /*
500          * Set the window creation flags appropriately to make the window
501          * entirely visible:
502          */
503         flags = WS_POPUP | WS_CLIPSIBLINGS | WS_CLIPCHILDREN | WS_VISIBLE;
504     }
505     else
506     {
507         if ( ( ! isSubWindow ) && ( ! window->IsMenu ) )
508         {
509             /*
510              * Update the window dimensions, taking account of window
511              * decorations.  "freeglut" is to create the window with the
512              * outside of its border at (x,y) and with dimensions (w,h).
513              */
514             w += (GetSystemMetrics( SM_CXSIZEFRAME ) )*2;
515             h += (GetSystemMetrics( SM_CYSIZEFRAME ) )*2 +
516                 GetSystemMetrics( SM_CYCAPTION );
517         }
518
519         if( ! fgState.Position.Use )
520         {
521             x = CW_USEDEFAULT;
522             y = CW_USEDEFAULT;
523         }
524         if( ! fgState.Size.Use )
525         {
526             w = CW_USEDEFAULT;
527             h = CW_USEDEFAULT;
528         }
529
530         /*
531          * There's a small difference between creating the top, child and
532          * game mode windows
533          */
534         flags = WS_CLIPSIBLINGS | WS_CLIPCHILDREN | WS_VISIBLE;
535
536         if ( window->IsMenu )
537             flags |= WS_POPUP ;
538         else if( window->Parent == NULL )
539             flags |= WS_OVERLAPPEDWINDOW;
540         else
541             flags |= WS_CHILD;
542     }
543
544     window->Window.Handle = CreateWindow( 
545         "FREEGLUT",
546         title,
547         flags,
548         x, y, w, h,
549         (HWND) window->Parent == NULL ? NULL : window->Parent->Window.Handle,
550         (HMENU) NULL,
551         fgDisplay.Instance,
552         (LPVOID) window
553     );
554     if( !( window->Window.Handle ) )
555         fgError( "Failed to create a window (%s)!", title );
556
557     ShowWindow( window->Window.Handle,
558                 fgState.ForceIconic ? SW_SHOWMINIMIZED : SW_SHOW );
559     UpdateWindow( window->Window.Handle );
560     ShowCursor( TRUE );  /* XXX Old comments say "hide cusror"! */
561
562 #endif
563
564     fgSetWindow( window );
565
566     window->Window.DoubleBuffered =
567         ( fgState.DisplayMode & GLUT_DOUBLE ) ? 1 : 0;
568
569     if ( ! window->Window.DoubleBuffered )
570     {
571         glDrawBuffer ( GL_FRONT );
572         glReadBuffer ( GL_FRONT );
573     }
574 }
575
576 /*
577  * Closes a window, destroying the frame and OpenGL context
578  */
579 void fgCloseWindow( SFG_Window* window )
580 {
581     freeglut_assert_ready;
582
583 #if TARGET_HOST_UNIX_X11
584
585     glXDestroyContext( fgDisplay.Display, window->Window.Context );
586     if( GL_FALSE == window->State.IsOffscreen )
587         XDestroyWindow( fgDisplay.Display, window->Window.Handle );
588     else
589     {
590         glXDestroyGLXPixmap( fgDisplay.Display, window->Window.Handle );
591         XFreePixmap( fgDisplay.Display, window->Window.Pixmap );
592     }
593     XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
594
595 #elif TARGET_HOST_WIN32
596
597     /*
598      * Make sure we don't close a window with current context active
599      */
600     if( fgStructure.Window == window )
601         wglMakeCurrent( NULL, NULL );
602
603     /*
604      * Step through the list of windows.  If the rendering context
605      * is not being used by another window, then we delete it.
606      */
607     {
608         int used = FALSE ;
609         SFG_Window *iter ;
610
611         for( iter = (SFG_Window *)fgStructure.Windows.First;
612              iter;
613              iter = (SFG_Window *)iter->Node.Next )
614         {
615             if( ( iter->Window.Context == window->Window.Context ) &&
616                 ( iter != window ) )
617                 used = TRUE;
618         }
619
620         if( ! used )
621             wglDeleteContext( window->Window.Context );
622     }
623
624     DestroyWindow( window->Window.Handle );
625 #endif
626 }
627
628
629 /* -- INTERFACE FUNCTIONS -------------------------------------------------- */
630
631 /*
632  * Creates a new top-level freeglut window
633  */
634 int FGAPIENTRY glutCreateWindow( const char* title )
635 {
636     return fgCreateWindow( NULL, title, fgState.Position.X, fgState.Position.Y,
637                            fgState.Size.X, fgState.Size.Y, GL_FALSE,
638                            GL_FALSE )->ID;
639 }
640
641 /*
642  * This function creates a sub window.
643  */
644 int FGAPIENTRY glutCreateSubWindow( int parentID, int x, int y, int w, int h )
645 {
646     int ret = 0;
647     
648     if( GL_FALSE == fgStructure.Window->State.IsOffscreen )
649     {
650         SFG_Window* window = NULL;
651         SFG_Window* parent = NULL;
652
653         freeglut_assert_ready;
654         parent = fgWindowByID( parentID );
655         freeglut_return_val_if_fail( parent != NULL, 0 );
656         window = fgCreateWindow( parent, "", x, y, w, h, GL_FALSE, GL_FALSE );
657         ret = window->ID;
658     }
659     return ret;
660 }
661
662 /*
663  * Destroys a window and all of its subwindows
664  */
665 void FGAPIENTRY glutDestroyWindow( int windowID )
666 {
667     SFG_Window* window = fgWindowByID( windowID );
668     freeglut_return_if_fail( window != NULL );
669     {
670         fgExecutionState ExecState = fgState.ExecState;
671         fgAddToWindowDestroyList( window );
672         fgState.ExecState = ExecState;
673     }
674 }
675
676 /*
677  * This function selects the current window
678  */
679 void FGAPIENTRY glutSetWindow( int ID )
680 {
681     SFG_Window* window = NULL;
682
683     freeglut_assert_ready;
684     if( fgStructure.Window != NULL )
685         if( fgStructure.Window->ID == ID )
686             return;
687
688     window = fgWindowByID( ID );
689     if( window == NULL )
690     {
691         fgWarning( "glutSetWindow(): window ID %i not found!", ID );
692         return;
693     }
694
695     fgSetWindow( window );
696 }
697
698 /*
699  * This function returns the ID number of the current window, 0 if none exists
700  */
701 int FGAPIENTRY glutGetWindow( void )
702 {
703     freeglut_assert_ready;
704     if( fgStructure.Window == NULL )
705         return 0;
706     return fgStructure.Window->ID;
707 }
708
709 /*
710  * This function makes the current window visible
711  */
712 void FGAPIENTRY glutShowWindow( void )
713 {
714     freeglut_assert_ready;
715     freeglut_assert_window;
716
717     if( GL_FALSE == fgStructure.Window->State.IsOffscreen )
718     {
719 #if TARGET_HOST_UNIX_X11
720
721         XMapWindow( fgDisplay.Display, fgStructure.Window->Window.Handle );
722         XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
723
724 #elif TARGET_HOST_WIN32
725
726         ShowWindow( fgStructure.Window->Window.Handle, SW_SHOW );
727
728 #endif
729     }
730     fgStructure.Window->State.Redisplay = GL_TRUE;
731 }
732
733 /*
734  * This function hides the current window
735  */
736 void FGAPIENTRY glutHideWindow( void )
737 {
738     freeglut_assert_ready;
739     freeglut_assert_window;
740
741     if( GL_FALSE == fgStructure.Window->State.IsOffscreen )
742     {
743 #if TARGET_HOST_UNIX_X11
744
745         if( fgStructure.Window->Parent == NULL )
746             XWithdrawWindow( fgDisplay.Display,
747                              fgStructure.Window->Window.Handle,
748                              fgDisplay.Screen );
749         else
750             XUnmapWindow( fgDisplay.Display,
751                           fgStructure.Window->Window.Handle );
752         XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
753
754 #elif TARGET_HOST_WIN32
755
756         ShowWindow( fgStructure.Window->Window.Handle, SW_HIDE );
757
758 #endif
759     }
760     fgStructure.Window->State.Redisplay = GL_FALSE;
761 }
762
763 /*
764  * Iconify the current window (top-level windows only)
765  */
766 void FGAPIENTRY glutIconifyWindow( void )
767 {
768     freeglut_assert_ready;
769     freeglut_assert_window;
770
771     fgStructure.Window->State.Visible   = GL_FALSE;
772     if( GL_FALSE == fgStructure.Window->State.IsOffscreen )
773     {
774 #if TARGET_HOST_UNIX_X11
775
776         XIconifyWindow( fgDisplay.Display, fgStructure.Window->Window.Handle,
777                         fgDisplay.Screen );
778         XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
779
780 #elif TARGET_HOST_WIN32
781
782         ShowWindow( fgStructure.Window->Window.Handle, SW_MINIMIZE );
783
784 #endif
785     }
786     fgStructure.Window->State.Redisplay = GL_FALSE;
787 }
788
789 /*
790  * Set the current window's title
791  */
792 void FGAPIENTRY glutSetWindowTitle( const char* title )
793 {
794     freeglut_assert_ready;
795     freeglut_assert_window;
796     if( ! fgStructure.Window->Parent &&
797         ( GL_FALSE == fgStructure.Window->State.IsOffscreen ) )
798     {
799 #if TARGET_HOST_UNIX_X11
800
801         XTextProperty text;
802         
803         text.value = (unsigned char *) title;
804         text.encoding = XA_STRING;
805         text.format = 8;
806         text.nitems = strlen( title );
807         
808         XSetWMName(
809             fgDisplay.Display,
810             fgStructure.Window->Window.Handle,
811             &text
812         );
813         
814         XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
815
816 #elif TARGET_HOST_WIN32
817
818         SetWindowText( fgStructure.Window->Window.Handle, title );
819
820 #endif
821     }
822 }
823
824 /*
825  * Set the current window's iconified title
826  */
827 void FGAPIENTRY glutSetIconTitle( const char* title )
828 {
829     freeglut_assert_ready;
830     freeglut_assert_window;
831
832     if( ! fgStructure.Window->Parent &&
833         GL_FALSE == fgStructure.Window->State.IsOffscreen )
834     {
835 #if TARGET_HOST_UNIX_X11
836
837         XTextProperty text;
838         
839         text.value = (unsigned char *) title;
840         text.encoding = XA_STRING;
841         text.format = 8;
842         text.nitems = strlen( title );
843
844         XSetWMIconName(
845             fgDisplay.Display,
846             fgStructure.Window->Window.Handle,
847             &text
848         );
849
850         XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
851
852 #elif TARGET_HOST_WIN32
853
854         SetWindowText( fgStructure.Window->Window.Handle, title );
855
856 #endif
857     }
858 }
859
860 /*
861  * Change the current window's size
862  */
863 void FGAPIENTRY glutReshapeWindow( int width, int height )
864 {
865     freeglut_assert_ready;
866     freeglut_assert_window;
867
868     /* XXX Could delete/create/set-window-id for offscreen. */
869     if( GL_FALSE == fgStructure.Window->State.IsOffscreen )
870     {
871         fgStructure.Window->State.NeedToResize = GL_TRUE;
872         fgStructure.Window->State.Width  = width ;
873         fgStructure.Window->State.Height = height;
874     }
875 }
876
877 /*
878  * Change the current window's position
879  */
880 void FGAPIENTRY glutPositionWindow( int x, int y )
881 {
882     freeglut_assert_ready;
883     freeglut_assert_window;
884
885     if( GL_FALSE == fgStructure.Window->State.IsOffscreen )
886     {
887 #if TARGET_HOST_UNIX_X11
888
889         XMoveWindow( fgDisplay.Display, fgStructure.Window->Window.Handle,
890                      x, y );
891         XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
892
893 #elif TARGET_HOST_WIN32
894
895         RECT winRect;
896         
897         GetWindowRect( fgStructure.Window->Window.Handle, &winRect );
898         MoveWindow(
899             fgStructure.Window->Window.Handle,
900             x,
901             y,
902             winRect.right - winRect.left,
903             winRect.bottom - winRect.top,
904             TRUE
905         );
906
907 #endif
908     }
909 }
910
911 /*
912  * Lowers the current window (by Z order change)
913  */
914 void FGAPIENTRY glutPushWindow( void )
915 {
916     freeglut_assert_ready;
917     freeglut_assert_window;
918
919     if( GL_FALSE == fgStructure.Window->State.IsOffscreen )
920     {
921 #if TARGET_HOST_UNIX_X11
922
923         XLowerWindow( fgDisplay.Display, fgStructure.Window->Window.Handle );
924
925 #elif TARGET_HOST_WIN32
926
927         SetWindowPos(
928             fgStructure.Window->Window.Handle,
929             HWND_BOTTOM,
930             0, 0, 0, 0,
931             SWP_NOSIZE | SWP_NOMOVE
932         );
933
934 #endif
935     }
936 }
937
938 /*
939  * Raises the current window (by Z order change)
940  */
941 void FGAPIENTRY glutPopWindow( void )
942 {
943     freeglut_assert_ready;
944     freeglut_assert_window;
945
946     if( GL_FALSE == fgStructure.Window->State.IsOffscreen )
947     {
948 #if TARGET_HOST_UNIX_X11
949
950         XRaiseWindow( fgDisplay.Display, fgStructure.Window->Window.Handle );
951
952 #elif TARGET_HOST_WIN32
953
954         SetWindowPos(
955             fgStructure.Window->Window.Handle,
956             HWND_TOP,
957             0, 0, 0, 0,
958             SWP_NOSIZE | SWP_NOMOVE
959         );
960
961 #endif
962     }
963 }
964
965 /*
966  * Resize the current window so that it fits the whole screen
967  */
968 void FGAPIENTRY glutFullScreen( void )
969 {
970     freeglut_assert_ready;
971     freeglut_assert_window;
972
973     if( GL_FALSE == fgStructure.Window->State.IsOffscreen )
974     {
975 #if TARGET_HOST_UNIX_X11
976         int x, y;
977         Window w;
978
979         XMoveResizeWindow(
980             fgDisplay.Display,
981             fgStructure.Window->Window.Handle,
982             0, 0,
983             fgDisplay.ScreenWidth,
984             fgDisplay.ScreenHeight
985         );
986
987         XFlush( fgDisplay.Display ); /* This is needed */
988
989         XTranslateCoordinates(
990             fgDisplay.Display,
991             fgStructure.Window->Window.Handle,
992             fgDisplay.RootWindow,
993             0, 0, &x, &y, &w
994         );
995
996         if (x || y)
997         {
998             XMoveWindow(
999                 fgDisplay.Display,
1000                 fgStructure.Window->Window.Handle,
1001                 -x, -y
1002             );
1003             XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
1004         }
1005 #elif TARGET_HOST_WIN32
1006         RECT rect;
1007
1008         /* For fullscreen mode, force the top-left corner to 0,0
1009          * and adjust the window rectangle so that the client area
1010          * covers the whole screen.
1011          */
1012
1013         rect.left   = 0;
1014         rect.top    = 0;
1015         rect.right  = fgDisplay.ScreenWidth;
1016         rect.bottom = fgDisplay.ScreenHeight;
1017
1018         AdjustWindowRect ( &rect, WS_OVERLAPPEDWINDOW | WS_CLIPSIBLINGS |
1019                                   WS_CLIPCHILDREN, FALSE );
1020
1021         /*
1022          * SWP_NOACTIVATE     Do not activate the window
1023          * SWP_NOOWNERZORDER  Do not change position in z-order
1024          * SWP_NOSENDCHANGING Supress WM_WINDOWPOSCHANGING message
1025          * SWP_NOZORDER       Retains the current Z order (ignore 2nd param)
1026          */
1027
1028         SetWindowPos( fgStructure.Window->Window.Handle,
1029                       HWND_TOP,
1030                       rect.left,
1031                       rect.top,
1032                       rect.right  - rect.left,
1033                       rect.bottom - rect.top,
1034                       SWP_NOACTIVATE | SWP_NOOWNERZORDER | SWP_NOSENDCHANGING |
1035                       SWP_NOZORDER
1036         );
1037 #endif
1038     }
1039 }
1040
1041 /*
1042  * A.Donev: Set and retrieve the window's user data
1043  */
1044 void* FGAPIENTRY glutGetWindowData( void )
1045 {
1046     return fgStructure.Window->UserData;
1047 }
1048
1049 void FGAPIENTRY glutSetWindowData(void* data)
1050 {
1051     fgStructure.Window->UserData = data;
1052 }
1053
1054 /*** END OF FILE ***/