Fix issue with noise during startup
[xonotic/darkplaces.git] / cl_video.c
1
2 #include "quakedef.h"
3 #include "cl_video.h"
4
5 // cvars
6 cvar_t cl_video_subtitles = {CVAR_SAVE, "cl_video_subtitles", "0", "show subtitles for videos (if they are present)"};
7 cvar_t cl_video_subtitles_lines = {CVAR_SAVE, "cl_video_subtitles_lines", "4", "how many lines to occupy for subtitles"};
8 cvar_t cl_video_subtitles_textsize = {CVAR_SAVE, "cl_video_subtitles_textsize", "16", "textsize for subtitles"};
9 cvar_t cl_video_scale = {CVAR_SAVE, "cl_video_scale", "1", "scale of video, 1 = fullscreen, 0.75 - 3/4 of screen etc."};
10 cvar_t cl_video_scale_vpos = {CVAR_SAVE, "cl_video_scale_vpos", "0", "vertical align of scaled video, -1 is top, 1 is bottom"};
11 cvar_t cl_video_stipple = {CVAR_SAVE, "cl_video_stipple", "0", "draw interlacing-like effect on videos, similar to scr_stipple but static and used only with video playing."};
12 cvar_t cl_video_brightness = {CVAR_SAVE, "cl_video_brightness", "1", "brightness of video, 1 = fullbright, 0.75 - 3/4 etc."};
13 cvar_t cl_video_keepaspectratio = {CVAR_SAVE, "cl_video_keepaspectratio", "0", "keeps aspect ratio of fullscreen videos, leaving black color on unfilled areas, a value of 2 let video to be stretched horizontally with top & bottom being sliced out"};
14 cvar_t cl_video_fadein = {CVAR_SAVE, "cl_video_fadein", "0", "fading-from-black effect once video is started, in seconds"};
15 cvar_t cl_video_fadeout = {CVAR_SAVE, "cl_video_fadeout", "0", "fading-to-black effect once video is ended, in seconds"};
16
17 cvar_t v_glslgamma_video = {CVAR_SAVE, "v_glslgamma_video", "1", "applies GLSL gamma to played video, could be a fraction, requires r_glslgamma_2d 1."};
18
19 // DPV stream decoder
20 #include "dpvsimpledecode.h"
21
22 // VorteX: libavcodec implementation
23 #include "cl_video_libavw.c"
24
25 // JAM video decoder used by Blood Omnicide
26 #ifdef JAMVIDEO
27 #include "cl_video_jamdecode.c"
28 #endif
29
30 // constants (and semi-constants)
31 static int  cl_videormask;
32 static int  cl_videobmask;
33 static int  cl_videogmask;
34 static int      cl_videobytesperpixel;
35
36 static int cl_num_videos;
37 static clvideo_t cl_videos[ MAXCLVIDEOS ];
38 static rtexturepool_t *cl_videotexturepool;
39
40 static clvideo_t *FindUnusedVid( void )
41 {
42         int i;
43         for( i = 1 ; i < MAXCLVIDEOS ; i++ )
44                 if( cl_videos[ i ].state == CLVIDEO_UNUSED )
45                         return &cl_videos[ i ];
46         return NULL;
47 }
48
49 static qboolean OpenStream( clvideo_t * video )
50 {
51         const char *errorstring;
52
53         video->stream = dpvsimpledecode_open( video, video->filename, &errorstring);
54         if (video->stream)
55                 return true;
56
57 #ifdef JAMVIDEO
58         video->stream = jam_open( video, video->filename, &errorstring);
59         if (video->stream)
60                 return true;
61 #endif
62
63         video->stream = LibAvW_OpenVideo( video, video->filename, &errorstring);
64         if (video->stream)
65                 return true;
66
67         Con_Printf("unable to open \"%s\", error: %s\n", video->filename, errorstring);
68         return false;
69 }
70
71 static void VideoUpdateCallback(rtexture_t *rt, void *data)
72 {
73         clvideo_t *video = (clvideo_t *) data;
74         Draw_NewPic(video->name, video->width, video->height, (unsigned char *)video->imagedata, TEXTYPE_BGRA, TEXF_CLAMP);
75 }
76
77 static void LinkVideoTexture( clvideo_t *video )
78 {
79         video->cachepic = Draw_NewPic(video->name, video->width, video->height, NULL, TEXTYPE_BGRA, TEXF_CLAMP);
80         // make R_GetTexture() call our VideoUpdateCallback
81         R_MakeTextureDynamic(Draw_GetPicTexture(video->cachepic), VideoUpdateCallback, video);
82 }
83
84 static void UnlinkVideoTexture( clvideo_t *video )
85 {
86         // free the texture (this does not destroy the cachepic_t, which is eternal)
87         Draw_FreePic(video->name);
88         // free the image data
89         Mem_Free( video->imagedata );
90 }
91
92 static void SuspendVideo( clvideo_t * video )
93 {
94         if (video->suspended)
95                 return;
96         video->suspended = true;
97         UnlinkVideoTexture(video);
98         // if we are in firstframe mode, also close the stream
99         if (video->state == CLVIDEO_FIRSTFRAME)
100         {
101                 if (video->stream)
102                         video->close(video->stream);
103                 video->stream = NULL;
104         }
105 }
106
107 static qboolean WakeVideo( clvideo_t * video )
108 {
109         if( !video->suspended )
110                 return true;
111         video->suspended = false;
112
113         if( video->state == CLVIDEO_FIRSTFRAME )
114                 if( !OpenStream( video ) ) {
115                         video->state = CLVIDEO_UNUSED;
116                         return false;
117                 }
118
119         video->imagedata = Mem_Alloc( cls.permanentmempool, video->width * video->height * cl_videobytesperpixel );
120         LinkVideoTexture( video );
121
122         // update starttime
123         video->starttime += realtime - video->lasttime;
124
125         return true;
126 }
127
128 static void LoadSubtitles( clvideo_t *video, const char *subtitlesfile )
129 {
130         char *subtitle_text;
131         const char *data;
132         float subtime, sublen;
133         int numsubs = 0;
134
135         if (gamemode == GAME_BLOODOMNICIDE)
136         {
137                 char overridename[MAX_QPATH];
138                 cvar_t *langcvar;
139
140                 langcvar = Cvar_FindVar("language");
141                 subtitle_text = NULL;
142                 if (langcvar)
143                 {
144                         dpsnprintf(overridename, sizeof(overridename), "locale/%s/%s", langcvar->string, subtitlesfile);
145                         subtitle_text = (char *)FS_LoadFile(overridename, cls.permanentmempool, false, NULL);
146                 }
147                 if (!subtitle_text)
148                         subtitle_text = (char *)FS_LoadFile(subtitlesfile, cls.permanentmempool, false, NULL);
149         }
150         else
151         {
152                 subtitle_text = (char *)FS_LoadFile(subtitlesfile, cls.permanentmempool, false, NULL);
153         }
154         if (!subtitle_text)
155         {
156                 Con_DPrintf( "LoadSubtitles: can't open subtitle file '%s'!\n", subtitlesfile );
157                 return;
158         }
159
160         // parse subtitle_text
161         // line is: x y "text" where
162         //    x - start time
163         //    y - seconds last (if 0 - last thru next sub, if negative - last to next sub - this amount of seconds)
164
165         data = subtitle_text;
166         for (;;)
167         {
168                 if (!COM_ParseToken_QuakeC(&data, false))
169                         break;
170                 subtime = atof( com_token );
171                 if (!COM_ParseToken_QuakeC(&data, false))
172                         break;
173                 sublen = atof( com_token );
174                 if (!COM_ParseToken_QuakeC(&data, false))
175                         break;
176                 if (!com_token[0])
177                         continue;
178                 // check limits
179                 if (video->subtitles == CLVIDEO_MAX_SUBTITLES)
180                 {
181                         Con_Printf("WARNING: CLVIDEO_MAX_SUBTITLES = %i reached when reading subtitles from '%s'\n", CLVIDEO_MAX_SUBTITLES, subtitlesfile);
182                         break;  
183                 }
184                 // add a sub
185                 video->subtitle_text[numsubs] = (char *) Mem_Alloc(cls.permanentmempool, strlen(com_token) + 1);
186                 memcpy(video->subtitle_text[numsubs], com_token, strlen(com_token) + 1);
187                 video->subtitle_start[numsubs] = subtime;
188                 video->subtitle_end[numsubs] = sublen;
189                 if (numsubs > 0) // make true len for prev sub, autofix overlapping subtitles
190                 {
191                         if (video->subtitle_end[numsubs-1] <= 0)
192                                 video->subtitle_end[numsubs-1] = max(video->subtitle_start[numsubs-1], video->subtitle_start[numsubs] + video->subtitle_end[numsubs-1]);
193                         else
194                                 video->subtitle_end[numsubs-1] = min(video->subtitle_start[numsubs-1] + video->subtitle_end[numsubs-1], video->subtitle_start[numsubs]);
195                 }
196                 numsubs++;
197                 // todo: check timing for consistency?
198         }
199         if (numsubs > 0) // make true len for prev sub, autofix overlapping subtitles
200         {
201                 if (video->subtitle_end[numsubs-1] <= 0)
202                         video->subtitle_end[numsubs-1] = 99999999; // fixme: make it end when video ends?
203                 else
204                         video->subtitle_end[numsubs-1] = video->subtitle_start[numsubs-1] + video->subtitle_end[numsubs-1];
205         }
206         Z_Free( subtitle_text );
207         video->subtitles = numsubs;
208 /*
209         Con_Printf( "video->subtitles: %i\n", video->subtitles );
210         for (numsubs = 0; numsubs < video->subtitles; numsubs++)
211                 Con_Printf( "  %03.2f %03.2f : %s\n", video->subtitle_start[numsubs], video->subtitle_end[numsubs], video->subtitle_text[numsubs] );
212 */
213 }
214
215 static clvideo_t* OpenVideo( clvideo_t *video, const char *filename, const char *name, int owner, const char *subtitlesfile )
216 {
217         strlcpy(video->filename, filename, sizeof(video->filename));
218         dpsnprintf(video->name, sizeof(video->name), CLVIDEOPREFIX "%s", name);
219         video->ownertag = owner;
220         if( strncmp( name, CLVIDEOPREFIX, sizeof( CLVIDEOPREFIX ) - 1 ) )
221                 return NULL;
222         video->cachepic = Draw_CachePic_Flags(name, CACHEPICFLAG_NOTPERSISTENT | CACHEPICFLAG_QUIET);
223
224         if( !OpenStream( video ) )
225                 return NULL;
226
227         video->state = CLVIDEO_FIRSTFRAME;
228         video->framenum = -1;
229         video->framerate = video->getframerate( video->stream );
230         video->lasttime = realtime;
231         video->subtitles = 0;
232
233         video->width = video->getwidth( video->stream );
234         video->height = video->getheight( video->stream );
235         video->imagedata = Mem_Alloc( cls.permanentmempool, video->width * video->height * cl_videobytesperpixel );
236         LinkVideoTexture( video );
237
238         // VorteX: load simple subtitle_text file
239         if (subtitlesfile[0])
240                 LoadSubtitles( video, subtitlesfile );
241
242         return video;
243 }
244
245 clvideo_t* CL_OpenVideo( const char *filename, const char *name, int owner, const char *subtitlesfile )
246 {
247         clvideo_t *video;
248         // sanity check
249         if( !name || !*name || strncmp( name, CLVIDEOPREFIX, sizeof( CLVIDEOPREFIX ) - 1 ) != 0 ) {
250                 Con_DPrintf( "CL_OpenVideo: Bad video texture name '%s'!\n", name );
251                 return NULL;
252         }
253
254         video = FindUnusedVid();
255         if( !video ) {
256                 Con_Printf( "CL_OpenVideo: unable to open video \"%s\" - video limit reached\n", filename );
257                 return NULL;
258         }
259         video = OpenVideo( video, filename, name, owner, subtitlesfile );
260         // expand the active range to include the new entry
261         if (video) {
262                 cl_num_videos = max(cl_num_videos, (int)(video - cl_videos) + 1);
263         }
264         return video;
265 }
266
267 static clvideo_t* CL_GetVideoBySlot( int slot )
268 {
269         clvideo_t *video = &cl_videos[ slot ];
270
271         if( video->suspended )
272         {
273                 if( !WakeVideo( video ) )
274                         return NULL;
275                 else if( video->state == CLVIDEO_RESETONWAKEUP )
276                         video->framenum = -1;
277         }
278
279         video->lasttime = realtime;
280
281         return video;
282 }
283
284 clvideo_t *CL_GetVideoByName( const char *name )
285 {
286         int i;
287
288         for( i = 0 ; i < cl_num_videos ; i++ )
289                 if( cl_videos[ i ].state != CLVIDEO_UNUSED
290                         &&      !strcmp( cl_videos[ i ].name , name ) )
291                         break;
292         if( i != cl_num_videos )
293                 return CL_GetVideoBySlot( i );
294         else
295                 return NULL;
296 }
297
298 void CL_SetVideoState(clvideo_t *video, clvideostate_t state)
299 {
300         if (!video)
301                 return;
302
303         video->lasttime = realtime;
304         video->state = state;
305         if (state == CLVIDEO_FIRSTFRAME)
306                 CL_RestartVideo(video);
307 }
308
309 void CL_RestartVideo(clvideo_t *video)
310 {
311         if (!video)
312                 return;
313
314         // reset time
315         video->starttime = video->lasttime = realtime;
316         video->framenum = -1;
317
318         // reopen stream
319         if (video->stream)
320                 video->close(video->stream);
321         video->stream = NULL;
322         if (!OpenStream(video))
323                 video->state = CLVIDEO_UNUSED;
324 }
325
326 // close video
327 void CL_CloseVideo(clvideo_t * video)
328 {
329         int i;
330
331         if (!video || video->state == CLVIDEO_UNUSED)
332                 return;
333
334         // close stream
335         if (!video->suspended || video->state != CLVIDEO_FIRSTFRAME)
336         {
337                 if (video->stream)
338                         video->close(video->stream);
339                 video->stream = NULL;
340         }
341         // unlink texture
342         if (!video->suspended)
343                 UnlinkVideoTexture(video);
344         // purge subtitles
345         if (video->subtitles)
346         {
347                 for (i = 0; i < video->subtitles; i++)
348                         Z_Free( video->subtitle_text[i] );
349                 video->subtitles = 0;
350         }
351         video->state = CLVIDEO_UNUSED;
352 }
353
354 // update all videos
355 void CL_Video_Frame(void) 
356 {
357         clvideo_t *video;
358         int destframe;
359         int i;
360
361         if (!cl_num_videos)
362                 return;
363         for (video = cl_videos, i = 0 ; i < cl_num_videos ; video++, i++)
364         {
365                 if (video->state != CLVIDEO_UNUSED && !video->suspended)
366                 {
367                         if (realtime - video->lasttime > CLTHRESHOLD)
368                         {
369                                 SuspendVideo(video);
370                                 continue;
371                         }
372                         if (video->state == CLVIDEO_PAUSE)
373                         {
374                                 video->starttime = realtime - video->framenum * video->framerate;
375                                 continue;
376                         }
377                         // read video frame from stream if time has come
378                         if (video->state == CLVIDEO_FIRSTFRAME )
379                                 destframe = 0;
380                         else
381                                 destframe = (int)((realtime - video->starttime) * video->framerate);
382                         if (destframe < 0)
383                                 destframe = 0;
384                         if (video->framenum < destframe)
385                         {
386                                 do {
387                                         video->framenum++;
388                                         if (video->decodeframe(video->stream, video->imagedata, cl_videormask, cl_videogmask, cl_videobmask, cl_videobytesperpixel, cl_videobytesperpixel * video->width))
389                                         { 
390                                                 // finished?
391                                                 CL_RestartVideo(video);
392                                                 if (video->state == CLVIDEO_PLAY)
393                                                         video->state = CLVIDEO_FIRSTFRAME;
394                                                 return;
395                                         }
396                                 } while(video->framenum < destframe);
397                                 R_MarkDirtyTexture(Draw_GetPicTexture(video->cachepic));
398                         }
399                 }
400         }
401
402         // stop main video
403         if (cl_videos->state == CLVIDEO_FIRSTFRAME)
404                 CL_VideoStop();
405
406         // reduce range to exclude unnecessary entries
407         while(cl_num_videos > 0 && cl_videos[cl_num_videos-1].state == CLVIDEO_UNUSED)
408                 cl_num_videos--;
409 }
410
411 void CL_PurgeOwner( int owner )
412 {
413         int i;
414
415         for (i = 0 ; i < cl_num_videos ; i++)
416                 if (cl_videos[i].ownertag == owner)
417                         CL_CloseVideo(&cl_videos[i]);
418 }
419
420 typedef struct
421 {
422         dp_font_t *font;
423         float x;
424         float y;
425         float width;
426         float height;
427         float alignment; // 0 = left, 0.5 = center, 1 = right
428         float fontsize;
429         float textalpha;
430 }
431 cl_video_subtitle_info_t;
432
433 static float CL_DrawVideo_WordWidthFunc(void *passthrough, const char *w, size_t *length, float maxWidth)
434 {
435         cl_video_subtitle_info_t *si = (cl_video_subtitle_info_t *) passthrough;
436
437         if(w == NULL)
438                 return si->fontsize * si->font->maxwidth;
439         if(maxWidth >= 0)
440                 return DrawQ_TextWidth_UntilWidth(w, length, si->fontsize, si->fontsize, false, si->font, -maxWidth); // -maxWidth: we want at least one char
441         else if(maxWidth == -1)
442                 return DrawQ_TextWidth(w, *length, si->fontsize, si->fontsize, false, si->font);
443         else
444                 return 0;
445 }
446
447 static int CL_DrawVideo_DisplaySubtitleLine(void *passthrough, const char *line, size_t length, float width, qboolean isContinuation)
448 {
449         cl_video_subtitle_info_t *si = (cl_video_subtitle_info_t *) passthrough;
450
451         int x = (int) (si->x + (si->width - width) * si->alignment);
452         if (length > 0)
453                 DrawQ_String(x, si->y, line, length, si->fontsize, si->fontsize, 1.0, 1.0, 1.0, si->textalpha, 0, NULL, false, si->font);
454         si->y += si->fontsize;
455         return 1;
456 }
457
458 int cl_videoplaying = false; // old, but still supported
459
460 void CL_DrawVideo(void)
461 {
462         clvideo_t *video;
463         float videotime, px, py, sx, sy, st[8], b;
464         cl_video_subtitle_info_t si;
465         int i;
466
467         if (!cl_videoplaying)
468                 return;
469
470         video = CL_GetVideoBySlot( 0 );
471
472         // fix cvars
473         if (cl_video_scale.value <= 0 || cl_video_scale.value > 1)
474                 Cvar_SetValueQuick( &cl_video_scale, 1);
475         if (cl_video_brightness.value <= 0 || cl_video_brightness.value > 10)
476                 Cvar_SetValueQuick( &cl_video_brightness, 1);
477
478         // calc video proportions
479         px = 0;
480         py = 0;
481         sx = vid_conwidth.integer;
482         sy = vid_conheight.integer;
483         st[0] = 0.0; st[1] = 0.0; 
484         st[2] = 1.0; st[3] = 0.0; 
485         st[4] = 0.0; st[5] = 1.0; 
486         st[6] = 1.0; st[7] = 1.0; 
487         if (cl_video_keepaspectratio.integer)
488         {
489                 float a = video->getaspectratio(video->stream) / ((float)vid.width / (float)vid.height);
490                 if (cl_video_keepaspectratio.integer >= 2)
491                 {
492                         // clip instead of scale
493                         if (a < 1.0) // clip horizontally
494                         {
495                                 st[1] = st[3] = (1 - a)*0.5;
496                                 st[5] = st[7] = 1 - (1 - a)*0.5;
497                         }
498                         else if (a > 1.0) // clip vertically
499                         {
500                                 st[0] = st[4] = (1 - 1/a)*0.5;
501                                 st[2] = st[6] = (1/a)*0.5;
502                         }
503                 }
504                 else if (a < 1.0) // scale horizontally
505                 {
506                         px += sx * (1 - a) * 0.5;
507                         sx *= a;
508                 }
509                 else if (a > 1.0) // scale vertically
510                 {
511                         a = 1 / a;
512                         py += sy * (1 - a);
513                         sy *= a;
514                 }
515         }
516
517         if (cl_video_scale.value != 1)
518         {
519                 px += sx * (1 - cl_video_scale.value) * 0.5;
520                 py += sy * (1 - cl_video_scale.value) * ((bound(-1, cl_video_scale_vpos.value, 1) + 1) / 2);
521                 sx *= cl_video_scale.value;
522                 sy *= cl_video_scale.value;
523         }
524
525         // calc brightness for fadein and fadeout effects
526         b = cl_video_brightness.value;
527         if (cl_video_fadein.value && (realtime - video->starttime) < cl_video_fadein.value)
528                 b = pow((realtime - video->starttime)/cl_video_fadein.value, 2);
529         else if (cl_video_fadeout.value && ((video->starttime + video->framenum * video->framerate) - realtime) < cl_video_fadeout.value)
530                 b = pow(((video->starttime + video->framenum * video->framerate) - realtime)/cl_video_fadeout.value, 2);
531
532         // draw black bg in case stipple is active or video is scaled
533         if (cl_video_stipple.integer || px != 0 || py != 0 || sx != vid_conwidth.integer || sy != vid_conheight.integer)
534                 DrawQ_Fill(0, 0, vid_conwidth.integer, vid_conheight.integer, 0, 0, 0, 1, 0);
535
536         // enable video-only polygon stipple (of global stipple is not active)
537         if (!scr_stipple.integer && cl_video_stipple.integer)
538         {
539                 Con_Print("FIXME: cl_video_stipple not implemented\n");
540                 Cvar_SetValueQuick(&cl_video_stipple, 0);
541         }
542
543         // draw video
544         if (v_glslgamma_video.value >= 1)
545                 DrawQ_SuperPic(px, py, video->cachepic, sx, sy, st[0], st[1], b, b, b, 1, st[2], st[3], b, b, b, 1, st[4], st[5], b, b, b, 1, st[6], st[7], b, b, b, 1, 0);
546         else
547         {
548                 DrawQ_SuperPic(px, py, video->cachepic, sx, sy, st[0], st[1], b, b, b, 1, st[2], st[3], b, b, b, 1, st[4], st[5], b, b, b, 1, st[6], st[7], b, b, b, 1, DRAWFLAG_NOGAMMA);
549                 if (v_glslgamma_video.value > 0.0)
550                         DrawQ_SuperPic(px, py, video->cachepic, sx, sy, st[0], st[1], b, b, b, v_glslgamma_video.value, st[2], st[3], b, b, b, v_glslgamma_video.value, st[4], st[5], b, b, b, v_glslgamma_video.value, st[6], st[7], b, b, b, v_glslgamma_video.value, 0);
551         }
552
553         // VorteX: draw subtitle_text
554         if (!video->subtitles || !cl_video_subtitles.integer)
555                 return;
556
557         // find current subtitle
558         videotime = realtime - video->starttime;
559         for (i = 0; i < video->subtitles; i++)
560         {
561                 if (videotime >= video->subtitle_start[i] && videotime <= video->subtitle_end[i])
562                 {
563                         // found, draw it
564                         si.font = FONT_NOTIFY;
565                         si.x = vid_conwidth.integer * 0.1;
566                         si.y = vid_conheight.integer - (max(1, cl_video_subtitles_lines.value) * cl_video_subtitles_textsize.value);
567                         si.width = vid_conwidth.integer * 0.8;
568                         si.height = max(1, cl_video_subtitles_lines.integer) * cl_video_subtitles_textsize.value;
569                         si.alignment = 0.5;
570                         si.fontsize = cl_video_subtitles_textsize.value;
571                         si.textalpha = min(1, (videotime - video->subtitle_start[i])/0.5) * min(1, ((video->subtitle_end[i] - videotime)/0.3)); // fade in and fade out
572                         COM_Wordwrap(video->subtitle_text[i], strlen(video->subtitle_text[i]), 0, si.width, CL_DrawVideo_WordWidthFunc, &si, CL_DrawVideo_DisplaySubtitleLine, &si);
573                         break;
574                 }
575         }
576 }
577
578 void CL_VideoStart(char *filename, const char *subtitlesfile)
579 {
580         Host_StartVideo();
581
582         if( cl_videos->state != CLVIDEO_UNUSED )
583                 CL_CloseVideo( cl_videos );
584         // already contains video/
585         if( !OpenVideo( cl_videos, filename, filename, 0, subtitlesfile ) )
586                 return;
587         // expand the active range to include the new entry
588         cl_num_videos = max(cl_num_videos, 1);
589
590         cl_videoplaying = true;
591
592         CL_SetVideoState( cl_videos, CLVIDEO_PLAY );
593         CL_RestartVideo( cl_videos );
594 }
595
596 void CL_Video_KeyEvent( int key, int ascii, qboolean down ) 
597 {
598         // only react to up events, to allow the user to delay the abortion point if it suddenly becomes interesting..
599         if( !down ) {
600                 if( key == K_ESCAPE || key == K_ENTER || key == K_SPACE ) {
601                         CL_VideoStop();
602                 }
603         }
604 }
605
606 void CL_VideoStop(void)
607 {
608         cl_videoplaying = false;
609
610         CL_CloseVideo( cl_videos );
611 }
612
613 static void CL_PlayVideo_f(void)
614 {
615         char name[MAX_QPATH], subtitlesfile[MAX_QPATH];
616         const char *extension;
617
618         Host_StartVideo();
619
620         if (COM_CheckParm("-benchmark"))
621                 return;
622
623         if (Cmd_Argc() < 2)
624         {
625                 Con_Print("usage: playvideo <videoname> [custom_subtitles_file]\nplays video named video/<videoname>.dpv\nif custom subtitles file is not presented\nit tries video/<videoname>.sub");
626                 return;
627         }
628
629         extension = FS_FileExtension(Cmd_Argv(1));
630         if (extension[0])
631                 dpsnprintf(name, sizeof(name), "video/%s", Cmd_Argv(1));
632         else
633                 dpsnprintf(name, sizeof(name), "video/%s.dpv", Cmd_Argv(1));
634         if ( Cmd_Argc() > 2)
635                 CL_VideoStart(name, Cmd_Argv(2));
636         else
637         {
638                 dpsnprintf(subtitlesfile, sizeof(subtitlesfile), "video/%s.dpsubs", Cmd_Argv(1));
639                 CL_VideoStart(name, subtitlesfile);
640         }
641 }
642
643 static void CL_StopVideo_f(void)
644 {
645         CL_VideoStop();
646 }
647
648 static void cl_video_start( void )
649 {
650         int i;
651         clvideo_t *video;
652
653         cl_videotexturepool = R_AllocTexturePool();
654
655         for( video = cl_videos, i = 0 ; i < cl_num_videos ; i++, video++ )
656                 if( video->state != CLVIDEO_UNUSED && !video->suspended )
657                         LinkVideoTexture( video );
658 }
659
660 static void cl_video_shutdown( void )
661 {
662         int i;
663         clvideo_t *video;
664
665         for( video = cl_videos, i = 0 ; i < cl_num_videos ; i++, video++ )
666                 if( video->state != CLVIDEO_UNUSED && !video->suspended )
667                         SuspendVideo( video );
668         R_FreeTexturePool( &cl_videotexturepool );
669 }
670
671 static void cl_video_newmap( void )
672 {
673 }
674
675 void CL_Video_Init( void )
676 {
677         union
678         {
679                 unsigned char b[4];
680                 unsigned int i;
681         }
682         bgra;
683
684         cl_num_videos = 0;
685         cl_videobytesperpixel = 4;
686
687         // set masks in an endian-independent way (as they really represent bytes)
688         bgra.i = 0;bgra.b[0] = 0xFF;cl_videobmask = bgra.i;
689         bgra.i = 0;bgra.b[1] = 0xFF;cl_videogmask = bgra.i;
690         bgra.i = 0;bgra.b[2] = 0xFF;cl_videormask = bgra.i;
691
692         Cmd_AddCommand( "playvideo", CL_PlayVideo_f, "play a .dpv video file" );
693         Cmd_AddCommand( "stopvideo", CL_StopVideo_f, "stop playing a .dpv video file" );
694
695         Cvar_RegisterVariable(&cl_video_subtitles);
696         Cvar_RegisterVariable(&cl_video_subtitles_lines);
697         Cvar_RegisterVariable(&cl_video_subtitles_textsize);
698         Cvar_RegisterVariable(&cl_video_scale);
699         Cvar_RegisterVariable(&cl_video_scale_vpos);
700         Cvar_RegisterVariable(&cl_video_brightness);
701         Cvar_RegisterVariable(&cl_video_stipple);
702         Cvar_RegisterVariable(&cl_video_keepaspectratio);
703         Cvar_RegisterVariable(&cl_video_fadein);
704         Cvar_RegisterVariable(&cl_video_fadeout);
705
706         Cvar_RegisterVariable(&v_glslgamma_video);
707
708         R_RegisterModule( "CL_Video", cl_video_start, cl_video_shutdown, cl_video_newmap, NULL, NULL );
709
710         LibAvW_OpenLibrary();
711 }
712
713 void CL_Video_Shutdown( void )
714 {
715         int i;
716
717         for (i = 0 ; i < cl_num_videos ; i++)
718                 CL_CloseVideo(&cl_videos[ i ]);
719
720         LibAvW_CloseLibrary();
721 }