arch/sdl/gr.c

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