Refactored GLX context creation into a single function, centralizing things to
[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 #include <GL/freeglut.h>
29 #include "freeglut_internal.h"
30
31 #if TARGET_HOST_POSIX_X11
32 #include <limits.h>  /* LONG_MAX */
33 #endif
34
35 #if defined(_WIN32_WCE)
36 #   include <Aygshell.h>
37 #   ifdef FREEGLUT_LIB_PRAGMAS
38 #       pragma comment( lib, "Aygshell.lib" )
39 #   endif
40
41 static wchar_t* fghWstrFromStr(const char* str)
42 {
43     int i,len=strlen(str);
44     wchar_t* wstr = (wchar_t*)malloc(2*len+2);
45     for(i=0; i<len; i++)
46         wstr[i] = str[i];
47     wstr[len] = 0;
48     return wstr;
49 }
50
51 #endif /* defined(_WIN32_WCE) */
52
53 /*
54  * TODO BEFORE THE STABLE RELEASE:
55  *
56  *  fgChooseFBConfig()      -- OK, but what about glutInitDisplayString()?
57  *  fgSetupPixelFormat      -- ignores the display mode settings
58  *  fgOpenWindow()          -- check the Win32 version, -iconic handling!
59  *  fgCloseWindow()         -- check the Win32 version
60  *  glutCreateWindow()      -- Check when default position and size is {-1,-1}
61  *  glutCreateSubWindow()   -- Check when default position and size is {-1,-1}
62  *  glutDestroyWindow()     -- check the Win32 version
63  *  glutSetWindow()         -- check the Win32 version
64  *  glutGetWindow()         -- OK
65  *  glutSetWindowTitle()    -- check the Win32 version
66  *  glutSetIconTitle()      -- check the Win32 version
67  *  glutShowWindow()        -- check the Win32 version
68  *  glutHideWindow()        -- check the Win32 version
69  *  glutIconifyWindow()     -- check the Win32 version
70  *  glutReshapeWindow()     -- check the Win32 version
71  *  glutPositionWindow()    -- check the Win32 version
72  *  glutPushWindow()        -- check the Win32 version
73  *  glutPopWindow()         -- check the Win32 version
74  */
75
76 /* -- PRIVATE FUNCTIONS ---------------------------------------------------- */
77
78 /*
79  * Chooses a visual basing on the current display mode settings
80  */
81 #if TARGET_HOST_POSIX_X11
82
83 GLXFBConfig* fgChooseFBConfig( void )
84 {
85     GLboolean wantIndexedMode = GL_FALSE;
86     int attributes[ 32 ];
87     int where = 0;
88
89     /* First we have to process the display mode settings... */
90 /*
91  * XXX Why is there a semi-colon in this #define?  The code
92  * XXX that uses the macro seems to always add more semicolons...
93  */
94 #define ATTRIB(a) attributes[where++]=a;
95 #define ATTRIB_VAL(a,v) {ATTRIB(a); ATTRIB(v);}
96
97     if( fgState.DisplayMode & GLUT_INDEX )
98     {
99         ATTRIB_VAL( GLX_BUFFER_SIZE, 8 );
100         /*  Buffer size is selected later.  */
101
102         ATTRIB_VAL( GLX_RENDER_TYPE, GLX_COLOR_INDEX_BIT );
103         wantIndexedMode = GL_TRUE;
104     }
105     else
106     {
107         ATTRIB_VAL( GLX_RED_SIZE,   1 );
108         ATTRIB_VAL( GLX_GREEN_SIZE, 1 );
109         ATTRIB_VAL( GLX_BLUE_SIZE,  1 );
110         if( fgState.DisplayMode & GLUT_ALPHA )
111             ATTRIB_VAL( GLX_ALPHA_SIZE, 1 );
112     }
113
114     if( fgState.DisplayMode & GLUT_DOUBLE )
115         ATTRIB_VAL( GLX_DOUBLEBUFFER, True );
116
117     if( fgState.DisplayMode & GLUT_STEREO )
118         ATTRIB_VAL( GLX_STEREO, True );
119
120     if( fgState.DisplayMode & GLUT_DEPTH )
121         ATTRIB_VAL( GLX_DEPTH_SIZE, 1 );
122
123     if( fgState.DisplayMode & GLUT_STENCIL )
124         ATTRIB_VAL( GLX_STENCIL_SIZE, 1 );
125
126     if( fgState.DisplayMode & GLUT_ACCUM )
127     {
128         ATTRIB_VAL( GLX_ACCUM_RED_SIZE,   1 );
129         ATTRIB_VAL( GLX_ACCUM_GREEN_SIZE, 1 );
130         ATTRIB_VAL( GLX_ACCUM_BLUE_SIZE,  1 );
131         if( fgState.DisplayMode & GLUT_ALPHA )
132             ATTRIB_VAL( GLX_ACCUM_ALPHA_SIZE, 1 );
133     }
134
135     if ((fgState.DisplayMode & GLUT_AUX)
136      || (fgState.DisplayMode & GLUT_AUX1)
137      || (fgState.DisplayMode & GLUT_AUX2)
138      || (fgState.DisplayMode & GLUT_AUX3)
139      || (fgState.DisplayMode & GLUT_AUX4))
140       {
141         ATTRIB_VAL(GLX_AUX_BUFFERS, fgState.AuxiliaryBufferNumber)
142       }
143
144     if (fgState.DisplayMode & GLUT_MULTISAMPLE)
145       {
146         ATTRIB_VAL(GLX_SAMPLE_BUFFERS, 1)
147         ATTRIB_VAL(GLX_SAMPLES, fgState.SampleNumber)
148       }
149
150     /* Push a null at the end of the list */
151     ATTRIB( None );
152
153     {
154         GLXFBConfig * fbconfigArray;  /*  Array of FBConfigs  */
155         GLXFBConfig * fbconfig;       /*  The FBConfig we want  */
156         int fbconfigArraySize;        /*  Number of FBConfigs in the array  */
157
158
159         /*  Get all FBConfigs that match "attributes".  */
160         fbconfigArray = glXChooseFBConfig( fgDisplay.Display,
161                                            fgDisplay.Screen,
162                                            attributes,
163                                            &fbconfigArraySize );
164
165         if (fbconfigArray != NULL)
166         {
167             int result;  /* Returned by glXGetFBConfigAttrib, not checked. */
168
169
170             if( wantIndexedMode )
171             {
172                 /*
173                  * In index mode, we want the largest buffer size, i.e. visual
174                  * depth.  Here, FBConfigs are sorted by increasing buffer size
175                  * first, so FBConfigs with the largest size come last.
176                  */
177
178                 int bufferSizeMin, bufferSizeMax;
179
180                 /*  Get bufferSizeMin.  */
181                 result =
182                   glXGetFBConfigAttrib( fgDisplay.Display,
183                                         fbconfigArray[0],
184                                         GLX_BUFFER_SIZE,
185                                         &bufferSizeMin );
186                 /*  Get bufferSizeMax.  */
187                 result =
188                   glXGetFBConfigAttrib( fgDisplay.Display,
189                                         fbconfigArray[fbconfigArraySize - 1],
190                                         GLX_BUFFER_SIZE,
191                                         &bufferSizeMax );
192
193                 if (bufferSizeMax > bufferSizeMin)
194                 {
195                     /* 
196                      * Free and reallocate fbconfigArray, keeping only FBConfigs
197                      * with the largest buffer size.
198                      */
199                     XFree(fbconfigArray);
200
201                     /*  Add buffer size token at the end of the list.  */
202                     where--;
203                     ATTRIB_VAL( GLX_BUFFER_SIZE, bufferSizeMax );
204                     ATTRIB( None );
205
206                     fbconfigArray = glXChooseFBConfig( fgDisplay.Display,
207                                                        fgDisplay.Screen,
208                                                        attributes,
209                                                        &fbconfigArraySize );
210                 }
211             }
212
213             /*
214              * We now have an array of FBConfigs, the first one being the "best"
215              * one.  So we should return only this FBConfig:
216              *
217              * int fbconfigXID;
218              *
219              *  - pick the XID of the FBConfig we want
220              * result = glXGetFBConfigAttrib( fgDisplay.Display,
221              *                                fbconfigArray[0],
222              *                                GLX_FBCONFIG_ID,
223              *                                &fbconfigXID );
224              *
225              * - free the array
226              * XFree(fbconfigArray);
227              *
228              * - reset "attributes" with the XID
229              * where = 0;
230              * ATTRIB_VAL( GLX_FBCONFIG_ID, fbconfigXID );
231              * ATTRIB( None );
232              *
233              * - get our FBConfig only
234              * fbconfig = glXChooseFBConfig( fgDisplay.Display,
235              *                               fgDisplay.Screen,
236              *                               attributes,
237              *                               &fbconfigArraySize );
238              *
239              * However, for some configurations (for instance multisampling with
240              * Mesa 6.5.2 and ATI drivers), this does not work:
241              * glXChooseFBConfig returns NULL, whereas fbconfigXID is a valid
242              * XID.  Further investigation is needed.
243              *
244              * So, for now, we return the whole array of FBConfigs.  This should
245              * not produce any side effects elsewhere.
246              */
247             fbconfig = fbconfigArray;
248         }
249         else
250         {
251            fbconfig = NULL;
252         }
253
254         return fbconfig;
255     }
256 }
257 #endif /* TARGET_HOST_POSIX_X11 */
258
259 /*
260  * Setup the pixel format for a Win32 window
261  */
262 #if TARGET_HOST_MS_WINDOWS
263 /* The following include file is available from SGI but is not standard:
264  *   #include <GL/wglext.h>
265  * So we copy the necessary parts out of it.
266  * XXX: should local definitions for extensions be put in a separate include file?
267  */
268 typedef const char * (WINAPI * PFNWGLGETEXTENSIONSSTRINGARBPROC) (HDC hdc);
269
270 typedef BOOL (WINAPI * PFNWGLCHOOSEPIXELFORMATARBPROC) (HDC hdc, const int *piAttribIList, const FLOAT *pfAttribFList, UINT nMaxFormats, int *piFormats, UINT *nNumFormats);
271
272 #define WGL_DRAW_TO_WINDOW_ARB         0x2001
273 #define WGL_ACCELERATION_ARB           0x2003
274 #define WGL_SUPPORT_OPENGL_ARB         0x2010
275 #define WGL_DOUBLE_BUFFER_ARB          0x2011
276 #define WGL_COLOR_BITS_ARB             0x2014
277 #define WGL_ALPHA_BITS_ARB             0x201B
278 #define WGL_DEPTH_BITS_ARB             0x2022
279 #define WGL_STENCIL_BITS_ARB           0x2023
280 #define WGL_FULL_ACCELERATION_ARB      0x2027
281
282 #define WGL_SAMPLE_BUFFERS_ARB         0x2041
283 #define WGL_SAMPLES_ARB                0x2042
284
285
286 GLboolean fgSetupPixelFormat( SFG_Window* window, GLboolean checkOnly,
287                               unsigned char layer_type )
288 {
289 #if defined(_WIN32_WCE)
290     return GL_TRUE;
291 #else
292     PIXELFORMATDESCRIPTOR* ppfd, pfd;
293     int flags, pixelformat;
294
295     freeglut_return_val_if_fail( window != NULL, 0 );
296     flags = PFD_DRAW_TO_WINDOW | PFD_SUPPORT_OPENGL;
297     if( fgState.DisplayMode & GLUT_DOUBLE )
298         flags |= PFD_DOUBLEBUFFER;
299
300     if( fgState.DisplayMode & GLUT_STEREO )
301         flags |= PFD_STEREO;
302
303 #if defined(_MSC_VER)
304 #pragma message( "fgSetupPixelFormat(): there is still some work to do here!" )
305 #endif
306
307     /* Specify which pixel format do we opt for... */
308     pfd.nSize           = sizeof(PIXELFORMATDESCRIPTOR);
309     pfd.nVersion        = 1;
310     pfd.dwFlags         = flags;
311
312     if( fgState.DisplayMode & GLUT_INDEX )
313     {
314         pfd.iPixelType = PFD_TYPE_COLORINDEX;
315         pfd.cRedBits                = 0;
316         pfd.cGreenBits            = 0;
317         pfd.cBlueBits             = 0;
318         pfd.cAlphaBits            = 0;
319     }
320     else
321     {
322         pfd.iPixelType      = PFD_TYPE_RGBA;
323         pfd.cRedBits                = 8;
324         pfd.cGreenBits            = 8;
325         pfd.cBlueBits             = 8;
326         if ( fgState.DisplayMode & GLUT_ALPHA )
327             pfd.cAlphaBits            = 8;
328         else
329             pfd.cAlphaBits            = 0;
330     }
331
332     pfd.cColorBits      = 24;
333     pfd.cRedShift       = 0;
334     pfd.cGreenShift     = 0;
335     pfd.cBlueShift      = 0;
336     pfd.cAlphaShift     = 0;
337     pfd.cAccumBits      = 0;
338     pfd.cAccumRedBits   = 0;
339     pfd.cAccumGreenBits = 0;
340     pfd.cAccumBlueBits  = 0;
341     pfd.cAccumAlphaBits = 0;
342 #if 0
343     pfd.cDepthBits      = 32;
344     pfd.cStencilBits    = 0;
345 #else
346     pfd.cDepthBits      = 24;
347     pfd.cStencilBits    = 8;
348 #endif
349     if( fgState.DisplayMode & GLUT_AUX4 )
350         pfd.cAuxBuffers = 4;
351     else if( fgState.DisplayMode & GLUT_AUX3 )
352         pfd.cAuxBuffers = 3;
353     else if( fgState.DisplayMode & GLUT_AUX2 )
354         pfd.cAuxBuffers = 2;
355     else if( fgState.DisplayMode & GLUT_AUX1 )
356         pfd.cAuxBuffers = 1;
357     else
358         pfd.cAuxBuffers = 0;
359
360     pfd.iLayerType      = layer_type;
361     pfd.bReserved       = 0;
362     pfd.dwLayerMask     = 0;
363     pfd.dwVisibleMask   = 0;
364     pfd.dwDamageMask    = 0;
365
366     pfd.cColorBits = (BYTE) GetDeviceCaps( window->Window.Device, BITSPIXEL );
367     ppfd = &pfd;
368
369     pixelformat = ChoosePixelFormat( window->Window.Device, ppfd );
370
371     /* windows hack for multismapling */
372     if (fgState.DisplayMode&GLUT_MULTISAMPLE)
373     {        
374         PFNWGLGETEXTENSIONSSTRINGARBPROC wglGetEntensionsStringARB=NULL;
375         HGLRC rc, rc_before=wglGetCurrentContext();
376         HWND hWnd;
377         HDC hDC, hDC_before=wglGetCurrentDC();
378         WNDCLASS wndCls;
379         ATOM atom;
380
381         /* create a dummy window */
382         ZeroMemory(&wndCls, sizeof(wndCls));
383                 wndCls.lpfnWndProc        = DefWindowProc;
384                 wndCls.hInstance            = fgDisplay.Instance;
385                 wndCls.style                    = CS_OWNDC | CS_HREDRAW | CS_VREDRAW;
386                 wndCls.lpszClassName    = _T("FREEGLUT_dummy");
387         atom = RegisterClass( &wndCls );
388
389         hWnd=CreateWindow((LPCSTR)atom, _T(""), WS_CLIPSIBLINGS | WS_CLIPCHILDREN | WS_OVERLAPPEDWINDOW , 0,0,0,0, 0, 0, fgDisplay.Instance, 0 );
390         hDC=GetDC(hWnd);
391         SetPixelFormat( hDC, pixelformat, ppfd );
392         
393         rc = wglCreateContext( hDC );
394         wglMakeCurrent(hDC, rc);
395         
396         wglGetEntensionsStringARB=(PFNWGLGETEXTENSIONSSTRINGARBPROC)wglGetProcAddress("wglGetExtensionsStringARB");
397         if (wglGetEntensionsStringARB)
398         {
399             const char * pWglExtString=wglGetEntensionsStringARB(hDC);
400             if (pWglExtString)
401             {
402                 if (strstr(pWglExtString, "WGL_ARB_multisample"))
403                 {
404                     int pAttributes[100];
405                     int iCounter=0;
406                     int iPixelFormat;
407                     BOOL bValid;
408                     float fAttributes[] = {0,0};
409                     UINT numFormats;
410                     PFNWGLCHOOSEPIXELFORMATARBPROC wglChoosePixelFormatARBProc=NULL;
411
412                     wglChoosePixelFormatARBProc=(PFNWGLCHOOSEPIXELFORMATARBPROC)wglGetProcAddress("wglChoosePixelFormatARB");
413                     if ( wglChoosePixelFormatARBProc )
414                     {
415                         pAttributes[iCounter++]=WGL_DRAW_TO_WINDOW_ARB;        pAttributes[iCounter++]=GL_TRUE;
416                         pAttributes[iCounter++]=WGL_SUPPORT_OPENGL_ARB;        pAttributes[iCounter++]=GL_TRUE;
417                         pAttributes[iCounter++]=WGL_ACCELERATION_ARB;        pAttributes[iCounter++]=WGL_FULL_ACCELERATION_ARB;
418
419                         pAttributes[iCounter++]=WGL_COLOR_BITS_ARB;            pAttributes[iCounter++]=pfd.cColorBits ;
420                         pAttributes[iCounter++]=WGL_ALPHA_BITS_ARB;            pAttributes[iCounter++]=pfd.cAlphaBits;
421                         pAttributes[iCounter++]=WGL_DEPTH_BITS_ARB;            pAttributes[iCounter++]=pfd.cDepthBits;
422                         pAttributes[iCounter++]=WGL_STENCIL_BITS_ARB;        pAttributes[iCounter++]=pfd.cStencilBits;
423
424                         pAttributes[iCounter++]=WGL_DOUBLE_BUFFER_ARB;        pAttributes[iCounter++]=(fgState.DisplayMode & GLUT_DOUBLE)!=0;
425                         pAttributes[iCounter++]=WGL_SAMPLE_BUFFERS_ARB;        pAttributes[iCounter++]=GL_TRUE;
426                         pAttributes[iCounter++]=WGL_SAMPLES_ARB;            pAttributes[iCounter++]=4;
427                         pAttributes[iCounter++]=0;                            pAttributes[iCounter++]=0;    /* terminator */
428
429                         bValid = wglChoosePixelFormatARBProc(window->Window.Device,pAttributes,fAttributes,1,&iPixelFormat,&numFormats);
430
431                         if (bValid && numFormats>0)
432                             pixelformat=iPixelFormat;
433                     }
434                 }
435                 wglMakeCurrent( hDC_before, rc_before);
436                 wglDeleteContext(rc);
437                 ReleaseDC(hWnd, hDC);
438                 DestroyWindow(hWnd);
439                 UnregisterClass(_T("FREEGLUT_dummy"), fgDisplay.Instance);
440             }
441         }
442     }
443
444     if( pixelformat == 0 )
445         return GL_FALSE;
446
447     if( checkOnly )
448         return GL_TRUE;
449     return SetPixelFormat( window->Window.Device, pixelformat, ppfd );
450 #endif /* defined(_WIN32_WCE) */
451 }
452 #endif /* TARGET_HOST_MS_WINDOWS */
453
454 /*
455  * Sets the OpenGL context and the fgStructure "Current Window" pointer to
456  * the window structure passed in.
457  */
458 void fgSetWindow ( SFG_Window *window )
459 {
460 #if TARGET_HOST_POSIX_X11
461     if ( window )
462         glXMakeContextCurrent(
463             fgDisplay.Display,
464             window->Window.Handle,
465             window->Window.Handle,
466             window->Window.Context
467         );
468 #elif TARGET_HOST_MS_WINDOWS
469     if( fgStructure.CurrentWindow )
470         ReleaseDC( fgStructure.CurrentWindow->Window.Handle,
471                    fgStructure.CurrentWindow->Window.Device );
472
473     if ( window )
474     {
475         window->Window.Device = GetDC( window->Window.Handle );
476         wglMakeCurrent(
477             window->Window.Device,
478             window->Window.Context
479         );
480     }
481 #endif
482     fgStructure.CurrentWindow = window;
483 }
484
485
486
487 #if TARGET_HOST_POSIX_X11
488 static GLXContext fghCreateNewContext( SFG_Window* window )
489 {
490   int menu = ( window->IsMenu && !fgStructure.MenuContext );
491   int index_mode = ( fgState.DisplayMode & GLUT_INDEX );
492   Display *dpy = fgDisplay.Display;
493   GLXFBConfig config = *(window->Window.FBConfig);
494   int render_type = ( !menu && index_mode ) ? GLX_COLOR_INDEX_TYPE : GLX_RGBA_TYPE;
495   GLXContext share_list = NULL;
496   Bool direct = ( fgState.DirectContext != GLUT_FORCE_INDIRECT_CONTEXT );
497
498   return glXCreateNewContext( dpy, config, render_type, share_list, direct );
499 }
500 #endif
501
502
503 /*
504  * Opens a window. Requires a SFG_Window object created and attached
505  * to the freeglut structure. OpenGL context is created here.
506  */
507 void fgOpenWindow( SFG_Window* window, const char* title,
508                    GLboolean positionUse, int x, int y,
509                    GLboolean sizeUse, int w, int h,
510                    GLboolean gameMode, GLboolean isSubWindow )
511 {
512 #if TARGET_HOST_POSIX_X11
513     XVisualInfo * visualInfo;
514     XSetWindowAttributes winAttr;
515     XTextProperty textProperty;
516     XSizeHints sizeHints;
517     XWMHints wmHints;
518     unsigned long mask;
519     unsigned int current_DisplayMode = fgState.DisplayMode ;
520
521     /* Save the display mode if we are creating a menu window */
522     if( window->IsMenu && ( ! fgStructure.MenuContext ) )
523         fgState.DisplayMode = GLUT_DOUBLE | GLUT_RGB ;
524
525     window->Window.FBConfig = fgChooseFBConfig( );
526
527     if( window->IsMenu && ( ! fgStructure.MenuContext ) )
528         fgState.DisplayMode = current_DisplayMode ;
529
530     if( ! window->Window.FBConfig )
531     {
532         /*
533          * The "fgChooseFBConfig" returned a null meaning that the visual
534          * context is not available.
535          * Try a couple of variations to see if they will work.
536          */
537         if( !( fgState.DisplayMode & GLUT_DOUBLE ) )
538         {
539             fgState.DisplayMode |= GLUT_DOUBLE ;
540             window->Window.FBConfig = fgChooseFBConfig( );
541             fgState.DisplayMode &= ~GLUT_DOUBLE;
542         }
543
544         if( fgState.DisplayMode & GLUT_MULTISAMPLE )
545         {
546             fgState.DisplayMode &= ~GLUT_MULTISAMPLE ;
547             window->Window.FBConfig = fgChooseFBConfig( );
548             fgState.DisplayMode |= GLUT_MULTISAMPLE;
549         }
550     }
551
552     FREEGLUT_INTERNAL_ERROR_EXIT( window->Window.FBConfig != NULL,
553                                   "FBConfig with necessary capabilities not found", "fgOpenWindow" );
554
555     /*  Get the X visual.  */
556     visualInfo = glXGetVisualFromFBConfig( fgDisplay.Display,
557                                            *(window->Window.FBConfig) );
558
559     /*
560      * XXX HINT: the masks should be updated when adding/removing callbacks.
561      * XXX       This might speed up message processing. Is that true?
562      * XXX
563      * XXX A: Not appreciably, but it WILL make it easier to debug.
564      * XXX    Try tracing old GLUT and try tracing freeglut.  Old GLUT
565      * XXX    turns off events that it doesn't need and is a whole lot
566      * XXX    more pleasant to trace.  (Think mouse-motion!  Tons of
567      * XXX    ``bonus'' GUI events stream in.)
568      */
569     winAttr.event_mask        =
570         StructureNotifyMask | SubstructureNotifyMask | ExposureMask |
571         ButtonPressMask | ButtonReleaseMask | KeyPressMask | KeyReleaseMask |
572         VisibilityChangeMask | EnterWindowMask | LeaveWindowMask |
573         PointerMotionMask | ButtonMotionMask;
574     winAttr.background_pixmap = None;
575     winAttr.background_pixel  = 0;
576     winAttr.border_pixel      = 0;
577
578     winAttr.colormap = XCreateColormap(
579         fgDisplay.Display, fgDisplay.RootWindow,
580         visualInfo->visual, AllocNone
581     );
582
583     mask = CWBackPixmap | CWBorderPixel | CWColormap | CWEventMask;
584
585     if( window->IsMenu || ( gameMode == GL_TRUE ) )
586     {
587         winAttr.override_redirect = True;
588         mask |= CWOverrideRedirect;
589     }
590
591     if( ! positionUse )
592         x = y = -1; /* default window position */
593     if( ! sizeUse )
594         w = h = 300; /* default window size */
595
596     window->Window.Handle = XCreateWindow(
597         fgDisplay.Display,
598         window->Parent == NULL ? fgDisplay.RootWindow :
599         window->Parent->Window.Handle,
600         x, y, w, h, 0,
601         visualInfo->depth, InputOutput,
602         visualInfo->visual, mask,
603         &winAttr
604     );
605
606     /*
607      * The GLX context creation, possibly trying the direct context rendering
608      *  or else use the current context if the user has so specified
609      */
610
611     if( window->IsMenu )
612     {
613         /*
614          * If there isn't already an OpenGL rendering context for menu
615          * windows, make one
616          */
617         if( !fgStructure.MenuContext )
618         {
619             fgStructure.MenuContext =
620                 (SFG_MenuContext *)malloc( sizeof(SFG_MenuContext) );
621             fgStructure.MenuContext->MContext = fghCreateNewContext( window );
622         }
623
624         /* window->Window.Context = fgStructure.MenuContext->MContext; */
625         window->Window.Context = fghCreateNewContext( window );
626     }
627     else if( fgState.UseCurrentContext )
628     {
629         window->Window.Context = glXGetCurrentContext( );
630
631         if( ! window->Window.Context )
632             window->Window.Context = fghCreateNewContext( window );
633     }
634     else
635         window->Window.Context = fghCreateNewContext( window );
636
637 #if !defined( __FreeBSD__ ) && !defined( __NetBSD__ )
638     if(  !glXIsDirect( fgDisplay.Display, window->Window.Context ) )
639     {
640       if( fgState.DirectContext == GLUT_FORCE_DIRECT_CONTEXT )
641         fgError( "Unable to force direct context rendering for window '%s'",
642                  title );
643       else if( fgState.DirectContext == GLUT_TRY_DIRECT_CONTEXT )
644         fgWarning( "Unable to create direct context rendering for window '%s'\nThis may hurt performance.",
645                  title );
646     }
647 #endif
648
649     /*
650      * XXX Assume the new window is visible by default
651      * XXX Is this a  safe assumption?
652      */
653     window->State.Visible = GL_TRUE;
654
655     sizeHints.flags = 0;
656     if ( positionUse )
657         sizeHints.flags |= USPosition;
658     if ( sizeUse )
659         sizeHints.flags |= USSize;
660
661     /*
662      * Fill in the size hints values now (the x, y, width and height
663      * settings are obsolete, are there any more WMs that support them?)
664      * Unless the X servers actually stop supporting these, we should
665      * continue to fill them in.  It is *not* our place to tell the user
666      * that they should replace a window manager that they like, and which
667      * works, just because *we* think that it's not "modern" enough.
668      */
669     sizeHints.x      = x;
670     sizeHints.y      = y;
671     sizeHints.width  = w;
672     sizeHints.height = h;
673
674     wmHints.flags = StateHint;
675     wmHints.initial_state = fgState.ForceIconic ? IconicState : NormalState;
676     /* Prepare the window and iconified window names... */
677     XStringListToTextProperty( (char **) &title, 1, &textProperty );
678
679     XSetWMProperties(
680         fgDisplay.Display,
681         window->Window.Handle,
682         &textProperty,
683         &textProperty,
684         0,
685         0,
686         &sizeHints,
687         &wmHints,
688         NULL
689     );
690     XFree( textProperty.value );
691
692     XSetWMProtocols( fgDisplay.Display, window->Window.Handle,
693                      &fgDisplay.DeleteWindow, 1 );
694
695     glXMakeContextCurrent(
696         fgDisplay.Display,
697         window->Window.Handle,
698         window->Window.Handle,
699         window->Window.Context
700     );
701
702     XMapWindow( fgDisplay.Display, window->Window.Handle );
703
704     XFree(visualInfo);
705
706 #elif TARGET_HOST_MS_WINDOWS
707
708     WNDCLASS wc;
709     DWORD flags;
710     DWORD exFlags = 0;
711     ATOM atom;
712     int WindowStyle = 0;
713
714     /* Grab the window class we have registered on glutInit(): */
715     atom = GetClassInfo( fgDisplay.Instance, _T("FREEGLUT"), &wc );
716     FREEGLUT_INTERNAL_ERROR_EXIT ( atom, "Window Class Info Not Found",
717                                    "fgOpenWindow" );
718
719     if( gameMode )
720     {
721         FREEGLUT_INTERNAL_ERROR_EXIT ( window->Parent == NULL,
722                                        "Game mode being invoked on a subwindow",
723                                        "fgOpenWindow" );
724
725         /*
726          * Set the window creation flags appropriately to make the window
727          * entirely visible:
728          */
729         flags = WS_POPUP | WS_CLIPSIBLINGS | WS_CLIPCHILDREN | WS_VISIBLE;
730     }
731     else
732     {
733         int worig = w, horig = h;
734
735 #if !defined(_WIN32_WCE)
736         if ( ( ! isSubWindow ) && ( ! window->IsMenu ) )
737         {
738             /*
739              * Update the window dimensions, taking account of window
740              * decorations.  "freeglut" is to create the window with the
741              * outside of its border at (x,y) and with dimensions (w,h).
742              */
743             w += (GetSystemMetrics( SM_CXSIZEFRAME ) )*2;
744             h += (GetSystemMetrics( SM_CYSIZEFRAME ) )*2 +
745                 GetSystemMetrics( SM_CYCAPTION );
746         }
747 #endif /* defined(_WIN32_WCE) */
748
749         if( ! positionUse )
750         {
751             x = CW_USEDEFAULT;
752             y = CW_USEDEFAULT;
753         }
754         /* setting State.Width/Height to call resize callback later */
755         if( ! sizeUse )
756         {
757             if( ! window->IsMenu )
758             {
759                 w = CW_USEDEFAULT;
760                 h = CW_USEDEFAULT;
761             }
762             else /* fail safe - Windows can make a window of size (0, 0) */
763                 w = h = 300; /* default window size */
764             window->State.Width = window->State.Height = -1;
765         }
766         else
767         {
768             window->State.Width = worig;
769             window->State.Height = horig;
770         }
771
772         /*
773          * There's a small difference between creating the top, child and
774          * game mode windows
775          */
776         flags = WS_CLIPSIBLINGS | WS_CLIPCHILDREN | WS_VISIBLE;
777
778         if ( window->IsMenu )
779         {
780             flags |= WS_POPUP;
781             exFlags |= WS_EX_TOOLWINDOW;
782         }
783 #if !defined(_WIN32_WCE)
784         else if( window->Parent == NULL )
785             flags |= WS_OVERLAPPEDWINDOW;
786 #endif
787         else
788             flags |= WS_CHILD;
789     }
790
791 #if defined(_WIN32_WCE)
792     {
793         wchar_t* wstr = fghWstrFromStr(title);
794
795         window->Window.Handle = CreateWindow(
796             _T("FREEGLUT"),
797             wstr,
798             WS_VISIBLE | WS_POPUP,
799             0,0, 240,320,
800             NULL,
801             NULL,
802             fgDisplay.Instance,
803             (LPVOID) window
804         );
805
806         free(wstr);
807
808         SHFullScreen(window->Window.Handle, SHFS_HIDESTARTICON);
809         SHFullScreen(window->Window.Handle, SHFS_HIDESIPBUTTON);
810         SHFullScreen(window->Window.Handle, SHFS_HIDETASKBAR);
811         MoveWindow(window->Window.Handle, 0, 0, 240, 320, TRUE);
812         ShowWindow(window->Window.Handle, SW_SHOW);
813         UpdateWindow(window->Window.Handle);
814     }
815 #else
816     window->Window.Handle = CreateWindowEx(
817         exFlags,
818         _T("FREEGLUT"),
819         title,
820         flags,
821         x, y, w, h,
822         (HWND) window->Parent == NULL ? NULL : window->Parent->Window.Handle,
823         (HMENU) NULL,
824         fgDisplay.Instance,
825         (LPVOID) window
826     );
827 #endif /* defined(_WIN32_WCE) */
828
829     if( !( window->Window.Handle ) )
830         fgError( "Failed to create a window (%s)!", title );
831
832     /* Make a menu window always on top - fix Feature Request 947118 */
833     if( window->IsMenu || gameMode )
834         SetWindowPos(
835                         window->Window.Handle,
836                         HWND_TOPMOST,
837                         0, 0, 0, 0,
838                         SWP_NOMOVE | SWP_NOSIZE
839                     );
840
841     /* Hack to remove the caption (title bar) and/or border
842      * and all the system menu controls.
843      */
844     WindowStyle = GetWindowLong(window->Window.Handle, GWL_STYLE);
845     if ( fgState.DisplayMode & GLUT_CAPTIONLESS )
846     {
847         SetWindowLong ( window->Window.Handle, GWL_STYLE,
848                         WindowStyle & ~(WS_DLGFRAME | WS_SYSMENU | WS_MINIMIZEBOX | WS_MAXIMIZEBOX));
849     }
850     else if ( fgState.DisplayMode & GLUT_BORDERLESS )
851     {
852         SetWindowLong ( window->Window.Handle, GWL_STYLE,
853                         WindowStyle & ~(WS_BORDER | WS_SYSMENU | WS_MINIMIZEBOX | WS_MAXIMIZEBOX));
854     }
855 /*  SetWindowPos(window->Window.Handle, NULL, 0, 0, 0, 0,
856      SWP_NOMOVE | SWP_NOSIZE | SWP_NOZORDER | SWP_FRAMECHANGED); */
857
858
859 #if defined(_WIN32_WCE)
860     ShowWindow( window->Window.Handle, SW_SHOW );
861 #else
862     ShowWindow( window->Window.Handle,
863                 fgState.ForceIconic ? SW_SHOWMINIMIZED : SW_SHOW );
864 #endif /* defined(_WIN32_WCE) */
865
866     UpdateWindow( window->Window.Handle );
867     ShowCursor( TRUE );  /* XXX Old comments say "hide cursor"! */
868
869 #endif
870
871     fgSetWindow( window );
872
873     window->Window.DoubleBuffered =
874         ( fgState.DisplayMode & GLUT_DOUBLE ) ? 1 : 0;
875
876     if ( ! window->Window.DoubleBuffered )
877     {
878         glDrawBuffer ( GL_FRONT );
879         glReadBuffer ( GL_FRONT );
880     }
881 }
882
883 /*
884  * Closes a window, destroying the frame and OpenGL context
885  */
886 void fgCloseWindow( SFG_Window* window )
887 {
888 #if TARGET_HOST_POSIX_X11
889
890     glXDestroyContext( fgDisplay.Display, window->Window.Context );
891     XFree( window->Window.FBConfig );
892     XDestroyWindow( fgDisplay.Display, window->Window.Handle );
893     /* XFlush( fgDisplay.Display ); */ /* XXX Shouldn't need this */
894
895 #elif TARGET_HOST_MS_WINDOWS
896
897     /* Make sure we don't close a window with current context active */
898     if( fgStructure.CurrentWindow == window )
899         wglMakeCurrent( NULL, NULL );
900
901     /*
902      * Step through the list of windows.  If the rendering context
903      * is not being used by another window, then we delete it.
904      */
905     {
906         int used = FALSE ;
907         SFG_Window *iter ;
908
909         for( iter = (SFG_Window *)fgStructure.Windows.First;
910              iter;
911              iter = (SFG_Window *)iter->Node.Next )
912         {
913             if( ( iter->Window.Context == window->Window.Context ) &&
914                 ( iter != window ) )
915                 used = TRUE;
916         }
917
918         if( ! used )
919             wglDeleteContext( window->Window.Context );
920     }
921
922     DestroyWindow( window->Window.Handle );
923 #endif
924 }
925
926
927 /* -- INTERFACE FUNCTIONS -------------------------------------------------- */
928
929 /*
930  * Creates a new top-level freeglut window
931  */
932 int FGAPIENTRY glutCreateWindow( const char* title )
933 {
934     /* XXX GLUT does not exit; it simply calls "glutInit" quietly if the
935      * XXX application has not already done so.  The "freeglut" community
936      * XXX decided not to go this route (freeglut-developer e-mail from
937      * XXX Steve Baker, 12/16/04, 4:22 PM CST, "Re: [Freeglut-developer]
938      * XXX Desired 'freeglut' behaviour when there is no current window"
939      */
940     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutCreateWindow" );
941
942     return fgCreateWindow( NULL, title, fgState.Position.Use,
943                            fgState.Position.X, fgState.Position.Y,
944                            fgState.Size.Use, fgState.Size.X, fgState.Size.Y,
945                            GL_FALSE, GL_FALSE )->ID;
946 }
947
948 /*
949  * This function creates a sub window.
950  */
951 int FGAPIENTRY glutCreateSubWindow( int parentID, int x, int y, int w, int h )
952 {
953     int ret = 0;
954     SFG_Window* window = NULL;
955     SFG_Window* parent = NULL;
956
957     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutCreateSubWindow" );
958     parent = fgWindowByID( parentID );
959     freeglut_return_val_if_fail( parent != NULL, 0 );
960     if ( x < 0 )
961     {
962         x = parent->State.Width + x ;
963         if ( w >= 0 ) x -= w ;
964     }
965
966     if ( w < 0 ) w = parent->State.Width - x + w ;
967     if ( w < 0 )
968     {
969         x += w ;
970         w = -w ;
971     }
972
973     if ( y < 0 )
974     {
975         y = parent->State.Height + y ;
976         if ( h >= 0 ) y -= h ;
977     }
978
979     if ( h < 0 ) h = parent->State.Height - y + h ;
980     if ( h < 0 )
981     {
982         y += h ;
983         h = -h ;
984     }
985
986     window = fgCreateWindow( parent, "", GL_TRUE, x, y, GL_TRUE, w, h, GL_FALSE, GL_FALSE );
987     ret = window->ID;
988
989     return ret;
990 }
991
992 /*
993  * Destroys a window and all of its subwindows
994  */
995 void FGAPIENTRY glutDestroyWindow( int windowID )
996 {
997     SFG_Window* window;
998     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutDestroyWindow" );
999     window = fgWindowByID( windowID );
1000     freeglut_return_if_fail( window != NULL );
1001     {
1002         fgExecutionState ExecState = fgState.ExecState;
1003         fgAddToWindowDestroyList( window );
1004         fgState.ExecState = ExecState;
1005     }
1006 }
1007
1008 /*
1009  * This function selects the current window
1010  */
1011 void FGAPIENTRY glutSetWindow( int ID )
1012 {
1013     SFG_Window* window = NULL;
1014
1015     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutSetWindow" );
1016     if( fgStructure.CurrentWindow != NULL )
1017         if( fgStructure.CurrentWindow->ID == ID )
1018             return;
1019
1020     window = fgWindowByID( ID );
1021     if( window == NULL )
1022     {
1023         fgWarning( "glutSetWindow(): window ID %d not found!", ID );
1024         return;
1025     }
1026
1027     fgSetWindow( window );
1028 }
1029
1030 /*
1031  * This function returns the ID number of the current window, 0 if none exists
1032  */
1033 int FGAPIENTRY glutGetWindow( void )
1034 {
1035     SFG_Window *win = fgStructure.CurrentWindow;
1036     /*
1037      * Since GLUT did not throw an error if this function was called without a prior call to
1038      * "glutInit", this function shouldn't do so here.  Instead let us return a zero.
1039      * See Feature Request "[ 1307049 ] glutInit check".
1040      */
1041     if ( ! fgState.Initialised )
1042         return 0;
1043
1044     while ( win && win->IsMenu )
1045         win = win->Parent;
1046     return win ? win->ID : 0;
1047 }
1048
1049 /*
1050  * This function makes the current window visible
1051  */
1052 void FGAPIENTRY glutShowWindow( void )
1053 {
1054     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutShowWindow" );
1055     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutShowWindow" );
1056
1057 #if TARGET_HOST_POSIX_X11
1058
1059     XMapWindow( fgDisplay.Display, fgStructure.CurrentWindow->Window.Handle );
1060     XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
1061
1062 #elif TARGET_HOST_MS_WINDOWS
1063
1064     ShowWindow( fgStructure.CurrentWindow->Window.Handle, SW_SHOW );
1065
1066 #endif
1067
1068     fgStructure.CurrentWindow->State.Redisplay = GL_TRUE;
1069 }
1070
1071 /*
1072  * This function hides the current window
1073  */
1074 void FGAPIENTRY glutHideWindow( void )
1075 {
1076     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutHideWindow" );
1077     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutHideWindow" );
1078
1079 #if TARGET_HOST_POSIX_X11
1080
1081     if( fgStructure.CurrentWindow->Parent == NULL )
1082         XWithdrawWindow( fgDisplay.Display,
1083                          fgStructure.CurrentWindow->Window.Handle,
1084                          fgDisplay.Screen );
1085     else
1086         XUnmapWindow( fgDisplay.Display,
1087                       fgStructure.CurrentWindow->Window.Handle );
1088     XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
1089
1090 #elif TARGET_HOST_MS_WINDOWS
1091
1092     ShowWindow( fgStructure.CurrentWindow->Window.Handle, SW_HIDE );
1093
1094 #endif
1095
1096     fgStructure.CurrentWindow->State.Redisplay = GL_FALSE;
1097 }
1098
1099 /*
1100  * Iconify the current window (top-level windows only)
1101  */
1102 void FGAPIENTRY glutIconifyWindow( void )
1103 {
1104     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutIconifyWindow" );
1105     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutIconifyWindow" );
1106
1107     fgStructure.CurrentWindow->State.Visible   = GL_FALSE;
1108 #if TARGET_HOST_POSIX_X11
1109
1110     XIconifyWindow( fgDisplay.Display, fgStructure.CurrentWindow->Window.Handle,
1111                     fgDisplay.Screen );
1112     XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
1113
1114 #elif TARGET_HOST_MS_WINDOWS
1115
1116     ShowWindow( fgStructure.CurrentWindow->Window.Handle, SW_MINIMIZE );
1117
1118 #endif
1119
1120     fgStructure.CurrentWindow->State.Redisplay = GL_FALSE;
1121 }
1122
1123 /*
1124  * Set the current window's title
1125  */
1126 void FGAPIENTRY glutSetWindowTitle( const char* title )
1127 {
1128     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutSetWindowTitle" );
1129     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutSetWindowTitle" );
1130     if( ! fgStructure.CurrentWindow->Parent )
1131     {
1132 #if TARGET_HOST_POSIX_X11
1133
1134         XTextProperty text;
1135
1136         text.value = (unsigned char *) title;
1137         text.encoding = XA_STRING;
1138         text.format = 8;
1139         text.nitems = strlen( title );
1140
1141         XSetWMName(
1142             fgDisplay.Display,
1143             fgStructure.CurrentWindow->Window.Handle,
1144             &text
1145         );
1146
1147         XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
1148
1149 #elif TARGET_HOST_MS_WINDOWS
1150 #    ifdef _WIN32_WCE
1151         {
1152             wchar_t* wstr = fghWstrFromStr(title);
1153             SetWindowText( fgStructure.CurrentWindow->Window.Handle, wstr );
1154             free(wstr);
1155         }
1156 #    else
1157         SetWindowText( fgStructure.CurrentWindow->Window.Handle, title );
1158 #    endif
1159
1160 #endif
1161     }
1162 }
1163
1164 /*
1165  * Set the current window's iconified title
1166  */
1167 void FGAPIENTRY glutSetIconTitle( const char* title )
1168 {
1169     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutSetIconTitle" );
1170     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutSetIconTitle" );
1171
1172     if( ! fgStructure.CurrentWindow->Parent )
1173     {
1174 #if TARGET_HOST_POSIX_X11
1175
1176         XTextProperty text;
1177
1178         text.value = (unsigned char *) title;
1179         text.encoding = XA_STRING;
1180         text.format = 8;
1181         text.nitems = strlen( title );
1182
1183         XSetWMIconName(
1184             fgDisplay.Display,
1185             fgStructure.CurrentWindow->Window.Handle,
1186             &text
1187         );
1188
1189         XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
1190
1191 #elif TARGET_HOST_MS_WINDOWS
1192 #    ifdef _WIN32_WCE
1193         {
1194             wchar_t* wstr = fghWstrFromStr(title);
1195             SetWindowText( fgStructure.CurrentWindow->Window.Handle, wstr );
1196             free(wstr);
1197         }
1198 #    else
1199         SetWindowText( fgStructure.CurrentWindow->Window.Handle, title );
1200 #    endif
1201
1202 #endif
1203     }
1204 }
1205
1206 /*
1207  * Change the current window's size
1208  */
1209 void FGAPIENTRY glutReshapeWindow( int width, int height )
1210 {
1211     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutReshapeWindow" );
1212     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutReshapeWindow" );
1213
1214     if (glutGet(GLUT_FULL_SCREEN))
1215     {
1216       /*  Leave full screen state before resizing. */
1217       glutFullScreenToggle();
1218     }
1219
1220     fgStructure.CurrentWindow->State.NeedToResize = GL_TRUE;
1221     fgStructure.CurrentWindow->State.Width  = width ;
1222     fgStructure.CurrentWindow->State.Height = height;
1223 }
1224
1225 /*
1226  * Change the current window's position
1227  */
1228 void FGAPIENTRY glutPositionWindow( int x, int y )
1229 {
1230     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutPositionWindow" );
1231     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutPositionWindow" );
1232
1233     if (glutGet(GLUT_FULL_SCREEN))
1234     {
1235       /*  Leave full screen state before moving. */
1236       glutFullScreenToggle();
1237     }
1238
1239 #if TARGET_HOST_POSIX_X11
1240
1241     XMoveWindow( fgDisplay.Display, fgStructure.CurrentWindow->Window.Handle,
1242                  x, y );
1243     XFlush( fgDisplay.Display ); /* XXX Shouldn't need this */
1244
1245 #elif TARGET_HOST_MS_WINDOWS
1246
1247     {
1248         RECT winRect;
1249
1250         /* "GetWindowRect" returns the pixel coordinates of the outside of the window */
1251         GetWindowRect( fgStructure.CurrentWindow->Window.Handle, &winRect );
1252         MoveWindow(
1253             fgStructure.CurrentWindow->Window.Handle,
1254             x,
1255             y,
1256             winRect.right - winRect.left,
1257             winRect.bottom - winRect.top,
1258             TRUE
1259         );
1260     }
1261
1262 #endif
1263 }
1264
1265 /*
1266  * Lowers the current window (by Z order change)
1267  */
1268 void FGAPIENTRY glutPushWindow( void )
1269 {
1270     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutPushWindow" );
1271     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutPushWindow" );
1272
1273 #if TARGET_HOST_POSIX_X11
1274
1275     XLowerWindow( fgDisplay.Display, fgStructure.CurrentWindow->Window.Handle );
1276
1277 #elif TARGET_HOST_MS_WINDOWS
1278
1279     SetWindowPos(
1280         fgStructure.CurrentWindow->Window.Handle,
1281         HWND_BOTTOM,
1282         0, 0, 0, 0,
1283         SWP_NOSIZE | SWP_NOMOVE
1284     );
1285
1286 #endif
1287 }
1288
1289 /*
1290  * Raises the current window (by Z order change)
1291  */
1292 void FGAPIENTRY glutPopWindow( void )
1293 {
1294     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutPopWindow" );
1295     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutPopWindow" );
1296
1297 #if TARGET_HOST_POSIX_X11
1298
1299     XRaiseWindow( fgDisplay.Display, fgStructure.CurrentWindow->Window.Handle );
1300
1301 #elif TARGET_HOST_MS_WINDOWS
1302
1303     SetWindowPos(
1304         fgStructure.CurrentWindow->Window.Handle,
1305         HWND_TOP,
1306         0, 0, 0, 0,
1307         SWP_NOSIZE | SWP_NOMOVE
1308     );
1309
1310 #endif
1311 }
1312
1313 /*
1314  * Resize the current window so that it fits the whole screen
1315  */
1316 void FGAPIENTRY glutFullScreen( void )
1317 {
1318     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutFullScreen" );
1319     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutFullScreen" );
1320
1321     if (glutGet(GLUT_FULL_SCREEN))
1322     {
1323       /*  Leave full screen state before resizing. */
1324       glutFullScreenToggle();
1325     }
1326
1327     {
1328 #if TARGET_HOST_POSIX_X11
1329
1330         Status status;  /* Returned by XGetWindowAttributes(), not checked. */
1331         XWindowAttributes attributes;
1332
1333         status = XGetWindowAttributes(fgDisplay.Display,
1334                                       fgStructure.CurrentWindow->Window.Handle,
1335                                       &attributes);
1336         /*
1337          * The "x" and "y" members of "attributes" are the window's coordinates
1338          * relative to its parent, i.e. to the decoration window.
1339          */
1340         XMoveResizeWindow(fgDisplay.Display,
1341                           fgStructure.CurrentWindow->Window.Handle,
1342                           -attributes.x,
1343                           -attributes.y,
1344                           fgDisplay.ScreenWidth,
1345                           fgDisplay.ScreenHeight);
1346
1347 #elif TARGET_HOST_MS_WINDOWS && !defined(_WIN32_WCE) /* FIXME: what about WinCE */
1348         RECT rect;
1349
1350         /* For fullscreen mode, force the top-left corner to 0,0
1351          * and adjust the window rectangle so that the client area
1352          * covers the whole screen.
1353          */
1354
1355         rect.left   = 0;
1356         rect.top    = 0;
1357         rect.right  = fgDisplay.ScreenWidth;
1358         rect.bottom = fgDisplay.ScreenHeight;
1359
1360         AdjustWindowRect ( &rect, WS_OVERLAPPEDWINDOW | WS_CLIPSIBLINGS |
1361                                   WS_CLIPCHILDREN, FALSE );
1362
1363         /*
1364          * SWP_NOACTIVATE     Do not activate the window
1365          * SWP_NOOWNERZORDER  Do not change position in z-order
1366          * SWP_NOSENDCHANGING Supress WM_WINDOWPOSCHANGING message
1367          * SWP_NOZORDER       Retains the current Z order (ignore 2nd param)
1368          */
1369
1370         SetWindowPos( fgStructure.CurrentWindow->Window.Handle,
1371                       HWND_TOP,
1372                       rect.left,
1373                       rect.top,
1374                       rect.right  - rect.left,
1375                       rect.bottom - rect.top,
1376                       SWP_NOACTIVATE | SWP_NOOWNERZORDER | SWP_NOSENDCHANGING |
1377                       SWP_NOZORDER
1378                     );
1379 #endif
1380     }
1381 }
1382
1383 /*
1384  * Toggle the window's full screen state.
1385  */
1386 void FGAPIENTRY glutFullScreenToggle( void )
1387 {
1388     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutFullScreenToggle" );
1389     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutFullScreenToggle" );
1390
1391     {
1392 #if TARGET_HOST_POSIX_X11
1393
1394       if (fgDisplay.StateFullScreen != None)
1395       {
1396         XEvent xevent;
1397         long event_mask;
1398         int status;
1399
1400         xevent.type = ClientMessage;
1401         xevent.xclient.type = ClientMessage;
1402         xevent.xclient.serial = 0;
1403         xevent.xclient.send_event = True;
1404         xevent.xclient.display = fgDisplay.Display;
1405         xevent.xclient.window = fgStructure.CurrentWindow->Window.Handle;
1406         xevent.xclient.message_type = fgDisplay.State;
1407         xevent.xclient.format = 32;
1408         xevent.xclient.data.l[0] = 2;  /* _NET_WM_STATE_TOGGLE */
1409         xevent.xclient.data.l[1] = fgDisplay.StateFullScreen;
1410         xevent.xclient.data.l[2] = 0;
1411         xevent.xclient.data.l[3] = 0;
1412         xevent.xclient.data.l[4] = 0;
1413
1414         /*** Don't really understand how event masks work... ***/
1415         event_mask = SubstructureRedirectMask | SubstructureNotifyMask;
1416
1417         status = XSendEvent(fgDisplay.Display,
1418           fgDisplay.RootWindow,
1419           False,
1420           event_mask,
1421           &xevent);
1422         FREEGLUT_INTERNAL_ERROR_EXIT(status != 0,
1423           "XSendEvent failed",
1424           "glutFullScreenToggle");
1425       }
1426       else
1427 #endif
1428       {
1429         /*
1430          * If the window manager is not Net WM compliant, fall back to legacy
1431          * behaviour.
1432          */
1433         glutFullScreen();
1434       }
1435     }
1436 }
1437
1438 /*
1439  * A.Donev: Set and retrieve the window's user data
1440  */
1441 void* FGAPIENTRY glutGetWindowData( void )
1442 {
1443     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutGetWindowData" );
1444     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutGetWindowData" );
1445     return fgStructure.CurrentWindow->UserData;
1446 }
1447
1448 void FGAPIENTRY glutSetWindowData(void* data)
1449 {
1450     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutSetWindowData" );
1451     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutSetWindowData" );
1452     fgStructure.CurrentWindow->UserData = data;
1453 }
1454
1455 /*** END OF FILE ***/