2 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
3 SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
4 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
5 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
6 IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
7 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
8 FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
9 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
10 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
11 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
27 # include <sys/types.h>
28 # include <sys/stat.h>
48 #include "physfsrwops.h"
49 #include "ignorecase.h"
54 short first_frame,last_frame;
58 #define MAX_SUBTITLES 500
59 #define MAX_ACTIVE_SUBTITLES 3
60 subtitle Subtitles[MAX_SUBTITLES];
66 char movielib_files[5][FILENAME_LEN] = {"intro","other","robots","oem"};
68 char movielib_files[4][FILENAME_LEN] = {"intro","other","robots"};
71 #define N_MOVIE_LIBS (sizeof(movielib_files) / sizeof(*movielib_files))
72 #define N_BUILTIN_MOVIE_LIBS (N_MOVIE_LIBS - 1)
73 #define EXTRA_ROBOT_LIB N_BUILTIN_MOVIE_LIBS
75 cvar_t MovieHires = { "MovieHires", "1", CVAR_ARCHIVE }; // default is highres
77 SDL_RWops *RoboFile = NULL;
78 MVE_videoSpec MVESpec;
80 // Function Prototypes
81 int RunMovie(char *filename, int highres_flag, int allow_abort,int dx,int dy);
83 void decode_text_line(char *p);
84 void draw_subtitles(int frame_num);
86 // Abstraction for movie files
87 static SDL_RWops *open_movie_file(const char *filename, int must_have);
88 #define read_movie_file(handle, buf, count) SDL_RWread((SDL_RWops *)handle, buf, 1, count);
89 #define reset_movie_file(handle) SDL_RWseek(handle, 0, SEEK_SET)
90 #define close_movie_file(handle) SDL_RWclose(handle)
93 // Callbacks for MVE lib
95 // ----------------------------------------------------------------------
96 void* MPlayAlloc(unsigned size)
98 return d_malloc(size);
101 void MPlayFree(void *p)
107 //-----------------------------------------------------------------------
109 unsigned int FileRead(void *handle, void *buf, unsigned int count)
112 numread = read_movie_file(handle, buf, count);
113 return (numread == count);
117 //-----------------------------------------------------------------------
120 //filename will actually get modified to be either low-res or high-res
121 //returns status. see values in movie.h
122 int PlayMovie(const char *filename, int must_have)
124 char name[FILENAME_LEN],*p;
127 if (FindArg("-nomovies"))
128 return MOVIE_NOT_PLAYED;
130 strcpy(name,filename);
132 if ((p=strchr(name,'.')) == NULL) //add extension, if missing
135 //check for escape already pressed & abort if so
136 while ((c = newmenu_inkey()) != 0)
138 return MOVIE_ABORTED;
140 // Stop all digital sounds currently playing.
149 if (!FindArg("-nosound"))
154 ret = RunMovie(name, MovieHires.intval, must_have, -1, -1);
156 if (!FindArg("-nosound"))
159 Screen_mode = -1; //force screen reset
165 void MovieShowFrame(ubyte *buf, uint bufw, uint bufh, uint sx, uint sy,
166 uint w, uint h, uint dstx, uint dsty)
168 grs_bitmap source_bm;
169 grs_canvas *dest_canv, *save_canv;
171 //mprintf((0,"MovieShowFrame %d,%d %d,%d %d,%d %d,%d\n",bufw,bufh,sx,sy,w,h,dstx,dsty));
173 Assert(bufw == w && bufh == h);
175 source_bm.bm_x = source_bm.bm_y = 0;
176 source_bm.bm_w = source_bm.bm_rowsize = bufw;
177 source_bm.bm_h = bufh;
178 source_bm.bm_type = BM_LINEAR;
179 source_bm.bm_flags = 0;
180 source_bm.bm_data = buf;
182 if (menu_use_game_res.intval) {
183 float aspect = (float)w / (float)h;
186 h = h * GHEIGHT / MVESpec.screenHeight;
188 dstx = dstx * GWIDTH / MVESpec.screenWidth;
189 dsty = dsty * GHEIGHT / MVESpec.screenHeight;
191 w = w * GWIDTH / MVESpec.screenWidth;
193 dstx = dstx * GWIDTH / MVESpec.screenWidth;
194 dsty = GHEIGHT / 2 - h / 2;
196 dest_canv = gr_create_sub_canvas(grd_curcanv, dstx, dsty, w, h);
197 save_canv = grd_curcanv;
198 gr_set_current_canvas(dest_canv);
199 gr_bitmap_fullscr(&source_bm);
200 gr_set_current_canvas(save_canv);
201 gr_free_sub_canvas(dest_canv);
203 gr_bm_ubitblt(bufw,bufh,dstx,dsty,sx,sy,&source_bm,&grd_curcanv->cv_bitmap);
206 //our routine to set the pallete, called from the movie code
207 void MovieSetPalette(unsigned char *p, unsigned start, unsigned count)
212 //mprintf((0,"SetPalette p=%x, start=%d, count=%d\n",p,start,count));
214 //Color 0 should be black, and we get color 255
215 Assert(start>=1 && start+count-1<=254);
217 //Set color 0 to be black
218 gr_palette[0] = gr_palette[1] = gr_palette[2] = 0;
220 //Set color 255 to be our subtitle color
221 gr_palette[765] = gr_palette[766] = gr_palette[767] = 50;
223 //movie libs palette into our array
224 memcpy(gr_palette+start*3,p+start*3,count*3);
226 //finally set the palette in the hardware
227 gr_palette_load(gr_palette);
229 //MVE_SetPalette(p, start, count);
235 short x, y, w, h; // The location of the menu.
236 grs_bitmap * bmp; // The background under the menu.
239 bkg movie_bg = {0,0,0,0,NULL};
242 #define BOX_BORDER (MenuHires?40:20)
245 void show_pause_message(char *msg)
250 gr_set_current_canvas(NULL);
251 gr_set_curfont( SMALL_FONT );
253 gr_get_string_size(msg,&w,&h,&aw);
255 x = (grd_curscreen->sc_w-w)/2;
256 y = (grd_curscreen->sc_h-h)/2;
260 gr_free_bitmap(movie_bg.bmp);
264 // Save the background of the display
265 movie_bg.x=x; movie_bg.y=y; movie_bg.w=w; movie_bg.h=h;
267 movie_bg.bmp = gr_create_bitmap( w+BOX_BORDER, h+BOX_BORDER );
269 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 );
273 gr_rect(x-BOX_BORDER/2,y-BOX_BORDER/2,x+w+BOX_BORDER/2-1,y+h+BOX_BORDER/2-1);
275 gr_set_fontcolor( 255, -1 );
277 gr_ustring( 0x8000, y, msg );
282 void clear_pause_message()
287 gr_bitmap(movie_bg.x-BOX_BORDER/2, movie_bg.y-BOX_BORDER/2, movie_bg.bmp);
289 gr_free_bitmap(movie_bg.bmp);
296 //returns status. see movie.h
297 int RunMovie(char *filename, int hires_flag, int must_have,int dx,int dy)
300 int result=1,aborted=0;
307 // Open Movie file. If it doesn't exist, no movie, just return.
309 filehndl = open_movie_file(filename, must_have);
314 con_printf(CON_URGENT, "Can't open movie <%s>: %s\n", filename, PHYSFS_getLastError());
315 return MOVIE_NOT_PLAYED;
318 MVE_memCallbacks(MPlayAlloc, MPlayFree);
319 MVE_ioCallbacks(FileRead);
320 MVE_sfCallbacks(MovieShowFrame);
321 MVE_palCallbacks(MovieSetPalette);
323 vid_set_mode(MOVIE_SCREEN_MODE);
325 set_screen_mode(SCREEN_MENU);
328 if (MVE_rmPrepMovie((void *)filehndl, dx, dy, track)) {
330 return MOVIE_NOT_PLAYED;
333 MVE_getVideoSpec(&MVESpec);
337 FontHires = FontHiresAvailable && hires_flag;
339 while((result = MVE_rmStepMovie()) == 0) {
341 draw_subtitles(frame_num);
345 key = newmenu_inkey();
347 // If ESCAPE pressed, then quit movie.
348 if (key == KEY_ESC) {
349 result = aborted = 1;
353 // If PAUSE pressed, then pause movie
354 if (key == KEY_PAUSE) {
356 show_pause_message(TXT_PAUSE);
357 while (!newmenu_inkey()) ;
358 clear_pause_message();
361 #ifdef VID_SUPPORTS_FULLSCREEN_TOGGLE
362 if ((key == KEY_COMMAND+KEY_SHIFTED+KEY_F) ||
363 (key == KEY_ALTED+KEY_ENTER) ||
364 (key == KEY_ALTED+KEY_PADENTER))
365 vid_toggle_fullscreen();
371 Assert(aborted || result == MVE_ERR_EOF); ///movie should be over
375 close_movie_file(filehndl); // Close Movie File
377 // Restore old graphic state
379 Screen_mode=-1; //force reset of screen mode
381 return (aborted?MOVIE_ABORTED:MOVIE_PLAYED_FULL);
385 int InitMovieBriefing()
389 vid_set_mode(SM(640,480));
391 vid_set_mode(SM(320,200));
393 gr_init_sub_canvas( &VR_screen_pages[0], &grd_curscreen->sc_canvas, 0, 0, grd_curscreen->sc_w, grd_curscreen->sc_h );
394 gr_init_sub_canvas( &VR_screen_pages[1], &grd_curscreen->sc_canvas, 0, 0, grd_curscreen->sc_w, grd_curscreen->sc_h );
401 //returns 1 if frame updated ok
406 err = MVE_rmStepMovie();
408 if (err == MVE_ERR_EOF) //end of movie, so reset
410 reset_movie_file(RoboFile);
411 if (MVE_rmPrepMovie(RoboFile, MenuHires?280:140, MenuHires?200:80, 0))
426 void DeInitRobotMovie(void)
429 close_movie_file(RoboFile); // Close Movie File
434 int InitRobotMovie(char *filename)
436 if (FindArg("-nomovies"))
439 con_printf(CON_DEBUG, "RoboFile=%s\n", filename);
441 MVE_sndInit(-1); //tell movies to play no sound for robots
443 MVE_memCallbacks(MPlayAlloc, MPlayFree);
444 MVE_ioCallbacks(FileRead);
446 RoboFile = open_movie_file(filename, 1);
450 con_printf(CON_URGENT, "Can't open movie <%s>: %s\n", filename, PHYSFS_getLastError());
451 return MOVIE_NOT_PLAYED;
454 MVE_palCallbacks(MovieSetPalette);
455 MVE_sfCallbacks(MovieShowFrame);
457 if (MVE_rmPrepMovie((void *)RoboFile, MenuHires?280:140, MenuHires?200:80, 0)) {
462 MVE_getVideoSpec(&MVESpec);
469 * Subtitle system code
472 char *subtitle_raw_data;
475 //search for next field following whitespace
476 char *next_field (char *p)
478 while (*p && !isspace(*p))
484 while (*p && isspace(*p))
494 int init_subtitles(char *filename)
503 if (! FindArg("-subtitles"))
506 ifile = cfopen(filename,"rb"); //try text version
508 if (!ifile) { //no text version, try binary version
509 char filename2[FILENAME_LEN];
510 change_filename_extension(filename2, filename, ".TXB");
511 ifile = cfopen(filename2,"rb");
517 size = cfilelength(ifile);
519 MALLOC (subtitle_raw_data, char, size+1);
521 read_count = cfread(subtitle_raw_data, 1, size, ifile);
525 subtitle_raw_data[size] = 0;
527 if (read_count != size) {
528 d_free(subtitle_raw_data);
532 p = subtitle_raw_data;
534 while (p && p < subtitle_raw_data+size) {
537 endp = strchr(p,'\n');
539 if (endp[-1] == '\r')
540 endp[-1] = 0; //handle 0d0a pair
541 *endp = 0; //string termintor
548 Subtitles[Num_subtitles].first_frame = atoi(p);
549 p = next_field(p); if (!p) continue;
550 Subtitles[Num_subtitles].last_frame = atoi(p);
551 p = next_field(p); if (!p) continue;
552 Subtitles[Num_subtitles].msg = p;
554 Assert(Num_subtitles==0 || Subtitles[Num_subtitles].first_frame >= Subtitles[Num_subtitles-1].first_frame);
555 Assert(Subtitles[Num_subtitles].last_frame >= Subtitles[Num_subtitles].first_frame);
568 void close_subtitles()
570 if (subtitle_raw_data)
571 d_free(subtitle_raw_data);
572 subtitle_raw_data = NULL;
577 //draw the subtitles for this frame
578 void draw_subtitles(int frame_num)
580 static int active_subtitles[MAX_ACTIVE_SUBTITLES];
581 static int num_active_subtitles,next_subtitle,line_spacing;
585 if (frame_num == 0) {
586 num_active_subtitles = 0;
588 gr_set_curfont( GAME_FONT );
589 line_spacing = grd_curcanv->cv_font->ft_h + (grd_curcanv->cv_font->ft_h >> 2);
590 gr_set_fontcolor(255,-1);
593 //get rid of any subtitles that have expired
594 for (t=0;t<num_active_subtitles;)
595 if (frame_num > Subtitles[active_subtitles[t]].last_frame) {
597 for (t2=t;t2<num_active_subtitles-1;t2++)
598 active_subtitles[t2] = active_subtitles[t2+1];
599 num_active_subtitles--;
605 //get any subtitles new for this frame
606 while (next_subtitle < Num_subtitles && frame_num >= Subtitles[next_subtitle].first_frame) {
607 if (num_active_subtitles >= MAX_ACTIVE_SUBTITLES)
608 Error("Too many active subtitles!");
609 active_subtitles[num_active_subtitles++] = next_subtitle;
613 //find y coordinate for first line of subtitles
614 y = grd_curcanv->cv_bitmap.bm_h-((line_spacing+1)*MAX_ACTIVE_SUBTITLES+2);
616 //erase old subtitles if necessary
619 gr_rect(0,y,grd_curcanv->cv_bitmap.bm_w-1,grd_curcanv->cv_bitmap.bm_h-1);
622 //now draw the current subtitles
623 for (t=0;t<num_active_subtitles;t++)
624 if (active_subtitles[t] != -1) {
625 gr_string(0x8000,y,Subtitles[active_subtitles[t]].msg);
631 //find the specified movie library, and read in list of movies in it
632 static int init_movie_lib(char *filename)
634 //note: this based on cfile_init_hogfile()
636 char pathname[PATH_MAX];
638 if (!PHYSFSX_getRealPath(filename, pathname))
641 return PHYSFS_mount(pathname, "movies", 1);
645 void close_movie(char *movielib, int is_robots)
648 char filename[FILENAME_LEN];
649 char pathname[PATH_MAX];
652 high_res = MenuHiresAvailable;
654 high_res = MovieHires.intval;
656 sprintf(filename, "%s-%s.mvl", movielib, high_res?"h":"l");
658 if (!PHYSFSX_getRealPath(filename, pathname) ||
659 !PHYSFS_removeFromSearchPath(pathname))
661 con_printf(CON_URGENT, "Can't close movielib <%s>: %s\n", filename, PHYSFS_getLastError());
662 sprintf(filename, "%s-%s.mvl", movielib, high_res?"l":"h");
664 if (!PHYSFSX_getRealPath(filename, pathname) ||
665 !PHYSFS_removeFromSearchPath(pathname))
666 con_printf(CON_URGENT, "Can't close movielib <%s>: %s\n", filename, PHYSFS_getLastError());
674 for (i = 0 ; i < N_BUILTIN_MOVIE_LIBS ; i++)
676 if (!strnicmp(movielib_files[i], "robot", 5))
681 close_movie(movielib_files[i], is_robots);
686 void init_movie(char *movielib, int is_robots, int required)
689 char filename[FILENAME_LEN];
691 //for robots, load highres versions if highres menus set
693 high_res = MenuHiresAvailable;
695 high_res = MovieHires.intval;
697 sprintf(filename, "%s-%s.mvl", movielib, high_res?"h":"l");
699 if (!init_movie_lib(filename))
702 con_printf(CON_URGENT, "Can't open movielib <%s>: %s\n", filename, PHYSFS_getLastError());
704 sprintf(filename, "%s-%s.mvl", movielib, high_res?"l":"h");
706 if (!init_movie_lib(filename))
708 con_printf(CON_URGENT, "Can't open movielib <%s>: %s\n", filename, PHYSFS_getLastError());
713 //find and initialize the movie libraries
719 if (FindArg("-nomovies"))
722 for (i=0;i<N_BUILTIN_MOVIE_LIBS;i++) {
724 if (!strnicmp(movielib_files[i],"robot",5))
729 init_movie(movielib_files[i], is_robots, 1);
732 atexit(close_movies);
736 void close_extra_robot_movie(void)
738 if (strlen(movielib_files[EXTRA_ROBOT_LIB]))
739 close_movie(movielib_files[EXTRA_ROBOT_LIB], 1);
742 void init_extra_robot_movie(char *movielib)
744 if (FindArg("-nomovies"))
747 close_extra_robot_movie();
748 init_movie(movielib, 1, 0);
749 strcpy(movielib_files[EXTRA_ROBOT_LIB], movielib);
750 atexit(close_extra_robot_movie);
754 //returns file handle
755 static SDL_RWops *open_movie_file(const char *filename, int must_have)
757 char moviepath[PATH_MAX];
759 strcpy(moviepath, "movies/");
760 strcat(moviepath, filename);
762 PHYSFSEXT_locateCorrectCase(moviepath);
764 return PHYSFSRWOPS_openRead(moviepath);