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"
53 short first_frame,last_frame;
57 #define MAX_SUBTITLES 500
58 #define MAX_ACTIVE_SUBTITLES 3
59 subtitle Subtitles[MAX_SUBTITLES];
65 char movielib_files[5][FILENAME_LEN] = {"intro","other","robots","oem"};
67 char movielib_files[4][FILENAME_LEN] = {"intro","other","robots"};
70 #define N_MOVIE_LIBS (sizeof(movielib_files) / sizeof(*movielib_files))
71 #define N_BUILTIN_MOVIE_LIBS (N_MOVIE_LIBS - 1)
72 #define EXTRA_ROBOT_LIB N_BUILTIN_MOVIE_LIBS
74 cvar_t MovieHires = { "MovieHires", "1", CVAR_ARCHIVE }; // default is highres
76 SDL_RWops *RoboFile = NULL;
77 MVE_videoSpec MVESpec;
79 // Function Prototypes
80 int RunMovie(char *filename, int highres_flag, int allow_abort,int dx,int dy);
82 void decode_text_line(char *p);
83 void draw_subtitles(int frame_num);
85 // Abstraction for movie files
86 static SDL_RWops *open_movie_file(const char *filename, int must_have);
87 #define read_movie_file(handle, buf, count) SDL_RWread((SDL_RWops *)handle, buf, 1, count);
88 #define reset_movie_file(handle) SDL_RWseek(handle, 0, SEEK_SET)
89 #define close_movie_file(handle) SDL_RWclose(handle)
92 // Callbacks for MVE lib
94 // ----------------------------------------------------------------------
95 void* MPlayAlloc(unsigned size)
97 return d_malloc(size);
100 void MPlayFree(void *p)
106 //-----------------------------------------------------------------------
108 unsigned int FileRead(void *handle, void *buf, unsigned int count)
111 numread = read_movie_file(handle, buf, count);
112 return (numread == count);
116 //-----------------------------------------------------------------------
119 //filename will actually get modified to be either low-res or high-res
120 //returns status. see values in movie.h
121 int PlayMovie(const char *filename, int must_have)
123 char name[FILENAME_LEN],*p;
126 if (FindArg("-nomovies"))
127 return MOVIE_NOT_PLAYED;
129 strcpy(name,filename);
131 if ((p=strchr(name,'.')) == NULL) //add extension, if missing
134 //check for escape already pressed & abort if so
135 while ((c = newmenu_inkey()) != 0)
137 return MOVIE_ABORTED;
139 // Stop all digital sounds currently playing.
148 if (!FindArg("-nosound"))
153 ret = RunMovie(name, MovieHires.intval, must_have, -1, -1);
155 if (!FindArg("-nosound"))
158 Screen_mode = -1; //force screen reset
164 void MovieShowFrame(ubyte *buf, uint bufw, uint bufh, uint sx, uint sy,
165 uint w, uint h, uint dstx, uint dsty)
167 grs_bitmap source_bm;
168 grs_canvas *dest_canv, *save_canv;
170 //mprintf((0,"MovieShowFrame %d,%d %d,%d %d,%d %d,%d\n",bufw,bufh,sx,sy,w,h,dstx,dsty));
172 Assert(bufw == w && bufh == h);
174 source_bm.bm_x = source_bm.bm_y = 0;
175 source_bm.bm_w = source_bm.bm_rowsize = bufw;
176 source_bm.bm_h = bufh;
177 source_bm.bm_type = BM_LINEAR;
178 source_bm.bm_flags = 0;
179 source_bm.bm_data = buf;
181 if (menu_use_game_res.intval) {
182 float aspect = (float)w / (float)h;
185 h = h * GHEIGHT / MVESpec.screenHeight;
187 dstx = dstx * GWIDTH / MVESpec.screenWidth;
188 dsty = dsty * GHEIGHT / MVESpec.screenHeight;
190 w = w * GWIDTH / MVESpec.screenWidth;
192 dstx = dstx * GWIDTH / MVESpec.screenWidth;
193 dsty = GHEIGHT / 2 - h / 2;
195 dest_canv = gr_create_sub_canvas(grd_curcanv, dstx, dsty, w, h);
196 save_canv = grd_curcanv;
197 gr_set_current_canvas(dest_canv);
198 gr_bitmap_fullscr(&source_bm);
199 gr_set_current_canvas(save_canv);
200 gr_free_sub_canvas(dest_canv);
202 gr_bm_ubitblt(bufw,bufh,dstx,dsty,sx,sy,&source_bm,&grd_curcanv->cv_bitmap);
205 //our routine to set the pallete, called from the movie code
206 void MovieSetPalette(unsigned char *p, unsigned start, unsigned count)
211 //mprintf((0,"SetPalette p=%x, start=%d, count=%d\n",p,start,count));
213 //Color 0 should be black, and we get color 255
214 Assert(start>=1 && start+count-1<=254);
216 //Set color 0 to be black
217 gr_palette[0] = gr_palette[1] = gr_palette[2] = 0;
219 //Set color 255 to be our subtitle color
220 gr_palette[765] = gr_palette[766] = gr_palette[767] = 50;
222 //movie libs palette into our array
223 memcpy(gr_palette+start*3,p+start*3,count*3);
225 //finally set the palette in the hardware
226 gr_palette_load(gr_palette);
228 //MVE_SetPalette(p, start, count);
234 short x, y, w, h; // The location of the menu.
235 grs_bitmap * bmp; // The background under the menu.
238 bkg movie_bg = {0,0,0,0,NULL};
241 #define BOX_BORDER (MenuHires?40:20)
244 void show_pause_message(char *msg)
249 gr_set_current_canvas(NULL);
250 gr_set_curfont( SMALL_FONT );
252 gr_get_string_size(msg,&w,&h,&aw);
254 x = (grd_curscreen->sc_w-w)/2;
255 y = (grd_curscreen->sc_h-h)/2;
259 gr_free_bitmap(movie_bg.bmp);
263 // Save the background of the display
264 movie_bg.x=x; movie_bg.y=y; movie_bg.w=w; movie_bg.h=h;
266 movie_bg.bmp = gr_create_bitmap( w+BOX_BORDER, h+BOX_BORDER );
268 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 );
272 gr_rect(x-BOX_BORDER/2,y-BOX_BORDER/2,x+w+BOX_BORDER/2-1,y+h+BOX_BORDER/2-1);
274 gr_set_fontcolor( 255, -1 );
276 gr_ustring( 0x8000, y, msg );
281 void clear_pause_message()
286 gr_bitmap(movie_bg.x-BOX_BORDER/2, movie_bg.y-BOX_BORDER/2, movie_bg.bmp);
288 gr_free_bitmap(movie_bg.bmp);
295 //returns status. see movie.h
296 int RunMovie(char *filename, int hires_flag, int must_have,int dx,int dy)
299 int result=1,aborted=0;
306 // Open Movie file. If it doesn't exist, no movie, just return.
308 filehndl = open_movie_file(filename, must_have);
313 con_printf(CON_URGENT, "Can't open movie <%s>: %s\n", filename, PHYSFS_getLastError());
314 return MOVIE_NOT_PLAYED;
317 MVE_memCallbacks(MPlayAlloc, MPlayFree);
318 MVE_ioCallbacks(FileRead);
319 MVE_sfCallbacks(MovieShowFrame);
320 MVE_palCallbacks(MovieSetPalette);
322 vid_set_mode(MOVIE_SCREEN_MODE);
324 set_screen_mode(SCREEN_MENU);
327 if (MVE_rmPrepMovie((void *)filehndl, dx, dy, track)) {
329 return MOVIE_NOT_PLAYED;
332 MVE_getVideoSpec(&MVESpec);
336 FontHires = FontHiresAvailable && hires_flag;
338 while((result = MVE_rmStepMovie()) == 0) {
340 draw_subtitles(frame_num);
344 key = newmenu_inkey();
346 // If ESCAPE pressed, then quit movie.
347 if (key == KEY_ESC) {
348 result = aborted = 1;
352 // If PAUSE pressed, then pause movie
353 if (key == KEY_PAUSE) {
355 show_pause_message(TXT_PAUSE);
356 while (!newmenu_inkey()) ;
357 clear_pause_message();
360 #ifdef VID_SUPPORTS_FULLSCREEN_TOGGLE
361 if ((key == KEY_COMMAND+KEY_SHIFTED+KEY_F) ||
362 (key == KEY_ALTED+KEY_ENTER) ||
363 (key == KEY_ALTED+KEY_PADENTER))
364 vid_toggle_fullscreen();
370 Assert(aborted || result == MVE_ERR_EOF); ///movie should be over
374 close_movie_file(filehndl); // Close Movie File
376 // Restore old graphic state
378 Screen_mode=-1; //force reset of screen mode
380 return (aborted?MOVIE_ABORTED:MOVIE_PLAYED_FULL);
384 int InitMovieBriefing()
388 vid_set_mode(SM(640,480));
390 vid_set_mode(SM(320,200));
392 gr_init_sub_canvas( &VR_screen_pages[0], &grd_curscreen->sc_canvas, 0, 0, grd_curscreen->sc_w, grd_curscreen->sc_h );
393 gr_init_sub_canvas( &VR_screen_pages[1], &grd_curscreen->sc_canvas, 0, 0, grd_curscreen->sc_w, grd_curscreen->sc_h );
400 //returns 1 if frame updated ok
405 err = MVE_rmStepMovie();
407 if (err == MVE_ERR_EOF) //end of movie, so reset
409 reset_movie_file(RoboFile);
410 if (MVE_rmPrepMovie(RoboFile, MenuHires?280:140, MenuHires?200:80, 0))
425 void DeInitRobotMovie(void)
428 close_movie_file(RoboFile); // Close Movie File
433 int InitRobotMovie(char *filename)
435 if (FindArg("-nomovies"))
438 con_printf(CON_DEBUG, "RoboFile=%s\n", filename);
440 MVE_sndInit(-1); //tell movies to play no sound for robots
442 MVE_memCallbacks(MPlayAlloc, MPlayFree);
443 MVE_ioCallbacks(FileRead);
445 RoboFile = open_movie_file(filename, 1);
449 con_printf(CON_URGENT, "Can't open movie <%s>: %s\n", filename, PHYSFS_getLastError());
450 return MOVIE_NOT_PLAYED;
453 MVE_palCallbacks(MovieSetPalette);
454 MVE_sfCallbacks(MovieShowFrame);
456 if (MVE_rmPrepMovie((void *)RoboFile, MenuHires?280:140, MenuHires?200:80, 0)) {
461 MVE_getVideoSpec(&MVESpec);
468 * Subtitle system code
471 char *subtitle_raw_data;
474 //search for next field following whitespace
475 char *next_field (char *p)
477 while (*p && !isspace(*p))
483 while (*p && isspace(*p))
493 int init_subtitles(char *filename)
502 if (! FindArg("-subtitles"))
505 ifile = cfopen(filename,"rb"); //try text version
507 if (!ifile) { //no text version, try binary version
508 char filename2[FILENAME_LEN];
509 change_filename_extension(filename2, filename, ".TXB");
510 ifile = cfopen(filename2,"rb");
516 size = cfilelength(ifile);
518 MALLOC (subtitle_raw_data, char, size+1);
520 read_count = cfread(subtitle_raw_data, 1, size, ifile);
524 subtitle_raw_data[size] = 0;
526 if (read_count != size) {
527 d_free(subtitle_raw_data);
531 p = subtitle_raw_data;
533 while (p && p < subtitle_raw_data+size) {
536 endp = strchr(p,'\n');
538 if (endp[-1] == '\r')
539 endp[-1] = 0; //handle 0d0a pair
540 *endp = 0; //string termintor
547 Subtitles[Num_subtitles].first_frame = atoi(p);
548 p = next_field(p); if (!p) continue;
549 Subtitles[Num_subtitles].last_frame = atoi(p);
550 p = next_field(p); if (!p) continue;
551 Subtitles[Num_subtitles].msg = p;
553 Assert(Num_subtitles==0 || Subtitles[Num_subtitles].first_frame >= Subtitles[Num_subtitles-1].first_frame);
554 Assert(Subtitles[Num_subtitles].last_frame >= Subtitles[Num_subtitles].first_frame);
567 void close_subtitles()
569 if (subtitle_raw_data)
570 d_free(subtitle_raw_data);
571 subtitle_raw_data = NULL;
576 //draw the subtitles for this frame
577 void draw_subtitles(int frame_num)
579 static int active_subtitles[MAX_ACTIVE_SUBTITLES];
580 static int num_active_subtitles,next_subtitle,line_spacing;
584 if (frame_num == 0) {
585 num_active_subtitles = 0;
587 gr_set_curfont( GAME_FONT );
588 line_spacing = grd_curcanv->cv_font->ft_h + (grd_curcanv->cv_font->ft_h >> 2);
589 gr_set_fontcolor(255,-1);
592 //get rid of any subtitles that have expired
593 for (t=0;t<num_active_subtitles;)
594 if (frame_num > Subtitles[active_subtitles[t]].last_frame) {
596 for (t2=t;t2<num_active_subtitles-1;t2++)
597 active_subtitles[t2] = active_subtitles[t2+1];
598 num_active_subtitles--;
604 //get any subtitles new for this frame
605 while (next_subtitle < Num_subtitles && frame_num >= Subtitles[next_subtitle].first_frame) {
606 if (num_active_subtitles >= MAX_ACTIVE_SUBTITLES)
607 Error("Too many active subtitles!");
608 active_subtitles[num_active_subtitles++] = next_subtitle;
612 //find y coordinate for first line of subtitles
613 y = grd_curcanv->cv_bitmap.bm_h-((line_spacing+1)*MAX_ACTIVE_SUBTITLES+2);
615 //erase old subtitles if necessary
618 gr_rect(0,y,grd_curcanv->cv_bitmap.bm_w-1,grd_curcanv->cv_bitmap.bm_h-1);
621 //now draw the current subtitles
622 for (t=0;t<num_active_subtitles;t++)
623 if (active_subtitles[t] != -1) {
624 gr_string(0x8000,y,Subtitles[active_subtitles[t]].msg);
630 //find the specified movie library, and read in list of movies in it
631 static int init_movie_lib(char *filename)
633 //note: this based on cfile_init_hogfile()
635 char pathname[PATH_MAX];
637 if (!PHYSFSX_getRealPath(filename, pathname))
640 return PHYSFS_mount(pathname, "movies", 1);
644 void close_movie(char *movielib, int is_robots)
647 char filename[FILENAME_LEN];
648 char pathname[PATH_MAX];
651 high_res = MenuHiresAvailable;
653 high_res = MovieHires.intval;
655 sprintf(filename, "%s-%s.mvl", movielib, high_res?"h":"l");
657 if (!PHYSFSX_getRealPath(filename, pathname) ||
658 !PHYSFS_removeFromSearchPath(pathname))
660 con_printf(CON_URGENT, "Can't close movielib <%s>: %s\n", filename, PHYSFS_getLastError());
661 sprintf(filename, "%s-%s.mvl", movielib, high_res?"l":"h");
663 if (!PHYSFSX_getRealPath(filename, pathname) ||
664 !PHYSFS_removeFromSearchPath(pathname))
665 con_printf(CON_URGENT, "Can't close movielib <%s>: %s\n", filename, PHYSFS_getLastError());
673 for (i = 0 ; i < N_BUILTIN_MOVIE_LIBS ; i++)
675 if (!strnicmp(movielib_files[i], "robot", 5))
680 close_movie(movielib_files[i], is_robots);
685 void init_movie(char *movielib, int is_robots, int required)
688 char filename[FILENAME_LEN];
690 //for robots, load highres versions if highres menus set
692 high_res = MenuHiresAvailable;
694 high_res = MovieHires.intval;
696 sprintf(filename, "%s-%s.mvl", movielib, high_res?"h":"l");
698 if (!init_movie_lib(filename))
701 con_printf(CON_URGENT, "Can't open movielib <%s>: %s\n", filename, PHYSFS_getLastError());
703 sprintf(filename, "%s-%s.mvl", movielib, high_res?"l":"h");
705 if (!init_movie_lib(filename))
707 con_printf(CON_URGENT, "Can't open movielib <%s>: %s\n", filename, PHYSFS_getLastError());
712 //find and initialize the movie libraries
718 if (FindArg("-nomovies"))
721 for (i=0;i<N_BUILTIN_MOVIE_LIBS;i++) {
723 if (!strnicmp(movielib_files[i],"robot",5))
728 init_movie(movielib_files[i], is_robots, 1);
731 atexit(close_movies);
735 void close_extra_robot_movie(void)
737 if (strlen(movielib_files[EXTRA_ROBOT_LIB]))
738 close_movie(movielib_files[EXTRA_ROBOT_LIB], 1);
741 void init_extra_robot_movie(char *movielib)
743 if (FindArg("-nomovies"))
746 close_extra_robot_movie();
747 init_movie(movielib, 1, 0);
748 strcpy(movielib_files[EXTRA_ROBOT_LIB], movielib);
749 atexit(close_extra_robot_movie);
753 //returns file handle
754 static SDL_RWops *open_movie_file(const char *filename, int must_have)
756 char moviepath[PATH_MAX];
758 strcpy(moviepath, "movies/");
759 strcat(moviepath, filename);
761 return PHYSFSRWOPS_openRead(moviepath);