Mercurial > sdl-ios-xcode
annotate src/video/dga/SDL_dgavideo.c @ 91:e85e03f195b4
From: "Markus F.X.J. Oberhumer"
Subject: SDL CVS patches
below you will find some small patches against the
current SDL CVS.
It adresses these things:
1) Use "&" instead of "%" in some cases. For negative
signed integers (x % 8) is not always (x & 7),
and the compiler can produce slightly faster
code when using "&" here.
2) Some const issues.
| author | Sam Lantinga <slouken@lokigames.com> |
|---|---|
| date | Sat, 07 Jul 2001 20:20:17 +0000 |
| parents | 74212992fb08 |
| children | 825b2fa28e2e |
| rev | line source |
|---|---|
| 0 | 1 /* |
| 2 SDL - Simple DirectMedia Layer | |
| 3 Copyright (C) 1997, 1998, 1999, 2000, 2001 Sam Lantinga | |
| 4 | |
| 5 This library is free software; you can redistribute it and/or | |
| 6 modify it under the terms of the GNU Library General Public | |
| 7 License as published by the Free Software Foundation; either | |
| 8 version 2 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 Library General Public License for more details. | |
| 14 | |
| 15 You should have received a copy of the GNU Library General Public | |
| 16 License along with this library; if not, write to the Free | |
| 17 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
| 18 | |
| 19 Sam Lantinga | |
| 20 slouken@devolution.com | |
| 21 */ | |
| 22 | |
| 23 #ifdef SAVE_RCSID | |
| 24 static char rcsid = | |
| 25 "@(#) $Id$"; | |
| 26 #endif | |
| 27 | |
| 28 /* DGA 2.0 based SDL video driver implementation. | |
| 29 */ | |
| 30 | |
| 31 #include <stdlib.h> | |
| 32 #include <string.h> | |
| 33 #include <X11/Xlib.h> | |
| 34 #include <X11/extensions/xf86dga.h> | |
| 35 | |
| 36 #ifdef HAVE_ALLOCA_H | |
| 37 #include <alloca.h> | |
| 38 #endif | |
| 39 | |
| 40 #include "SDL.h" | |
| 41 #include "SDL_error.h" | |
| 42 #include "SDL_video.h" | |
| 43 #include "SDL_mouse.h" | |
| 44 #include "SDL_sysvideo.h" | |
| 45 #include "SDL_pixels_c.h" | |
| 46 #include "SDL_events_c.h" | |
| 47 #include "SDL_dgavideo.h" | |
| 48 #include "SDL_dgamouse_c.h" | |
| 49 #include "SDL_dgaevents_c.h" | |
| 50 | |
| 51 /* Initialization/Query functions */ | |
| 52 static int DGA_VideoInit(_THIS, SDL_PixelFormat *vformat); | |
| 53 static SDL_Rect **DGA_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags); | |
| 54 static SDL_Surface *DGA_SetVideoMode(_THIS, SDL_Surface *current, int width, int height, int bpp, Uint32 flags); | |
| 55 static int DGA_SetColors(_THIS, int firstcolor, int ncolors, | |
| 56 SDL_Color *colors); | |
| 57 static int DGA_SetGammaRamp(_THIS, Uint16 *ramp); | |
| 58 static void DGA_VideoQuit(_THIS); | |
| 59 | |
| 60 /* Hardware surface functions */ | |
| 61 static int DGA_InitHWSurfaces(_THIS, Uint8 *base, int size); | |
| 62 static void DGA_FreeHWSurfaces(_THIS); | |
| 63 static int DGA_AllocHWSurface(_THIS, SDL_Surface *surface); | |
| 64 static int DGA_FillHWRect(_THIS, SDL_Surface *dst, SDL_Rect *rect, Uint32 color); | |
| 65 static int DGA_CheckHWBlit(_THIS, SDL_Surface *src, SDL_Surface *dst); | |
| 66 static int DGA_LockHWSurface(_THIS, SDL_Surface *surface); | |
| 67 static void DGA_UnlockHWSurface(_THIS, SDL_Surface *surface); | |
| 68 static void DGA_FreeHWSurface(_THIS, SDL_Surface *surface); | |
| 69 static int DGA_FlipHWSurface(_THIS, SDL_Surface *surface); | |
| 70 | |
| 71 /* DGA driver bootstrap functions */ | |
| 72 | |
| 73 static int DGA_Available(void) | |
| 74 { | |
| 75 const char *display; | |
| 76 Display *dpy; | |
| 77 int available; | |
| 78 | |
| 79 /* The driver is available is available if the display is local | |
| 80 and the DGA 2.0+ extension is available, and we can map mem. | |
| 81 */ | |
| 82 available = 0; | |
| 83 display = NULL; | |
| 84 if ( (strncmp(XDisplayName(display), ":", 1) == 0) || | |
| 85 (strncmp(XDisplayName(display), "unix:", 5) == 0) ) { | |
| 86 dpy = XOpenDisplay(display); | |
| 87 if ( dpy ) { | |
| 88 int events, errors, major, minor; | |
| 89 | |
| 90 if ( XDGAQueryExtension(dpy, &events, &errors) && | |
| 91 XDGAQueryVersion(dpy, &major, &minor) ) { | |
| 92 int screen; | |
| 93 | |
| 94 screen = DefaultScreen(dpy); | |
| 95 if ( (major >= 2) && | |
| 96 XDGAOpenFramebuffer(dpy, screen) ) { | |
| 97 available = 1; | |
| 98 XDGACloseFramebuffer(dpy, screen); | |
| 99 } | |
| 100 } | |
| 101 XCloseDisplay(dpy); | |
| 102 } | |
| 103 } | |
| 104 return(available); | |
| 105 } | |
| 106 | |
| 107 static void DGA_DeleteDevice(SDL_VideoDevice *device) | |
| 108 { | |
| 109 free(device->hidden); | |
| 110 free(device); | |
| 111 } | |
| 112 | |
| 113 static SDL_VideoDevice *DGA_CreateDevice(int devindex) | |
| 114 { | |
| 115 SDL_VideoDevice *device; | |
| 116 | |
| 117 /* Initialize all variables that we clean on shutdown */ | |
| 118 device = (SDL_VideoDevice *)malloc(sizeof(SDL_VideoDevice)); | |
| 119 if ( device ) { | |
| 120 memset(device, 0, (sizeof *device)); | |
| 121 device->hidden = (struct SDL_PrivateVideoData *) | |
| 122 malloc((sizeof *device->hidden)); | |
| 123 } | |
| 124 if ( (device == NULL) || (device->hidden == NULL) ) { | |
| 125 SDL_OutOfMemory(); | |
| 126 if ( device ) { | |
| 127 free(device); | |
| 128 } | |
| 129 return(0); | |
| 130 } | |
| 131 memset(device->hidden, 0, (sizeof *device->hidden)); | |
| 132 | |
| 133 /* Set the function pointers */ | |
| 134 device->VideoInit = DGA_VideoInit; | |
| 135 device->ListModes = DGA_ListModes; | |
| 136 device->SetVideoMode = DGA_SetVideoMode; | |
| 137 device->SetColors = DGA_SetColors; | |
| 138 device->UpdateRects = NULL; | |
| 139 device->VideoQuit = DGA_VideoQuit; | |
| 140 device->AllocHWSurface = DGA_AllocHWSurface; | |
| 141 device->CheckHWBlit = DGA_CheckHWBlit; | |
| 142 device->FillHWRect = DGA_FillHWRect; | |
| 143 device->SetHWColorKey = NULL; | |
| 144 device->SetHWAlpha = NULL; | |
| 145 device->LockHWSurface = DGA_LockHWSurface; | |
| 146 device->UnlockHWSurface = DGA_UnlockHWSurface; | |
| 147 device->FlipHWSurface = DGA_FlipHWSurface; | |
| 148 device->FreeHWSurface = DGA_FreeHWSurface; | |
| 149 device->SetGammaRamp = DGA_SetGammaRamp; | |
| 150 device->GetGammaRamp = NULL; | |
| 151 device->SetCaption = NULL; | |
| 152 device->SetIcon = NULL; | |
| 153 device->IconifyWindow = NULL; | |
| 154 device->GrabInput = NULL; | |
| 155 device->GetWMInfo = NULL; | |
| 156 device->InitOSKeymap = DGA_InitOSKeymap; | |
| 157 device->PumpEvents = DGA_PumpEvents; | |
| 158 | |
| 159 device->free = DGA_DeleteDevice; | |
| 160 | |
| 161 return device; | |
| 162 } | |
| 163 | |
| 164 VideoBootStrap DGA_bootstrap = { | |
| 165 "dga", "XFree86 DGA 2.0", | |
| 166 DGA_Available, DGA_CreateDevice | |
| 167 }; | |
| 168 | |
| 169 static int DGA_AddMode(_THIS, int bpp, int w, int h) | |
| 170 { | |
| 171 SDL_Rect *mode; | |
| 172 int i, index; | |
| 173 int next_mode; | |
| 174 | |
| 175 /* Check to see if we already have this mode */ | |
| 176 if ( bpp < 8 ) { /* Not supported */ | |
| 177 return(0); | |
| 178 } | |
| 179 index = ((bpp+7)/8)-1; | |
| 180 for ( i=0; i<SDL_nummodes[index]; ++i ) { | |
| 181 mode = SDL_modelist[index][i]; | |
| 182 if ( (mode->w == w) && (mode->h == h) ) { | |
| 183 return(0); | |
| 184 } | |
| 185 } | |
| 186 | |
| 187 /* Set up the new video mode rectangle */ | |
| 188 mode = (SDL_Rect *)malloc(sizeof *mode); | |
| 189 if ( mode == NULL ) { | |
| 190 SDL_OutOfMemory(); | |
| 191 return(-1); | |
| 192 } | |
| 193 mode->x = 0; | |
| 194 mode->y = 0; | |
| 195 mode->w = w; | |
| 196 mode->h = h; | |
| 197 | |
| 198 /* Allocate the new list of modes, and fill in the new mode */ | |
| 199 next_mode = SDL_nummodes[index]; | |
| 200 SDL_modelist[index] = (SDL_Rect **) | |
| 201 realloc(SDL_modelist[index], (1+next_mode+1)*sizeof(SDL_Rect *)); | |
| 202 if ( SDL_modelist[index] == NULL ) { | |
| 203 SDL_OutOfMemory(); | |
| 204 SDL_nummodes[index] = 0; | |
| 205 free(mode); | |
| 206 return(-1); | |
| 207 } | |
| 208 SDL_modelist[index][next_mode] = mode; | |
| 209 SDL_modelist[index][next_mode+1] = NULL; | |
| 210 SDL_nummodes[index]++; | |
| 211 | |
| 212 return(0); | |
| 213 } | |
| 214 | |
| 215 /* This whole function is a hack. :) */ | |
| 216 static Uint32 get_video_size(_THIS) | |
| 217 { | |
| 218 /* This is a non-exported function from libXxf86dga.a */ | |
| 219 extern unsigned char *XDGAGetMappedMemory(int screen); | |
| 220 FILE *proc; | |
| 221 unsigned long mem; | |
| 222 unsigned start, stop; | |
| 223 char line[BUFSIZ]; | |
| 224 Uint32 size; | |
| 225 | |
| 226 mem = (unsigned long)XDGAGetMappedMemory(DGA_Screen); | |
| 227 size = 0; | |
| 228 proc = fopen("/proc/self/maps", "r"); | |
| 229 if ( proc ) { | |
| 230 while ( fgets(line, sizeof(line)-1, proc) ) { | |
| 231 sscanf(line, "%x-%x", &start, &stop); | |
| 232 if ( start == mem ) { | |
| 233 size = (Uint32)((stop-start)/1024); | |
| 234 break; | |
| 235 } | |
| 236 } | |
| 237 fclose(proc); | |
| 238 } | |
| 239 return(size); | |
| 240 } | |
| 241 | |
| 242 #ifdef DGA_DEBUG | |
| 243 static void PrintMode(XDGAMode *mode) | |
| 244 { | |
| 245 printf("Mode: %s (%dx%d) at %d bpp (%f refresh, %d pitch) num: %d\n", | |
| 246 mode->name, | |
| 247 mode->viewportWidth, mode->viewportHeight, | |
| 248 mode->depth == 24 ? mode->bitsPerPixel : mode->depth, | |
| 249 mode->verticalRefresh, mode->bytesPerScanline, mode->num); | |
| 250 printf("\tRGB: 0x%8.8x 0x%8.8x 0x%8.8x (%d - %s)\n", | |
| 251 mode->redMask, mode->greenMask, mode->blueMask, | |
| 252 mode->visualClass, | |
| 253 mode->visualClass == TrueColor ? "truecolor" : | |
| 254 mode->visualClass == DirectColor ? "directcolor" : | |
| 255 mode->visualClass == PseudoColor ? "pseudocolor" : "unknown"); | |
| 256 printf("\tFlags: "); | |
| 257 if ( mode->flags & XDGAConcurrentAccess ) | |
| 258 printf(" XDGAConcurrentAccess"); | |
| 259 if ( mode->flags & XDGASolidFillRect ) | |
| 260 printf(" XDGASolidFillRect"); | |
| 261 if ( mode->flags & XDGABlitRect ) | |
| 262 printf(" XDGABlitRect"); | |
| 263 if ( mode->flags & XDGABlitTransRect ) | |
| 264 printf(" XDGABlitTransRect"); | |
| 265 if ( mode->flags & XDGAPixmap ) | |
| 266 printf(" XDGAPixmap"); | |
| 267 if ( mode->flags & XDGAInterlaced ) | |
| 268 printf(" XDGAInterlaced"); | |
| 269 if ( mode->flags & XDGADoublescan ) | |
| 270 printf(" XDGADoublescan"); | |
| 271 if ( mode->viewportFlags & XDGAFlipRetrace ) | |
| 272 printf(" XDGAFlipRetrace"); | |
| 273 if ( mode->viewportFlags & XDGAFlipImmediate ) | |
| 274 printf(" XDGAFlipImmediate"); | |
| 275 printf("\n"); | |
| 276 } | |
| 277 #endif /* DGA_DEBUG */ | |
| 278 | |
| 279 static int cmpmodes(const void *va, const void *vb) | |
| 280 { | |
|
91
e85e03f195b4
From: "Markus F.X.J. Oberhumer"
Sam Lantinga <slouken@lokigames.com>
parents:
0
diff
changeset
|
281 const XDGAMode *a = (const XDGAMode *)va; |
|
e85e03f195b4
From: "Markus F.X.J. Oberhumer"
Sam Lantinga <slouken@lokigames.com>
parents:
0
diff
changeset
|
282 const XDGAMode *b = (const XDGAMode *)vb; |
| 0 | 283 |
| 284 /* Prefer DirectColor visuals for otherwise equal modes */ | |
| 285 if ( (a->viewportWidth == b->viewportWidth) && | |
| 286 (b->viewportHeight == a->viewportHeight) ) { | |
| 287 if ( a->visualClass == DirectColor ) | |
| 288 return -1; | |
| 289 if ( b->visualClass == DirectColor ) | |
| 290 return 1; | |
| 291 return 0; | |
| 292 } else { | |
| 293 if(a->viewportWidth > b->viewportWidth) | |
| 294 return -1; | |
| 295 return b->viewportHeight - a->viewportHeight; | |
| 296 } | |
| 297 } | |
| 298 static void UpdateHWInfo(_THIS, XDGAMode *mode) | |
| 299 { | |
| 300 this->info.wm_available = 0; | |
| 301 this->info.hw_available = 1; | |
| 302 if ( mode->flags & XDGABlitRect ) { | |
| 303 this->info.blit_hw = 1; | |
| 304 } else { | |
| 305 this->info.blit_hw = 0; | |
| 306 } | |
| 307 if ( mode->flags & XDGABlitTransRect ) { | |
| 308 this->info.blit_hw_CC = 1; | |
| 309 } else { | |
| 310 this->info.blit_hw_CC = 0; | |
| 311 } | |
| 312 if ( mode->flags & XDGASolidFillRect ) { | |
| 313 this->info.blit_fill = 1; | |
| 314 } else { | |
| 315 this->info.blit_fill = 0; | |
| 316 } | |
| 317 this->info.video_mem = get_video_size(this); | |
| 318 } | |
| 319 | |
| 320 static int DGA_VideoInit(_THIS, SDL_PixelFormat *vformat) | |
| 321 { | |
| 322 const char *display; | |
| 323 int event_base, error_base; | |
| 324 int major_version, minor_version; | |
| 325 Visual *visual; | |
| 326 XDGAMode *modes; | |
| 327 int i, num_modes; | |
| 328 | |
| 329 /* Open the X11 display */ | |
| 330 display = NULL; /* Get it from DISPLAY environment variable */ | |
| 331 | |
| 332 DGA_Display = XOpenDisplay(display); | |
| 333 if ( DGA_Display == NULL ) { | |
| 334 SDL_SetError("Couldn't open X11 display"); | |
| 335 return(-1); | |
| 336 } | |
| 337 | |
| 338 /* Check for the DGA extension */ | |
| 339 if ( ! XDGAQueryExtension(DGA_Display, &event_base, &error_base) || | |
| 340 ! XDGAQueryVersion(DGA_Display, &major_version, &minor_version) ) { | |
| 341 SDL_SetError("DGA extension not available"); | |
| 342 XCloseDisplay(DGA_Display); | |
| 343 return(-1); | |
| 344 } | |
| 345 if ( major_version < 2 ) { | |
| 346 SDL_SetError("DGA driver requires DGA 2.0 or newer"); | |
| 347 XCloseDisplay(DGA_Display); | |
| 348 return(-1); | |
| 349 } | |
| 350 DGA_event_base = event_base; | |
| 351 | |
| 352 /* Determine the current screen depth */ | |
| 353 visual = DefaultVisual(DGA_Display, DGA_Screen); | |
| 354 { | |
| 355 XPixmapFormatValues *pix_format; | |
| 356 int i, num_formats; | |
| 357 | |
| 358 vformat->BitsPerPixel = DefaultDepth(DGA_Display, DGA_Screen); | |
| 359 pix_format = XListPixmapFormats(DGA_Display, &num_formats); | |
| 360 if ( pix_format == NULL ) { | |
| 361 SDL_SetError("Couldn't determine screen formats"); | |
| 362 XCloseDisplay(DGA_Display); | |
| 363 return(-1); | |
| 364 } | |
| 365 for ( i=0; i<num_formats; ++i ) { | |
| 366 if ( vformat->BitsPerPixel == pix_format[i].depth ) | |
| 367 break; | |
| 368 } | |
| 369 if ( i != num_formats ) | |
| 370 vformat->BitsPerPixel = pix_format[i].bits_per_pixel; | |
| 371 XFree((char *)pix_format); | |
| 372 } | |
| 373 if ( vformat->BitsPerPixel > 8 ) { | |
| 374 vformat->Rmask = visual->red_mask; | |
| 375 vformat->Gmask = visual->green_mask; | |
| 376 vformat->Bmask = visual->blue_mask; | |
| 377 } | |
| 378 | |
| 379 /* Open access to the framebuffer */ | |
| 380 if ( ! XDGAOpenFramebuffer(DGA_Display, DGA_Screen) ) { | |
| 381 SDL_SetError("Unable to map the video memory"); | |
| 382 XCloseDisplay(DGA_Display); | |
| 383 return(-1); | |
| 384 } | |
| 385 | |
| 386 /* Query for the list of available video modes */ | |
| 387 modes = XDGAQueryModes(DGA_Display, DGA_Screen, &num_modes); | |
| 388 qsort(modes, num_modes, sizeof *modes, cmpmodes); | |
| 389 for ( i=0; i<num_modes; ++i ) { | |
| 390 #ifdef DGA_DEBUG | |
| 391 PrintMode(&modes[i]); | |
| 392 #endif | |
| 393 if ( (modes[i].visualClass == PseudoColor) || | |
| 394 (modes[i].visualClass == DirectColor) || | |
| 395 (modes[i].visualClass == TrueColor) ) { | |
| 396 DGA_AddMode(this, modes[i].bitsPerPixel, | |
| 397 modes[i].viewportWidth, | |
| 398 modes[i].viewportHeight); | |
| 399 } | |
| 400 } | |
| 401 UpdateHWInfo(this, modes); | |
| 402 XFree(modes); | |
| 403 | |
| 404 /* Create the hardware surface lock mutex */ | |
| 405 hw_lock = SDL_CreateMutex(); | |
| 406 if ( hw_lock == NULL ) { | |
| 407 SDL_SetError("Unable to create lock mutex"); | |
| 408 DGA_VideoQuit(this); | |
| 409 return(-1); | |
| 410 } | |
| 411 | |
| 412 /* We're done! */ | |
| 413 return(0); | |
| 414 } | |
| 415 | |
| 416 SDL_Rect **DGA_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags) | |
| 417 { | |
| 418 return(SDL_modelist[((format->BitsPerPixel+7)/8)-1]); | |
| 419 } | |
| 420 | |
| 421 /* Various screen update functions available */ | |
| 422 static void DGA_DirectUpdate(_THIS, int numrects, SDL_Rect *rects); | |
| 423 | |
| 424 SDL_Surface *DGA_SetVideoMode(_THIS, SDL_Surface *current, | |
| 425 int width, int height, int bpp, Uint32 flags) | |
| 426 { | |
| 427 XDGAMode *modes; | |
| 428 int i, num_modes; | |
| 429 XDGADevice *mode; | |
| 430 int screen_len; | |
| 431 Uint8 *surfaces_mem; | |
| 432 int surfaces_len; | |
| 433 | |
| 434 /* Free any previous colormap */ | |
| 435 if ( DGA_colormap ) { | |
| 436 XFreeColormap(DGA_Display, DGA_colormap); | |
| 437 DGA_colormap = 0; | |
| 438 } | |
| 439 | |
| 440 /* Search for a matching video mode */ | |
| 441 modes = XDGAQueryModes(DGA_Display, DGA_Screen, &num_modes); | |
| 442 qsort(modes, num_modes, sizeof *modes, cmpmodes); | |
| 443 for ( i=0; i<num_modes; ++i ) { | |
| 444 int depth; | |
| 445 | |
| 446 | |
| 447 depth = modes[i].depth; | |
| 448 if ( depth == 24 ) { /* Distinguish between 24 and 32 bpp */ | |
| 449 depth = modes[i].bitsPerPixel; | |
| 450 } | |
| 451 if ( (depth == bpp) && | |
| 452 (modes[i].viewportWidth == width) && | |
| 453 (modes[i].viewportHeight == height) && | |
| 454 ((modes[i].visualClass == PseudoColor) || | |
| 455 (modes[i].visualClass == DirectColor) || | |
| 456 (modes[i].visualClass == TrueColor)) ) { | |
| 457 break; | |
| 458 } | |
| 459 } | |
| 460 if ( i == num_modes ) { | |
| 461 SDL_SetError("No matching video mode found"); | |
| 462 return(NULL); | |
| 463 } | |
| 464 | |
| 465 /* Set the video mode */ | |
| 466 mode = XDGASetMode(DGA_Display, DGA_Screen, modes[i].num); | |
| 467 XFree(modes); | |
| 468 if ( mode == NULL ) { | |
| 469 SDL_SetError("Unable to switch to requested mode"); | |
| 470 return(NULL); | |
| 471 } | |
| 472 DGA_visualClass = modes[i].visualClass; | |
| 473 memory_base = (Uint8 *)mode->data; | |
| 474 memory_pitch = mode->mode.bytesPerScanline; | |
| 475 | |
| 476 /* Set up the new mode framebuffer */ | |
| 477 current->flags = (SDL_FULLSCREEN|SDL_HWSURFACE); | |
| 478 current->w = mode->mode.viewportWidth; | |
| 479 current->h = mode->mode.viewportHeight; | |
| 480 current->pitch = memory_pitch; | |
| 481 current->pixels = memory_base; | |
| 482 if ( ! SDL_ReallocFormat(current, mode->mode.bitsPerPixel, | |
| 483 mode->mode.redMask, | |
| 484 mode->mode.greenMask, | |
| 485 mode->mode.blueMask, 0) ) { | |
| 486 return(NULL); | |
| 487 } | |
| 488 screen_len = current->h*current->pitch; | |
| 489 | |
| 490 /* Create a colormap if necessary */ | |
| 491 if ( (DGA_visualClass == PseudoColor) || | |
| 492 (DGA_visualClass == DirectColor) ) { | |
| 493 DGA_colormap = XDGACreateColormap(DGA_Display, DGA_Screen, | |
| 494 mode, AllocAll); | |
| 495 if ( DGA_visualClass == PseudoColor ) { | |
| 496 current->flags |= SDL_HWPALETTE; | |
| 497 } else { | |
| 498 /* Initialize the colormap to the identity mapping */ | |
| 499 SDL_GetGammaRamp(0, 0, 0); | |
| 500 this->screen = current; | |
| 501 DGA_SetGammaRamp(this, this->gamma); | |
| 502 this->screen = NULL; | |
| 503 } | |
| 504 } else { | |
| 505 DGA_colormap = XDGACreateColormap(DGA_Display, DGA_Screen, | |
| 506 mode, AllocNone); | |
| 507 } | |
| 508 XDGAInstallColormap(DGA_Display, DGA_Screen, DGA_colormap); | |
| 509 | |
| 510 /* Update the hardware capabilities */ | |
| 511 UpdateHWInfo(this, &mode->mode); | |
| 512 | |
| 513 /* Set up the information for hardware surfaces */ | |
| 514 surfaces_mem = (Uint8 *)current->pixels + screen_len; | |
| 515 surfaces_len = (mode->mode.imageHeight*current->pitch - screen_len); | |
| 516 | |
| 517 /* Update for double-buffering, if we can */ | |
| 518 XDGASetViewport(DGA_Display, DGA_Screen, 0, 0, XDGAFlipRetrace); | |
| 519 if ( flags & SDL_DOUBLEBUF ) { | |
| 520 if ( mode->mode.imageHeight >= (current->h*2) ) { | |
| 521 current->flags |= SDL_DOUBLEBUF; | |
| 522 flip_page = 0; | |
| 523 flip_yoffset[0] = 0; | |
| 524 flip_yoffset[1] = current->h; | |
| 525 flip_address[0] = memory_base; | |
| 526 flip_address[1] = memory_base+screen_len; | |
| 527 surfaces_mem += screen_len; | |
| 528 surfaces_len -= screen_len; | |
| 529 DGA_FlipHWSurface(this, current); | |
| 530 } | |
| 531 } | |
| 532 | |
| 533 /* Allocate memory tracking for hardware surfaces */ | |
| 534 DGA_FreeHWSurfaces(this); | |
| 535 if ( surfaces_len < 0 ) { | |
| 536 surfaces_len = 0; | |
| 537 } | |
| 538 DGA_InitHWSurfaces(this, surfaces_mem, surfaces_len); | |
| 539 | |
| 540 /* Set the update rectangle function */ | |
| 541 this->UpdateRects = DGA_DirectUpdate; | |
| 542 | |
| 543 /* Enable mouse and keyboard support */ | |
| 544 { long input_mask; | |
| 545 input_mask = (KeyPressMask | KeyReleaseMask); | |
| 546 input_mask |= (ButtonPressMask | ButtonReleaseMask); | |
| 547 input_mask |= PointerMotionMask; | |
| 548 XDGASelectInput(DGA_Display, DGA_Screen, input_mask); | |
| 549 } | |
| 550 | |
| 551 /* We're done */ | |
| 552 return(current); | |
| 553 } | |
| 554 | |
| 555 #ifdef DGA_DEBUG | |
| 556 static void DGA_DumpHWSurfaces(_THIS) | |
| 557 { | |
| 558 vidmem_bucket *bucket; | |
| 559 | |
| 560 printf("Memory left: %d (%d total)\n", surfaces_memleft, surfaces_memtotal); | |
| 561 printf("\n"); | |
| 562 printf(" Base Size\n"); | |
| 563 for ( bucket=&surfaces; bucket; bucket=bucket->next ) { | |
| 564 printf("Bucket: %p, %d (%s)\n", bucket->base, bucket->size, bucket->used ? "used" : "free"); | |
| 565 if ( bucket->prev ) { | |
| 566 if ( bucket->base != bucket->prev->base+bucket->prev->size ) { | |
| 567 printf("Warning, corrupt bucket list! (prev)\n"); | |
| 568 } | |
| 569 } else { | |
| 570 if ( bucket != &surfaces ) { | |
| 571 printf("Warning, corrupt bucket list! (!prev)\n"); | |
| 572 } | |
| 573 } | |
| 574 if ( bucket->next ) { | |
| 575 if ( bucket->next->base != bucket->base+bucket->size ) { | |
| 576 printf("Warning, corrupt bucket list! (next)\n"); | |
| 577 } | |
| 578 } | |
| 579 } | |
| 580 printf("\n"); | |
| 581 } | |
| 582 #endif | |
| 583 | |
| 584 static int DGA_InitHWSurfaces(_THIS, Uint8 *base, int size) | |
| 585 { | |
| 586 surfaces.prev = NULL; | |
| 587 surfaces.used = 0; | |
| 588 surfaces.base = base; | |
| 589 surfaces.size = size; | |
| 590 surfaces.next = NULL; | |
| 591 surfaces_memtotal = size; | |
| 592 surfaces_memleft = size; | |
| 593 return(0); | |
| 594 } | |
| 595 static void DGA_FreeHWSurfaces(_THIS) | |
| 596 { | |
| 597 vidmem_bucket *bucket, *freeable; | |
| 598 | |
| 599 bucket = surfaces.next; | |
| 600 while ( bucket ) { | |
| 601 freeable = bucket; | |
| 602 bucket = bucket->next; | |
| 603 free(freeable); | |
| 604 } | |
| 605 surfaces.next = NULL; | |
| 606 } | |
| 607 | |
| 608 static int DGA_AllocHWSurface(_THIS, SDL_Surface *surface) | |
| 609 { | |
| 610 vidmem_bucket *bucket; | |
| 611 int size; | |
| 612 int extra; | |
| 613 | |
| 614 /* Temporarily, we only allow surfaces the same width as display. | |
| 615 Some blitters require the pitch between two hardware surfaces | |
| 616 to be the same. Others have interesting alignment restrictions. | |
| 617 */ | |
| 618 if ( surface->pitch > SDL_VideoSurface->pitch ) { | |
| 619 SDL_SetError("Surface requested wider than screen"); | |
| 620 return(-1); | |
| 621 } | |
| 622 surface->pitch = SDL_VideoSurface->pitch; | |
| 623 size = surface->h * surface->pitch; | |
| 624 #ifdef DGA_DEBUG | |
| 625 fprintf(stderr, "Allocating bucket of %d bytes\n", size); | |
| 626 #endif | |
| 627 | |
| 628 /* Quick check for available mem */ | |
| 629 if ( size > surfaces_memleft ) { | |
| 630 SDL_SetError("Not enough video memory"); | |
| 631 return(-1); | |
| 632 } | |
| 633 | |
| 634 /* Search for an empty bucket big enough */ | |
| 635 for ( bucket=&surfaces; bucket; bucket=bucket->next ) { | |
| 636 if ( ! bucket->used && (size <= bucket->size) ) { | |
| 637 break; | |
| 638 } | |
| 639 } | |
| 640 if ( bucket == NULL ) { | |
| 641 SDL_SetError("Video memory too fragmented"); | |
| 642 return(-1); | |
| 643 } | |
| 644 | |
| 645 /* Create a new bucket for left-over memory */ | |
| 646 extra = (bucket->size - size); | |
| 647 if ( extra ) { | |
| 648 vidmem_bucket *newbucket; | |
| 649 | |
| 650 #ifdef DGA_DEBUG | |
| 651 fprintf(stderr, "Adding new free bucket of %d bytes\n", extra); | |
| 652 #endif | |
| 653 newbucket = (vidmem_bucket *)malloc(sizeof(*newbucket)); | |
| 654 if ( newbucket == NULL ) { | |
| 655 SDL_OutOfMemory(); | |
| 656 return(-1); | |
| 657 } | |
| 658 newbucket->prev = bucket; | |
| 659 newbucket->used = 0; | |
| 660 newbucket->base = bucket->base+size; | |
| 661 newbucket->size = extra; | |
| 662 newbucket->next = bucket->next; | |
| 663 if ( bucket->next ) { | |
| 664 bucket->next->prev = newbucket; | |
| 665 } | |
| 666 bucket->next = newbucket; | |
| 667 } | |
| 668 | |
| 669 /* Set the current bucket values and return it! */ | |
| 670 bucket->used = 1; | |
| 671 bucket->size = size; | |
| 672 #ifdef DGA_DEBUG | |
| 673 fprintf(stderr, "Allocated %d bytes at %p\n", bucket->size, bucket->base); | |
| 674 #endif | |
| 675 surfaces_memleft -= size; | |
| 676 surface->flags |= SDL_HWSURFACE; | |
| 677 surface->pixels = bucket->base; | |
| 678 return(0); | |
| 679 } | |
| 680 static void DGA_FreeHWSurface(_THIS, SDL_Surface *surface) | |
| 681 { | |
| 682 vidmem_bucket *bucket, *freeable; | |
| 683 | |
| 684 /* Look for the bucket in the current list */ | |
| 685 for ( bucket=&surfaces; bucket; bucket=bucket->next ) { | |
| 686 if ( bucket->base == (Uint8 *)surface->pixels ) { | |
| 687 break; | |
| 688 } | |
| 689 } | |
| 690 if ( (bucket == NULL) || ! bucket->used ) { | |
| 691 return; | |
| 692 } | |
| 693 | |
| 694 /* Add the memory back to the total */ | |
| 695 #ifdef DGA_DEBUG | |
| 696 printf("Freeing bucket of %d bytes\n", bucket->size); | |
| 697 #endif | |
| 698 surfaces_memleft += bucket->size; | |
| 699 | |
| 700 /* Can we merge the space with surrounding buckets? */ | |
| 701 bucket->used = 0; | |
| 702 if ( bucket->next && ! bucket->next->used ) { | |
| 703 #ifdef DGA_DEBUG | |
| 704 printf("Merging with next bucket, for %d total bytes\n", bucket->size+bucket->next->size); | |
| 705 #endif | |
| 706 freeable = bucket->next; | |
| 707 bucket->size += bucket->next->size; | |
| 708 bucket->next = bucket->next->next; | |
| 709 if ( bucket->next ) { | |
| 710 bucket->next->prev = bucket; | |
| 711 } | |
| 712 free(freeable); | |
| 713 } | |
| 714 if ( bucket->prev && ! bucket->prev->used ) { | |
| 715 #ifdef DGA_DEBUG | |
| 716 printf("Merging with previous bucket, for %d total bytes\n", bucket->prev->size+bucket->size); | |
| 717 #endif | |
| 718 freeable = bucket; | |
| 719 bucket->prev->size += bucket->size; | |
| 720 bucket->prev->next = bucket->next; | |
| 721 if ( bucket->next ) { | |
| 722 bucket->next->prev = bucket->prev; | |
| 723 } | |
| 724 free(freeable); | |
| 725 } | |
| 726 surface->pixels = NULL; | |
| 727 } | |
| 728 | |
| 729 static __inline__ void dst_to_xy(_THIS, SDL_Surface *dst, int *x, int *y) | |
| 730 { | |
| 731 *x = (long)((Uint8 *)dst->pixels - memory_base)%memory_pitch; | |
| 732 *y = (long)((Uint8 *)dst->pixels - memory_base)/memory_pitch; | |
| 733 if ( dst == this->screen ) { | |
| 734 *x += this->offset_x; | |
| 735 *y += this->offset_y; | |
| 736 } | |
| 737 } | |
| 738 | |
| 739 static int DGA_FillHWRect(_THIS, SDL_Surface *dst, SDL_Rect *rect, Uint32 color) | |
| 740 { | |
| 741 int x, y; | |
| 742 unsigned int w, h; | |
| 743 | |
| 744 /* Don't fill the visible part of the screen, wait until flipped */ | |
| 745 if ( was_flipped && (dst == this->screen) ) { | |
| 746 while ( XDGAGetViewportStatus(DGA_Display, DGA_Screen) ) | |
| 747 /* Keep waiting for the hardware ... */ ; | |
| 748 was_flipped = 0; | |
| 749 } | |
| 750 dst_to_xy(this, dst, &x, &y); | |
| 751 x += rect->x; | |
| 752 y += rect->y; | |
| 753 w = rect->w; | |
| 754 h = rect->h; | |
| 755 #if 0 | |
| 756 printf("Hardware accelerated rectangle fill: %dx%d at %d,%d\n", w, h, x, y); | |
| 757 #endif | |
| 758 XDGAFillRectangle(DGA_Display, DGA_Screen, x, y, w, h, color); | |
| 759 sync_needed++; | |
| 760 XFlush(DGA_Display); | |
| 761 return(0); | |
| 762 } | |
| 763 | |
| 764 static int HWAccelBlit(SDL_Surface *src, SDL_Rect *srcrect, | |
| 765 SDL_Surface *dst, SDL_Rect *dstrect) | |
| 766 { | |
| 767 SDL_VideoDevice *this; | |
| 768 int srcx, srcy; | |
| 769 int dstx, dsty; | |
| 770 unsigned int w, h; | |
| 771 | |
| 772 this = current_video; | |
| 773 /* Don't blit to the visible part of the screen, wait until flipped */ | |
| 774 if ( was_flipped && (dst == this->screen) ) { | |
| 775 while ( XDGAGetViewportStatus(DGA_Display, DGA_Screen) ) | |
| 776 /* Keep waiting for the hardware ... */ ; | |
| 777 was_flipped = 0; | |
| 778 } | |
| 779 dst_to_xy(this, src, &srcx, &srcy); | |
| 780 srcx += srcrect->x; | |
| 781 srcy += srcrect->y; | |
| 782 dst_to_xy(this, dst, &dstx, &dsty); | |
| 783 dstx += dstrect->x; | |
| 784 dsty += dstrect->y; | |
| 785 w = srcrect->w; | |
| 786 h = srcrect->h; | |
| 787 #if 0 | |
| 788 printf("Blitting %dx%d from %d,%d to %d,%d\n", w, h, srcx, srcy, dstx, dsty); | |
| 789 #endif | |
| 790 if ( (src->flags & SDL_SRCCOLORKEY) == SDL_SRCCOLORKEY ) { | |
| 791 XDGACopyTransparentArea(DGA_Display, DGA_Screen, | |
| 792 srcx, srcy, w, h, dstx, dsty, src->format->colorkey); | |
| 793 } else { | |
| 794 XDGACopyArea(DGA_Display, DGA_Screen, | |
| 795 srcx, srcy, w, h, dstx, dsty); | |
| 796 } | |
| 797 sync_needed++; | |
| 798 XFlush(DGA_Display); | |
| 799 return(0); | |
| 800 } | |
| 801 | |
| 802 static int DGA_CheckHWBlit(_THIS, SDL_Surface *src, SDL_Surface *dst) | |
| 803 { | |
| 804 int accelerated; | |
| 805 | |
| 806 /* Set initial acceleration on */ | |
| 807 src->flags |= SDL_HWACCEL; | |
| 808 | |
| 809 /* Set the surface attributes */ | |
| 810 if ( (src->flags & SDL_SRCALPHA) == SDL_SRCALPHA ) { | |
| 811 if ( ! this->info.blit_hw_A ) { | |
| 812 src->flags &= ~SDL_HWACCEL; | |
| 813 } | |
| 814 } | |
| 815 if ( (src->flags & SDL_SRCCOLORKEY) == SDL_SRCCOLORKEY ) { | |
| 816 if ( ! this->info.blit_hw_CC ) { | |
| 817 src->flags &= ~SDL_HWACCEL; | |
| 818 } | |
| 819 } | |
| 820 | |
| 821 /* Check to see if final surface blit is accelerated */ | |
| 822 accelerated = !!(src->flags & SDL_HWACCEL); | |
| 823 if ( accelerated ) { | |
| 824 src->map->hw_blit = HWAccelBlit; | |
| 825 } | |
| 826 return(accelerated); | |
| 827 } | |
| 828 | |
| 829 static __inline__ void DGA_WaitHardware(_THIS) | |
| 830 { | |
| 831 if ( sync_needed ) { | |
| 832 XDGASync(DGA_Display, DGA_Screen); | |
| 833 sync_needed = 0; | |
| 834 } | |
| 835 if ( was_flipped ) { | |
| 836 while ( XDGAGetViewportStatus(DGA_Display, DGA_Screen) ) | |
| 837 /* Keep waiting for the hardware ... */ ; | |
| 838 was_flipped = 0; | |
| 839 } | |
| 840 } | |
| 841 | |
| 842 static int DGA_LockHWSurface(_THIS, SDL_Surface *surface) | |
| 843 { | |
| 844 if ( surface == SDL_VideoSurface ) { | |
| 845 SDL_mutexP(hw_lock); | |
| 846 DGA_WaitHardware(this); | |
| 847 } | |
| 848 return(0); | |
| 849 } | |
| 850 static void DGA_UnlockHWSurface(_THIS, SDL_Surface *surface) | |
| 851 { | |
| 852 if ( surface == SDL_VideoSurface ) { | |
| 853 SDL_mutexV(hw_lock); | |
| 854 } | |
| 855 } | |
| 856 | |
| 857 static int DGA_FlipHWSurface(_THIS, SDL_Surface *surface) | |
| 858 { | |
| 859 /* Wait for vertical retrace and then flip display */ | |
| 860 DGA_WaitHardware(this); | |
| 861 XDGASetViewport(DGA_Display, DGA_Screen, | |
| 862 0, flip_yoffset[flip_page], XDGAFlipRetrace); | |
| 863 XFlush(DGA_Display); | |
| 864 was_flipped = 1; | |
| 865 flip_page = !flip_page; | |
| 866 | |
| 867 surface->pixels = flip_address[flip_page]; | |
| 868 return(0); | |
| 869 } | |
| 870 | |
| 871 static void DGA_DirectUpdate(_THIS, int numrects, SDL_Rect *rects) | |
| 872 { | |
| 873 /* The application is already updating the visible video memory */ | |
| 874 return; | |
| 875 } | |
| 876 | |
| 877 static int DGA_SetColors(_THIS, int firstcolor, int ncolors, SDL_Color *colors) | |
| 878 { | |
| 879 int i; | |
| 880 XColor *xcmap; | |
| 881 | |
| 882 /* This happens on initialization */ | |
| 883 if ( ! DGA_colormap ) { | |
| 884 return(0); | |
| 885 } | |
| 886 xcmap = (XColor *)alloca(ncolors*sizeof(*xcmap)); | |
| 887 for ( i=0; i<ncolors; ++i ) { | |
| 888 xcmap[i].pixel = firstcolor + i; | |
| 889 xcmap[i].red = (colors[i].r<<8)|colors[i].r; | |
| 890 xcmap[i].green = (colors[i].g<<8)|colors[i].g; | |
| 891 xcmap[i].blue = (colors[i].b<<8)|colors[i].b; | |
| 892 xcmap[i].flags = (DoRed|DoGreen|DoBlue); | |
| 893 } | |
| 894 XStoreColors(DGA_Display, DGA_colormap, xcmap, ncolors); | |
| 895 XSync(DGA_Display, False); | |
| 896 | |
| 897 /* That was easy. :) */ | |
| 898 return(1); | |
| 899 } | |
| 900 | |
| 901 int DGA_SetGammaRamp(_THIS, Uint16 *ramp) | |
| 902 { | |
| 903 int i, ncolors; | |
| 904 XColor xcmap[256]; | |
| 905 | |
| 906 /* See if actually setting the gamma is supported */ | |
| 907 if ( DGA_visualClass != DirectColor ) { | |
| 908 SDL_SetError("Gamma correction not supported on this visual"); | |
| 909 return(-1); | |
| 910 } | |
| 911 | |
| 912 /* Calculate the appropriate palette for the given gamma ramp */ | |
| 913 if ( this->screen->format->BitsPerPixel <= 16 ) { | |
| 914 ncolors = 64; /* Is this right? */ | |
| 915 } else { | |
| 916 ncolors = 256; | |
| 917 } | |
| 918 for ( i=0; i<ncolors; ++i ) { | |
| 919 Uint8 c = (256 * i / ncolors); | |
| 920 xcmap[i].pixel = SDL_MapRGB(this->screen->format, c, c, c); | |
| 921 xcmap[i].red = ramp[0*256+c]; | |
| 922 xcmap[i].green = ramp[1*256+c]; | |
| 923 xcmap[i].blue = ramp[2*256+c]; | |
| 924 xcmap[i].flags = (DoRed|DoGreen|DoBlue); | |
| 925 } | |
| 926 XStoreColors(DGA_Display, DGA_colormap, xcmap, ncolors); | |
| 927 XSync(DGA_Display, False); | |
| 928 return(0); | |
| 929 } | |
| 930 | |
| 931 void DGA_VideoQuit(_THIS) | |
| 932 { | |
| 933 int i, j; | |
| 934 | |
| 935 if ( DGA_Display ) { | |
| 936 /* Free colormap, if necessary */ | |
| 937 if ( DGA_colormap ) { | |
| 938 XFreeColormap(DGA_Display, DGA_colormap); | |
| 939 DGA_colormap = 0; | |
| 940 } | |
| 941 | |
| 942 /* Unmap memory and reset video mode */ | |
| 943 XDGACloseFramebuffer(DGA_Display, DGA_Screen); | |
| 944 if ( this->screen ) { | |
| 945 /* Tell SDL not to free the pixels */ | |
| 946 this->screen->pixels = NULL; | |
| 947 } | |
| 948 XDGASetMode(DGA_Display, DGA_Screen, 0); | |
| 949 | |
| 950 /* Clear the lock mutex */ | |
| 951 if ( hw_lock != NULL ) { | |
| 952 SDL_DestroyMutex(hw_lock); | |
| 953 hw_lock = NULL; | |
| 954 } | |
| 955 | |
| 956 /* Clean up defined video modes */ | |
| 957 for ( i=0; i<NUM_MODELISTS; ++i ) { | |
| 958 if ( SDL_modelist[i] != NULL ) { | |
| 959 for ( j=0; SDL_modelist[i][j]; ++j ) { | |
| 960 free(SDL_modelist[i][j]); | |
| 961 } | |
| 962 free(SDL_modelist[i]); | |
| 963 SDL_modelist[i] = NULL; | |
| 964 } | |
| 965 } | |
| 966 | |
| 967 /* Clean up the memory bucket list */ | |
| 968 DGA_FreeHWSurfaces(this); | |
| 969 | |
| 970 /* Close up the display */ | |
| 971 XCloseDisplay(DGA_Display); | |
| 972 } | |
| 973 } |