1 2 /* Bring up a window and play with it */ 3 4 #include <stdlib.h> 5 #include <stdio.h> 6 #include <string.h> 7 8 #define BENCHMARK_SDL 9 10 #define NOTICE(X) printf("%s", X); 11 12 #include "SDL.h" 13 14 /* Call this instead of exit(), so we can clean up SDL: atexit() is evil. */ 15 static void quit(int rc) 16 { 17 SDL_Quit(); 18 exit(rc); 19 } 20 21 void DrawPict(SDL_Surface *screen, char *bmpfile, 22 int speedy, int flip, int nofade) 23 { 24 SDL_Surface *picture; 25 SDL_Rect dest, update; 26 int i, centered; 27 int ncolors; 28 SDL_Color *colors, *cmap; 29 30 /* Load the image into a surface */ 31 if ( bmpfile == NULL ) { 32 bmpfile = "sample.bmp"; /* Sample image */ 33 } 34 fprintf(stderr, "Loading picture: %s\n", bmpfile); 35 picture = SDL_LoadBMP(bmpfile); 36 if ( picture == NULL ) { 37 fprintf(stderr, "Couldn't load %s: %s\n", bmpfile, 38 SDL_GetError()); 39 return; 40 } 41 42 /* Set the display colors -- on a hicolor display this is a no-op */ 43 if ( picture->format->palette ) { 44 ncolors = picture->format->palette->ncolors; 45 colors = (SDL_Color *)malloc(ncolors*sizeof(SDL_Color)); 46 cmap = (SDL_Color *)malloc(ncolors*sizeof(SDL_Color)); 47 memcpy(colors, picture->format->palette->colors, 48 ncolors*sizeof(SDL_Color)); 49 } else { 50 int r, g, b; 51 52 /* Allocate 256 color palette */ 53 ncolors = 256; 54 colors = (SDL_Color *)malloc(ncolors*sizeof(SDL_Color)); 55 cmap = (SDL_Color *)malloc(ncolors*sizeof(SDL_Color)); 56 57 /* Set a 3,3,2 color cube */ 58 for ( r=0; r<8; ++r ) { 59 for ( g=0; g<8; ++g ) { 60 for ( b=0; b<4; ++b ) { 61 i = ((r<<5)|(g<<2)|b); 62 colors[i].r = r<<5; 63 colors[i].g = g<<5; 64 colors[i].b = b<<6; 65 } 66 } 67 } 68 } 69 NOTICE("testwin: setting colors\n"); 70 if ( ! SDL_SetColors(screen, colors, 0, ncolors) && 71 (screen->format->palette != NULL) ) { 72 fprintf(stderr, 73 "Warning: Couldn't set all of the colors, but SDL will map the image\n" 74 " (colormap fading will suffer - try the -warp option)\n" 75 ); 76 } 77 78 /* Set the screen to black (not really necessary) */ 79 if ( SDL_LockSurface(screen) == 0 ) { 80 Uint32 black; 81 Uint8 *pixels; 82 83 black = SDL_MapRGB(screen->format, 0, 0, 0); 84 pixels = (Uint8 *)screen->pixels; 85 for ( i=0; i<screen->h; ++i ) { 86 memset(pixels, black, 87 screen->w*screen->format->BytesPerPixel); 88 pixels += screen->pitch; 89 } 90 SDL_UnlockSurface(screen); 91 SDL_UpdateRect(screen, 0, 0, 0, 0); 92 } 93 94 /* Display the picture */ 95 if ( speedy ) { 96 SDL_Surface *displayfmt; 97 98 fprintf(stderr, "Converting picture\n"); 99 displayfmt = SDL_DisplayFormat(picture); 100 if ( displayfmt == NULL ) { 101 fprintf(stderr, 102 "Couldn't convert image: %s\n", SDL_GetError()); 103 goto done; 104 } 105 SDL_FreeSurface(picture); 106 picture = displayfmt; 107 } 108 printf("(image surface located in %s memory)\n", 109 (picture->flags&SDL_HWSURFACE) ? "video" : "system"); 110 centered = (screen->w - picture->w)/2; 111 if ( centered < 0 ) { 112 centered = 0; 113 } 114 dest.y = (screen->h - picture->h)/2; 115 dest.w = picture->w; 116 dest.h = picture->h; 117 NOTICE("testwin: moving image\n"); 118 for ( i=0; i<=centered; ++i ) { 119 dest.x = i; 120 update = dest; 121 if ( SDL_BlitSurface(picture, NULL, screen, &update) < 0 ) { 122 fprintf(stderr, "Blit failed: %s\n", SDL_GetError()); 123 break; 124 } 125 if ( flip ) { 126 SDL_Flip(screen); 127 } else { 128 SDL_UpdateRects(screen, 1, &update); 129 } 130 } 131 132 #ifdef SCREENSHOT 133 if ( SDL_SaveBMP(screen, "screen.bmp") < 0 ) 134 printf("Couldn't save screen: %s\n", SDL_GetError()); 135 #endif 136 137 #ifndef BENCHMARK_SDL 138 /* Let it sit there for a while */ 139 SDL_Delay(5*1000); 140 #endif 141 /* Fade the colormap */ 142 if ( ! nofade ) { 143 int maxstep; 144 SDL_Color final; 145 SDL_Color palcolors[256]; 146 struct { 147 Sint16 r, g, b; 148 } cdist[256]; 149 150 NOTICE("testwin: fading out...\n"); 151 memcpy(cmap, colors, ncolors*sizeof(SDL_Color)); 152 maxstep = 32-1; 153 final.r = 0xFF; 154 final.g = 0x00; 155 final.b = 0x00; 156 memcpy(palcolors, colors, ncolors*sizeof(SDL_Color)); 157 for ( i=0; i<ncolors; ++i ) { 158 cdist[i].r = final.r-palcolors[i].r; 159 cdist[i].g = final.g-palcolors[i].g; 160 cdist[i].b = final.b-palcolors[i].b; 161 } 162 for ( i=0; i<=maxstep/2; ++i ) { /* halfway fade */ 163 int c; 164 for ( c=0; c<ncolors; ++c ) { 165 colors[c].r = 166 palcolors[c].r+((cdist[c].r*i))/maxstep; 167 colors[c].g = 168 palcolors[c].g+((cdist[c].g*i))/maxstep; 169 colors[c].b = 170 palcolors[c].b+((cdist[c].b*i))/maxstep; 171 } 172 SDL_SetColors(screen, colors, 0, ncolors); 173 SDL_Delay(1); 174 } 175 final.r = 0x00; 176 final.g = 0x00; 177 final.b = 0x00; 178 memcpy(palcolors, colors, ncolors*sizeof(SDL_Color)); 179 for ( i=0; i<ncolors; ++i ) { 180 cdist[i].r = final.r-palcolors[i].r; 181 cdist[i].g = final.g-palcolors[i].g; 182 cdist[i].b = final.b-palcolors[i].b; 183 } 184 maxstep /= 2; 185 for ( i=0; i<=maxstep; ++i ) { /* finish fade out */ 186 int c; 187 for ( c=0; c<ncolors; ++c ) { 188 colors[c].r = 189 palcolors[c].r+((cdist[c].r*i))/maxstep; 190 colors[c].g = 191 palcolors[c].g+((cdist[c].g*i))/maxstep; 192 colors[c].b = 193 palcolors[c].b+((cdist[c].b*i))/maxstep; 194 } 195 SDL_SetColors(screen, colors, 0, ncolors); 196 SDL_Delay(1); 197 } 198 for ( i=0; i<ncolors; ++i ) { 199 colors[i].r = final.r; 200 colors[i].g = final.g; 201 colors[i].b = final.b; 202 } 203 SDL_SetColors(screen, colors, 0, ncolors); 204 NOTICE("testwin: fading in...\n"); 205 memcpy(palcolors, colors, ncolors*sizeof(SDL_Color)); 206 for ( i=0; i<ncolors; ++i ) { 207 cdist[i].r = cmap[i].r-palcolors[i].r; 208 cdist[i].g = cmap[i].g-palcolors[i].g; 209 cdist[i].b = cmap[i].b-palcolors[i].b; 210 } 211 for ( i=0; i<=maxstep; ++i ) { /* 32 step fade in */ 212 int c; 213 for ( c=0; c<ncolors; ++c ) { 214 colors[c].r = 215 palcolors[c].r+((cdist[c].r*i))/maxstep; 216 colors[c].g = 217 palcolors[c].g+((cdist[c].g*i))/maxstep; 218 colors[c].b = 219 palcolors[c].b+((cdist[c].b*i))/maxstep; 220 } 221 SDL_SetColors(screen, colors, 0, ncolors); 222 SDL_Delay(1); 223 } 224 NOTICE("testwin: fading over\n"); 225 } 226 227 done: 228 /* Free the picture and return */ 229 SDL_FreeSurface(picture); 230 free(colors); free(cmap); 231 return; 232 } 233 234 int main(int argc, char *argv[]) 235 { 236 SDL_Surface *screen; 237 /* Options */ 238 int speedy, flip, nofade; 239 int delay; 240 int w, h; 241 int desired_bpp; 242 Uint32 video_flags; 243 #ifdef BENCHMARK_SDL 244 Uint32 then, now; 245 #endif 246 /* Set default options and check command-line */ 247 speedy = 0; 248 flip = 0; 249 nofade = 0; 250 delay = 1; 251 252 #ifdef _WIN32_WCE 253 w = 240; 254 h = 320; 255 desired_bpp = 8; 256 video_flags = SDL_FULLSCREEN; 257 #else 258 w = 640; 259 h = 480; 260 desired_bpp = 0; 261 video_flags = 0; 262 #endif 263 if ( SDL_Init(SDL_INIT_VIDEO) < 0 ) { 264 fprintf(stderr, 265 "Couldn't initialize SDL: %s\n", SDL_GetError()); 266 return(1); 267 } 268 269 while ( argc > 1 ) { 270 if ( strcmp(argv[1], "-speedy") == 0 ) { 271 speedy = 1; 272 argv += 1; 273 argc -= 1; 274 } else 275 if ( strcmp(argv[1], "-nofade") == 0 ) { 276 nofade = 1; 277 argv += 1; 278 argc -= 1; 279 } else 280 if ( strcmp(argv[1], "-delay") == 0 ) { 281 if ( argv[2] ) { 282 delay = atoi(argv[2]); 283 argv += 2; 284 argc -= 2; 285 } else { 286 fprintf(stderr, 287 "The -delay option requires an argument\n"); 288 quit(1); 289 } 290 } else 291 if ( strcmp(argv[1], "-width") == 0 ) { 292 if ( argv[2] && ((w = atoi(argv[2])) > 0) ) { 293 argv += 2; 294 argc -= 2; 295 } else { 296 fprintf(stderr, 297 "The -width option requires an argument\n"); 298 quit(1); 299 } 300 } else 301 if ( strcmp(argv[1], "-height") == 0 ) { 302 if ( argv[2] && ((h = atoi(argv[2])) > 0) ) { 303 argv += 2; 304 argc -= 2; 305 } else { 306 fprintf(stderr, 307 "The -height option requires an argument\n"); 308 quit(1); 309 } 310 } else 311 if ( strcmp(argv[1], "-bpp") == 0 ) { 312 if ( argv[2] ) { 313 desired_bpp = atoi(argv[2]); 314 argv += 2; 315 argc -= 2; 316 } else { 317 fprintf(stderr, 318 "The -bpp option requires an argument\n"); 319 quit(1); 320 } 321 } else 322 if ( strcmp(argv[1], "-warp") == 0 ) { 323 video_flags |= SDL_HWPALETTE; 324 argv += 1; 325 argc -= 1; 326 } else 327 if ( strcmp(argv[1], "-hw") == 0 ) { 328 video_flags |= SDL_HWSURFACE; 329 argv += 1; 330 argc -= 1; 331 } else 332 if ( strcmp(argv[1], "-flip") == 0 ) { 333 video_flags |= SDL_DOUBLEBUF; 334 argv += 1; 335 argc -= 1; 336 } else 337 if ( strcmp(argv[1], "-fullscreen") == 0 ) { 338 video_flags |= SDL_FULLSCREEN; 339 argv += 1; 340 argc -= 1; 341 } else 342 break; 343 } 344 345 /* Initialize the display */ 346 screen = SDL_SetVideoMode(w, h, desired_bpp, video_flags); 347 if ( screen == NULL ) { 348 fprintf(stderr, "Couldn't set %dx%dx%d video mode: %s\n", 349 w, h, desired_bpp, SDL_GetError()); 350 quit(1); 351 } 352 printf("Set%s %dx%dx%d mode\n", 353 screen->flags & SDL_FULLSCREEN ? " fullscreen" : "", 354 screen->w, screen->h, screen->format->BitsPerPixel); 355 printf("(video surface located in %s memory)\n", 356 (screen->flags&SDL_HWSURFACE) ? "video" : "system"); 357 if ( screen->flags & SDL_DOUBLEBUF ) { 358 printf("Double-buffering enabled\n"); 359 flip = 1; 360 } 361 362 /* Set the window manager title bar */ 363 SDL_WM_SetCaption("SDL test window", "testwin"); 364 365 /* Do all the drawing work */ 366 #ifdef BENCHMARK_SDL 367 then = SDL_GetTicks(); 368 DrawPict(screen, argv[1], speedy, flip, nofade); 369 now = SDL_GetTicks(); 370 printf("Time: %d milliseconds\n", now-then); 371 #else 372 DrawPict(screen, argv[1], speedy, flip, nofade); 373 #endif 374 SDL_Delay(delay*1000); 375 SDL_Quit(); 376 return(0); 377 } 378
