2 Copyright (C) 1996-1997 Id Software, Inc.
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.
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.
13 See the GNU General Public License for more details.
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.
28 static rtexture_t *char_texture;
30 //=============================================================================
31 /* Support Routines */
33 #define FONT_FILESIZE 13468
34 #define MAX_CACHED_PICS 1024
35 #define CACHEPICHASHSIZE 256
36 static cachepic_t *cachepichash[CACHEPICHASHSIZE];
37 static cachepic_t cachepics[MAX_CACHED_PICS];
38 static int numcachepics;
40 static rtexturepool_t *drawtexturepool;
42 static unsigned char concharimage[FONT_FILESIZE] =
47 static rtexture_t *draw_generateconchars(void)
50 unsigned char buffer[65536][4], *data = NULL;
53 data = LoadTGA (concharimage, FONT_FILESIZE, 256, 256);
55 for (i = 0;i < 8192;i++)
57 random = lhrandom (0.0,1.0);
58 buffer[i][0] = 83 + (unsigned char)(random * 64);
59 buffer[i][1] = 71 + (unsigned char)(random * 32);
60 buffer[i][2] = 23 + (unsigned char)(random * 16);
61 buffer[i][3] = data[i*4+0];
64 for (i = 8192;i < 32768;i++)
66 random = lhrandom (0.0,1.0);
67 buffer[i][0] = 95 + (unsigned char)(random * 64);
68 buffer[i][1] = 95 + (unsigned char)(random * 64);
69 buffer[i][2] = 95 + (unsigned char)(random * 64);
70 buffer[i][3] = data[i*4+0];
73 for (i = 32768;i < 40960;i++)
75 random = lhrandom (0.0,1.0);
76 buffer[i][0] = 83 + (unsigned char)(random * 64);
77 buffer[i][1] = 71 + (unsigned char)(random * 32);
78 buffer[i][2] = 23 + (unsigned char)(random * 16);
79 buffer[i][3] = data[i*4+0];
82 for (i = 40960;i < 65536;i++)
84 random = lhrandom (0.0,1.0);
85 buffer[i][0] = 96 + (unsigned char)(random * 64);
86 buffer[i][1] = 43 + (unsigned char)(random * 32);
87 buffer[i][2] = 27 + (unsigned char)(random * 32);
88 buffer[i][3] = data[i*4+0];
92 Image_WriteTGARGBA ("gfx/generated_conchars.tga", 256, 256, &buffer[0][0]);
96 return R_LoadTexture2D(drawtexturepool, "conchars", 256, 256, &buffer[0][0], TEXTYPE_RGBA, TEXF_ALPHA | TEXF_PRECACHE, NULL);
99 static char *pointerimage =
118 static rtexture_t *draw_generatemousepointer(void)
121 unsigned char buffer[256][4];
122 for (i = 0;i < 256;i++)
124 if (pointerimage[i] == '.')
133 buffer[i][0] = (pointerimage[i] - '0') * 16;
134 buffer[i][1] = (pointerimage[i] - '0') * 16;
135 buffer[i][2] = (pointerimage[i] - '0') * 16;
139 return R_LoadTexture2D(drawtexturepool, "mousepointer", 16, 16, &buffer[0][0], TEXTYPE_RGBA, TEXF_ALPHA | TEXF_PRECACHE, NULL);
142 // must match NUMCROSSHAIRS in r_crosshairs.c
143 #define NUMCROSSHAIRS 6
145 static char *crosshairtexdata[NUMCROSSHAIRS] =
250 static rtexture_t *draw_generatecrosshair(int num)
254 unsigned char data[16*16][4];
255 in = crosshairtexdata[num];
256 for (i = 0;i < 16*16;i++)
270 data[i][3] = (unsigned char) ((int) (in[i] - '0') * 255 / 7);
273 return R_LoadTexture2D(drawtexturepool, va("crosshair%i", num), 16, 16, &data[0][0], TEXTYPE_RGBA, TEXF_ALPHA | TEXF_PRECACHE, NULL);
276 static rtexture_t *draw_generateditherpattern(void)
280 unsigned char data[8*8*4];
281 for (y = 0;y < 8;y++)
283 for (x = 0;x < 8;x++)
285 data[(y*8+x)*4+0] = data[(y*8+x)*4+1] = data[(y*8+x)*4+2] = ((x^y) & 4) ? 255 : 0;
286 data[(y*8+x)*4+3] = 255;
289 return R_LoadTexture2D(drawtexturepool, "ditherpattern", 8, 8, data, TEXTYPE_RGBA, TEXF_FORCENEAREST | TEXF_PRECACHE, NULL);
291 unsigned char data[16];
292 memset(data, 255, sizeof(data));
293 data[0] = data[1] = data[2] = data[12] = data[13] = data[14] = 0;
294 return R_LoadTexture2D(drawtexturepool, "ditherpattern", 2, 2, data, TEXTYPE_RGBA, TEXF_FORCENEAREST | TEXF_PRECACHE, NULL);
303 // FIXME: move this to client somehow
304 cachepic_t *Draw_CachePic (const char *path, qboolean persistent)
311 if (!strncmp(CLVIDEOPREFIX, path, sizeof(CLVIDEOPREFIX) - 1))
316 video = CL_GetVideo(path);
321 crc = CRC_Block((unsigned char *)path, strlen(path));
322 hashkey = ((crc >> 8) ^ crc) % CACHEPICHASHSIZE;
323 for (pic = cachepichash[hashkey];pic;pic = pic->chain)
324 if (!strcmp (path, pic->name))
327 if (numcachepics == MAX_CACHED_PICS)
329 Con_Printf ("Draw_CachePic: numcachepics == MAX_CACHED_PICS\n");
330 // FIXME: support NULL in callers?
331 return cachepics; // return the first one
333 pic = cachepics + (numcachepics++);
334 strlcpy (pic->name, path, sizeof(pic->name));
336 pic->chain = cachepichash[hashkey];
337 cachepichash[hashkey] = pic;
341 flags |= TEXF_PRECACHE;
342 if (!strcmp(path, "gfx/colorcontrol/ditherpattern"))
345 // load the pic from disk
346 pic->tex = loadtextureimage(drawtexturepool, path, 0, 0, false, flags);
347 if (pic->tex == NULL && !strncmp(path, "gfx/", 4))
349 // compatibility with older versions
350 pic->tex = loadtextureimage(drawtexturepool, path + 4, 0, 0, false, flags);
351 // failed to find gfx/whatever.tga or similar, try the wad
352 if (pic->tex == NULL && (p = (qpic_t *)W_GetLumpName (path + 4)))
354 if (!strcmp(path, "gfx/conchars"))
356 // conchars is a raw image and with color 0 as transparent instead of 255
357 pic->tex = R_LoadTexture2D(drawtexturepool, path, 128, 128, (unsigned char *)p, TEXTYPE_PALETTE, flags, palette_font);
360 pic->tex = R_LoadTexture2D(drawtexturepool, path, p->width, p->height, p->data, TEXTYPE_PALETTE, flags, palette_transparent);
364 if (pic->tex == NULL && !strcmp(path, "gfx/conchars"))
365 pic->tex = draw_generateconchars();
366 if (pic->tex == NULL && !strcmp(path, "ui/mousepointer"))
367 pic->tex = draw_generatemousepointer();
368 if (pic->tex == NULL && !strcmp(path, "gfx/prydoncursor001"))
369 pic->tex = draw_generatemousepointer();
370 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair1"))
371 pic->tex = draw_generatecrosshair(0);
372 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair2"))
373 pic->tex = draw_generatecrosshair(1);
374 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair3"))
375 pic->tex = draw_generatecrosshair(2);
376 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair4"))
377 pic->tex = draw_generatecrosshair(3);
378 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair5"))
379 pic->tex = draw_generatecrosshair(4);
380 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair6"))
381 pic->tex = draw_generatecrosshair(5);
382 if (pic->tex == NULL && !strcmp(path, "gfx/colorcontrol/ditherpattern"))
383 pic->tex = draw_generateditherpattern();
384 if (pic->tex == NULL)
386 Con_Printf("Draw_CachePic: failed to load %s\n", path);
387 pic->tex = r_texture_notexture;
390 pic->width = R_TextureWidth(pic->tex);
391 pic->height = R_TextureHeight(pic->tex);
395 cachepic_t *Draw_NewPic(const char *picname, int width, int height, int alpha, unsigned char *pixels)
400 crc = CRC_Block((unsigned char *)picname, strlen(picname));
401 hashkey = ((crc >> 8) ^ crc) % CACHEPICHASHSIZE;
402 for (pic = cachepichash[hashkey];pic;pic = pic->chain)
403 if (!strcmp (picname, pic->name))
408 if (pic->tex && pic->width == width && pic->height == height)
410 R_UpdateTexture(pic->tex, pixels);
418 if (numcachepics == MAX_CACHED_PICS)
420 Con_Printf ("Draw_NewPic: numcachepics == MAX_CACHED_PICS\n");
421 // FIXME: support NULL in callers?
422 return cachepics; // return the first one
424 pic = cachepics + (numcachepics++);
425 strcpy (pic->name, picname);
427 pic->chain = cachepichash[hashkey];
428 cachepichash[hashkey] = pic;
433 pic->height = height;
435 R_FreeTexture(pic->tex);
436 pic->tex = R_LoadTexture2D(drawtexturepool, picname, width, height, pixels, TEXTYPE_RGBA, alpha ? TEXF_ALPHA : 0, NULL);
440 void Draw_FreePic(const char *picname)
445 // this doesn't really free the pic, but does free it's texture
446 crc = CRC_Block((unsigned char *)picname, strlen(picname));
447 hashkey = ((crc >> 8) ^ crc) % CACHEPICHASHSIZE;
448 for (pic = cachepichash[hashkey];pic;pic = pic->chain)
450 if (!strcmp (picname, pic->name) && pic->tex)
452 R_FreeTexture(pic->tex);
465 static void gl_draw_start(void)
467 drawtexturepool = R_AllocTexturePool();
470 memset(cachepichash, 0, sizeof(cachepichash));
472 char_texture = Draw_CachePic("gfx/conchars", true)->tex;
475 static void gl_draw_shutdown(void)
477 R_FreeTexturePool(&drawtexturepool);
480 memset(cachepichash, 0, sizeof(cachepichash));
483 static void gl_draw_newmap(void)
487 void GL_Draw_Init (void)
490 memset(cachepichash, 0, sizeof(cachepichash));
492 R_RegisterModule("GL_Draw", gl_draw_start, gl_draw_shutdown, gl_draw_newmap);
495 float blendvertex3f[9] = {-5000, -5000, 10, 10000, -5000, 10, -5000, 10000, 10};
497 int quadelements[768];
498 void R_DrawQueue(void)
500 int pos, num, chartexnum, texnum, batch;
501 float x, y, w, h, s, t, u, v, *av, *at, c[4];
507 drawqueuemesh_t *mesh;
510 if (!r_render.integer)
513 if (!quadelements[1])
515 // elements for rendering a series of quads as triangles
516 for (batch = 0, pos = 0, num = 0;batch < 128;batch++, num += 4)
518 quadelements[pos++] = num;
519 quadelements[pos++] = num + 1;
520 quadelements[pos++] = num + 2;
521 quadelements[pos++] = num;
522 quadelements[pos++] = num + 2;
523 quadelements[pos++] = num + 3;
527 r_view_width = bound(0, r_refdef.width, vid.width);
528 r_view_height = bound(0, r_refdef.height, vid.height);
530 r_view_x = bound(0, r_refdef.x, vid.width - r_refdef.width);
531 r_view_y = bound(0, r_refdef.y, vid.height - r_refdef.height);
533 r_view_matrix = r_refdef.viewentitymatrix;
534 GL_ColorMask(r_refdef.colormask[0], r_refdef.colormask[1], r_refdef.colormask[2], 1);
536 qglViewport(r_view_x, vid.height - (r_view_y + r_view_height), r_view_width, r_view_height);
537 GL_SetupView_Mode_Ortho(0, 0, vid_conwidth.integer, vid_conheight.integer, -10, 100);
538 qglDepthFunc(GL_LEQUAL);
539 R_Mesh_Matrix(&r_identitymatrix);
541 chartexnum = R_GetTexture(char_texture);
543 memset(&m, 0, sizeof(m));
552 for (pos = 0;pos < r_refdef.drawqueuesize;pos += ((drawqueue_t *)(r_refdef.drawqueue + pos))->size)
554 dq = (drawqueue_t *)(r_refdef.drawqueue + pos);
557 if(dq->flags == DRAWFLAG_ADDITIVE)
558 GL_BlendFunc(GL_SRC_ALPHA, GL_ONE);
559 else if(dq->flags == DRAWFLAG_MODULATE)
560 GL_BlendFunc(GL_DST_COLOR, GL_ZERO);
561 else if(dq->flags == DRAWFLAG_2XMODULATE)
562 GL_BlendFunc(GL_DST_COLOR,GL_SRC_COLOR);
564 GL_BlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
569 c[0] = (float) ((color >> 24) & 0xFF) * (1.0f / 255.0f);
570 c[1] = (float) ((color >> 16) & 0xFF) * (1.0f / 255.0f);
571 c[2] = (float) ((color >> 8) & 0xFF) * (1.0f / 255.0f);
572 c[3] = (float) ( color & 0xFF) * (1.0f / 255.0f);
580 case DRAWQUEUE_STRING:
581 GL_Color(c[0], c[1], c[2], c[3]);
582 str = (char *)(dq + 1);
584 m.pointer_vertex = varray_vertex3f;
585 m.pointer_color = NULL;
586 m.pointer_texcoord[0] = varray_texcoord2f[0];
587 m.tex[0] = chartexnum;
589 at = varray_texcoord2f[0];
590 av = varray_vertex3f;
591 while ((num = *str++) && x < vid_conwidth.integer)
595 s = (num & 15)*0.0625f + (0.5f / 256.0f);
596 t = (num >> 4)*0.0625f + (0.5f / 256.0f);
597 u = 0.0625f - (1.0f / 256.0f);
598 v = 0.0625f - (1.0f / 256.0f);
599 at[ 0] = s ;at[ 1] = t ;
600 at[ 2] = s+u;at[ 3] = t ;
601 at[ 4] = s+u;at[ 5] = t+v;
602 at[ 6] = s ;at[ 7] = t+v;
603 av[ 0] = x ;av[ 1] = y ;av[ 2] = 10;
604 av[ 3] = x+w;av[ 4] = y ;av[ 5] = 10;
605 av[ 6] = x+w;av[ 7] = y+h;av[ 8] = 10;
606 av[ 9] = x ;av[10] = y+h;av[11] = 10;
610 if (batchcount >= 128)
612 GL_LockArrays(0, batchcount * 4);
613 R_Mesh_Draw(0, batchcount * 4, batchcount * 2, quadelements);
616 at = varray_texcoord2f[0];
617 av = varray_vertex3f;
624 GL_LockArrays(0, batchcount * 4);
625 R_Mesh_Draw(0, batchcount * 4, batchcount * 2, quadelements);
630 mesh = (drawqueuemesh_t *)(dq + 1);
631 m.pointer_vertex = mesh->data_vertex3f;
632 m.pointer_color = mesh->data_color4f;
633 m.pointer_texcoord[0] = mesh->data_texcoord2f;
634 m.tex[0] = R_GetTexture(mesh->texture);
636 m.pointer_texcoord[0] = NULL;
638 GL_LockArrays(0, mesh->num_vertices);
639 R_Mesh_Draw(0, mesh->num_vertices, mesh->num_triangles, mesh->data_element3i);
642 case DRAWQUEUE_SETCLIP:
644 // We have to convert the con coords into real coords
645 int x , y, width, height;
646 x = dq->x * ((float)vid.width / vid_conwidth.integer);
647 // OGL uses top to bottom
648 y = dq->y * ((float) vid.height / vid_conheight.integer);
649 width = dq->scalex * ((float)vid.width / vid_conwidth.integer);
650 height = dq->scaley * ((float)vid.height / vid_conheight.integer);
652 GL_Scissor(x, y, width, height);
654 GL_ScissorTest(true);
657 case DRAWQUEUE_RESETCLIP:
658 GL_ScissorTest(false);
660 case DRAWQUEUE_LINEWIDTH:
663 case DRAWQUEUE_LINES:
664 mesh = (drawqueuemesh_t *)(dq + 1);
665 GL_Color(c[0], c[1], c[2], c[3]);
666 qglBegin(GL_LINE_LOOP);
667 for (num = 0;num < mesh->num_vertices;num++)
668 qglVertex2f(mesh->data_vertex3f[num*3+0], mesh->data_vertex3f[num*3+1]);
674 if (!vid_usinghwgamma)
676 // all the blends ignore depth
677 memset(&m, 0, sizeof(m));
678 m.pointer_vertex = blendvertex3f;
682 if (v_color_enable.integer)
684 c[0] = v_color_white_r.value;
685 c[1] = v_color_white_g.value;
686 c[2] = v_color_white_b.value;
689 c[0] = c[1] = c[2] = v_contrast.value;
690 if (c[0] >= 1.01f || c[1] >= 1.01f || c[2] >= 1.01f)
692 GL_BlendFunc(GL_DST_COLOR, GL_ONE);
693 while (c[0] >= 1.01f || c[1] >= 1.01f || c[2] >= 1.01f)
695 GL_Color(bound(0, c[0] - 1, 1), bound(0, c[1] - 1, 1), bound(0, c[2] - 1, 1), 1);
696 R_Mesh_Draw(0, 3, 1, polygonelements);
697 VectorScale(c, 0.5, c);
700 if (v_color_enable.integer)
702 c[0] = v_color_black_r.value;
703 c[1] = v_color_black_g.value;
704 c[2] = v_color_black_b.value;
707 c[0] = c[1] = c[2] = v_brightness.value;
708 if (c[0] >= 0.01f || c[1] >= 0.01f || c[2] >= 0.01f)
710 GL_BlendFunc(GL_ONE, GL_ONE);
711 GL_Color(c[0], c[1], c[2], 1);
712 R_Mesh_Draw(0, 3, 1, polygonelements);