changed all Draw_CachePic calls to precache the pic except for two calls in the menu...
[divverent/darkplaces.git] / cl_video.c
1
2 #include "quakedef.h"
3 #include "cl_video.h"
4 #include "dpvsimpledecode.h"
5
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;
11
12 static int cl_num_videos;
13 static clvideo_t cl_videos[ MAXCLVIDEOS ];
14 static rtexturepool_t *cl_videotexturepool;
15
16 static clvideo_t *FindUnusedVid( void )
17 {
18         int i;
19         for( i = 1 ; i < MAXCLVIDEOS ; i++ )
20                 if( cl_videos[ i ].state == CLVIDEO_UNUSED )
21                         return &cl_videos[ i ];
22         return NULL;
23 }
24
25 static qboolean OpenStream( clvideo_t * video )
26 {
27         char *errorstring;
28         video->stream = dpvsimpledecode_open( video->filename, &errorstring);
29         if (!video->stream )
30         {
31                 Con_Printf("unable to open \"%s\", error: %s\n", video->filename, errorstring);
32                 return false;
33         }
34         return true;
35 }
36
37 static void SuspendVideo( clvideo_t * video )
38 {
39         if( video->suspended )
40                 return;
41         video->suspended = true;
42         // free the texture
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 );
49 }
50
51 static qboolean WakeVideo( clvideo_t * video )
52 {
53         if( !video->suspended )
54                 return true;
55         video->suspended = false;
56
57         if( video->state == CLVIDEO_FIRSTFRAME )
58                 if( !OpenStream( video ) ) {
59                         video->state = CLVIDEO_UNUSED;
60                         return false;
61                 }
62
63         video->imagedata = Mem_Alloc( cls.permanentmempool, 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, TEXF_ALWAYSPRECACHE, NULL );
66
67         // update starttime
68         video->starttime += realtime - video->lasttime;
69
70         return true;
71 }
72
73 static clvideo_t* OpenVideo( clvideo_t *video, const char *filename, const char *name, int owner )
74 {
75         strncpy( video->filename, filename, MAX_QPATH );
76         video->ownertag = owner;
77         if( strncmp( name, CLVIDEOPREFIX, sizeof( CLVIDEOPREFIX ) - 1 ) )
78                 return NULL;
79         strncpy( video->cpif.name, name, MAX_QPATH );
80
81         if( !OpenStream( video ) )
82                 return NULL;
83
84         video->state = CLVIDEO_FIRSTFRAME;
85         video->framenum = -1;
86         video->framerate = dpvsimpledecode_getframerate( video->stream );
87         video->lasttime = realtime;
88
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, TEXF_ALWAYSPRECACHE, NULL );
93
94     video->imagedata = Mem_Alloc( cls.permanentmempool, video->cpif.width * video->cpif.height * cl_videobytesperpixel );
95
96         return video;
97 }
98
99 clvideo_t* CL_OpenVideo( const char *filename, const char *name, int owner )
100 {
101         clvideo_t *video;
102
103         video = FindUnusedVid();
104         if( !video ) {
105                 Con_Printf( "unable to open video \"%s\" - video limit reached\n", filename );
106                 return NULL;
107         }
108         video = OpenVideo( video, filename, name, owner );
109         // expand the active range to include the new entry
110         if (video)
111                 cl_num_videos = max(cl_num_videos, (int)(video - cl_videos) + 1);
112         return video;
113 }
114
115 static clvideo_t* CL_GetVideoBySlot( int slot )
116 {
117         clvideo_t *video = &cl_videos[ slot ];
118
119         if( video->suspended )
120         {
121                 if( !WakeVideo( video ) )
122                         return NULL;
123                 else if( video->state == CLVIDEO_RESETONWAKEUP )
124                         video->framenum = -1;
125         }
126
127         video->lasttime = realtime;
128
129         return video;
130 }
131
132 clvideo_t *CL_GetVideoByName( const char *name )
133 {
134         int i;
135
136         for( i = 0 ; i < cl_num_videos ; i++ )
137                 if( cl_videos[ i ].state != CLVIDEO_UNUSED
138                         &&      !strcmp( cl_videos[ i ].cpif.name , name ) )
139                         break;
140         if( i != cl_num_videos )
141                 return CL_GetVideoBySlot( i );
142         else
143                 return NULL;
144 }
145
146 void CL_SetVideoState( clvideo_t *video, clvideostate_t state )
147 {
148         if( !video )
149                 return;
150
151         video->lasttime = realtime;
152         video->state = state;
153         if( state == CLVIDEO_FIRSTFRAME )
154                 CL_RestartVideo( video );
155 }
156
157 void CL_RestartVideo( clvideo_t *video )
158 {
159         if( !video )
160                 return;
161
162         video->starttime = video->lasttime = realtime;
163         video->framenum = -1;
164
165         dpvsimpledecode_close( video->stream );
166         if( !OpenStream( video ) )
167                 video->state = CLVIDEO_UNUSED;
168 }
169
170 void CL_CloseVideo( clvideo_t * video )
171 {
172         if( !video || video->state == CLVIDEO_UNUSED )
173                 return;
174
175         if( !video->suspended || video->state != CLVIDEO_FIRSTFRAME )
176                 dpvsimpledecode_close( video->stream );
177         if( !video->suspended ) {
178                 Mem_Free( video->imagedata );
179                 R_FreeTexture( video->cpif.tex );
180         }
181
182         video->state = CLVIDEO_UNUSED;
183 }
184
185 static void VideoFrame( clvideo_t *video )
186 {
187         int destframe;
188
189         if( video->state == CLVIDEO_FIRSTFRAME )
190                 destframe = 0;
191         else
192                 destframe = (realtime - video->starttime) * video->framerate;
193         if( destframe < 0 )
194                 destframe = 0;
195         if( video->framenum < destframe ) {
196                 do {
197                         video->framenum++;
198                         if( dpvsimpledecode_video( video->stream, video->imagedata, cl_videormask,
199                                 cl_videogmask, cl_videobmask, cl_videobytesperpixel,
200                                 cl_videobytesperpixel * video->cpif.width )
201                                 ) { // finished?
202                                 CL_RestartVideo( video );
203                                 if( video->state == CLVIDEO_PLAY )
204                                                 video->state = CLVIDEO_FIRSTFRAME;
205                                 return;
206                         }
207                 } while( video->framenum < destframe );
208                 R_UpdateTexture( video->cpif.tex, (unsigned char *)video->imagedata, 0, 0, video->cpif.width, video->cpif.height );
209         }
210 }
211
212 void CL_VideoFrame( void ) // update all videos
213 {
214         int i;
215         clvideo_t *video;
216
217         if (!cl_num_videos)
218                 return;
219
220         for( video = cl_videos, i = 0 ; i < cl_num_videos ; video++, i++ )
221                 if( video->state != CLVIDEO_UNUSED && !video->suspended )
222                 {
223                         if( realtime - video->lasttime > CLTHRESHOLD )
224                                 SuspendVideo( video );
225                         else if( video->state == CLVIDEO_PAUSE )
226                                 video->starttime = realtime - video->framenum * video->framerate;
227                         else
228                                 VideoFrame( video );
229                 }
230
231         if( cl_videos->state == CLVIDEO_FIRSTFRAME )
232                 CL_VideoStop();
233
234         // reduce range to exclude unnecessary entries
235         while (cl_num_videos > 0 && cl_videos[cl_num_videos-1].state == CLVIDEO_UNUSED)
236                 cl_num_videos--;
237 }
238
239 void CL_Video_Shutdown( void )
240 {
241         int i;
242         for( i = 0 ; i < cl_num_videos ; i++ )
243                 CL_CloseVideo( &cl_videos[ i ] );
244 }
245
246 void CL_PurgeOwner( int owner )
247 {
248         int i;
249         for( i = 0 ; i < cl_num_videos ; i++ )
250                 if( cl_videos[ i ].ownertag == owner )
251                         CL_CloseVideo( &cl_videos[ i ] );
252 }
253
254 int cl_videoplaying = false; // old, but still supported
255
256 void CL_DrawVideo(void)
257 {
258         if (cl_videoplaying)
259                 DrawQ_Pic(0, 0, &CL_GetVideoBySlot( 0 )->cpif, vid_conwidth.integer, vid_conheight.integer, 1, 1, 1, 1, 0);
260 }
261
262 void CL_VideoStart(char *filename)
263 {
264         Host_StartVideo();
265
266         if( cl_videos->state != CLVIDEO_UNUSED )
267                 CL_CloseVideo( cl_videos );
268         if( !OpenVideo( cl_videos, filename, va( CLVIDEOPREFIX "%s", filename ), 0 ) )
269                 return;
270         // expand the active range to include the new entry
271         cl_num_videos = max(cl_num_videos, 1);
272
273         cl_videoplaying = true;
274
275         CL_SetVideoState( cl_videos, CLVIDEO_PLAY );
276         CL_RestartVideo( cl_videos );
277 }
278
279 void CL_VideoStop(void)
280 {
281         cl_videoplaying = false;
282
283         CL_CloseVideo( cl_videos );
284 }
285
286 static void CL_PlayVideo_f(void)
287 {
288         char name[MAX_QPATH];
289
290         Host_StartVideo();
291
292         if (Cmd_Argc() != 2)
293         {
294                 Con_Print("usage: playvideo <videoname>\nplays video named video/<videoname>.dpv\n");
295                 return;
296         }
297
298         sprintf(name, "video/%s.dpv", Cmd_Argv(1));
299         CL_VideoStart(name);
300 }
301
302 static void CL_StopVideo_f(void)
303 {
304         CL_VideoStop();
305 }
306
307 static void cl_video_start( void )
308 {
309         int i;
310         clvideo_t *video;
311
312         cl_videotexturepool = R_AllocTexturePool();
313
314         for( video = cl_videos, i = 0 ; i < cl_num_videos ; i++, video++ )
315                 if( video->state != CLVIDEO_UNUSED && !video->suspended )
316                         video->cpif.tex = R_LoadTexture2D( cl_videotexturepool, video->cpif.name,
317                                 video->cpif.width, video->cpif.height, NULL, TEXTYPE_RGBA, TEXF_ALWAYSPRECACHE, NULL );
318 }
319
320 static void cl_video_shutdown( void )
321 {
322         R_FreeTexturePool( &cl_videotexturepool );
323 }
324
325 static void cl_video_newmap( void )
326 {
327 }
328
329 void CL_Video_Init( void )
330 {
331         cl_num_videos = 0;
332         cl_videobytesperpixel = 4;
333         cl_videormask = BigLong(0xFF000000);
334         cl_videogmask = BigLong(0x00FF0000);
335         cl_videobmask = BigLong(0x0000FF00);
336
337         Cmd_AddCommand( "playvideo", CL_PlayVideo_f, "play a .dpv video file" );
338         Cmd_AddCommand( "stopvideo", CL_StopVideo_f, "stop playing a .dpv video file" );
339
340         R_RegisterModule( "CL_Video", cl_video_start, cl_video_shutdown, cl_video_newmap );
341 }
342