4 #include "dpvsimpledecode.h"
6 // constants (and semi-constants)
7 static int cl_videormask;
8 static int cl_videobmask;
9 static int cl_videogmask;
10 static int cl_videobytesperpixel;
12 static clvideo_t videoarray[ MAXCLVIDEOS ];
13 static mempool_t *cl_videomempool;
14 static rtexturepool_t *cl_videotexturepool;
16 static clvideo_t *FindUnusedVid( void )
19 for( i = 1 ; i < MAXCLVIDEOS ; i++ )
20 if( videoarray[ i ].state == CLVIDEO_UNUSED )
21 return &videoarray[ i ];
25 static qboolean OpenStream( clvideo_t * video )
28 video->stream = dpvsimpledecode_open( video->filename, &errorstring);
31 Con_Printf("unable to open \"%s\", error: %s\n", video->filename, errorstring);
37 static void SuspendVideo( clvideo_t * video )
39 if( video->suspended )
41 video->suspended = true;
43 R_FreeTexture( video->cpif.tex );
44 // free the image data
45 Mem_Free( video->imagedata );
46 // if we are in firstframe mode, also close the stream
47 if( video->state == CLVIDEO_FIRSTFRAME )
48 dpvsimpledecode_close( video->stream );
51 static qboolean WakeVideo( clvideo_t * video )
53 if( !video->suspended )
55 video->suspended = false;
57 if( video->state == CLVIDEO_FIRSTFRAME )
58 if( !OpenStream( video ) ) {
59 video->state = CLVIDEO_UNUSED;
63 video->imagedata = Mem_Alloc( cl_videomempool, video->cpif.width * video->cpif.height * cl_videobytesperpixel );
64 video->cpif.tex = R_LoadTexture2D( cl_videotexturepool, video->cpif.name,
65 video->cpif.width, video->cpif.height, NULL, TEXTYPE_RGBA, 0, NULL );
68 video->starttime += realtime - video->lasttime;
73 static clvideo_t* OpenVideo( clvideo_t *video, char *filename, char *name, int owner )
75 strncpy( video->filename, filename, MAX_QPATH );
76 video->ownertag = owner;
77 if( strncmp( name, CLVIDEOPREFIX, sizeof( CLVIDEOPREFIX ) - 1 ) )
79 strncpy( video->cpif.name, name, MAX_QPATH );
81 if( !OpenStream( video ) )
84 video->state = CLVIDEO_FIRSTFRAME;
86 video->framerate = dpvsimpledecode_getframerate( video->stream );
87 video->lasttime = realtime;
89 video->cpif.width = dpvsimpledecode_getwidth( video->stream );
90 video->cpif.height = dpvsimpledecode_getheight( video->stream );
91 video->cpif.tex = R_LoadTexture2D( cl_videotexturepool, video->cpif.name,
92 video->cpif.width, video->cpif.height, NULL, TEXTYPE_RGBA, 0, NULL );
94 video->imagedata = Mem_Alloc( cl_videomempool, video->cpif.width * video->cpif.height * cl_videobytesperpixel );
99 clvideo_t* CL_OpenVideo( char *filename, char *name, int owner )
103 video = FindUnusedVid();
105 Con_Printf( "unable to open video \"%s\" - video limit reached\n", filename );
108 return OpenVideo( video, filename, name, owner );
111 clvideo_t* CL_GetVideo( char *name )
116 for( i = 0 ; i < MAXCLVIDEOS ; i++ )
117 if( videoarray[ i ].state != CLVIDEO_UNUSED
118 && !strcmp( videoarray[ i ].cpif.name , name ) )
120 if( i == MAXCLVIDEOS )
122 video = &videoarray[ i ];
124 if( video->suspended )
126 if( !WakeVideo( video ) )
128 else if( video->state == CLVIDEO_RESETONWAKEUP )
129 video->framenum = -1;
132 video->lasttime = realtime;
137 void CL_SetVideoState( clvideo_t *video, clvideostate_t state )
142 video->lasttime = realtime;
143 video->state = state;
144 if( state == CLVIDEO_FIRSTFRAME )
145 CL_RestartVideo( video );
148 void CL_RestartVideo( clvideo_t *video )
153 video->starttime = video->lasttime = realtime;
154 video->framenum = -1;
156 dpvsimpledecode_close( video->stream );
157 if( !OpenStream( video ) )
158 video->state = CLVIDEO_UNUSED;
161 void CL_CloseVideo( clvideo_t * video )
163 if( !video || video->state == CLVIDEO_UNUSED )
166 if( !video->suspended || video->state != CLVIDEO_FIRSTFRAME )
167 dpvsimpledecode_close( video->stream );
168 if( !video->suspended ) {
169 Mem_Free( video->imagedata );
170 R_FreeTexture( video->cpif.tex );
173 video->state = CLVIDEO_UNUSED;
176 static void VideoFrame( clvideo_t *video )
180 if( video->state == CLVIDEO_FIRSTFRAME )
183 destframe = (realtime - video->starttime) * video->framerate;
186 if( video->framenum < destframe ) {
189 if( dpvsimpledecode_video( video->stream, video->imagedata, cl_videormask,
190 cl_videogmask, cl_videobmask, cl_videobytesperpixel,
191 cl_videobytesperpixel * video->cpif.width )
193 CL_RestartVideo( video );
194 if( video->state == CLVIDEO_PLAY )
195 video->state = CLVIDEO_FIRSTFRAME;
198 } while( video->framenum < destframe );
199 R_UpdateTexture( video->cpif.tex, video->imagedata );
203 void CL_VideoFrame( void ) // update all videos
208 for( video = videoarray, i = 0 ; i < MAXCLVIDEOS ; video++, i++ )
209 if( video->state != CLVIDEO_UNUSED && !video->suspended )
211 if( realtime - video->lasttime > CLTHRESHOLD )
212 SuspendVideo( video );
213 else if( video->state == CLVIDEO_PAUSE )
214 video->starttime = realtime - video->framenum * video->framerate;
219 if( videoarray->state == CLVIDEO_FIRSTFRAME )
223 void CL_Video_Shutdown( void )
226 for( i = 0 ; i < MAXCLVIDEOS ; i++ )
227 CL_CloseVideo( &videoarray[ i ] );
229 Mem_FreePool( &cl_videomempool );
232 void CL_PurgeOwner( int owner )
235 for( i = 0 ; i < MAXCLVIDEOS ; i++ )
236 if( videoarray[ i ].ownertag == owner )
237 CL_CloseVideo( &videoarray[ i ] );
240 int cl_videoplaying = false; // old, but still supported
242 void CL_DrawVideo(void)
245 DrawQ_Pic(0, 0, videoarray->cpif.name, vid.conwidth, vid.conheight, 1, 1, 1, 1, 0);
248 void CL_VideoStart(char *filename)
250 if( videoarray->state != CLVIDEO_UNUSED )
251 CL_CloseVideo( videoarray );
252 if( !OpenVideo( videoarray, filename, va( CLVIDEOPREFIX "%s", filename ), 0 ) )
255 cl_videoplaying = true;
257 CL_SetVideoState( videoarray, CLVIDEO_PLAY );
258 CL_RestartVideo( videoarray );
261 void CL_VideoStop(void)
263 cl_videoplaying = false;
265 CL_CloseVideo( videoarray );
268 static void CL_PlayVideo_f(void)
274 Con_Print("usage: playvideo <videoname>\nplays video named video/<videoname>.dpv\n");
278 sprintf(name, "video/%s.dpv", Cmd_Argv(1));
282 static void CL_StopVideo_f(void)
287 static void cl_video_start( void )
292 cl_videotexturepool = R_AllocTexturePool();
294 for( video = videoarray, i = 0 ; i < MAXCLVIDEOS ; i++, video++ )
295 if( video->state != CLVIDEO_UNUSED && !video->suspended )
296 video->cpif.tex = R_LoadTexture2D( cl_videotexturepool, video->cpif.name,
297 video->cpif.width, video->cpif.height, NULL, TEXTYPE_RGBA, 0, NULL );
300 static void cl_video_shutdown( void )
302 R_FreeTexturePool( &cl_videotexturepool );
305 static void cl_video_newmap( void )
309 void CL_Video_Init( void )
311 cl_videobytesperpixel = 4;
312 cl_videormask = BigLong(0xFF000000);
313 cl_videogmask = BigLong(0x00FF0000);
314 cl_videobmask = BigLong(0x0000FF00);
316 Cmd_AddCommand( "playvideo", CL_PlayVideo_f );
317 Cmd_AddCommand( "stopvideo", CL_StopVideo_f );
319 cl_videomempool = Mem_AllocPool( "CL_Video", 0, NULL );
321 R_RegisterModule( "CL_Video", cl_video_start, cl_video_shutdown, cl_video_newmap );