video/sdl_gr.c

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