main/movie.c

   1 /* $Id: movie.c,v 1.39 2005-07-30 01:50:17 chris Exp $ */
   2 /*
   3 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
   4 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
   5 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
   6 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
   7 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
   8 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
   9 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
  10 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
  11 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
  12 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
  13 */
  14
  15 /*
  16  *
  17  * Movie Playing Stuff
  18  *
  19  */
  20
  21 #ifdef HAVE_CONFIG_H
  22 #include <conf.h>
  23 #endif
  24
  25 #ifdef RCS
  26 static char rcsid[] = "$Id: movie.c,v 1.39 2005-07-30 01:50:17 chris Exp $";
  27 #endif
  28
  29 #include <string.h>
  30 #ifndef macintosh
  31 # ifndef _WIN32_WCE
  32 #  include <sys/types.h>
  33 #  include <sys/stat.h>
  34 #  include <fcntl.h>
  35 # endif
  36 # ifndef _MSC_VER
  37 #  include <unistd.h>
  38 # endif
  39 #endif // ! macintosh
  40 #include <ctype.h>
  41
  42 #include "movie.h"
  43 #include "console.h"
  44 #include "args.h"
  45 #include "key.h"
  46 #include "digi.h"
  47 #include "songs.h"
  48 #include "inferno.h"
  49 #include "palette.h"
  50 #include "strutil.h"
  51 #include "error.h"
  52 #include "u_mem.h"
  53 #include "byteswap.h"
  54 #include "gr.h"
  55 #include "gamefont.h"
  56 #include "cfile.h"
  57 #include "menu.h"
  58 #include "libmve.h"
  59 #include "text.h"
  60 #include "screens.h"
  61 #include "physfsrwops.h"
  62
  63 extern int MenuHiresAvailable;
  64 extern char CDROM_dir[];
  65
  66 #define VID_PLAY 0
  67 #define VID_PAUSE 1
  68
  69 int Vid_State;
  70
  71
  72 // Subtitle data
  73 typedef struct {
  74         short first_frame,last_frame;
  75         char *msg;
  76 } subtitle;
  77
  78 #define MAX_SUBTITLES 500
  79 #define MAX_ACTIVE_SUBTITLES 3
  80 subtitle Subtitles[MAX_SUBTITLES];
  81 int Num_subtitles;
  82
  83 // Movielib data
  84
  85 #ifdef D2_OEM
  86 char movielib_files[5][FILENAME_LEN] = {"intro","other","robots","oem"};
  87 #else
  88 char movielib_files[4][FILENAME_LEN] = {"intro","other","robots"};
  89 #endif
  90
  91 #define N_MOVIE_LIBS (sizeof(movielib_files) / sizeof(*movielib_files))
  92 #define N_BUILTIN_MOVIE_LIBS (N_MOVIE_LIBS - 1)
  93 #define EXTRA_ROBOT_LIB N_BUILTIN_MOVIE_LIBS
  94
  95 int MovieHires = 1;   //default is highres
  96
  97 SDL_RWops *RoboFile;
  98
  99 // Function Prototypes
 100 int RunMovie(char *filename, int highres_flag, int allow_abort,int dx,int dy);
 101
 102 void change_filename_ext( char *dest, char *src, char *ext );
 103 void decode_text_line(char *p);
 104 void draw_subtitles(int frame_num);
 105
 106
 107 // ----------------------------------------------------------------------
 108 void* MPlayAlloc(unsigned size)
 109 {
 110     return d_malloc(size);
 111 }
 112
 113 void MPlayFree(void *p)
 114 {
 115     d_free(p);
 116 }
 117
 118
 119 //-----------------------------------------------------------------------
 120
 121 unsigned int FileRead(void *handle, void *buf, unsigned int count)
 122 {
 123     unsigned numread;
 124     numread = SDL_RWread((SDL_RWops *)handle, buf, 1, count);
 125     return (numread == count);
 126 }
 127
 128
 129 //-----------------------------------------------------------------------
 130
 131
 132 //filename will actually get modified to be either low-res or high-res
 133 //returns status.  see values in movie.h
 134 int PlayMovie(const char *filename, int must_have)
 135 {
 136         char name[FILENAME_LEN],*p;
 137         int c, ret;
 138
 139         if (FindArg("-nomovies"))
 140                 return MOVIE_NOT_PLAYED;
 141
 142         strcpy(name,filename);
 143
 144         if ((p=strchr(name,'.')) == NULL)               //add extension, if missing
 145                 strcat(name,".mve");
 146
 147         //check for escape already pressed & abort if so
 148         while ((c=key_inkey()) != 0)
 149                 if (c == KEY_ESC)
 150                         return MOVIE_ABORTED;
 151
 152         // Stop all digital sounds currently playing.
 153         digi_stop_all();
 154
 155         // Stop all songs
 156         songs_stop_all();
 157
 158         digi_close();
 159
 160         // Start sound
 161         if (!FindArg("-nosound"))
 162                 MVE_sndInit(1);
 163         else
 164                 MVE_sndInit(-1);
 165
 166         ret = RunMovie(name,MovieHires,must_have,-1,-1);
 167
 168         if (!FindArg("-nosound"))
 169                 digi_init();
 170
 171         Screen_mode = -1;               //force screen reset
 172
 173         return ret;
 174 }
 175
 176
 177 void MovieShowFrame(ubyte *buf, uint bufw, uint bufh, uint sx, uint sy,
 178                                         uint w, uint h, uint dstx, uint dsty)
 179 {
 180         grs_bitmap source_bm;
 181
 182         //mprintf((0,"MovieShowFrame %d,%d  %d,%d  %d,%d  %d,%d\n",bufw,bufh,sx,sy,w,h,dstx,dsty));
 183
 184         Assert(bufw == w && bufh == h);
 185
 186         source_bm.bm_x = source_bm.bm_y = 0;
 187         source_bm.bm_w = source_bm.bm_rowsize = bufw;
 188         source_bm.bm_h = bufh;
 189         source_bm.bm_type = BM_LINEAR;
 190         source_bm.bm_flags = 0;
 191         source_bm.bm_data = buf;
 192
 193         gr_bm_ubitblt(bufw,bufh,dstx,dsty,sx,sy,&source_bm,&grd_curcanv->cv_bitmap);
 194 }
 195
 196 //our routine to set the pallete, called from the movie code
 197 void MovieSetPalette(unsigned char *p, unsigned start, unsigned count)
 198 {
 199         if (count == 0)
 200                 return;
 201
 202         //mprintf((0,"SetPalette p=%x, start=%d, count=%d\n",p,start,count));
 203
 204         //Color 0 should be black, and we get color 255
 205         Assert(start>=1 && start+count-1<=254);
 206
 207         //Set color 0 to be black
 208         gr_palette[0] = gr_palette[1] = gr_palette[2] = 0;
 209
 210         //Set color 255 to be our subtitle color
 211         gr_palette[765] = gr_palette[766] = gr_palette[767] = 50;
 212
 213         //movie libs palette into our array
 214         memcpy(gr_palette+start*3,p+start*3,count*3);
 215
 216         //finally set the palette in the hardware
 217         //gr_palette_load(gr_palette);
 218
 219         //MVE_SetPalette(p, start, count);
 220 }
 221
 222
 223 #if 0
 224 typedef struct bkg {
 225         short x, y, w, h;           // The location of the menu.
 226         grs_bitmap * bmp;               // The background under the menu.
 227 } bkg;
 228
 229 bkg movie_bg = {0,0,0,0,NULL};
 230 #endif
 231
 232 #define BOX_BORDER (MenuHires?40:20)
 233
 234
 235 void show_pause_message(char *msg)
 236 {
 237         int w,h,aw;
 238         int x,y;
 239
 240         gr_set_current_canvas(NULL);
 241         gr_set_curfont( SMALL_FONT );
 242
 243         gr_get_string_size(msg,&w,&h,&aw);
 244
 245         x = (grd_curscreen->sc_w-w)/2;
 246         y = (grd_curscreen->sc_h-h)/2;
 247
 248 #if 0
 249         if (movie_bg.bmp) {
 250                 gr_free_bitmap(movie_bg.bmp);
 251                 movie_bg.bmp = NULL;
 252         }
 253
 254         // Save the background of the display
 255         movie_bg.x=x; movie_bg.y=y; movie_bg.w=w; movie_bg.h=h;
 256
 257         movie_bg.bmp = gr_create_bitmap( w+BOX_BORDER, h+BOX_BORDER );
 258
 259         gr_bm_ubitblt(w+BOX_BORDER, h+BOX_BORDER, 0, 0, x-BOX_BORDER/2, y-BOX_BORDER/2, &(grd_curcanv->cv_bitmap), movie_bg.bmp );
 260 #endif
 261
 262         gr_setcolor(0);
 263         gr_rect(x-BOX_BORDER/2,y-BOX_BORDER/2,x+w+BOX_BORDER/2-1,y+h+BOX_BORDER/2-1);
 264
 265         gr_set_fontcolor( 255, -1 );
 266
 267         gr_ustring( 0x8000, y, msg );
 268
 269         gr_update();
 270 }
 271
 272 void clear_pause_message()
 273 {
 274 #if 0
 275         if (movie_bg.bmp) {
 276
 277                 gr_bitmap(movie_bg.x-BOX_BORDER/2, movie_bg.y-BOX_BORDER/2, movie_bg.bmp);
 278
 279                 gr_free_bitmap(movie_bg.bmp);
 280                 movie_bg.bmp = NULL;
 281         }
 282 #endif
 283 }
 284
 285
 286 //returns status.  see movie.h
 287 int RunMovie(char *filename, int hires_flag, int must_have,int dx,int dy)
 288 {
 289         SDL_RWops *filehndl;
 290         int result=1,aborted=0;
 291         int track = 0;
 292         int frame_num;
 293         int key;
 294 #ifdef OGL
 295         ubyte pal_save[768];
 296 #endif
 297
 298         result=1;
 299
 300         // Open Movie file.  If it doesn't exist, no movie, just return.
 301
 302         filehndl = PHYSFSRWOPS_openRead(filename);
 303
 304         if (!filehndl)
 305         {
 306                 if (must_have)
 307                         con_printf(CON_URGENT, "Can't open movie <%s>: %s\n", filename, PHYSFS_getLastError());
 308                 return MOVIE_NOT_PLAYED;
 309         }
 310
 311         MVE_memCallbacks(MPlayAlloc, MPlayFree);
 312         MVE_ioCallbacks(FileRead);
 313
 314         if (hires_flag) {
 315                 gr_set_mode(SM(640,480));
 316         } else {
 317                 gr_set_mode(SM(320,200));
 318         }
 319 #ifdef OGL
 320         set_screen_mode(SCREEN_MENU);
 321         gr_copy_palette(pal_save, gr_palette, 768);
 322         memset(gr_palette, 0, 768);
 323         gr_palette_load(gr_palette);
 324 #endif
 325
 326         MVE_sfCallbacks(MovieShowFrame);
 327         MVE_palCallbacks(MovieSetPalette);
 328
 329         if (MVE_rmPrepMovie((void *)filehndl, dx, dy, track)) {
 330                 Int3();
 331                 return MOVIE_NOT_PLAYED;
 332         }
 333
 334         MVE_sfCallbacks(MovieShowFrame);
 335         MVE_palCallbacks(MovieSetPalette);
 336
 337         frame_num = 0;
 338
 339         FontHires = FontHiresAvailable && hires_flag;
 340
 341         while((result = MVE_rmStepMovie()) == 0) {
 342
 343                 draw_subtitles(frame_num);
 344
 345                 gr_palette_load(gr_palette); // moved this here because of flashing
 346
 347                 gr_update();
 348
 349                 key = key_inkey();
 350
 351                 // If ESCAPE pressed, then quit movie.
 352                 if (key == KEY_ESC) {
 353                         result = aborted = 1;
 354                         break;
 355                 }
 356
 357                 // If PAUSE pressed, then pause movie
 358                 if (key == KEY_PAUSE) {
 359                         MVE_rmHoldMovie();
 360                         show_pause_message(TXT_PAUSE);
 361                         while (!key_inkey()) ;
 362                         clear_pause_message();
 363                 }
 364
 365 #ifdef GR_SUPPORTS_FULLSCREEN_TOGGLE
 366                 if ((key == KEY_ALTED+KEY_ENTER) ||
 367                     (key == KEY_ALTED+KEY_PADENTER))
 368                         gr_toggle_fullscreen();
 369 #endif
 370
 371                 frame_num++;
 372         }
 373
 374         Assert(aborted || result == MVE_ERR_EOF);        ///movie should be over
 375
 376     MVE_rmEndMovie();
 377
 378         SDL_FreeRW(filehndl);                           // Close Movie File
 379
 380         // Restore old graphic state
 381
 382         Screen_mode=-1;  //force reset of screen mode
 383 #ifdef OGL
 384         gr_copy_palette(gr_palette, pal_save, 768);
 385         gr_palette_load(pal_save);
 386 #endif
 387
 388         return (aborted?MOVIE_ABORTED:MOVIE_PLAYED_FULL);
 389 }
 390
 391
 392 int InitMovieBriefing()
 393 {
 394 #if 0
 395         if (MenuHires)
 396                 gr_set_mode(SM(640,480));
 397         else
 398                 gr_set_mode(SM(320,200));
 399
 400         gr_init_sub_canvas( &VR_screen_pages[0], &grd_curscreen->sc_canvas, 0, 0, grd_curscreen->sc_w, grd_curscreen->sc_h );
 401         gr_init_sub_canvas( &VR_screen_pages[1], &grd_curscreen->sc_canvas, 0, 0, grd_curscreen->sc_w, grd_curscreen->sc_h );
 402 #endif
 403
 404         return 1;
 405 }
 406
 407
 408 //returns 1 if frame updated ok
 409 int RotateRobot()
 410 {
 411         int err;
 412
 413         err = MVE_rmStepMovie();
 414
 415         gr_palette_load(gr_palette);
 416
 417         if (err == MVE_ERR_EOF)     //end of movie, so reset
 418         {
 419                 SDL_RWseek(RoboFile, 0, SEEK_SET);
 420                 if (MVE_rmPrepMovie(RoboFile, MenuHires?280:140, MenuHires?200:80, 0))
 421                 {
 422                         Int3();
 423                         return 0;
 424                 }
 425         }
 426         else if (err) {
 427                 Int3();
 428                 return 0;
 429         }
 430
 431         return 1;
 432 }
 433
 434
 435 void DeInitRobotMovie(void)
 436 {
 437         MVE_rmEndMovie();
 438         SDL_FreeRW(RoboFile);                           // Close Movie File
 439 }
 440
 441
 442 int InitRobotMovie(char *filename)
 443 {
 444         if (FindArg("-nomovies"))
 445                 return 0;
 446
 447         con_printf(CON_DEBUG, "RoboFile=%s\n", filename);
 448
 449         MVE_sndInit(-1);        //tell movies to play no sound for robots
 450
 451         RoboFile = PHYSFSRWOPS_openRead(filename);
 452
 453         if (!RoboFile)
 454         {
 455                 con_printf(CON_URGENT, "Can't open movie <%s>: %s\n", filename, PHYSFS_getLastError());
 456                 return MOVIE_NOT_PLAYED;
 457         }
 458
 459         Vid_State = VID_PLAY;
 460
 461         if (MVE_rmPrepMovie((void *)RoboFile, MenuHires?280:140, MenuHires?200:80, 0)) {
 462                 Int3();
 463                 return 0;
 464         }
 465
 466         return 1;
 467 }
 468
 469
 470 /*
 471  *              Subtitle system code
 472  */
 473
 474 char *subtitle_raw_data;
 475
 476
 477 //search for next field following whitespace
 478 char *next_field (char *p)
 479 {
 480         while (*p && !isspace(*p))
 481                 p++;
 482
 483         if (!*p)
 484                 return NULL;
 485
 486         while (*p && isspace(*p))
 487                 p++;
 488
 489         if (!*p)
 490                 return NULL;
 491
 492         return p;
 493 }
 494
 495
 496 int init_subtitles(char *filename)
 497 {
 498         CFILE *ifile;
 499         int size,read_count;
 500         char *p;
 501         int have_binary = 0;
 502
 503         Num_subtitles = 0;
 504
 505         if (! FindArg("-subtitles"))
 506                 return 0;
 507
 508         ifile = cfopen(filename,"rb");          //try text version
 509
 510         if (!ifile) {                                                           //no text version, try binary version
 511                 char filename2[FILENAME_LEN];
 512                 change_filename_ext(filename2,filename,".TXB");
 513                 ifile = cfopen(filename2,"rb");
 514                 if (!ifile)
 515                         return 0;
 516                 have_binary = 1;
 517         }
 518
 519         size = cfilelength(ifile);
 520
 521         MALLOC (subtitle_raw_data, char, size+1);
 522
 523         read_count = cfread(subtitle_raw_data, 1, size, ifile);
 524
 525         cfclose(ifile);
 526
 527         subtitle_raw_data[size] = 0;
 528
 529         if (read_count != size) {
 530                 d_free(subtitle_raw_data);
 531                 return 0;
 532         }
 533
 534         p = subtitle_raw_data;
 535
 536         while (p && p < subtitle_raw_data+size) {
 537                 char *endp;
 538
 539                 endp = strchr(p,'\n');
 540                 if (endp) {
 541                         if (endp[-1] == '\r')
 542                                 endp[-1] = 0;           //handle 0d0a pair
 543                         *endp = 0;                      //string termintor
 544                 }
 545
 546                 if (have_binary)
 547                         decode_text_line(p);
 548
 549                 if (*p != ';') {
 550                         Subtitles[Num_subtitles].first_frame = atoi(p);
 551                         p = next_field(p); if (!p) continue;
 552                         Subtitles[Num_subtitles].last_frame = atoi(p);
 553                         p = next_field(p); if (!p) continue;
 554                         Subtitles[Num_subtitles].msg = p;
 555
 556                         Assert(Num_subtitles==0 || Subtitles[Num_subtitles].first_frame >= Subtitles[Num_subtitles-1].first_frame);
 557                         Assert(Subtitles[Num_subtitles].last_frame >= Subtitles[Num_subtitles].first_frame);
 558
 559                         Num_subtitles++;
 560                 }
 561
 562                 p = endp+1;
 563
 564         }
 565
 566         return 1;
 567 }
 568
 569
 570 void close_subtitles()
 571 {
 572         if (subtitle_raw_data)
 573                 d_free(subtitle_raw_data);
 574         subtitle_raw_data = NULL;
 575         Num_subtitles = 0;
 576 }
 577
 578
 579 //draw the subtitles for this frame
 580 void draw_subtitles(int frame_num)
 581 {
 582         static int active_subtitles[MAX_ACTIVE_SUBTITLES];
 583         static int num_active_subtitles,next_subtitle,line_spacing;
 584         int t,y;
 585         int must_erase=0;
 586
 587         if (frame_num == 0) {
 588                 num_active_subtitles = 0;
 589                 next_subtitle = 0;
 590                 gr_set_curfont( GAME_FONT );
 591                 line_spacing = grd_curcanv->cv_font->ft_h + (grd_curcanv->cv_font->ft_h >> 2);
 592                 gr_set_fontcolor(255,-1);
 593         }
 594
 595         //get rid of any subtitles that have expired
 596         for (t=0;t<num_active_subtitles;)
 597                 if (frame_num > Subtitles[active_subtitles[t]].last_frame) {
 598                         int t2;
 599                         for (t2=t;t2<num_active_subtitles-1;t2++)
 600                                 active_subtitles[t2] = active_subtitles[t2+1];
 601                         num_active_subtitles--;
 602                         must_erase = 1;
 603                 }
 604                 else
 605                         t++;
 606
 607         //get any subtitles new for this frame
 608         while (next_subtitle < Num_subtitles && frame_num >= Subtitles[next_subtitle].first_frame) {
 609                 if (num_active_subtitles >= MAX_ACTIVE_SUBTITLES)
 610                         Error("Too many active subtitles!");
 611                 active_subtitles[num_active_subtitles++] = next_subtitle;
 612                 next_subtitle++;
 613         }
 614
 615         //find y coordinate for first line of subtitles
 616         y = grd_curcanv->cv_bitmap.bm_h-((line_spacing+1)*MAX_ACTIVE_SUBTITLES+2);
 617
 618         //erase old subtitles if necessary
 619         if (must_erase) {
 620                 gr_setcolor(0);
 621                 gr_rect(0,y,grd_curcanv->cv_bitmap.bm_w-1,grd_curcanv->cv_bitmap.bm_h-1);
 622         }
 623
 624         //now draw the current subtitles
 625         for (t=0;t<num_active_subtitles;t++)
 626                 if (active_subtitles[t] != -1) {
 627                         gr_string(0x8000,y,Subtitles[active_subtitles[t]].msg);
 628                         y += line_spacing+1;
 629                 }
 630 }
 631
 632
 633 void close_movie(char *movielib, int is_robots)
 634 {
 635         int high_res;
 636         char filename[FILENAME_LEN];
 637
 638         if (is_robots)
 639                 high_res = MenuHiresAvailable;
 640         else
 641                 high_res = MovieHires;
 642
 643         sprintf(filename, "%s-%s.mvl", movielib, high_res?"h":"l");
 644
 645         if (!cfile_close(filename))
 646         {
 647                 con_printf(CON_URGENT, "Can't close movielib <%s>: %s\n", filename, PHYSFS_getLastError());
 648                 sprintf(filename, "%s-%s.mvl", movielib, high_res?"l":"h");
 649
 650                 if (!cfile_close(filename))
 651                         con_printf(CON_URGENT, "Can't close movielib <%s>: %s\n", filename, PHYSFS_getLastError());
 652         }
 653 }
 654
 655 void close_movies()
 656 {
 657         int i, is_robots;
 658
 659         for (i = 0 ; i < N_BUILTIN_MOVIE_LIBS ; i++)
 660         {
 661                 if (!strnicmp(movielib_files[i], "robot", 5))
 662                         is_robots = 1;
 663                 else
 664                         is_robots = 0;
 665
 666                 close_movie(movielib_files[i], is_robots);
 667         }
 668 }
 669
 670
 671 //ask user to put the D2 CD in.
 672 //returns -1 if ESC pressed, 0 if OK chosen
 673 //CD may not have been inserted
 674 int request_cd(void)
 675 {
 676 #if 0
 677         ubyte save_pal[256*3];
 678         grs_canvas *save_canv,*tcanv;
 679         int ret,was_faded=gr_palette_faded_out;
 680
 681         gr_palette_clear();
 682
 683         save_canv = grd_curcanv;
 684         tcanv = gr_create_canvas(grd_curcanv->cv_w,grd_curcanv->cv_h);
 685
 686         gr_set_current_canvas(tcanv);
 687         gr_ubitmap(0,0,&save_canv->cv_bitmap);
 688         gr_set_current_canvas(save_canv);
 689
 690         gr_clear_canvas(BM_XRGB(0,0,0));
 691
 692         memcpy(save_pal,gr_palette,sizeof(save_pal));
 693
 694         memcpy(gr_palette,last_palette_for_color_fonts,sizeof(gr_palette));
 695
 696  try_again:;
 697
 698         ret = nm_messagebox( "CD ERROR", 1, "Ok", "Please insert your Descent II CD");
 699
 700         if (ret == -1) {
 701                 int ret2;
 702
 703                 ret2 = nm_messagebox( "CD ERROR", 2, "Try Again", "Leave Game", "You must insert your\nDescent II CD to Continue");
 704
 705                 if (ret2 == -1 || ret2 == 0)
 706                         goto try_again;
 707         }
 708
 709         force_rb_register = 1;  //disc has changed; force register new CD
 710
 711         gr_palette_clear();
 712
 713         memcpy(gr_palette,save_pal,sizeof(save_pal));
 714
 715         gr_ubitmap(0,0,&tcanv->cv_bitmap);
 716
 717         if (!was_faded)
 718                 gr_palette_load(gr_palette);
 719
 720         gr_free_canvas(tcanv);
 721
 722         return ret;
 723 #else
 724         con_printf(CON_DEBUG, "STUB: movie: request_cd\n");
 725         return 0;
 726 #endif
 727 }
 728
 729
 730 void init_movie(char *movielib, int is_robots, int required)
 731 {
 732         int high_res;
 733         char filename[FILENAME_LEN];
 734
 735         //for robots, load highres versions if highres menus set
 736         if (is_robots)
 737                 high_res = MenuHiresAvailable;
 738         else
 739                 high_res = MovieHires;
 740
 741         sprintf(filename, "%s-%s.mvl", movielib, high_res?"h":"l");
 742
 743         if (!cfile_init(filename))
 744         {
 745                 if (required)
 746                         con_printf(CON_URGENT, "Can't open movielib <%s>: %s\n", filename, PHYSFS_getLastError());
 747
 748                 sprintf(filename, "%s-%s.mvl", movielib, high_res?"l":"h");
 749
 750                 if (!cfile_init(filename))
 751                         if (required)
 752                                 con_printf(CON_URGENT, "Can't open movielib <%s>: %s\n", filename, PHYSFS_getLastError());
 753         }
 754 }
 755
 756
 757 //find and initialize the movie libraries
 758 void init_movies()
 759 {
 760         int i;
 761         int is_robots;
 762
 763         if (FindArg("-nomovies"))
 764                 return;
 765
 766         for (i=0;i<N_BUILTIN_MOVIE_LIBS;i++) {
 767
 768                 if (!strnicmp(movielib_files[i],"robot",5))
 769                         is_robots = 1;
 770                 else
 771                         is_robots = 0;
 772
 773                 init_movie(movielib_files[i], is_robots, 1);
 774         }
 775
 776         atexit(close_movies);
 777 }
 778
 779
 780 void close_extra_robot_movie(void)
 781 {
 782         if (strlen(movielib_files[EXTRA_ROBOT_LIB]))
 783                 if (!cfile_close(movielib_files[EXTRA_ROBOT_LIB]))
 784                         con_printf(CON_URGENT, "Can't close robot movielib: %s\n", PHYSFS_getLastError());
 785 }
 786
 787 void init_extra_robot_movie(char *movielib)
 788 {
 789         if (FindArg("-nomovies"))
 790                 return;
 791
 792         close_extra_robot_movie();
 793         init_movie(movielib, 1, 0);
 794         strcpy(movielib_files[EXTRA_ROBOT_LIB], movielib);
 795         atexit(close_extra_robot_movie);
 796 }