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 = {0, "r_textshadow", "0", "draws a shadow on all text to improve readability"};
  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
 516 static void gl_draw_shutdown(void)
 517 {
 518         R_FreeTexturePool(&drawtexturepool);
 519
 520         numcachepics = 0;
 521         memset(cachepichash, 0, sizeof(cachepichash));
 522 }
 523
 524 static void gl_draw_newmap(void)
 525 {
 526 }
 527
 528 void GL_Draw_Init (void)
 529 {
 530         Cvar_RegisterVariable(&r_textshadow);
 531         R_RegisterModule("GL_Draw", gl_draw_start, gl_draw_shutdown, gl_draw_newmap);
 532 }
 533
 534 static void _DrawQ_Setup(void)
 535 {
 536         if (r_refdef.draw2dstage)
 537                 return;
 538         r_refdef.draw2dstage = true;
 539         CHECKGLERROR
 540         qglViewport(r_view.x, vid.height - (r_view.y + r_view.height), r_view.width, r_view.height);CHECKGLERROR
 541         GL_ColorMask(r_view.colormask[0], r_view.colormask[1], r_view.colormask[2], 1);
 542         GL_SetupView_Mode_Ortho(0, 0, vid_conwidth.integer, vid_conheight.integer, -10, 100);
 543         qglDepthFunc(GL_LEQUAL);CHECKGLERROR
 544         qglDisable(GL_POLYGON_OFFSET_FILL);CHECKGLERROR
 545         GL_CullFace(GL_FRONT); // quake is backwards, this culls back faces
 546         R_Mesh_Matrix(&identitymatrix);
 547
 548         GL_DepthMask(true);
 549         GL_DepthTest(false);
 550         GL_Color(1,1,1,1);
 551         GL_AlphaTest(false);
 552         GL_BlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
 553
 554         if (gl_support_fragment_shader)
 555         {
 556                 qglUseProgramObjectARB(0);CHECKGLERROR
 557         }
 558 }
 559
 560 static void _DrawQ_ProcessDrawFlag(int flags)
 561 {
 562         _DrawQ_Setup();
 563         CHECKGLERROR
 564         if(flags == DRAWFLAG_ADDITIVE)
 565                 GL_BlendFunc(GL_SRC_ALPHA, GL_ONE);
 566         else if(flags == DRAWFLAG_MODULATE)
 567                 GL_BlendFunc(GL_DST_COLOR, GL_ZERO);
 568         else if(flags == DRAWFLAG_2XMODULATE)
 569                 GL_BlendFunc(GL_DST_COLOR,GL_SRC_COLOR);
 570         else
 571                 GL_BlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
 572 }
 573
 574 void DrawQ_Pic(float x, float y, cachepic_t *pic, float width, float height, float red, float green, float blue, float alpha, int flags)
 575 {
 576         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);
 577 }
 578
 579 void DrawQ_String_Real(float x, float y, const char *string, int maxlen, float w, float h, float red, float green, float blue, float alpha, int flags)
 580 {
 581         int i, num;
 582         float *av, *at;
 583         int batchcount;
 584         float vertex3f[QUADELEMENTS_MAXQUADS*4*3];
 585         float texcoord2f[QUADELEMENTS_MAXQUADS*4*2];
 586
 587         if (alpha < (1.0f / 255.0f))
 588                 return;
 589
 590         _DrawQ_ProcessDrawFlag(flags);
 591
 592         GL_Color(red, green, blue, alpha);
 593
 594         R_Mesh_VertexPointer(vertex3f);
 595         R_Mesh_ColorPointer(NULL);
 596         R_Mesh_ResetTextureState();
 597         R_Mesh_TexBind(0, R_GetTexture(char_texture));
 598         R_Mesh_TexCoordPointer(0, 2, texcoord2f);
 599
 600         at = texcoord2f;
 601         av = vertex3f;
 602         batchcount = 0;
 603
 604         if (maxlen < 1)
 605                 maxlen = 9999;
 606         for (i = 0;i < maxlen && x < vid_conwidth.integer && (num = string[i]);i++, x += w)
 607         {
 608                 float s, t, u, v;
 609                 if (num == ' ')
 610                         continue;
 611                 s = (num & 15)*0.0625f + (0.5f / 256.0f);
 612                 t = (num >> 4)*0.0625f + (0.5f / 256.0f);
 613                 u = 0.0625f - (1.0f / 256.0f);
 614                 v = 0.0625f - (1.0f / 256.0f);
 615                 at[ 0] = s  ;at[ 1] = t  ;
 616                 at[ 2] = s+u;at[ 3] = t  ;
 617                 at[ 4] = s+u;at[ 5] = t+v;
 618                 at[ 6] = s  ;at[ 7] = t+v;
 619                 av[ 0] = x  ;av[ 1] = y  ;av[ 2] = 10;
 620                 av[ 3] = x+w;av[ 4] = y  ;av[ 5] = 10;
 621                 av[ 6] = x+w;av[ 7] = y+h;av[ 8] = 10;
 622                 av[ 9] = x  ;av[10] = y+h;av[11] = 10;
 623                 at += 8;
 624                 av += 12;
 625                 batchcount++;
 626                 if (batchcount >= QUADELEMENTS_MAXQUADS)
 627                 {
 628                         GL_LockArrays(0, batchcount * 4);
 629                         R_Mesh_Draw(0, batchcount * 4, batchcount * 2, quadelements);
 630                         GL_LockArrays(0, 0);
 631                         batchcount = 0;
 632                         at = texcoord2f;
 633                         av = vertex3f;
 634                 }
 635         }
 636         if (batchcount > 0)
 637         {
 638                 GL_LockArrays(0, batchcount * 4);
 639                 R_Mesh_Draw(0, batchcount * 4, batchcount * 2, quadelements);
 640                 GL_LockArrays(0, 0);
 641         }
 642 }
 643
 644 void DrawQ_String(float x, float y, const char *string, int maxlen, float scalex, float scaley, float red, float green, float blue, float alpha, int flags)
 645 {
 646         if (r_textshadow.integer)
 647                 DrawQ_String_Real(x+scalex*0.25,y+scaley*0.25,string,maxlen,scalex,scaley,0,0,0,alpha*0.8,flags);
 648
 649         DrawQ_String_Real(x,y,string,maxlen,scalex,scaley,red,green,blue,alpha,flags);
 650 }
 651
 652 // color tag printing
 653 static vec4_t string_colors[] =
 654 {
 655         // Quake3 colors
 656         // LordHavoc: why on earth is cyan before magenta in Quake3?
 657         // LordHavoc: note: Doom3 uses white for [0] and [7]
 658         {0.0, 0.0, 0.0, 1.0}, // black
 659         {1.0, 0.0, 0.0, 1.0}, // red
 660         {0.0, 1.0, 0.0, 1.0}, // green
 661         {1.0, 1.0, 0.0, 1.0}, // yellow
 662         {0.0, 0.0, 1.0, 1.0}, // blue
 663         {0.0, 1.0, 1.0, 1.0}, // cyan
 664         {1.0, 0.0, 1.0, 1.0}, // magenta
 665         {1.0, 1.0, 1.0, 1.0}, // white
 666         // [515]'s BX_COLOREDTEXT extension
 667         {1.0, 1.0, 1.0, 0.5}, // half transparent
 668         {0.5, 0.5, 0.5, 1.0}  // half brightness
 669         // Black's color table
 670         //{1.0, 1.0, 1.0, 1.0},
 671         //{1.0, 0.0, 0.0, 1.0},
 672         //{0.0, 1.0, 0.0, 1.0},
 673         //{0.0, 0.0, 1.0, 1.0},
 674         //{1.0, 1.0, 0.0, 1.0},
 675         //{0.0, 1.0, 1.0, 1.0},
 676         //{1.0, 0.0, 1.0, 1.0},
 677         //{0.1, 0.1, 0.1, 1.0}
 678 };
 679
 680 #define STRING_COLORS_COUNT     (sizeof(string_colors) / sizeof(vec4_t))
 681
 682 // color is read and changed in the end
 683 void DrawQ_ColoredString( float x, float y, const char *text, int maxlen, float scalex, float scaley, float basered, float basegreen, float baseblue, float basealpha, int flags, int *outcolor )
 684 {
 685         vec_t *color;
 686         int len;
 687         int colorindex;
 688         const char *start, *current;
 689
 690         if( !outcolor || *outcolor == -1 ) {
 691                 colorindex = STRING_COLOR_DEFAULT;
 692         } else {
 693                 colorindex = *outcolor;
 694         }
 695         color = string_colors[colorindex];
 696
 697         if( maxlen < 1)
 698                 len = (int)strlen( text );
 699         else
 700                 len = min( maxlen, (int) strlen( text ) );
 701
 702         start = current = text;
 703         while( len > 0 ) {
 704                 // check for color control char
 705                 if( *current == STRING_COLOR_TAG ) {
 706                         // get next char
 707                         current++;
 708                         len--;
 709                         if( len == 0 ) {
 710                                 break;
 711                         }
 712                         // display the tag char?
 713                         if( *current == STRING_COLOR_TAG ) {
 714                                 // only display one of the two
 715                                 start = current;
 716                                 // get the next char
 717                                 current++;
 718                                 len--;
 719                         } else if( '0' <= *current && *current <= '9' ) {
 720                                 colorindex = 0;
 721                                 do {
 722                                         colorindex = colorindex * 10 + (*current - '0');
 723                                         // only read as long as it makes a valid index
 724                                         if( colorindex >= (int)STRING_COLORS_COUNT ) {
 725                                                 // undo the last operation
 726                                                 colorindex /= 10;
 727                                                 break;
 728                                         }
 729                                         current++;
 730                                         len--;
 731                                 } while( len > 0 && '0' <= *current && *current <= '9' );
 732                                 // set the color
 733                                 color = string_colors[colorindex];
 734                                 // we jump over the color tag
 735                                 start = current;
 736                         }
 737                 }
 738                 // go on and read normal text in until the next control char
 739                 while( len > 0 && *current != STRING_COLOR_TAG ) {
 740                         current++;
 741                         len--;
 742                 }
 743                 // display the text
 744                 if( start != current ) {
 745                         // draw the string
 746                         DrawQ_String( x, y, start, current - start, scalex, scaley, basered * color[0], basegreen * color[1], baseblue * color[2], basealpha * color[3], flags );
 747                         // update x to be at the new start position
 748                         x += (current - start) * scalex;
 749                         // set start accordingly
 750                         start = current;
 751                 }
 752         }
 753
 754         // return the last colorindex
 755         if( outcolor ) {
 756                 *outcolor = colorindex;
 757         }
 758 }
 759
 760 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)
 761 {
 762         float floats[36];
 763
 764         _DrawQ_ProcessDrawFlag(flags);
 765
 766         R_Mesh_VertexPointer(floats);
 767         R_Mesh_ColorPointer(floats + 20);
 768         R_Mesh_ResetTextureState();
 769         if (pic)
 770         {
 771                 if (width == 0)
 772                         width = pic->width;
 773                 if (height == 0)
 774                         height = pic->height;
 775                 R_Mesh_TexBind(0, R_GetTexture(pic->tex));
 776                 R_Mesh_TexCoordPointer(0, 2, floats + 12);
 777                 floats[12] = s1;floats[13] = t1;
 778                 floats[14] = s2;floats[15] = t2;
 779                 floats[16] = s4;floats[17] = t4;
 780                 floats[18] = s3;floats[19] = t3;
 781         }
 782
 783         floats[2] = floats[5] = floats[8] = floats[11] = 0;
 784         floats[0] = floats[9] = x;
 785         floats[1] = floats[4] = y;
 786         floats[3] = floats[6] = x + width;
 787         floats[7] = floats[10] = y + height;
 788         floats[20] = r1;floats[21] = g1;floats[22] = b1;floats[23] = a1;
 789         floats[24] = r2;floats[25] = g2;floats[26] = b2;floats[27] = a2;
 790         floats[28] = r4;floats[29] = g4;floats[30] = b4;floats[31] = a4;
 791         floats[32] = r3;floats[33] = g3;floats[34] = b3;floats[35] = a3;
 792
 793         R_Mesh_Draw(0, 4, 2, polygonelements);
 794 }
 795
 796 void DrawQ_Mesh (drawqueuemesh_t *mesh, int flags)
 797 {
 798         _DrawQ_ProcessDrawFlag(flags);
 799
 800         R_Mesh_VertexPointer(mesh->data_vertex3f);
 801         R_Mesh_ColorPointer(mesh->data_color4f);
 802         R_Mesh_ResetTextureState();
 803         R_Mesh_TexBind(0, R_GetTexture(mesh->texture));
 804         R_Mesh_TexCoordPointer(0, 2, mesh->data_texcoord2f);
 805
 806         GL_LockArrays(0, mesh->num_vertices);
 807         R_Mesh_Draw(0, mesh->num_vertices, mesh->num_triangles, mesh->data_element3i);
 808         GL_LockArrays(0, 0);
 809 }
 810
 811 void DrawQ_LineLoop (drawqueuemesh_t *mesh, int flags)
 812 {
 813         int num;
 814
 815         _DrawQ_ProcessDrawFlag(flags);
 816
 817         GL_Color(1,1,1,1);
 818         CHECKGLERROR
 819         qglBegin(GL_LINE_LOOP);
 820         for (num = 0;num < mesh->num_vertices;num++)
 821         {
 822                 if (mesh->data_color4f)
 823                         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]);
 824                 qglVertex2f(mesh->data_vertex3f[num*3+0], mesh->data_vertex3f[num*3+1]);
 825         }
 826         qglEnd();
 827         CHECKGLERROR
 828 }
 829
 830 //[515]: this is old, delete
 831 void DrawQ_Line (float width, float x1, float y1, float x2, float y2, float r, float g, float b, float alpha, int flags)
 832 {
 833         _DrawQ_ProcessDrawFlag(flags);
 834
 835         CHECKGLERROR
 836         qglLineWidth(width);CHECKGLERROR
 837
 838         GL_Color(r,g,b,alpha);
 839         CHECKGLERROR
 840         qglBegin(GL_LINES);
 841         qglVertex2f(x1, y1);
 842         qglVertex2f(x2, y2);
 843         qglEnd();
 844         CHECKGLERROR
 845 }
 846
 847 void DrawQ_SetClipArea(float x, float y, float width, float height)
 848 {
 849         _DrawQ_Setup();
 850
 851         // We have to convert the con coords into real coords
 852         // OGL uses top to bottom
 853         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)));
 854
 855         GL_ScissorTest(true);
 856 }
 857
 858 void DrawQ_ResetClipArea(void)
 859 {
 860         _DrawQ_Setup();
 861         GL_ScissorTest(false);
 862 }
 863
 864 void DrawQ_Finish(void)
 865 {
 866         r_refdef.draw2dstage = false;
 867 }
 868
 869 static float blendvertex3f[9] = {-5000, -5000, 10, 10000, -5000, 10, -5000, 10000, 10};
 870 void R_DrawGamma(void)
 871 {
 872         float c[4];
 873         if (!vid_usinghwgamma)
 874         {
 875                 // all the blends ignore depth
 876                 R_Mesh_VertexPointer(blendvertex3f);
 877                 R_Mesh_ColorPointer(NULL);
 878                 R_Mesh_ResetTextureState();
 879                 GL_DepthMask(true);
 880                 GL_DepthTest(false);
 881                 if (v_color_enable.integer)
 882                 {
 883                         c[0] = v_color_white_r.value;
 884                         c[1] = v_color_white_g.value;
 885                         c[2] = v_color_white_b.value;
 886                 }
 887                 else
 888                         c[0] = c[1] = c[2] = v_contrast.value;
 889                 if (c[0] >= 1.01f || c[1] >= 1.01f || c[2] >= 1.01f)
 890                 {
 891                         GL_BlendFunc(GL_DST_COLOR, GL_ONE);
 892                         while (c[0] >= 1.01f || c[1] >= 1.01f || c[2] >= 1.01f)
 893                         {
 894                                 GL_Color(bound(0, c[0] - 1, 1), bound(0, c[1] - 1, 1), bound(0, c[2] - 1, 1), 1);
 895                                 R_Mesh_Draw(0, 3, 1, polygonelements);
 896                                 VectorScale(c, 0.5, c);
 897                         }
 898                 }
 899                 if (v_color_enable.integer)
 900                 {
 901                         c[0] = v_color_black_r.value;
 902                         c[1] = v_color_black_g.value;
 903                         c[2] = v_color_black_b.value;
 904                 }
 905                 else
 906                         c[0] = c[1] = c[2] = v_brightness.value;
 907                 if (c[0] >= 0.01f || c[1] >= 0.01f || c[2] >= 0.01f)
 908                 {
 909                         GL_BlendFunc(GL_ONE, GL_ONE);
 910                         GL_Color(c[0], c[1], c[2], 1);
 911                         R_Mesh_Draw(0, 3, 1, polygonelements);
 912                 }
 913         }
 914 }
 915