arch/sdl/gr.c

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