changed r_textshadow behavior to always draw a black shadow, but with
[divverent/darkplaces.git] / gl_draw.c
1 /*
2 Copyright (C) 1996-1997 Id Software, Inc.
3
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
8
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
12
13 See the GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
18
19 */
20
21 #include "quakedef.h"
22 #include "image.h"
23 #include "wad.h"
24
25 #include "cl_video.h"
26
27 cvar_t r_textshadow = {CVAR_SAVE, "r_textshadow", "0", "draws a shadow on all text to improve readability (note: value controls offset, 1 = 1 pixel, 1.5 = 1.5 pixels, etc)"};
28
29 static rtexture_t *char_texture;
30 cachepic_t *r_crosshairs[NUMCROSSHAIRS+1];
31
32 //=============================================================================
33 /* Support Routines */
34
35 #define FONT_FILESIZE 13468
36 #define MAX_CACHED_PICS 1024
37 #define CACHEPICHASHSIZE 256
38 static cachepic_t *cachepichash[CACHEPICHASHSIZE];
39 static cachepic_t cachepics[MAX_CACHED_PICS];
40 static int numcachepics;
41
42 static rtexturepool_t *drawtexturepool;
43
44 static unsigned char concharimage[FONT_FILESIZE] =
45 {
46 #include "lhfont.h"
47 };
48
49 static rtexture_t *draw_generateconchars(void)
50 {
51         int i;
52         unsigned char buffer[65536][4], *data = NULL;
53         double random;
54
55         data = LoadTGA (concharimage, FONT_FILESIZE, 256, 256);
56 // Gold numbers
57         for (i = 0;i < 8192;i++)
58         {
59                 random = lhrandom (0.0,1.0);
60                 buffer[i][0] = 83 + (unsigned char)(random * 64);
61                 buffer[i][1] = 71 + (unsigned char)(random * 32);
62                 buffer[i][2] = 23 + (unsigned char)(random * 16);
63                 buffer[i][3] = data[i*4+0];
64         }
65 // White chars
66         for (i = 8192;i < 32768;i++)
67         {
68                 random = lhrandom (0.0,1.0);
69                 buffer[i][0] = 95 + (unsigned char)(random * 64);
70                 buffer[i][1] = 95 + (unsigned char)(random * 64);
71                 buffer[i][2] = 95 + (unsigned char)(random * 64);
72                 buffer[i][3] = data[i*4+0];
73         }
74 // Gold numbers
75         for (i = 32768;i < 40960;i++)
76         {
77                 random = lhrandom (0.0,1.0);
78                 buffer[i][0] = 83 + (unsigned char)(random * 64);
79                 buffer[i][1] = 71 + (unsigned char)(random * 32);
80                 buffer[i][2] = 23 + (unsigned char)(random * 16);
81                 buffer[i][3] = data[i*4+0];
82         }
83 // Red chars
84         for (i = 40960;i < 65536;i++)
85         {
86                 random = lhrandom (0.0,1.0);
87                 buffer[i][0] = 96 + (unsigned char)(random * 64);
88                 buffer[i][1] = 43 + (unsigned char)(random * 32);
89                 buffer[i][2] = 27 + (unsigned char)(random * 32);
90                 buffer[i][3] = data[i*4+0];
91         }
92
93 #if 0
94         Image_WriteTGARGBA ("gfx/generated_conchars.tga", 256, 256, &buffer[0][0]);
95 #endif
96
97         Mem_Free(data);
98         return R_LoadTexture2D(drawtexturepool, "conchars", 256, 256, &buffer[0][0], TEXTYPE_RGBA, TEXF_ALPHA | TEXF_PRECACHE, NULL);
99 }
100
101 static char *pointerimage =
102         "333333332......."
103         "26777761........"
104         "2655541........."
105         "265541.........."
106         "2654561........."
107         "26414561........"
108         "251.14561......."
109         "21...14561......"
110         "1.....141......."
111         ".......1........"
112         "................"
113         "................"
114         "................"
115         "................"
116         "................"
117         "................"
118 ;
119
120 static rtexture_t *draw_generatemousepointer(void)
121 {
122         int i;
123         unsigned char buffer[256][4];
124         for (i = 0;i < 256;i++)
125         {
126                 if (pointerimage[i] == '.')
127                 {
128                         buffer[i][0] = 0;
129                         buffer[i][1] = 0;
130                         buffer[i][2] = 0;
131                         buffer[i][3] = 0;
132                 }
133                 else
134                 {
135                         buffer[i][0] = (pointerimage[i] - '0') * 16;
136                         buffer[i][1] = (pointerimage[i] - '0') * 16;
137                         buffer[i][2] = (pointerimage[i] - '0') * 16;
138                         buffer[i][3] = 255;
139                 }
140         }
141         return R_LoadTexture2D(drawtexturepool, "mousepointer", 16, 16, &buffer[0][0], TEXTYPE_RGBA, TEXF_ALPHA | TEXF_PRECACHE, NULL);
142 }
143
144 static char *crosshairtexdata[NUMCROSSHAIRS] =
145 {
146         "................"
147         "................"
148         "................"
149         "...33......33..."
150         "...355....553..."
151         "....577..775...."
152         ".....77..77....."
153         "................"
154         "................"
155         ".....77..77....."
156         "....577..775...."
157         "...355....553..."
158         "...33......33..."
159         "................"
160         "................"
161         "................"
162         ,
163         "................"
164         "................"
165         "................"
166         "...3........3..."
167         "....5......5...."
168         ".....7....7....."
169         "......7..7......"
170         "................"
171         "................"
172         "......7..7......"
173         ".....7....7....."
174         "....5......5...."
175         "...3........3..."
176         "................"
177         "................"
178         "................"
179         ,
180         "................"
181         ".......77......."
182         ".......77......."
183         "................"
184         "................"
185         ".......44......."
186         ".......44......."
187         ".77..44..44..77."
188         ".77..44..44..77."
189         ".......44......."
190         ".......44......."
191         "................"
192         "................"
193         ".......77......."
194         ".......77......."
195         "................"
196         ,
197         "................"
198         "................"
199         "................"
200         "................"
201         "................"
202         "................"
203         "................"
204         "................"
205         "........7777777."
206         "........752....."
207         "........72......"
208         "........7......."
209         "........7......."
210         "........7......."
211         "........7......."
212         "................"
213         ,
214         "................"
215         "................"
216         "................"
217         "................"
218         "................"
219         "........7......."
220         "................"
221         "........4......."
222         ".....7.4.4.7...."
223         "........4......."
224         "................"
225         "........7......."
226         "................"
227         "................"
228         "................"
229         "................"
230         ,
231         "................"
232         "................"
233         "................"
234         "................"
235         "................"
236         "................"
237         "................"
238         ".......55......."
239         ".......55......."
240         "................"
241         "................"
242         "................"
243         "................"
244         "................"
245         "................"
246         "................"
247 };
248
249 static rtexture_t *draw_generatecrosshair(int num)
250 {
251         int i;
252         char *in;
253         unsigned char data[16*16][4];
254         in = crosshairtexdata[num];
255         for (i = 0;i < 16*16;i++)
256         {
257                 if (in[i] == '.')
258                 {
259                         data[i][0] = 255;
260                         data[i][1] = 255;
261                         data[i][2] = 255;
262                         data[i][3] = 0;
263                 }
264                 else
265                 {
266                         data[i][0] = data[i][1] = data[i][2] = (unsigned char) ((int) (in[i] - '0') * 127 / 7 + 128);
267                         data[i][3] = 255;
268                 }
269         }
270         return R_LoadTexture2D(drawtexturepool, va("crosshair%i", num+1), 16, 16, &data[0][0], TEXTYPE_RGBA, TEXF_ALPHA | TEXF_PRECACHE, NULL);
271 }
272
273 static rtexture_t *draw_generateditherpattern(void)
274 {
275 #if 1
276         int x, y;
277         unsigned char data[8*8*4];
278         for (y = 0;y < 8;y++)
279         {
280                 for (x = 0;x < 8;x++)
281                 {
282                         data[(y*8+x)*4+0] = data[(y*8+x)*4+1] = data[(y*8+x)*4+2] = ((x^y) & 4) ? 255 : 0;
283                         data[(y*8+x)*4+3] = 255;
284                 }
285         }
286         return R_LoadTexture2D(drawtexturepool, "ditherpattern", 8, 8, data, TEXTYPE_RGBA, TEXF_FORCENEAREST | TEXF_PRECACHE, NULL);
287 #else
288         unsigned char data[16];
289         memset(data, 255, sizeof(data));
290         data[0] = data[1] = data[2] = data[12] = data[13] = data[14] = 0;
291         return R_LoadTexture2D(drawtexturepool, "ditherpattern", 2, 2, data, TEXTYPE_RGBA, TEXF_FORCENEAREST | TEXF_PRECACHE, NULL);
292 #endif
293 }
294
295 /*
296 ================
297 Draw_CachePic
298 ================
299 */
300 // FIXME: move this to client somehow
301 cachepic_t      *Draw_CachePic (const char *path, qboolean persistent)
302 {
303         int crc, hashkey;
304         cachepic_t *pic;
305         int flags;
306         fs_offset_t lmpsize;
307         unsigned char *lmpdata;
308         char lmpname[MAX_QPATH];
309
310         if (!strncmp(CLVIDEOPREFIX, path, sizeof(CLVIDEOPREFIX) - 1))
311         {
312                 clvideo_t *video;
313
314                 video = CL_GetVideoByName(path);
315                 if( video )
316                         return &video->cpif;
317         }
318
319         crc = CRC_Block((unsigned char *)path, strlen(path));
320         hashkey = ((crc >> 8) ^ crc) % CACHEPICHASHSIZE;
321         for (pic = cachepichash[hashkey];pic;pic = pic->chain)
322                 if (!strcmp (path, pic->name))
323                         return pic;
324
325         if (numcachepics == MAX_CACHED_PICS)
326         {
327                 Con_Printf ("Draw_CachePic: numcachepics == MAX_CACHED_PICS\n");
328                 // FIXME: support NULL in callers?
329                 return cachepics; // return the first one
330         }
331         pic = cachepics + (numcachepics++);
332         strlcpy (pic->name, path, sizeof(pic->name));
333         // link into list
334         pic->chain = cachepichash[hashkey];
335         cachepichash[hashkey] = pic;
336
337         flags = TEXF_ALPHA;
338         if (persistent)
339                 flags |= TEXF_PRECACHE;
340         if (!strcmp(path, "gfx/colorcontrol/ditherpattern"))
341                 flags |= TEXF_CLAMP;
342
343         // load a high quality image from disk if possible
344         pic->tex = loadtextureimage(drawtexturepool, path, 0, 0, false, flags);
345         if (pic->tex == NULL && !strncmp(path, "gfx/", 4))
346         {
347                 // compatibility with older versions which did not require gfx/ prefix
348                 pic->tex = loadtextureimage(drawtexturepool, path + 4, 0, 0, false, flags);
349         }
350         // if a high quality image was loaded, set the pic's size to match it, just
351         // in case there's no low quality version to get the size from
352         if (pic->tex)
353         {
354                 pic->width = R_TextureWidth(pic->tex);
355                 pic->height = R_TextureHeight(pic->tex);
356         }
357
358         // now read the low quality version (wad or lmp file), and take the pic
359         // size from that even if we don't upload the texture, this way the pics
360         // show up the right size in the menu even if they were replaced with
361         // higher or lower resolution versions
362         dpsnprintf(lmpname, sizeof(lmpname), "%s.lmp", path);
363         if (!strncmp(path, "gfx/", 4) && (lmpdata = FS_LoadFile(lmpname, tempmempool, false, &lmpsize)))
364         {
365                 if (lmpsize >= 9)
366                 {
367                         pic->width = lmpdata[0] + lmpdata[1] * 256 + lmpdata[2] * 65536 + lmpdata[3] * 16777216;
368                         pic->height = lmpdata[4] + lmpdata[5] * 256 + lmpdata[6] * 65536 + lmpdata[7] * 16777216;
369                         // if no high quality replacement image was found, upload the original low quality texture
370                         if (!pic->tex)
371                                 pic->tex = R_LoadTexture2D(drawtexturepool, path, pic->width, pic->height, lmpdata + 8, TEXTYPE_PALETTE, flags, palette_transparent);
372                 }
373                 Mem_Free(lmpdata);
374         }
375         else if ((lmpdata = W_GetLumpName (path + 4)))
376         {
377                 if (!strcmp(path, "gfx/conchars"))
378                 {
379                         // conchars is a raw image and with color 0 as transparent instead of 255
380                         pic->width = 128;
381                         pic->height = 128;
382                         // if no high quality replacement image was found, upload the original low quality texture
383                         if (!pic->tex)
384                                 pic->tex = R_LoadTexture2D(drawtexturepool, path, 128, 128, lmpdata, TEXTYPE_PALETTE, flags, palette_font);
385                 }
386                 else
387                 {
388                         pic->width = lmpdata[0] + lmpdata[1] * 256 + lmpdata[2] * 65536 + lmpdata[3] * 16777216;
389                         pic->height = lmpdata[4] + lmpdata[5] * 256 + lmpdata[6] * 65536 + lmpdata[7] * 16777216;
390                         // if no high quality replacement image was found, upload the original low quality texture
391                         if (!pic->tex)
392                                 pic->tex = R_LoadTexture2D(drawtexturepool, path, pic->width, pic->height, lmpdata + 8, TEXTYPE_PALETTE, flags, palette_transparent);
393                 }
394         }
395
396         // if it's not found on disk, check if it's one of the builtin images
397         if (pic->tex == NULL)
398         {
399                 if (pic->tex == NULL && !strcmp(path, "gfx/conchars"))
400                         pic->tex = draw_generateconchars();
401                 if (pic->tex == NULL && !strcmp(path, "ui/mousepointer"))
402                         pic->tex = draw_generatemousepointer();
403                 if (pic->tex == NULL && !strcmp(path, "gfx/prydoncursor001"))
404                         pic->tex = draw_generatemousepointer();
405                 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair1"))
406                         pic->tex = draw_generatecrosshair(0);
407                 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair2"))
408                         pic->tex = draw_generatecrosshair(1);
409                 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair3"))
410                         pic->tex = draw_generatecrosshair(2);
411                 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair4"))
412                         pic->tex = draw_generatecrosshair(3);
413                 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair5"))
414                         pic->tex = draw_generatecrosshair(4);
415                 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair6"))
416                         pic->tex = draw_generatecrosshair(5);
417                 if (pic->tex == NULL && !strcmp(path, "gfx/colorcontrol/ditherpattern"))
418                         pic->tex = draw_generateditherpattern();
419                 if (pic->tex == NULL)
420                 {
421                         // don't complain about missing gfx/crosshair images
422                         if (strncmp(path, "gfx/crosshair", 13))
423                                 Con_Printf("Draw_CachePic: failed to load %s\n", path);
424                         pic->tex = r_texture_notexture;
425                 }
426                 pic->width = R_TextureWidth(pic->tex);
427                 pic->height = R_TextureHeight(pic->tex);
428         }
429
430         return pic;
431 }
432
433 cachepic_t *Draw_NewPic(const char *picname, int width, int height, int alpha, unsigned char *pixels)
434 {
435         int crc, hashkey;
436         cachepic_t *pic;
437
438         crc = CRC_Block((unsigned char *)picname, strlen(picname));
439         hashkey = ((crc >> 8) ^ crc) % CACHEPICHASHSIZE;
440         for (pic = cachepichash[hashkey];pic;pic = pic->chain)
441                 if (!strcmp (picname, pic->name))
442                         break;
443
444         if (pic)
445         {
446                 if (pic->tex && pic->width == width && pic->height == height)
447                 {
448                         R_UpdateTexture(pic->tex, pixels, 0, 0, width, height);
449                         return pic;
450                 }
451         }
452         else
453         {
454                 if (pic == NULL)
455                 {
456                         if (numcachepics == MAX_CACHED_PICS)
457                         {
458                                 Con_Printf ("Draw_NewPic: numcachepics == MAX_CACHED_PICS\n");
459                                 // FIXME: support NULL in callers?
460                                 return cachepics; // return the first one
461                         }
462                         pic = cachepics + (numcachepics++);
463                         strlcpy (pic->name, picname, sizeof(pic->name));
464                         // link into list
465                         pic->chain = cachepichash[hashkey];
466                         cachepichash[hashkey] = pic;
467                 }
468         }
469
470         pic->width = width;
471         pic->height = height;
472         if (pic->tex)
473                 R_FreeTexture(pic->tex);
474         pic->tex = R_LoadTexture2D(drawtexturepool, picname, width, height, pixels, TEXTYPE_RGBA, alpha ? TEXF_ALPHA : 0, NULL);
475         return pic;
476 }
477
478 void Draw_FreePic(const char *picname)
479 {
480         int crc;
481         int hashkey;
482         cachepic_t *pic;
483         // this doesn't really free the pic, but does free it's texture
484         crc = CRC_Block((unsigned char *)picname, strlen(picname));
485         hashkey = ((crc >> 8) ^ crc) % CACHEPICHASHSIZE;
486         for (pic = cachepichash[hashkey];pic;pic = pic->chain)
487         {
488                 if (!strcmp (picname, pic->name) && pic->tex)
489                 {
490                         R_FreeTexture(pic->tex);
491                         pic->width = 0;
492                         pic->height = 0;
493                         return;
494                 }
495         }
496 }
497
498 /*
499 ===============
500 Draw_Init
501 ===============
502 */
503 static void gl_draw_start(void)
504 {
505         int i;
506         drawtexturepool = R_AllocTexturePool();
507
508         numcachepics = 0;
509         memset(cachepichash, 0, sizeof(cachepichash));
510
511         char_texture = Draw_CachePic("gfx/conchars", true)->tex;
512         for (i = 1;i <= NUMCROSSHAIRS;i++)
513                 r_crosshairs[i] = Draw_CachePic(va("gfx/crosshair%i", i), true);
514
515         // draw the loading screen so people have something to see in the newly opened window
516         SCR_UpdateLoadingScreen(true);
517 }
518
519 static void gl_draw_shutdown(void)
520 {
521         R_FreeTexturePool(&drawtexturepool);
522
523         numcachepics = 0;
524         memset(cachepichash, 0, sizeof(cachepichash));
525 }
526
527 static void gl_draw_newmap(void)
528 {
529 }
530
531 void GL_Draw_Init (void)
532 {
533         Cvar_RegisterVariable(&r_textshadow);
534         R_RegisterModule("GL_Draw", gl_draw_start, gl_draw_shutdown, gl_draw_newmap);
535 }
536
537 static void _DrawQ_Setup(void)
538 {
539         if (r_refdef.draw2dstage)
540                 return;
541         r_refdef.draw2dstage = true;
542         CHECKGLERROR
543         qglViewport(r_view.x, vid.height - (r_view.y + r_view.height), r_view.width, r_view.height);CHECKGLERROR
544         GL_ColorMask(r_view.colormask[0], r_view.colormask[1], r_view.colormask[2], 1);
545         GL_SetupView_Mode_Ortho(0, 0, vid_conwidth.integer, vid_conheight.integer, -10, 100);
546         qglDepthFunc(GL_LEQUAL);CHECKGLERROR
547         qglDisable(GL_POLYGON_OFFSET_FILL);CHECKGLERROR
548         GL_CullFace(GL_FRONT); // quake is backwards, this culls back faces
549         R_Mesh_Matrix(&identitymatrix);
550
551         GL_DepthMask(true);
552         GL_DepthRange(0, 1);
553         GL_DepthTest(false);
554         GL_Color(1,1,1,1);
555         GL_AlphaTest(false);
556         GL_BlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
557
558         if (gl_support_fragment_shader)
559         {
560                 qglUseProgramObjectARB(0);CHECKGLERROR
561         }
562 }
563
564 static void _DrawQ_ProcessDrawFlag(int flags)
565 {
566         _DrawQ_Setup();
567         CHECKGLERROR
568         if(flags == DRAWFLAG_ADDITIVE)
569                 GL_BlendFunc(GL_SRC_ALPHA, GL_ONE);
570         else if(flags == DRAWFLAG_MODULATE)
571                 GL_BlendFunc(GL_DST_COLOR, GL_ZERO);
572         else if(flags == DRAWFLAG_2XMODULATE)
573                 GL_BlendFunc(GL_DST_COLOR,GL_SRC_COLOR);
574         else
575                 GL_BlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
576 }
577
578 void DrawQ_Pic(float x, float y, cachepic_t *pic, float width, float height, float red, float green, float blue, float alpha, int flags)
579 {
580         DrawQ_SuperPic(x,y,pic,width,height,0,0,red,green,blue,alpha,1,0,red,green,blue,alpha,0,1,red,green,blue,alpha,1,1,red,green,blue,alpha,flags);
581 }
582
583 // color tag printing
584 static vec4_t string_colors[] =
585 {
586         // Quake3 colors
587         // LordHavoc: why on earth is cyan before magenta in Quake3?
588         // LordHavoc: note: Doom3 uses white for [0] and [7]
589         {0.0, 0.0, 0.0, 1.0}, // black
590         {1.0, 0.0, 0.0, 1.0}, // red
591         {0.0, 1.0, 0.0, 1.0}, // green
592         {1.0, 1.0, 0.0, 1.0}, // yellow
593         {0.0, 0.0, 1.0, 1.0}, // blue
594         {0.0, 1.0, 1.0, 1.0}, // cyan
595         {1.0, 0.0, 1.0, 1.0}, // magenta
596         {1.0, 1.0, 1.0, 1.0}, // white
597         // [515]'s BX_COLOREDTEXT extension
598         {1.0, 1.0, 1.0, 0.5}, // half transparent
599         {0.5, 0.5, 0.5, 1.0}  // half brightness
600         // Black's color table
601         //{1.0, 1.0, 1.0, 1.0},
602         //{1.0, 0.0, 0.0, 1.0},
603         //{0.0, 1.0, 0.0, 1.0},
604         //{0.0, 0.0, 1.0, 1.0},
605         //{1.0, 1.0, 0.0, 1.0},
606         //{0.0, 1.0, 1.0, 1.0},
607         //{1.0, 0.0, 1.0, 1.0},
608         //{0.1, 0.1, 0.1, 1.0}
609 };
610
611 #define STRING_COLORS_COUNT     (sizeof(string_colors) / sizeof(vec4_t))
612
613 static void DrawQ_GetTextColor(float color[4], int colorindex, float r, float g, float b, float a, qboolean shadow)
614 {
615         Vector4Copy(string_colors[colorindex], color);
616         Vector4Set(color, color[0] * r, color[1] * g, color[2] * b, color[3] * a);
617         if (shadow)
618         {
619                 float shadowalpha = color[0]+color[1]+color[2] * 0.8;
620                 Vector4Set(color, 0, 0, 0, color[3] * bound(0, shadowalpha, 1));
621         }
622 }
623
624 float DrawQ_String(float startx, float starty, const char *text, int maxlen, float w, float h, float basered, float basegreen, float baseblue, float basealpha, int flags, int *outcolor, qboolean ignorecolorcodes)
625 {
626         int i, num, shadow, colorindex;
627         float x, y, s, t, u, v;
628         float *av, *at, *ac;
629         float color[4];
630         int batchcount;
631         float vertex3f[QUADELEMENTS_MAXQUADS*4*3];
632         float texcoord2f[QUADELEMENTS_MAXQUADS*4*2];
633         float color4f[QUADELEMENTS_MAXQUADS*4*4];
634
635         if (maxlen < 1)
636                 maxlen = 1<<30;
637
638         _DrawQ_ProcessDrawFlag(flags);
639
640         R_Mesh_ColorPointer(color4f, 0, 0);
641         R_Mesh_ResetTextureState();
642         R_Mesh_TexBind(0, R_GetTexture(char_texture));
643         R_Mesh_TexCoordPointer(0, 2, texcoord2f, 0, 0);
644         R_Mesh_VertexPointer(vertex3f, 0, 0);
645
646         ac = color4f;
647         at = texcoord2f;
648         av = vertex3f;
649         batchcount = 0;
650
651         for (shadow = r_textshadow.value != 0;shadow >= 0;shadow--)
652         {
653                 if (!outcolor || *outcolor == -1)
654                         colorindex = STRING_COLOR_DEFAULT;
655                 else
656                         colorindex = *outcolor;
657                 DrawQ_GetTextColor(color, colorindex, basered, basegreen, baseblue, basealpha, shadow);
658
659                 x = startx;
660                 y = starty;
661                 if (shadow)
662                 {
663                         x += r_textshadow.value;
664                         y += r_textshadow.value;
665                 }
666                 // because this loop increments x before it draws, we must bias x first
667                 x -= w;
668                 for (i = 0;i < maxlen && text[i];)
669                 {
670                         if (text[i] == STRING_COLOR_TAG && !ignorecolorcodes && i + 1 < maxlen)
671                         {
672                                 if (text[i+1] == STRING_COLOR_TAG)
673                                         i++;
674                                 else if (text[i+1] >= '0' && text[i+1] <= '9')
675                                 {
676                                         colorindex = text[i+1] - '0';
677                                         DrawQ_GetTextColor(color, colorindex, basered, basegreen, baseblue, basealpha, shadow);
678                                         i += 2;
679                                         continue;
680                                 }
681                         }
682                         num = text[i++];
683                         x += w;
684                         if (num == ' ')
685                                 continue;
686                         s = (num & 15)*0.0625f + (0.5f / 256.0f);
687                         t = (num >> 4)*0.0625f + (0.5f / 256.0f);
688                         u = 0.0625f - (1.0f / 256.0f);
689                         v = 0.0625f - (1.0f / 256.0f);
690                         ac[ 0] = color[0];ac[ 1] = color[1];ac[ 2] = color[2];ac[ 3] = color[3];
691                         ac[ 4] = color[0];ac[ 5] = color[1];ac[ 6] = color[2];ac[ 7] = color[3];
692                         ac[ 8] = color[0];ac[ 9] = color[1];ac[10] = color[2];ac[11] = color[3];
693                         ac[12] = color[0];ac[13] = color[1];ac[14] = color[2];ac[15] = color[3];
694                         at[ 0] = s  ;at[ 1] = t  ;
695                         at[ 2] = s+u;at[ 3] = t  ;
696                         at[ 4] = s+u;at[ 5] = t+v;
697                         at[ 6] = s  ;at[ 7] = t+v;
698                         av[ 0] = x  ;av[ 1] = y  ;av[ 2] = 10;
699                         av[ 3] = x+w;av[ 4] = y  ;av[ 5] = 10;
700                         av[ 6] = x+w;av[ 7] = y+h;av[ 8] = 10;
701                         av[ 9] = x  ;av[10] = y+h;av[11] = 10;
702                         ac += 16;
703                         at += 8;
704                         av += 12;
705                         batchcount++;
706                         if (batchcount >= QUADELEMENTS_MAXQUADS)
707                         {
708                                 if (basealpha >= (1.0f / 255.0f))
709                                 {
710                                         GL_LockArrays(0, batchcount * 4);
711                                         R_Mesh_Draw(0, batchcount * 4, batchcount * 2, quadelements, 0, 0);
712                                         GL_LockArrays(0, 0);
713                                 }
714                                 batchcount = 0;
715                                 ac = color4f;
716                                 at = texcoord2f;
717                                 av = vertex3f;
718                         }
719                 }
720         }
721         if (batchcount > 0)
722         {
723                 if (basealpha >= (1.0f / 255.0f))
724                 {
725                         GL_LockArrays(0, batchcount * 4);
726                         R_Mesh_Draw(0, batchcount * 4, batchcount * 2, quadelements, 0, 0);
727                         GL_LockArrays(0, 0);
728                 }
729         }
730         // note: this relies on the proper text (not shadow) being drawn last
731         return x;
732 }
733
734 #if 0
735 // not used
736 static int DrawQ_BuildColoredText(char *output2c, size_t maxoutchars, const char *text, int maxreadchars, qboolean ignorecolorcodes, int *outcolor)
737 {
738         int color, numchars = 0;
739         char *outputend2c = output2c + maxoutchars - 2;
740         if (!outcolor || *outcolor == -1)
741                 color = STRING_COLOR_DEFAULT;
742         else
743                 color = *outcolor;
744         if (!maxreadchars)
745                 maxreadchars = 1<<30;
746         textend = text + maxreadchars;
747         while (text != textend && *text)
748         {
749                 if (*text == STRING_COLOR_TAG && !ignorecolorcodes && text + 1 != textend)
750                 {
751                         if (text[1] == STRING_COLOR_TAG)
752                                 text++;
753                         else if (text[1] >= '0' && text[1] <= '9')
754                         {
755                                 color = text[1] - '0';
756                                 text += 2;
757                                 continue;
758                         }
759                 }
760                 if (output2c >= outputend2c)
761                         break;
762                 *output2c++ = *text++;
763                 *output2c++ = color;
764                 numchars++;
765         }
766         output2c[0] = output2c[1] = 0;
767         if (outcolor)
768                 *outcolor = color;
769         return numchars;
770 }
771 #endif
772
773 void DrawQ_SuperPic(float x, float y, cachepic_t *pic, float width, float height, float s1, float t1, float r1, float g1, float b1, float a1, float s2, float t2, float r2, float g2, float b2, float a2, float s3, float t3, float r3, float g3, float b3, float a3, float s4, float t4, float r4, float g4, float b4, float a4, int flags)
774 {
775         float floats[36];
776
777         _DrawQ_ProcessDrawFlag(flags);
778
779         R_Mesh_VertexPointer(floats, 0, 0);
780         R_Mesh_ColorPointer(floats + 20, 0, 0);
781         R_Mesh_ResetTextureState();
782         if (pic)
783         {
784                 if (width == 0)
785                         width = pic->width;
786                 if (height == 0)
787                         height = pic->height;
788                 R_Mesh_TexBind(0, R_GetTexture(pic->tex));
789                 R_Mesh_TexCoordPointer(0, 2, floats + 12, 0, 0);
790                 floats[12] = s1;floats[13] = t1;
791                 floats[14] = s2;floats[15] = t2;
792                 floats[16] = s4;floats[17] = t4;
793                 floats[18] = s3;floats[19] = t3;
794         }
795
796         floats[2] = floats[5] = floats[8] = floats[11] = 0;
797         floats[0] = floats[9] = x;
798         floats[1] = floats[4] = y;
799         floats[3] = floats[6] = x + width;
800         floats[7] = floats[10] = y + height;
801         floats[20] = r1;floats[21] = g1;floats[22] = b1;floats[23] = a1;
802         floats[24] = r2;floats[25] = g2;floats[26] = b2;floats[27] = a2;
803         floats[28] = r4;floats[29] = g4;floats[30] = b4;floats[31] = a4;
804         floats[32] = r3;floats[33] = g3;floats[34] = b3;floats[35] = a3;
805
806         R_Mesh_Draw(0, 4, 2, polygonelements, 0, 0);
807 }
808
809 void DrawQ_Mesh (drawqueuemesh_t *mesh, int flags)
810 {
811         _DrawQ_ProcessDrawFlag(flags);
812
813         R_Mesh_VertexPointer(mesh->data_vertex3f, 0, 0);
814         R_Mesh_ColorPointer(mesh->data_color4f, 0, 0);
815         R_Mesh_ResetTextureState();
816         R_Mesh_TexBind(0, R_GetTexture(mesh->texture));
817         R_Mesh_TexCoordPointer(0, 2, mesh->data_texcoord2f, 0, 0);
818
819         GL_LockArrays(0, mesh->num_vertices);
820         R_Mesh_Draw(0, mesh->num_vertices, mesh->num_triangles, mesh->data_element3i, 0, 0);
821         GL_LockArrays(0, 0);
822 }
823
824 void DrawQ_LineLoop (drawqueuemesh_t *mesh, int flags)
825 {
826         int num;
827
828         _DrawQ_ProcessDrawFlag(flags);
829
830         GL_Color(1,1,1,1);
831         CHECKGLERROR
832         qglBegin(GL_LINE_LOOP);
833         for (num = 0;num < mesh->num_vertices;num++)
834         {
835                 if (mesh->data_color4f)
836                         GL_Color(mesh->data_color4f[num*4+0], mesh->data_color4f[num*4+1], mesh->data_color4f[num*4+2], mesh->data_color4f[num*4+3]);
837                 qglVertex2f(mesh->data_vertex3f[num*3+0], mesh->data_vertex3f[num*3+1]);
838         }
839         qglEnd();
840         CHECKGLERROR
841 }
842
843 //[515]: this is old, delete
844 void DrawQ_Line (float width, float x1, float y1, float x2, float y2, float r, float g, float b, float alpha, int flags)
845 {
846         _DrawQ_ProcessDrawFlag(flags);
847
848         CHECKGLERROR
849         qglLineWidth(width);CHECKGLERROR
850
851         GL_Color(r,g,b,alpha);
852         CHECKGLERROR
853         qglBegin(GL_LINES);
854         qglVertex2f(x1, y1);
855         qglVertex2f(x2, y2);
856         qglEnd();
857         CHECKGLERROR
858 }
859
860 void DrawQ_SetClipArea(float x, float y, float width, float height)
861 {
862         _DrawQ_Setup();
863
864         // We have to convert the con coords into real coords
865         // OGL uses top to bottom
866         GL_Scissor((int)(x * ((float)vid.width / vid_conwidth.integer)), (int)(y * ((float) vid.height / vid_conheight.integer)), (int)(width * ((float)vid.width / vid_conwidth.integer)), (int)(height * ((float)vid.height / vid_conheight.integer)));
867
868         GL_ScissorTest(true);
869 }
870
871 void DrawQ_ResetClipArea(void)
872 {
873         _DrawQ_Setup();
874         GL_ScissorTest(false);
875 }
876
877 void DrawQ_Finish(void)
878 {
879         r_refdef.draw2dstage = false;
880 }
881
882 static float blendvertex3f[9] = {-5000, -5000, 10, 10000, -5000, 10, -5000, 10000, 10};
883 void R_DrawGamma(void)
884 {
885         float c[4];
886         if (!vid_usinghwgamma)
887         {
888                 // all the blends ignore depth
889                 R_Mesh_VertexPointer(blendvertex3f, 0, 0);
890                 R_Mesh_ColorPointer(NULL, 0, 0);
891                 R_Mesh_ResetTextureState();
892                 GL_DepthMask(true);
893                 GL_DepthRange(0, 1);
894                 GL_DepthTest(false);
895                 if (v_color_enable.integer)
896                 {
897                         c[0] = v_color_white_r.value;
898                         c[1] = v_color_white_g.value;
899                         c[2] = v_color_white_b.value;
900                 }
901                 else
902                         c[0] = c[1] = c[2] = v_contrast.value;
903                 if (c[0] >= 1.01f || c[1] >= 1.01f || c[2] >= 1.01f)
904                 {
905                         GL_BlendFunc(GL_DST_COLOR, GL_ONE);
906                         while (c[0] >= 1.01f || c[1] >= 1.01f || c[2] >= 1.01f)
907                         {
908                                 GL_Color(bound(0, c[0] - 1, 1), bound(0, c[1] - 1, 1), bound(0, c[2] - 1, 1), 1);
909                                 R_Mesh_Draw(0, 3, 1, polygonelements, 0, 0);
910                                 VectorScale(c, 0.5, c);
911                         }
912                 }
913                 if (v_color_enable.integer)
914                 {
915                         c[0] = v_color_black_r.value;
916                         c[1] = v_color_black_g.value;
917                         c[2] = v_color_black_b.value;
918                 }
919                 else
920                         c[0] = c[1] = c[2] = v_brightness.value;
921                 if (c[0] >= 0.01f || c[1] >= 0.01f || c[2] >= 0.01f)
922                 {
923                         GL_BlendFunc(GL_ONE, GL_ONE);
924                         GL_Color(c[0], c[1], c[2], 1);
925                         R_Mesh_Draw(0, 3, 1, polygonelements, 0, 0);
926                 }
927         }
928 }
929