src/video/SDL_video.c
author Ryan C. Gordon <icculus@icculus.org>
Wed, 29 Nov 2006 10:22:59 +0000
changeset 2075 46661504398c
parent 2062 c9aa6bcb26f3
child 2119 9341a884a4d9
permissions -rw-r--r--
Logic error in SDL_video.c (used bitwise OR instead of logical OR).
Thanks, Suziki Masahiro.
     1 /*
     2     SDL - Simple DirectMedia Layer
     3     Copyright (C) 1997-2006 Sam Lantinga
     4 
     5     This library is free software; you can redistribute it and/or
     6     modify it under the terms of the GNU Lesser General Public
     7     License as published by the Free Software Foundation; either
     8     version 2.1 of the License, or (at your option) any later version.
     9 
    10     This library is distributed in the hope that it will be useful,
    11     but WITHOUT ANY WARRANTY; without even the implied warranty of
    12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    13     Lesser General Public License for more details.
    14 
    15     You should have received a copy of the GNU Lesser General Public
    16     License along with this library; if not, write to the Free Software
    17     Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
    18 
    19     Sam Lantinga
    20     slouken@libsdl.org
    21 */
    22 #include "SDL_config.h"
    23 
    24 /* The high-level video driver subsystem */
    25 
    26 #include "SDL.h"
    27 #include "SDL_sysvideo.h"
    28 #include "SDL_blit.h"
    29 #include "SDL_pixels_c.h"
    30 #include "SDL_renderer_gl.h"
    31 #include "SDL_renderer_sw.h"
    32 #include "../events/SDL_sysevents.h"
    33 #include "../events/SDL_events_c.h"
    34 
    35 #if SDL_VIDEO_OPENGL
    36 #include "SDL_opengl.h"
    37 
    38 /* On Windows, windows.h defines CreateWindow */
    39 #ifdef CreateWindow
    40 #undef CreateWindow
    41 #endif
    42 #endif /* SDL_VIDEO_OPENGL */
    43 
    44 /* Available video drivers */
    45 static VideoBootStrap *bootstrap[] = {
    46 #if SDL_VIDEO_DRIVER_COCOA
    47     &COCOA_bootstrap,
    48 #endif
    49 #if SDL_VIDEO_DRIVER_X11
    50     &X11_bootstrap,
    51 #endif
    52 #if SDL_VIDEO_DRIVER_NANOX
    53     &NX_bootstrap,
    54 #endif
    55 #if SDL_VIDEO_DRIVER_IPOD
    56     &iPod_bootstrap,
    57 #endif
    58 #if SDL_VIDEO_DRIVER_WSCONS
    59     &WSCONS_bootstrap,
    60 #endif
    61 #if SDL_VIDEO_DRIVER_FBCON
    62     &FBCON_bootstrap,
    63 #endif
    64 #if SDL_VIDEO_DRIVER_DIRECTFB
    65     &DirectFB_bootstrap,
    66 #endif
    67 #if SDL_VIDEO_DRIVER_PS2GS
    68     &PS2GS_bootstrap,
    69 #endif
    70 #if SDL_VIDEO_DRIVER_VGL
    71     &VGL_bootstrap,
    72 #endif
    73 #if SDL_VIDEO_DRIVER_SVGALIB
    74     &SVGALIB_bootstrap,
    75 #endif
    76 #if SDL_VIDEO_DRIVER_GAPI
    77     &GAPI_bootstrap,
    78 #endif
    79 #if SDL_VIDEO_DRIVER_WIN32
    80     &WIN32_bootstrap,
    81 #endif
    82 #if SDL_VIDEO_DRIVER_BWINDOW
    83     &BWINDOW_bootstrap,
    84 #endif
    85 #if SDL_VIDEO_DRIVER_PHOTON
    86     &ph_bootstrap,
    87 #endif
    88 #if SDL_VIDEO_DRIVER_EPOC
    89     &EPOC_bootstrap,
    90 #endif
    91 #if SDL_VIDEO_DRIVER_XBIOS
    92     &XBIOS_bootstrap,
    93 #endif
    94 #if SDL_VIDEO_DRIVER_GEM
    95     &GEM_bootstrap,
    96 #endif
    97 #if SDL_VIDEO_DRIVER_DC
    98     &DC_bootstrap,
    99 #endif
   100 #if SDL_VIDEO_DRIVER_RISCOS
   101     &RISCOS_bootstrap,
   102 #endif
   103 #if SDL_VIDEO_DRIVER_OS2FS
   104     &OS2FSLib_bootstrap,
   105 #endif
   106 #if SDL_VIDEO_DRIVER_DUMMY
   107     &DUMMY_bootstrap,
   108 #endif
   109     NULL
   110 };
   111 
   112 static SDL_VideoDevice *_this = NULL;
   113 
   114 /* Various local functions */
   115 int SDL_VideoInit(const char *driver_name, Uint32 flags);
   116 void SDL_VideoQuit(void);
   117 
   118 static int
   119 cmpmodes(const void *A, const void *B)
   120 {
   121     SDL_DisplayMode a = *(const SDL_DisplayMode *) A;
   122     SDL_DisplayMode b = *(const SDL_DisplayMode *) B;
   123 
   124     if (a.w != b.w) {
   125         return b.w - a.w;
   126     }
   127     if (a.h != b.h) {
   128         return b.h - a.h;
   129     }
   130     if (SDL_BITSPERPIXEL(a.format) != SDL_BITSPERPIXEL(b.format)) {
   131         return SDL_BITSPERPIXEL(b.format) - SDL_BITSPERPIXEL(a.format);
   132     }
   133     if (a.refresh_rate != b.refresh_rate) {
   134         return b.refresh_rate - a.refresh_rate;
   135     }
   136     return 0;
   137 }
   138 
   139 static void
   140 SDL_UninitializedVideo()
   141 {
   142     SDL_SetError("Video subsystem has not been initialized");
   143 }
   144 
   145 int
   146 SDL_GetNumVideoDrivers(void)
   147 {
   148     return SDL_arraysize(bootstrap) - 1;
   149 }
   150 
   151 const char *
   152 SDL_GetVideoDriver(int index)
   153 {
   154     if (index >= 0 && index < SDL_GetNumVideoDrivers()) {
   155         return bootstrap[index]->name;
   156     }
   157     return NULL;
   158 }
   159 
   160 /*
   161  * Initialize the video and event subsystems -- determine native pixel format
   162  */
   163 int
   164 SDL_VideoInit(const char *driver_name, Uint32 flags)
   165 {
   166     SDL_VideoDevice *video;
   167     int index;
   168     int i;
   169 
   170     /* Toggle the event thread flags, based on OS requirements */
   171 #if defined(MUST_THREAD_EVENTS)
   172     flags |= SDL_INIT_EVENTTHREAD;
   173 #elif defined(CANT_THREAD_EVENTS)
   174     if ((flags & SDL_INIT_EVENTTHREAD) == SDL_INIT_EVENTTHREAD) {
   175         SDL_SetError("OS doesn't support threaded events");
   176         return -1;
   177     }
   178 #endif
   179 
   180     /* Start the event loop */
   181     if (SDL_StartEventLoop(flags) < 0) {
   182         return -1;
   183     }
   184 
   185     /* Check to make sure we don't overwrite '_this' */
   186     if (_this != NULL) {
   187         SDL_VideoQuit();
   188     }
   189 
   190     /* Select the proper video driver */
   191     index = 0;
   192     video = NULL;
   193     if (driver_name == NULL) {
   194         driver_name = SDL_getenv("SDL_VIDEODRIVER");
   195     }
   196     if (driver_name != NULL) {
   197         for (i = 0; bootstrap[i]; ++i) {
   198             if (SDL_strcasecmp(bootstrap[i]->name, driver_name) == 0) {
   199                 if (bootstrap[i]->available()) {
   200                     video = bootstrap[i]->create(index);
   201                 }
   202                 break;
   203             }
   204         }
   205     } else {
   206         for (i = 0; bootstrap[i]; ++i) {
   207             if (bootstrap[i]->available()) {
   208                 video = bootstrap[i]->create(index);
   209                 if (video != NULL) {
   210                     break;
   211                 }
   212             }
   213         }
   214     }
   215     if (video == NULL) {
   216         if (driver_name) {
   217             SDL_SetError("%s not available", driver_name);
   218         } else {
   219             SDL_SetError("No available video device");
   220         }
   221         return -1;
   222     }
   223     _this = video;
   224     _this->name = bootstrap[i]->name;
   225     _this->next_object_id = 1;
   226 
   227 
   228     /* Set some very sane GL defaults */
   229     _this->gl_config.driver_loaded = 0;
   230     _this->gl_config.dll_handle = NULL;
   231     _this->gl_config.red_size = 3;
   232     _this->gl_config.green_size = 3;
   233     _this->gl_config.blue_size = 2;
   234     _this->gl_config.alpha_size = 0;
   235     _this->gl_config.buffer_size = 0;
   236     _this->gl_config.depth_size = 16;
   237     _this->gl_config.stencil_size = 0;
   238     _this->gl_config.double_buffer = 1;
   239     _this->gl_config.accum_red_size = 0;
   240     _this->gl_config.accum_green_size = 0;
   241     _this->gl_config.accum_blue_size = 0;
   242     _this->gl_config.accum_alpha_size = 0;
   243     _this->gl_config.stereo = 0;
   244     _this->gl_config.multisamplebuffers = 0;
   245     _this->gl_config.multisamplesamples = 0;
   246     _this->gl_config.accelerated = -1;  /* not known, don't set */
   247 
   248     /* Initialize the video subsystem */
   249     if (_this->VideoInit(_this) < 0) {
   250         SDL_VideoQuit();
   251         return -1;
   252     }
   253 
   254     /* Make sure some displays were added */
   255     if (_this->num_displays == 0) {
   256         SDL_SetError("The video driver did not add any displays");
   257         SDL_VideoQuit();
   258         return (-1);
   259     }
   260 
   261     /* The software renderer is always available */
   262     for (i = 0; i < _this->num_displays; ++i) {
   263 #if SDL_VIDEO_RENDER_OGL
   264         SDL_AddRenderDriver(i, &GL_RenderDriver);
   265 #endif
   266         if (_this->displays[i].num_render_drivers > 0) {
   267             SDL_AddRenderDriver(i, &SW_RenderDriver);
   268         }
   269     }
   270 
   271     /* We're ready to go! */
   272     return 0;
   273 }
   274 
   275 const char *
   276 SDL_GetCurrentVideoDriver()
   277 {
   278     if (!_this) {
   279         SDL_UninitializedVideo();
   280         return NULL;
   281     }
   282     return _this->name;
   283 }
   284 
   285 SDL_VideoDevice *
   286 SDL_GetVideoDevice()
   287 {
   288     return _this;
   289 }
   290 
   291 int
   292 SDL_AddBasicVideoDisplay(const SDL_DisplayMode * desktop_mode)
   293 {
   294     SDL_VideoDisplay display;
   295 
   296     SDL_zero(display);
   297     if (desktop_mode) {
   298         display.desktop_mode = *desktop_mode;
   299     }
   300     display.current_mode = display.desktop_mode;
   301 
   302     return SDL_AddVideoDisplay(&display);
   303 }
   304 
   305 int
   306 SDL_AddVideoDisplay(const SDL_VideoDisplay * display)
   307 {
   308     SDL_VideoDisplay *displays;
   309     int index = -1;
   310 
   311     displays =
   312         SDL_realloc(_this->displays,
   313                     (_this->num_displays + 1) * sizeof(*displays));
   314     if (displays) {
   315         index = _this->num_displays++;
   316         displays[index] = *display;
   317         displays[index].device = _this;
   318         _this->displays = displays;
   319     } else {
   320         SDL_OutOfMemory();
   321     }
   322     return index;
   323 }
   324 
   325 int
   326 SDL_GetNumVideoDisplays(void)
   327 {
   328     if (!_this) {
   329         SDL_UninitializedVideo();
   330         return 0;
   331     }
   332     return _this->num_displays;
   333 }
   334 
   335 int
   336 SDL_SelectVideoDisplay(int index)
   337 {
   338     if (!_this) {
   339         SDL_UninitializedVideo();
   340         return (-1);
   341     }
   342     if (index < 0 || index >= _this->num_displays) {
   343         SDL_SetError("index must be in the range 0 - %d",
   344                      _this->num_displays - 1);
   345         return -1;
   346     }
   347     _this->current_display = index;
   348     return 0;
   349 }
   350 
   351 int
   352 SDL_GetCurrentVideoDisplay(void)
   353 {
   354     if (!_this) {
   355         SDL_UninitializedVideo();
   356         return (-1);
   357     }
   358     return _this->current_display;
   359 }
   360 
   361 SDL_bool
   362 SDL_AddDisplayMode(int displayIndex, const SDL_DisplayMode * mode)
   363 {
   364     SDL_VideoDisplay *display = &_this->displays[displayIndex];
   365     SDL_DisplayMode *modes;
   366     int i, nmodes;
   367 
   368     /* Make sure we don't already have the mode in the list */
   369     modes = display->display_modes;
   370     nmodes = display->num_display_modes;
   371     for (i = nmodes; i--;) {
   372         if (SDL_memcmp(mode, &modes[i], sizeof(*mode)) == 0) {
   373             return SDL_FALSE;
   374         }
   375     }
   376 
   377     /* Go ahead and add the new mode */
   378     if (nmodes == display->max_display_modes) {
   379         modes =
   380             SDL_realloc(modes,
   381                         (display->max_display_modes + 32) * sizeof(*modes));
   382         if (!modes) {
   383             return SDL_FALSE;
   384         }
   385         display->display_modes = modes;
   386         display->max_display_modes += 32;
   387     }
   388     modes[nmodes] = *mode;
   389     display->num_display_modes++;
   390 
   391     return SDL_TRUE;
   392 }
   393 
   394 int
   395 SDL_GetNumDisplayModes()
   396 {
   397     if (_this) {
   398         SDL_VideoDisplay *display = &SDL_CurrentDisplay;
   399         if (!display->num_display_modes && _this->GetDisplayModes) {
   400             _this->GetDisplayModes(_this);
   401             SDL_qsort(display->display_modes, display->num_display_modes,
   402                       sizeof(SDL_DisplayMode), cmpmodes);
   403         }
   404         return display->num_display_modes;
   405     }
   406     return 0;
   407 }
   408 
   409 int
   410 SDL_GetDisplayMode(int index, SDL_DisplayMode * mode)
   411 {
   412     if (index < 0 || index >= SDL_GetNumDisplayModes()) {
   413         SDL_SetError("index must be in the range of 0 - %d",
   414                      SDL_GetNumDisplayModes() - 1);
   415         return -1;
   416     }
   417     if (mode) {
   418         *mode = SDL_CurrentDisplay.display_modes[index];
   419     }
   420     return 0;
   421 }
   422 
   423 int
   424 SDL_GetDesktopDisplayMode(SDL_DisplayMode * mode)
   425 {
   426     if (!_this) {
   427         SDL_UninitializedVideo();
   428         return -1;
   429     }
   430     if (mode) {
   431         *mode = SDL_CurrentDisplay.desktop_mode;
   432     }
   433     return 0;
   434 }
   435 
   436 int
   437 SDL_GetCurrentDisplayMode(SDL_DisplayMode * mode)
   438 {
   439     if (!_this) {
   440         SDL_UninitializedVideo();
   441         return -1;
   442     }
   443     if (mode) {
   444         *mode = SDL_CurrentDisplay.current_mode;
   445     }
   446     return 0;
   447 }
   448 
   449 SDL_DisplayMode *
   450 SDL_GetClosestDisplayMode(const SDL_DisplayMode * mode,
   451                           SDL_DisplayMode * closest)
   452 {
   453     Uint32 target_format;
   454     int target_refresh_rate;
   455     int i;
   456     SDL_DisplayMode *current, *match;
   457 
   458     if (!_this || !mode || !closest) {
   459         return NULL;
   460     }
   461 
   462     /* Default to the desktop format */
   463     if (mode->format) {
   464         target_format = mode->format;
   465     } else {
   466         target_format = SDL_CurrentDisplay.desktop_mode.format;
   467     }
   468 
   469     /* Default to the desktop refresh rate */
   470     if (mode->refresh_rate) {
   471         target_refresh_rate = mode->refresh_rate;
   472     } else {
   473         target_refresh_rate = SDL_CurrentDisplay.desktop_mode.refresh_rate;
   474     }
   475 
   476     match = NULL;
   477     for (i = 0; i < SDL_GetNumDisplayModes(); ++i) {
   478         current = &SDL_CurrentDisplay.display_modes[i];
   479 
   480         if ((current->w && current->h) &&
   481             (current->w < mode->w || current->h < mode->h)) {
   482             /* Out of sorted modes large enough here */
   483             break;
   484         }
   485         if (!match || current->w < match->w || current->h < match->h) {
   486             match = current;
   487             continue;
   488         }
   489         if (current->format != match->format) {
   490             /* Sorted highest depth to lowest */
   491             if (current->format == target_format ||
   492                 (SDL_BITSPERPIXEL(current->format) >=
   493                  SDL_BITSPERPIXEL(target_format)
   494                  && SDL_PIXELTYPE(current->format) ==
   495                  SDL_PIXELTYPE(target_format))) {
   496                 match = current;
   497             }
   498             continue;
   499         }
   500         if (current->refresh_rate != match->refresh_rate) {
   501             /* Sorted highest refresh to lowest */
   502             if (current->refresh_rate >= target_refresh_rate) {
   503                 match = current;
   504             }
   505         }
   506     }
   507     if (match) {
   508         if (match->format) {
   509             closest->format = match->format;
   510         } else {
   511             closest->format = mode->format;
   512         }
   513         if (match->w && match->h) {
   514             closest->w = match->w;
   515             closest->h = match->h;
   516         } else {
   517             closest->w = mode->w;
   518             closest->h = mode->h;
   519         }
   520         if (match->refresh_rate) {
   521             closest->refresh_rate = match->refresh_rate;
   522         } else {
   523             closest->refresh_rate = mode->refresh_rate;
   524         }
   525         closest->driverdata = match->driverdata;
   526 
   527         /* Pick some reasonable defaults if the app and driver don't care */
   528         if (!closest->format) {
   529             closest->format = SDL_PIXELFORMAT_RGB888;
   530         }
   531         if (!closest->w) {
   532             closest->w = 640;
   533         }
   534         if (!closest->h) {
   535             closest->h = 480;
   536         }
   537         return closest;
   538     }
   539     return NULL;
   540 }
   541 
   542 int
   543 SDL_SetDisplayMode(const SDL_DisplayMode * mode)
   544 {
   545     SDL_VideoDisplay *display;
   546     SDL_DisplayMode display_mode;
   547     SDL_DisplayMode current_mode;
   548     int i, ncolors;
   549 
   550     if (!_this) {
   551         SDL_UninitializedVideo();
   552         return -1;
   553     }
   554 
   555     display = &SDL_CurrentDisplay;
   556     if (!mode) {
   557         mode = &display->desktop_mode;
   558     }
   559     display_mode = *mode;
   560 
   561     /* Default to the current mode */
   562     if (!display_mode.format) {
   563         display_mode.format = display->current_mode.format;
   564     }
   565     if (!display_mode.w) {
   566         display_mode.w = display->current_mode.w;
   567     }
   568     if (!display_mode.h) {
   569         display_mode.h = display->current_mode.h;
   570     }
   571     if (!display_mode.refresh_rate) {
   572         display_mode.refresh_rate = display->current_mode.refresh_rate;
   573     }
   574 
   575     /* Get a good video mode, the closest one possible */
   576     if (!SDL_GetClosestDisplayMode(&display_mode, &display_mode)) {
   577         SDL_SetError("No video mode large enough for %dx%d",
   578                      display_mode.w, display_mode.h);
   579         return -1;
   580     }
   581 
   582     /* See if there's anything left to do */
   583     SDL_GetCurrentDisplayMode(&current_mode);
   584     if (SDL_memcmp(&display_mode, &current_mode, sizeof(display_mode)) == 0) {
   585         return 0;
   586     }
   587 
   588     /* Actually change the display mode */
   589     if (_this->SetDisplayMode(_this, &display_mode) < 0) {
   590         return -1;
   591     }
   592     display->current_mode = display_mode;
   593 
   594     /* Set up a palette, if necessary */
   595     if (SDL_ISPIXELFORMAT_INDEXED(display_mode.format)) {
   596         ncolors = (1 << SDL_BITSPERPIXEL(display_mode.format));
   597     } else {
   598         ncolors = 0;
   599     }
   600     if ((!ncolors && display->palette) || (ncolors && !display->palette)
   601         || (ncolors && ncolors != display->palette->ncolors)) {
   602         if (display->palette) {
   603             SDL_FreePalette(display->palette);
   604             display->palette = NULL;
   605         }
   606         if (ncolors) {
   607             display->palette = SDL_AllocPalette(ncolors);
   608             if (!display->palette) {
   609                 return -1;
   610             }
   611             SDL_DitherColors(display->palette->colors,
   612                              SDL_BITSPERPIXEL(display_mode.format));
   613         }
   614     }
   615 
   616     /* Move any fullscreen windows into position */
   617     for (i = 0; i < display->num_windows; ++i) {
   618         SDL_Window *window = &display->windows[i];
   619         if (FULLSCREEN_VISIBLE(window)) {
   620             SDL_SetWindowPosition(window->id, SDL_WINDOWPOS_CENTERED,
   621                                   SDL_WINDOWPOS_CENTERED);
   622         }
   623     }
   624 
   625     return 0;
   626 }
   627 
   628 int
   629 SDL_SetFullscreenDisplayMode(const SDL_DisplayMode * mode)
   630 {
   631     SDL_VideoDisplay *display;
   632     SDL_DisplayMode fullscreen_mode;
   633     int i;
   634 
   635     if (!_this) {
   636         SDL_UninitializedVideo();
   637         return -1;
   638     }
   639 
   640     display = &SDL_CurrentDisplay;
   641     if (!mode) {
   642         mode = &display->desktop_mode;
   643     }
   644 
   645     SDL_GetClosestDisplayMode(mode, &fullscreen_mode);
   646     if (SDL_memcmp
   647         (&fullscreen_mode, &display->fullscreen_mode,
   648          sizeof(fullscreen_mode)) == 0) {
   649         /* Nothing to do... */
   650         return 0;
   651     }
   652     display->fullscreen_mode = fullscreen_mode;
   653 
   654     /* Actually set the mode if we have a fullscreen window visible */
   655     for (i = 0; i < display->num_windows; ++i) {
   656         SDL_Window *window = &display->windows[i];
   657         if (FULLSCREEN_VISIBLE(window)) {
   658             if (SDL_SetDisplayMode(&display->fullscreen_mode) < 0) {
   659                 return -1;
   660             }
   661         }
   662         if (window->flags & SDL_WINDOW_FULLSCREEN) {
   663             SDL_OnWindowResized(window);
   664         }
   665     }
   666     return 0;
   667 }
   668 
   669 int
   670 SDL_GetFullscreenDisplayMode(SDL_DisplayMode * mode)
   671 {
   672     if (!_this) {
   673         SDL_UninitializedVideo();
   674         return -1;
   675     }
   676     if (mode) {
   677         *mode = SDL_CurrentDisplay.fullscreen_mode;
   678     }
   679     return 0;
   680 }
   681 
   682 int
   683 SDL_SetDisplayPalette(const SDL_Color * colors, int firstcolor, int ncolors)
   684 {
   685     SDL_Palette *palette;
   686     int status = 0;
   687 
   688     if (!_this) {
   689         SDL_UninitializedVideo();
   690         return -1;
   691     }
   692     palette = SDL_CurrentDisplay.palette;
   693     if (!palette) {
   694         SDL_SetError("Display mode does not have a palette");
   695         return -1;
   696     }
   697 
   698     status = SDL_SetPaletteColors(palette, colors, firstcolor, ncolors);
   699 
   700     if (_this->SetDisplayPalette) {
   701         if (_this->SetDisplayPalette(_this, palette) < 0) {
   702             status = -1;
   703         }
   704     }
   705     return status;
   706 }
   707 
   708 int
   709 SDL_GetDisplayPalette(SDL_Color * colors, int firstcolor, int ncolors)
   710 {
   711     SDL_Palette *palette;
   712 
   713     if (!_this) {
   714         SDL_UninitializedVideo();
   715         return -1;
   716     }
   717 
   718     palette = SDL_CurrentDisplay.palette;
   719     if (!palette->ncolors) {
   720         SDL_SetError("Display mode does not have a palette");
   721         return -1;
   722     }
   723 
   724     if (firstcolor < 0 || (firstcolor + ncolors) > palette->ncolors) {
   725         SDL_SetError("Palette indices are out of range");
   726         return -1;
   727     }
   728 
   729     SDL_memcpy(colors, &palette->colors[firstcolor],
   730                ncolors * sizeof(*colors));
   731     return 0;
   732 }
   733 
   734 SDL_WindowID
   735 SDL_CreateWindow(const char *title, int x, int y, int w, int h, Uint32 flags)
   736 {
   737     const Uint32 allowed_flags = (SDL_WINDOW_FULLSCREEN |
   738                                   SDL_WINDOW_OPENGL |
   739                                   SDL_WINDOW_BORDERLESS |
   740                                   SDL_WINDOW_RESIZABLE);
   741     SDL_VideoDisplay *display;
   742     SDL_Window window;
   743     int num_windows;
   744     SDL_Window *windows;
   745 
   746     if (!_this) {
   747         SDL_UninitializedVideo();
   748         return 0;
   749     }
   750 
   751     if ((flags & SDL_WINDOW_OPENGL) && !_this->GL_CreateContext) {
   752         SDL_SetError("No OpenGL support in video driver");
   753         return 0;
   754     }
   755 
   756     /* Fullscreen windows don't have any window decorations */
   757     if (flags & SDL_WINDOW_FULLSCREEN) {
   758         flags |= SDL_WINDOW_BORDERLESS;
   759         flags &= ~SDL_WINDOW_RESIZABLE;
   760     }
   761 
   762     SDL_zero(window);
   763     window.id = _this->next_object_id++;
   764     window.x = x;
   765     window.y = y;
   766     window.w = w;
   767     window.h = h;
   768     window.flags = (flags & allowed_flags);
   769     window.display = _this->current_display;
   770 
   771     if (_this->CreateWindow && _this->CreateWindow(_this, &window) < 0) {
   772         return 0;
   773     }
   774 
   775     display = &SDL_CurrentDisplay;
   776     num_windows = display->num_windows;
   777     windows =
   778         SDL_realloc(display->windows, (num_windows + 1) * sizeof(*windows));
   779     if (!windows) {
   780         if (_this->DestroyWindow) {
   781             _this->DestroyWindow(_this, &window);
   782         }
   783         return 0;
   784     }
   785     windows[num_windows] = window;
   786     display->windows = windows;
   787     display->num_windows++;
   788 
   789     if (title) {
   790         SDL_SetWindowTitle(window.id, title);
   791     }
   792     if (flags & SDL_WINDOW_MAXIMIZED) {
   793         SDL_MaximizeWindow(window.id);
   794     }
   795     if (flags & SDL_WINDOW_MINIMIZED) {
   796         SDL_MinimizeWindow(window.id);
   797     }
   798     if (flags & SDL_WINDOW_SHOWN) {
   799         SDL_ShowWindow(window.id);
   800     }
   801     if (flags & SDL_WINDOW_INPUT_GRABBED) {
   802         SDL_SetWindowGrab(window.id, 1);
   803     }
   804     return window.id;
   805 }
   806 
   807 SDL_WindowID
   808 SDL_CreateWindowFrom(const void *data)
   809 {
   810     SDL_VideoDisplay *display;
   811     SDL_Window window;
   812     int num_windows;
   813     SDL_Window *windows;
   814 
   815     if (!_this) {
   816         SDL_UninitializedVideo();
   817         return (0);
   818     }
   819 
   820     SDL_zero(window);
   821     window.id = _this->next_object_id++;
   822     window.display = _this->current_display;
   823 
   824     if (!_this->CreateWindowFrom ||
   825         _this->CreateWindowFrom(_this, &window, data) < 0) {
   826         return 0;
   827     }
   828 
   829     display = &SDL_CurrentDisplay;
   830     num_windows = display->num_windows;
   831     windows =
   832         SDL_realloc(display->windows, (num_windows + 1) * sizeof(*windows));
   833     if (!windows) {
   834         if (_this->DestroyWindow) {
   835             _this->DestroyWindow(_this, &window);
   836         }
   837         if (window.title) {
   838             SDL_free(window.title);
   839         }
   840         return 0;
   841     }
   842     windows[num_windows] = window;
   843     display->windows = windows;
   844     display->num_windows++;
   845 
   846     return window.id;
   847 }
   848 
   849 int
   850 SDL_RecreateWindow(SDL_Window * window, Uint32 flags)
   851 {
   852     char *title = window->title;
   853 
   854     if ((flags & SDL_WINDOW_OPENGL) && !_this->GL_CreateContext) {
   855         SDL_SetError("No OpenGL support in video driver");
   856         return -1;
   857     }
   858 
   859     if (_this->DestroyWindow) {
   860         _this->DestroyWindow(_this, window);
   861     }
   862 
   863     window->title = NULL;
   864     window->flags =
   865         (flags &
   866          ~(SDL_WINDOW_MAXIMIZED | SDL_WINDOW_MINIMIZED | SDL_WINDOW_SHOWN |
   867            SDL_WINDOW_INPUT_GRABBED));
   868 
   869     if (_this->CreateWindow && _this->CreateWindow(_this, window) < 0) {
   870         return -1;
   871     }
   872 
   873     if (title) {
   874         SDL_SetWindowTitle(window->id, title);
   875         SDL_free(title);
   876     }
   877     if (flags & SDL_WINDOW_MAXIMIZED) {
   878         SDL_MaximizeWindow(window->id);
   879     }
   880     if (flags & SDL_WINDOW_MINIMIZED) {
   881         SDL_MinimizeWindow(window->id);
   882     }
   883     if (flags & SDL_WINDOW_SHOWN) {
   884         SDL_ShowWindow(window->id);
   885     }
   886     if (flags & SDL_WINDOW_INPUT_GRABBED) {
   887         SDL_SetWindowGrab(window->id, 1);
   888     }
   889     return 0;
   890 }
   891 
   892 SDL_Window *
   893 SDL_GetWindowFromID(SDL_WindowID windowID)
   894 {
   895     int i, j;
   896 
   897     if (!_this) {
   898         SDL_UninitializedVideo();
   899         return NULL;
   900     }
   901 
   902     for (i = 0; i < _this->num_displays; ++i) {
   903         SDL_VideoDisplay *display = &_this->displays[i];
   904         for (j = 0; j < display->num_windows; ++j) {
   905             SDL_Window *window = &display->windows[j];
   906             if (window->id == windowID) {
   907                 return window;
   908             }
   909         }
   910     }
   911     return NULL;
   912 }
   913 
   914 SDL_VideoDisplay *
   915 SDL_GetDisplayFromWindow(SDL_Window * window)
   916 {
   917     if (!_this) {
   918         SDL_UninitializedVideo();
   919         return NULL;
   920     }
   921     if (!window) {
   922         return NULL;
   923     }
   924     return &_this->displays[window->display];
   925 }
   926 
   927 Uint32
   928 SDL_GetWindowFlags(SDL_WindowID windowID)
   929 {
   930     SDL_Window *window = SDL_GetWindowFromID(windowID);
   931 
   932     if (!window) {
   933         return 0;
   934     }
   935     return window->flags;
   936 }
   937 
   938 void
   939 SDL_SetWindowTitle(SDL_WindowID windowID, const char *title)
   940 {
   941     SDL_Window *window = SDL_GetWindowFromID(windowID);
   942     const char *last_title;
   943 
   944     if (!window || title == window->title) {
   945         return;
   946     }
   947 
   948     if (window->title) {
   949         SDL_free(window->title);
   950     }
   951     if (title) {
   952         window->title = SDL_strdup(title);
   953     } else {
   954         window->title = NULL;
   955     }
   956 
   957     if (_this->SetWindowTitle) {
   958         _this->SetWindowTitle(_this, window);
   959     }
   960 }
   961 
   962 const char *
   963 SDL_GetWindowTitle(SDL_WindowID windowID)
   964 {
   965     SDL_Window *window = SDL_GetWindowFromID(windowID);
   966 
   967     if (!window) {
   968         return NULL;
   969     }
   970     return window->title;
   971 }
   972 
   973 void
   974 SDL_SetWindowData(SDL_WindowID windowID, void *userdata)
   975 {
   976     SDL_Window *window = SDL_GetWindowFromID(windowID);
   977 
   978     if (!window) {
   979         return;
   980     }
   981     window->userdata = userdata;
   982 }
   983 
   984 void *
   985 SDL_GetWindowData(SDL_WindowID windowID)
   986 {
   987     SDL_Window *window = SDL_GetWindowFromID(windowID);
   988 
   989     if (!window) {
   990         return NULL;
   991     }
   992     return window->userdata;
   993 }
   994 
   995 void
   996 SDL_SetWindowPosition(SDL_WindowID windowID, int x, int y)
   997 {
   998     SDL_Window *window = SDL_GetWindowFromID(windowID);
   999     SDL_VideoDisplay *display = SDL_GetDisplayFromWindow(window);
  1000 
  1001     if (!window) {
  1002         return;
  1003     }
  1004 
  1005     if (x == SDL_WINDOWPOS_CENTERED) {
  1006         window->x = (display->current_mode.w - window->w) / 2;
  1007     } else if (x != SDL_WINDOWPOS_UNDEFINED) {
  1008         window->x = x;
  1009     }
  1010     if (y == SDL_WINDOWPOS_CENTERED) {
  1011         window->y = (display->current_mode.h - window->h) / 2;
  1012     } else if (y != SDL_WINDOWPOS_UNDEFINED) {
  1013         window->y = y;
  1014     }
  1015 
  1016     if (_this->SetWindowPosition) {
  1017         _this->SetWindowPosition(_this, window);
  1018     }
  1019 }
  1020 
  1021 void
  1022 SDL_GetWindowPosition(SDL_WindowID windowID, int *x, int *y)
  1023 {
  1024     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1025 
  1026     if (!window) {
  1027         return;
  1028     }
  1029     if (x) {
  1030         *x = window->x;
  1031     }
  1032     if (y) {
  1033         *y = window->y;
  1034     }
  1035 }
  1036 
  1037 void
  1038 SDL_SetWindowSize(SDL_WindowID windowID, int w, int h)
  1039 {
  1040     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1041 
  1042     if (!window) {
  1043         return;
  1044     }
  1045 
  1046     window->w = w;
  1047     window->h = h;
  1048 
  1049     if (_this->SetWindowSize) {
  1050         _this->SetWindowSize(_this, window);
  1051     }
  1052 }
  1053 
  1054 void
  1055 SDL_GetWindowSize(SDL_WindowID windowID, int *w, int *h)
  1056 {
  1057     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1058 
  1059     if (!window) {
  1060         return;
  1061     }
  1062     if (w) {
  1063         *w = window->w;
  1064     }
  1065     if (h) {
  1066         *h = window->h;
  1067     }
  1068 }
  1069 
  1070 void
  1071 SDL_ShowWindow(SDL_WindowID windowID)
  1072 {
  1073     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1074 
  1075     if (!window || (window->flags & SDL_WINDOW_SHOWN)) {
  1076         return;
  1077     }
  1078 
  1079     SDL_SendWindowEvent(window->id, SDL_WINDOWEVENT_SHOWN, 0, 0);
  1080 
  1081     if (_this->ShowWindow) {
  1082         _this->ShowWindow(_this, window);
  1083     }
  1084 }
  1085 
  1086 void
  1087 SDL_HideWindow(SDL_WindowID windowID)
  1088 {
  1089     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1090 
  1091     if (!window || !(window->flags & SDL_WINDOW_SHOWN)) {
  1092         return;
  1093     }
  1094 
  1095     SDL_SendWindowEvent(window->id, SDL_WINDOWEVENT_HIDDEN, 0, 0);
  1096 
  1097     if (_this->HideWindow) {
  1098         _this->HideWindow(_this, window);
  1099     }
  1100 }
  1101 
  1102 void
  1103 SDL_RaiseWindow(SDL_WindowID windowID)
  1104 {
  1105     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1106 
  1107     if (!window || !(window->flags & SDL_WINDOW_SHOWN)) {
  1108         return;
  1109     }
  1110 
  1111     if (_this->RaiseWindow) {
  1112         _this->RaiseWindow(_this, window);
  1113     }
  1114 }
  1115 
  1116 void
  1117 SDL_MaximizeWindow(SDL_WindowID windowID)
  1118 {
  1119     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1120 
  1121     if (!window || (window->flags & SDL_WINDOW_MAXIMIZED)) {
  1122         return;
  1123     }
  1124 
  1125     SDL_SendWindowEvent(window->id, SDL_WINDOWEVENT_MAXIMIZED, 0, 0);
  1126 
  1127     if (_this->MaximizeWindow) {
  1128         _this->MaximizeWindow(_this, window);
  1129     }
  1130 }
  1131 
  1132 void
  1133 SDL_MinimizeWindow(SDL_WindowID windowID)
  1134 {
  1135     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1136 
  1137     if (!window || (window->flags & SDL_WINDOW_MINIMIZED)) {
  1138         return;
  1139     }
  1140 
  1141     SDL_SendWindowEvent(window->id, SDL_WINDOWEVENT_MINIMIZED, 0, 0);
  1142 
  1143     if (_this->MinimizeWindow) {
  1144         _this->MinimizeWindow(_this, window);
  1145     }
  1146 }
  1147 
  1148 void
  1149 SDL_RestoreWindow(SDL_WindowID windowID)
  1150 {
  1151     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1152 
  1153     if (!window
  1154         || (window->flags & (SDL_WINDOW_MAXIMIZED | SDL_WINDOW_MINIMIZED))) {
  1155         return;
  1156     }
  1157 
  1158     SDL_SendWindowEvent(window->id, SDL_WINDOWEVENT_RESTORED, 0, 0);
  1159 
  1160     if (_this->RestoreWindow) {
  1161         _this->RestoreWindow(_this, window);
  1162     }
  1163 }
  1164 
  1165 int
  1166 SDL_SetWindowFullscreen(SDL_WindowID windowID, int fullscreen)
  1167 {
  1168     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1169 
  1170     if (!window) {
  1171         return -1;
  1172     }
  1173 
  1174     if (fullscreen) {
  1175         fullscreen = SDL_WINDOW_FULLSCREEN;
  1176     }
  1177     if ((window->flags & SDL_WINDOW_FULLSCREEN) == fullscreen) {
  1178         return 0;
  1179     }
  1180 
  1181     if (fullscreen) {
  1182         window->flags |= SDL_WINDOW_FULLSCREEN;
  1183 
  1184         if (FULLSCREEN_VISIBLE(window)) {
  1185             SDL_VideoDisplay *display = SDL_GetDisplayFromWindow(window);
  1186 
  1187             /* Hide any other fullscreen windows */
  1188             int i;
  1189             for (i = 0; i < display->num_windows; ++i) {
  1190                 SDL_Window *other = &display->windows[i];
  1191                 if (other->id != windowID && FULLSCREEN_VISIBLE(other)) {
  1192                     SDL_MinimizeWindow(other->id);
  1193                 }
  1194             }
  1195 
  1196             SDL_SetDisplayMode(&display->fullscreen_mode);
  1197         }
  1198     } else {
  1199         window->flags &= ~SDL_WINDOW_FULLSCREEN;
  1200 
  1201         if (FULLSCREEN_VISIBLE(window)) {
  1202             SDL_SetDisplayMode(NULL);
  1203         }
  1204     }
  1205     return 0;
  1206 }
  1207 
  1208 void
  1209 SDL_SetWindowGrab(SDL_WindowID windowID, int mode)
  1210 {
  1211     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1212 
  1213     if (!window || (!!mode == !!(window->flags & SDL_WINDOW_INPUT_GRABBED))) {
  1214         return;
  1215     }
  1216 
  1217     if (mode) {
  1218         window->flags |= SDL_WINDOW_INPUT_GRABBED;
  1219     } else {
  1220         window->flags &= ~SDL_WINDOW_INPUT_GRABBED;
  1221     }
  1222 
  1223     if ((window->flags & SDL_WINDOW_INPUT_FOCUS) && _this->SetWindowGrab) {
  1224         _this->SetWindowGrab(_this, window);
  1225     }
  1226 }
  1227 
  1228 int
  1229 SDL_GetWindowGrab(SDL_WindowID windowID)
  1230 {
  1231     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1232 
  1233     if (!window) {
  1234         return 0;
  1235     }
  1236 
  1237     return ((window->flags & SDL_WINDOW_INPUT_GRABBED) != 0);
  1238 }
  1239 
  1240 void
  1241 SDL_OnWindowShown(SDL_Window * window)
  1242 {
  1243 }
  1244 
  1245 void
  1246 SDL_OnWindowHidden(SDL_Window * window)
  1247 {
  1248 }
  1249 
  1250 void
  1251 SDL_OnWindowResized(SDL_Window * window)
  1252 {
  1253     SDL_Renderer *renderer = window->renderer;
  1254 
  1255     if (renderer && renderer->DisplayModeChanged) {
  1256         renderer->DisplayModeChanged(renderer);
  1257     }
  1258 }
  1259 
  1260 void
  1261 SDL_OnWindowFocusGained(SDL_Window * window)
  1262 {
  1263     SDL_VideoDisplay *display = SDL_GetDisplayFromWindow(window);
  1264 
  1265     if (window->flags & SDL_WINDOW_FULLSCREEN) {
  1266         SDL_SetDisplayMode(&display->fullscreen_mode);
  1267     }
  1268     if (display->gamma && _this->SetDisplayGammaRamp) {
  1269         _this->SetDisplayGammaRamp(_this, display->gamma);
  1270     }
  1271     if ((window->flags & SDL_WINDOW_INPUT_GRABBED) && _this->SetWindowGrab) {
  1272         _this->SetWindowGrab(_this, window);
  1273     }
  1274 }
  1275 
  1276 void
  1277 SDL_OnWindowFocusLost(SDL_Window * window)
  1278 {
  1279     SDL_VideoDisplay *display = SDL_GetDisplayFromWindow(window);
  1280 
  1281     if (window->flags & SDL_WINDOW_FULLSCREEN) {
  1282         SDL_MinimizeWindow(window->id);
  1283         SDL_SetDisplayMode(NULL);
  1284     }
  1285     if (display->gamma && _this->SetDisplayGammaRamp) {
  1286         _this->SetDisplayGammaRamp(_this, display->saved_gamma);
  1287     }
  1288     if ((window->flags & SDL_WINDOW_INPUT_GRABBED) && _this->SetWindowGrab) {
  1289         _this->SetWindowGrab(_this, window);
  1290     }
  1291 }
  1292 
  1293 SDL_WindowID
  1294 SDL_GetFocusWindow(void)
  1295 {
  1296     SDL_VideoDisplay *display;
  1297     int i;
  1298 
  1299     if (!_this) {
  1300         return 0;
  1301     }
  1302 
  1303     display = &SDL_CurrentDisplay;
  1304     for (i = 0; i < display->num_windows; ++i) {
  1305         SDL_Window *window = &display->windows[i];
  1306 
  1307         if (window->flags & SDL_WINDOW_INPUT_FOCUS) {
  1308             return window->id;
  1309         }
  1310     }
  1311     return 0;
  1312 }
  1313 
  1314 void
  1315 SDL_DestroyWindow(SDL_WindowID windowID)
  1316 {
  1317     int i, j;
  1318 
  1319     if (!_this) {
  1320         return;
  1321     }
  1322 
  1323     /* Restore video mode, etc. */
  1324     SDL_SendWindowEvent(windowID, SDL_WINDOWEVENT_FOCUS_LOST, 0, 0);
  1325 
  1326     for (i = 0; i < _this->num_displays; ++i) {
  1327         SDL_VideoDisplay *display = &_this->displays[i];
  1328         for (j = 0; j < display->num_windows; ++j) {
  1329             SDL_Window *window = &display->windows[j];
  1330             if (window->id != windowID) {
  1331                 continue;
  1332             }
  1333             if (window->renderer) {
  1334                 SDL_DestroyRenderer(window->id);
  1335             }
  1336             if (_this->DestroyWindow) {
  1337                 _this->DestroyWindow(_this, window);
  1338             }
  1339             if (window->title) {
  1340                 SDL_free(window->title);
  1341             }
  1342             if (j != display->num_windows - 1) {
  1343                 SDL_memcpy(&display->windows[i],
  1344                            &display->windows[i + 1],
  1345                            (display->num_windows - i - 1) * sizeof(*window));
  1346             }
  1347             --display->num_windows;
  1348             return;
  1349         }
  1350     }
  1351 }
  1352 
  1353 void
  1354 SDL_AddRenderDriver(int displayIndex, const SDL_RenderDriver * driver)
  1355 {
  1356     SDL_VideoDisplay *display = &_this->displays[displayIndex];
  1357     SDL_RenderDriver *render_drivers;
  1358 
  1359     render_drivers =
  1360         SDL_realloc(display->render_drivers,
  1361                     (display->num_render_drivers +
  1362                      1) * sizeof(*render_drivers));
  1363     if (render_drivers) {
  1364         render_drivers[display->num_render_drivers] = *driver;
  1365         display->render_drivers = render_drivers;
  1366         display->num_render_drivers++;
  1367     }
  1368 }
  1369 
  1370 int
  1371 SDL_GetNumRenderDrivers(void)
  1372 {
  1373     if (_this) {
  1374         return SDL_CurrentDisplay.num_render_drivers;
  1375     }
  1376     return 0;
  1377 }
  1378 
  1379 int
  1380 SDL_GetRenderDriverInfo(int index, SDL_RendererInfo * info)
  1381 {
  1382     if (!_this) {
  1383         SDL_UninitializedVideo();
  1384         return -1;
  1385     }
  1386 
  1387     if (index < 0 || index >= SDL_GetNumRenderDrivers()) {
  1388         SDL_SetError("index must be in the range of 0 - %d",
  1389                      SDL_GetNumRenderDrivers() - 1);
  1390         return -1;
  1391     }
  1392     *info = SDL_CurrentDisplay.render_drivers[index].info;
  1393     return 0;
  1394 }
  1395 
  1396 int
  1397 SDL_CreateRenderer(SDL_WindowID windowID, int index, Uint32 flags)
  1398 {
  1399     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1400 
  1401     if (!window) {
  1402         return 0;
  1403     }
  1404 
  1405     if (index < 0) {
  1406         const char *override = SDL_getenv("SDL_VIDEO_RENDERER");
  1407         int n = SDL_GetNumRenderDrivers();
  1408         for (index = 0; index < n; ++index) {
  1409             SDL_RenderDriver *driver =
  1410                 &SDL_CurrentDisplay.render_drivers[index];
  1411 
  1412             if (override) {
  1413                 if (SDL_strcasecmp(override, driver->info.name) == 0) {
  1414                     break;
  1415                 }
  1416             } else {
  1417                 if ((driver->info.flags & flags) == flags) {
  1418                     break;
  1419                 }
  1420             }
  1421         }
  1422         if (index == n) {
  1423             SDL_SetError("Couldn't find matching render driver");
  1424             return -1;
  1425         }
  1426     }
  1427 
  1428     if (index >= SDL_GetNumRenderDrivers()) {
  1429         SDL_SetError("index must be -1 or in the range of 0 - %d",
  1430                      SDL_GetNumRenderDrivers() - 1);
  1431         return -1;
  1432     }
  1433 
  1434     /* Free any existing renderer */
  1435     SDL_DestroyRenderer(windowID);
  1436 
  1437     /* Create a new renderer instance */
  1438     window->renderer =
  1439         SDL_CurrentDisplay.render_drivers[index].CreateRenderer(window,
  1440                                                                 flags);
  1441     SDL_SelectRenderer(window->id);
  1442 
  1443     return 0;
  1444 }
  1445 
  1446 int
  1447 SDL_SelectRenderer(SDL_WindowID windowID)
  1448 {
  1449     SDL_Window *window = SDL_GetWindowFromID(windowID);
  1450     SDL_Renderer *renderer;
  1451 
  1452     if (!window || !window->renderer) {
  1453         return -1;
  1454     }
  1455     renderer = window->renderer;
  1456     if (renderer && renderer->ActivateRenderer) {
  1457         if (renderer->ActivateRenderer(renderer) < 0) {
  1458             return -1;
  1459         }
  1460     }
  1461     SDL_CurrentDisplay.current_renderer = renderer;
  1462     return 0;
  1463 }
  1464 
  1465 int
  1466 SDL_GetRendererInfo(SDL_RendererInfo * info)
  1467 {
  1468     if (!_this) {
  1469         SDL_UninitializedVideo();
  1470         return -1;
  1471     }
  1472 
  1473     if (!SDL_CurrentDisplay.current_renderer) {
  1474         SDL_SetError("There is no current renderer");
  1475         return -1;
  1476     }
  1477     *info = SDL_CurrentDisplay.current_renderer->info;
  1478     return 0;
  1479 }
  1480 
  1481 SDL_TextureID
  1482 SDL_CreateTexture(Uint32 format, int access, int w, int h)
  1483 {
  1484     int hash;
  1485     SDL_Renderer *renderer;
  1486     SDL_Texture *texture;
  1487 
  1488     if (!_this) {
  1489         SDL_UninitializedVideo();
  1490         return 0;
  1491     }
  1492 
  1493     renderer = SDL_CurrentDisplay.current_renderer;
  1494     if (!renderer || !renderer->CreateTexture) {
  1495         return 0;
  1496     }
  1497 
  1498     texture = (SDL_Texture *) SDL_calloc(1, sizeof(*texture));
  1499     if (!texture) {
  1500         SDL_OutOfMemory();
  1501         return 0;
  1502     }
  1503 
  1504     texture->id = _this->next_object_id++;
  1505     texture->format = format;
  1506     texture->access = access;
  1507     texture->w = w;
  1508     texture->h = h;
  1509     texture->r = 255;
  1510     texture->g = 255;
  1511     texture->b = 255;
  1512     texture->a = 255;
  1513     texture->renderer = renderer;
  1514 
  1515     if (renderer->CreateTexture(renderer, texture) < 0) {
  1516         if (renderer->DestroyTexture) {
  1517             renderer->DestroyTexture(renderer, texture);
  1518         }
  1519         SDL_free(texture);
  1520         return 0;
  1521     }
  1522 
  1523     hash = (texture->id % SDL_arraysize(SDL_CurrentDisplay.textures));
  1524     texture->next = SDL_CurrentDisplay.textures[hash];
  1525     SDL_CurrentDisplay.textures[hash] = texture;
  1526 
  1527     return texture->id;
  1528 }
  1529 
  1530 SDL_TextureID
  1531 SDL_CreateTextureFromSurface(Uint32 format, int access, SDL_Surface * surface)
  1532 {
  1533     SDL_TextureID textureID;
  1534     Uint32 surface_flags = surface->flags;
  1535     SDL_PixelFormat *fmt = surface->format;
  1536     Uint8 alpha;
  1537     SDL_Rect bounds;
  1538     SDL_Surface dst;
  1539     int bpp;
  1540     Uint32 Rmask, Gmask, Bmask, Amask;
  1541 
  1542     if (!surface) {
  1543         SDL_SetError("SDL_CreateTextureFromSurface() passed NULL surface");
  1544         return 0;
  1545     }
  1546 
  1547     if (format) {
  1548         if (!SDL_PixelFormatEnumToMasks
  1549             (format, &bpp, &Rmask, &Gmask, &Bmask, &Amask)) {
  1550             SDL_SetError("Unknown pixel format");
  1551             return 0;
  1552         }
  1553     } else {
  1554         if (fmt->Amask || !(surface_flags & (SDL_SRCCOLORKEY | SDL_SRCALPHA))) {
  1555             bpp = fmt->BitsPerPixel;
  1556             Rmask = fmt->Rmask;
  1557             Gmask = fmt->Gmask;
  1558             Bmask = fmt->Bmask;
  1559             Amask = fmt->Amask;
  1560         } else {
  1561             /* Need a format with alpha */
  1562             bpp = 32;
  1563             Rmask = 0x00FF0000;
  1564             Gmask = 0x0000FF00;
  1565             Bmask = 0x000000FF;
  1566             Amask = 0xFF000000;
  1567         }
  1568         format = SDL_MasksToPixelFormatEnum(bpp, Rmask, Gmask, Bmask, Amask);
  1569         if (!format) {
  1570             SDL_SetError("Unknown pixel format");
  1571             return 0;
  1572         }
  1573     }
  1574 
  1575     textureID = SDL_CreateTexture(format, access, surface->w, surface->h);
  1576     if (!textureID) {
  1577         return 0;
  1578     }
  1579 
  1580     /* Set up a destination surface for the texture update */
  1581     SDL_zero(dst);
  1582     dst.format = SDL_AllocFormat(bpp, Rmask, Gmask, Bmask, Amask);
  1583     if (!dst.format) {
  1584         SDL_DestroyTexture(textureID);
  1585         return 0;
  1586     }
  1587     dst.w = surface->w;
  1588     dst.h = surface->h;
  1589     if (SDL_LockTexture(textureID, NULL, 1, &dst.pixels, &dst.pitch) == 0) {
  1590         dst.flags |= SDL_PREALLOC;
  1591     } else {
  1592         dst.pitch = SDL_CalculatePitch(&dst);
  1593         dst.pixels = SDL_malloc(dst.h * dst.pitch);
  1594         if (!dst.pixels) {
  1595             SDL_DestroyTexture(textureID);
  1596             SDL_FreeFormat(dst.format);
  1597             SDL_OutOfMemory();
  1598             return 0;
  1599         }
  1600     }
  1601 
  1602     /* Copy the palette if any */
  1603     if (SDL_ISPIXELFORMAT_INDEXED(format)) {
  1604         if (fmt->palette) {
  1605             SDL_SetTexturePalette(textureID, fmt->palette->colors, 0,
  1606                                   fmt->palette->ncolors);
  1607             SDL_SetSurfacePalette(&dst, fmt->palette);
  1608         } else {
  1609             dst.format->palette =
  1610                 SDL_AllocPalette((1 << SDL_BITSPERPIXEL(format)));
  1611             if (!dst.format->palette) {
  1612                 SDL_DestroyTexture(textureID);
  1613                 SDL_FreeFormat(dst.format);
  1614                 return 0;
  1615             }
  1616             SDL_DitherColors(dst.format->palette->colors,
  1617                              SDL_BITSPERPIXEL(format));
  1618         }
  1619     }
  1620 
  1621     /* Make the texture transparent if the surface has colorkey */
  1622     if (surface_flags & SDL_SRCCOLORKEY) {
  1623         int row;
  1624         int length = dst.w * dst.format->BytesPerPixel;
  1625         Uint8 *p = (Uint8 *) dst.pixels;
  1626         for (row = 0; row < dst.h; ++row) {
  1627             SDL_memset(p, 0, length);
  1628             p += dst.pitch;
  1629         }
  1630     }
  1631 
  1632     /* Copy over the alpha channel */
  1633     if (surface_flags & SDL_SRCALPHA) {
  1634         if (fmt->Amask) {
  1635             surface->flags &= ~SDL_SRCALPHA;
  1636         } else {
  1637             /* FIXME: Need to make sure the texture has an alpha channel
  1638              *        and copy 'alpha' into the texture alpha channel.
  1639              */
  1640             alpha = surface->format->alpha;
  1641             SDL_SetAlpha(surface, 0, 0);
  1642         }
  1643     }
  1644 
  1645     /* Copy over the image data */
  1646     bounds.x = 0;
  1647     bounds.y = 0;
  1648     bounds.w = surface->w;
  1649     bounds.h = surface->h;
  1650     SDL_LowerBlit(surface, &bounds, &dst, &bounds);
  1651 
  1652     /* Clean up the original surface */
  1653     if ((surface_flags & SDL_SRCALPHA) == SDL_SRCALPHA) {
  1654         Uint32 aflags = surface_flags & (SDL_SRCALPHA | SDL_RLEACCELOK);
  1655         if (fmt->Amask) {
  1656             surface->flags |= SDL_SRCALPHA;
  1657         } else {
  1658             SDL_SetAlpha(surface, aflags, alpha);
  1659         }
  1660     }
  1661 
  1662     /* Update the texture */
  1663     if (dst.flags & SDL_PREALLOC) {
  1664         SDL_UnlockTexture(textureID);
  1665     } else {
  1666         SDL_UpdateTexture(textureID, NULL, dst.pixels, dst.pitch);
  1667         SDL_free(dst.pixels);
  1668     }
  1669     SDL_FreeFormat(dst.format);
  1670 
  1671     return textureID;
  1672 }
  1673 
  1674 static __inline__ SDL_Texture *
  1675 SDL_GetTextureFromID(SDL_TextureID textureID)
  1676 {
  1677     int hash;
  1678     SDL_Texture *texture;
  1679 
  1680     if (!_this) {
  1681         return NULL;
  1682     }
  1683 
  1684     hash = (textureID % SDL_arraysize(SDL_CurrentDisplay.textures));
  1685     for (texture = SDL_CurrentDisplay.textures[hash]; texture;
  1686          texture = texture->next) {
  1687         if (texture->id == textureID) {
  1688             return texture;
  1689         }
  1690     }
  1691     return NULL;
  1692 }
  1693 
  1694 int
  1695 SDL_QueryTexture(SDL_TextureID textureID, Uint32 * format, int *access,
  1696                  int *w, int *h)
  1697 {
  1698     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1699 
  1700     if (!texture) {
  1701         return -1;
  1702     }
  1703 
  1704     if (format) {
  1705         *format = texture->format;
  1706     }
  1707     if (access) {
  1708         *access = texture->access;
  1709     }
  1710     if (w) {
  1711         *w = texture->w;
  1712     }
  1713     if (h) {
  1714         *h = texture->h;
  1715     }
  1716     return 0;
  1717 }
  1718 
  1719 int
  1720 SDL_QueryTexturePixels(SDL_TextureID textureID, void **pixels, int *pitch)
  1721 {
  1722     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1723     SDL_Renderer *renderer;
  1724 
  1725     if (!texture) {
  1726         return -1;
  1727     }
  1728 
  1729     renderer = texture->renderer;
  1730     if (!renderer->QueryTexturePixels) {
  1731         return -1;
  1732     }
  1733     return renderer->QueryTexturePixels(renderer, texture, pixels, pitch);
  1734 }
  1735 
  1736 int
  1737 SDL_SetTexturePalette(SDL_TextureID textureID, const SDL_Color * colors,
  1738                       int firstcolor, int ncolors)
  1739 {
  1740     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1741     SDL_Renderer *renderer;
  1742 
  1743     if (!texture) {
  1744         return -1;
  1745     }
  1746 
  1747     renderer = texture->renderer;
  1748     if (!renderer->SetTexturePalette) {
  1749         return -1;
  1750     }
  1751     return renderer->SetTexturePalette(renderer, texture, colors, firstcolor,
  1752                                        ncolors);
  1753 }
  1754 
  1755 int
  1756 SDL_GetTexturePalette(SDL_TextureID textureID, SDL_Color * colors,
  1757                       int firstcolor, int ncolors)
  1758 {
  1759     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1760     SDL_Renderer *renderer;
  1761 
  1762     if (!texture) {
  1763         return -1;
  1764     }
  1765 
  1766     renderer = texture->renderer;
  1767     if (!renderer->GetTexturePalette) {
  1768         return -1;
  1769     }
  1770     return renderer->GetTexturePalette(renderer, texture, colors, firstcolor,
  1771                                        ncolors);
  1772 }
  1773 
  1774 int
  1775 SDL_SetTextureColorMod(SDL_TextureID textureID, Uint8 r, Uint8 g, Uint8 b)
  1776 {
  1777     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1778     SDL_Renderer *renderer;
  1779 
  1780     if (!texture) {
  1781         return -1;
  1782     }
  1783 
  1784     renderer = texture->renderer;
  1785     if (!renderer->SetTextureColorMod) {
  1786         return -1;
  1787     }
  1788     if (r < 255 || g < 255 || b < 255) {
  1789         texture->modMode |= SDL_TEXTUREMODULATE_COLOR;
  1790     } else {
  1791         texture->modMode &= ~SDL_TEXTUREMODULATE_COLOR;
  1792     }
  1793     texture->r = r;
  1794     texture->g = g;
  1795     texture->b = b;
  1796     return renderer->SetTextureColorMod(renderer, texture);
  1797 }
  1798 
  1799 int
  1800 SDL_GetTextureColorMod(SDL_TextureID textureID, Uint8 * r, Uint8 * g,
  1801                        Uint8 * b)
  1802 {
  1803     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1804     SDL_Renderer *renderer;
  1805 
  1806     if (!texture) {
  1807         return -1;
  1808     }
  1809 
  1810     renderer = texture->renderer;
  1811     if (r) {
  1812         *r = texture->r;
  1813     }
  1814     if (g) {
  1815         *g = texture->g;
  1816     }
  1817     if (b) {
  1818         *b = texture->b;
  1819     }
  1820     return 0;
  1821 }
  1822 
  1823 int
  1824 SDL_SetTextureAlphaMod(SDL_TextureID textureID, Uint8 alpha)
  1825 {
  1826     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1827     SDL_Renderer *renderer;
  1828 
  1829     if (!texture) {
  1830         return -1;
  1831     }
  1832 
  1833     renderer = texture->renderer;
  1834     if (!renderer->SetTextureAlphaMod) {
  1835         return -1;
  1836     }
  1837     if (alpha < 255) {
  1838         texture->modMode |= SDL_TEXTUREMODULATE_ALPHA;
  1839     } else {
  1840         texture->modMode &= ~SDL_TEXTUREMODULATE_ALPHA;
  1841     }
  1842     texture->a = alpha;
  1843     return renderer->SetTextureAlphaMod(renderer, texture);
  1844 }
  1845 
  1846 int
  1847 SDL_GetTextureAlphaMod(SDL_TextureID textureID, Uint8 * alpha)
  1848 {
  1849     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1850     SDL_Renderer *renderer;
  1851 
  1852     if (!texture) {
  1853         return -1;
  1854     }
  1855 
  1856     if (alpha) {
  1857         *alpha = texture->a;
  1858     }
  1859     return 0;
  1860 }
  1861 
  1862 int
  1863 SDL_SetTextureBlendMode(SDL_TextureID textureID, int blendMode)
  1864 {
  1865     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1866     SDL_Renderer *renderer;
  1867 
  1868     if (!texture) {
  1869         return -1;
  1870     }
  1871 
  1872     renderer = texture->renderer;
  1873     if (!renderer->SetTextureBlendMode) {
  1874         return -1;
  1875     }
  1876     texture->blendMode = blendMode;
  1877     return renderer->SetTextureBlendMode(renderer, texture);
  1878 }
  1879 
  1880 int
  1881 SDL_GetTextureBlendMode(SDL_TextureID textureID, int *blendMode)
  1882 {
  1883     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1884     SDL_Renderer *renderer;
  1885 
  1886     if (!texture) {
  1887         return -1;
  1888     }
  1889 
  1890     if (blendMode) {
  1891         *blendMode = texture->blendMode;
  1892     }
  1893     return 0;
  1894 }
  1895 
  1896 int
  1897 SDL_SetTextureScaleMode(SDL_TextureID textureID, int scaleMode)
  1898 {
  1899     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1900     SDL_Renderer *renderer;
  1901 
  1902     if (!texture) {
  1903         return -1;
  1904     }
  1905 
  1906     renderer = texture->renderer;
  1907     if (!renderer->SetTextureScaleMode) {
  1908         return -1;
  1909     }
  1910     texture->scaleMode = scaleMode;
  1911     return renderer->SetTextureScaleMode(renderer, texture);
  1912 }
  1913 
  1914 int
  1915 SDL_GetTextureScaleMode(SDL_TextureID textureID, int *scaleMode)
  1916 {
  1917     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1918     SDL_Renderer *renderer;
  1919 
  1920     if (!texture) {
  1921         return -1;
  1922     }
  1923 
  1924     if (scaleMode) {
  1925         *scaleMode = texture->scaleMode;
  1926     }
  1927     return 0;
  1928 }
  1929 
  1930 int
  1931 SDL_UpdateTexture(SDL_TextureID textureID, const SDL_Rect * rect,
  1932                   const void *pixels, int pitch)
  1933 {
  1934     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1935     SDL_Renderer *renderer;
  1936     SDL_Rect full_rect;
  1937 
  1938     if (!texture) {
  1939         return -1;
  1940     }
  1941 
  1942     renderer = texture->renderer;
  1943     if (!renderer->UpdateTexture) {
  1944         return -1;
  1945     }
  1946 
  1947     if (!rect) {
  1948         full_rect.x = 0;
  1949         full_rect.y = 0;
  1950         full_rect.w = texture->w;
  1951         full_rect.h = texture->h;
  1952         rect = &full_rect;
  1953     }
  1954 
  1955     return renderer->UpdateTexture(renderer, texture, rect, pixels, pitch);
  1956 }
  1957 
  1958 int
  1959 SDL_LockTexture(SDL_TextureID textureID, const SDL_Rect * rect, int markDirty,
  1960                 void **pixels, int *pitch)
  1961 {
  1962     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1963     SDL_Renderer *renderer;
  1964     SDL_Rect full_rect;
  1965 
  1966     if (!texture) {
  1967         return -1;
  1968     }
  1969 
  1970     renderer = texture->renderer;
  1971     if (!renderer->LockTexture) {
  1972         return -1;
  1973     }
  1974 
  1975     if (!rect) {
  1976         full_rect.x = 0;
  1977         full_rect.y = 0;
  1978         full_rect.w = texture->w;
  1979         full_rect.h = texture->h;
  1980         rect = &full_rect;
  1981     }
  1982 
  1983     return renderer->LockTexture(renderer, texture, rect, markDirty, pixels,
  1984                                  pitch);
  1985 }
  1986 
  1987 void
  1988 SDL_UnlockTexture(SDL_TextureID textureID)
  1989 {
  1990     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  1991     SDL_Renderer *renderer;
  1992 
  1993     if (!texture) {
  1994         return;
  1995     }
  1996 
  1997     renderer = texture->renderer;
  1998     if (!renderer->UnlockTexture) {
  1999         return;
  2000     }
  2001     renderer->UnlockTexture(renderer, texture);
  2002 }
  2003 
  2004 void
  2005 SDL_DirtyTexture(SDL_TextureID textureID, int numrects,
  2006                  const SDL_Rect * rects)
  2007 {
  2008     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  2009     SDL_Renderer *renderer;
  2010 
  2011     if (!texture) {
  2012         return;
  2013     }
  2014 
  2015     renderer = texture->renderer;
  2016     if (!renderer->DirtyTexture) {
  2017         return;
  2018     }
  2019     renderer->DirtyTexture(renderer, texture, numrects, rects);
  2020 }
  2021 
  2022 int
  2023 SDL_RenderFill(Uint8 r, Uint8 g, Uint8 b, Uint8 a, const SDL_Rect * rect)
  2024 {
  2025     SDL_Renderer *renderer;
  2026     SDL_Window *window;
  2027     SDL_Rect real_rect;
  2028 
  2029     if (!_this) {
  2030         SDL_UninitializedVideo();
  2031         return -1;
  2032     }
  2033 
  2034     renderer = SDL_CurrentDisplay.current_renderer;
  2035     if (!renderer || !renderer->RenderFill) {
  2036         return -1;
  2037     }
  2038 
  2039     window = SDL_GetWindowFromID(renderer->window);
  2040     real_rect.x = 0;
  2041     real_rect.y = 0;
  2042     real_rect.w = window->w;
  2043     real_rect.h = window->h;
  2044     if (rect) {
  2045         if (!SDL_IntersectRect(rect, &real_rect, &real_rect)) {
  2046             return 0;
  2047         }
  2048     }
  2049 
  2050     return renderer->RenderFill(renderer, r, g, b, a, &real_rect);
  2051 }
  2052 
  2053 int
  2054 SDL_RenderCopy(SDL_TextureID textureID, const SDL_Rect * srcrect,
  2055                const SDL_Rect * dstrect)
  2056 {
  2057     SDL_Texture *texture = SDL_GetTextureFromID(textureID);
  2058     SDL_Renderer *renderer;
  2059     SDL_Window *window;
  2060     SDL_Rect real_srcrect;
  2061     SDL_Rect real_dstrect;
  2062 
  2063     if (!texture || texture->renderer != SDL_CurrentDisplay.current_renderer) {
  2064         return -1;
  2065     }
  2066 
  2067     renderer = SDL_CurrentDisplay.current_renderer;
  2068     if (!renderer || !renderer->RenderCopy) {
  2069         return -1;
  2070     }
  2071 
  2072     window = SDL_GetWindowFromID(renderer->window);
  2073     if (srcrect) {
  2074         real_srcrect = *srcrect;
  2075     } else {
  2076         real_srcrect.x = 0;
  2077         real_srcrect.y = 0;
  2078         real_srcrect.w = texture->w;
  2079         real_srcrect.h = texture->h;
  2080     }
  2081     if (dstrect) {
  2082         real_dstrect = *dstrect;
  2083     } else {
  2084         real_dstrect.x = 0;
  2085         real_dstrect.y = 0;
  2086         real_dstrect.w = window->w;
  2087         real_dstrect.h = window->h;
  2088     }
  2089 
  2090     return renderer->RenderCopy(renderer, texture, &real_srcrect,
  2091                                 &real_dstrect);
  2092 }
  2093 
  2094 void
  2095 SDL_RenderPresent(void)
  2096 {
  2097     SDL_Renderer *renderer;
  2098 
  2099     if (!_this) {
  2100         SDL_UninitializedVideo();
  2101         return;
  2102     }
  2103 
  2104     renderer = SDL_CurrentDisplay.current_renderer;
  2105     if (!renderer || !renderer->RenderPresent) {
  2106         return;
  2107     }
  2108     renderer->RenderPresent(renderer);
  2109 }
  2110 
  2111 void
  2112 SDL_DestroyTexture(SDL_TextureID textureID)
  2113 {
  2114     int hash;
  2115     SDL_Texture *prev, *texture;
  2116     SDL_Renderer *renderer;
  2117 
  2118     if (!_this) {
  2119         SDL_UninitializedVideo();
  2120         return;
  2121     }
  2122 
  2123     /* Look up the texture in the hash table */
  2124     hash = (textureID % SDL_arraysize(SDL_CurrentDisplay.textures));
  2125     prev = NULL;
  2126     for (texture = SDL_CurrentDisplay.textures[hash]; texture;
  2127          prev = texture, texture = texture->next) {
  2128         if (texture->id == textureID) {
  2129             break;
  2130         }
  2131     }
  2132     if (!texture) {
  2133         return;
  2134     }
  2135 
  2136     /* Unlink the texture from the list */
  2137     if (prev) {
  2138         prev->next = texture->next;
  2139     } else {
  2140         SDL_CurrentDisplay.textures[hash] = texture->next;
  2141     }
  2142 
  2143     /* Free the texture */
  2144     renderer = texture->renderer;
  2145     renderer->DestroyTexture(renderer, texture);
  2146     SDL_free(texture);
  2147 }
  2148 
  2149 void
  2150 SDL_DestroyRenderer(SDL_WindowID windowID)
  2151 {
  2152     SDL_Window *window = SDL_GetWindowFromID(windowID);
  2153     SDL_Renderer *renderer;
  2154     int i;
  2155 
  2156     if (!window) {
  2157         return;
  2158     }
  2159 
  2160     renderer = window->renderer;
  2161     if (!renderer) {
  2162         return;
  2163     }
  2164 
  2165     /* Free existing textures for this renderer */
  2166     for (i = 0; i < SDL_arraysize(SDL_CurrentDisplay.textures); ++i) {
  2167         SDL_Texture *texture;
  2168         SDL_Texture *prev = NULL;
  2169         SDL_Texture *next;
  2170         for (texture = SDL_CurrentDisplay.textures[i]; texture;
  2171              texture = next) {
  2172             next = texture->next;
  2173             if (texture->renderer == renderer) {
  2174                 if (prev) {
  2175                     prev->next = next;
  2176                 } else {
  2177                     SDL_CurrentDisplay.textures[i] = next;
  2178                 }
  2179                 renderer->DestroyTexture(renderer, texture);
  2180                 SDL_free(texture);
  2181             } else {
  2182                 prev = texture;
  2183             }
  2184         }
  2185     }
  2186 
  2187     /* Free the renderer instance */
  2188     renderer->DestroyRenderer(renderer);
  2189 
  2190     /* Clear references */
  2191     window->renderer = NULL;
  2192     if (SDL_CurrentDisplay.current_renderer == renderer) {
  2193         SDL_CurrentDisplay.current_renderer = NULL;
  2194     }
  2195 }
  2196 
  2197 void
  2198 SDL_VideoQuit(void)
  2199 {
  2200     int i, j;
  2201 
  2202     if (!_this) {
  2203         return;
  2204     }
  2205 
  2206     /* Halt event processing before doing anything else */
  2207     SDL_StopEventLoop();
  2208 
  2209     /* Clean up the system video */
  2210     for (i = _this->num_displays; i--;) {
  2211         SDL_VideoDisplay *display = &_this->displays[i];
  2212         for (j = display->num_windows; j--;) {
  2213             SDL_DestroyWindow(display->windows[i].id);
  2214         }
  2215         if (display->windows) {
  2216             SDL_free(display->windows);
  2217             display->windows = NULL;
  2218         }
  2219         display->num_windows = 0;
  2220     }
  2221     _this->VideoQuit(_this);
  2222 
  2223     for (i = _this->num_displays; i--;) {
  2224         SDL_VideoDisplay *display = &_this->displays[i];
  2225         for (j = display->num_display_modes; j--;) {
  2226             if (display->display_modes[j].driverdata) {
  2227                 SDL_free(display->display_modes[j].driverdata);
  2228                 display->display_modes[j].driverdata = NULL;
  2229             }
  2230         }
  2231         if (display->display_modes) {
  2232             SDL_free(display->display_modes);
  2233             display->display_modes = NULL;
  2234         }
  2235         if (display->desktop_mode.driverdata) {
  2236             SDL_free(display->desktop_mode.driverdata);
  2237             display->desktop_mode.driverdata = NULL;
  2238         }
  2239         if (display->palette) {
  2240             SDL_FreePalette(display->palette);
  2241             display->palette = NULL;
  2242         }
  2243         if (display->gamma) {
  2244             SDL_free(display->gamma);
  2245         }
  2246         if (display->driverdata) {
  2247             SDL_free(display->driverdata);
  2248         }
  2249     }
  2250     if (_this->displays) {
  2251         SDL_free(_this->displays);
  2252         _this->displays = NULL;
  2253     }
  2254     _this->free(_this);
  2255     _this = NULL;
  2256 }
  2257 
  2258 int
  2259 SDL_GL_LoadLibrary(const char *path)
  2260 {
  2261     int retval;
  2262 
  2263     if (!_this) {
  2264         SDL_UninitializedVideo();
  2265         return -1;
  2266     }
  2267 
  2268     if (_this->GL_LoadLibrary) {
  2269         retval = _this->GL_LoadLibrary(_this, path);
  2270     } else {
  2271         SDL_SetError("No dynamic GL support in video driver");
  2272         retval = -1;
  2273     }
  2274     return (retval);
  2275 }
  2276 
  2277 void *
  2278 SDL_GL_GetProcAddress(const char *proc)
  2279 {
  2280     void *func;
  2281 
  2282     if (!_this) {
  2283         SDL_UninitializedVideo();
  2284         return NULL;
  2285     }
  2286 
  2287     func = NULL;
  2288     if (_this->GL_GetProcAddress) {
  2289         if (_this->gl_config.driver_loaded) {
  2290             func = _this->GL_GetProcAddress(_this, proc);
  2291         } else {
  2292             SDL_SetError("No GL driver has been loaded");
  2293         }
  2294     } else {
  2295         SDL_SetError("No dynamic GL support in video driver");
  2296     }
  2297     return func;
  2298 }
  2299 
  2300 SDL_bool
  2301 SDL_GL_ExtensionSupported(const char *extension)
  2302 {
  2303 #if SDL_VIDEO_OPENGL
  2304     const GLubyte *(APIENTRY * glGetStringFunc) (GLenum);
  2305     const char *extensions;
  2306     const char *start;
  2307     const char *where, *terminator;
  2308 
  2309     /* Extension names should not have spaces. */
  2310     where = SDL_strchr(extension, ' ');
  2311     if (where || *extension == '\0') {
  2312         return SDL_FALSE;
  2313     }
  2314 
  2315     /* See if there's an environment variable override */
  2316     start = SDL_getenv(extension);
  2317     if (start && *start == '0') {
  2318         return SDL_FALSE;
  2319     }
  2320 
  2321     /* Lookup the available extensions */
  2322     glGetStringFunc = SDL_GL_GetProcAddress("glGetString");
  2323     if (glGetStringFunc) {
  2324         extensions = (const char *) glGetStringFunc(GL_EXTENSIONS);
  2325     } else {
  2326         extensions = NULL;
  2327     }
  2328     if (!extensions) {
  2329         return SDL_FALSE;
  2330     }
  2331 
  2332     /* It takes a bit of care to be fool-proof about parsing the
  2333      * OpenGL extensions string. Don't be fooled by sub-strings,
  2334      * etc. */
  2335 
  2336     start = extensions;
  2337 
  2338     for (;;) {
  2339         where = SDL_strstr(start, extension);
  2340         if (!where)
  2341             break;
  2342 
  2343         terminator = where + SDL_strlen(extension);
  2344         if (where == start || *(where - 1) == ' ')
  2345             if (*terminator == ' ' || *terminator == '\0')
  2346                 return SDL_TRUE;
  2347 
  2348         start = terminator;
  2349     }
  2350     return SDL_FALSE;
  2351 #else
  2352     return SDL_FALSE;
  2353 #endif
  2354 }
  2355 
  2356 int
  2357 SDL_GL_SetAttribute(SDL_GLattr attr, int value)
  2358 {
  2359 #if SDL_VIDEO_OPENGL
  2360     int retval;
  2361 
  2362     if (!_this) {
  2363         SDL_UninitializedVideo();
  2364         return -1;
  2365     }
  2366 
  2367     retval = 0;
  2368     switch (attr) {
  2369     case SDL_GL_RED_SIZE:
  2370         _this->gl_config.red_size = value;
  2371         break;
  2372     case SDL_GL_GREEN_SIZE:
  2373         _this->gl_config.green_size = value;
  2374         break;
  2375     case SDL_GL_BLUE_SIZE:
  2376         _this->gl_config.blue_size = value;
  2377         break;
  2378     case SDL_GL_ALPHA_SIZE:
  2379         _this->gl_config.alpha_size = value;
  2380         break;
  2381     case SDL_GL_DOUBLEBUFFER:
  2382         _this->gl_config.double_buffer = value;
  2383         break;
  2384     case SDL_GL_BUFFER_SIZE:
  2385         _this->gl_config.buffer_size = value;
  2386         break;
  2387     case SDL_GL_DEPTH_SIZE:
  2388         _this->gl_config.depth_size = value;
  2389         break;
  2390     case SDL_GL_STENCIL_SIZE:
  2391         _this->gl_config.stencil_size = value;
  2392         break;
  2393     case SDL_GL_ACCUM_RED_SIZE:
  2394         _this->gl_config.accum_red_size = value;
  2395         break;
  2396     case SDL_GL_ACCUM_GREEN_SIZE:
  2397         _this->gl_config.accum_green_size = value;
  2398         break;
  2399     case SDL_GL_ACCUM_BLUE_SIZE:
  2400         _this->gl_config.accum_blue_size = value;
  2401         break;
  2402     case SDL_GL_ACCUM_ALPHA_SIZE:
  2403         _this->gl_config.accum_alpha_size = value;
  2404         break;
  2405     case SDL_GL_STEREO:
  2406         _this->gl_config.stereo = value;
  2407         break;
  2408     case SDL_GL_MULTISAMPLEBUFFERS:
  2409         _this->gl_config.multisamplebuffers = value;
  2410         break;
  2411     case SDL_GL_MULTISAMPLESAMPLES:
  2412         _this->gl_config.multisamplesamples = value;
  2413         break;
  2414     case SDL_GL_ACCELERATED_VISUAL:
  2415         _this->gl_config.accelerated = value;
  2416         break;
  2417     default:
  2418         SDL_SetError("Unknown OpenGL attribute");
  2419         retval = -1;
  2420         break;
  2421     }
  2422     return retval;
  2423 #else
  2424     SDL_Unsupported();
  2425     return -1;
  2426 #endif /* SDL_VIDEO_OPENGL */
  2427 }
  2428 
  2429 int
  2430 SDL_GL_GetAttribute(SDL_GLattr attr, int *value)
  2431 {
  2432 #if SDL_VIDEO_OPENGL
  2433     void (APIENTRY * glGetIntegervFunc) (GLenum pname, GLint * params);
  2434     GLenum attrib = 0;
  2435 
  2436     glGetIntegervFunc = SDL_GL_GetProcAddress("glGetIntegerv");
  2437     if (!glGetIntegervFunc) {
  2438         return -1;
  2439     }
  2440     switch (attr) {
  2441     case SDL_GL_RED_SIZE:
  2442         attrib = GL_RED_BITS;
  2443         break;
  2444     case SDL_GL_BLUE_SIZE:
  2445         attrib = GL_BLUE_BITS;
  2446         break;
  2447     case SDL_GL_GREEN_SIZE:
  2448         attrib = GL_GREEN_BITS;
  2449         break;
  2450     case SDL_GL_ALPHA_SIZE:
  2451         attrib = GL_ALPHA_BITS;
  2452         break;
  2453     case SDL_GL_DOUBLEBUFFER:
  2454         attrib = GL_DOUBLEBUFFER;
  2455         break;
  2456     case SDL_GL_DEPTH_SIZE:
  2457         attrib = GL_DEPTH_BITS;
  2458         break;
  2459     case SDL_GL_STENCIL_SIZE:
  2460         attrib = GL_STENCIL_BITS;
  2461         break;
  2462     case SDL_GL_ACCUM_RED_SIZE:
  2463         attrib = GL_ACCUM_RED_BITS;
  2464         break;
  2465     case SDL_GL_ACCUM_GREEN_SIZE:
  2466         attrib = GL_ACCUM_GREEN_BITS;
  2467         break;
  2468     case SDL_GL_ACCUM_BLUE_SIZE:
  2469         attrib = GL_ACCUM_BLUE_BITS;
  2470         break;
  2471     case SDL_GL_ACCUM_ALPHA_SIZE:
  2472         attrib = GL_ACCUM_ALPHA_BITS;
  2473         break;
  2474     case SDL_GL_STEREO:
  2475         attrib = GL_STEREO;
  2476         break;
  2477     case SDL_GL_MULTISAMPLEBUFFERS:
  2478         attrib = GL_SAMPLE_BUFFERS_ARB;
  2479         break;
  2480     case SDL_GL_MULTISAMPLESAMPLES:
  2481         attrib = GL_SAMPLES_ARB;
  2482         break;
  2483     case SDL_GL_BUFFER_SIZE:
  2484         {
  2485             GLint bits = 0;
  2486             GLint component;
  2487 
  2488             /* there doesn't seem to be a single flag in OpenGL for this! */
  2489             glGetIntegervFunc(GL_RED_BITS, &component);
  2490             bits += component;
  2491             glGetIntegervFunc(GL_GREEN_BITS, &component);
  2492             bits += component;
  2493             glGetIntegervFunc(GL_BLUE_BITS, &component);
  2494             bits += component;
  2495             glGetIntegervFunc(GL_ALPHA_BITS, &component);
  2496             bits += component;
  2497 
  2498             *value = bits;
  2499             return 0;
  2500         }
  2501     case SDL_GL_ACCELERATED_VISUAL:
  2502         {
  2503             /* FIXME: How do we get this information? */
  2504             *value = (_this->gl_config.accelerated != 0);
  2505             return 0;
  2506         }
  2507     default:
  2508         SDL_SetError("Unknown OpenGL attribute");
  2509         return -1;
  2510     }
  2511 
  2512     glGetIntegervFunc(attrib, (GLint *) value);
  2513     return 0;
  2514 #else
  2515     SDL_Unsupported();
  2516     return -1;
  2517 #endif /* SDL_VIDEO_OPENGL */
  2518 }
  2519 
  2520 SDL_GLContext
  2521 SDL_GL_CreateContext(SDL_WindowID windowID)
  2522 {
  2523     SDL_Window *window = SDL_GetWindowFromID(windowID);
  2524 
  2525     if (!window) {
  2526         return NULL;
  2527     }
  2528     if (!(window->flags & SDL_WINDOW_OPENGL)) {
  2529         SDL_SetError("The specified window isn't an OpenGL window");
  2530         return NULL;
  2531     }
  2532     return _this->GL_CreateContext(_this, window);
  2533 }
  2534 
  2535 int
  2536 SDL_GL_MakeCurrent(SDL_WindowID windowID, SDL_GLContext context)
  2537 {
  2538     SDL_Window *window = SDL_GetWindowFromID(windowID);
  2539 
  2540     if (window && !(window->flags & SDL_WINDOW_OPENGL)) {
  2541         SDL_SetError("The specified window isn't an OpenGL window");
  2542         return -1;
  2543     }
  2544     if (!context) {
  2545         window = NULL;
  2546     }
  2547     return _this->GL_MakeCurrent(_this, window, context);
  2548 }
  2549 
  2550 int
  2551 SDL_GL_SetSwapInterval(int interval)
  2552 {
  2553     if (!_this) {
  2554         SDL_UninitializedVideo();
  2555         return -1;
  2556     }
  2557 
  2558     if (_this->GL_SetSwapInterval) {
  2559         return _this->GL_SetSwapInterval(_this, interval);
  2560     } else {
  2561         SDL_SetError("Setting the swap interval is not supported");
  2562         return -1;
  2563     }
  2564 }
  2565 
  2566 int
  2567 SDL_GL_GetSwapInterval(void)
  2568 {
  2569     if (!_this) {
  2570         SDL_UninitializedVideo();
  2571         return -1;
  2572     }
  2573 
  2574     if (_this->GL_GetSwapInterval) {
  2575         return _this->GL_GetSwapInterval(_this);
  2576     } else {
  2577         SDL_SetError("Getting the swap interval is not supported");
  2578         return -1;
  2579     }
  2580 }
  2581 
  2582 void
  2583 SDL_GL_SwapWindow(SDL_WindowID windowID)
  2584 {
  2585     SDL_Window *window = SDL_GetWindowFromID(windowID);
  2586 
  2587     if (!window) {
  2588         return;
  2589     }
  2590     if (!(window->flags & SDL_WINDOW_OPENGL)) {
  2591         SDL_SetError("The specified window isn't an OpenGL window");
  2592         return;
  2593     }
  2594     _this->GL_SwapWindow(_this, window);
  2595 }
  2596 
  2597 void
  2598 SDL_GL_DeleteContext(SDL_GLContext context)
  2599 {
  2600     if (!_this || !context) {
  2601         return;
  2602     }
  2603     _this->GL_MakeCurrent(_this, NULL, NULL);
  2604     _this->GL_DeleteContext(_this, context);
  2605 }
  2606 
  2607 #if 0                           // FIXME
  2608 /* Utility function used by SDL_WM_SetIcon();
  2609  * flags & 1 for color key, flags & 2 for alpha channel. */
  2610 static void
  2611 CreateMaskFromColorKeyOrAlpha(SDL_Surface * icon, Uint8 * mask, int flags)
  2612 {
  2613     int x, y;
  2614     Uint32 colorkey;
  2615 #define SET_MASKBIT(icon, x, y, mask) \
  2616 	mask[(y*((icon->w+7)/8))+(x/8)] &= ~(0x01<<(7-(x%8)))
  2617 
  2618     colorkey = icon->format->colorkey;
  2619     switch (icon->format->BytesPerPixel) {
  2620     case 1:
  2621         {
  2622             Uint8 *pixels;
  2623             for (y = 0; y < icon->h; ++y) {
  2624                 pixels = (Uint8 *) icon->pixels + y * icon->pitch;
  2625                 for (x = 0; x < icon->w; ++x) {
  2626                     if (*pixels++ == colorkey) {
  2627                         SET_MASKBIT(icon, x, y, mask);
  2628                     }
  2629                 }
  2630             }
  2631         }
  2632         break;
  2633 
  2634     case 2:
  2635         {
  2636             Uint16 *pixels;
  2637             for (y = 0; y < icon->h; ++y) {
  2638                 pixels = (Uint16 *) icon->pixels + y * icon->pitch / 2;
  2639                 for (x = 0; x < icon->w; ++x) {
  2640                     if ((flags & 1) && *pixels == colorkey) {
  2641                         SET_MASKBIT(icon, x, y, mask);
  2642                     } else if ((flags & 2)
  2643                                && (*pixels & icon->format->Amask) == 0) {
  2644                         SET_MASKBIT(icon, x, y, mask);
  2645                     }
  2646                     pixels++;
  2647                 }
  2648             }
  2649         }
  2650         break;
  2651 
  2652     case 4:
  2653         {
  2654             Uint32 *pixels;
  2655             for (y = 0; y < icon->h; ++y) {
  2656                 pixels = (Uint32 *) icon->pixels + y * icon->pitch / 4;
  2657                 for (x = 0; x < icon->w; ++x) {
  2658                     if ((flags & 1) && *pixels == colorkey) {
  2659                         SET_MASKBIT(icon, x, y, mask);
  2660                     } else if ((flags & 2)
  2661                                && (*pixels & icon->format->Amask) == 0) {
  2662                         SET_MASKBIT(icon, x, y, mask);
  2663                     }
  2664                     pixels++;
  2665                 }
  2666             }
  2667         }
  2668         break;
  2669     }
  2670 }
  2671 
  2672 /*
  2673  * Sets the window manager icon for the display window.
  2674  */
  2675 void
  2676 SDL_WM_SetIcon(SDL_Surface * icon, Uint8 * mask)
  2677 {
  2678     if (icon && _this->SetIcon) {
  2679         /* Generate a mask if necessary, and create the icon! */
  2680         if (mask == NULL) {
  2681             int mask_len = icon->h * (icon->w + 7) / 8;
  2682             int flags = 0;
  2683             mask = (Uint8 *) SDL_malloc(mask_len);
  2684             if (mask == NULL) {
  2685                 return;
  2686             }
  2687             SDL_memset(mask, ~0, mask_len);
  2688             if (icon->flags & SDL_SRCCOLORKEY)
  2689                 flags |= 1;
  2690             if (icon->flags & SDL_SRCALPHA)
  2691                 flags |= 2;
  2692             if (flags) {
  2693                 CreateMaskFromColorKeyOrAlpha(icon, mask, flags);
  2694             }
  2695             _this->SetIcon(_this, icon, mask);
  2696             SDL_free(mask);
  2697         } else {
  2698             _this->SetIcon(_this, icon, mask);
  2699         }
  2700     }
  2701 }
  2702 #endif
  2703 
  2704 SDL_bool
  2705 SDL_GetWindowWMInfo(SDL_WindowID windowID, struct SDL_SysWMinfo *info)
  2706 {
  2707     SDL_Window *window = SDL_GetWindowFromID(windowID);
  2708 
  2709     if (!window || !_this->GetWindowWMInfo) {
  2710         return SDL_FALSE;
  2711     }
  2712     return (_this->GetWindowWMInfo(_this, window, info));
  2713 }
  2714 
  2715 /* vi: set ts=4 sw=4 expandtab: */