implemented occlusion query support on corona rendering, this enables
[divverent/darkplaces.git] / cl_screen.c
1
2 #include "quakedef.h"
3 #include "cl_video.h"
4 #include "image.h"
5 #include "jpeg.h"
6 #include "cl_collision.h"
7 #include "libcurl.h"
8 #include "csprogs.h"
9
10 // we have to include snd_main.h here only to get access to snd_renderbuffer->format.speed when writing the AVI headers
11 #include "snd_main.h"
12
13 cvar_t scr_viewsize = {CVAR_SAVE, "viewsize","100", "how large the view should be, 110 disables inventory bar, 120 disables status bar"};
14 cvar_t scr_fov = {CVAR_SAVE, "fov","90", "field of vision, 1-170 degrees, default 90, some players use 110-130"};
15 cvar_t scr_conalpha = {CVAR_SAVE, "scr_conalpha", "1", "opacity of console background"};
16 cvar_t scr_conbrightness = {CVAR_SAVE, "scr_conbrightness", "1", "brightness of console background (0 = black, 1 = image)"};
17 cvar_t scr_conforcewhiledisconnected = {0, "scr_conforcewhiledisconnected", "1", "forces fullscreen console while disconnected"};
18 cvar_t scr_menuforcewhiledisconnected = {0, "scr_menuforcewhiledisconnected", "0", "forces menu while disconnected"};
19 cvar_t scr_centertime = {0, "scr_centertime","2", "how long centerprint messages show"};
20 cvar_t scr_showram = {CVAR_SAVE, "showram","1", "show ram icon if low on surface cache memory (not used)"};
21 cvar_t scr_showturtle = {CVAR_SAVE, "showturtle","0", "show turtle icon when framerate is too low"};
22 cvar_t scr_showpause = {CVAR_SAVE, "showpause","1", "show pause icon when game is paused"};
23 cvar_t scr_showbrand = {0, "showbrand","0", "shows gfx/brand.tga in a corner of the screen (different values select different positions, including centered)"};
24 cvar_t scr_printspeed = {0, "scr_printspeed","0", "speed of intermission printing (episode end texts), a value of 0 disables the slow printing"};
25 cvar_t vid_conwidth = {CVAR_SAVE, "vid_conwidth", "640", "virtual width of 2D graphics system"};
26 cvar_t vid_conheight = {CVAR_SAVE, "vid_conheight", "480", "virtual height of 2D graphics system"};
27 cvar_t vid_pixelheight = {CVAR_SAVE, "vid_pixelheight", "1", "adjusts vertical field of vision to account for non-square pixels (1280x1024 on a CRT monitor for example)"};
28 cvar_t scr_screenshot_jpeg = {CVAR_SAVE, "scr_screenshot_jpeg","1", "save jpeg instead of targa"};
29 cvar_t scr_screenshot_jpeg_quality = {CVAR_SAVE, "scr_screenshot_jpeg_quality","0.9", "image quality of saved jpeg"};
30 cvar_t scr_screenshot_gammaboost = {CVAR_SAVE, "scr_screenshot_gammaboost","1", "gamma correction on saved screenshots and videos, 1.0 saves unmodified images"};
31 // scr_screenshot_name is defined in fs.c
32 cvar_t cl_capturevideo = {0, "cl_capturevideo", "0", "enables saving of video to a .avi file using uncompressed I420 colorspace and PCM audio, note that scr_screenshot_gammaboost affects the brightness of the output)"};
33 cvar_t cl_capturevideo_width = {0, "cl_capturevideo_width", "0", "scales all frames to this resolution before saving the video"};
34 cvar_t cl_capturevideo_height = {0, "cl_capturevideo_height", "0", "scales all frames to this resolution before saving the video"};
35 cvar_t cl_capturevideo_realtime = {0, "cl_capturevideo_realtime", "0", "causes video saving to operate in realtime (mostly useful while playing, not while capturing demos), this can produce a much lower quality video due to poor sound/video sync and will abort saving if your machine stalls for over a minute"};
36 cvar_t cl_capturevideo_fps = {0, "cl_capturevideo_fps", "30", "how many frames per second to save (29.97 for NTSC, 30 for typical PC video, 15 can be useful)"};
37 cvar_t cl_capturevideo_number = {CVAR_SAVE, "cl_capturevideo_number", "1", "number to append to video filename, incremented each time a capture begins"};
38 cvar_t r_letterbox = {0, "r_letterbox", "0", "reduces vertical height of view to simulate a letterboxed movie effect (can be used by mods for cutscenes)"};
39 cvar_t r_stereo_separation = {0, "r_stereo_separation", "4", "separation distance of eyes in the world (negative values are only useful for cross-eyed viewing)"};
40 cvar_t r_stereo_sidebyside = {0, "r_stereo_sidebyside", "0", "side by side views for those who can't afford glasses but can afford eye strain (note: use a negative r_stereo_separation if you want cross-eyed viewing)"};
41 cvar_t r_stereo_redblue = {0, "r_stereo_redblue", "0", "red/blue anaglyph stereo glasses (note: most of these glasses are actually red/cyan, try that one too)"};
42 cvar_t r_stereo_redcyan = {0, "r_stereo_redcyan", "0", "red/cyan anaglyph stereo glasses, the kind given away at drive-in movies like Creature From The Black Lagoon In 3D"};
43 cvar_t r_stereo_redgreen = {0, "r_stereo_redgreen", "0", "red/green anaglyph stereo glasses (for those who don't mind yellow)"};
44 cvar_t r_stereo_angle = {0, "r_stereo_angle", "0", "separation angle of eyes (makes the views look different directions, as an example, 90 gives a 90 degree separation where the views are 45 degrees left and 45 degrees right)"};
45 cvar_t scr_zoomwindow = {CVAR_SAVE, "scr_zoomwindow", "0", "displays a zoomed in overlay window"};
46 cvar_t scr_zoomwindow_viewsizex = {CVAR_SAVE, "scr_zoomwindow_viewsizex", "20", "horizontal viewsize of zoom window"};
47 cvar_t scr_zoomwindow_viewsizey = {CVAR_SAVE, "scr_zoomwindow_viewsizey", "20", "vertical viewsize of zoom window"};
48 cvar_t scr_zoomwindow_fov = {CVAR_SAVE, "scr_zoomwindow_fov", "20", "fov of zoom window"};
49 cvar_t scr_stipple = {0, "scr_stipple", "0", "interlacing-like stippling of the display"};
50 cvar_t scr_refresh = {0, "scr_refresh", "1", "allows you to completely shut off rendering for benchmarking purposes"};
51 cvar_t shownetgraph = {CVAR_SAVE, "shownetgraph", "0", "shows a graph of packet sizes and other information, 0 = off, 1 = show client netgraph, 2 = show client and server netgraphs (when hosting a server)"};
52 cvar_t cl_demo_mousegrab = {0, "cl_demo_mousegrab", "0", "Allows reading the mouse input while playing demos. Useful for camera mods developed in csqc. (0: never, 1: always)"};
53
54 #define AVI_MASTER_INDEX_SIZE 640 // GB ought to be enough for anyone
55
56 int jpeg_supported = false;
57
58 qboolean        scr_initialized;                // ready to draw
59
60 float           scr_con_current;
61 int                     scr_con_margin_bottom;
62
63 extern int      con_vislines;
64
65 static void SCR_ScreenShot_f (void);
66 static void R_Envmap_f (void);
67
68 // backend
69 void R_ClearScreen(qboolean fogcolor);
70
71 /*
72 ===============================================================================
73
74 CENTER PRINTING
75
76 ===============================================================================
77 */
78
79 char            scr_centerstring[MAX_INPUTLINE];
80 float           scr_centertime_start;   // for slow victory printing
81 float           scr_centertime_off;
82 int                     scr_center_lines;
83 int                     scr_erase_lines;
84 int                     scr_erase_center;
85 char        scr_infobarstring[MAX_INPUTLINE];
86 float       scr_infobartime_off;
87
88 /*
89 ==============
90 SCR_CenterPrint
91
92 Called for important messages that should stay in the center of the screen
93 for a few moments
94 ==============
95 */
96 void SCR_CenterPrint(const char *str)
97 {
98         strlcpy (scr_centerstring, str, sizeof (scr_centerstring));
99         scr_centertime_off = scr_centertime.value;
100         scr_centertime_start = cl.time;
101
102 // count the number of lines for centering
103         scr_center_lines = 1;
104         while (*str)
105         {
106                 if (*str == '\n')
107                         scr_center_lines++;
108                 str++;
109         }
110 }
111
112
113 void SCR_DrawCenterString (void)
114 {
115         char    *start;
116         int             x, y;
117         int             remaining;
118         int             color;
119
120         if(cl.intermission == 2) // in finale,
121                 if(sb_showscores) // make TAB hide the finale message (sb_showscores overrides finale in sbar.c)
122                         return;
123
124         if(scr_centertime.value <= 0 && !cl.intermission)
125                 return;
126
127 // the finale prints the characters one at a time, except if printspeed is an absurdly high value
128         if (cl.intermission && scr_printspeed.value > 0 && scr_printspeed.value < 1000000)
129                 remaining = (int)(scr_printspeed.value * (cl.time - scr_centertime_start));
130         else
131                 remaining = 9999;
132
133         scr_erase_center = 0;
134         start = scr_centerstring;
135
136         if (remaining < 1)
137                 return;
138
139         if (scr_center_lines <= 4)
140                 y = (int)(vid_conheight.integer*0.35);
141         else
142                 y = 48;
143
144         color = -1;
145         do
146         {
147                 // scan the number of characters on the line, not counting color codes
148                 char *newline = strchr(start, '\n');
149                 int l = newline ? (newline - start) : (int)strlen(start);
150                 float width = DrawQ_TextWidth_Font(start, l, false, FONT_CENTERPRINT) * 8;
151
152                 x = (int) (vid_conwidth.integer - width)/2;
153                 if (l > 0)
154                 {
155                         if (remaining < l)
156                                 l = remaining;
157                         DrawQ_String_Font(x, y, start, l, 8, 8, 1, 1, 1, 1, 0, &color, false, FONT_CENTERPRINT);
158                         remaining -= l;
159                         if (remaining <= 0)
160                                 return;
161                 }
162                 y += 8;
163
164                 if (!newline)
165                         break;
166                 start = newline + 1; // skip the \n
167         } while (1);
168 }
169
170 void SCR_CheckDrawCenterString (void)
171 {
172         if (scr_center_lines > scr_erase_lines)
173                 scr_erase_lines = scr_center_lines;
174
175         if (cl.time > cl.oldtime)
176                 scr_centertime_off -= cl.time - cl.oldtime;
177
178         // don't draw if this is a normal stats-screen intermission,
179         // only if it is not an intermission, or a finale intermission
180         if (cl.intermission == 1)
181                 return;
182         if (scr_centertime_off <= 0 && !cl.intermission)
183                 return;
184         if (key_dest != key_game)
185                 return;
186
187         SCR_DrawCenterString ();
188 }
189
190 void SCR_DrawNetGraph_DrawGraph (int graphx, int graphy, int barwidth, int barheight, int bardivide, const char *label, float textsize, int packetcounter, int numparameters, const int **parameters, const float parametercolors[][4])
191 {
192         int j, k, x, y, index, offset, height;
193         // draw the bar graph itself
194         // advance the packet counter because it is the latest packet column being
195         // built up and should come last
196         packetcounter = (packetcounter + 1) % NETGRAPH_PACKETS;
197         for (j = 0;j < NETGRAPH_PACKETS;j++)
198         {
199                 x = graphx + j * barwidth;
200                 y = graphy + barheight;
201                 index = (packetcounter + j) % NETGRAPH_PACKETS;
202                 if (parameters[0][index] == NETGRAPH_LOSTPACKET)
203                         DrawQ_Fill(x, y - barheight, barwidth, barheight, 1, 0, 0, 1, 0);
204                 else if (parameters[0][index] == NETGRAPH_CHOKEDPACKET)
205                         DrawQ_Fill(x, y - min(2, barheight), barwidth, min(2, barheight), 1, 1, 0, 1, 0);
206                 else
207                 {
208                         offset = 0;
209                         for (k = 0;k < numparameters;k++)
210                         {
211                                 height = (parameters[k][index] + bardivide - 1) / bardivide;
212                                 height = min(height, barheight - offset);
213                                 offset += height;
214                                 if (height)
215                                         DrawQ_Fill(x, y - offset, barwidth, height, parametercolors[k][0], parametercolors[k][1], parametercolors[k][2], parametercolors[k][3], 0);
216                         }
217                 }
218         }
219 }
220
221 const float netgraphcolors[3][4] =
222 {
223         {1  , 0.5, 0  , 1},
224         {1  , 1  , 1  , 1},
225         {0  , 1  , 0  , 1},
226 };
227
228 void SCR_DrawNetGraph_DrawConnection_Client (netconn_t *conn, int graphx, int graphy, int barwidth, int barheight, int bardivide, const char *labelincoming, int separator, const char *labeloutgoing, float textsize)
229 {
230         int numparameters;
231         const int *parameters[3];
232         // dim background
233         DrawQ_Fill(graphx                                          , graphy, barwidth * NETGRAPH_PACKETS, barheight + textsize, 0, 0, 0, 0.5, 0);
234         DrawQ_Fill(graphx + barwidth * NETGRAPH_PACKETS + separator, graphy, barwidth * NETGRAPH_PACKETS, barheight + textsize, 0, 0, 0, 0.5, 0);
235         // draw the bar graphs
236         numparameters = 3;
237         parameters[0] = conn->incoming_unreliablesize;
238         parameters[1] = conn->incoming_reliablesize;
239         parameters[2] = conn->incoming_acksize;
240         SCR_DrawNetGraph_DrawGraph(graphx, graphy, barwidth, barheight, bardivide, labelincoming, textsize, conn->incoming_packetcounter, numparameters, parameters, netgraphcolors);
241         parameters[0] = conn->outgoing_unreliablesize;
242         parameters[1] = conn->outgoing_reliablesize;
243         parameters[2] = conn->outgoing_acksize;
244         SCR_DrawNetGraph_DrawGraph(graphx + barwidth * NETGRAPH_PACKETS + separator, graphy, barwidth, barheight, bardivide, labeloutgoing, textsize, conn->outgoing_packetcounter, numparameters, parameters, netgraphcolors);
245         // draw labels
246         DrawQ_String(graphx                                          , graphy + barheight, labelincoming, 0, textsize, textsize, 1, 1, 1, 1, 0, NULL, false);
247         DrawQ_String(graphx + barwidth * NETGRAPH_PACKETS + separator, graphy + barheight, labeloutgoing, 0, textsize, textsize, 1, 1, 1, 1, 0, NULL, false);
248 }
249
250 void SCR_DrawNetGraph_DrawConnection_Server (netconn_t *conn, int graphx, int graphy, int barwidth, int barheight, int bardivide, const char *labeloutgoing, int separator, const char *labelincoming, float textsize)
251 {
252         int numparameters;
253         const int *parameters[3];
254         // dim background
255         DrawQ_Fill(graphx                                          , graphy, barwidth * NETGRAPH_PACKETS, barheight + textsize, 0, 0, 0, 0.5, 0);
256         DrawQ_Fill(graphx + barwidth * NETGRAPH_PACKETS + separator, graphy, barwidth * NETGRAPH_PACKETS, barheight + textsize, 0, 0, 0, 0.5, 0);
257         // draw the bar graphs
258         numparameters = 3;
259         parameters[0] = conn->outgoing_unreliablesize;
260         parameters[1] = conn->outgoing_reliablesize;
261         parameters[2] = conn->outgoing_acksize;
262         SCR_DrawNetGraph_DrawGraph(graphx                                          , graphy, barwidth, barheight, bardivide, labeloutgoing, textsize, conn->outgoing_packetcounter, numparameters, parameters, netgraphcolors);
263         parameters[0] = conn->incoming_unreliablesize;
264         parameters[1] = conn->incoming_reliablesize;
265         parameters[2] = conn->incoming_acksize;
266         SCR_DrawNetGraph_DrawGraph(graphx + barwidth * NETGRAPH_PACKETS + separator, graphy, barwidth, barheight, bardivide, labelincoming, textsize, conn->incoming_packetcounter, numparameters, parameters, netgraphcolors);
267         // draw labels
268         DrawQ_String(graphx                                          , graphy + barheight, labeloutgoing, 0, textsize, textsize, 1, 1, 1, 1, 0, NULL, false);
269         DrawQ_String(graphx + barwidth * NETGRAPH_PACKETS + separator, graphy + barheight, labelincoming, 0, textsize, textsize, 1, 1, 1, 1, 0, NULL, false);
270 }
271
272 /*
273 ==============
274 SCR_DrawNetGraph
275 ==============
276 */
277 void SCR_DrawNetGraph (void)
278 {
279         int i, separator1, separator2, barwidth, barheight, bardivide, netgraph_x, netgraph_y, textsize, index, netgraphsperrow;
280
281         if (cls.state != ca_connected)
282                 return;
283         if (!cls.netcon)
284                 return;
285         if (!shownetgraph.integer)
286                 return;
287
288         separator1 = 2;
289         separator2 = 4;
290         textsize = 8;
291         barwidth = 1;
292         barheight = 50;
293         bardivide = 20;
294
295         netgraphsperrow = (vid_conwidth.integer + separator2) / (barwidth * NETGRAPH_PACKETS * 2 + separator1 + separator2);
296         netgraphsperrow = max(netgraphsperrow, 1);
297
298         index = 0;
299         netgraph_x = (vid_conwidth.integer + separator2) - (1 + (index % netgraphsperrow)) * (barwidth * NETGRAPH_PACKETS * 2 + separator1 + separator2);
300         netgraph_y = (vid_conheight.integer - 48 + separator2) - (1 + (index / netgraphsperrow)) * (barheight + textsize + separator2);
301         SCR_DrawNetGraph_DrawConnection_Client(cls.netcon, netgraph_x, netgraph_y, barwidth, barheight, bardivide, "incoming", separator1, "outgoing", textsize);
302         index++;
303
304         if (sv.active && shownetgraph.integer >= 2)
305         {
306                 for (i = 0;i < svs.maxclients;i++)
307                 {
308                         if (!svs.clients[i].netconnection)
309                                 continue;
310                         netgraph_x = (vid_conwidth.integer + separator2) - (1 + (index % netgraphsperrow)) * (barwidth * NETGRAPH_PACKETS * 2 + separator1 + separator2);
311                         netgraph_y = (vid_conheight.integer - 48 + separator2) - (1 + (index / netgraphsperrow)) * (barheight + textsize + separator2);
312                         SCR_DrawNetGraph_DrawConnection_Server(svs.clients[i].netconnection, netgraph_x, netgraph_y, barwidth, barheight, bardivide, va("%s", svs.clients[i].name), separator1, "", textsize);
313                         index++;
314                 }
315         }
316 }
317
318 /*
319 ==============
320 SCR_DrawTurtle
321 ==============
322 */
323 void SCR_DrawTurtle (void)
324 {
325         static int      count;
326
327         if (cls.state != ca_connected)
328                 return;
329
330         if (!scr_showturtle.integer)
331                 return;
332
333         if (cl.realframetime < 0.1)
334         {
335                 count = 0;
336                 return;
337         }
338
339         count++;
340         if (count < 3)
341                 return;
342
343         DrawQ_Pic (0, 0, Draw_CachePic ("gfx/turtle"), 0, 0, 1, 1, 1, 1, 0);
344 }
345
346 /*
347 ==============
348 SCR_DrawNet
349 ==============
350 */
351 void SCR_DrawNet (void)
352 {
353         if (cls.state != ca_connected)
354                 return;
355         if (realtime - cl.last_received_message < 0.3)
356                 return;
357         if (cls.demoplayback)
358                 return;
359
360         DrawQ_Pic (64, 0, Draw_CachePic ("gfx/net"), 0, 0, 1, 1, 1, 1, 0);
361 }
362
363 /*
364 ==============
365 DrawPause
366 ==============
367 */
368 void SCR_DrawPause (void)
369 {
370         cachepic_t      *pic;
371
372         if (cls.state != ca_connected)
373                 return;
374
375         if (!scr_showpause.integer)             // turn off for screenshots
376                 return;
377
378         if (!cl.paused)
379                 return;
380
381         pic = Draw_CachePic ("gfx/pause");
382         DrawQ_Pic ((vid_conwidth.integer - pic->width)/2, (vid_conheight.integer - pic->height)/2, pic, 0, 0, 1, 1, 1, 1, 0);
383 }
384
385 /*
386 ==============
387 SCR_DrawBrand
388 ==============
389 */
390 void SCR_DrawBrand (void)
391 {
392         cachepic_t      *pic;
393         float           x, y;
394
395         if (!scr_showbrand.value)
396                 return;
397
398         pic = Draw_CachePic ("gfx/brand");
399
400         switch ((int)scr_showbrand.value)
401         {
402         case 1: // bottom left
403                 x = 0;
404                 y = vid_conheight.integer - pic->height;
405                 break;
406         case 2: // bottom centre
407                 x = (vid_conwidth.integer - pic->width) / 2;
408                 y = vid_conheight.integer - pic->height;
409                 break;
410         case 3: // bottom right
411                 x = vid_conwidth.integer - pic->width;
412                 y = vid_conheight.integer - pic->height;
413                 break;
414         case 4: // centre right
415                 x = vid_conwidth.integer - pic->width;
416                 y = (vid_conheight.integer - pic->height) / 2;
417                 break;
418         case 5: // top right
419                 x = vid_conwidth.integer - pic->width;
420                 y = 0;
421                 break;
422         case 6: // top centre
423                 x = (vid_conwidth.integer - pic->width) / 2;
424                 y = 0;
425                 break;
426         case 7: // top left
427                 x = 0;
428                 y = 0;
429                 break;
430         case 8: // centre left
431                 x = 0;
432                 y = (vid_conheight.integer - pic->height) / 2;
433                 break;
434         default:
435                 return;
436         }
437
438         DrawQ_Pic (x, y, pic, 0, 0, 1, 1, 1, 1, 0);
439 }
440
441 /*
442 ==============
443 SCR_DrawQWDownload
444 ==============
445 */
446 static int SCR_DrawQWDownload(int offset)
447 {
448         // sync with SCR_InfobarHeight
449         int len;
450         float x, y;
451         float size = 8;
452         char temp[256];
453
454         if (!cls.qw_downloadname[0])
455         {
456                 cls.qw_downloadspeedrate = 0;
457                 cls.qw_downloadspeedtime = realtime;
458                 cls.qw_downloadspeedcount = 0;
459                 return 0;
460         }
461         if (realtime >= cls.qw_downloadspeedtime + 1)
462         {
463                 cls.qw_downloadspeedrate = cls.qw_downloadspeedcount;
464                 cls.qw_downloadspeedtime = realtime;
465                 cls.qw_downloadspeedcount = 0;
466         }
467         if (cls.protocol == PROTOCOL_QUAKEWORLD)
468                 dpsnprintf(temp, sizeof(temp), "Downloading %s %3i%% (%i) at %i bytes/s\n", cls.qw_downloadname, cls.qw_downloadpercent, cls.qw_downloadmemorycursize, cls.qw_downloadspeedrate);
469         else
470                 dpsnprintf(temp, sizeof(temp), "Downloading %s %3i%% (%i/%i) at %i bytes/s\n", cls.qw_downloadname, cls.qw_downloadpercent, cls.qw_downloadmemorycursize, cls.qw_downloadmemorymaxsize, cls.qw_downloadspeedrate);
471         len = (int)strlen(temp);
472         x = (vid_conwidth.integer - DrawQ_TextWidth_Font(temp, len, true, FONT_INFOBAR) * size) / 2;
473         y = vid_conheight.integer - size - offset;
474         DrawQ_Fill(0, y, vid_conwidth.integer, size, 0, 0, 0, cls.signon == SIGNONS ? 0.5 : 1, 0);
475         DrawQ_String_Font(x, y, temp, len, size, size, 1, 1, 1, 1, 0, NULL, true, FONT_INFOBAR);
476         return 8;
477 }
478 /*
479 ==============
480 SCR_DrawInfobarString
481 ==============
482 */
483 static int SCR_DrawInfobarString(int offset)
484 {
485         int len;
486         float x, y;
487         float size = 8;
488
489         len = (int)strlen(scr_infobarstring);
490         x = (vid_conwidth.integer - DrawQ_TextWidth_Font(scr_infobarstring, len, false, FONT_INFOBAR) * size) / 2;
491         y = vid_conheight.integer - size - offset;
492         DrawQ_Fill(0, y, vid_conwidth.integer, size, 0, 0, 0, cls.signon == SIGNONS ? 0.5 : 1, 0);
493         DrawQ_String_Font(x, y, scr_infobarstring, len, size, size, 1, 1, 1, 1, 0, NULL, false, FONT_INFOBAR);
494         return 8;
495 }
496
497 /*
498 ==============
499 SCR_DrawCurlDownload
500 ==============
501 */
502 static int SCR_DrawCurlDownload(int offset)
503 {
504         // sync with SCR_InfobarHeight
505         int len;
506         int nDownloads;
507         int i;
508         float x, y;
509         float size = 8;
510         Curl_downloadinfo_t *downinfo;
511         char temp[256];
512         const char *addinfo;
513
514         downinfo = Curl_GetDownloadInfo(&nDownloads, &addinfo);
515         if(!downinfo)
516                 return 0;
517
518         y = vid_conheight.integer - size * nDownloads - offset;
519
520         if(addinfo)
521         {
522                 len = (int)strlen(addinfo);
523                 x = (vid_conwidth.integer - DrawQ_TextWidth_Font(addinfo, len, true, FONT_INFOBAR) * size) / 2;
524                 DrawQ_Fill(0, y - size, vid_conwidth.integer, size, 1, 1, 1, cls.signon == SIGNONS ? 0.8 : 1, 0);
525                 DrawQ_String_Font(x, y - size, addinfo, len, size, size, 0, 0, 0, 1, 0, NULL, true, FONT_INFOBAR);
526         }
527
528         for(i = 0; i != nDownloads; ++i)
529         {
530                 if(downinfo[i].queued)
531                         dpsnprintf(temp, sizeof(temp), "Still in queue: %s\n", downinfo[i].filename);
532                 else if(downinfo[i].progress <= 0)
533                         dpsnprintf(temp, sizeof(temp), "Downloading %s ...  ???.?%% @ %.1f KiB/s\n", downinfo[i].filename, downinfo[i].speed / 1024.0);
534                 else
535                         dpsnprintf(temp, sizeof(temp), "Downloading %s ...  %5.1f%% @ %.1f KiB/s\n", downinfo[i].filename, 100.0 * downinfo[i].progress, downinfo[i].speed / 1024.0);
536                 len = (int)strlen(temp);
537                 x = (vid_conwidth.integer - DrawQ_TextWidth_Font(temp, len, true, FONT_INFOBAR) * size) / 2;
538                 DrawQ_Fill(0, y + i * size, vid_conwidth.integer, size, 0, 0, 0, cls.signon == SIGNONS ? 0.5 : 1, 0);
539                 DrawQ_String_Font(x, y + i * size, temp, len, size, size, 1, 1, 1, 1, 0, NULL, true, FONT_INFOBAR);
540         }
541
542         Z_Free(downinfo);
543
544         return 8 * (nDownloads + (addinfo ? 1 : 0));
545 }
546
547 /*
548 ==============
549 SCR_DrawInfobar
550 ==============
551 */
552 static void SCR_DrawInfobar()
553 {
554         int offset = 0;
555         if(scr_infobartime_off > 0)
556                 offset += SCR_DrawInfobarString(offset);
557         offset += SCR_DrawQWDownload(offset);
558         offset += SCR_DrawCurlDownload(offset);
559         if(offset != scr_con_margin_bottom)
560                 Con_DPrintf("broken console margin calculation: %d != %d\n", offset, scr_con_margin_bottom);
561 }
562
563 static int SCR_InfobarHeight()
564 {
565         int offset = 0;
566         Curl_downloadinfo_t *downinfo;
567         const char *addinfo;
568         int nDownloads;
569
570         if (cl.time > cl.oldtime)
571                 scr_infobartime_off -= cl.time - cl.oldtime;
572         if(scr_infobartime_off > 0)
573                 offset += 8;
574
575         if(cls.qw_downloadname[0])
576                 offset += 8;
577
578         downinfo = Curl_GetDownloadInfo(&nDownloads, &addinfo);
579         if(downinfo)
580         {
581                 offset += 8 * (nDownloads + (addinfo ? 1 : 0));
582                 Z_Free(downinfo);
583         }
584
585         return offset;
586 }
587
588 /*
589 ==============
590 SCR_InfoBar_f
591 ==============
592 */
593 void SCR_InfoBar_f(void)
594 {
595         if(Cmd_Argc() == 3)
596         {
597                 scr_infobartime_off = atof(Cmd_Argv(1));
598                 strlcpy(scr_infobarstring, Cmd_Argv(2), sizeof(scr_infobarstring));
599         }
600         else
601         {
602                 Con_Printf("usage:\ninfobar expiretime \"string\"\n");
603         }
604 }
605 //=============================================================================
606
607 /*
608 ==================
609 SCR_SetUpToDrawConsole
610 ==================
611 */
612 void SCR_SetUpToDrawConsole (void)
613 {
614         // lines of console to display
615         float conlines;
616         static int framecounter = 0;
617
618         Con_CheckResize ();
619
620         if (scr_menuforcewhiledisconnected.integer && key_dest == key_game && cls.state == ca_disconnected)
621         {
622                 if (framecounter >= 2)
623                         MR_ToggleMenu_f();
624                 else
625                         framecounter++;
626         }
627         else
628                 framecounter = 0;
629
630         if (scr_conforcewhiledisconnected.integer && key_dest == key_game && cls.signon != SIGNONS)
631                 key_consoleactive |= KEY_CONSOLEACTIVE_FORCED;
632         else
633                 key_consoleactive &= ~KEY_CONSOLEACTIVE_FORCED;
634
635 // decide on the height of the console
636         if (key_consoleactive & KEY_CONSOLEACTIVE_USER)
637                 conlines = vid_conheight.integer/2;     // half screen
638         else
639                 conlines = 0;                           // none visible
640
641         scr_con_current = conlines;
642 }
643
644 /*
645 ==================
646 SCR_DrawConsole
647 ==================
648 */
649 void SCR_DrawConsole (void)
650 {
651         scr_con_margin_bottom = SCR_InfobarHeight();
652         if (key_consoleactive & KEY_CONSOLEACTIVE_FORCED)
653         {
654                 // full screen
655                 Con_DrawConsole (vid_conheight.integer - scr_con_margin_bottom);
656         }
657         else if (scr_con_current)
658                 Con_DrawConsole (min((int)scr_con_current, vid_conheight.integer - scr_con_margin_bottom));
659         else
660                 con_vislines = 0;
661 }
662
663 /*
664 ===============
665 SCR_BeginLoadingPlaque
666
667 ================
668 */
669 void SCR_BeginLoadingPlaque (void)
670 {
671         // save console log up to this point to log_file if it was set by configs
672         Log_Start();
673
674         Host_StartVideo();
675         SCR_UpdateLoadingScreen(false);
676 }
677
678 //=============================================================================
679
680 char r_speeds_timestring[4096];
681 int speedstringcount, r_timereport_active;
682 double r_timereport_temp = 0, r_timereport_current = 0, r_timereport_start = 0;
683 int r_speeds_longestitem = 0;
684
685 void R_TimeReport(char *desc)
686 {
687         char tempbuf[256];
688         int length;
689         int t;
690
691         if (r_speeds.integer < 2 || !r_timereport_active)
692                 return;
693
694         CHECKGLERROR
695         if (r_speeds.integer == 2)
696                 qglFinish();
697         CHECKGLERROR
698         r_timereport_temp = r_timereport_current;
699         r_timereport_current = Sys_DoubleTime();
700         t = (int) ((r_timereport_current - r_timereport_temp) * 1000000.0 + 0.5);
701
702         length = dpsnprintf(tempbuf, sizeof(tempbuf), "%8i %s", t, desc);
703         length = min(length, (int)sizeof(tempbuf) - 1);
704         if (r_speeds_longestitem < length)
705                 r_speeds_longestitem = length;
706         for (;length < r_speeds_longestitem;length++)
707                 tempbuf[length] = ' ';
708         tempbuf[length] = 0;
709
710         if (speedstringcount + length > (vid_conwidth.integer / 8))
711         {
712                 strlcat(r_speeds_timestring, "\n", sizeof(r_speeds_timestring));
713                 speedstringcount = 0;
714         }
715         strlcat(r_speeds_timestring, tempbuf, sizeof(r_speeds_timestring));
716         speedstringcount += length;
717 }
718
719 void R_TimeReport_BeginFrame(void)
720 {
721         speedstringcount = 0;
722         r_speeds_timestring[0] = 0;
723         r_timereport_active = false;
724         memset(&r_refdef.stats, 0, sizeof(r_refdef.stats));
725
726         if (r_speeds.integer >= 2 && cls.signon == SIGNONS && cls.state == ca_connected)
727         {
728                 r_timereport_active = true;
729                 r_timereport_start = r_timereport_current = Sys_DoubleTime();
730         }
731 }
732
733 void R_TimeReport_EndFrame(void)
734 {
735         int i, j, lines, y;
736         cl_locnode_t *loc;
737         char string[1024+4096];
738
739         string[0] = 0;
740         if (r_speeds.integer && cls.signon == SIGNONS && cls.state == ca_connected)
741         {
742                 // put the location name in the r_speeds display as it greatly helps
743                 // when creating loc files
744                 loc = CL_Locs_FindNearest(cl.movement_origin);
745                 dpsnprintf(string, sizeof(string),
746 "%s%s\n"
747 "%3i renders org:'%+8.2f %+8.2f %+8.2f' dir:'%+2.3f %+2.3f %+2.3f'\n"
748 "%7i surfaces%7i triangles %5i entities (%7i surfaces%7i triangles)\n"
749 "%5i leafs%5i portals%6i/%6i particles%6i/%6i decals %3i%% quality\n"
750 "%7i lightmap updates (%7i pixels)\n"
751 "%4i lights%4i clears%4i scissored%7i light%7i shadow%7i dynamic\n"
752 "rendered%6i meshes%8i triangles bloompixels%8i copied%8i drawn\n"
753 "%s"
754 , loc ? "Location: " : "", loc ? loc->name : ""
755 , r_refdef.stats.renders, r_refdef.view.origin[0], r_refdef.view.origin[1], r_refdef.view.origin[2], r_refdef.view.forward[0], r_refdef.view.forward[1], r_refdef.view.forward[2]
756 , r_refdef.stats.world_surfaces, r_refdef.stats.world_triangles, r_refdef.stats.entities, r_refdef.stats.entities_surfaces, r_refdef.stats.entities_triangles
757 , r_refdef.stats.world_leafs, r_refdef.stats.world_portals, r_refdef.stats.particles, cl.num_particles, r_refdef.stats.decals, cl.num_decals, (int)(100 * r_refdef.view.quality)
758 , r_refdef.stats.lightmapupdates, r_refdef.stats.lightmapupdatepixels
759 , r_refdef.stats.lights, r_refdef.stats.lights_clears, r_refdef.stats.lights_scissored, r_refdef.stats.lights_lighttriangles, r_refdef.stats.lights_shadowtriangles, r_refdef.stats.lights_dynamicshadowtriangles
760 , r_refdef.stats.meshes, r_refdef.stats.meshes_elements / 3, r_refdef.stats.bloom_copypixels, r_refdef.stats.bloom_drawpixels
761 , r_speeds_timestring);
762
763                 memset(&r_refdef.stats, 0, sizeof(r_refdef.stats));
764
765                 speedstringcount = 0;
766                 r_speeds_timestring[0] = 0;
767                 r_timereport_active = false;
768
769                 if (r_speeds.integer >= 2)
770                 {
771                         r_timereport_active = true;
772                         r_timereport_start = r_timereport_current = Sys_DoubleTime();
773                 }
774         }
775
776         if (string[0])
777         {
778                 if (string[strlen(string)-1] == '\n')
779                         string[strlen(string)-1] = 0;
780                 lines = 1;
781                 for (i = 0;string[i];i++)
782                         if (string[i] == '\n')
783                                 lines++;
784                 y = vid_conheight.integer - sb_lines - lines * 8;
785                 i = j = 0;
786                 DrawQ_Fill(0, y, vid_conwidth.integer, lines * 8, 0, 0, 0, 0.5, 0);
787                 while (string[i])
788                 {
789                         j = i;
790                         while (string[i] && string[i] != '\n')
791                                 i++;
792                         if (i - j > 0)
793                                 DrawQ_String(0, y, string + j, i - j, 8, 8, 1, 1, 1, 1, 0, NULL, true);
794                         if (string[i] == '\n')
795                                 i++;
796                         y += 8;
797                 }
798         }
799 }
800
801 /*
802 =================
803 SCR_SizeUp_f
804
805 Keybinding command
806 =================
807 */
808 void SCR_SizeUp_f (void)
809 {
810         Cvar_SetValue ("viewsize",scr_viewsize.value+10);
811 }
812
813
814 /*
815 =================
816 SCR_SizeDown_f
817
818 Keybinding command
819 =================
820 */
821 void SCR_SizeDown_f (void)
822 {
823         Cvar_SetValue ("viewsize",scr_viewsize.value-10);
824 }
825
826 void SCR_CaptureVideo_EndVideo(void);
827 void CL_Screen_Shutdown(void)
828 {
829         SCR_CaptureVideo_EndVideo();
830 }
831
832 void CL_Screen_Init(void)
833 {
834         Cvar_RegisterVariable (&scr_fov);
835         Cvar_RegisterVariable (&scr_viewsize);
836         Cvar_RegisterVariable (&scr_conalpha);
837         Cvar_RegisterVariable (&scr_conbrightness);
838         Cvar_RegisterVariable (&scr_conforcewhiledisconnected);
839         Cvar_RegisterVariable (&scr_menuforcewhiledisconnected);
840         Cvar_RegisterVariable (&scr_showram);
841         Cvar_RegisterVariable (&scr_showturtle);
842         Cvar_RegisterVariable (&scr_showpause);
843         Cvar_RegisterVariable (&scr_showbrand);
844         Cvar_RegisterVariable (&scr_centertime);
845         Cvar_RegisterVariable (&scr_printspeed);
846         Cvar_RegisterVariable (&vid_conwidth);
847         Cvar_RegisterVariable (&vid_conheight);
848         Cvar_RegisterVariable (&vid_pixelheight);
849         Cvar_RegisterVariable (&scr_screenshot_jpeg);
850         Cvar_RegisterVariable (&scr_screenshot_jpeg_quality);
851         Cvar_RegisterVariable (&scr_screenshot_gammaboost);
852         Cvar_RegisterVariable (&cl_capturevideo);
853         Cvar_RegisterVariable (&cl_capturevideo_width);
854         Cvar_RegisterVariable (&cl_capturevideo_height);
855         Cvar_RegisterVariable (&cl_capturevideo_realtime);
856         Cvar_RegisterVariable (&cl_capturevideo_fps);
857         Cvar_RegisterVariable (&cl_capturevideo_number);
858         Cvar_RegisterVariable (&r_letterbox);
859         Cvar_RegisterVariable(&r_stereo_separation);
860         Cvar_RegisterVariable(&r_stereo_sidebyside);
861         Cvar_RegisterVariable(&r_stereo_redblue);
862         Cvar_RegisterVariable(&r_stereo_redcyan);
863         Cvar_RegisterVariable(&r_stereo_redgreen);
864         Cvar_RegisterVariable(&r_stereo_angle);
865         Cvar_RegisterVariable(&scr_zoomwindow);
866         Cvar_RegisterVariable(&scr_zoomwindow_viewsizex);
867         Cvar_RegisterVariable(&scr_zoomwindow_viewsizey);
868         Cvar_RegisterVariable(&scr_zoomwindow_fov);
869         Cvar_RegisterVariable(&scr_stipple);
870         Cvar_RegisterVariable(&scr_refresh);
871         Cvar_RegisterVariable(&shownetgraph);
872         Cvar_RegisterVariable(&cl_demo_mousegrab);
873
874         Cmd_AddCommand ("sizeup",SCR_SizeUp_f, "increase view size (increases viewsize cvar)");
875         Cmd_AddCommand ("sizedown",SCR_SizeDown_f, "decrease view size (decreases viewsize cvar)");
876         Cmd_AddCommand ("screenshot",SCR_ScreenShot_f, "takes a screenshot of the next rendered frame");
877         Cmd_AddCommand ("envmap", R_Envmap_f, "render a cubemap (skybox) of the current scene");
878         Cmd_AddCommand ("infobar", SCR_InfoBar_f, "display a text in the infobar (usage: infobar expiretime string)");
879
880         scr_initialized = true;
881 }
882
883 /*
884 ==================
885 SCR_ScreenShot_f
886 ==================
887 */
888 void SCR_ScreenShot_f (void)
889 {
890         static int shotnumber;
891         static char oldname[MAX_QPATH];
892         char base[MAX_QPATH];
893         char filename[MAX_QPATH];
894         unsigned char *buffer1;
895         unsigned char *buffer2;
896         unsigned char *buffer3;
897         qboolean jpeg = (scr_screenshot_jpeg.integer != 0);
898
899         dpsnprintf (base, sizeof(base), "screenshots/%s", scr_screenshot_name.string);
900
901         if (strcmp (oldname, scr_screenshot_name.string))
902         {
903                 dpsnprintf(oldname, sizeof(oldname), "%s", scr_screenshot_name.string);
904                 shotnumber = 0;
905         }
906
907         // find a file name to save it to
908         for (;shotnumber < 1000000;shotnumber++)
909                 if (!FS_SysFileExists(va("%s/%s%06d.tga", fs_gamedir, base, shotnumber)) && !FS_SysFileExists(va("%s/%s%06d.jpg", fs_gamedir, base, shotnumber)))
910                         break;
911         if (shotnumber >= 1000000)
912         {
913                 Con_Print("SCR_ScreenShot_f: Couldn't create the image file\n");
914                 return;
915         }
916
917         dpsnprintf(filename, sizeof(filename), "%s%06d.%s", base, shotnumber, jpeg ? "jpg" : "tga");
918
919         buffer1 = (unsigned char *)Mem_Alloc(tempmempool, vid.width * vid.height * 3);
920         buffer2 = (unsigned char *)Mem_Alloc(tempmempool, vid.width * vid.height * 3);
921         buffer3 = (unsigned char *)Mem_Alloc(tempmempool, vid.width * vid.height * 3 + 18);
922
923         if (SCR_ScreenShot (filename, buffer1, buffer2, buffer3, 0, 0, vid.width, vid.height, false, false, false, jpeg, true))
924                 Con_Printf("Wrote %s\n", filename);
925         else
926                 Con_Printf("unable to write %s\n", filename);
927
928         Mem_Free (buffer1);
929         Mem_Free (buffer2);
930         Mem_Free (buffer3);
931
932         shotnumber++;
933 }
934
935 static void SCR_CaptureVideo_RIFF_Start(void)
936 {
937         memset(&cls.capturevideo.riffbuffer, 0, sizeof(sizebuf_t));
938         cls.capturevideo.riffbuffer.maxsize = sizeof(cls.capturevideo.riffbufferdata);
939         cls.capturevideo.riffbuffer.data = cls.capturevideo.riffbufferdata;
940         cls.capturevideo.position = 0;
941 }
942
943 static void SCR_CaptureVideo_RIFF_Flush(void)
944 {
945         if (cls.capturevideo.riffbuffer.cursize > 0)
946         {
947                 if (!FS_Write(cls.capturevideo.videofile, cls.capturevideo.riffbuffer.data, cls.capturevideo.riffbuffer.cursize))
948                         cls.capturevideo.error = true;
949                 cls.capturevideo.position += cls.capturevideo.riffbuffer.cursize;
950                 cls.capturevideo.riffbuffer.cursize = 0;
951                 cls.capturevideo.riffbuffer.overflowed = false;
952         }
953 }
954
955 static void SCR_CaptureVideo_RIFF_WriteBytes(const unsigned char *data, size_t size)
956 {
957         SCR_CaptureVideo_RIFF_Flush();
958         if (!FS_Write(cls.capturevideo.videofile, data, size))
959                 cls.capturevideo.error = true;
960         cls.capturevideo.position += size;
961 }
962
963 static void SCR_CaptureVideo_RIFF_Write32(int n)
964 {
965         if (cls.capturevideo.riffbuffer.cursize + 4 > cls.capturevideo.riffbuffer.maxsize)
966                 SCR_CaptureVideo_RIFF_Flush();
967         MSG_WriteLong(&cls.capturevideo.riffbuffer, n);
968 }
969
970 static void SCR_CaptureVideo_RIFF_Write16(int n)
971 {
972         if (cls.capturevideo.riffbuffer.cursize + 2 > cls.capturevideo.riffbuffer.maxsize)
973                 SCR_CaptureVideo_RIFF_Flush();
974         MSG_WriteShort(&cls.capturevideo.riffbuffer, n);
975 }
976
977 static void SCR_CaptureVideo_RIFF_WriteFourCC(const char *chunkfourcc)
978 {
979         if (cls.capturevideo.riffbuffer.cursize + (int)strlen(chunkfourcc) > cls.capturevideo.riffbuffer.maxsize)
980                 SCR_CaptureVideo_RIFF_Flush();
981         MSG_WriteUnterminatedString(&cls.capturevideo.riffbuffer, chunkfourcc);
982 }
983
984 static void SCR_CaptureVideo_RIFF_WriteTerminatedString(const char *string)
985 {
986         if (cls.capturevideo.riffbuffer.cursize + (int)strlen(string) > cls.capturevideo.riffbuffer.maxsize)
987                 SCR_CaptureVideo_RIFF_Flush();
988         MSG_WriteString(&cls.capturevideo.riffbuffer, string);
989 }
990
991 static fs_offset_t SCR_CaptureVideo_RIFF_GetPosition(void)
992 {
993         SCR_CaptureVideo_RIFF_Flush();
994         //return FS_Tell(cls.capturevideo.videofile);
995         return cls.capturevideo.position;
996 }
997
998 static void SCR_CaptureVideo_RIFF_Push(const char *chunkfourcc, const char *listtypefourcc, fs_offset_t sizeHint)
999 {
1000         if (listtypefourcc && sizeHint >= 0)
1001                 sizeHint += 4; // size hint is for INNER size
1002         SCR_CaptureVideo_RIFF_WriteFourCC(chunkfourcc);
1003         SCR_CaptureVideo_RIFF_Write32(sizeHint);
1004         SCR_CaptureVideo_RIFF_Flush();
1005         cls.capturevideo.riffstacksizehint[cls.capturevideo.riffstacklevel] = sizeHint;
1006         cls.capturevideo.riffstackstartoffset[cls.capturevideo.riffstacklevel] = SCR_CaptureVideo_RIFF_GetPosition();
1007         cls.capturevideo.riffstackfourcc[cls.capturevideo.riffstacklevel] = chunkfourcc;
1008         ++cls.capturevideo.riffstacklevel;
1009         if (listtypefourcc)
1010                 SCR_CaptureVideo_RIFF_WriteFourCC(listtypefourcc);
1011 }
1012
1013 static void SCR_CaptureVideo_RIFF_Pop(void)
1014 {
1015         fs_offset_t offset, sizehint;
1016         int x;
1017         unsigned char sizebytes[4];
1018         // write out the chunk size and then return to the current file position
1019         cls.capturevideo.riffstacklevel--;
1020         offset = SCR_CaptureVideo_RIFF_GetPosition();
1021
1022         sizehint = cls.capturevideo.riffstacksizehint[cls.capturevideo.riffstacklevel];
1023         x = (int)(offset - (cls.capturevideo.riffstackstartoffset[cls.capturevideo.riffstacklevel]));
1024
1025         if(x != sizehint)
1026         {
1027                 if(sizehint != -1)
1028                 {
1029                         int i;
1030                         Con_Printf("WARNING: invalid size hint %d when writing video data (actual size: %d)\n", (int) sizehint, x);
1031                         for(i = 0; i <= cls.capturevideo.riffstacklevel; ++i)
1032                         {
1033                                 Con_Printf("  RIFF level %d = %s\n", i, cls.capturevideo.riffstackfourcc[i]);
1034                         }
1035                 }
1036                 sizebytes[0] = (x) & 0xff;sizebytes[1] = (x >> 8) & 0xff;sizebytes[2] = (x >> 16) & 0xff;sizebytes[3] = (x >> 24) & 0xff;
1037                 if(FS_Seek(cls.capturevideo.videofile, -(x + 4), SEEK_END) >= 0)
1038                 {
1039                         FS_Write(cls.capturevideo.videofile, sizebytes, 4);
1040                 }
1041                 FS_Seek(cls.capturevideo.videofile, 0, SEEK_END);
1042         }
1043
1044         if (offset & 1)
1045         {
1046                 SCR_CaptureVideo_RIFF_WriteBytes((unsigned char *) "\0", 1);
1047         }
1048 }
1049
1050 static void GrowBuf(sizebuf_t *buf, int extralen)
1051 {
1052         if(buf->cursize + extralen > buf->maxsize)
1053         {
1054                 int oldsize = buf->maxsize;
1055                 unsigned char *olddata;
1056                 olddata = buf->data;
1057                 buf->maxsize = max(buf->maxsize * 2, 4096);
1058                 buf->data = (unsigned char *) Mem_Alloc(tempmempool, buf->maxsize);
1059                 if(olddata)
1060                 {
1061                         memcpy(buf->data, olddata, oldsize);
1062                         Mem_Free(olddata);
1063                 }
1064         }
1065 }
1066
1067 static void SCR_CaptureVideo_RIFF_IndexEntry(const char *chunkfourcc, int chunksize, int flags)
1068 {
1069         if(!cls.capturevideo.canseek)
1070                 Host_Error("SCR_CaptureVideo_RIFF_IndexEntry called on non-seekable AVI");
1071
1072         if (cls.capturevideo.riffstacklevel != 2)
1073                 Sys_Error("SCR_Capturevideo_RIFF_IndexEntry: RIFF stack level is %i (should be 2)\n", cls.capturevideo.riffstacklevel);
1074         GrowBuf(&cls.capturevideo.riffindexbuffer, 16);
1075         SCR_CaptureVideo_RIFF_Flush();
1076         MSG_WriteUnterminatedString(&cls.capturevideo.riffindexbuffer, chunkfourcc);
1077         MSG_WriteLong(&cls.capturevideo.riffindexbuffer, flags);
1078         MSG_WriteLong(&cls.capturevideo.riffindexbuffer, (int)FS_Tell(cls.capturevideo.videofile) - cls.capturevideo.riffstackstartoffset[1]);
1079         MSG_WriteLong(&cls.capturevideo.riffindexbuffer, chunksize);
1080 }
1081
1082 static void SCR_CaptureVideo_RIFF_MakeIxChunk(const char *fcc, const char *dwChunkId, fs_offset_t masteridx_counter, int *masteridx_count, fs_offset_t masteridx_start)
1083 {
1084         int nMatching;
1085         int i;
1086         fs_offset_t ix = SCR_CaptureVideo_RIFF_GetPosition();
1087         fs_offset_t pos, sz;
1088         
1089         if(!cls.capturevideo.canseek)
1090                 Host_Error("SCR_CaptureVideo_RIFF_MakeIxChunk called on non-seekable AVI");
1091
1092         if(*masteridx_count >= AVI_MASTER_INDEX_SIZE)
1093                 return;
1094
1095         nMatching = 0; // go through index and enumerate them
1096         for(i = 0; i < cls.capturevideo.riffindexbuffer.cursize; i += 16)
1097                 if(!memcmp(cls.capturevideo.riffindexbuffer.data + i, dwChunkId, 4))
1098                         ++nMatching;
1099
1100         sz = 2+2+4+4+4+4+4;
1101         for(i = 0; i < cls.capturevideo.riffindexbuffer.cursize; i += 16)
1102                 if(!memcmp(cls.capturevideo.riffindexbuffer.data + i, dwChunkId, 4))
1103                         sz += 8;
1104
1105         SCR_CaptureVideo_RIFF_Push(fcc, NULL, sz);
1106         SCR_CaptureVideo_RIFF_Write16(2); // wLongsPerEntry
1107         SCR_CaptureVideo_RIFF_Write16(0x0100); // bIndexType=1, bIndexSubType=0
1108         SCR_CaptureVideo_RIFF_Write32(nMatching); // nEntriesInUse
1109         SCR_CaptureVideo_RIFF_WriteFourCC(dwChunkId); // dwChunkId
1110         SCR_CaptureVideo_RIFF_Write32(cls.capturevideo.videofile_ix_movistart & (fs_offset_t) 0xFFFFFFFFu);
1111         SCR_CaptureVideo_RIFF_Write32(((fs_offset_t) cls.capturevideo.videofile_ix_movistart) >> 32);
1112         SCR_CaptureVideo_RIFF_Write32(0); // dwReserved
1113
1114         for(i = 0; i < cls.capturevideo.riffindexbuffer.cursize; i += 16)
1115                 if(!memcmp(cls.capturevideo.riffindexbuffer.data + i, dwChunkId, 4))
1116                 {
1117                         unsigned int *p = (unsigned int *) (cls.capturevideo.riffindexbuffer.data + i);
1118                         unsigned int flags = p[1];
1119                         unsigned int rpos = p[2];
1120                         unsigned int size = p[3];
1121                         size &= ~0x80000000;
1122                         if(!(flags & 0x10)) // no keyframe?
1123                                 size |= 0x80000000;
1124                         SCR_CaptureVideo_RIFF_Write32(rpos + 8);
1125                         SCR_CaptureVideo_RIFF_Write32(size);
1126                 }
1127
1128         SCR_CaptureVideo_RIFF_Flush();
1129         SCR_CaptureVideo_RIFF_Pop();
1130         pos = SCR_CaptureVideo_RIFF_GetPosition();
1131
1132         if(FS_Seek(cls.capturevideo.videofile, masteridx_start + 16 * *masteridx_count, SEEK_SET) >= 0)
1133         {
1134                 SCR_CaptureVideo_RIFF_Write32(ix & (fs_offset_t) 0xFFFFFFFFu);
1135                 SCR_CaptureVideo_RIFF_Write32(((fs_offset_t) ix) >> 32);
1136                 SCR_CaptureVideo_RIFF_Write32(pos - ix);
1137                 SCR_CaptureVideo_RIFF_Write32(nMatching);
1138                 SCR_CaptureVideo_RIFF_Flush();
1139         }
1140
1141         if(FS_Seek(cls.capturevideo.videofile, masteridx_counter, SEEK_SET) >= 0)
1142         {
1143                 SCR_CaptureVideo_RIFF_Write32(++*masteridx_count);
1144                 SCR_CaptureVideo_RIFF_Flush();
1145         }
1146
1147         FS_Seek(cls.capturevideo.videofile, 0, SEEK_END); // return value doesn't matter here
1148 }
1149
1150 static void SCR_CaptureVideo_RIFF_Finish(qboolean final)
1151 {
1152         // close the "movi" list
1153         SCR_CaptureVideo_RIFF_Pop();
1154         if(cls.capturevideo.videofile_ix_master_video_inuse_offset)
1155                 SCR_CaptureVideo_RIFF_MakeIxChunk("ix00", "00dc", cls.capturevideo.videofile_ix_master_video_inuse_offset, &cls.capturevideo.videofile_ix_master_video_inuse, cls.capturevideo.videofile_ix_master_video_start_offset);
1156         if(cls.capturevideo.videofile_ix_master_audio_inuse_offset)
1157                 SCR_CaptureVideo_RIFF_MakeIxChunk("ix01", "01wb", cls.capturevideo.videofile_ix_master_audio_inuse_offset, &cls.capturevideo.videofile_ix_master_audio_inuse, cls.capturevideo.videofile_ix_master_audio_start_offset);
1158         // write the idx1 chunk that we've been building while saving the frames (for old style players)
1159         if(final && cls.capturevideo.videofile_firstchunkframes_offset)
1160         // TODO replace index creating by OpenDML ix##/##ix/indx chunk so it works for more than one AVI part too
1161         {
1162                 SCR_CaptureVideo_RIFF_Push("idx1", NULL, cls.capturevideo.riffindexbuffer.cursize);
1163                 SCR_CaptureVideo_RIFF_WriteBytes(cls.capturevideo.riffindexbuffer.data, cls.capturevideo.riffindexbuffer.cursize);
1164                 SCR_CaptureVideo_RIFF_Pop();
1165         }
1166         cls.capturevideo.riffindexbuffer.cursize = 0;
1167         // pop the RIFF chunk itself
1168         while (cls.capturevideo.riffstacklevel > 0)
1169                 SCR_CaptureVideo_RIFF_Pop();
1170         SCR_CaptureVideo_RIFF_Flush();
1171         if(cls.capturevideo.videofile_firstchunkframes_offset)
1172         {
1173                 Con_DPrintf("Finishing first chunk (%d frames)\n", cls.capturevideo.frame);
1174                 if(FS_Seek(cls.capturevideo.videofile, cls.capturevideo.videofile_firstchunkframes_offset, SEEK_SET) >= 0)
1175                 {
1176                         SCR_CaptureVideo_RIFF_Write32(cls.capturevideo.frame);
1177                         SCR_CaptureVideo_RIFF_Flush();
1178                 }
1179                 FS_Seek(cls.capturevideo.videofile, 0, SEEK_END);
1180                 cls.capturevideo.videofile_firstchunkframes_offset = 0;
1181         }
1182         else
1183                 Con_DPrintf("Finishing another chunk (%d frames)\n", cls.capturevideo.frame);
1184 }
1185
1186 static void SCR_CaptureVideo_RIFF_OverflowCheck(int framesize)
1187 {
1188         fs_offset_t cursize, curfilesize;
1189         if (cls.capturevideo.riffstacklevel != 2)
1190                 Sys_Error("SCR_CaptureVideo_RIFF_OverflowCheck: chunk stack leakage!\n");
1191         
1192         if(!cls.capturevideo.canseek)
1193                 return;
1194
1195         // check where we are in the file
1196         SCR_CaptureVideo_RIFF_Flush();
1197         cursize = SCR_CaptureVideo_RIFF_GetPosition() - cls.capturevideo.riffstackstartoffset[0];
1198         curfilesize = SCR_CaptureVideo_RIFF_GetPosition();
1199
1200         // if this would overflow the windows limit of 1GB per RIFF chunk, we need
1201         // to close the current RIFF chunk and open another for future frames
1202         if (8 + cursize + framesize + cls.capturevideo.riffindexbuffer.cursize + 8 + cls.capturevideo.riffindexbuffer.cursize + 64 > 1<<30) // note that the Ix buffer takes less space... I just don't dare to / 2 here now... sorry, maybe later
1203         {
1204                 SCR_CaptureVideo_RIFF_Finish(false);
1205                 // begin a new 1GB extended section of the AVI
1206                 SCR_CaptureVideo_RIFF_Push("RIFF", "AVIX", -1);
1207                 SCR_CaptureVideo_RIFF_Push("LIST", "movi", -1);
1208                 cls.capturevideo.videofile_ix_movistart = cls.capturevideo.riffstackstartoffset[1];
1209         }
1210 }
1211
1212 static void FindFraction(double val, int *num, int *denom, int denomMax)
1213 {
1214         int i;
1215         double bestdiff;
1216         // initialize
1217         bestdiff = fabs(val);
1218         *num = 0;
1219         *denom = 1;
1220
1221         for(i = 1; i <= denomMax; ++i)
1222         {
1223                 int inum = (int) floor(0.5 + val * i);
1224                 double diff = fabs(val - inum / (double)i);
1225                 if(diff < bestdiff)
1226                 {
1227                         bestdiff = diff;
1228                         *num = inum;
1229                         *denom = i;
1230                 }
1231         }
1232 }
1233
1234 void SCR_CaptureVideo_BeginVideo(void)
1235 {
1236         double gamma, g, aspect;
1237         int width = cl_capturevideo_width.integer, height = cl_capturevideo_height.integer;
1238         int n, d;
1239         unsigned int i;
1240         if (cls.capturevideo.active)
1241                 return;
1242         memset(&cls.capturevideo, 0, sizeof(cls.capturevideo));
1243         // soundrate is figured out on the first SoundFrame
1244
1245         if(width == 0 && height != 0)
1246                 width = (int) (height * (double)vid.width / ((double)vid.height * vid_pixelheight.value)); // keep aspect
1247         if(width != 0 && height == 0)
1248                 height = (int) (width * ((double)vid.height * vid_pixelheight.value) / (double)vid.width); // keep aspect
1249
1250         if(width < 2 || width > vid.width) // can't scale up
1251                 width = vid.width;
1252         if(height < 2 || height > vid.height) // can't scale up
1253                 height = vid.height;
1254
1255         aspect = vid.width / (vid.height * vid_pixelheight.value);
1256
1257         // ensure it's all even; if not, scale down a little
1258         if(width % 1)
1259                 --width;
1260         if(height % 1)
1261                 --height;
1262
1263         cls.capturevideo.width = width;
1264         cls.capturevideo.height = height;
1265         cls.capturevideo.active = true;
1266         cls.capturevideo.starttime = realtime;
1267         cls.capturevideo.framerate = bound(1, cl_capturevideo_fps.value, 1000);
1268         cls.capturevideo.soundrate = S_GetSoundRate();
1269         cls.capturevideo.frame = 0;
1270         cls.capturevideo.soundsampleframe = 0;
1271         cls.capturevideo.realtime = cl_capturevideo_realtime.integer != 0;
1272         cls.capturevideo.screenbuffer = (unsigned char *)Mem_Alloc(tempmempool, vid.width * vid.height * 4);
1273         cls.capturevideo.outbuffer = (unsigned char *)Mem_Alloc(tempmempool, width * height * (4+4) + 18);
1274         gamma = 1.0/scr_screenshot_gammaboost.value;
1275         dpsnprintf(cls.capturevideo.basename, sizeof(cls.capturevideo.basename), "video/dpvideo%03i", cl_capturevideo_number.integer);
1276         Cvar_SetValueQuick(&cl_capturevideo_number, cl_capturevideo_number.integer + 1);
1277
1278         /*
1279         for (i = 0;i < 256;i++)
1280         {
1281                 unsigned char j = (unsigned char)bound(0, 255*pow(i/255.0, gamma), 255);
1282                 cls.capturevideo.rgbgammatable[0][i] = j;
1283                 cls.capturevideo.rgbgammatable[1][i] = j;
1284                 cls.capturevideo.rgbgammatable[2][i] = j;
1285         }
1286         */
1287 /*
1288 R = Y + 1.4075 * (Cr - 128);
1289 G = Y + -0.3455 * (Cb - 128) + -0.7169 * (Cr - 128);
1290 B = Y + 1.7790 * (Cb - 128);
1291 Y = R *  .299 + G *  .587 + B *  .114;
1292 Cb = R * -.169 + G * -.332 + B *  .500 + 128.;
1293 Cr = R *  .500 + G * -.419 + B * -.0813 + 128.;
1294 */
1295         for (i = 0;i < 256;i++)
1296         {
1297                 g = 255*pow(i/255.0, gamma);
1298                 // Y weights from RGB
1299                 cls.capturevideo.rgbtoyuvscaletable[0][0][i] = (short)(g *  0.299);
1300                 cls.capturevideo.rgbtoyuvscaletable[0][1][i] = (short)(g *  0.587);
1301                 cls.capturevideo.rgbtoyuvscaletable[0][2][i] = (short)(g *  0.114);
1302                 // Cb weights from RGB
1303                 cls.capturevideo.rgbtoyuvscaletable[1][0][i] = (short)(g * -0.169);
1304                 cls.capturevideo.rgbtoyuvscaletable[1][1][i] = (short)(g * -0.332);
1305                 cls.capturevideo.rgbtoyuvscaletable[1][2][i] = (short)(g *  0.500);
1306                 // Cr weights from RGB
1307                 cls.capturevideo.rgbtoyuvscaletable[2][0][i] = (short)(g *  0.500);
1308                 cls.capturevideo.rgbtoyuvscaletable[2][1][i] = (short)(g * -0.419);
1309                 cls.capturevideo.rgbtoyuvscaletable[2][2][i] = (short)(g * -0.0813);
1310                 // range reduction of YCbCr to valid signal range
1311                 cls.capturevideo.yuvnormalizetable[0][i] = 16 + i * (236-16) / 256;
1312                 cls.capturevideo.yuvnormalizetable[1][i] = 16 + i * (240-16) / 256;
1313                 cls.capturevideo.yuvnormalizetable[2][i] = 16 + i * (240-16) / 256;
1314         }
1315
1316         //if (cl_capturevideo_)
1317         //{
1318         //}
1319         //else
1320         {
1321                 cls.capturevideo.format = CAPTUREVIDEOFORMAT_AVI_I420;
1322                 cls.capturevideo.videofile = FS_OpenRealFile(va("%s.avi", cls.capturevideo.basename), "wb", false);
1323                 cls.capturevideo.canseek = (FS_Seek(cls.capturevideo.videofile, 0, SEEK_SET) == 0);
1324                 SCR_CaptureVideo_RIFF_Start();
1325                 // enclosing RIFF chunk (there can be multiple of these in >1GB files, the later ones are "AVIX" instead of "AVI " and have no header/stream info)
1326                 SCR_CaptureVideo_RIFF_Push("RIFF", "AVI ", -1);
1327                 // AVI main header
1328                 SCR_CaptureVideo_RIFF_Push("LIST", "hdrl", cls.capturevideo.canseek ? -1 : 8+56+12+(12+52+8+40+8+68)+(cls.capturevideo.soundrate?(12+12+52+8+18):0)+12+(8+4));
1329                 SCR_CaptureVideo_RIFF_Push("avih", NULL, 56);
1330                 SCR_CaptureVideo_RIFF_Write32((int)(1000000.0 / cls.capturevideo.framerate)); // microseconds per frame
1331                 SCR_CaptureVideo_RIFF_Write32(0); // max bytes per second
1332                 SCR_CaptureVideo_RIFF_Write32(0); // padding granularity
1333                 SCR_CaptureVideo_RIFF_Write32(0x910); // flags (AVIF_HASINDEX | AVIF_ISINTERLEAVED | AVIF_TRUSTCKTYPE)
1334                 cls.capturevideo.videofile_firstchunkframes_offset = SCR_CaptureVideo_RIFF_GetPosition();
1335                 SCR_CaptureVideo_RIFF_Write32(0); // total frames
1336                 SCR_CaptureVideo_RIFF_Write32(0); // initial frames
1337                 if (cls.capturevideo.soundrate)
1338                         SCR_CaptureVideo_RIFF_Write32(2); // number of streams
1339                 else
1340                         SCR_CaptureVideo_RIFF_Write32(1); // number of streams
1341                 SCR_CaptureVideo_RIFF_Write32(0); // suggested buffer size
1342                 SCR_CaptureVideo_RIFF_Write32(width); // width
1343                 SCR_CaptureVideo_RIFF_Write32(height); // height
1344                 SCR_CaptureVideo_RIFF_Write32(0); // reserved[0]
1345                 SCR_CaptureVideo_RIFF_Write32(0); // reserved[1]
1346                 SCR_CaptureVideo_RIFF_Write32(0); // reserved[2]
1347                 SCR_CaptureVideo_RIFF_Write32(0); // reserved[3]
1348                 SCR_CaptureVideo_RIFF_Pop();
1349                 // video stream info
1350                 SCR_CaptureVideo_RIFF_Push("LIST", "strl", cls.capturevideo.canseek ? -1 : 12+52+8+40+8+68);
1351                 SCR_CaptureVideo_RIFF_Push("strh", "vids", 52);
1352                 SCR_CaptureVideo_RIFF_WriteFourCC("I420"); // stream fourcc (I420 colorspace, uncompressed)
1353                 SCR_CaptureVideo_RIFF_Write32(0); // flags
1354                 SCR_CaptureVideo_RIFF_Write16(0); // priority
1355                 SCR_CaptureVideo_RIFF_Write16(0); // language
1356                 SCR_CaptureVideo_RIFF_Write32(0); // initial frames
1357                 // find an ideal divisor for the framerate
1358                 FindFraction(cls.capturevideo.framerate, &n, &d, 1000);
1359                 SCR_CaptureVideo_RIFF_Write32(d); // samples/second divisor
1360                 SCR_CaptureVideo_RIFF_Write32(n); // samples/second multiplied by divisor
1361                 SCR_CaptureVideo_RIFF_Write32(0); // start
1362                 cls.capturevideo.videofile_totalframes_offset1 = SCR_CaptureVideo_RIFF_GetPosition();
1363                 SCR_CaptureVideo_RIFF_Write32(0); // length
1364                 SCR_CaptureVideo_RIFF_Write32(width*height+(width/2)*(height/2)*2); // suggested buffer size
1365                 SCR_CaptureVideo_RIFF_Write32(0); // quality
1366                 SCR_CaptureVideo_RIFF_Write32(0); // sample size
1367                 SCR_CaptureVideo_RIFF_Write16(0); // frame left
1368                 SCR_CaptureVideo_RIFF_Write16(0); // frame top
1369                 SCR_CaptureVideo_RIFF_Write16(width); // frame right
1370                 SCR_CaptureVideo_RIFF_Write16(height); // frame bottom
1371                 SCR_CaptureVideo_RIFF_Pop();
1372                 // video stream format
1373                 SCR_CaptureVideo_RIFF_Push("strf", NULL, 40);
1374                 SCR_CaptureVideo_RIFF_Write32(40); // BITMAPINFO struct size
1375                 SCR_CaptureVideo_RIFF_Write32(width); // width
1376                 SCR_CaptureVideo_RIFF_Write32(height); // height
1377                 SCR_CaptureVideo_RIFF_Write16(3); // planes
1378                 SCR_CaptureVideo_RIFF_Write16(12); // bitcount
1379                 SCR_CaptureVideo_RIFF_WriteFourCC("I420"); // compression
1380                 SCR_CaptureVideo_RIFF_Write32(width*height+(width/2)*(height/2)*2); // size of image
1381                 SCR_CaptureVideo_RIFF_Write32(0); // x pixels per meter
1382                 SCR_CaptureVideo_RIFF_Write32(0); // y pixels per meter
1383                 SCR_CaptureVideo_RIFF_Write32(0); // color used
1384                 SCR_CaptureVideo_RIFF_Write32(0); // color important
1385                 SCR_CaptureVideo_RIFF_Pop();
1386                 // master index
1387                 if(cls.capturevideo.canseek)
1388                 {
1389                         SCR_CaptureVideo_RIFF_Push("indx", NULL, -1);
1390                         SCR_CaptureVideo_RIFF_Write16(4); // wLongsPerEntry
1391                         SCR_CaptureVideo_RIFF_Write16(0); // bIndexSubType=0, bIndexType=0
1392                         cls.capturevideo.videofile_ix_master_video_inuse_offset = SCR_CaptureVideo_RIFF_GetPosition();
1393                         SCR_CaptureVideo_RIFF_Write32(0); // nEntriesInUse
1394                         SCR_CaptureVideo_RIFF_WriteFourCC("00dc"); // dwChunkId
1395                         SCR_CaptureVideo_RIFF_Write32(0); // dwReserved1
1396                         SCR_CaptureVideo_RIFF_Write32(0); // dwReserved2
1397                         SCR_CaptureVideo_RIFF_Write32(0); // dwReserved3
1398                         cls.capturevideo.videofile_ix_master_video_start_offset = SCR_CaptureVideo_RIFF_GetPosition();
1399                         for(i = 0; i < AVI_MASTER_INDEX_SIZE * 4; ++i)
1400                                 SCR_CaptureVideo_RIFF_Write32(0); // fill up later
1401                         SCR_CaptureVideo_RIFF_Pop();
1402                 }
1403                 // extended format (aspect!)
1404                 SCR_CaptureVideo_RIFF_Push("vprp", NULL, 68);
1405                 SCR_CaptureVideo_RIFF_Write32(0); // VideoFormatToken
1406                 SCR_CaptureVideo_RIFF_Write32(0); // VideoStandard
1407                 SCR_CaptureVideo_RIFF_Write32((int)cls.capturevideo.framerate); // dwVerticalRefreshRate (bogus)
1408                 SCR_CaptureVideo_RIFF_Write32(width); // dwHTotalInT
1409                 SCR_CaptureVideo_RIFF_Write32(height); // dwVTotalInLines
1410                 FindFraction(aspect, &n, &d, 1000);
1411                 SCR_CaptureVideo_RIFF_Write32((n << 16) | d); // dwFrameAspectRatio // TODO a word
1412                 SCR_CaptureVideo_RIFF_Write32(width); // dwFrameWidthInPixels
1413                 SCR_CaptureVideo_RIFF_Write32(height); // dwFrameHeightInLines
1414                 SCR_CaptureVideo_RIFF_Write32(1); // nFieldPerFrame
1415                 SCR_CaptureVideo_RIFF_Write32(width); // CompressedBMWidth
1416                 SCR_CaptureVideo_RIFF_Write32(height); // CompressedBMHeight
1417                 SCR_CaptureVideo_RIFF_Write32(width); // ValidBMHeight
1418                 SCR_CaptureVideo_RIFF_Write32(height); // ValidBMWidth
1419                 SCR_CaptureVideo_RIFF_Write32(0); // ValidBMXOffset
1420                 SCR_CaptureVideo_RIFF_Write32(0); // ValidBMYOffset
1421                 SCR_CaptureVideo_RIFF_Write32(0); // ValidBMXOffsetInT
1422                 SCR_CaptureVideo_RIFF_Write32(0); // ValidBMYValidStartLine
1423                 SCR_CaptureVideo_RIFF_Pop();
1424                 SCR_CaptureVideo_RIFF_Pop();
1425                 if (cls.capturevideo.soundrate)
1426                 {
1427                         // audio stream info
1428                         SCR_CaptureVideo_RIFF_Push("LIST", "strl", cls.capturevideo.canseek ? -1 : 12+52+8+18);
1429                         SCR_CaptureVideo_RIFF_Push("strh", "auds", 52);
1430                         SCR_CaptureVideo_RIFF_Write32(1); // stream fourcc (PCM audio, uncompressed)
1431                         SCR_CaptureVideo_RIFF_Write32(0); // flags
1432                         SCR_CaptureVideo_RIFF_Write16(0); // priority
1433                         SCR_CaptureVideo_RIFF_Write16(0); // language
1434                         SCR_CaptureVideo_RIFF_Write32(0); // initial frames
1435                         SCR_CaptureVideo_RIFF_Write32(1); // samples/second divisor
1436                         SCR_CaptureVideo_RIFF_Write32((int)(cls.capturevideo.soundrate)); // samples/second multiplied by divisor
1437                         SCR_CaptureVideo_RIFF_Write32(0); // start
1438                         cls.capturevideo.videofile_totalsampleframes_offset = SCR_CaptureVideo_RIFF_GetPosition();
1439                         SCR_CaptureVideo_RIFF_Write32(0); // length
1440                         SCR_CaptureVideo_RIFF_Write32(cls.capturevideo.soundrate * 2); // suggested buffer size (this is a half second)
1441                         SCR_CaptureVideo_RIFF_Write32(0); // quality
1442                         SCR_CaptureVideo_RIFF_Write32(4); // sample size
1443                         SCR_CaptureVideo_RIFF_Write16(0); // frame left
1444                         SCR_CaptureVideo_RIFF_Write16(0); // frame top
1445                         SCR_CaptureVideo_RIFF_Write16(0); // frame right
1446                         SCR_CaptureVideo_RIFF_Write16(0); // frame bottom
1447                         SCR_CaptureVideo_RIFF_Pop();
1448                         // audio stream format
1449                         SCR_CaptureVideo_RIFF_Push("strf", NULL, 18);
1450                         SCR_CaptureVideo_RIFF_Write16(1); // format (uncompressed PCM?)
1451                         SCR_CaptureVideo_RIFF_Write16(2); // channels (stereo)
1452                         SCR_CaptureVideo_RIFF_Write32(cls.capturevideo.soundrate); // sampleframes per second
1453                         SCR_CaptureVideo_RIFF_Write32(cls.capturevideo.soundrate * 4); // average bytes per second
1454                         SCR_CaptureVideo_RIFF_Write16(4); // block align
1455                         SCR_CaptureVideo_RIFF_Write16(16); // bits per sample
1456                         SCR_CaptureVideo_RIFF_Write16(0); // size
1457                         SCR_CaptureVideo_RIFF_Pop();
1458                         // master index
1459                         if(cls.capturevideo.canseek)
1460                         {
1461                                 SCR_CaptureVideo_RIFF_Push("indx", NULL, -1);
1462                                 SCR_CaptureVideo_RIFF_Write16(4); // wLongsPerEntry
1463                                 SCR_CaptureVideo_RIFF_Write16(0); // bIndexSubType=0, bIndexType=0
1464                                 cls.capturevideo.videofile_ix_master_audio_inuse_offset = SCR_CaptureVideo_RIFF_GetPosition();
1465                                 SCR_CaptureVideo_RIFF_Write32(0); // nEntriesInUse
1466                                 SCR_CaptureVideo_RIFF_WriteFourCC("01wb"); // dwChunkId
1467                                 SCR_CaptureVideo_RIFF_Write32(0); // dwReserved1
1468                                 SCR_CaptureVideo_RIFF_Write32(0); // dwReserved2
1469                                 SCR_CaptureVideo_RIFF_Write32(0); // dwReserved3
1470                                 cls.capturevideo.videofile_ix_master_audio_start_offset = SCR_CaptureVideo_RIFF_GetPosition();
1471                                 for(i = 0; i < AVI_MASTER_INDEX_SIZE * 4; ++i)
1472                                         SCR_CaptureVideo_RIFF_Write32(0); // fill up later
1473                                 SCR_CaptureVideo_RIFF_Pop();
1474                         }
1475                         SCR_CaptureVideo_RIFF_Pop();
1476                 }
1477
1478                 cls.capturevideo.videofile_ix_master_audio_inuse = cls.capturevideo.videofile_ix_master_video_inuse = 0;
1479
1480                 // extended header (for total #frames)
1481                 SCR_CaptureVideo_RIFF_Push("LIST", "odml", 8+4);
1482                 SCR_CaptureVideo_RIFF_Push("dmlh", NULL, 4);
1483                 cls.capturevideo.videofile_totalframes_offset2 = SCR_CaptureVideo_RIFF_GetPosition();
1484                 SCR_CaptureVideo_RIFF_Write32(0);
1485                 SCR_CaptureVideo_RIFF_Pop();
1486                 SCR_CaptureVideo_RIFF_Pop();
1487
1488                 // close the AVI header list
1489                 SCR_CaptureVideo_RIFF_Pop();
1490                 // software that produced this AVI video file
1491                 SCR_CaptureVideo_RIFF_Push("LIST", "INFO", 8+((strlen(engineversion) | 1) + 1));
1492                 SCR_CaptureVideo_RIFF_Push("ISFT", NULL, strlen(engineversion) + 1);
1493                 SCR_CaptureVideo_RIFF_WriteTerminatedString(engineversion);
1494                 SCR_CaptureVideo_RIFF_Pop();
1495                 // enable this junk filler if you like the LIST movi to always begin at 4KB in the file (why?)
1496 #if 0
1497                 SCR_CaptureVideo_RIFF_Push("JUNK", NULL);
1498                 x = 4096 - SCR_CaptureVideo_RIFF_GetPosition();
1499                 while (x > 0)
1500                 {
1501                         const char *junkfiller = "[ DarkPlaces junk data ]";
1502                         int i = min(x, (int)strlen(junkfiller));
1503                         SCR_CaptureVideo_RIFF_WriteBytes((const unsigned char *)junkfiller, i);
1504                         x -= i;
1505                 }
1506                 SCR_CaptureVideo_RIFF_Pop();
1507 #endif
1508                 SCR_CaptureVideo_RIFF_Pop();
1509                 // begin the actual video section now
1510                 SCR_CaptureVideo_RIFF_Push("LIST", "movi", -1);
1511                 cls.capturevideo.videofile_ix_movistart = cls.capturevideo.riffstackstartoffset[1];
1512                 // we're done with the headers now...
1513                 SCR_CaptureVideo_RIFF_Flush();
1514                 if (cls.capturevideo.riffstacklevel != 2)
1515                         Sys_Error("SCR_CaptureVideo_BeginVideo: broken AVI writing code (stack level is %i (should be 2) at end of headers)\n", cls.capturevideo.riffstacklevel);
1516         }
1517
1518         switch(cls.capturevideo.format)
1519         {
1520         case CAPTUREVIDEOFORMAT_AVI_I420:
1521                 break;
1522         default:
1523                 break;
1524         }
1525 }
1526
1527 void SCR_CaptureVideo_EndVideo(void)
1528 {
1529         if (!cls.capturevideo.active)
1530                 return;
1531         cls.capturevideo.active = false;
1532         if (cls.capturevideo.videofile)
1533         {
1534                 switch(cls.capturevideo.format)
1535                 {
1536                 case CAPTUREVIDEOFORMAT_AVI_I420:
1537                         // close any open chunks
1538                         SCR_CaptureVideo_RIFF_Finish(true);
1539                         // go back and fix the video frames and audio samples fields
1540                         Con_DPrintf("Finishing capture (%d frames, %d audio frames)\n", cls.capturevideo.frame, cls.capturevideo.soundsampleframe);
1541                         if(cls.capturevideo.videofile_totalframes_offset1)
1542                         if(FS_Seek(cls.capturevideo.videofile, cls.capturevideo.videofile_totalframes_offset1, SEEK_SET) >= 0)
1543                         {
1544                                 SCR_CaptureVideo_RIFF_Write32(cls.capturevideo.frame);
1545                                 SCR_CaptureVideo_RIFF_Flush();
1546                         }
1547                         if(cls.capturevideo.videofile_totalframes_offset2)
1548                         if(FS_Seek(cls.capturevideo.videofile, cls.capturevideo.videofile_totalframes_offset2, SEEK_SET) >= 0)
1549                         {
1550                                 SCR_CaptureVideo_RIFF_Write32(cls.capturevideo.frame);
1551                                 SCR_CaptureVideo_RIFF_Flush();
1552                         }
1553                         if (cls.capturevideo.soundrate)
1554                         {
1555                                 if(cls.capturevideo.videofile_totalsampleframes_offset)
1556                                 if(FS_Seek(cls.capturevideo.videofile, cls.capturevideo.videofile_totalsampleframes_offset, SEEK_SET) >= 0)
1557                                 {
1558                                         SCR_CaptureVideo_RIFF_Write32(cls.capturevideo.soundsampleframe);
1559                                         SCR_CaptureVideo_RIFF_Flush();
1560                                 }
1561                         }
1562                         break;
1563                 default:
1564                         break;
1565                 }
1566                 FS_Close(cls.capturevideo.videofile);
1567                 cls.capturevideo.videofile = NULL;
1568         }
1569
1570         if (cls.capturevideo.screenbuffer)
1571         {
1572                 Mem_Free (cls.capturevideo.screenbuffer);
1573                 cls.capturevideo.screenbuffer = NULL;
1574         }
1575
1576         if (cls.capturevideo.outbuffer)
1577         {
1578                 Mem_Free (cls.capturevideo.outbuffer);
1579                 cls.capturevideo.outbuffer = NULL;
1580         }
1581
1582         if (cls.capturevideo.riffindexbuffer.data)
1583         {
1584                 Mem_Free(cls.capturevideo.riffindexbuffer.data);
1585                 cls.capturevideo.riffindexbuffer.data = NULL;
1586         }
1587
1588         memset(&cls.capturevideo, 0, sizeof(cls.capturevideo));
1589 }
1590
1591 // converts from BGRA32 to I420 colorspace (identical to YV12 except chroma plane order is reversed), this colorspace is handled by the Intel(r) 4:2:0 codec on Windows
1592 void SCR_CaptureVideo_ConvertFrame_BGRA_to_I420_flip(int width, int height, unsigned char *instart, unsigned char *outstart)
1593 {
1594         int x, y;
1595         int blockr, blockg, blockb;
1596         int outoffset = (width/2)*(height/2);
1597         unsigned char *b, *out;
1598         // process one line at a time, and CbCr every other line at 2 pixel intervals
1599         for (y = 0;y < height;y++)
1600         {
1601                 // 1x1 Y
1602                 for (b = instart + (height-1-y)*width*4, out = outstart + y*width, x = 0;x < width;x++, b += 4, out++)
1603                 {
1604                         blockr = b[2];
1605                         blockg = b[1];
1606                         blockb = b[0];
1607                         *out = cls.capturevideo.yuvnormalizetable[0][cls.capturevideo.rgbtoyuvscaletable[0][0][blockr] + cls.capturevideo.rgbtoyuvscaletable[0][1][blockg] + cls.capturevideo.rgbtoyuvscaletable[0][2][blockb]];
1608                 }
1609                 if ((y & 1) == 0)
1610                 {
1611                         // 2x2 Cr and Cb planes
1612                         int inpitch = width*4;
1613                         for (b = instart + (height-2-y)*width*4, out = outstart + width*height + (y/2)*(width/2), x = 0;x < width/2;x++, b += 8, out++)
1614                         {
1615                                 blockr = (b[2] + b[6] + b[inpitch+2] + b[inpitch+6]) >> 2;
1616                                 blockg = (b[1] + b[5] + b[inpitch+1] + b[inpitch+5]) >> 2;
1617                                 blockb = (b[0] + b[4] + b[inpitch+0] + b[inpitch+4]) >> 2;
1618                                 // Cr
1619                                 out[0        ] = cls.capturevideo.yuvnormalizetable[1][cls.capturevideo.rgbtoyuvscaletable[1][0][blockr] + cls.capturevideo.rgbtoyuvscaletable[1][1][blockg] + cls.capturevideo.rgbtoyuvscaletable[1][2][blockb] + 128];
1620                                 // Cb
1621                                 out[outoffset] = cls.capturevideo.yuvnormalizetable[2][cls.capturevideo.rgbtoyuvscaletable[2][0][blockr] + cls.capturevideo.rgbtoyuvscaletable[2][1][blockg] + cls.capturevideo.rgbtoyuvscaletable[2][2][blockb] + 128];
1622                         }
1623                 }
1624         }
1625 }
1626
1627 static void SCR_ScaleDownBGRA(unsigned char *in, int inw, int inh, unsigned char *out, int outw, int outh)
1628 {
1629         // TODO optimize this function
1630
1631         int x, y;
1632         float area;
1633
1634         // memcpy is faster than me
1635         if(inw == outw && inh == outh)
1636         {
1637                 memcpy(out, in, 4 * inw * inh);
1638                 return;
1639         }
1640
1641         // otherwise: a box filter
1642         area = (float)outw * (float)outh / (float)inw / (float)inh;
1643         for(y = 0; y < outh; ++y)
1644         {
1645                 float iny0 =  y    / (float)outh * inh; int iny0_i = (int) floor(iny0);
1646                 float iny1 = (y+1) / (float)outh * inh; int iny1_i = (int) ceil(iny1);
1647                 for(x = 0; x < outw; ++x)
1648                 {
1649                         float inx0 =  x    / (float)outw * inw; int inx0_i = (int) floor(inx0);
1650                         float inx1 = (x+1) / (float)outw * inw; int inx1_i = (int) ceil(inx1);
1651                         float r = 0, g = 0, b = 0, alpha = 0;
1652                         int xx, yy;
1653
1654                         for(yy = iny0_i; yy < iny1_i; ++yy)
1655                         {
1656                                 float ya = min(yy+1, iny1) - max(iny0, yy);
1657                                 for(xx = inx0_i; xx < inx1_i; ++xx)
1658                                 {
1659                                         float a = ya * (min(xx+1, inx1) - max(inx0, xx));
1660                                         r += a * in[4*(xx + inw * yy)+0];
1661                                         g += a * in[4*(xx + inw * yy)+1];
1662                                         b += a * in[4*(xx + inw * yy)+2];
1663                                         alpha += a * in[4*(xx + inw * yy)+3];
1664                                 }
1665                         }
1666
1667                         out[4*(x + outw * y)+0] = (unsigned char) (r * area);
1668                         out[4*(x + outw * y)+1] = (unsigned char) (g * area);
1669                         out[4*(x + outw * y)+2] = (unsigned char) (b * area);
1670                         out[4*(x + outw * y)+3] = (unsigned char) (alpha * area);
1671                 }
1672         }
1673 }
1674
1675 qboolean SCR_CaptureVideo_VideoFrame(int newframenum)
1676 {
1677         int x = 0, y = 0, width = cls.capturevideo.width, height = cls.capturevideo.height;
1678         unsigned char *in, *out;
1679         CHECKGLERROR
1680         //return SCR_ScreenShot(filename, cls.capturevideo.buffer, cls.capturevideo.buffer + vid.width * vid.height * 3, cls.capturevideo.buffer + vid.width * vid.height * 6, 0, 0, vid.width, vid.height, false, false, false, jpeg, true);
1681         // speed is critical here, so do saving as directly as possible
1682         switch (cls.capturevideo.format)
1683         {
1684         case CAPTUREVIDEOFORMAT_AVI_I420:
1685                 // if there's no videofile we have to just give up, and abort saving
1686                 if (!cls.capturevideo.videofile)
1687                         return false;
1688                 // FIXME: width/height must be multiple of 2, enforce this?
1689                 qglReadPixels (x, y, vid.width, vid.height, GL_BGRA, GL_UNSIGNED_BYTE, cls.capturevideo.screenbuffer);CHECKGLERROR
1690                 SCR_ScaleDownBGRA (cls.capturevideo.screenbuffer, vid.width, vid.height, cls.capturevideo.outbuffer, width, height);
1691                 in = cls.capturevideo.outbuffer;
1692                 out = cls.capturevideo.outbuffer + width*height*4;
1693                 SCR_CaptureVideo_ConvertFrame_BGRA_to_I420_flip(width, height, in, out);
1694                 x = width*height+(width/2)*(height/2)*2;
1695                 SCR_CaptureVideo_RIFF_OverflowCheck(8 + x);
1696                 for (;cls.capturevideo.frame < newframenum;cls.capturevideo.frame++)
1697                 {
1698                         if(cls.capturevideo.canseek)
1699                                 SCR_CaptureVideo_RIFF_IndexEntry("00dc", x, 0x10); // AVIIF_KEYFRAME
1700                         SCR_CaptureVideo_RIFF_Push("00dc", NULL, x);
1701                         SCR_CaptureVideo_RIFF_WriteBytes(out, x);
1702                         SCR_CaptureVideo_RIFF_Pop();
1703                 }
1704                 return true;
1705         default:
1706                 return false;
1707         }
1708 }
1709
1710 void SCR_CaptureVideo_SoundFrame(unsigned char *bufstereo16le, size_t length, int rate)
1711 {
1712         int x;
1713         cls.capturevideo.soundrate = rate;
1714         cls.capturevideo.soundsampleframe += length;
1715         switch (cls.capturevideo.format)
1716         {
1717         case CAPTUREVIDEOFORMAT_AVI_I420:
1718                 x = length*4;
1719                 SCR_CaptureVideo_RIFF_OverflowCheck(8 + x);
1720                 if(cls.capturevideo.canseek)
1721                         SCR_CaptureVideo_RIFF_IndexEntry("01wb", x, 0x10); // AVIIF_KEYFRAME
1722                 SCR_CaptureVideo_RIFF_Push("01wb", NULL, x);
1723                 SCR_CaptureVideo_RIFF_WriteBytes(bufstereo16le, x);
1724                 SCR_CaptureVideo_RIFF_Pop();
1725                 break;
1726         default:
1727                 break;
1728         }
1729 }
1730
1731 void SCR_CaptureVideo(void)
1732 {
1733         int newframenum;
1734         if (cl_capturevideo.integer && r_render.integer)
1735         {
1736                 if (!cls.capturevideo.active)
1737                         SCR_CaptureVideo_BeginVideo();
1738                 if (cls.capturevideo.framerate != cl_capturevideo_fps.value)
1739                 {
1740                         Con_Printf("You can not change the video framerate while recording a video.\n");
1741                         Cvar_SetValueQuick(&cl_capturevideo_fps, cls.capturevideo.framerate);
1742                 }
1743                 // for AVI saving we have to make sure that sound is saved before video
1744                 if (cls.capturevideo.soundrate && !cls.capturevideo.soundsampleframe)
1745                         return;
1746                 if (cls.capturevideo.realtime)
1747                 {
1748                         // preserve sound sync by duplicating frames when running slow
1749                         newframenum = (int)((realtime - cls.capturevideo.starttime) * cls.capturevideo.framerate);
1750                 }
1751                 else
1752                         newframenum = cls.capturevideo.frame + 1;
1753                 // if falling behind more than one second, stop
1754                 if (newframenum - cls.capturevideo.frame > 60 * (int)ceil(cls.capturevideo.framerate))
1755                 {
1756                         Cvar_SetValueQuick(&cl_capturevideo, 0);
1757                         Con_Printf("video saving failed on frame %i, your machine is too slow for this capture speed.\n", cls.capturevideo.frame);
1758                         SCR_CaptureVideo_EndVideo();
1759                         return;
1760                 }
1761                 // write frames
1762                 SCR_CaptureVideo_VideoFrame(newframenum);
1763                 if (cls.capturevideo.error)
1764                 {
1765                         Cvar_SetValueQuick(&cl_capturevideo, 0);
1766                         Con_Printf("video saving failed on frame %i, out of disk space? stopping video capture.\n", cls.capturevideo.frame);
1767                         SCR_CaptureVideo_EndVideo();
1768                 }
1769         }
1770         else if (cls.capturevideo.active)
1771                 SCR_CaptureVideo_EndVideo();
1772 }
1773
1774 /*
1775 ===============
1776 R_Envmap_f
1777
1778 Grab six views for environment mapping tests
1779 ===============
1780 */
1781 struct envmapinfo_s
1782 {
1783         float angles[3];
1784         char *name;
1785         qboolean flipx, flipy, flipdiagonaly;
1786 }
1787 envmapinfo[12] =
1788 {
1789         {{  0,   0, 0}, "rt", false, false, false},
1790         {{  0, 270, 0}, "ft", false, false, false},
1791         {{  0, 180, 0}, "lf", false, false, false},
1792         {{  0,  90, 0}, "bk", false, false, false},
1793         {{-90, 180, 0}, "up",  true,  true, false},
1794         {{ 90, 180, 0}, "dn",  true,  true, false},
1795
1796         {{  0,   0, 0}, "px",  true,  true,  true},
1797         {{  0,  90, 0}, "py", false,  true, false},
1798         {{  0, 180, 0}, "nx", false, false,  true},
1799         {{  0, 270, 0}, "ny",  true, false, false},
1800         {{-90, 180, 0}, "pz", false, false,  true},
1801         {{ 90, 180, 0}, "nz", false, false,  true}
1802 };
1803
1804 static void R_Envmap_f (void)
1805 {
1806         int j, size;
1807         char filename[MAX_QPATH], basename[MAX_QPATH];
1808         unsigned char *buffer1;
1809         unsigned char *buffer2;
1810         unsigned char *buffer3;
1811
1812         if (Cmd_Argc() != 3)
1813         {
1814                 Con_Print("envmap <basename> <size>: save out 6 cubic environment map images, usable with loadsky, note that size must one of 128, 256, 512, or 1024 and can't be bigger than your current resolution\n");
1815                 return;
1816         }
1817
1818         strlcpy (basename, Cmd_Argv(1), sizeof (basename));
1819         size = atoi(Cmd_Argv(2));
1820         if (size != 128 && size != 256 && size != 512 && size != 1024)
1821         {
1822                 Con_Print("envmap: size must be one of 128, 256, 512, or 1024\n");
1823                 return;
1824         }
1825         if (size > vid.width || size > vid.height)
1826         {
1827                 Con_Print("envmap: your resolution is not big enough to render that size\n");
1828                 return;
1829         }
1830
1831         r_refdef.envmap = true;
1832
1833         R_UpdateVariables();
1834
1835         r_refdef.view.x = 0;
1836         r_refdef.view.y = 0;
1837         r_refdef.view.z = 0;
1838         r_refdef.view.width = size;
1839         r_refdef.view.height = size;
1840         r_refdef.view.depth = 1;
1841         r_refdef.view.useperspective = true;
1842         r_refdef.view.isoverlay = false;
1843
1844         r_refdef.view.frustum_x = tan(90 * M_PI / 360.0);
1845         r_refdef.view.frustum_y = tan(90 * M_PI / 360.0);
1846
1847         buffer1 = (unsigned char *)Mem_Alloc(tempmempool, size * size * 3);
1848         buffer2 = (unsigned char *)Mem_Alloc(tempmempool, size * size * 3);
1849         buffer3 = (unsigned char *)Mem_Alloc(tempmempool, size * size * 3 + 18);
1850
1851         for (j = 0;j < 12;j++)
1852         {
1853                 dpsnprintf(filename, sizeof(filename), "env/%s%s.tga", basename, envmapinfo[j].name);
1854                 Matrix4x4_CreateFromQuakeEntity(&r_refdef.view.matrix, r_refdef.view.origin[0], r_refdef.view.origin[1], r_refdef.view.origin[2], envmapinfo[j].angles[0], envmapinfo[j].angles[1], envmapinfo[j].angles[2], 1);
1855                 r_refdef.view.quality = 1;
1856                 r_refdef.view.clear = true;
1857                 R_Mesh_Start();
1858                 R_RenderView();
1859                 R_Mesh_Finish();
1860                 SCR_ScreenShot(filename, buffer1, buffer2, buffer3, 0, vid.height - (r_refdef.view.y + r_refdef.view.height), size, size, envmapinfo[j].flipx, envmapinfo[j].flipy, envmapinfo[j].flipdiagonaly, false, false);
1861         }
1862
1863         Mem_Free (buffer1);
1864         Mem_Free (buffer2);
1865         Mem_Free (buffer3);
1866
1867         r_refdef.envmap = false;
1868 }
1869
1870 //=============================================================================
1871
1872 void SHOWLMP_decodehide(void)
1873 {
1874         int i;
1875         char *lmplabel;
1876         lmplabel = MSG_ReadString();
1877         for (i = 0;i < cl.num_showlmps;i++)
1878                 if (cl.showlmps[i].isactive && strcmp(cl.showlmps[i].label, lmplabel) == 0)
1879                 {
1880                         cl.showlmps[i].isactive = false;
1881                         return;
1882                 }
1883 }
1884
1885 void SHOWLMP_decodeshow(void)
1886 {
1887         int k;
1888         char lmplabel[256], picname[256];
1889         float x, y;
1890         strlcpy (lmplabel,MSG_ReadString(), sizeof (lmplabel));
1891         strlcpy (picname, MSG_ReadString(), sizeof (picname));
1892         if (gamemode == GAME_NEHAHRA) // LordHavoc: nasty old legacy junk
1893         {
1894                 x = MSG_ReadByte();
1895                 y = MSG_ReadByte();
1896         }
1897         else
1898         {
1899                 x = MSG_ReadShort();
1900                 y = MSG_ReadShort();
1901         }
1902         if (!cl.showlmps || cl.num_showlmps >= cl.max_showlmps)
1903         {
1904                 showlmp_t *oldshowlmps = cl.showlmps;
1905                 cl.max_showlmps += 16;
1906                 cl.showlmps = (showlmp_t *) Mem_Alloc(cls.levelmempool, cl.max_showlmps * sizeof(showlmp_t));
1907                 if (cl.num_showlmps)
1908                         memcpy(cl.showlmps, oldshowlmps, cl.num_showlmps * sizeof(showlmp_t));
1909                 if (oldshowlmps)
1910                         Mem_Free(oldshowlmps);
1911         }
1912         for (k = 0;k < cl.max_showlmps;k++)
1913                 if (cl.showlmps[k].isactive && !strcmp(cl.showlmps[k].label, lmplabel))
1914                         break;
1915         if (k == cl.max_showlmps)
1916                 for (k = 0;k < cl.max_showlmps;k++)
1917                         if (!cl.showlmps[k].isactive)
1918                                 break;
1919         cl.showlmps[k].isactive = true;
1920         strlcpy (cl.showlmps[k].label, lmplabel, sizeof (cl.showlmps[k].label));
1921         strlcpy (cl.showlmps[k].pic, picname, sizeof (cl.showlmps[k].pic));
1922         cl.showlmps[k].x = x;
1923         cl.showlmps[k].y = y;
1924         cl.num_showlmps = max(cl.num_showlmps, k + 1);
1925 }
1926
1927 void SHOWLMP_drawall(void)
1928 {
1929         int i;
1930         for (i = 0;i < cl.num_showlmps;i++)
1931                 if (cl.showlmps[i].isactive)
1932                         DrawQ_Pic(cl.showlmps[i].x, cl.showlmps[i].y, Draw_CachePic (cl.showlmps[i].pic), 0, 0, 1, 1, 1, 1, 0);
1933 }
1934
1935 /*
1936 ==============================================================================
1937
1938                                                 SCREEN SHOTS
1939
1940 ==============================================================================
1941 */
1942
1943 qboolean SCR_ScreenShot(char *filename, unsigned char *buffer1, unsigned char *buffer2, unsigned char *buffer3, int x, int y, int width, int height, qboolean flipx, qboolean flipy, qboolean flipdiagonal, qboolean jpeg, qboolean gammacorrect)
1944 {
1945         int     indices[3] = {0,1,2};
1946         qboolean ret;
1947
1948         if (!r_render.integer)
1949                 return false;
1950
1951         CHECKGLERROR
1952         qglReadPixels (x, y, width, height, jpeg ? GL_RGB : GL_BGR, GL_UNSIGNED_BYTE, buffer1);CHECKGLERROR
1953
1954         if (scr_screenshot_gammaboost.value != 1 && gammacorrect)
1955         {
1956                 int i;
1957                 double igamma = 1.0 / scr_screenshot_gammaboost.value;
1958                 unsigned char ramp[256];
1959                 for (i = 0;i < 256;i++)
1960                         ramp[i] = (unsigned char) (pow(i * (1.0 / 255.0), igamma) * 255.0);
1961                 for (i = 0;i < width*height*3;i++)
1962                         buffer1[i] = ramp[buffer1[i]];
1963         }
1964
1965         Image_CopyMux (buffer2, buffer1, width, height, flipx, flipy, flipdiagonal, 3, 3, indices);
1966
1967         if (jpeg)
1968                 ret = JPEG_SaveImage_preflipped (filename, width, height, buffer2);
1969         else
1970                 ret = Image_WriteTGABGR_preflipped (filename, width, height, buffer2, buffer3);
1971
1972         return ret;
1973 }
1974
1975 //=============================================================================
1976
1977 extern void R_UpdateFogColor(void);
1978 void R_ClearScreen(qboolean fogcolor)
1979 {
1980         // clear to black
1981         CHECKGLERROR
1982         if (fogcolor)
1983         {
1984                 R_UpdateFogColor();
1985                 qglClearColor(r_refdef.fogcolor[0],r_refdef.fogcolor[1],r_refdef.fogcolor[2],0);CHECKGLERROR
1986         }
1987         else
1988         {
1989                 qglClearColor(0,0,0,0);CHECKGLERROR
1990         }
1991         qglClearDepth(1);CHECKGLERROR
1992         if (gl_stencil)
1993         {
1994                 // LordHavoc: we use a stencil centered around 128 instead of 0,
1995                 // to avoid clamping interfering with strange shadow volume
1996                 // drawing orders
1997                 qglClearStencil(128);CHECKGLERROR
1998         }
1999         // clear the screen
2000         if (r_render.integer)
2001                 GL_Clear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT | (gl_stencil ? GL_STENCIL_BUFFER_BIT : 0));
2002         // set dithering mode
2003         if (gl_dither.integer)
2004         {
2005                 qglEnable(GL_DITHER);CHECKGLERROR
2006         }
2007         else
2008         {
2009                 qglDisable(GL_DITHER);CHECKGLERROR
2010         }
2011 }
2012
2013 qboolean CL_VM_UpdateView (void);
2014 void SCR_DrawConsole (void);
2015 void R_Shadow_EditLights_DrawSelectedLightProperties(void);
2016
2017 int r_stereo_side;
2018
2019 void SCR_DrawScreen (void)
2020 {
2021         R_Mesh_Start();
2022
2023         R_TimeReport_BeginFrame();
2024
2025         R_UpdateVariables();
2026
2027         // Quake uses clockwise winding, so these are swapped
2028         r_refdef.view.cullface_front = GL_BACK;
2029         r_refdef.view.cullface_back = GL_FRONT;
2030
2031         if (cls.signon == SIGNONS)
2032         {
2033                 float size;
2034
2035                 size = scr_viewsize.value * (1.0 / 100.0);
2036                 size = min(size, 1);
2037
2038                 if (r_stereo_sidebyside.integer)
2039                 {
2040                         r_refdef.view.width = (int)(vid.width * size / 2.5);
2041                         r_refdef.view.height = (int)(vid.height * size / 2.5 * (1 - bound(0, r_letterbox.value, 100) / 100));
2042                         r_refdef.view.depth = 1;
2043                         r_refdef.view.x = (int)((vid.width - r_refdef.view.width * 2.5) * 0.5);
2044                         r_refdef.view.y = (int)((vid.height - r_refdef.view.height)/2);
2045                         r_refdef.view.z = 0;
2046                         if (r_stereo_side)
2047                                 r_refdef.view.x += (int)(r_refdef.view.width * 1.5);
2048                 }
2049                 else
2050                 {
2051                         r_refdef.view.width = (int)(vid.width * size);
2052                         r_refdef.view.height = (int)(vid.height * size * (1 - bound(0, r_letterbox.value, 100) / 100));
2053                         r_refdef.view.depth = 1;
2054                         r_refdef.view.x = (int)((vid.width - r_refdef.view.width)/2);
2055                         r_refdef.view.y = (int)((vid.height - r_refdef.view.height)/2);
2056                         r_refdef.view.z = 0;
2057                 }
2058
2059                 // LordHavoc: viewzoom (zoom in for sniper rifles, etc)
2060                 // LordHavoc: this is designed to produce widescreen fov values
2061                 // when the screen is wider than 4/3 width/height aspect, to do
2062                 // this it simply assumes the requested fov is the vertical fov
2063                 // for a 4x3 display, if the ratio is not 4x3 this makes the fov
2064                 // higher/lower according to the ratio
2065                 r_refdef.view.useperspective = true;
2066                 r_refdef.view.frustum_y = tan(scr_fov.value * M_PI / 360.0) * (3.0/4.0) * cl.viewzoom;
2067                 r_refdef.view.frustum_x = r_refdef.view.frustum_y * (float)r_refdef.view.width / (float)r_refdef.view.height / vid_pixelheight.value;
2068
2069                 r_refdef.view.frustum_x *= r_refdef.frustumscale_x;
2070                 r_refdef.view.frustum_y *= r_refdef.frustumscale_y;
2071
2072                 if(!CL_VM_UpdateView())
2073                         R_RenderView();
2074
2075                 if (scr_zoomwindow.integer)
2076                 {
2077                         float sizex = bound(10, scr_zoomwindow_viewsizex.value, 100) / 100.0;
2078                         float sizey = bound(10, scr_zoomwindow_viewsizey.value, 100) / 100.0;
2079                         r_refdef.view.width = (int)(vid.width * sizex);
2080                         r_refdef.view.height = (int)(vid.height * sizey);
2081                         r_refdef.view.depth = 1;
2082                         r_refdef.view.x = (int)((vid.width - r_refdef.view.width)/2);
2083                         r_refdef.view.y = 0;
2084                         r_refdef.view.z = 0;
2085
2086                         r_refdef.view.useperspective = true;
2087                         r_refdef.view.frustum_y = tan(scr_zoomwindow_fov.value * M_PI / 360.0) * (3.0/4.0) * cl.viewzoom;
2088                         r_refdef.view.frustum_x = r_refdef.view.frustum_y * vid_pixelheight.value * (float)r_refdef.view.width / (float)r_refdef.view.height;
2089
2090                         r_refdef.view.frustum_x *= r_refdef.frustumscale_x;
2091                         r_refdef.view.frustum_y *= r_refdef.frustumscale_y;
2092
2093                         if(!CL_VM_UpdateView())
2094                                 R_RenderView();
2095                 }
2096         }
2097
2098         if (!r_stereo_sidebyside.integer)
2099         {
2100                 r_refdef.view.width = vid.width;
2101                 r_refdef.view.height = vid.height;
2102                 r_refdef.view.depth = 1;
2103                 r_refdef.view.x = 0;
2104                 r_refdef.view.y = 0;
2105                 r_refdef.view.z = 0;
2106                 r_refdef.view.useperspective = false;
2107         }
2108
2109         // draw 2D stuff
2110         if(!scr_con_current && !(key_consoleactive & KEY_CONSOLEACTIVE_FORCED))
2111                 if ((key_dest == key_game || key_dest == key_message) && !r_letterbox.value)
2112                         Con_DrawNotify ();      // only draw notify in game
2113
2114         if (cls.signon == SIGNONS)
2115         {
2116                 SCR_DrawNet ();
2117                 SCR_DrawTurtle ();
2118                 SCR_DrawPause ();
2119                 if (!r_letterbox.value)
2120                         Sbar_Draw();
2121                 SHOWLMP_drawall();
2122                 SCR_CheckDrawCenterString();
2123         }
2124         SCR_DrawNetGraph ();
2125         MR_Draw();
2126         CL_DrawVideo();
2127         R_Shadow_EditLights_DrawSelectedLightProperties();
2128
2129         SCR_DrawConsole();
2130
2131         SCR_DrawBrand();
2132
2133         SCR_DrawInfobar();
2134
2135         if (r_timereport_active)
2136                 R_TimeReport("2d");
2137
2138         if (cls.signon == SIGNONS)
2139                 R_TimeReport_EndFrame();
2140
2141         DrawQ_Finish();
2142
2143         R_DrawGamma();
2144
2145         R_Mesh_Finish();
2146 }
2147
2148 void SCR_UpdateLoadingScreen (qboolean clear)
2149 {
2150         float x, y;
2151         cachepic_t *pic;
2152         float vertex3f[12];
2153         float texcoord2f[8];
2154         // don't do anything if not initialized yet
2155         if (vid_hidden || !scr_refresh.integer)
2156                 return;
2157         // release mouse grab while loading
2158         if (!vid.fullscreen)
2159                 VID_SetMouse(false, false, false);
2160         CHECKGLERROR
2161         qglViewport(0, 0, vid.width, vid.height);CHECKGLERROR
2162         //qglDisable(GL_SCISSOR_TEST);CHECKGLERROR
2163         //qglDepthMask(1);CHECKGLERROR
2164         qglColorMask(1,1,1,1);CHECKGLERROR
2165         qglClearColor(0,0,0,0);CHECKGLERROR
2166         // when starting up a new video mode, make sure the screen is cleared to black
2167         if (clear)
2168         {
2169                 qglClear(GL_COLOR_BUFFER_BIT);CHECKGLERROR
2170         }
2171         //qglDisable(GL_CULL_FACE);CHECKGLERROR
2172         //R_ClearScreen();
2173         R_Textures_Frame();
2174         GL_SetupView_Mode_Ortho(0, 0, vid_conwidth.integer, vid_conheight.integer, -10, 100);
2175         R_Mesh_Start();
2176         R_Mesh_Matrix(&identitymatrix);
2177         // draw the loading plaque
2178         pic = Draw_CachePic ("gfx/loading");
2179         x = (vid_conwidth.integer - pic->width)/2;
2180         y = (vid_conheight.integer - pic->height)/2;
2181         GL_Color(1,1,1,1);
2182         GL_BlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
2183         GL_DepthRange(0, 1);
2184         GL_PolygonOffset(0, 0);
2185         GL_DepthTest(false);
2186         R_Mesh_VertexPointer(vertex3f, 0, 0);
2187         R_Mesh_ColorPointer(NULL, 0, 0);
2188         R_Mesh_ResetTextureState();
2189         R_Mesh_TexBind(0, R_GetTexture(pic->tex));
2190         R_Mesh_TexCoordPointer(0, 2, texcoord2f, 0, 0);
2191         R_SetupGenericShader(true);
2192         vertex3f[2] = vertex3f[5] = vertex3f[8] = vertex3f[11] = 0;
2193         vertex3f[0] = vertex3f[9] = x;
2194         vertex3f[1] = vertex3f[4] = y;
2195         vertex3f[3] = vertex3f[6] = x + pic->width;
2196         vertex3f[7] = vertex3f[10] = y + pic->height;
2197         texcoord2f[0] = 0;texcoord2f[1] = 0;
2198         texcoord2f[2] = 1;texcoord2f[3] = 0;
2199         texcoord2f[4] = 1;texcoord2f[5] = 1;
2200         texcoord2f[6] = 0;texcoord2f[7] = 1;
2201         if (vid.stereobuffer)
2202         {
2203                 qglDrawBuffer(GL_FRONT_LEFT);
2204                 R_Mesh_Draw(0, 4, 0, 2, NULL, polygonelements, 0, 0);
2205                 qglDrawBuffer(GL_FRONT_RIGHT);
2206                 R_Mesh_Draw(0, 4, 0, 2, NULL, polygonelements, 0, 0);
2207         }
2208         else
2209         {
2210                 qglDrawBuffer(GL_FRONT);
2211                 R_Mesh_Draw(0, 4, 0, 2, NULL, polygonelements, 0, 0);
2212         }
2213         R_Mesh_Finish();
2214         // refresh
2215         // not necessary when rendering to GL_FRONT buffers
2216         //VID_Finish();
2217         // however this IS necessary on Windows Vista
2218         qglFinish();
2219 }
2220
2221 extern cvar_t cl_minfps;
2222 extern cvar_t cl_minfps_fade;
2223 extern cvar_t cl_minfps_qualitymax;
2224 extern cvar_t cl_minfps_qualitymin;
2225 extern cvar_t cl_minfps_qualitypower;
2226 extern cvar_t cl_minfps_qualityscale;
2227 static double cl_updatescreen_rendertime = 0;
2228 static double cl_updatescreen_quality = 1;
2229 void CL_UpdateScreen(void)
2230 {
2231         double rendertime1;
2232         float conwidth, conheight;
2233
2234         if (!scr_initialized || !con_initialized)
2235                 return;                         // not initialized yet
2236
2237         if(gamemode == GAME_NEXUIZ)
2238         {
2239                 // play a bit with the palette (experimental)
2240                 palette_rgb_pantscolormap[15][0] = (unsigned char) (128 + 127 * sin(cl.time / exp(1) + 0*M_PI/3));
2241                 palette_rgb_pantscolormap[15][1] = (unsigned char) (128 + 127 * sin(cl.time / exp(1) + 2*M_PI/3));
2242                 palette_rgb_pantscolormap[15][2] = (unsigned char) (128 + 127 * sin(cl.time / exp(1) + 4*M_PI/3));
2243                 palette_rgb_shirtcolormap[15][0] = (unsigned char) (128 + 127 * sin(cl.time /  M_PI  + 5*M_PI/3));
2244                 palette_rgb_shirtcolormap[15][1] = (unsigned char) (128 + 127 * sin(cl.time /  M_PI  + 3*M_PI/3));
2245                 palette_rgb_shirtcolormap[15][2] = (unsigned char) (128 + 127 * sin(cl.time /  M_PI  + 1*M_PI/3));
2246                 memcpy(palette_rgb_pantsscoreboard[15], palette_rgb_pantscolormap[15], sizeof(*palette_rgb_pantscolormap));
2247                 memcpy(palette_rgb_shirtscoreboard[15], palette_rgb_shirtcolormap[15], sizeof(*palette_rgb_shirtcolormap));
2248         }
2249
2250         if (vid_hidden || !scr_refresh.integer)
2251                 return;
2252
2253         rendertime1 = Sys_DoubleTime();
2254
2255         conwidth = bound(320, vid_conwidth.value, 2048);
2256         conheight = bound(200, vid_conheight.value, 1536);
2257         if (vid_conwidth.value != conwidth)
2258                 Cvar_SetValue("vid_conwidth", conwidth);
2259         if (vid_conheight.value != conheight)
2260                 Cvar_SetValue("vid_conheight", conheight);
2261
2262         // bound viewsize
2263         if (scr_viewsize.value < 30)
2264                 Cvar_Set ("viewsize","30");
2265         if (scr_viewsize.value > 120)
2266                 Cvar_Set ("viewsize","120");
2267
2268         // bound field of view
2269         if (scr_fov.value < 1)
2270                 Cvar_Set ("fov","1");
2271         if (scr_fov.value > 170)
2272                 Cvar_Set ("fov","170");
2273
2274         // validate r_textureunits cvar
2275         if (r_textureunits.integer > gl_textureunits)
2276                 Cvar_SetValueQuick(&r_textureunits, gl_textureunits);
2277         if (r_textureunits.integer < 1)
2278                 Cvar_SetValueQuick(&r_textureunits, 1);
2279
2280         // validate gl_combine cvar
2281         if (gl_combine.integer && !gl_combine_extension)
2282                 Cvar_SetValueQuick(&gl_combine, 0);
2283
2284         // intermission is always full screen
2285         if (cl.intermission)
2286                 sb_lines = 0;
2287         else
2288         {
2289                 if (scr_viewsize.value >= 120)
2290                         sb_lines = 0;           // no status bar at all
2291                 else if (scr_viewsize.value >= 110)
2292                         sb_lines = 24;          // no inventory
2293                 else
2294                         sb_lines = 24+16+8;
2295         }
2296
2297         r_refdef.view.colormask[0] = 1;
2298         r_refdef.view.colormask[1] = 1;
2299         r_refdef.view.colormask[2] = 1;
2300
2301         SCR_SetUpToDrawConsole();
2302
2303         CHECKGLERROR
2304         qglDrawBuffer(GL_BACK);CHECKGLERROR
2305         qglViewport(0, 0, vid.width, vid.height);CHECKGLERROR
2306         qglDisable(GL_SCISSOR_TEST);CHECKGLERROR
2307         qglDepthMask(1);CHECKGLERROR
2308         qglColorMask(1,1,1,1);CHECKGLERROR
2309         qglClearColor(0,0,0,0);CHECKGLERROR
2310         R_ClearScreen(false);
2311         r_refdef.view.clear = false;
2312         r_refdef.view.isoverlay = false;
2313         r_refdef.view.quality = bound(cl_minfps_qualitymin.value, pow(cl_updatescreen_quality, cl_minfps_qualitypower.value) * cl_minfps_qualityscale.value, cl_minfps_qualitymax.value);
2314
2315         if(scr_stipple.integer)
2316         {
2317                 GLubyte stipple[128];
2318                 int i, s, width, parts;
2319                 static int frame = 0;
2320                 ++frame;
2321
2322                 s = scr_stipple.integer;
2323                 parts = (s & 007);
2324                 width = (s & 070) >> 3;
2325
2326                 qglEnable(GL_POLYGON_STIPPLE); // 0x0B42
2327                 for(i = 0; i < 128; ++i)
2328                 {
2329                         int line = i/4;
2330                         stipple[i] = (((line >> width) + frame) & ((1 << parts) - 1)) ? 0x00 : 0xFF;
2331                 }
2332                 qglPolygonStipple(stipple);
2333         }
2334         else
2335                 qglDisable(GL_POLYGON_STIPPLE);
2336
2337         if (vid.stereobuffer || r_stereo_redblue.integer || r_stereo_redgreen.integer || r_stereo_redcyan.integer || r_stereo_sidebyside.integer)
2338         {
2339                 matrix4x4_t originalmatrix = r_refdef.view.matrix;
2340                 matrix4x4_t offsetmatrix;
2341                 Matrix4x4_CreateFromQuakeEntity(&offsetmatrix, 0, r_stereo_separation.value * 0.5f, 0, 0, r_stereo_angle.value * 0.5f, 0, 1);
2342                 Matrix4x4_Concat(&r_refdef.view.matrix, &originalmatrix, &offsetmatrix);
2343
2344                 if (r_stereo_sidebyside.integer)
2345                         r_stereo_side = 0;
2346
2347                 if (r_stereo_redblue.integer || r_stereo_redgreen.integer || r_stereo_redcyan.integer)
2348                 {
2349                         r_refdef.view.colormask[0] = 1;
2350                         r_refdef.view.colormask[1] = 0;
2351                         r_refdef.view.colormask[2] = 0;
2352                 }
2353
2354                 if (vid.stereobuffer)
2355                         qglDrawBuffer(GL_BACK_RIGHT);
2356
2357                 SCR_DrawScreen();
2358
2359                 Matrix4x4_CreateFromQuakeEntity(&offsetmatrix, 0, r_stereo_separation.value * -0.5f, 0, 0, r_stereo_angle.value * -0.5f, 0, 1);
2360                 Matrix4x4_Concat(&r_refdef.view.matrix, &originalmatrix, &offsetmatrix);
2361
2362                 if (r_stereo_sidebyside.integer)
2363                         r_stereo_side = 1;
2364
2365                 if (r_stereo_redblue.integer || r_stereo_redgreen.integer || r_stereo_redcyan.integer)
2366                 {
2367                         r_refdef.view.colormask[0] = 0;
2368                         r_refdef.view.colormask[1] = r_stereo_redcyan.integer || r_stereo_redgreen.integer;
2369                         r_refdef.view.colormask[2] = r_stereo_redcyan.integer || r_stereo_redblue.integer;
2370                 }
2371
2372                 if (vid.stereobuffer)
2373                         qglDrawBuffer(GL_BACK_LEFT);
2374
2375                 SCR_DrawScreen();
2376
2377                 r_refdef.view.matrix = originalmatrix;
2378         }
2379         else
2380                 SCR_DrawScreen();
2381
2382         SCR_CaptureVideo();
2383
2384         // quality adjustment according to render time
2385         qglFlush();
2386         cl_updatescreen_rendertime += ((Sys_DoubleTime() - rendertime1) - cl_updatescreen_rendertime) * bound(0, cl_minfps_fade.value, 1);
2387         if (cl_minfps.value > 0 && cl_updatescreen_rendertime > 0 && !cls.timedemo && (!cls.capturevideo.active || !cls.capturevideo.realtime))
2388                 cl_updatescreen_quality = 1 / (cl_updatescreen_rendertime * cl_minfps.value);
2389         else
2390                 cl_updatescreen_quality = 1;
2391
2392         if (!vid_activewindow)
2393                 VID_SetMouse(false, false, false);
2394         else if (key_consoleactive)
2395                 VID_SetMouse(vid.fullscreen, false, false);
2396         else if (key_dest == key_menu_grabbed)
2397                 VID_SetMouse(true, vid_mouse.integer && !in_client_mouse, true);
2398         else if (key_dest == key_menu)
2399                 VID_SetMouse(vid.fullscreen, vid_mouse.integer && !in_client_mouse, true);
2400         else
2401                 VID_SetMouse(vid.fullscreen, vid_mouse.integer && !cl.csqc_wantsmousemove && (!cls.demoplayback || cl_demo_mousegrab.integer), true);
2402
2403         VID_Finish();
2404 }
2405
2406 void CL_Screen_NewMap(void)
2407 {
2408 }