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