arch/sdl/gr.c

   1 /* $Id: gr.c,v 1.9 2003-01-15 02:42:41 btb Exp $ */
   2 /*
   3  *
   4  * SDL video functions.
   5  *
   6  *
   7  */
   8
   9 #ifdef HAVE_CONFIG_H
  10 #include <conf.h>
  11 #endif
  12
  13 #include <stdlib.h>
  14 #include <string.h>
  15 #include <SDL.h>
  16
  17 #include "gr.h"
  18 #include "grdef.h"
  19 #include "palette.h"
  20 #include "u_mem.h"
  21 #include "error.h"
  22 #include "menu.h"
  23
  24 //added on 9/30/98 by Matt Mueller to set the title bar.  Woohoo!
  25 #include "vers_id.h"
  26 //end addition -MM
  27
  28 #include "gamefont.h"
  29
  30 //added 10/05/98 by Matt Mueller - make fullscreen mode optional
  31 #include "args.h"
  32
  33 int sdl_video_flags = SDL_SWSURFACE | SDL_HWPALETTE;
  34 char checkvidmodeok=0;
  35 //end addition -MM
  36
  37 SDL_Surface *screen;
  38
  39 int gr_installed = 0;
  40
  41 //added 05/19/99 Matt Mueller - locking stuff
  42 #ifdef GR_LOCK
  43 #include "checker.h"
  44 #ifdef TEST_GR_LOCK
  45 int gr_testlocklevel=0;
  46 #endif
  47 inline void gr_dolock(const char *file,int line) {
  48         gr_dotestlock();
  49         if ( gr_testlocklevel==1 && SDL_MUSTLOCK(screen) ) {
  50 #ifdef __CHECKER__
  51                 chcksetwritable(screen.pixels,screen->w*screen->h*screen->format->BytesPerPixel);
  52 #endif
  53                 if ( SDL_LockSurface(screen) < 0 )Error("could not lock screen (%s:%i)\n",file,line);
  54         }
  55 }
  56 inline void gr_dounlock(void) {
  57         gr_dotestunlock();
  58         if (gr_testlocklevel==0 && SDL_MUSTLOCK(screen) ) {
  59                 SDL_UnlockSurface(screen);
  60 #ifdef __CHECKER__
  61                 chcksetunwritable(screen.pixels,screen->w*screen->h*screen->format->BytesPerPixel);
  62 #endif
  63         }
  64 }
  65 #endif
  66 //end addition -MM
  67
  68 void gr_palette_clear(); // Function prototype for gr_init;
  69
  70
  71 void gr_update()
  72 {
  73         //added 05/19/99 Matt Mueller - locking stuff
  74 //      gr_testunlock();
  75         //end addition -MM
  76  SDL_UpdateRect(screen,0,0,0,0);
  77 }
  78
  79 extern int VGA_current_mode; // DPH: kludge - remove at all costs
  80
  81 int gr_set_mode(u_int32_t mode)
  82 {
  83         int w,h;
  84
  85 #ifdef NOGRAPH
  86         return 0;
  87 #endif
  88
  89         if (mode<=0)
  90                 return 0;
  91
  92         w=SM_W(mode);
  93         h=SM_H(mode);
  94         VGA_current_mode = mode;
  95
  96         if (screen != NULL) gr_palette_clear();
  97
  98 //added on 11/06/98 by Matt Mueller to set the title bar. (moved from below)
  99 //sekmu: might wanna copy this litte blurb to one of the text files or something
 100 //we want to set it here so that X window manager "Style" type commands work
 101 //for example, in fvwm2 or fvwm95:
 102 //Style "D1X*"  NoTitle, NoHandles, BorderWidth 0
 103 //if you can't use -fullscreen like me (crashes X), this is a big help in
 104 //getting the window centered correctly (if you use SmartPlacement)
 105         SDL_WM_SetCaption(DESCENT_VERSION, "Descent II");
 106 //end addition -MM
 107
 108 //edited 10/05/98 by Matt Mueller - make fullscreen mode optional
 109           // changed by adb on 980913: added SDL_HWPALETTE (should be option?)
 110         // changed by someone on 980923 to add SDL_FULLSCREEN
 111         if(!checkvidmodeok || SDL_VideoModeOK(w,h,8,sdl_video_flags)){
 112           screen = SDL_SetVideoMode(w, h, 8, sdl_video_flags);
 113         } else {
 114           screen=NULL;
 115         }
 116         // end changes by someone
 117         // end changes by adb
 118 //end edit -MM
 119         if (screen == NULL) {
 120            Error("Could not set %dx%dx8 video mode\n",w,h);
 121            exit(1);
 122         }
 123         memset( grd_curscreen, 0, sizeof(grs_screen));
 124         grd_curscreen->sc_mode = mode;
 125         grd_curscreen->sc_w = w;
 126         grd_curscreen->sc_h = h;
 127         grd_curscreen->sc_aspect = fixdiv(grd_curscreen->sc_w*3,grd_curscreen->sc_h*4);
 128         grd_curscreen->sc_canvas.cv_bitmap.bm_x = 0;
 129         grd_curscreen->sc_canvas.cv_bitmap.bm_y = 0;
 130         grd_curscreen->sc_canvas.cv_bitmap.bm_w = w;
 131         grd_curscreen->sc_canvas.cv_bitmap.bm_h = h;
 132         grd_curscreen->sc_canvas.cv_bitmap.bm_rowsize = screen->pitch;
 133         grd_curscreen->sc_canvas.cv_bitmap.bm_type = BM_LINEAR;
 134         grd_curscreen->sc_canvas.cv_bitmap.bm_data = (unsigned char *)screen->pixels;
 135         gr_set_current_canvas(NULL);
 136         //gr_enable_default_palette_loading();
 137
 138 //added on 9/30/98 by Matt Mueller to hide the mouse if its over the game window
 139         SDL_ShowCursor(0);
 140 //end addition -MM
 141 //--moved up--added on 9/30/98 by Matt Mueller to set the title bar.  Woohoo!
 142 //--moved up--  SDL_WM_SetCaption(DESCENT_VERSION " " D1X_DATE, NULL);
 143 //--moved up--end addition -MM
 144
 145 //      gamefont_choose_game_font(w,h);
 146         return 0;
 147 }
 148
 149 int gr_check_fullscreen(void){
 150         return (sdl_video_flags & SDL_FULLSCREEN)?1:0;
 151 }
 152
 153 int gr_toggle_fullscreen(void){
 154         sdl_video_flags^=SDL_FULLSCREEN;
 155         SDL_WM_ToggleFullScreen(screen);
 156         return (sdl_video_flags & SDL_FULLSCREEN)?1:0;
 157 }
 158
 159 int gr_init(void)
 160 {
 161         // Only do this function once!
 162         if (gr_installed==1)
 163                 return -1;
 164
 165         if (SDL_Init(SDL_INIT_VIDEO) < 0)
 166         {
 167                 Error("SDL library video initialisation failed: %s.",SDL_GetError());
 168         }
 169         MALLOC( grd_curscreen,grs_screen,1 );
 170         memset( grd_curscreen, 0, sizeof(grs_screen));
 171
 172 //added 10/05/98 by Matt Mueller - make fullscreen mode optional
 173         if (FindArg("-fullscreen"))
 174              sdl_video_flags|=SDL_FULLSCREEN;
 175 //end addition -MM
 176         //added 05/19/99 Matt Mueller - make HW surface optional
 177         if (FindArg("-hwsurface"))
 178              sdl_video_flags|=SDL_HWSURFACE;
 179         //end addition -MM
 180         if (FindArg("-nosdlvidmodecheck"))
 181                 checkvidmodeok=0;
 182
 183         grd_curscreen->sc_canvas.cv_color = 0;
 184         grd_curscreen->sc_canvas.cv_drawmode = 0;
 185         grd_curscreen->sc_canvas.cv_font = NULL;
 186         grd_curscreen->sc_canvas.cv_font_fg_color = 0;
 187         grd_curscreen->sc_canvas.cv_font_bg_color = 0;
 188         gr_set_current_canvas( &grd_curscreen->sc_canvas );
 189
 190         gr_installed = 1;
 191         // added on 980913 by adb to add cleanup
 192         atexit(gr_close);
 193         // end changes by adb
 194
 195         return 0;
 196 }
 197
 198 void gr_close()
 199 {
 200         if (gr_installed==1)
 201         {
 202                 gr_installed = 0;
 203                 d_free(grd_curscreen);
 204         }
 205 }
 206
 207 // Palette functions follow.
 208
 209 static int last_r=0, last_g=0, last_b=0;
 210
 211 void gr_palette_clear()
 212 {
 213  SDL_Palette *palette;
 214  SDL_Color colors[256];
 215  int ncolors;
 216
 217  palette = screen->format->palette;
 218
 219  if (palette == NULL) {
 220     return; // Display is not palettised
 221  }
 222
 223  ncolors = palette->ncolors;
 224  memset(colors, 0, ncolors * sizeof(SDL_Color));
 225
 226  SDL_SetColors(screen, colors, 0, 256);
 227
 228  gr_palette_faded_out = 1;
 229 }
 230
 231
 232 void gr_palette_step_up( int r, int g, int b )
 233 {
 234  int i;
 235  ubyte *p = gr_palette;
 236  int temp;
 237
 238  SDL_Palette *palette;
 239  SDL_Color colors[256];
 240
 241  if (gr_palette_faded_out) return;
 242
 243  if ( (r==last_r) && (g==last_g) && (b==last_b) ) return;
 244
 245  last_r = r;
 246  last_g = g;
 247  last_b = b;
 248
 249  palette = screen->format->palette;
 250
 251  if (palette == NULL) {
 252     return; // Display is not palettised
 253  }
 254
 255  for (i=0; i<256; i++) {
 256    temp = (int)(*p++) + r + gr_palette_gamma;
 257    if (temp<0) temp=0;
 258    else if (temp>63) temp=63;
 259    colors[i].r = temp * 4;
 260    temp = (int)(*p++) + g + gr_palette_gamma;
 261    if (temp<0) temp=0;
 262    else if (temp>63) temp=63;
 263    colors[i].g = temp * 4;
 264    temp = (int)(*p++) + b + gr_palette_gamma;
 265    if (temp<0) temp=0;
 266    else if (temp>63) temp=63;
 267    colors[i].b = temp * 4;
 268  }
 269
 270  SDL_SetColors(screen, colors, 0, 256);
 271 }
 272
 273 //added on 980913 by adb to fix palette problems
 274 // need a min without side effects...
 275 #undef min
 276 static inline int min(int x, int y) { return x < y ? x : y; }
 277 //end changes by adb
 278
 279 void gr_palette_load( ubyte *pal )
 280 {
 281  int i, j;
 282  SDL_Palette *palette;
 283  SDL_Color colors[256];
 284
 285  for (i=0; i<768; i++ ) {
 286      gr_current_pal[i] = pal[i];
 287      if (gr_current_pal[i] > 63) gr_current_pal[i] = 63;
 288  }
 289
 290  palette = screen->format->palette;
 291
 292  if (palette == NULL) {
 293     return; // Display is not palettised
 294  }
 295
 296  for (i = 0, j = 0; j < 256; j++) {
 297      //changed on 980913 by adb to fix palette problems
 298      colors[j].r = (min(gr_current_pal[i++] + gr_palette_gamma, 63)) * 4;
 299      colors[j].g = (min(gr_current_pal[i++] + gr_palette_gamma, 63)) * 4;
 300      colors[j].b = (min(gr_current_pal[i++] + gr_palette_gamma, 63)) * 4;
 301      //end changes by adb
 302  }
 303  SDL_SetColors(screen, colors, 0, 256);
 304
 305  gr_palette_faded_out = 0;
 306  init_computed_colors();
 307 }
 308
 309
 310
 311 int gr_palette_fade_out(ubyte *pal, int nsteps, int allow_keys)
 312 {
 313  int i, j, k;
 314  ubyte c;
 315  fix fade_palette[768];
 316  fix fade_palette_delta[768];
 317
 318  SDL_Palette *palette;
 319  SDL_Color fade_colors[256];
 320
 321  if (gr_palette_faded_out) return 0;
 322
 323 #if 1 //ifndef NDEBUG
 324         if (grd_fades_disabled) {
 325                 gr_palette_clear();
 326                 return 0;
 327         }
 328 #endif
 329
 330  palette = screen->format->palette;
 331  if (palette == NULL) {
 332     return -1; // Display is not palettised
 333  }
 334
 335  if (pal==NULL) pal=gr_current_pal;
 336
 337  for (i=0; i<768; i++ ) {
 338      gr_current_pal[i] = pal[i];
 339      fade_palette[i] = i2f(pal[i]);
 340      fade_palette_delta[i] = fade_palette[i] / nsteps;
 341  }
 342  for (j=0; j<nsteps; j++ )      {
 343      for (i=0, k = 0; k<256; k++ )      {
 344          fade_palette[i] -= fade_palette_delta[i];
 345          if (fade_palette[i] > i2f(pal[i] + gr_palette_gamma) )
 346             fade_palette[i] = i2f(pal[i] + gr_palette_gamma);
 347          c = f2i(fade_palette[i]);
 348          if (c > 63) c = 63;
 349          fade_colors[k].r = c * 4;
 350          i++;
 351
 352          fade_palette[i] -= fade_palette_delta[i];
 353          if (fade_palette[i] > i2f(pal[i] + gr_palette_gamma) )
 354             fade_palette[i] = i2f(pal[i] + gr_palette_gamma);
 355          c = f2i(fade_palette[i]);
 356          if (c > 63) c = 63;
 357          fade_colors[k].g = c * 4;
 358          i++;
 359
 360          fade_palette[i] -= fade_palette_delta[i];
 361          if (fade_palette[i] > i2f(pal[i] + gr_palette_gamma) )
 362             fade_palette[i] = i2f(pal[i] + gr_palette_gamma);
 363          c = f2i(fade_palette[i]);
 364          if (c > 63) c = 63;
 365          fade_colors[k].b = c * 4;
 366          i++;
 367      }
 368
 369   SDL_SetColors(screen, fade_colors, 0, 256);
 370  }
 371
 372  gr_palette_faded_out = 1;
 373  return 0;
 374 }
 375
 376
 377
 378 int gr_palette_fade_in(ubyte *pal, int nsteps, int allow_keys)
 379 {
 380  int i, j, k, ncolors;
 381  ubyte c;
 382  fix fade_palette[768];
 383  fix fade_palette_delta[768];
 384
 385  SDL_Palette *palette;
 386  SDL_Color fade_colors[256];
 387
 388  if (!gr_palette_faded_out) return 0;
 389
 390 #if 1 //ifndef NDEBUG
 391         if (grd_fades_disabled) {
 392                 gr_palette_load(pal);
 393                 return 0;
 394         }
 395 #endif
 396
 397  palette = screen->format->palette;
 398
 399  if (palette == NULL) {
 400     return -1; // Display is not palettised
 401  }
 402
 403  ncolors = palette->ncolors;
 404
 405  for (i=0; i<768; i++ ) {
 406      gr_current_pal[i] = pal[i];
 407      fade_palette[i] = 0;
 408      fade_palette_delta[i] = i2f(pal[i]) / nsteps;
 409  }
 410
 411  for (j=0; j<nsteps; j++ )      {
 412      for (i=0, k = 0; k<256; k++ )      {
 413          fade_palette[i] += fade_palette_delta[i];
 414          if (fade_palette[i] > i2f(pal[i] + gr_palette_gamma) )
 415             fade_palette[i] = i2f(pal[i] + gr_palette_gamma);
 416          c = f2i(fade_palette[i]);
 417          if (c > 63) c = 63;
 418          fade_colors[k].r = c * 4;
 419          i++;
 420
 421          fade_palette[i] += fade_palette_delta[i];
 422          if (fade_palette[i] > i2f(pal[i] + gr_palette_gamma) )
 423             fade_palette[i] = i2f(pal[i] + gr_palette_gamma);
 424          c = f2i(fade_palette[i]);
 425          if (c > 63) c = 63;
 426          fade_colors[k].g = c * 4;
 427          i++;
 428
 429          fade_palette[i] += fade_palette_delta[i];
 430          if (fade_palette[i] > i2f(pal[i] + gr_palette_gamma) )
 431             fade_palette[i] = i2f(pal[i] + gr_palette_gamma);
 432          c = f2i(fade_palette[i]);
 433          if (c > 63) c = 63;
 434          fade_colors[k].b = c * 4;
 435          i++;
 436      }
 437
 438   SDL_SetColors(screen, fade_colors, 0, 256);
 439  }
 440  //added on 980913 by adb to fix palette problems
 441  gr_palette_load(pal);
 442  //end changes by adb
 443
 444  gr_palette_faded_out = 0;
 445  return 0;
 446 }
 447
 448
 449
 450 void gr_palette_read(ubyte * pal)
 451 {
 452  SDL_Palette *palette;
 453  int i, j;
 454
 455  palette = screen->format->palette;
 456
 457  if (palette == NULL) {
 458     return; // Display is not palettised
 459  }
 460
 461  for (i = 0, j=0; i < 256; i++) {
 462      pal[j++] = palette->colors[i].r / 4;
 463      pal[j++] = palette->colors[i].g / 4;
 464      pal[j++] = palette->colors[i].b / 4;
 465  }
 466 }