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 256
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 qbyte concharimage[FONT_FILESIZE] =
47 static rtexture_t *draw_generateconchars(void)
50 qbyte buffer[65536][4], *data = NULL;
53 fs_filesize = FONT_FILESIZE;
54 data = LoadTGA (concharimage, 256, 256);
57 for (i = 0;i < 8192;i++)
59 random = lhrandom (0.0,1.0);
60 buffer[i][0] = 83 + (qbyte)(random * 64);
61 buffer[i][1] = 71 + (qbyte)(random * 32);
62 buffer[i][2] = 23 + (qbyte)(random * 16);
63 buffer[i][3] = data[i*4+0];
66 for (i = 8192;i < 32768;i++)
68 random = lhrandom (0.0,1.0);
69 buffer[i][0] = 95 + (qbyte)(random * 64);
70 buffer[i][1] = 95 + (qbyte)(random * 64);
71 buffer[i][2] = 95 + (qbyte)(random * 64);
72 buffer[i][3] = data[i*4+0];
75 for (i = 32768;i < 40960;i++)
77 random = lhrandom (0.0,1.0);
78 buffer[i][0] = 83 + (qbyte)(random * 64);
79 buffer[i][1] = 71 + (qbyte)(random * 32);
80 buffer[i][2] = 23 + (qbyte)(random * 16);
81 buffer[i][3] = data[i*4+0];
84 for (i = 40960;i < 65536;i++)
86 random = lhrandom (0.0,1.0);
87 buffer[i][0] = 96 + (qbyte)(random * 64);
88 buffer[i][1] = 43 + (qbyte)(random * 32);
89 buffer[i][2] = 27 + (qbyte)(random * 32);
90 buffer[i][3] = data[i*4+0];
94 Image_WriteTGARGBA ("gfx/generated_conchars.tga", 256, 256, &buffer[0][0]);
98 return R_LoadTexture2D(drawtexturepool, "conchars", 256, 256, &buffer[0][0], TEXTYPE_RGBA, TEXF_ALPHA | TEXF_PRECACHE, NULL);
101 static char *pointerimage =
120 static rtexture_t *draw_generatemousepointer(void)
123 qbyte buffer[256][4];
124 for (i = 0;i < 256;i++)
126 if (pointerimage[i] == '.')
135 buffer[i][0] = (pointerimage[i] - '0') * 16;
136 buffer[i][1] = (pointerimage[i] - '0') * 16;
137 buffer[i][2] = (pointerimage[i] - '0') * 16;
141 return R_LoadTexture2D(drawtexturepool, "mousepointer", 16, 16, &buffer[0][0], TEXTYPE_RGBA, TEXF_ALPHA | TEXF_PRECACHE, NULL);
144 // must match NUMCROSSHAIRS in r_crosshairs.c
145 #define NUMCROSSHAIRS 6
147 static char *crosshairtexdata[NUMCROSSHAIRS] =
252 static rtexture_t *draw_generatecrosshair(int num)
256 qbyte data[16*16][4];
257 in = crosshairtexdata[num];
258 for (i = 0;i < 16*16;i++)
272 data[i][3] = (qbyte) ((int) (in[i] - '0') * 255 / 7);
275 return R_LoadTexture2D(drawtexturepool, va("crosshair%i", num), 16, 16, &data[0][0], TEXTYPE_RGBA, TEXF_ALPHA | TEXF_PRECACHE, NULL);
278 static rtexture_t *draw_generateditherpattern(void)
283 for (y = 0;y < 8;y++)
285 for (x = 0;x < 8;x++)
287 data[(y*8+x)*4+0] = data[(y*8+x)*4+1] = data[(y*8+x)*4+2] = ((x^y) & 4) ? 255 : 0;
288 data[(y*8+x)*4+3] = 255;
291 return R_LoadTexture2D(drawtexturepool, "ditherpattern", 8, 8, data, TEXTYPE_RGBA, TEXF_FORCENEAREST | TEXF_PRECACHE, NULL);
294 memset(data, 255, sizeof(data));
295 data[0] = data[1] = data[2] = data[12] = data[13] = data[14] = 0;
296 return R_LoadTexture2D(drawtexturepool, "ditherpattern", 2, 2, data, TEXTYPE_RGBA, TEXF_FORCENEAREST | TEXF_PRECACHE, NULL);
305 // FIXME: move this to client somehow
306 cachepic_t *Draw_CachePic (const char *path, qboolean persistent)
313 if (!strncmp(CLVIDEOPREFIX, path, sizeof(CLVIDEOPREFIX) - 1))
318 video = CL_GetVideo(path);
323 crc = CRC_Block((qbyte *)path, strlen(path));
324 hashkey = ((crc >> 8) ^ crc) % CACHEPICHASHSIZE;
325 for (pic = cachepichash[hashkey];pic;pic = pic->chain)
326 if (!strcmp (path, pic->name))
329 if (numcachepics == MAX_CACHED_PICS)
331 Con_Printf ("Draw_CachePic: numcachepics == MAX_CACHED_PICS");
332 // FIXME: support NULL in callers?
333 return cachepics; // return the first one
335 pic = cachepics + (numcachepics++);
336 strlcpy (pic->name, path, sizeof(pic->name));
338 pic->chain = cachepichash[hashkey];
339 cachepichash[hashkey] = pic;
343 flags |= TEXF_PRECACHE;
344 if (!strcmp(path, "gfx/colorcontrol/ditherpattern.tga"))
347 // load the pic from disk
348 pic->tex = loadtextureimage(drawtexturepool, path, 0, 0, false, flags);
349 if (pic->tex == NULL && !strncmp(path, "gfx/", 4))
351 // compatibility with older versions
352 pic->tex = loadtextureimage(drawtexturepool, path + 4, 0, 0, false, flags);
353 // failed to find gfx/whatever.tga or similar, try the wad
354 if (pic->tex == NULL && (p = (qpic_t *)W_GetLumpName (path + 4)))
356 if (!strcmp(path, "gfx/conchars"))
359 // conchars is a raw image and with the wrong transparent color
361 for (i = 0;i < 128 * 128;i++)
364 pic->tex = R_LoadTexture2D(drawtexturepool, path, 128, 128, pix, TEXTYPE_PALETTE, flags, palette_complete);
367 pic->tex = R_LoadTexture2D(drawtexturepool, path, p->width, p->height, p->data, TEXTYPE_PALETTE, flags, palette_complete);
371 if (pic->tex == NULL && !strcmp(path, "gfx/conchars"))
372 pic->tex = draw_generateconchars();
373 if (pic->tex == NULL && !strcmp(path, "ui/mousepointer.tga"))
374 pic->tex = draw_generatemousepointer();
375 if (pic->tex == NULL && !strcmp(path, "gfx/prydoncursor001.tga"))
376 pic->tex = draw_generatemousepointer();
377 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair1.tga"))
378 pic->tex = draw_generatecrosshair(0);
379 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair2.tga"))
380 pic->tex = draw_generatecrosshair(1);
381 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair3.tga"))
382 pic->tex = draw_generatecrosshair(2);
383 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair4.tga"))
384 pic->tex = draw_generatecrosshair(3);
385 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair5.tga"))
386 pic->tex = draw_generatecrosshair(4);
387 if (pic->tex == NULL && !strcmp(path, "gfx/crosshair6.tga"))
388 pic->tex = draw_generatecrosshair(5);
389 if (pic->tex == NULL && !strcmp(path, "gfx/colorcontrol/ditherpattern.tga"))
390 pic->tex = draw_generateditherpattern();
391 if (pic->tex == NULL)
393 Con_Printf("Draw_CachePic: failed to load %s\n", path);
394 pic->tex = r_texture_notexture;
397 pic->width = R_TextureWidth(pic->tex);
398 pic->height = R_TextureHeight(pic->tex);
402 cachepic_t *Draw_NewPic(const char *picname, int width, int height, int alpha, qbyte *pixels)
407 crc = CRC_Block((qbyte *)picname, strlen(picname));
408 hashkey = ((crc >> 8) ^ crc) % CACHEPICHASHSIZE;
409 for (pic = cachepichash[hashkey];pic;pic = pic->chain)
410 if (!strcmp (picname, pic->name))
415 if (pic->tex && pic->width == width && pic->height == height)
417 R_UpdateTexture(pic->tex, pixels);
425 if (numcachepics == MAX_CACHED_PICS)
427 Con_Printf ("Draw_NewPic: numcachepics == MAX_CACHED_PICS");
428 // FIXME: support NULL in callers?
429 return cachepics; // return the first one
431 pic = cachepics + (numcachepics++);
432 strcpy (pic->name, picname);
434 pic->chain = cachepichash[hashkey];
435 cachepichash[hashkey] = pic;
440 pic->height = height;
442 R_FreeTexture(pic->tex);
443 pic->tex = R_LoadTexture2D(drawtexturepool, picname, width, height, pixels, TEXTYPE_RGBA, alpha ? TEXF_ALPHA : 0, NULL);
447 void Draw_FreePic(const char *picname)
452 // this doesn't really free the pic, but does free it's texture
453 crc = CRC_Block((qbyte *)picname, strlen(picname));
454 hashkey = ((crc >> 8) ^ crc) % CACHEPICHASHSIZE;
455 for (pic = cachepichash[hashkey];pic;pic = pic->chain)
457 if (!strcmp (picname, pic->name) && pic->tex)
459 R_FreeTexture(pic->tex);
472 static void gl_draw_start(void)
474 drawtexturepool = R_AllocTexturePool();
477 memset(cachepichash, 0, sizeof(cachepichash));
479 char_texture = Draw_CachePic("gfx/conchars", true)->tex;
482 static void gl_draw_shutdown(void)
484 R_FreeTexturePool(&drawtexturepool);
487 memset(cachepichash, 0, sizeof(cachepichash));
490 static void gl_draw_newmap(void)
494 void GL_Draw_Init (void)
497 memset(cachepichash, 0, sizeof(cachepichash));
499 R_RegisterModule("GL_Draw", gl_draw_start, gl_draw_shutdown, gl_draw_newmap);
502 float blendvertex3f[9] = {-5000, -5000, 10, 10000, -5000, 10, -5000, 10000, 10};
504 int quadelements[768];
505 void R_DrawQueue(void)
507 int pos, num, chartexnum, texnum, batch;
508 float x, y, w, h, s, t, u, v, *av, *at, c[4];
514 drawqueuemesh_t *mesh;
517 if (!r_render.integer)
520 if (!quadelements[1])
522 // elements for rendering a series of quads as triangles
523 for (batch = 0, pos = 0, num = 0;batch < 128;batch++, num += 4)
525 quadelements[pos++] = num;
526 quadelements[pos++] = num + 1;
527 quadelements[pos++] = num + 2;
528 quadelements[pos++] = num;
529 quadelements[pos++] = num + 2;
530 quadelements[pos++] = num + 3;
534 r_view_width = bound(0, r_refdef.width, vid.width);
535 r_view_height = bound(0, r_refdef.height, vid.height);
537 r_view_x = bound(0, r_refdef.x, vid.width - r_refdef.width);
538 r_view_y = bound(0, r_refdef.y, vid.height - r_refdef.height);
540 r_view_fov_x = bound(0.1, r_refdef.fov_x, 170);
541 r_view_fov_y = bound(0.1, r_refdef.fov_y, 170);
542 r_view_matrix = r_refdef.viewentitymatrix;
543 GL_ColorMask(r_refdef.colormask[0], r_refdef.colormask[1], r_refdef.colormask[2], 1);
545 qglViewport(r_view_x, vid.height - (r_view_y + r_view_height), r_view_width, r_view_height);
546 GL_SetupView_Mode_Ortho(0, 0, vid_conwidth.integer, vid_conheight.integer, -10, 100);
547 qglDepthFunc(GL_LEQUAL);
548 R_Mesh_Matrix(&r_identitymatrix);
550 chartexnum = R_GetTexture(char_texture);
552 memset(&m, 0, sizeof(m));
561 for (pos = 0;pos < r_refdef.drawqueuesize;pos += ((drawqueue_t *)(r_refdef.drawqueue + pos))->size)
563 dq = (drawqueue_t *)(r_refdef.drawqueue + pos);
566 if(dq->flags == DRAWFLAG_ADDITIVE)
567 GL_BlendFunc(GL_SRC_ALPHA, GL_ONE);
568 else if(dq->flags == DRAWFLAG_MODULATE)
569 GL_BlendFunc(GL_DST_COLOR, GL_ZERO);
570 else if(dq->flags == DRAWFLAG_2XMODULATE)
571 GL_BlendFunc(GL_DST_COLOR,GL_SRC_COLOR);
573 GL_BlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
578 c[0] = (float) ((color >> 24) & 0xFF) * (1.0f / 255.0f);
579 c[1] = (float) ((color >> 16) & 0xFF) * (1.0f / 255.0f);
580 c[2] = (float) ((color >> 8) & 0xFF) * (1.0f / 255.0f);
581 c[3] = (float) ( color & 0xFF) * (1.0f / 255.0f);
589 case DRAWQUEUE_STRING:
590 GL_Color(c[0], c[1], c[2], c[3]);
591 str = (char *)(dq + 1);
593 m.pointer_vertex = varray_vertex3f;
594 m.pointer_color = NULL;
595 m.pointer_texcoord[0] = varray_texcoord2f[0];
596 m.tex[0] = chartexnum;
598 at = varray_texcoord2f[0];
599 av = varray_vertex3f;
600 while ((num = *str++) && x < vid_conwidth.integer)
604 s = (num & 15)*0.0625f + (0.5f / 256.0f);
605 t = (num >> 4)*0.0625f + (0.5f / 256.0f);
606 u = 0.0625f - (1.0f / 256.0f);
607 v = 0.0625f - (1.0f / 256.0f);
608 at[ 0] = s ;at[ 1] = t ;
609 at[ 2] = s+u;at[ 3] = t ;
610 at[ 4] = s+u;at[ 5] = t+v;
611 at[ 6] = s ;at[ 7] = t+v;
612 av[ 0] = x ;av[ 1] = y ;av[ 2] = 10;
613 av[ 3] = x+w;av[ 4] = y ;av[ 5] = 10;
614 av[ 6] = x+w;av[ 7] = y+h;av[ 8] = 10;
615 av[ 9] = x ;av[10] = y+h;av[11] = 10;
619 if (batchcount >= 128)
621 GL_LockArrays(0, batchcount * 4);
622 R_Mesh_Draw(0, batchcount * 4, batchcount * 2, quadelements);
625 at = varray_texcoord2f[0];
626 av = varray_vertex3f;
633 GL_LockArrays(0, batchcount * 4);
634 R_Mesh_Draw(0, batchcount * 4, batchcount * 2, quadelements);
639 mesh = (drawqueuemesh_t *)(dq + 1);
640 m.pointer_vertex = mesh->data_vertex3f;
641 m.pointer_color = mesh->data_color4f;
642 m.pointer_texcoord[0] = mesh->data_texcoord2f;
643 m.tex[0] = R_GetTexture(mesh->texture);
645 m.pointer_texcoord[0] = NULL;
647 GL_LockArrays(0, mesh->num_vertices);
648 R_Mesh_Draw(0, mesh->num_vertices, mesh->num_triangles, mesh->data_element3i);
651 case DRAWQUEUE_SETCLIP:
653 // We have to convert the con coords into real coords
654 int x , y, width, height;
655 x = dq->x * ((float)vid.width / vid_conwidth.integer);
656 // OGL uses top to bottom
657 y = dq->y * ((float) vid.height / vid_conheight.integer);
658 width = dq->scalex * ((float)vid.width / vid_conwidth.integer);
659 height = dq->scaley * ((float)vid.height / vid_conheight.integer);
661 GL_Scissor(x, y, width, height);
663 GL_ScissorTest(true);
666 case DRAWQUEUE_RESETCLIP:
667 GL_ScissorTest(false);
672 if (!vid_usinghwgamma)
674 // all the blends ignore depth
675 memset(&m, 0, sizeof(m));
676 m.pointer_vertex = blendvertex3f;
680 if (v_color_enable.integer)
682 c[0] = v_color_white_r.value;
683 c[1] = v_color_white_g.value;
684 c[2] = v_color_white_b.value;
687 c[0] = c[1] = c[2] = v_contrast.value;
688 if (c[0] >= 1.01f || c[1] >= 1.01f || c[2] >= 1.01f)
690 GL_BlendFunc(GL_DST_COLOR, GL_ONE);
691 while (c[0] >= 1.01f || c[1] >= 1.01f || c[2] >= 1.01f)
693 GL_Color(bound(0, c[0] - 1, 1), bound(0, c[1] - 1, 1), bound(0, c[2] - 1, 1), 1);
694 R_Mesh_Draw(0, 3, 1, polygonelements);
695 VectorScale(c, 0.5, c);
698 if (v_color_enable.integer)
700 c[0] = v_color_black_r.value;
701 c[1] = v_color_black_g.value;
702 c[2] = v_color_black_b.value;
705 c[0] = c[1] = c[2] = v_brightness.value;
706 if (c[0] >= 0.01f || c[1] >= 0.01f || c[2] >= 0.01f)
708 GL_BlendFunc(GL_ONE, GL_ONE);
709 GL_Color(c[0], c[1], c[2], 1);
710 R_Mesh_Draw(0, 3, 1, polygonelements);