colors for DrawQ_Mesh are now float rather than byte, and vertices are padded to...
[divverent/darkplaces.git] / cl_video.c
1
2 #include "quakedef.h"
3 #include "cl_video.h"
4 #include "dpvsimpledecode.h"
5
6 mempool_t *clvideomempool;
7
8 int cl_videoplaying = false;
9 void *cl_videostream;
10
11 double cl_videostarttime;
12 int cl_videoframenum;
13 double cl_videoframerate;
14
15 int cl_videoimagewidth;
16 int cl_videoimageheight;
17 int cl_videoimagedata_rmask;
18 int cl_videoimagedata_gmask;
19 int cl_videoimagedata_bmask;
20 int cl_videoimagedata_bytesperpixel;
21 void *cl_videoimagedata;
22
23 int cl_videosoundrate;
24 int cl_videosoundlength;
25 short *cl_videosounddata;
26 int cl_videosoundresamplelength;
27 short *cl_videosoundresampledata;
28
29 rtexture_t *cl_videotexture;
30 rtexturepool_t *cl_videotexturepool;
31
32 void CL_VideoFrame(void)
33 {
34         int frames, framenum, samples, s;
35         if (!cl_videoplaying)
36                 return;
37         framenum = (realtime - cl_videostarttime) * cl_videoframerate;
38         //Con_Printf("frame %i\n", framenum);
39         if (framenum < 0)
40                 framenum = 0;
41         frames = 0;
42         while (cl_videoframenum < framenum)
43         {
44                 frames++;
45                 cl_videoframenum++;
46                 if (dpvsimpledecode_video(cl_videostream, cl_videoimagedata, cl_videoimagedata_rmask, cl_videoimagedata_gmask, cl_videoimagedata_bmask, cl_videoimagedata_bytesperpixel, cl_videoimagewidth * cl_videoimagedata_bytesperpixel))
47                 {
48                         CL_VideoStop();
49                         return;
50                 }
51         }
52         if (frames)
53         {
54                 R_UpdateTexture(cl_videotexture, cl_videoimagedata);
55                 //Draw_NewPic("engine_videoframe", cl_videoimagewidth, cl_videoimageheight, false, cl_videoimagedata);
56         }
57         if (cl_videosoundrate && (samples = S_RawSamples_QueueWantsMore()))
58         {
59                 Con_Printf("%i = S_RawSamples_QueueWantsMore()\n", samples);
60
61                 // calculate how much source data we need to fill the output...
62                 s = samples * cl_videosoundrate / shm->speed;
63
64                 // reallocate processing buffer if needed
65                 if (cl_videosoundresamplelength < samples)
66                 {
67                         cl_videosoundresamplelength = samples + 100;
68                         if (cl_videosoundresampledata)
69                                 Mem_Free(cl_videosoundresampledata);
70                         cl_videosoundresampledata = Mem_Alloc(clvideomempool, cl_videosoundresamplelength * sizeof(short[2]));
71                 }
72
73                 // reallocate loading buffer if needed
74                 if (cl_videosoundlength < s)
75                 {
76                         cl_videosoundlength = s + 100;
77                         if (cl_videosounddata)
78                                 Mem_Free(cl_videosounddata);
79                         cl_videosounddata = Mem_Alloc(clvideomempool, cl_videosoundlength * sizeof(short[2]));
80                 }
81
82                 dpvsimpledecode_audio(cl_videostream, cl_videosounddata, s);
83                 S_ResampleBuffer16Stereo(cl_videosounddata, s, cl_videosoundresampledata, samples);
84                 S_RawSamples_Enqueue(cl_videosoundresampledata, samples);
85         }
86 }
87
88 void CL_DrawVideo(void)
89 {
90         if (cl_videoplaying)
91         {
92                 drawqueuemesh_t mesh;
93                 int indices[6];
94                 float vertices[16];
95                 float texcoords[8];
96                 float colorsf[16];
97                 float s1, t1, s2, t2, x1, y1, x2, y2;
98                 indices[0] = 0;
99                 indices[1] = 1;
100                 indices[2] = 2;
101                 indices[3] = 0;
102                 indices[4] = 2;
103                 indices[5] = 3;
104                 x1 = 0;
105                 y1 = 0;
106                 x2 = vid.conwidth;
107                 y2 = vid.conheight;
108                 R_FragmentLocation(cl_videotexture, NULL, NULL, &s1, &t1, &s2, &t2);
109                 texcoords[0] = s1;texcoords[1] = t1;
110                 texcoords[2] = s2;texcoords[3] = t1;
111                 texcoords[4] = s2;texcoords[5] = t2;
112                 texcoords[6] = s1;texcoords[7] = t2;
113                 R_FillColors(colorsf, 4, r_colorscale, r_colorscale, r_colorscale, 1);
114                 vertices[ 0] = x1;vertices[ 1] = y1;vertices[ 2] = 0;vertices[ 3] = 0;
115                 vertices[ 4] = x2;vertices[ 5] = y1;vertices[ 6] = 0;vertices[ 7] = 0;
116                 vertices[ 8] = x2;vertices[ 9] = y2;vertices[10] = 0;vertices[11] = 0;
117                 vertices[12] = x1;vertices[13] = y2;vertices[14] = 0;vertices[15] = 0;
118                 mesh.texture = cl_videotexture;
119                 mesh.numindices = 6;
120                 mesh.numvertices = 4;
121                 mesh.indices = indices;
122                 mesh.vertices = vertices;
123                 mesh.texcoords = texcoords;
124                 mesh.colors = colorsf;
125                 DrawQ_Mesh(&mesh, 0);
126                 //DrawQ_Pic(0, 0, "engine_videoframe", vid.conwidth, vid.conheight, 1, 1, 1, 1, 0);
127         }
128 }
129
130 void CL_VideoStart(char *filename)
131 {
132         char *errorstring;
133         cl_videostream = dpvsimpledecode_open(filename, &errorstring);
134         if (!cl_videostream)
135         {
136                 Con_Printf("unable to open \"%s\", error: %s\n", filename, errorstring);
137                 return;
138         }
139
140         cl_videoplaying = true;
141         cl_videostarttime = realtime;
142         cl_videoframenum = -1;
143         cl_videoframerate = dpvsimpledecode_getframerate(cl_videostream);
144         cl_videoimagewidth = dpvsimpledecode_getwidth(cl_videostream);
145         cl_videoimageheight = dpvsimpledecode_getheight(cl_videostream);
146
147         // RGBA format
148         cl_videoimagedata_bytesperpixel = 4;
149         cl_videoimagedata_rmask = BigLong(0xFF000000);
150         cl_videoimagedata_gmask = BigLong(0x00FF0000);
151         cl_videoimagedata_bmask = BigLong(0x0000FF00);
152         cl_videoimagedata = Mem_Alloc(clvideomempool, cl_videoimagewidth * cl_videoimageheight * cl_videoimagedata_bytesperpixel);
153         //memset(cl_videoimagedata, 97, cl_videoimagewidth * cl_videoimageheight * cl_videoimagedata_bytesperpixel);
154
155         cl_videosoundrate = dpvsimpledecode_getsoundrate(cl_videostream);
156         cl_videosoundlength = 0;
157         cl_videosounddata = NULL;
158         cl_videosoundresamplelength = 0;
159         cl_videosoundresampledata = NULL;
160
161         cl_videotexturepool = R_AllocTexturePool();
162         cl_videotexture = R_LoadTexture(cl_videotexturepool, "videotexture", cl_videoimagewidth, cl_videoimageheight, NULL, TEXTYPE_RGBA, TEXF_FRAGMENT);
163 }
164
165 void CL_VideoStop(void)
166 {
167         cl_videoplaying = false;
168
169         S_RawSamples_ClearQueue();
170
171         if (cl_videostream)
172                 dpvsimpledecode_close(cl_videostream);
173         cl_videostream = NULL;
174
175         if (cl_videoimagedata)
176                 Mem_Free(cl_videoimagedata);
177         cl_videoimagedata = NULL;
178
179         if (cl_videosounddata)
180                 Mem_Free(cl_videosounddata);
181         cl_videosounddata = NULL;
182
183         if (cl_videosoundresampledata)
184                 Mem_Free(cl_videosoundresampledata);
185         cl_videosoundresampledata = NULL;
186
187         cl_videotexture = NULL;
188         R_FreeTexturePool(&cl_videotexturepool);
189
190         Draw_FreePic("engine_videoframe");
191 }
192
193 static void CL_PlayVideo_f(void)
194 {
195         char name[1024];
196
197         if (Cmd_Argc() != 2)
198         {
199                 Con_Printf ("usage: playvideo <videoname>\nplays video named video/<videoname>.dpv\n");
200                 return;
201         }
202
203         sprintf(name, "%s/video/%s.dpv", com_gamedir, Cmd_Argv(1));
204         CL_VideoStart(name);
205 }
206
207 static void CL_StopVideo_f(void)
208 {
209         CL_VideoStop();
210 }
211
212 void CL_Video_Init(void)
213 {
214         Cmd_AddCommand("playvideo", CL_PlayVideo_f);
215         Cmd_AddCommand("stopvideo", CL_StopVideo_f);
216
217         clvideomempool = Mem_AllocPool("CL_Video");
218 }