6 cvar_t gl_mesh_drawrangeelements = {0, "gl_mesh_drawrangeelements", "1"};
7 cvar_t gl_mesh_testarrayelement = {0, "gl_mesh_testarrayelement", "0"};
8 cvar_t gl_mesh_testmanualfeeding = {0, "gl_mesh_testmanualfeeding", "0"};
9 cvar_t gl_delayfinish = {CVAR_SAVE, "gl_delayfinish", "0"};
10 cvar_t gl_paranoid = {0, "gl_paranoid", "0"};
11 cvar_t gl_printcheckerror = {0, "gl_printcheckerror", "0"};
13 cvar_t r_render = {0, "r_render", "1"};
14 cvar_t gl_dither = {CVAR_SAVE, "gl_dither", "1"}; // whether or not to use dithering
15 cvar_t gl_lockarrays = {0, "gl_lockarrays", "1"};
17 int gl_maxdrawrangeelementsvertices;
18 int gl_maxdrawrangeelementsindices;
23 void GL_PrintError(int errornumber, char *filename, int linenumber)
27 #ifdef GL_INVALID_ENUM
29 Con_Printf("GL_INVALID_ENUM at %s:%i\n", filename, linenumber);
32 #ifdef GL_INVALID_VALUE
33 case GL_INVALID_VALUE:
34 Con_Printf("GL_INVALID_VALUE at %s:%i\n", filename, linenumber);
37 #ifdef GL_INVALID_OPERATION
38 case GL_INVALID_OPERATION:
39 Con_Printf("GL_INVALID_OPERATION at %s:%i\n", filename, linenumber);
42 #ifdef GL_STACK_OVERFLOW
43 case GL_STACK_OVERFLOW:
44 Con_Printf("GL_STACK_OVERFLOW at %s:%i\n", filename, linenumber);
47 #ifdef GL_STACK_UNDERFLOW
48 case GL_STACK_UNDERFLOW:
49 Con_Printf("GL_STACK_UNDERFLOW at %s:%i\n", filename, linenumber);
52 #ifdef GL_OUT_OF_MEMORY
53 case GL_OUT_OF_MEMORY:
54 Con_Printf("GL_OUT_OF_MEMORY at %s:%i\n", filename, linenumber);
57 #ifdef GL_TABLE_TOO_LARGE
58 case GL_TABLE_TOO_LARGE:
59 Con_Printf("GL_TABLE_TOO_LARGE at %s:%i\n", filename, linenumber);
63 Con_Printf("GL UNKNOWN (%i) at %s:%i\n", errornumber, filename, linenumber);
69 #define BACKENDACTIVECHECK if (!backendactive) Sys_Error("GL backend function called when backend is not active\n");
71 int c_meshs, c_meshelements;
73 void SCR_ScreenShot_f (void);
75 // these are externally accessible
76 int r_lightmapscalebit;
79 static matrix4x4_t backend_viewmatrix;
80 static matrix4x4_t backend_modelmatrix;
81 static matrix4x4_t backend_modelviewmatrix;
82 static matrix4x4_t backend_glmodelviewmatrix;
83 static matrix4x4_t backend_projectmatrix;
85 static int backendunits, backendactive;
86 static mempool_t *gl_backend_mempool;
89 note: here's strip order for a terrain row:
96 A0B, 01B, B1C, 12C, C2D, 23D, D3E, 34E
98 *elements++ = i + row;
100 *elements++ = i + row + 1;
103 *elements++ = i + row + 1;
106 for (y = 0;y < rows - 1;y++)
108 for (x = 0;x < columns - 1;x++)
111 *elements++ = i + columns;
113 *elements++ = i + columns + 1;
116 *elements++ = i + columns + 1;
127 for (y = 0;y < rows - 1;y++)
129 for (x = 0;x < columns - 1;x++)
133 *elements++ = i + columns;
134 *elements++ = i + columns + 1;
135 *elements++ = i + columns;
136 *elements++ = i + columns + 1;
142 int polygonelements[768];
144 static void R_Mesh_CacheArray_Startup(void);
145 static void R_Mesh_CacheArray_Shutdown(void);
146 void GL_Backend_AllocArrays(void)
148 if (!gl_backend_mempool)
149 gl_backend_mempool = Mem_AllocPool("GL_Backend");
150 R_Mesh_CacheArray_Startup();
153 void GL_Backend_FreeArrays(void)
155 R_Mesh_CacheArray_Shutdown();
156 Mem_FreePool(&gl_backend_mempool);
159 static void gl_backend_start(void)
161 Con_DPrintf("OpenGL Backend started\n");
162 if (qglDrawRangeElements != NULL)
165 qglGetIntegerv(GL_MAX_ELEMENTS_VERTICES, &gl_maxdrawrangeelementsvertices);
167 qglGetIntegerv(GL_MAX_ELEMENTS_INDICES, &gl_maxdrawrangeelementsindices);
169 Con_DPrintf("glDrawRangeElements detected (max vertices %i, max indices %i)\n", gl_maxdrawrangeelementsvertices, gl_maxdrawrangeelementsindices);
172 backendunits = min(MAX_TEXTUREUNITS, gl_textureunits);
174 GL_Backend_AllocArrays();
176 backendactive = true;
179 static void gl_backend_shutdown(void)
182 backendactive = false;
184 Con_DPrintf("OpenGL Backend shutting down\n");
186 GL_Backend_FreeArrays();
189 static void gl_backend_newmap(void)
193 void gl_backend_init(void)
197 for (i = 0;i < POLYGONELEMENTS_MAXPOINTS - 2;i++)
199 polygonelements[i * 3 + 0] = 0;
200 polygonelements[i * 3 + 1] = i + 1;
201 polygonelements[i * 3 + 2] = i + 2;
204 Cvar_RegisterVariable(&r_render);
205 Cvar_RegisterVariable(&gl_dither);
206 Cvar_RegisterVariable(&gl_lockarrays);
207 Cvar_RegisterVariable(&gl_delayfinish);
208 Cvar_RegisterVariable(&gl_paranoid);
209 Cvar_RegisterVariable(&gl_printcheckerror);
211 Cvar_SetValue("r_render", 0);
214 Cvar_RegisterVariable(&gl_mesh_drawrangeelements);
215 Cvar_RegisterVariable(&gl_mesh_testarrayelement);
216 Cvar_RegisterVariable(&gl_mesh_testmanualfeeding);
217 R_RegisterModule("GL_Backend", gl_backend_start, gl_backend_shutdown, gl_backend_newmap);
220 void GL_SetupView_ViewPort (int x, int y, int width, int height)
222 if (!r_render.integer)
225 // y is weird beause OpenGL is bottom to top, we use top to bottom
226 qglViewport(x, vid.realheight - (y + height), width, height);
230 void GL_SetupView_Orientation_Identity (void)
232 Matrix4x4_CreateIdentity(&backend_viewmatrix);
233 memset(&backend_modelmatrix, 0, sizeof(backend_modelmatrix));
236 void GL_SetupView_Orientation_FromEntity (vec3_t origin, vec3_t angles)
238 Matrix4x4_CreateRotate(&backend_viewmatrix, -90, 1, 0, 0);
239 Matrix4x4_ConcatRotate(&backend_viewmatrix, 90, 0, 0, 1);
240 Matrix4x4_ConcatRotate(&backend_viewmatrix, -angles[2], 1, 0, 0);
241 Matrix4x4_ConcatRotate(&backend_viewmatrix, -angles[0], 0, 1, 0);
242 Matrix4x4_ConcatRotate(&backend_viewmatrix, -angles[1], 0, 0, 1);
243 Matrix4x4_ConcatTranslate(&backend_viewmatrix, -origin[0], -origin[1], -origin[2]);
244 memset(&backend_modelmatrix, 0, sizeof(backend_modelmatrix));
247 void GL_SetupView_Mode_Perspective (double fovx, double fovy, double zNear, double zFar)
251 if (!r_render.integer)
255 qglMatrixMode(GL_PROJECTION);CHECKGLERROR
256 qglLoadIdentity();CHECKGLERROR
258 xmax = zNear * tan(fovx * M_PI / 360.0);
259 ymax = zNear * tan(fovy * M_PI / 360.0);
261 qglFrustum(-xmax, xmax, -ymax, ymax, zNear, zFar);CHECKGLERROR
262 qglMatrixMode(GL_MODELVIEW);CHECKGLERROR
263 GL_SetupView_Orientation_Identity();
266 void GL_SetupView_Mode_PerspectiveInfiniteFarClip (double fovx, double fovy, double zNear)
270 if (!r_render.integer)
274 qglMatrixMode(GL_PROJECTION);CHECKGLERROR
275 qglLoadIdentity();CHECKGLERROR
277 nudge = 1.0 - 1.0 / (1<<23);
278 m[ 0] = 1.0 / tan(fovx * M_PI / 360.0);
283 m[ 5] = 1.0 / tan(fovy * M_PI / 360.0);
292 m[14] = -2 * zNear * nudge;
295 qglMatrixMode(GL_MODELVIEW);CHECKGLERROR
296 GL_SetupView_Orientation_Identity();
297 backend_projectmatrix.m[0][0] = m[0];
298 backend_projectmatrix.m[1][0] = m[1];
299 backend_projectmatrix.m[2][0] = m[2];
300 backend_projectmatrix.m[3][0] = m[3];
301 backend_projectmatrix.m[0][1] = m[4];
302 backend_projectmatrix.m[1][1] = m[5];
303 backend_projectmatrix.m[2][1] = m[6];
304 backend_projectmatrix.m[3][1] = m[7];
305 backend_projectmatrix.m[0][2] = m[8];
306 backend_projectmatrix.m[1][2] = m[9];
307 backend_projectmatrix.m[2][2] = m[10];
308 backend_projectmatrix.m[3][2] = m[11];
309 backend_projectmatrix.m[0][3] = m[12];
310 backend_projectmatrix.m[1][3] = m[13];
311 backend_projectmatrix.m[2][3] = m[14];
312 backend_projectmatrix.m[3][3] = m[15];
315 void GL_SetupView_Mode_Ortho (double x1, double y1, double x2, double y2, double zNear, double zFar)
317 if (!r_render.integer)
321 qglMatrixMode(GL_PROJECTION);CHECKGLERROR
322 qglLoadIdentity();CHECKGLERROR
323 qglOrtho(x1, x2, y2, y1, zNear, zFar);
324 qglMatrixMode(GL_MODELVIEW);CHECKGLERROR
325 GL_SetupView_Orientation_Identity();
328 typedef struct gltextureunit_s
330 int t1d, t2d, t3d, tcubemap;
333 const void *pointer_texcoord;
334 float rgbscale, alphascale;
335 int combinergb, combinealpha;
336 // FIXME: add more combine stuff
350 gltextureunit_t units[MAX_TEXTUREUNITS];
354 const void *pointer_vertex;
355 const void *pointer_color;
359 void GL_SetupTextureState(void)
362 gltextureunit_t *unit;
364 gl_state.clientunit = -1;
365 for (i = 0;i < backendunits;i++)
368 GL_ClientActiveTexture(i);
369 unit = gl_state.units + i;
374 unit->pointer_texcoord = NULL;
376 unit->alphascale = 1;
377 unit->combinergb = GL_MODULATE;
378 unit->combinealpha = GL_MODULATE;
380 qglTexCoordPointer(2, GL_FLOAT, sizeof(float[2]), NULL);CHECKGLERROR
381 qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR
383 qglDisable(GL_TEXTURE_1D);CHECKGLERROR
384 qglDisable(GL_TEXTURE_2D);CHECKGLERROR
387 qglDisable(GL_TEXTURE_3D);CHECKGLERROR
389 if (gl_texturecubemap)
391 qglDisable(GL_TEXTURE_CUBE_MAP_ARB);CHECKGLERROR
393 if (gl_combine.integer)
395 qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_COMBINE_ARB);CHECKGLERROR
396 qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, GL_MODULATE);CHECKGLERROR
397 qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE0_RGB_ARB, GL_TEXTURE);CHECKGLERROR
398 qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE1_RGB_ARB, GL_PREVIOUS_ARB);CHECKGLERROR
399 qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE2_RGB_ARB, GL_TEXTURE);CHECKGLERROR // for GL_INTERPOLATE_ARB mode
400 qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND0_RGB_ARB, GL_SRC_COLOR);CHECKGLERROR
401 qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND1_RGB_ARB, GL_SRC_COLOR);CHECKGLERROR
402 qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND2_RGB_ARB, GL_SRC_ALPHA);CHECKGLERROR
403 qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_ALPHA_ARB, GL_MODULATE);CHECKGLERROR
404 qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE0_ALPHA_ARB, GL_TEXTURE);CHECKGLERROR
405 qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE1_ALPHA_ARB, GL_PREVIOUS_ARB);CHECKGLERROR
406 qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE2_ALPHA_ARB, GL_CONSTANT_ARB);CHECKGLERROR
407 qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND0_ALPHA_ARB, GL_SRC_ALPHA);CHECKGLERROR
408 qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND1_ALPHA_ARB, GL_SRC_ALPHA);CHECKGLERROR
409 qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND2_ALPHA_ARB, GL_SRC_ALPHA);CHECKGLERROR
410 qglTexEnvi(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, 1);CHECKGLERROR
411 qglTexEnvi(GL_TEXTURE_ENV, GL_ALPHA_SCALE, 1);CHECKGLERROR
415 qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);CHECKGLERROR
420 void GL_Backend_ResetState(void)
422 memset(&gl_state, 0, sizeof(gl_state));
423 gl_state.depthtest = true;
424 gl_state.blendfunc1 = GL_ONE;
425 gl_state.blendfunc2 = GL_ZERO;
426 gl_state.blend = false;
427 gl_state.depthmask = GL_TRUE;
428 gl_state.color4f[0] = gl_state.color4f[1] = gl_state.color4f[2] = gl_state.color4f[3] = 1;
429 gl_state.lockrange_first = 0;
430 gl_state.lockrange_count = 0;
431 gl_state.pointer_vertex = NULL;
432 gl_state.pointer_color = NULL;
436 qglEnable(GL_CULL_FACE);CHECKGLERROR
437 qglCullFace(GL_FRONT);CHECKGLERROR
438 qglEnable(GL_DEPTH_TEST);CHECKGLERROR
439 qglBlendFunc(gl_state.blendfunc1, gl_state.blendfunc2);CHECKGLERROR
440 qglDisable(GL_BLEND);CHECKGLERROR
441 qglDepthMask(gl_state.depthmask);CHECKGLERROR
443 qglVertexPointer(3, GL_FLOAT, sizeof(float[3]), NULL);CHECKGLERROR
444 qglEnableClientState(GL_VERTEX_ARRAY);CHECKGLERROR
446 qglColorPointer(4, GL_FLOAT, sizeof(float[4]), NULL);CHECKGLERROR
447 qglDisableClientState(GL_COLOR_ARRAY);CHECKGLERROR
449 GL_Color(0, 0, 0, 0);
450 GL_Color(1, 1, 1, 1);
452 GL_SetupTextureState();
455 void GL_ActiveTexture(int num)
457 if (gl_state.unit != num)
460 if (qglActiveTexture)
462 qglActiveTexture(GL_TEXTURE0_ARB + gl_state.unit);
468 void GL_ClientActiveTexture(int num)
470 if (gl_state.clientunit != num)
472 gl_state.clientunit = num;
473 if (qglActiveTexture)
475 qglClientActiveTexture(GL_TEXTURE0_ARB + gl_state.clientunit);
481 void GL_BlendFunc(int blendfunc1, int blendfunc2)
483 if (gl_state.blendfunc1 != blendfunc1 || gl_state.blendfunc2 != blendfunc2)
485 qglBlendFunc(gl_state.blendfunc1 = blendfunc1, gl_state.blendfunc2 = blendfunc2);CHECKGLERROR
486 if (gl_state.blendfunc2 == GL_ZERO)
488 if (gl_state.blendfunc1 == GL_ONE)
493 qglDisable(GL_BLEND);CHECKGLERROR
501 qglEnable(GL_BLEND);CHECKGLERROR
510 qglEnable(GL_BLEND);CHECKGLERROR
516 void GL_DepthMask(int state)
518 if (gl_state.depthmask != state)
520 qglDepthMask(gl_state.depthmask = state);CHECKGLERROR
524 void GL_DepthTest(int state)
526 if (gl_state.depthtest != state)
528 gl_state.depthtest = state;
529 if (gl_state.depthtest)
531 qglEnable(GL_DEPTH_TEST);CHECKGLERROR
535 qglDisable(GL_DEPTH_TEST);CHECKGLERROR
540 void GL_VertexPointer(const float *p)
542 if (gl_state.pointer_vertex != p)
544 gl_state.pointer_vertex = p;
546 qglVertexPointer(3, GL_FLOAT, sizeof(float[3]), gl_state.pointer_vertex);
551 void GL_ColorPointer(const float *p)
553 if (gl_state.pointer_color != p)
556 if (!gl_state.pointer_color)
558 qglEnableClientState(GL_COLOR_ARRAY);
563 qglDisableClientState(GL_COLOR_ARRAY);
566 gl_state.pointer_color = p;
567 qglColorPointer(4, GL_FLOAT, sizeof(float[4]), gl_state.pointer_color);
572 void GL_Color(float cr, float cg, float cb, float ca)
574 if (gl_state.pointer_color || gl_state.color4f[0] != cr || gl_state.color4f[1] != cg || gl_state.color4f[2] != cb || gl_state.color4f[3] != ca)
576 GL_ColorPointer(NULL);
577 gl_state.color4f[0] = cr;
578 gl_state.color4f[1] = cg;
579 gl_state.color4f[2] = cb;
580 gl_state.color4f[3] = ca;
582 qglColor4f(cr, cg, cb, ca);
587 void GL_LockArrays(int first, int count)
589 if (gl_state.lockrange_count != count || gl_state.lockrange_first != first)
591 if (gl_state.lockrange_count)
593 gl_state.lockrange_count = 0;
595 qglUnlockArraysEXT();
598 if (count && gl_supportslockarrays && gl_lockarrays.integer)
600 gl_state.lockrange_first = first;
601 gl_state.lockrange_count = count;
603 qglLockArraysEXT(first, count);
609 void GL_TransformToScreen(const vec4_t in, vec4_t out)
613 Matrix4x4_Transform4 (&backend_viewmatrix, in, temp);
614 Matrix4x4_Transform4 (&backend_projectmatrix, temp, out);
616 out[0] = r_refdef.x + (out[0] * iw + 1.0f) * r_refdef.width * 0.5f;
617 out[1] = r_refdef.y + (out[1] * iw + 1.0f) * r_refdef.height * 0.5f;
618 out[2] = out[2] * iw;
621 // called at beginning of frame
622 void R_Mesh_Start(void)
626 GL_Backend_ResetState();
629 int gl_backend_rebindtextures;
631 void GL_Backend_RenumberElements(int *out, int count, const int *in, int offset)
636 for (i = 0;i < count;i++)
637 *out++ = *in++ + offset;
640 memcpy(out, in, sizeof(*out) * count);
643 // renders triangles using vertices from the active arrays
644 int paranoidblah = 0;
645 void R_Mesh_Draw(int numverts, int numtriangles, const int *elements)
647 int numelements = numtriangles * 3;
648 if (numverts == 0 || numtriangles == 0)
650 Con_Printf("R_Mesh_Draw(%d, %d, %08p);\n", numverts, numtriangles, elements);
654 c_meshelements += numelements;
656 if (r_render.integer)
658 if (gl_paranoid.integer)
662 if (!qglIsEnabled(GL_VERTEX_ARRAY))
663 Con_Printf("R_Mesh_Draw: vertex array not enabled\n");
664 for (j = 0, size = numverts * (int)sizeof(float[3]), p = gl_state.pointer_vertex;j < size;j += sizeof(int), p++)
666 if (gl_state.pointer_color)
668 if (!qglIsEnabled(GL_COLOR_ARRAY))
669 Con_Printf("R_Mesh_Draw: color array set but not enabled\n");
670 for (j = 0, size = numverts * (int)sizeof(float[4]), p = gl_state.pointer_color;j < size;j += sizeof(int), p++)
673 for (i = 0;i < backendunits;i++)
675 if (gl_state.units[i].t1d || gl_state.units[i].t2d || gl_state.units[i].t3d || gl_state.units[i].tcubemap || gl_state.units[i].arrayenabled)
677 if (gl_state.units[i].arrayenabled && !(gl_state.units[i].t1d || gl_state.units[i].t2d || gl_state.units[i].t3d || gl_state.units[i].tcubemap))
678 Con_Printf("R_Mesh_Draw: array enabled but no texture bound\n");
680 if (!qglIsEnabled(GL_TEXTURE_COORD_ARRAY))
681 Con_Printf("R_Mesh_Draw: texcoord array set but not enabled\n");
682 for (j = 0, size = numverts * ((gl_state.units[i].t3d || gl_state.units[i].tcubemap) ? (int)sizeof(float[3]) : (int)sizeof(float[2])), p = gl_state.units[i].pointer_texcoord;j < size;j += sizeof(int), p++)
686 for (i = 0;i < numtriangles * 3;i++)
688 if (elements[i] < 0 || elements[i] >= numverts)
690 Con_Printf("R_Mesh_Draw: invalid vertex index %i (outside range 0 - %i) in elements list\n", elements[i], numverts);
696 GL_LockArrays(0, numverts);
698 if (gl_mesh_testmanualfeeding.integer)
702 qglBegin(GL_TRIANGLES);
703 for (i = 0;i < numtriangles * 3;i++)
705 for (j = 0;j < backendunits;j++)
707 if (gl_state.units[j].pointer_texcoord)
709 if (backendunits > 1)
711 if (gl_state.units[j].t3d || gl_state.units[j].tcubemap)
713 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 3;
714 qglMultiTexCoord3f(GL_TEXTURE0_ARB + j, p[0], p[1], p[2]);
718 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 2;
719 qglMultiTexCoord2f(GL_TEXTURE0_ARB + j, p[0], p[1]);
724 if (gl_state.units[j].t3d || gl_state.units[j].tcubemap)
726 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 3;
727 qglTexCoord3f(p[0], p[1], p[2]);
731 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 2;
732 qglTexCoord2f(p[0], p[1]);
737 if (gl_state.pointer_color)
739 p = ((const GLfloat *)(gl_state.pointer_color)) + elements[i] * 4;
740 qglColor4f(p[0], p[1], p[2], p[3]);
742 p = ((const GLfloat *)(gl_state.pointer_vertex)) + elements[i] * 3;
743 qglVertex3f(p[0], p[1], p[2]);
748 else if (gl_mesh_testarrayelement.integer)
751 qglBegin(GL_TRIANGLES);
752 for (i = 0;i < numtriangles * 3;i++)
754 qglArrayElement(elements[i]);
759 else if (gl_mesh_drawrangeelements.integer && qglDrawRangeElements != NULL)
761 qglDrawRangeElements(GL_TRIANGLES, 0, numverts, numelements, GL_UNSIGNED_INT, elements);CHECKGLERROR
765 qglDrawElements(GL_TRIANGLES, numelements, GL_UNSIGNED_INT, elements);CHECKGLERROR
773 // restores backend state, used when done with 3D rendering
774 void R_Mesh_Finish(void)
782 for (i = backendunits - 1;i >= 0;i--)
784 if (qglActiveTexture)
785 qglActiveTexture(GL_TEXTURE0_ARB + i);CHECKGLERROR
786 if (qglClientActiveTexture)
787 qglClientActiveTexture(GL_TEXTURE0_ARB + i);CHECKGLERROR
788 qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR
789 qglDisable(GL_TEXTURE_1D);CHECKGLERROR
790 qglDisable(GL_TEXTURE_2D);CHECKGLERROR
793 qglDisable(GL_TEXTURE_3D);CHECKGLERROR
795 if (gl_texturecubemap)
797 qglDisable(GL_TEXTURE_CUBE_MAP_ARB);CHECKGLERROR
799 qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);CHECKGLERROR
800 if (gl_combine.integer)
802 qglTexEnvi(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, 1);CHECKGLERROR
803 qglTexEnvi(GL_TEXTURE_ENV, GL_ALPHA_SCALE, 1);CHECKGLERROR
806 qglDisableClientState(GL_COLOR_ARRAY);CHECKGLERROR
807 qglDisableClientState(GL_VERTEX_ARRAY);CHECKGLERROR
809 qglDisable(GL_BLEND);CHECKGLERROR
810 qglEnable(GL_DEPTH_TEST);CHECKGLERROR
811 qglDepthMask(GL_TRUE);CHECKGLERROR
812 qglBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);CHECKGLERROR
815 void R_Mesh_Matrix(const matrix4x4_t *matrix)
817 if (memcmp(matrix, &backend_modelmatrix, sizeof(matrix4x4_t)))
819 backend_modelmatrix = *matrix;
820 Matrix4x4_Concat(&backend_modelviewmatrix, &backend_viewmatrix, matrix);
821 Matrix4x4_Transpose(&backend_glmodelviewmatrix, &backend_modelviewmatrix);
822 qglLoadMatrixf(&backend_glmodelviewmatrix.m[0][0]);
826 void R_Mesh_TextureMatrix(int unitnumber, const matrix4x4_t *matrix)
828 if (memcmp(&gl_state.units[unitnumber].matrix, matrix, sizeof(matrix4x4_t)))
830 matrix4x4_t tempmatrix;
831 gl_state.units[unitnumber].matrix = *matrix;
832 Matrix4x4_Transpose(&tempmatrix, &gl_state.units[unitnumber].matrix);
833 qglMatrixMode(GL_TEXTURE);
834 GL_ActiveTexture(unitnumber);
835 qglLoadMatrixf(&tempmatrix.m[0][0]);
836 qglMatrixMode(GL_MODELVIEW);
840 void R_Mesh_State_Texture(const rmeshstate_t *m)
842 int i, combinergb, combinealpha, scale, arrayis3d;
843 gltextureunit_t *unit;
847 if (gl_backend_rebindtextures)
849 gl_backend_rebindtextures = false;
850 GL_SetupTextureState();
853 for (i = 0, unit = gl_state.units;i < backendunits;i++, unit++)
855 if (unit->t1d != m->tex1d[i])
861 qglEnable(GL_TEXTURE_1D);CHECKGLERROR
866 qglDisable(GL_TEXTURE_1D);CHECKGLERROR
868 qglBindTexture(GL_TEXTURE_1D, (unit->t1d = m->tex1d[i]));CHECKGLERROR
870 if (unit->t2d != m->tex[i])
876 qglEnable(GL_TEXTURE_2D);CHECKGLERROR
881 qglDisable(GL_TEXTURE_2D);CHECKGLERROR
883 qglBindTexture(GL_TEXTURE_2D, (unit->t2d = m->tex[i]));CHECKGLERROR
885 if (unit->t3d != m->tex3d[i])
891 qglEnable(GL_TEXTURE_3D);CHECKGLERROR
896 qglDisable(GL_TEXTURE_3D);CHECKGLERROR
898 qglBindTexture(GL_TEXTURE_3D, (unit->t3d = m->tex3d[i]));CHECKGLERROR
900 if (unit->tcubemap != m->texcubemap[i])
903 if (m->texcubemap[i])
905 if (unit->tcubemap == 0)
906 qglEnable(GL_TEXTURE_CUBE_MAP_ARB);CHECKGLERROR
911 qglDisable(GL_TEXTURE_CUBE_MAP_ARB);CHECKGLERROR
913 qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, (unit->tcubemap = m->texcubemap[i]));CHECKGLERROR
915 combinergb = m->texcombinergb[i];
917 combinergb = GL_MODULATE;
918 if (unit->combinergb != combinergb)
921 unit->combinergb = combinergb;
922 if (gl_combine.integer)
924 qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, unit->combinergb);CHECKGLERROR
928 qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, unit->combinergb);CHECKGLERROR
931 combinealpha = m->texcombinealpha[i];
933 combinealpha = GL_MODULATE;
934 if (unit->combinealpha != combinealpha)
937 unit->combinealpha = combinealpha;
938 if (gl_combine.integer)
940 qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_ALPHA_ARB, unit->combinealpha);CHECKGLERROR
943 scale = max(m->texrgbscale[i], 1);
944 if (unit->rgbscale != scale)
947 qglTexEnvi(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, (unit->rgbscale = scale));CHECKGLERROR
949 scale = max(m->texalphascale[i], 1);
950 if (unit->alphascale != scale)
953 qglTexEnvi(GL_TEXTURE_ENV, GL_ALPHA_SCALE, (unit->alphascale = scale));CHECKGLERROR
955 arrayis3d = unit->t3d || unit->tcubemap;
956 if (unit->pointer_texcoord != m->pointer_texcoord[i] || unit->arrayis3d != arrayis3d)
958 GL_ClientActiveTexture(i);
959 if (m->pointer_texcoord[i])
961 if (!unit->arrayenabled)
963 unit->arrayenabled = true;
964 qglEnableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR
969 if (unit->arrayenabled)
971 unit->arrayenabled = false;
972 qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR
975 unit->pointer_texcoord = m->pointer_texcoord[i];
976 unit->arrayis3d = arrayis3d;
978 qglTexCoordPointer(3, GL_FLOAT, sizeof(float[3]), unit->pointer_texcoord);
980 qglTexCoordPointer(2, GL_FLOAT, sizeof(float[2]), unit->pointer_texcoord);
987 ==============================================================================
991 ==============================================================================
994 qboolean SCR_ScreenShot(char *filename, int x, int y, int width, int height, qboolean jpeg)
1000 if (!r_render.integer)
1003 buffer = Mem_Alloc(tempmempool, width*height*3);
1004 qglReadPixels (x, y, width, height, GL_RGB, GL_UNSIGNED_BYTE, buffer);
1007 // LordHavoc: compensate for v_overbrightbits when using hardware gamma
1008 if (v_hwgamma.integer)
1010 for (i = 0;i < width * height * 3;i++)
1012 j = buffer[i] << v_overbrightbits.integer;
1013 buffer[i] = (qbyte) (bound(0, j, 255));
1018 ret = JPEG_SaveImage_preflipped (filename, width, height, buffer);
1020 ret = Image_WriteTGARGB_preflipped (filename, width, height, buffer);
1026 //=============================================================================
1028 void R_ClearScreen(void)
1030 if (r_render.integer)
1033 qglClearColor(0,0,0,0);CHECKGLERROR
1034 qglClearDepth(1);CHECKGLERROR
1037 // LordHavoc: we use a stencil centered around 128 instead of 0,
1038 // to avoid clamping interfering with strange shadow volume
1040 qglClearStencil(128);CHECKGLERROR
1043 qglClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT | (gl_stencil ? GL_STENCIL_BUFFER_BIT : 0));CHECKGLERROR
1044 // set dithering mode
1045 if (gl_dither.integer)
1047 qglEnable(GL_DITHER);CHECKGLERROR
1051 qglDisable(GL_DITHER);CHECKGLERROR
1060 This is called every frame, and can also be called explicitly to flush
1064 void SCR_UpdateScreen (void)
1066 if (gl_delayfinish.integer)
1070 R_TimeReport("finish");
1073 if (r_textureunits.integer > gl_textureunits)
1074 Cvar_SetValueQuick(&r_textureunits, gl_textureunits);
1075 if (r_textureunits.integer < 1)
1076 Cvar_SetValueQuick(&r_textureunits, 1);
1078 if (gl_combine.integer && (!gl_combine_extension || r_textureunits.integer < 2))
1079 Cvar_SetValueQuick(&gl_combine, 0);
1082 r_colorscale = 1.0f / (float) (1 << v_overbrightbits.integer);
1085 r_lightmapscalebit = v_overbrightbits.integer;
1086 if (gl_combine.integer && r_textureunits.integer > 1)
1087 r_lightmapscalebit += 2;
1089 R_TimeReport("setup");
1093 R_TimeReport("clear");
1095 if (scr_conlines < vid.conheight && cls.signon == SIGNONS)
1101 if (gl_delayfinish.integer)
1103 // tell driver to commit it's partially full geometry queue to the rendering queue
1104 // (this doesn't wait for the commands themselves to complete)
1111 R_TimeReport("finish");
1116 //===========================================================================
1117 // dynamic vertex array buffer subsystem
1118 //===========================================================================
1120 float varray_vertex3f[65536*3];
1121 float varray_color4f[65536*4];
1122 float varray_texcoord2f[4][65536*2];
1123 float varray_texcoord3f[4][65536*3];
1124 float varray_normal3f[65536*3];
1126 //===========================================================================
1127 // vertex array caching subsystem
1128 //===========================================================================
1130 typedef struct rcachearraylink_s
1132 struct rcachearraylink_s *next, *prev;
1133 struct rcachearrayitem_s *data;
1137 typedef struct rcachearrayitem_s
1139 // the original request structure
1140 rcachearrayrequest_t request;
1143 // offset into r_mesh_rcachedata
1145 // for linking this into the sequential list
1146 rcachearraylink_t sequentiallink;
1147 // for linking this into the lookup list
1148 rcachearraylink_t hashlink;
1152 #define RCACHEARRAY_HASHSIZE 65536
1153 #define RCACHEARRAY_ITEMS 4096
1154 #define RCACHEARRAY_DEFAULTSIZE (4 << 20)
1156 // all active items are linked into this chain in sorted order
1157 static rcachearraylink_t r_mesh_rcachesequentialchain;
1158 // all inactive items are linked into this chain in unknown order
1159 static rcachearraylink_t r_mesh_rcachefreechain;
1160 // all active items are also linked into these chains (using their hashlink)
1161 static rcachearraylink_t r_mesh_rcachechain[RCACHEARRAY_HASHSIZE];
1163 // all items are stored here, whether active or inactive
1164 static rcachearrayitem_t r_mesh_rcacheitems[RCACHEARRAY_ITEMS];
1166 // size of data buffer
1167 static int r_mesh_rcachedata_size = RCACHEARRAY_DEFAULTSIZE;
1169 static qbyte r_mesh_rcachedata[RCACHEARRAY_DEFAULTSIZE];
1172 static int r_mesh_rcachedata_offset;
1173 static rcachearraylink_t *r_mesh_rcachesequentialchain_current;
1175 static void R_Mesh_CacheArray_Startup(void)
1178 rcachearraylink_t *l;
1179 // prepare all the linked lists
1180 l = &r_mesh_rcachesequentialchain;l->next = l->prev = l;l->data = NULL;
1181 l = &r_mesh_rcachefreechain;l->next = l->prev = l;l->data = NULL;
1182 memset(&r_mesh_rcachechain, 0, sizeof(r_mesh_rcachechain));
1183 for (i = 0;i < RCACHEARRAY_HASHSIZE;i++)
1185 l = &r_mesh_rcachechain[i];
1186 l->next = l->prev = l;
1189 memset(&r_mesh_rcacheitems, 0, sizeof(r_mesh_rcacheitems));
1190 for (i = 0;i < RCACHEARRAY_ITEMS;i++)
1192 r_mesh_rcacheitems[i].hashlink.data = r_mesh_rcacheitems[i].sequentiallink.data = &r_mesh_rcacheitems[i];
1193 l = &r_mesh_rcacheitems[i].sequentiallink;
1194 l->next = &r_mesh_rcachefreechain;
1195 l->prev = l->next->prev;
1196 l->next->prev = l->prev->next = l;
1198 // clear other state
1199 r_mesh_rcachedata_offset = 0;
1200 r_mesh_rcachesequentialchain_current = &r_mesh_rcachesequentialchain;
1203 static void R_Mesh_CacheArray_Shutdown(void)
1208 static void R_Mesh_CacheArray_ValidateState(int num)
1210 rcachearraylink_t *l, *lhead;
1211 lhead = &r_mesh_rcachesequentialchain;
1212 if (r_mesh_rcachesequentialchain_current == lhead)
1214 for (l = lhead->next;l != lhead;l = l->next)
1215 if (r_mesh_rcachesequentialchain_current == l)
1217 Sys_Error("%i", num);
1221 int R_Mesh_CacheArray(rcachearrayrequest_t *r)
1223 rcachearraylink_t *l, *lhead, *lnext;
1224 rcachearrayitem_t *d;
1225 int hashindex, offset, offsetend;
1227 //R_Mesh_CacheArray_ValidateState(3);
1228 // calculate a hashindex to choose a cache chain
1230 hashindex = CRC_Block((void *)r, sizeof(*r)) % RCACHEARRAY_HASHSIZE;
1232 // is it already cached?
1233 for (lhead = &r_mesh_rcachechain[hashindex], l = lhead->next;l != lhead;l = l->next)
1235 if (!memcmp(&l->data->request, r, sizeof(l->data->request)))
1237 // we have it cached already
1238 r->data = r_mesh_rcachedata + l->data->offset;
1243 // we need to add a new cache item, this means finding a place for the new
1244 // data and making sure we have a free item available, lots of work...
1246 // check if buffer needs to wrap
1247 if (r_mesh_rcachedata_offset + r->data_size > r_mesh_rcachedata_size)
1250 if (r->data_size * 10 > r_mesh_rcachedata_size)
1252 // realloc whole cache
1255 // reset back to start
1256 r_mesh_rcachedata_offset = 0;
1257 r_mesh_rcachesequentialchain_current = &r_mesh_rcachesequentialchain;
1259 offset = r_mesh_rcachedata_offset;
1260 r_mesh_rcachedata_offset += r->data_size;
1261 offsetend = r_mesh_rcachedata_offset;
1262 //R_Mesh_CacheArray_ValidateState(4);
1267 for (lhead = &r_mesh_rcachesequentialchain, l = lhead->next, n = 0;l != lhead;l = l->next, n++);
1268 Con_Printf("R_Mesh_CacheArray: new data range %i:%i, %i items are already linked\n", offset, offsetend, n);
1272 // make room for the new data (remove old items)
1273 lhead = &r_mesh_rcachesequentialchain;
1274 l = r_mesh_rcachesequentialchain_current;
1277 while (l != lhead && l->data->offset < offsetend && l->data->offset + l->data->request.data_size > offset)
1279 //r_mesh_rcachesequentialchain_current = l;
1280 //R_Mesh_CacheArray_ValidateState(8);
1282 // if at the end of the chain, wrap around
1284 lnext = lnext->next;
1285 //r_mesh_rcachesequentialchain_current = lnext;
1286 //R_Mesh_CacheArray_ValidateState(10);
1288 // unlink from sequential chain
1289 l->next->prev = l->prev;
1290 l->prev->next = l->next;
1291 //R_Mesh_CacheArray_ValidateState(11);
1292 // link into free chain
1293 l->next = &r_mesh_rcachefreechain;
1294 l->prev = l->next->prev;
1295 l->next->prev = l->prev->next = l;
1296 //R_Mesh_CacheArray_ValidateState(12);
1298 l = &l->data->hashlink;
1299 // unlink from hash chain
1300 l->next->prev = l->prev;
1301 l->prev->next = l->next;
1304 //r_mesh_rcachesequentialchain_current = l;
1305 //R_Mesh_CacheArray_ValidateState(9);
1307 //r_mesh_rcachesequentialchain_current = l;
1308 //R_Mesh_CacheArray_ValidateState(5);
1309 // gobble an extra item if we have no free items available
1310 if (r_mesh_rcachefreechain.next == &r_mesh_rcachefreechain)
1314 // unlink from sequential chain
1315 l->next->prev = l->prev;
1316 l->prev->next = l->next;
1317 // link into free chain
1318 l->next = &r_mesh_rcachefreechain;
1319 l->prev = l->next->prev;
1320 l->next->prev = l->prev->next = l;
1322 l = &l->data->hashlink;
1323 // unlink from hash chain
1324 l->next->prev = l->prev;
1325 l->prev->next = l->next;
1329 r_mesh_rcachesequentialchain_current = l;
1330 //R_Mesh_CacheArray_ValidateState(6);
1332 // now take an item from the free chain
1333 l = r_mesh_rcachefreechain.next;
1339 l->next->prev = l->prev;
1340 l->prev->next = l->next;
1341 // relink to sequential
1342 l->next = r_mesh_rcachesequentialchain_current->prev;
1343 l->prev = l->next->prev;
1344 while (l->next->data && l->data && l->next->data->offset <= d->offset)
1346 //Con_Printf(">\n");
1347 l->next = l->next->next;
1348 l->prev = l->prev->next;
1350 while (l->prev->data && l->data && l->prev->data->offset >= d->offset)
1352 //Con_Printf("<\n");
1353 l->prev = l->prev->prev;
1354 l->next = l->next->prev;
1356 l->next->prev = l->prev->next = l;
1357 // also link into hash chain
1358 l = &l->data->hashlink;
1359 l->next = &r_mesh_rcachechain[hashindex];
1360 l->prev = l->next->prev;
1362 l->next->prev = l->prev->next = l;
1365 //r_mesh_rcachesequentialchain_current = d->sequentiallink.next;
1367 //R_Mesh_CacheArray_ValidateState(7);
1368 // and finally set the data pointer
1369 r->data = r_mesh_rcachedata + d->offset;
1370 // and tell the caller to fill the array