X-Git-Url: http://git.xonotic.org/?a=blobdiff_plain;f=gl_backend.c;h=cc88e36d5d6ccc391e76d76be195fbb65f0b5787;hb=1d7b31b0dc290650b398e88c376dee1622f0b82d;hp=0c43daf19b87767cf27c3e0ade87c51fa8aa5202;hpb=c2995f2c4c030b1c3adb163fd84b4ea5b3d2b104;p=xonotic%2Fdarkplaces.git diff --git a/gl_backend.c b/gl_backend.c index 0c43daf1..cc88e36d 100644 --- a/gl_backend.c +++ b/gl_backend.c @@ -1,1635 +1,1431 @@ #include "quakedef.h" +#include "image.h" +#include "jpeg.h" + +//#define MESH_VAR +#define MESH_BATCH + +// 65536 is the max addressable on a Geforce 256 up until Geforce3 +// (excluding MX), seems a reasonable number... +cvar_t gl_mesh_maxverts = {0, "gl_mesh_maxverts", "65536"}; +cvar_t gl_mesh_floatcolors = {0, "gl_mesh_floatcolors", "1"}; +cvar_t gl_mesh_drawrangeelements = {0, "gl_mesh_drawrangeelements", "1"}; +#ifdef MESH_VAR +cvar_t gl_mesh_vertex_array_range = {0, "gl_mesh_vertex_array_range", "0"}; +cvar_t gl_mesh_vertex_array_range_readfrequency = {0, "gl_mesh_vertex_array_range_readfrequency", "0.2"}; +cvar_t gl_mesh_vertex_array_range_writefrequency = {0, "gl_mesh_vertex_array_range_writefrequency", "0.2"}; +cvar_t gl_mesh_vertex_array_range_priority = {0, "gl_mesh_vertex_array_range_priority", "0.7"}; +#endif +#ifdef MESH_BATCH +cvar_t gl_mesh_batching = {0, "gl_mesh_batching", "1"}; +#endif +cvar_t gl_mesh_copyarrays = {0, "gl_mesh_copyarrays", "1"}; +cvar_t gl_delayfinish = {CVAR_SAVE, "gl_delayfinish", "0"}; -cvar_t r_render = {0, "r_render", "1"}; -cvar_t gl_dither = {CVAR_SAVE, "gl_dither", "1"}; // whether or not to use dithering +cvar_t r_render = {0, "r_render", "1"}; +cvar_t gl_dither = {CVAR_SAVE, "gl_dither", "1"}; // whether or not to use dithering +cvar_t gl_lockarrays = {0, "gl_lockarrays", "1"}; -int lightscalebit; -float lightscale; -float overbrightscale; +int gl_maxdrawrangeelementsvertices; +int gl_maxdrawrangeelementsindices; -void SCR_ScreenShot_f (void); -static void R_Envmap_f (void); +#ifdef DEBUGGL +int errornumber = 0; + +void GL_PrintError(int errornumber, char *filename, int linenumber) +{ + switch(errornumber) + { +#ifdef GL_INVALID_ENUM + case GL_INVALID_ENUM: + Con_Printf("GL_INVALID_ENUM at %s:%i\n", filename, linenumber); + break; +#endif +#ifdef GL_INVALID_VALUE + case GL_INVALID_VALUE: + Con_Printf("GL_INVALID_VALUE at %s:%i\n", filename, linenumber); + break; +#endif +#ifdef GL_INVALID_OPERATION + case GL_INVALID_OPERATION: + Con_Printf("GL_INVALID_OPERATION at %s:%i\n", filename, linenumber); + break; +#endif +#ifdef GL_STACK_OVERFLOW + case GL_STACK_OVERFLOW: + Con_Printf("GL_STACK_OVERFLOW at %s:%i\n", filename, linenumber); + break; +#endif +#ifdef GL_STACK_UNDERFLOW + case GL_STACK_UNDERFLOW: + Con_Printf("GL_STACK_UNDERFLOW at %s:%i\n", filename, linenumber); + break; +#endif +#ifdef GL_OUT_OF_MEMORY + case GL_OUT_OF_MEMORY: + Con_Printf("GL_OUT_OF_MEMORY at %s:%i\n", filename, linenumber); + break; +#endif +#ifdef GL_TABLE_TOO_LARGE + case GL_TABLE_TOO_LARGE: + Con_Printf("GL_TABLE_TOO_LARGE at %s:%i\n", filename, linenumber); + break; +#endif + default: + Con_Printf("GL UNKNOWN (%i) at %s:%i\n", errornumber, filename, linenumber); + break; + } +} +#endif -static int max_meshs; -static int max_batch; -static int max_verts; // always max_meshs * 3 -#define TRANSDEPTHRES 4096 +#define BACKENDACTIVECHECK if (!backendactive) Sys_Error("GL backend function called when backend is not active\n"); -//#define FLOATCOLORS +int c_meshs, c_meshelements; -//static cvar_t gl_mesh_maxtriangles = {0, "gl_mesh_maxtriangles", "21760"}; -static cvar_t gl_mesh_maxtriangles = {0, "gl_mesh_maxtriangles", "8192"}; -static cvar_t gl_mesh_batchtriangles = {0, "gl_mesh_batchtriangles", "1024"}; -static cvar_t gl_mesh_merge = {0, "gl_mesh_merge", "1"}; -#if FLOATCOLORS -static cvar_t gl_mesh_floatcolors = {0, "gl_mesh_floatcolors", "1"}; +void SCR_ScreenShot_f (void); + +// these are externally accessible +int r_lightmapscalebit; +float r_colorscale; +GLfloat *varray_vertex3f, *varray_buf_vertex3f; +GLfloat *varray_color4f, *varray_buf_color4f; +GLfloat *varray_texcoord3f[MAX_TEXTUREUNITS], *varray_buf_texcoord3f[MAX_TEXTUREUNITS]; +GLfloat *varray_texcoord2f[MAX_TEXTUREUNITS], *varray_buf_texcoord2f[MAX_TEXTUREUNITS]; +static qbyte *varray_buf_color4b; +int mesh_maxverts; +#ifdef MESH_VAR +int mesh_var; +float mesh_var_readfrequency; +float mesh_var_writefrequency; +float mesh_var_priority; +#endif +int varray_offset = 0, varray_offsetnext = 0; +GLuint *varray_buf_elements3i; +int mesh_maxelements = 32768; +#ifdef MESH_BATCH +int gl_batchvertexfirst = 0; +int gl_batchvertexcount = 0; +int gl_batchelementcount = 0; #endif -static cvar_t gl_mesh_dupetransverts = {0, "gl_mesh_dupetransverts", "0"}; -static cvar_t gl_mesh_sorttransbymesh = {0, "gl_mesh_sorttransbymesh", "1"}; -typedef struct buf_mesh_s -{ - //struct buf_mesh_s *next; - int depthmask; - int depthtest; - int blendfunc1, blendfunc2; - int textures[MAX_TEXTUREUNITS]; - float texturergbscale[MAX_TEXTUREUNITS]; - int firsttriangle; - int triangles; - int firstvert; - int lastvert; - struct buf_mesh_s *chain; - struct buf_transtri_s *transchain; - //struct buf_transtri_s **transchainpointer; -} -buf_mesh_t; +static matrix4x4_t backend_viewmatrix; +static matrix4x4_t backend_modelmatrix; +static matrix4x4_t backend_modelviewmatrix; +static matrix4x4_t backend_glmodelviewmatrix; +static matrix4x4_t backend_projectmatrix; -typedef struct buf_transtri_s -{ - struct buf_transtri_s *next; - struct buf_transtri_s *meshsortchain; - buf_mesh_t *mesh; - int index[3]; -} -buf_transtri_t; +static int backendunits, backendactive; +static mempool_t *gl_backend_mempool; -typedef struct buf_tri_s -{ - int index[3]; -} -buf_tri_t; +/* +note: here's strip order for a terrain row: +0--1--2--3--4 +|\ |\ |\ |\ | +| \| \| \| \| +A--B--C--D--E + +A0B, 01B, B1C, 12C, C2D, 23D, D3E, 34E + +*elements++ = i + row; +*elements++ = i; +*elements++ = i + row + 1; +*elements++ = i; +*elements++ = i + 1; +*elements++ = i + row + 1; +*/ -typedef struct +void GL_Backend_AllocElementsArray(void) { - float v[4]; + if (varray_buf_elements3i) + Mem_Free(varray_buf_elements3i); + varray_buf_elements3i = Mem_Alloc(gl_backend_mempool, mesh_maxelements * sizeof(GLuint)); } -buf_vertex_t; -#if FLOATCOLORS -typedef struct +void GL_Backend_FreeElementArray(void) { - float c[4]; + if (varray_buf_elements3i) + Mem_Free(varray_buf_elements3i); + varray_buf_elements3i = NULL; } -buf_fcolor_t; -#endif -typedef struct +void GL_Backend_CheckCvars(void) { - byte c[4]; + if (gl_mesh_maxverts.integer < 1024) + Cvar_SetValueQuick(&gl_mesh_maxverts, 1024); + if (gl_mesh_maxverts.integer > 65536) + Cvar_SetValueQuick(&gl_mesh_maxverts, 65536); +#ifdef MESH_VAR + if (gl_mesh_vertex_array_range.integer && !gl_support_var) + Cvar_SetValueQuick(&gl_mesh_vertex_array_range, 0); + if (gl_mesh_vertex_array_range_readfrequency.value < 0) + Cvar_SetValueQuick(&gl_mesh_vertex_array_range_readfrequency, 0); + if (gl_mesh_vertex_array_range_readfrequency.value > 1) + Cvar_SetValueQuick(&gl_mesh_vertex_array_range_readfrequency, 1); + if (gl_mesh_vertex_array_range_writefrequency.value < 0) + Cvar_SetValueQuick(&gl_mesh_vertex_array_range_writefrequency, 0); + if (gl_mesh_vertex_array_range_writefrequency.value > 1) + Cvar_SetValueQuick(&gl_mesh_vertex_array_range_writefrequency, 1); + if (gl_mesh_vertex_array_range_priority.value < 0) + Cvar_SetValueQuick(&gl_mesh_vertex_array_range_priority, 0); + if (gl_mesh_vertex_array_range_priority.value > 1) + Cvar_SetValueQuick(&gl_mesh_vertex_array_range_priority, 1); +#endif } -buf_bcolor_t; -typedef struct +int polygonelements[768]; + +static void R_Mesh_CacheArray_Startup(void); +static void R_Mesh_CacheArray_Shutdown(void); +void GL_Backend_AllocArrays(void) { - float t[2]; -} -buf_texcoord_t; + int i, size; + qbyte *data; + + if (!gl_backend_mempool) + { + gl_backend_mempool = Mem_AllocPool("GL_Backend"); + varray_buf_vertex3f = NULL; + varray_buf_color4f = NULL; + varray_buf_color4b = NULL; + varray_buf_elements3i = NULL; + for (i = 0;i < MAX_TEXTUREUNITS;i++) + varray_buf_texcoord3f[i] = varray_buf_texcoord2f[i] = NULL; + } -static float meshfarclip; -static int currentmesh, currenttriangle, currentvertex, backendunits, backendactive, meshmerge, transranout; -#if FLOATCOLORS -static int floatcolors; + if (varray_buf_vertex3f) +#ifdef MESH_VAR + VID_FreeVertexArrays(varray_buf_vertex3f); +#else + Mem_Free(varray_buf_vertex3f); #endif -static buf_mesh_t *buf_mesh; -static buf_tri_t *buf_tri; -static buf_vertex_t *buf_vertex; -#if FLOATCOLORS -static buf_fcolor_t *buf_fcolor; + varray_buf_vertex3f = NULL; + varray_buf_color4f = NULL; + varray_buf_color4b = NULL; + for (i = 0;i < MAX_TEXTUREUNITS;i++) + varray_buf_texcoord3f[i] = varray_buf_texcoord2f[i] = NULL; + + mesh_maxverts = gl_mesh_maxverts.integer; + size = mesh_maxverts * (sizeof(float[3]) + sizeof(float[4]) + sizeof(qbyte[4]) + (sizeof(float[3]) + sizeof(float[2])) * backendunits); +#ifdef MESH_VAR + mesh_var = gl_mesh_vertex_array_range.integer && gl_support_var; + mesh_var_readfrequency = gl_mesh_vertex_array_range_readfrequency.value; + mesh_var_writefrequency = gl_mesh_vertex_array_range_writefrequency.value; + mesh_var_priority = gl_mesh_vertex_array_range_priority.value; + data = VID_AllocVertexArrays(gl_backend_mempool, size, gl_mesh_vertex_array_range.integer, gl_mesh_vertex_array_range_readfrequency.value, gl_mesh_vertex_array_range_writefrequency.value, gl_mesh_vertex_array_range_priority.value); +#else + data = Mem_Alloc(gl_backend_mempool, size); #endif -static buf_bcolor_t *buf_bcolor; -static buf_texcoord_t *buf_texcoord[MAX_TEXTUREUNITS]; - -static int currenttransmesh, currenttransvertex, currenttranstriangle; -static buf_mesh_t *buf_transmesh; -static buf_transtri_t *buf_transtri; -static buf_transtri_t **buf_transtri_list; -static buf_vertex_t *buf_transvertex; -#if FLOATCOLORS -static buf_fcolor_t *buf_transfcolor; + + varray_buf_vertex3f = (void *)data;data += sizeof(float[3]) * mesh_maxverts; + varray_buf_color4f = (void *)data;data += sizeof(float[4]) * mesh_maxverts; + for (i = 0;i < backendunits;i++) + { + varray_buf_texcoord3f[i] = (void *)data;data += sizeof(float[3]) * mesh_maxverts; + varray_buf_texcoord2f[i] = (void *)data;data += sizeof(float[2]) * mesh_maxverts; + } + for (;i < MAX_TEXTUREUNITS;i++) + varray_buf_texcoord3f[i] = varray_buf_texcoord2f[i] = NULL; + varray_buf_color4b = (void *)data;data += sizeof(qbyte[4]) * mesh_maxverts; + + GL_Backend_AllocElementsArray(); + +#ifdef MESH_VAR + if (mesh_var) + { + CHECKGLERROR + qglVertexArrayRangeNV(size, varray_buf_vertex3f); + CHECKGLERROR + } #endif -static buf_bcolor_t *buf_transbcolor; -static buf_texcoord_t *buf_transtexcoord[MAX_TEXTUREUNITS]; -static mempool_t *gl_backend_mempool; -static int resizingbuffers = false; + R_Mesh_CacheArray_Startup(); +} -static void gl_backend_start(void) +void GL_Backend_FreeArrays(void) { int i; - max_verts = max_meshs * 3; - - if (!gl_backend_mempool) - gl_backend_mempool = Mem_AllocPool("GL_Backend"); + R_Mesh_CacheArray_Shutdown(); -#define BACKENDALLOC(var, count, sizeofstruct)\ - {\ - var = Mem_Alloc(gl_backend_mempool, count * sizeof(sizeofstruct));\ - if (var == NULL)\ - Sys_Error("gl_backend_start: unable to allocate memory\n");\ - memset(var, 0, count * sizeof(sizeofstruct));\ +#ifdef MESH_VAR + if (mesh_var) + { + CHECKGLERROR + qglDisableClientState(GL_VERTEX_ARRAY_RANGE_NV); + CHECKGLERROR } - - BACKENDALLOC(buf_mesh, max_meshs, buf_mesh_t) - BACKENDALLOC(buf_tri, max_meshs, buf_tri_t) - BACKENDALLOC(buf_vertex, max_verts, buf_vertex_t) -#if FLOATCOLORS - BACKENDALLOC(buf_fcolor, max_verts, buf_fcolor_t) #endif - BACKENDALLOC(buf_bcolor, max_verts, buf_bcolor_t) - - BACKENDALLOC(buf_transmesh, max_meshs, buf_mesh_t) - BACKENDALLOC(buf_transtri, max_meshs, buf_transtri_t) - BACKENDALLOC(buf_transtri_list, TRANSDEPTHRES, buf_transtri_t *) - BACKENDALLOC(buf_transvertex, max_verts, buf_vertex_t) -#if FLOATCOLORS - BACKENDALLOC(buf_transfcolor, max_verts, buf_fcolor_t) -#endif - BACKENDALLOC(buf_transbcolor, max_verts, buf_bcolor_t) + if (varray_buf_vertex3f) +#ifdef MESH_VAR + VID_FreeVertexArrays(varray_buf_vertex3f); +#else + Mem_Free(varray_buf_vertex3f); +#endif + varray_buf_vertex3f = NULL; + varray_buf_color4f = NULL; + varray_buf_color4b = NULL; for (i = 0;i < MAX_TEXTUREUNITS;i++) - { - // only allocate as many texcoord arrays as we need - if (i < gl_textureunits) - { - BACKENDALLOC(buf_texcoord[i], max_verts, buf_texcoord_t) - BACKENDALLOC(buf_transtexcoord[i], max_verts, buf_texcoord_t) - } - else - { - buf_texcoord[i] = NULL; - buf_transtexcoord[i] = NULL; - } - } - backendunits = min(MAX_TEXTUREUNITS, gl_textureunits); - backendactive = true; + varray_buf_texcoord3f[i] = varray_buf_texcoord2f[i] = NULL; + varray_buf_elements3i = NULL; + + Mem_FreePool(&gl_backend_mempool); } -static void gl_backend_shutdown(void) +static void gl_backend_start(void) { - //int i; - /* -#define BACKENDFREE(var)\ - if (var)\ - {\ - Mem_Free(var);\ - var = NULL;\ + GL_Backend_CheckCvars(); + + Con_Printf("OpenGL Backend started with gl_mesh_maxverts %i\n", gl_mesh_maxverts.integer); + if (qglDrawRangeElements != NULL) + { + CHECKGLERROR + qglGetIntegerv(GL_MAX_ELEMENTS_VERTICES, &gl_maxdrawrangeelementsvertices); + CHECKGLERROR + qglGetIntegerv(GL_MAX_ELEMENTS_INDICES, &gl_maxdrawrangeelementsindices); + CHECKGLERROR + Con_Printf("glDrawRangeElements detected (max vertices %i, max indices %i)\n", gl_maxdrawrangeelementsvertices, gl_maxdrawrangeelementsindices); + } + if (strstr(gl_renderer, "3Dfx")) + { + Con_Printf("3Dfx driver detected, forcing gl_mesh_floatcolors to 0 to prevent crashs\n"); + Cvar_SetValueQuick(&gl_mesh_floatcolors, 0); } - */ - /* -#define BACKENDFREE(var) var = NULL; - BACKENDFREE(buf_mesh) - BACKENDFREE(buf_tri) - BACKENDFREE(buf_vertex) -#if FLOATCOLORS - BACKENDFREE(buf_fcolor) -#endif - BACKENDFREE(buf_bcolor) - - BACKENDFREE(buf_transmesh) - BACKENDFREE(buf_transtri) - BACKENDFREE(buf_transtri_list) - BACKENDFREE(buf_transvertex) -#if FLOATCOLORS - BACKENDFREE(buf_transfcolor) -#endif - BACKENDFREE(buf_transbcolor) + backendunits = min(MAX_TEXTUREUNITS, gl_textureunits); - for (i = 0;i < MAX_TEXTUREUNITS;i++) + GL_Backend_AllocArrays(); + +#ifdef MESH_VAR + if (mesh_var) { - BACKENDFREE(buf_texcoord[i]) - BACKENDFREE(buf_transtexcoord[i]) + CHECKGLERROR + qglEnableClientState(GL_VERTEX_ARRAY_RANGE_NV); + CHECKGLERROR } - */ - - if (resizingbuffers) - Mem_EmptyPool(gl_backend_mempool); - else - Mem_FreePool(&gl_backend_mempool); +#endif + varray_offset = varray_offsetnext = 0; +#ifdef MESH_BATCH + gl_batchvertexfirst = 0; + gl_batchvertexcount = 0; + gl_batchelementcount = 0; +#endif - backendunits = 0; - backendactive = false; + backendactive = true; } -static void gl_backend_bufferchanges(int init) +static void gl_backend_shutdown(void) { - // 21760 is (65536 / 3) rounded off to a multiple of 128 - if (gl_mesh_maxtriangles.integer < 256) - Cvar_SetValue("gl_mesh_maxtriangles", 256); - if (gl_mesh_maxtriangles.integer > 21760) - Cvar_SetValue("gl_mesh_maxtriangles", 21760); - - if (gl_mesh_batchtriangles.integer < 0) - Cvar_SetValue("gl_mesh_batchtriangles", 0); - if (gl_mesh_batchtriangles.integer > gl_mesh_maxtriangles.integer) - Cvar_SetValue("gl_mesh_batchtriangles", gl_mesh_maxtriangles.integer); + backendunits = 0; + backendactive = false; - max_batch = gl_mesh_batchtriangles.integer; + Con_Printf("OpenGL Backend shutting down\n"); - if (max_meshs != gl_mesh_maxtriangles.integer) +#ifdef MESH_VAR + if (mesh_var) { - max_meshs = gl_mesh_maxtriangles.integer; - - if (!init) - { - resizingbuffers = true; - gl_backend_shutdown(); - gl_backend_start(); - resizingbuffers = false; - } + CHECKGLERROR + qglDisableClientState(GL_VERTEX_ARRAY_RANGE_NV); + CHECKGLERROR } +#endif + + GL_Backend_FreeArrays(); } -float r_farclip, r_newfarclip; +void GL_Backend_ResizeArrays(int numvertices) +{ + Cvar_SetValueQuick(&gl_mesh_maxverts, numvertices); + GL_Backend_CheckCvars(); + mesh_maxverts = gl_mesh_maxverts.integer; + GL_Backend_AllocArrays(); +} static void gl_backend_newmap(void) { - r_farclip = r_newfarclip = 2048.0f; } -int polyindexarray[768]; - void gl_backend_init(void) { int i; - Cvar_RegisterVariable (&r_render); - Cvar_RegisterVariable (&gl_dither); + for (i = 0;i < POLYGONELEMENTS_MAXPOINTS - 2;i++) + { + polygonelements[i * 3 + 0] = 0; + polygonelements[i * 3 + 1] = i + 1; + polygonelements[i * 3 + 2] = i + 2; + } + + Cvar_RegisterVariable(&r_render); + Cvar_RegisterVariable(&gl_dither); + Cvar_RegisterVariable(&gl_lockarrays); + Cvar_RegisterVariable(&gl_delayfinish); #ifdef NORENDER Cvar_SetValue("r_render", 0); #endif - Cmd_AddCommand ("screenshot",SCR_ScreenShot_f); - Cmd_AddCommand ("envmap", R_Envmap_f); - - Cvar_RegisterVariable(&gl_mesh_maxtriangles); - Cvar_RegisterVariable(&gl_mesh_batchtriangles); - Cvar_RegisterVariable(&gl_mesh_merge); -#if FLOATCOLORS + Cvar_RegisterVariable(&gl_mesh_maxverts); Cvar_RegisterVariable(&gl_mesh_floatcolors); + Cvar_RegisterVariable(&gl_mesh_drawrangeelements); +#ifdef MESH_VAR + Cvar_RegisterVariable(&gl_mesh_vertex_array_range); + Cvar_RegisterVariable(&gl_mesh_vertex_array_range_readfrequency); + Cvar_RegisterVariable(&gl_mesh_vertex_array_range_writefrequency); + Cvar_RegisterVariable(&gl_mesh_vertex_array_range_priority); #endif - Cvar_RegisterVariable(&gl_mesh_dupetransverts); - Cvar_RegisterVariable(&gl_mesh_sorttransbymesh); +#ifdef MESH_BATCH + Cvar_RegisterVariable(&gl_mesh_batching); +#endif + Cvar_RegisterVariable(&gl_mesh_copyarrays); R_RegisterModule("GL_Backend", gl_backend_start, gl_backend_shutdown, gl_backend_newmap); - gl_backend_bufferchanges(true); - for (i = 0;i < 256;i++) - { - polyindexarray[i*3+0] = 0; - polyindexarray[i*3+1] = i + 1; - polyindexarray[i*3+2] = i + 2; - } } -static void MYgluPerspective(GLdouble fovx, GLdouble fovy, GLdouble aspect, GLdouble zNear, GLdouble zFar ) +void GL_SetupView_ViewPort (int x, int y, int width, int height) { - GLdouble xmax, ymax; + if (!r_render.integer) + return; - xmax = zNear * tan( fovx * M_PI / 360.0 ) * aspect; - ymax = zNear * tan( fovy * M_PI / 360.0 ); + // y is weird beause OpenGL is bottom to top, we use top to bottom + qglViewport(x, vid.realheight - (y + height), width, height); + CHECKGLERROR +} - glFrustum(-xmax, xmax, -ymax, ymax, zNear, zFar ); +void GL_SetupView_Orientation_Identity (void) +{ + Matrix4x4_CreateIdentity(&backend_viewmatrix); + memset(&backend_modelmatrix, 0, sizeof(backend_modelmatrix)); } +void GL_SetupView_Orientation_FromEntity (vec3_t origin, vec3_t angles) +{ + Matrix4x4_CreateRotate(&backend_viewmatrix, -90, 1, 0, 0); + Matrix4x4_ConcatRotate(&backend_viewmatrix, 90, 0, 0, 1); + Matrix4x4_ConcatRotate(&backend_viewmatrix, -angles[2], 1, 0, 0); + Matrix4x4_ConcatRotate(&backend_viewmatrix, -angles[0], 0, 1, 0); + Matrix4x4_ConcatRotate(&backend_viewmatrix, -angles[1], 0, 0, 1); + Matrix4x4_ConcatTranslate(&backend_viewmatrix, -origin[0], -origin[1], -origin[2]); + memset(&backend_modelmatrix, 0, sizeof(backend_modelmatrix)); +} -/* -============= -GL_SetupFrame -============= -*/ -static void GL_SetupFrame (void) +void GL_SetupView_Mode_Perspective (double fovx, double fovy, double zNear, double zFar) { + double xmax, ymax; + if (!r_render.integer) return; -// glClear (GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT); // LordHavoc: moved to SCR_UpdateScreen - gldepthmin = 0; - gldepthmax = 1; - glDepthFunc (GL_LEQUAL); + // set up viewpoint + qglMatrixMode(GL_PROJECTION);CHECKGLERROR + qglLoadIdentity();CHECKGLERROR + // pyramid slopes + xmax = zNear * tan(fovx * M_PI / 360.0); + ymax = zNear * tan(fovy * M_PI / 360.0); + // set view pyramid + qglFrustum(-xmax, xmax, -ymax, ymax, zNear, zFar);CHECKGLERROR + qglMatrixMode(GL_MODELVIEW);CHECKGLERROR + GL_SetupView_Orientation_Identity(); +} - glDepthRange (gldepthmin, gldepthmax); +void GL_SetupView_Mode_PerspectiveInfiniteFarClip (double fovx, double fovy, double zNear) +{ + float nudge, m[16]; - // update farclip based on previous frame - r_farclip = r_newfarclip; + if (!r_render.integer) + return; // set up viewpoint - glMatrixMode(GL_PROJECTION); - glLoadIdentity (); - - // y is weird beause OpenGL is bottom to top, we use top to bottom - glViewport(r_refdef.x, vid.realheight - (r_refdef.y + r_refdef.height), r_refdef.width, r_refdef.height); -// yfov = 2*atan((float)r_refdef.height/r_refdef.width)*180/M_PI; - MYgluPerspective (r_refdef.fov_x, r_refdef.fov_y, r_refdef.width/r_refdef.height, 4, r_farclip); - - glCullFace(GL_FRONT); - - glMatrixMode(GL_MODELVIEW); - glLoadIdentity (); - - glRotatef (-90, 1, 0, 0); // put Z going up - glRotatef (90, 0, 0, 1); // put Z going up - glRotatef (-r_refdef.viewangles[2], 1, 0, 0); - glRotatef (-r_refdef.viewangles[0], 0, 1, 0); - glRotatef (-r_refdef.viewangles[1], 0, 0, 1); - glTranslatef (-r_refdef.vieworg[0], -r_refdef.vieworg[1], -r_refdef.vieworg[2]); - -// glGetFloatv (GL_MODELVIEW_MATRIX, r_world_matrix); - - // - // set drawing parms - // -// if (gl_cull.integer) - glEnable(GL_CULL_FACE); -// else -// glDisable(GL_CULL_FACE); - - glEnable(GL_BLEND); // was Disable - glEnable(GL_DEPTH_TEST); - glDepthMask(1); + qglMatrixMode(GL_PROJECTION);CHECKGLERROR + qglLoadIdentity();CHECKGLERROR + // set view pyramid + nudge = 1.0 - 1.0 / (1<<23); + m[ 0] = 1.0 / tan(fovx * M_PI / 360.0); + m[ 1] = 0; + m[ 2] = 0; + m[ 3] = 0; + m[ 4] = 0; + m[ 5] = 1.0 / tan(fovy * M_PI / 360.0); + m[ 6] = 0; + m[ 7] = 0; + m[ 8] = 0; + m[ 9] = 0; + m[10] = -1 * nudge; + m[11] = -1 * nudge; + m[12] = 0; + m[13] = 0; + m[14] = -2 * zNear * nudge; + m[15] = 0; + qglLoadMatrixf(m); + qglMatrixMode(GL_MODELVIEW);CHECKGLERROR + GL_SetupView_Orientation_Identity(); + backend_projectmatrix.m[0][0] = m[0]; + backend_projectmatrix.m[1][0] = m[1]; + backend_projectmatrix.m[2][0] = m[2]; + backend_projectmatrix.m[3][0] = m[3]; + backend_projectmatrix.m[0][1] = m[4]; + backend_projectmatrix.m[1][1] = m[5]; + backend_projectmatrix.m[2][1] = m[6]; + backend_projectmatrix.m[3][1] = m[7]; + backend_projectmatrix.m[0][2] = m[8]; + backend_projectmatrix.m[1][2] = m[9]; + backend_projectmatrix.m[2][2] = m[10]; + backend_projectmatrix.m[3][2] = m[11]; + backend_projectmatrix.m[0][3] = m[12]; + backend_projectmatrix.m[1][3] = m[13]; + backend_projectmatrix.m[2][3] = m[14]; + backend_projectmatrix.m[3][3] = m[15]; } -static float viewdist; +void GL_SetupView_Mode_Ortho (double x1, double y1, double x2, double y2, double zNear, double zFar) +{ + if (!r_render.integer) + return; -int c_meshs, c_meshtris, c_transmeshs, c_transtris; + // set up viewpoint + qglMatrixMode(GL_PROJECTION);CHECKGLERROR + qglLoadIdentity();CHECKGLERROR + qglOrtho(x1, x2, y2, y1, zNear, zFar); + qglMatrixMode(GL_MODELVIEW);CHECKGLERROR + GL_SetupView_Orientation_Identity(); +} -// called at beginning of frame -void R_Mesh_Clear(void) +typedef struct gltextureunit_s { - if (!backendactive) - Sys_Error("R_Mesh_Clear: called when backend is not active\n"); - - gl_backend_bufferchanges(false); - - currentmesh = 0; - currenttriangle = 0; - currentvertex = 0; - currenttransmesh = 0; - currenttranstriangle = 0; - currenttransvertex = 0; - meshfarclip = 0; - meshmerge = gl_mesh_merge.integer; -#if FLOATCOLORS - floatcolors = gl_mesh_floatcolors.integer; -#endif - transranout = false; - viewdist = DotProduct(r_origin, vpn); - - c_meshs = 0; - c_meshtris = 0; - c_transmeshs = 0; - c_transtris = 0; + int t1d, t2d, t3d, tcubemap; + int arrayenabled, arrayis3d; + const void *pointer_texcoord; + float rgbscale, alphascale; + int combinergb, combinealpha; + // FIXME: add more combine stuff +} +gltextureunit_t; - GL_SetupFrame(); +static struct +{ + int blendfunc1; + int blendfunc2; + int blend; + GLboolean depthmask; + int depthdisable; + int unit; + int clientunit; + gltextureunit_t units[MAX_TEXTUREUNITS]; + int colorarray; + float color4f[4]; + int lockrange_first; + int lockrange_count; + int pointervertexcount; + const void *pointer_vertex; + const void *pointer_color; } +gl_state; -#ifdef DEBUGGL -void GL_PrintError(int errornumber, char *filename, int linenumber) +void GL_SetupTextureState(void) { - switch(errornumber) + int i; + gltextureunit_t *unit; + for (i = 0;i < backendunits;i++) { - case GL_INVALID_ENUM: - Con_Printf("GL_INVALID_ENUM at %s:%i\n", filename, linenumber); - break; - case GL_INVALID_VALUE: - Con_Printf("GL_INVALID_VALUE at %s:%i\n", filename, linenumber); - break; - case GL_INVALID_OPERATION: - Con_Printf("GL_INVALID_OPERATION at %s:%i\n", filename, linenumber); - break; - case GL_STACK_OVERFLOW: - Con_Printf("GL_STACK_OVERFLOW at %s:%i\n", filename, linenumber); - break; - case GL_STACK_UNDERFLOW: - Con_Printf("GL_STACK_UNDERFLOW at %s:%i\n", filename, linenumber); - break; - case GL_OUT_OF_MEMORY: - Con_Printf("GL_OUT_OF_MEMORY at %s:%i\n", filename, linenumber); - break; -#ifdef GL_TABLE_TOO_LARGE - case GL_TABLE_TOO_LARGE: - Con_Printf("GL_TABLE_TOO_LARGE at %s:%i\n", filename, linenumber); - break; -#endif - default: - Con_Printf("GL UNKNOWN (%i) at %s:%i\n", errornumber, filename, linenumber); - break; + if (qglActiveTexture) + qglActiveTexture(GL_TEXTURE0_ARB + (gl_state.unit = i));CHECKGLERROR + if (qglClientActiveTexture) + qglClientActiveTexture(GL_TEXTURE0_ARB + (gl_state.clientunit = i));CHECKGLERROR + unit = gl_state.units + i; + unit->t1d = 0; + unit->t2d = 0; + unit->t3d = 0; + unit->tcubemap = 0; + unit->arrayenabled = false; + unit->arrayis3d = false; + unit->pointer_texcoord = NULL; + unit->rgbscale = 1; + unit->alphascale = 1; + unit->combinergb = GL_MODULATE; + unit->combinealpha = GL_MODULATE; + qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR + qglTexCoordPointer(2, GL_FLOAT, sizeof(float[2]), varray_buf_texcoord2f[i]);CHECKGLERROR + qglDisable(GL_TEXTURE_1D);CHECKGLERROR + qglDisable(GL_TEXTURE_2D);CHECKGLERROR + if (gl_texture3d) + { + qglDisable(GL_TEXTURE_3D);CHECKGLERROR + } + if (gl_texturecubemap) + { + qglDisable(GL_TEXTURE_CUBE_MAP_ARB);CHECKGLERROR + } + if (gl_combine.integer) + { + qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_COMBINE_ARB);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, GL_MODULATE);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE0_RGB_ARB, GL_TEXTURE);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE1_RGB_ARB, GL_PREVIOUS_ARB);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE2_RGB_ARB, GL_TEXTURE);CHECKGLERROR // for GL_INTERPOLATE_ARB mode + qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND0_RGB_ARB, GL_SRC_COLOR);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND1_RGB_ARB, GL_SRC_COLOR);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND2_RGB_ARB, GL_SRC_ALPHA);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_ALPHA_ARB, GL_MODULATE);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE0_ALPHA_ARB, GL_TEXTURE);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE1_ALPHA_ARB, GL_PREVIOUS_ARB);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE2_ALPHA_ARB, GL_CONSTANT_ARB);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND0_ALPHA_ARB, GL_SRC_ALPHA);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND1_ALPHA_ARB, GL_SRC_ALPHA);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND2_ALPHA_ARB, GL_SRC_ALPHA);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, 1);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_ALPHA_SCALE, 1);CHECKGLERROR + } + else + { + qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);CHECKGLERROR + } } } -int errornumber = 0; -#endif - -// renders mesh buffers, called to flush buffers when full -void R_Mesh_Render(void) +void GL_Backend_ResetState(void) { - int i, k, blendfunc1, blendfunc2, blend, depthmask, depthtest, unit = 0, clientunit = 0, firsttriangle, triangles, firstvert, lastvert, texture[MAX_TEXTUREUNITS]; - float farclip, texturergbscale[MAX_TEXTUREUNITS]; - buf_mesh_t *mesh; - if (!backendactive) - Sys_Error("R_Mesh_Render: called when backend is not active\n"); - if (!currentmesh) - return; + memset(&gl_state, 0, sizeof(gl_state)); + gl_state.depthdisable = false; + gl_state.blendfunc1 = GL_ONE; + gl_state.blendfunc2 = GL_ZERO; + gl_state.blend = false; + gl_state.depthmask = GL_TRUE; + gl_state.colorarray = false; + gl_state.color4f[0] = gl_state.color4f[1] = gl_state.color4f[2] = gl_state.color4f[3] = 1; + gl_state.lockrange_first = 0; + gl_state.lockrange_count = 0; + gl_state.pointervertexcount = 0; + gl_state.pointer_vertex = NULL; + gl_state.pointer_color = NULL; -CHECKGLERROR - - // push out farclip based on vertices - for (i = 0;i < currentvertex;i++) + CHECKGLERROR + qglDisableClientState(GL_COLOR_ARRAY);CHECKGLERROR + qglDisableClientState(GL_VERTEX_ARRAY);CHECKGLERROR + + qglEnable(GL_CULL_FACE);CHECKGLERROR + qglCullFace(GL_FRONT);CHECKGLERROR + qglEnable(GL_DEPTH_TEST);CHECKGLERROR + qglBlendFunc(gl_state.blendfunc1, gl_state.blendfunc2);CHECKGLERROR + qglDisable(GL_BLEND);CHECKGLERROR + qglDepthMask(gl_state.depthmask);CHECKGLERROR + qglVertexPointer(3, GL_FLOAT, sizeof(float[3]), varray_buf_vertex3f);CHECKGLERROR + qglEnableClientState(GL_VERTEX_ARRAY);CHECKGLERROR + if (gl_mesh_floatcolors.integer) + { + qglColorPointer(4, GL_FLOAT, sizeof(float[4]), varray_buf_color4f);CHECKGLERROR + } + else { - farclip = DotProduct(buf_vertex[i].v, vpn); - if (meshfarclip < farclip) - meshfarclip = farclip; + qglColorPointer(4, GL_UNSIGNED_BYTE, sizeof(qbyte[4]), varray_buf_color4b);CHECKGLERROR } + GL_Color(0, 0, 0, 0); + GL_Color(1, 1, 1, 1); - farclip = meshfarclip + 256.0f - viewdist; // + 256 just to be safe + GL_SetupTextureState(); +} - // push out farclip for next frame - if (farclip > r_newfarclip) - r_newfarclip = ceil((farclip + 255) / 256) * 256 + 256; +void GL_UseColorArray(void) +{ + if (!gl_state.colorarray) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + gl_state.colorarray = true; + qglEnableClientState(GL_COLOR_ARRAY);CHECKGLERROR + } +} - for (i = 0;i < backendunits;i++) - texturergbscale[i] = 1; - - glEnable(GL_CULL_FACE); -CHECKGLERROR - glCullFace(GL_FRONT); -CHECKGLERROR - depthtest = true; - glEnable(GL_DEPTH_TEST); -CHECKGLERROR - blendfunc1 = GL_ONE; - blendfunc2 = GL_ZERO; - glBlendFunc(blendfunc1, blendfunc2); -CHECKGLERROR - blend = 0; - glDisable(GL_BLEND); -CHECKGLERROR - depthmask = true; - glDepthMask((GLboolean) depthmask); -CHECKGLERROR - - glVertexPointer(3, GL_FLOAT, sizeof(buf_vertex_t), buf_vertex); -CHECKGLERROR - glEnableClientState(GL_VERTEX_ARRAY); -CHECKGLERROR -#if FLOATCOLORS - if (floatcolors) +void GL_Color(float cr, float cg, float cb, float ca) +{ + if (gl_state.colorarray) { - glColorPointer(4, GL_FLOAT, sizeof(buf_fcolor_t), buf_fcolor); -CHECKGLERROR +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + gl_state.colorarray = false; + qglDisableClientState(GL_COLOR_ARRAY);CHECKGLERROR + gl_state.color4f[0] = cr; + gl_state.color4f[1] = cg; + gl_state.color4f[2] = cb; + gl_state.color4f[3] = ca; + qglColor4f(cr, cg, cb, ca); } else { + if (gl_state.color4f[0] != cr || gl_state.color4f[1] != cg || gl_state.color4f[2] != cb || gl_state.color4f[3] != ca) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); #endif - glColorPointer(4, GL_UNSIGNED_BYTE, sizeof(buf_bcolor_t), buf_bcolor); -CHECKGLERROR -#if FLOATCOLORS + gl_state.color4f[0] = cr; + gl_state.color4f[1] = cg; + gl_state.color4f[2] = cb; + gl_state.color4f[3] = ca; + qglColor4f(cr, cg, cb, ca); + } } -#endif - glEnableClientState(GL_COLOR_ARRAY); -CHECKGLERROR +} - if (backendunits > 1) +void GL_LockArrays(int first, int count) +{ + if (gl_state.lockrange_count != count || gl_state.lockrange_first != first) { - for (i = 0;i < backendunits;i++) + if (gl_state.lockrange_count) { - qglActiveTexture(GL_TEXTURE0_ARB + (unit = i)); -CHECKGLERROR - glBindTexture(GL_TEXTURE_2D, (texture[i] = 0)); -CHECKGLERROR - glDisable(GL_TEXTURE_2D); -CHECKGLERROR - if (gl_combine.integer) - { - glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_COMBINE_ARB); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, GL_MODULATE); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE0_RGB_ARB, GL_TEXTURE); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE1_RGB_ARB, GL_PREVIOUS_ARB); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE2_RGB_ARB, GL_CONSTANT_ARB); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND0_RGB_ARB, GL_SRC_COLOR); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND1_RGB_ARB, GL_SRC_COLOR); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND2_RGB_ARB, GL_SRC_ALPHA); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_ALPHA_ARB, GL_MODULATE); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE0_ALPHA_ARB, GL_TEXTURE); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE1_ALPHA_ARB, GL_PREVIOUS_ARB); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE2_ALPHA_ARB, GL_CONSTANT_ARB); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND0_ALPHA_ARB, GL_SRC_ALPHA); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND1_ALPHA_ARB, GL_SRC_ALPHA); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND2_ALPHA_ARB, GL_SRC_ALPHA); -CHECKGLERROR - glTexEnvf(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, 1.0f); -CHECKGLERROR - glTexEnvf(GL_TEXTURE_ENV, GL_ALPHA_SCALE, 1.0f); -CHECKGLERROR - } - else - { - glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE); -CHECKGLERROR - } - - qglClientActiveTexture(GL_TEXTURE0_ARB + (clientunit = i)); -CHECKGLERROR - glTexCoordPointer(2, GL_FLOAT, sizeof(buf_texcoord_t), buf_texcoord[i]); -CHECKGLERROR - glEnableClientState(GL_TEXTURE_COORD_ARRAY); -CHECKGLERROR + gl_state.lockrange_count = 0; + CHECKGLERROR + qglUnlockArraysEXT(); + CHECKGLERROR + } + if (count && gl_supportslockarrays && gl_lockarrays.integer) + { + gl_state.lockrange_first = first; + gl_state.lockrange_count = count; + CHECKGLERROR + qglLockArraysEXT(first, count); + CHECKGLERROR } } - else - { - glBindTexture(GL_TEXTURE_2D, (texture[0] = 0)); -CHECKGLERROR - glDisable(GL_TEXTURE_2D); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE); -CHECKGLERROR - - glTexCoordPointer(2, GL_FLOAT, sizeof(buf_texcoord_t), buf_texcoord[0]); -CHECKGLERROR - glEnableClientState(GL_TEXTURE_COORD_ARRAY); -CHECKGLERROR - } - - // lock as early as possible - GL_LockArray(0, currentvertex); -CHECKGLERROR +} - for (k = 0;k < currentmesh;) - { - mesh = &buf_mesh[k]; +void GL_TransformToScreen(const vec4_t in, vec4_t out) +{ + vec4_t temp; + float iw; + Matrix4x4_Transform4 (&backend_viewmatrix, in, temp); + Matrix4x4_Transform4 (&backend_projectmatrix, temp, out); + iw = 1.0f / out[3]; + out[0] = r_refdef.x + (out[0] * iw + 1.0f) * r_refdef.width * 0.5f; + out[1] = r_refdef.y + (out[1] * iw + 1.0f) * r_refdef.height * 0.5f; + out[2] = out[2] * iw; +} - if (backendunits > 1) - { -// int topunit = 0; - for (i = 0;i < backendunits;i++) - { - if (texture[i] != mesh->textures[i]) - { - if (unit != i) - { - qglActiveTexture(GL_TEXTURE0_ARB + (unit = i)); -CHECKGLERROR - } - if (texture[i] == 0) - { - glEnable(GL_TEXTURE_2D); -CHECKGLERROR - // have to disable texcoord array on disabled texture - // units due to NVIDIA driver bug with - // compiled_vertex_array - if (clientunit != i) - { - qglClientActiveTexture(GL_TEXTURE0_ARB + (clientunit = i)); -CHECKGLERROR - } - glEnableClientState(GL_TEXTURE_COORD_ARRAY); -CHECKGLERROR - } - glBindTexture(GL_TEXTURE_2D, (texture[i] = mesh->textures[i])); -CHECKGLERROR - if (texture[i] == 0) - { - glDisable(GL_TEXTURE_2D); -CHECKGLERROR - // have to disable texcoord array on disabled texture - // units due to NVIDIA driver bug with - // compiled_vertex_array - if (clientunit != i) - { - qglClientActiveTexture(GL_TEXTURE0_ARB + (clientunit = i)); -CHECKGLERROR - } - glDisableClientState(GL_TEXTURE_COORD_ARRAY); -CHECKGLERROR - } - } - if (texturergbscale[i] != mesh->texturergbscale[i]) - { - if (unit != i) - { - qglActiveTexture(GL_TEXTURE0_ARB + (unit = i)); -CHECKGLERROR - } - glTexEnvf(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, (texturergbscale[i] = mesh->texturergbscale[i])); -CHECKGLERROR - } -// if (texture[i]) -// topunit = i; - } -// if (unit != topunit) -// { -// qglActiveTexture(GL_TEXTURE0_ARB + (unit = topunit)); -//CHECKGLERROR -// } - } - else - { - if (texture[0] != mesh->textures[0]) - { - if (texture[0] == 0) - { - glEnable(GL_TEXTURE_2D); -CHECKGLERROR - glEnableClientState(GL_TEXTURE_COORD_ARRAY); -CHECKGLERROR - } - glBindTexture(GL_TEXTURE_2D, (texture[0] = mesh->textures[0])); -CHECKGLERROR - if (texture[0] == 0) - { - glDisable(GL_TEXTURE_2D); -CHECKGLERROR - glDisableClientState(GL_TEXTURE_COORD_ARRAY); -CHECKGLERROR - } - } - } - if (blendfunc1 != mesh->blendfunc1 || blendfunc2 != mesh->blendfunc2) - { - blendfunc1 = mesh->blendfunc1; - blendfunc2 = mesh->blendfunc2; - glBlendFunc(blendfunc1, blendfunc2); -CHECKGLERROR - if (blendfunc2 == GL_ZERO) - { - if (blendfunc1 == GL_ONE) - { - if (blend) - { - blend = 0; - glDisable(GL_BLEND); -CHECKGLERROR - } - } - else - { - if (!blend) - { - blend = 1; - glEnable(GL_BLEND); -CHECKGLERROR - } - } - } - else - { - if (!blend) - { - blend = 1; - glEnable(GL_BLEND); -CHECKGLERROR - } - } - } - if (depthtest != mesh->depthtest) - { - depthtest = mesh->depthtest; - if (depthtest) - glEnable(GL_DEPTH_TEST); - else - glDisable(GL_DEPTH_TEST); - } - if (depthmask != mesh->depthmask) - { - depthmask = mesh->depthmask; - glDepthMask((GLboolean) depthmask); -CHECKGLERROR - } +// called at beginning of frame +void R_Mesh_Start(void) +{ + BACKENDACTIVECHECK - firsttriangle = mesh->firsttriangle; - triangles = mesh->triangles; - firstvert = mesh->firstvert; - lastvert = mesh->lastvert; - mesh = &buf_mesh[++k]; + CHECKGLERROR - if (meshmerge) - { - #if MAX_TEXTUREUNITS != 4 - #error update this code - #endif - while (k < currentmesh - && mesh->blendfunc1 == blendfunc1 - && mesh->blendfunc2 == blendfunc2 - && mesh->depthtest == depthtest - && mesh->depthmask == depthmask - && mesh->textures[0] == texture[0] - && mesh->textures[1] == texture[1] - && mesh->textures[2] == texture[2] - && mesh->textures[3] == texture[3] - && mesh->texturergbscale[0] == texturergbscale[0] - && mesh->texturergbscale[1] == texturergbscale[1] - && mesh->texturergbscale[2] == texturergbscale[2] - && mesh->texturergbscale[3] == texturergbscale[3]) - { - triangles += mesh->triangles; - if (firstvert > mesh->firstvert) - firstvert = mesh->firstvert; - if (lastvert < mesh->lastvert) - lastvert = mesh->lastvert; - mesh = &buf_mesh[++k]; - } - } + GL_Backend_CheckCvars(); + if (mesh_maxverts != gl_mesh_maxverts.integer +#ifdef MESH_VAR + || mesh_var != (gl_mesh_vertex_array_range.integer && gl_support_var) + || mesh_var_readfrequency != gl_mesh_vertex_array_range_readfrequency.value + || mesh_var_writefrequency != gl_mesh_vertex_array_range_writefrequency.value + || mesh_var_priority != gl_mesh_vertex_array_range_priority.value +#endif + ) + GL_Backend_ResizeArrays(gl_mesh_maxverts.integer); -#ifdef WIN32 - // FIXME: dynamic link to GL so we can get DrawRangeElements on WIN32 - glDrawElements(GL_TRIANGLES, triangles * 3, GL_UNSIGNED_INT, (unsigned int *)&buf_tri[firsttriangle]); + GL_Backend_ResetState(); +#ifdef MESH_VAR + if (!mesh_var) + { + gl_batchvertexfirst = gl_batchvertexcount = gl_batchelementcount = 0; + varray_offset = varray_offsetnext = 0; + } #else - glDrawRangeElements(GL_TRIANGLES, firstvert, lastvert + 1, triangles * 3, GL_UNSIGNED_INT, (unsigned int *)&buf_tri[firsttriangle]); + varray_offset = varray_offsetnext = 0; #endif -CHECKGLERROR +} + +int gl_backend_rebindtextures; + +void GL_ConvertColorsFloatToByte(int first, int count) +{ + int i, k; + union {float f[4];int i[4];} *color4fi; + struct {GLubyte c[4];} *color4b; + + // shift float to have 8bit fraction at base of number + color4fi = (void *)(varray_buf_color4f + first * 4); + for (i = 0;i < count;i++, color4fi++) + { + color4fi->f[0] += 32768.0f; + color4fi->f[1] += 32768.0f; + color4fi->f[2] += 32768.0f; + color4fi->f[3] += 32768.0f; } - currentmesh = 0; - currenttriangle = 0; - currentvertex = 0; + // then read as integer and kill float bits... + color4fi = (void *)(varray_buf_color4f + first * 4); + color4b = (void *)(varray_buf_color4b + first * 4); + for (i = 0;i < count;i++, color4fi++, color4b++) + { + k = color4fi->i[0] & 0x7FFFFF;color4b->c[0] = (GLubyte) min(k, 255); + k = color4fi->i[1] & 0x7FFFFF;color4b->c[1] = (GLubyte) min(k, 255); + k = color4fi->i[2] & 0x7FFFFF;color4b->c[2] = (GLubyte) min(k, 255); + k = color4fi->i[3] & 0x7FFFFF;color4b->c[3] = (GLubyte) min(k, 255); + } +} - GL_UnlockArray(); -CHECKGLERROR +/* +// enlarges geometry buffers if they are too small +void _R_Mesh_ResizeCheck(int numverts) +{ + if (numverts > mesh_maxverts) + { + BACKENDACTIVECHECK + GL_Backend_ResizeArrays(numverts + 100); + GL_Backend_ResetState(); + } +} +*/ - if (backendunits > 1) +void R_Mesh_EndBatch(void) +{ +#ifdef MESH_BATCH + if (gl_batchelementcount) { - for (i = backendunits - 1;i >= 0;i--) + if (gl_state.pointervertexcount) + Host_Error("R_Mesh_EndBatch: called with pointers enabled\n"); + + if (gl_state.colorarray && !gl_mesh_floatcolors.integer && gl_state.pointer_color == NULL) + GL_ConvertColorsFloatToByte(gl_batchvertexfirst, gl_batchvertexcount); + if (r_render.integer) { - qglActiveTexture(GL_TEXTURE0_ARB + (unit = i)); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE); -CHECKGLERROR - if (gl_combine.integer) + //int i;for (i = 0;i < gl_batchelementcount;i++) if (varray_buf_elements3i[i] < gl_batchvertexfirst || varray_buf_elements3i[i] >= (gl_batchvertexfirst + gl_batchvertexcount)) Host_Error("R_Mesh_EndBatch: invalid element #%i (value %i) outside range %i-%i\n", i, varray_buf_elements3i[i], gl_batchvertexfirst, gl_batchvertexfirst + gl_batchvertexcount); + CHECKGLERROR + GL_LockArrays(gl_batchvertexfirst, gl_batchvertexcount); + if (gl_mesh_drawrangeelements.integer && qglDrawRangeElements != NULL) { - glTexEnvf(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, 1.0f); -CHECKGLERROR - } - if (i > 0) - { - glDisable(GL_TEXTURE_2D); -CHECKGLERROR + qglDrawRangeElements(GL_TRIANGLES, gl_batchvertexfirst, gl_batchvertexfirst + gl_batchvertexcount, gl_batchelementcount, GL_UNSIGNED_INT, (const GLuint *) varray_buf_elements3i);CHECKGLERROR } else { - glEnable(GL_TEXTURE_2D); -CHECKGLERROR + qglDrawElements(GL_TRIANGLES, gl_batchelementcount, GL_UNSIGNED_INT, (const GLuint *) varray_buf_elements3i);CHECKGLERROR } - glBindTexture(GL_TEXTURE_2D, 0); -CHECKGLERROR - - qglClientActiveTexture(GL_TEXTURE0_ARB + (clientunit = i)); -CHECKGLERROR - glDisableClientState(GL_TEXTURE_COORD_ARRAY); -CHECKGLERROR + GL_LockArrays(0, 0); } + gl_batchelementcount = 0; + gl_batchvertexcount = 0; } - else - { - glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE); -CHECKGLERROR - glEnable(GL_TEXTURE_2D); -CHECKGLERROR - glDisableClientState(GL_TEXTURE_COORD_ARRAY); -CHECKGLERROR - } - glDisableClientState(GL_COLOR_ARRAY); -CHECKGLERROR - glDisableClientState(GL_VERTEX_ARRAY); -CHECKGLERROR - - glDisable(GL_BLEND); -CHECKGLERROR - glEnable(GL_DEPTH_TEST); -CHECKGLERROR - glDepthMask(true); -CHECKGLERROR - glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA); -CHECKGLERROR +#endif } -void R_Mesh_AddTransparent(void) +void GL_Backend_RenumberElements(int *out, int count, const int *in, int offset) { - if (gl_mesh_sorttransbymesh.integer) - { - int i, j, k; - float viewdistcompare, centerscaler, dist1, dist2, dist3, center, maxdist; - buf_vertex_t *vert1, *vert2, *vert3; - buf_transtri_t *tri; - buf_mesh_t *mesh, *transmesh; - - // process and add transparent mesh triangles - if (!currenttranstriangle) - return; - - // map farclip to 0-4095 list range - centerscaler = (TRANSDEPTHRES / r_farclip) * (1.0f / 3.0f); - viewdistcompare = viewdist + 4.0f; - - memset(buf_transtri_list, 0, TRANSDEPTHRES * sizeof(buf_transtri_t *)); + int i; + //if (offset) + for (i = 0;i < count;i++) + *out++ = *in++ + offset; + //else + // memcpy(out, in, sizeof(*out) * count); +} - k = 0; - for (j = 0;j < currenttranstriangle;j++) - { - tri = &buf_transtri[j]; - - vert1 = &buf_transvertex[tri->index[0]]; - vert2 = &buf_transvertex[tri->index[1]]; - vert3 = &buf_transvertex[tri->index[2]]; - - dist1 = DotProduct(vert1->v, vpn); - dist2 = DotProduct(vert2->v, vpn); - dist3 = DotProduct(vert3->v, vpn); - - maxdist = max(dist1, max(dist2, dist3)); - if (maxdist < viewdistcompare) - continue; - - center = (dist1 + dist2 + dist3) * centerscaler - viewdist; - #if SLOWMATH - i = (int) center; - i = bound(0, i, (TRANSDEPTHRES - 1)); - #else - if (center < 0.0f) - center = 0.0f; - center += 8388608.0f; - i = *((long *)¢er) & 0x7FFFFF; - i = min(i, (TRANSDEPTHRES - 1)); - #endif - tri->next = buf_transtri_list[i]; - buf_transtri_list[i] = tri; - k++; - } +// gets vertex buffer space for use with a following R_Mesh_Draw +// (can be multiple Draw calls per GetSpace) +void R_Mesh_GetSpace(int numverts) +{ + int i; - #ifndef TRANSBATCH - if (currentmesh + k > max_meshs || currenttriangle + k > max_batch || currentvertex + currenttransvertex > max_verts) - R_Mesh_Render(); + if (gl_state.pointervertexcount) + Host_Error("R_Mesh_GetSpace: called with pointers enabled\n"); + if (gl_state.lockrange_count) + Host_Error("R_Mesh_GetSpace: called with arrays locked\n"); - // note: can't batch these because they can be rendered in any order - // there can never be more transparent triangles than fit in main buffers - memcpy(&buf_vertex[currentvertex], &buf_transvertex[0], currenttransvertex * sizeof(buf_vertex_t)); -#if FLOATCOLORS - if (floatcolors) - memcpy(&buf_fcolor[currentvertex], &buf_transfcolor[0], currenttransvertex * sizeof(buf_fcolor_t)); - else + varray_offset = varray_offsetnext; + if (varray_offset + numverts > mesh_maxverts) + { + //Con_Printf("R_Mesh_GetSpace: vertex buffer wrap\n"); +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); #endif - memcpy(&buf_bcolor[currentvertex], &buf_transbcolor[0], currenttransvertex * sizeof(buf_bcolor_t)); - for (i = 0;i < backendunits;i++) - memcpy(&buf_texcoord[i][currentvertex], &buf_transtexcoord[i][0], currenttransvertex * sizeof(buf_texcoord_t)); - #endif - - for (i = 0;i < currenttransmesh;i++) + varray_offset = 0; +#ifdef MESH_VAR + if (mesh_var) { - buf_transmesh[i].transchain = NULL; - //buf_transmesh[i].transchainpointer = &buf_transmesh[i].transchain; - buf_transmesh[i].triangles = 0; + CHECKGLERROR + qglFlushVertexArrayRangeNV(); + CHECKGLERROR } - transmesh = NULL; - for (j = 0;j < TRANSDEPTHRES;j++) +#endif + if (numverts > mesh_maxverts) { - if ((tri = buf_transtri_list[j])) - { - for (;tri;tri = tri->next) - { - if (!tri->mesh->transchain) - { - tri->mesh->chain = transmesh; - transmesh = tri->mesh; - } - tri->meshsortchain = tri->mesh->transchain; - tri->mesh->transchain = tri; - /* - *tri->mesh->transchainpointer = tri; - tri->meshsortchain = NULL; - tri->mesh->transchainpointer = &tri->meshsortchain; - */ - tri->mesh->triangles++; - } - } + GL_Backend_ResizeArrays(numverts + 100); + GL_Backend_ResetState(); } + } - #if TRANSBATCH - for (;transmesh;transmesh = transmesh->chain) - { - int meshvertexadjust; - int numverts = transmesh->lastvert - transmesh->firstvert + 1; - if (currentmesh >= max_meshs || currenttriangle + transmesh->triangles > max_batch || currentvertex + numverts > max_verts) - R_Mesh_Render(); - - memcpy(&buf_vertex[currentvertex], &buf_transvertex[transmesh->firstvert], numverts * sizeof(buf_vertex_t)); -#if FLOATCOLORS - if (floatcolors) - memcpy(&buf_fcolor[currentvertex], &buf_transfcolor[transmesh->firstvert], numverts * sizeof(buf_fcolor_t)); - else + varray_vertex3f = varray_buf_vertex3f + varray_offset * 3; + varray_color4f = varray_buf_color4f + varray_offset * 4; + for (i = 0;i < backendunits;i++) + { + varray_texcoord3f[i] = varray_buf_texcoord3f[i] + varray_offset * 3; + varray_texcoord2f[i] = varray_buf_texcoord2f[i] + varray_offset * 2; + } + + varray_offsetnext = varray_offset + numverts; +} + +// renders triangles using vertices from the most recent GetSpace call +// (can be multiple Draw calls per GetSpace) +void R_Mesh_Draw(int numverts, int numtriangles, const int *elements) +{ + int numelements = numtriangles * 3; + if (numtriangles == 0 || numverts == 0) + { + Con_Printf("R_Mesh_Draw(%d, %d, %08p);\n", numverts, numtriangles, elements); + return; + } + c_meshs++; + c_meshelements += numelements; + CHECKGLERROR + if (gl_state.pointervertexcount) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); #endif - memcpy(&buf_bcolor[currentvertex], &buf_transbcolor[transmesh->firstvert], numverts * sizeof(buf_bcolor_t)); - for (i = 0;i < backendunits && transmesh->textures[i];i++) - memcpy(&buf_texcoord[i][currentvertex], &buf_transtexcoord[i][transmesh->firstvert], numverts * sizeof(buf_texcoord_t)); - - mesh = &buf_mesh[currentmesh++]; - *mesh = *transmesh; // copy mesh properties - mesh->firstvert = currentvertex; - mesh->lastvert = currentvertex + numverts - 1; - currentvertex += numverts; - meshvertexadjust = mesh->firstvert - transmesh->firstvert; - mesh->firsttriangle = currenttriangle; - for (tri = transmesh->transchain;tri;tri = tri->meshsortchain) + if (r_render.integer) + { + GL_LockArrays(0, gl_state.pointervertexcount); + if (gl_mesh_drawrangeelements.integer && qglDrawRangeElements != NULL) { - buf_tri[currenttriangle].index[0] = tri->index[0] + meshvertexadjust; - buf_tri[currenttriangle].index[1] = tri->index[1] + meshvertexadjust; - buf_tri[currenttriangle].index[2] = tri->index[2] + meshvertexadjust; - /* - if (tri->mesh != transmesh) - Sys_Error("!?!"); - if ((unsigned int) buf_tri[currenttriangle].index[0] < (unsigned int) mesh->firstvert - || (unsigned int) buf_tri[currenttriangle].index[0] > (unsigned int) mesh->lastvert - || (unsigned int) buf_tri[currenttriangle].index[1] < (unsigned int) mesh->firstvert - || (unsigned int) buf_tri[currenttriangle].index[1] > (unsigned int) mesh->lastvert - || (unsigned int) buf_tri[currenttriangle].index[2] < (unsigned int) mesh->firstvert - || (unsigned int) buf_tri[currenttriangle].index[2] > (unsigned int) mesh->lastvert) - Sys_Error("!?"); - */ - currenttriangle++; + qglDrawRangeElements(GL_TRIANGLES, 0, gl_state.pointervertexcount, numelements, GL_UNSIGNED_INT, elements);CHECKGLERROR } - /* - if (mesh->triangles != currenttriangle - mesh->firsttriangle) - Sys_Error("!"); - */ - } - #else - for (;transmesh;transmesh = transmesh->chain) - { - mesh = &buf_mesh[currentmesh++]; - *mesh = *transmesh; // copy mesh properties - mesh->firstvert += currentvertex; - mesh->lastvert += currentvertex; - mesh->firsttriangle = currenttriangle; - for (tri = transmesh->transchain;tri;tri = tri->meshsortchain) + else { - buf_tri[currenttriangle].index[0] = tri->index[0] + currentvertex; - buf_tri[currenttriangle].index[1] = tri->index[1] + currentvertex; - buf_tri[currenttriangle].index[2] = tri->index[2] + currentvertex; - /* - if (tri->mesh != transmesh) - Sys_Error("!?!"); - if ((unsigned int) buf_tri[currenttriangle].index[0] < (unsigned int) mesh->firstvert - || (unsigned int) buf_tri[currenttriangle].index[0] > (unsigned int) mesh->lastvert - || (unsigned int) buf_tri[currenttriangle].index[1] < (unsigned int) mesh->firstvert - || (unsigned int) buf_tri[currenttriangle].index[1] > (unsigned int) mesh->lastvert - || (unsigned int) buf_tri[currenttriangle].index[2] < (unsigned int) mesh->firstvert - || (unsigned int) buf_tri[currenttriangle].index[2] > (unsigned int) mesh->lastvert) - Sys_Error("!?"); - */ - currenttriangle++; + qglDrawElements(GL_TRIANGLES, numelements, GL_UNSIGNED_INT, elements);CHECKGLERROR } - /* - if (mesh->triangles != currenttriangle - mesh->firsttriangle) - Sys_Error("!"); - */ + GL_LockArrays(0, 0); } - currentvertex += currenttransvertex; - #endif - - currenttransmesh = 0; - currenttranstriangle = 0; - currenttransvertex = 0; } - else if (gl_mesh_dupetransverts.integer) +#ifdef MESH_BATCH + else if (gl_mesh_batching.integer) { - int i, j, k, index; - float viewdistcompare, centerscaler, dist1, dist2, dist3, center, maxdist; - buf_vertex_t *vert1, *vert2, *vert3; - buf_transtri_t *tri; - buf_mesh_t *mesh; - - // process and add transparent mesh triangles - if (!currenttranstriangle) - return; - - // map farclip to 0-4095 list range - centerscaler = (TRANSDEPTHRES / r_farclip) * (1.0f / 3.0f); - viewdistcompare = viewdist + 4.0f; - - memset(buf_transtri_list, 0, TRANSDEPTHRES * sizeof(buf_transtri_t *)); - - // process in reverse because transtri_list adding code is in reverse as well - k = 0; - for (j = currenttranstriangle - 1;j >= 0;j--) + if (mesh_maxelements < gl_batchelementcount + numelements) { - tri = &buf_transtri[j]; - - vert1 = &buf_transvertex[tri->index[0]]; - vert2 = &buf_transvertex[tri->index[1]]; - vert3 = &buf_transvertex[tri->index[2]]; - - dist1 = DotProduct(vert1->v, vpn); - dist2 = DotProduct(vert2->v, vpn); - dist3 = DotProduct(vert3->v, vpn); - - maxdist = max(dist1, max(dist2, dist3)); - if (maxdist < viewdistcompare) - continue; - - center = (dist1 + dist2 + dist3) * centerscaler - viewdist; - #if SLOWMATH - i = (int) center; - i = bound(0, i, (TRANSDEPTHRES - 1)); - #else - if (center < 0.0f) - center = 0.0f; - center += 8388608.0f; - i = *((long *)¢er) & 0x7FFFFF; - i = min(i, (TRANSDEPTHRES - 1)); - #endif - tri->next = buf_transtri_list[i]; - buf_transtri_list[i] = tri; - k++; + //Con_Printf("R_Mesh_Draw: enlarging elements array\n"); + if (gl_batchelementcount) + R_Mesh_EndBatch(); + // round up to a multiple of 1024 and add another 1024 just for good measure + mesh_maxelements = (gl_batchelementcount + numelements + 1024 + 1023) & ~1023; + GL_Backend_AllocElementsArray(); } - - if (currentmesh + k > max_meshs || currenttriangle + k > max_batch || currentvertex + k * 3 > max_verts) - R_Mesh_Render(); - - currenttransmesh = 0; - currenttranstriangle = 0; - currenttransvertex = 0; - - // note: can't batch these because they can be rendered in any order - // there can never be more transparent triangles than fit in main buffers - for (j = TRANSDEPTHRES - 1;j >= 0;j--) + if (varray_offset < gl_batchvertexfirst && gl_batchelementcount) + R_Mesh_EndBatch(); + if (gl_batchelementcount == 0) { - if ((tri = buf_transtri_list[j])) - { - while(tri) - { - mesh = &buf_mesh[currentmesh++]; - *mesh = *tri->mesh; // copy mesh properties - mesh->firstvert = currentvertex; - mesh->lastvert = currentvertex + 2; - mesh->firsttriangle = currenttriangle; - mesh->triangles = 1; - for (k = 0;k < 3;k++) - { - index = tri->index[k]; - buf_tri[currenttriangle].index[k] = currentvertex; - memcpy(buf_vertex[currentvertex].v, buf_transvertex[index].v, sizeof(buf_vertex_t)); -#if FLOATCOLORS - if (floatcolors) - memcpy(buf_fcolor[currentvertex].c, buf_transfcolor[index].c, sizeof(buf_fcolor_t)); - else -#endif - memcpy(buf_bcolor[currentvertex].c, buf_transbcolor[index].c, sizeof(buf_bcolor_t)); - for (i = 0;i < backendunits && tri->mesh->textures[i];i++) - memcpy(buf_texcoord[i][currentvertex].t, buf_transtexcoord[i][index].t, sizeof(buf_texcoord_t)); - currentvertex++; - } - currenttriangle++; - tri = tri->next; - } - } + gl_batchvertexfirst = varray_offset; + gl_batchvertexcount = 0; } + if (gl_batchvertexcount < varray_offsetnext - gl_batchvertexfirst) + gl_batchvertexcount = varray_offsetnext - gl_batchvertexfirst; + GL_Backend_RenumberElements(varray_buf_elements3i + gl_batchelementcount, numelements, elements, varray_offset); + //Con_Printf("off %i:%i, vertex %i:%i, element %i:%i\n", varray_offset, varray_offsetnext, gl_batchvertexfirst, gl_batchvertexfirst + gl_batchvertexcount, gl_batchelementcount, gl_batchelementcount + numelements); + gl_batchelementcount += numelements; + //{int i;for (i = 0;i < gl_batchelementcount;i++) if (varray_buf_elements3i[i] < gl_batchvertexfirst || varray_buf_elements3i[i] >= (gl_batchvertexfirst + gl_batchvertexcount)) Host_Error("R_Mesh_EndBatch: invalid element #%i (value %i) outside range %i-%i, there were previously %i elements and there are now %i elements, varray_offset is %i\n", i, varray_buf_elements3i[i], gl_batchvertexfirst, gl_batchvertexfirst + gl_batchvertexcount, gl_batchelementcount - numelements, gl_batchelementcount, varray_offset);} } +#endif else { - int i, j, k; - float viewdistcompare, centerscaler, dist1, dist2, dist3, center, maxdist; - buf_vertex_t *vert1, *vert2, *vert3; - buf_transtri_t *tri; - buf_mesh_t *mesh; - - // process and add transparent mesh triangles - if (!currenttranstriangle) - return; - - // map farclip to 0-4095 list range - centerscaler = (TRANSDEPTHRES / r_farclip) * (1.0f / 3.0f); - viewdistcompare = viewdist + 4.0f; - - memset(buf_transtri_list, 0, TRANSDEPTHRES * sizeof(buf_transtri_t *)); - - // process in reverse because transtri_list adding code is in reverse as well - k = 0; - for (j = currenttranstriangle - 1;j >= 0;j--) - { - tri = &buf_transtri[j]; - - vert1 = &buf_transvertex[tri->index[0]]; - vert2 = &buf_transvertex[tri->index[1]]; - vert3 = &buf_transvertex[tri->index[2]]; - - dist1 = DotProduct(vert1->v, vpn); - dist2 = DotProduct(vert2->v, vpn); - dist3 = DotProduct(vert3->v, vpn); - - maxdist = max(dist1, max(dist2, dist3)); - if (maxdist < viewdistcompare) - continue; - - center = (dist1 + dist2 + dist3) * centerscaler - viewdist; - #if SLOWMATH - i = (int) center; - i = bound(0, i, (TRANSDEPTHRES - 1)); - #else - if (center < 0.0f) - center = 0.0f; - center += 8388608.0f; - i = *((long *)¢er) & 0x7FFFFF; - i = min(i, (TRANSDEPTHRES - 1)); - #endif - tri->next = buf_transtri_list[i]; - buf_transtri_list[i] = tri; - k++; - } - - if (currentmesh + k > max_meshs || currenttriangle + k > max_batch || currentvertex + currenttransvertex > max_verts) - R_Mesh_Render(); - - // note: can't batch these because they can be rendered in any order - // there can never be more transparent triangles than fit in main buffers - memcpy(&buf_vertex[currentvertex], &buf_transvertex[0], currenttransvertex * sizeof(buf_vertex_t)); -#if FLOATCOLORS - if (floatcolors) - memcpy(&buf_fcolor[currentvertex], &buf_transfcolor[0], currenttransvertex * sizeof(buf_fcolor_t)); - else -#endif - memcpy(&buf_bcolor[currentvertex], &buf_transbcolor[0], currenttransvertex * sizeof(buf_bcolor_t)); - for (i = 0;i < backendunits;i++) - memcpy(&buf_texcoord[i][currentvertex], &buf_transtexcoord[i][0], currenttransvertex * sizeof(buf_texcoord_t)); - - for (j = TRANSDEPTHRES - 1;j >= 0;j--) + GL_Backend_RenumberElements(varray_buf_elements3i, numelements, elements, varray_offset); + if (r_render.integer) { - if ((tri = buf_transtri_list[j])) + GL_LockArrays(varray_offset, numverts); + if (gl_mesh_drawrangeelements.integer && qglDrawRangeElements != NULL) { - while(tri) - { - mesh = &buf_mesh[currentmesh++]; - *mesh = *tri->mesh; // copy mesh properties - buf_tri[currenttriangle].index[0] = tri->index[0] + currentvertex; - buf_tri[currenttriangle].index[1] = tri->index[1] + currentvertex; - buf_tri[currenttriangle].index[2] = tri->index[2] + currentvertex; - mesh->firstvert = min(buf_tri[currenttriangle].index[0], min(buf_tri[currenttriangle].index[1], buf_tri[currenttriangle].index[2])); - mesh->lastvert = max(buf_tri[currenttriangle].index[0], max(buf_tri[currenttriangle].index[1], buf_tri[currenttriangle].index[2])); - mesh->firsttriangle = currenttriangle++; - mesh->triangles = 1; - tri = tri->next; - } + qglDrawRangeElements(GL_TRIANGLES, varray_offset, varray_offset + numverts, numelements, GL_UNSIGNED_INT, varray_buf_elements3i);CHECKGLERROR + } + else + { + qglDrawElements(GL_TRIANGLES, numelements, GL_UNSIGNED_INT, varray_buf_elements3i);CHECKGLERROR } + GL_LockArrays(0, 0); } - currentvertex += currenttransvertex; - currenttransmesh = 0; - currenttranstriangle = 0; - currenttransvertex = 0; } } -void R_Mesh_Draw(const rmeshinfo_t *m) +// renders triangles using vertices from the most recent GetSpace call +// (can be multiple Draw calls per GetSpace) +void R_Mesh_Draw_NoBatching(int numverts, int numtriangles, const int *elements) { - // these are static because gcc runs out of virtual registers otherwise - static int i, j, *index, overbright; - static float c, *in, scaler; -#if FLOATCOLORS - static float cr, cg, cb, ca; -#endif - static buf_mesh_t *mesh; - static buf_vertex_t *vert; -#if FLOATCOLORS - static buf_fcolor_t *fcolor; -#endif - static buf_bcolor_t *bcolor; - static buf_texcoord_t *texcoord[MAX_TEXTUREUNITS]; - static buf_transtri_t *tri; - static buf_bcolor_t flatbcolor; - - if (m->index == NULL - || !m->numtriangles - || m->vertex == NULL - || !m->numverts) + int numelements = numtriangles * 3; + if (numtriangles == 0 || numverts == 0) + { + Con_Printf("R_Mesh_Draw_NoBatching(%d, %d, %08p);\n", numverts, numtriangles, elements); return; - // ignore meaningless alpha meshs - if (!m->depthwrite && m->blendfunc1 == GL_SRC_ALPHA && (m->blendfunc2 == GL_ONE || m->blendfunc2 == GL_ONE_MINUS_SRC_ALPHA)) + } + c_meshs++; + c_meshelements += numelements; + CHECKGLERROR + if (gl_state.pointervertexcount) { - if (m->color) + if (r_render.integer) { - for (i = 0, in = m->color + 3;i < m->numverts;i++, (int)in += m->colorstep) - if (*in >= 0.01f) - break; - if (i == m->numverts) - return; + GL_LockArrays(0, gl_state.pointervertexcount); + if (gl_mesh_drawrangeelements.integer && qglDrawRangeElements != NULL) + { + qglDrawRangeElements(GL_TRIANGLES, 0, gl_state.pointervertexcount, numelements, GL_UNSIGNED_INT, elements);CHECKGLERROR + } + else + { + qglDrawElements(GL_TRIANGLES, numelements, GL_UNSIGNED_INT, elements);CHECKGLERROR + } + GL_LockArrays(0, 0); } - else if (m->ca < 0.01f) - return; - } - - if (!backendactive) - Sys_Error("R_Mesh_Draw: called when backend is not active\n"); - - scaler = 1; - if (m->blendfunc2 == GL_SRC_COLOR) - { - if (m->blendfunc1 == GL_DST_COLOR) // 2x modulate with framebuffer - scaler *= 0.5f; } else { - if (m->tex[0]) + GL_Backend_RenumberElements(varray_buf_elements3i, numelements, elements, varray_offset); + if (r_render.integer) { - overbright = gl_combine.integer; - if (overbright) - scaler *= 0.25f; + GL_LockArrays(varray_offset, numverts); + if (gl_mesh_drawrangeelements.integer && qglDrawRangeElements != NULL) + { + qglDrawRangeElements(GL_TRIANGLES, varray_offset, varray_offset + numverts, numelements, GL_UNSIGNED_INT, varray_buf_elements3i);CHECKGLERROR + } + else + { + qglDrawElements(GL_TRIANGLES, numelements, GL_UNSIGNED_INT, varray_buf_elements3i);CHECKGLERROR + } + GL_LockArrays(0, 0); } - scaler *= overbrightscale; } +} + +// restores backend state, used when done with 3D rendering +void R_Mesh_Finish(void) +{ + int i; + BACKENDACTIVECHECK +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + GL_LockArrays(0, 0); - if (m->transparent) + for (i = backendunits - 1;i >= 0;i--) { - if (currenttransmesh >= max_meshs || (currenttranstriangle + m->numtriangles) > max_meshs || (currenttransvertex + m->numverts) > max_verts) + if (qglActiveTexture) + qglActiveTexture(GL_TEXTURE0_ARB + i);CHECKGLERROR + if (qglClientActiveTexture) + qglClientActiveTexture(GL_TEXTURE0_ARB + i);CHECKGLERROR + qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR + qglDisable(GL_TEXTURE_1D);CHECKGLERROR + qglDisable(GL_TEXTURE_2D);CHECKGLERROR + if (gl_texture3d) { - if (!transranout) - { - Con_Printf("R_Mesh_Draw: ran out of room for transparent meshs\n"); - transranout = true; - } - return; + qglDisable(GL_TEXTURE_3D);CHECKGLERROR } - - c_transmeshs++; - c_transtris += m->numtriangles; - vert = &buf_transvertex[currenttransvertex]; -#if FLOATCOLORS - fcolor = &buf_transfcolor[currenttransvertex]; -#endif - bcolor = &buf_transbcolor[currenttransvertex]; - for (i = 0;i < backendunits;i++) - texcoord[i] = &buf_transtexcoord[i][currenttransvertex]; - - // transmesh is only for storage of transparent meshs until they - // are inserted into the main mesh array - mesh = &buf_transmesh[currenttransmesh++]; - - // transparent meshs are broken up into individual triangles which can - // be sorted by depth - index = m->index; - for (i = 0;i < m->numtriangles;i++) + if (gl_texturecubemap) { - tri = &buf_transtri[currenttranstriangle++]; - tri->mesh = mesh; - tri->index[0] = *index++ + currenttransvertex; - tri->index[1] = *index++ + currenttransvertex; - tri->index[2] = *index++ + currenttransvertex; + qglDisable(GL_TEXTURE_CUBE_MAP_ARB);CHECKGLERROR } - - mesh->firstvert = currenttransvertex; - mesh->lastvert = currenttransvertex + m->numverts - 1; - currenttransvertex += m->numverts; - } - else - { - if (m->numtriangles > max_meshs || m->numverts > max_verts) + qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);CHECKGLERROR + if (gl_combine.integer) { - Con_Printf("R_Mesh_Draw: mesh too big for buffers\n"); - return; + qglTexEnvi(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, 1);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_ALPHA_SCALE, 1);CHECKGLERROR } - - if (currentmesh >= max_meshs || (currenttriangle + m->numtriangles) > max_batch || (currentvertex + m->numverts) > max_verts) - R_Mesh_Render(); - - c_meshs++; - c_meshtris += m->numtriangles; - vert = &buf_vertex[currentvertex]; -#if FLOATCOLORS - fcolor = &buf_fcolor[currentvertex]; -#endif - bcolor = &buf_bcolor[currentvertex]; - for (i = 0;i < backendunits;i++) - texcoord[i] = &buf_texcoord[i][currentvertex]; - - mesh = &buf_mesh[currentmesh++]; - // opaque meshs are rendered directly - index = (int *)&buf_tri[currenttriangle]; - mesh->firsttriangle = currenttriangle; - currenttriangle += m->numtriangles; - for (i = 0;i < m->numtriangles * 3;i++) - index[i] = m->index[i] + currentvertex; - - mesh->firstvert = currentvertex; - mesh->lastvert = currentvertex + m->numverts - 1; - currentvertex += m->numverts; } + qglDisableClientState(GL_COLOR_ARRAY);CHECKGLERROR + qglDisableClientState(GL_VERTEX_ARRAY);CHECKGLERROR - // code shared for transparent and opaque meshs - mesh->blendfunc1 = m->blendfunc1; - mesh->blendfunc2 = m->blendfunc2; - mesh->depthmask = (m->blendfunc2 == GL_ZERO || m->depthwrite); - mesh->depthtest = !m->depthdisable; - mesh->triangles = m->numtriangles; - j = -1; - for (i = 0;i < backendunits;i++) - { - if ((mesh->textures[i] = m->tex[i])) - j = i; - mesh->texturergbscale[i] = m->texrgbscale[i]; - if (mesh->texturergbscale[i] != 1 && mesh->texturergbscale[i] != 2 && mesh->texturergbscale[i] != 4) - mesh->texturergbscale[i] = 1; - } - if (overbright && j >= 0) - mesh->texturergbscale[j] = 4; + qglDisable(GL_BLEND);CHECKGLERROR + qglEnable(GL_DEPTH_TEST);CHECKGLERROR + qglDepthMask(GL_TRUE);CHECKGLERROR + qglBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);CHECKGLERROR +} - if (m->vertexstep != sizeof(buf_vertex_t)) +void R_Mesh_Matrix(const matrix4x4_t *matrix) +{ + if (memcmp(matrix, &backend_modelmatrix, sizeof(matrix4x4_t))) { - for (i = 0, in = m->vertex;i < m->numverts;i++, (int)in += m->vertexstep) - { - vert[i].v[0] = in[0]; - vert[i].v[1] = in[1]; - vert[i].v[2] = in[2]; - } +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + backend_modelmatrix = *matrix; + Matrix4x4_Concat(&backend_modelviewmatrix, &backend_viewmatrix, matrix); + Matrix4x4_Transpose(&backend_glmodelviewmatrix, &backend_modelviewmatrix); + qglLoadMatrixf(&backend_glmodelviewmatrix.m[0][0]); } - else - memcpy(vert, m->vertex, m->numverts * sizeof(buf_vertex_t)); +} + +// sets up the requested state +void R_Mesh_MainState(const rmeshstate_t *m) +{ + const void *p; + BACKENDACTIVECHECK -#if FLOATCOLORS - if (floatcolors) + if (gl_state.blendfunc1 != m->blendfunc1 || gl_state.blendfunc2 != m->blendfunc2) { - if (m->color) +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + qglBlendFunc(gl_state.blendfunc1 = m->blendfunc1, gl_state.blendfunc2 = m->blendfunc2);CHECKGLERROR + if (gl_state.blendfunc2 == GL_ZERO) { - for (i = 0, in = m->color;i < m->numverts;i++, (int)in += m->colorstep) + if (gl_state.blendfunc1 == GL_ONE) + { + if (gl_state.blend) + { + gl_state.blend = 0; + qglDisable(GL_BLEND);CHECKGLERROR + } + } + else { - fcolor[i].c[0] = in[0] * scaler; - fcolor[i].c[1] = in[1] * scaler; - fcolor[i].c[2] = in[2] * scaler; - fcolor[i].c[3] = in[3]; + if (!gl_state.blend) + { + gl_state.blend = 1; + qglEnable(GL_BLEND);CHECKGLERROR + } } } else { - cr = m->cr * scaler; - cg = m->cg * scaler; - cb = m->cb * scaler; - ca = m->ca; - for (i = 0;i < m->numverts;i++) + if (!gl_state.blend) { - fcolor[i].c[0] = cr; - fcolor[i].c[1] = cg; - fcolor[i].c[2] = cb; - fcolor[i].c[3] = ca; + gl_state.blend = 1; + qglEnable(GL_BLEND);CHECKGLERROR } } } - else + if (gl_state.depthdisable != m->depthdisable) { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); #endif - if (m->color) - { - for (i = 0, in = m->color;i < m->numverts;i++, (int)in += m->colorstep) - { - // shift float to have 8bit fraction at base of number, - // then read as integer and kill float bits... - c = in[0] * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;bcolor[i].c[0] = (byte) j; - c = in[1] * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;bcolor[i].c[1] = (byte) j; - c = in[2] * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;bcolor[i].c[2] = (byte) j; - c = in[3] + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;bcolor[i].c[3] = (byte) j; - } - } + gl_state.depthdisable = m->depthdisable; + if (gl_state.depthdisable) + qglDisable(GL_DEPTH_TEST); else - { - c = m->cr * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;flatbcolor.c[0] = (byte) j; - c = m->cg * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;flatbcolor.c[1] = (byte) j; - c = m->cb * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;flatbcolor.c[2] = (byte) j; - c = m->ca + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;flatbcolor.c[3] = (byte) j; - for (i = 0;i < m->numverts;i++) - bcolor[i] = flatbcolor; - } -#if FLOATCOLORS + qglEnable(GL_DEPTH_TEST); } + if (gl_state.depthmask != (m->blendfunc2 == GL_ZERO || m->depthwrite)) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); #endif + qglDepthMask(gl_state.depthmask = (m->blendfunc2 == GL_ZERO || m->depthwrite));CHECKGLERROR + } - for (j = 0;j < MAX_TEXTUREUNITS && m->tex[j];j++) + if (gl_state.pointervertexcount != m->pointervertexcount) { - if (j >= backendunits) - Sys_Error("R_Mesh_Draw: texture %i supplied when there are only %i texture units\n", j + 1, backendunits); - if (m->texcoordstep[j] != sizeof(buf_texcoord_t)) - { - for (i = 0, in = m->texcoords[j];i < m->numverts;i++, (int)in += m->texcoordstep[j]) - { - texcoord[j][i].t[0] = in[0]; - texcoord[j][i].t[1] = in[1]; - } - } - else - memcpy(&texcoord[j][0].t[0], m->texcoords[j], m->numverts * sizeof(buf_texcoord_t)); +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + gl_state.pointervertexcount = m->pointervertexcount; } - #if 0 - for (;j < backendunits;j++) - memset(&texcoord[j][0].t[0], 0, m->numverts * sizeof(buf_texcoord_t)); - #endif -} -void R_Mesh_DrawPolygon(rmeshinfo_t *m, int numverts) -{ - m->index = polyindexarray; - m->numverts = numverts; - m->numtriangles = numverts - 2; - if (m->numtriangles < 1) + p = gl_state.pointervertexcount ? m->pointer_vertex : NULL; + if (gl_state.pointer_vertex != p) { - Con_Printf("R_Mesh_DrawPolygon: invalid vertex count\n"); - return; +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + gl_state.pointer_vertex = p; + qglVertexPointer(3, GL_FLOAT, sizeof(float[3]), p ? p : varray_buf_vertex3f);CHECKGLERROR } - if (m->numtriangles >= 256) + + p = gl_state.pointervertexcount ? m->pointer_color : NULL; + if (gl_state.pointer_color != p) { - Con_Printf("R_Mesh_DrawPolygon: only up to 256 triangles (258 verts) supported\n"); - return; +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + gl_state.pointer_color = p; + if (p || gl_mesh_floatcolors.integer) + qglColorPointer(4, GL_FLOAT, sizeof(float[4]), p ? p : varray_buf_color4f); + else + qglColorPointer(4, GL_UNSIGNED_BYTE, sizeof(GLubyte[4]), p ? p : varray_buf_color4b); + CHECKGLERROR } - R_Mesh_Draw(m); } -// LordHavoc: this thing is evil, but necessary because decals account for so much overhead -void R_Mesh_DrawDecal(const rmeshinfo_t *m) +void R_Mesh_TextureState(const rmeshstate_t *m) { - // these are static because gcc runs out of virtual registers otherwise - static int i, j, *index, overbright; - static float c, scaler; -#if FLOATCOLORS - static float cr, cg, cb, ca; -#endif - static buf_mesh_t *mesh; - static buf_vertex_t *vert; -#if FLOATCOLORS - static buf_fcolor_t *fcolor; -#endif - static buf_bcolor_t *bcolor; - static buf_texcoord_t *texcoord; - static buf_transtri_t *tri; - static buf_bcolor_t flatbcolor; + int i, combinergb, combinealpha; + float scale; + gltextureunit_t *unit; + const void *p; - if (!backendactive) - Sys_Error("R_Mesh_Draw: called when backend is not active\n"); + BACKENDACTIVECHECK - scaler = 1; - if (m->tex[0]) + if (gl_backend_rebindtextures) { - overbright = gl_combine.integer; - if (overbright) - scaler *= 0.25f; + gl_backend_rebindtextures = false; + GL_SetupTextureState(); } - scaler *= overbrightscale; - if (m->transparent) + for (i = 0;i < backendunits;i++) { - if (currenttransmesh >= max_meshs || (currenttranstriangle + 2) > max_meshs || (currenttransvertex + 4) > max_verts) + unit = gl_state.units + i; + if (unit->t1d != m->tex1d[i] || unit->t2d != m->tex[i] || unit->t3d != m->tex3d[i] || unit->tcubemap != m->texcubemap[i]) { - if (!transranout) + if (m->tex3d[i] || m->texcubemap[i]) { - Con_Printf("R_Mesh_Draw: ran out of room for transparent meshs\n"); - transranout = true; + if (!unit->arrayis3d) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + unit->arrayis3d = true; + if (gl_state.clientunit != i) + { + qglClientActiveTexture(GL_TEXTURE0_ARB + (gl_state.clientunit = i));CHECKGLERROR + } + qglTexCoordPointer(3, GL_FLOAT, sizeof(float[3]), varray_buf_texcoord3f[i]); + } + if (!unit->arrayenabled) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + unit->arrayenabled = true; + if (gl_state.clientunit != i) + { + qglClientActiveTexture(GL_TEXTURE0_ARB + (gl_state.clientunit = i));CHECKGLERROR + } + qglEnableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR + } } - return; - } - - c_transmeshs++; - c_transtris += 2; - vert = &buf_transvertex[currenttransvertex]; -#if FLOATCOLORS - fcolor = &buf_transfcolor[currenttransvertex]; + else if (m->tex1d[i] || m->tex[i]) + { + if (unit->arrayis3d) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); #endif - bcolor = &buf_transbcolor[currenttransvertex]; - texcoord = &buf_transtexcoord[0][currenttransvertex]; - - // transmesh is only for storage of transparent meshs until they - // are inserted into the main mesh array - mesh = &buf_transmesh[currenttransmesh++]; - mesh->blendfunc1 = m->blendfunc1; - mesh->blendfunc2 = m->blendfunc2; - mesh->depthmask = false; - mesh->depthtest = true; - mesh->triangles = 2; - mesh->textures[0] = m->tex[0]; - mesh->texturergbscale[0] = overbright ? 4 : 1; - for (i = 1;i < backendunits;i++) + unit->arrayis3d = false; + if (gl_state.clientunit != i) + { + qglClientActiveTexture(GL_TEXTURE0_ARB + (gl_state.clientunit = i));CHECKGLERROR + } + qglTexCoordPointer(2, GL_FLOAT, sizeof(float[2]), varray_buf_texcoord2f[i]); + } + if (!unit->arrayenabled) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + unit->arrayenabled = true; + if (gl_state.clientunit != i) + { + qglClientActiveTexture(GL_TEXTURE0_ARB + (gl_state.clientunit = i));CHECKGLERROR + } + qglEnableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR + } + } + else + { + if (unit->arrayenabled) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + unit->arrayenabled = false; + if (gl_state.clientunit != i) + { + qglClientActiveTexture(GL_TEXTURE0_ARB + (gl_state.clientunit = i));CHECKGLERROR + } + qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR + } + } + if (unit->t1d != m->tex1d[i]) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + if (gl_state.unit != i) + { + qglActiveTexture(GL_TEXTURE0_ARB + (gl_state.unit = i));CHECKGLERROR + } + if (m->tex1d[i]) + { + if (unit->t1d == 0) + qglEnable(GL_TEXTURE_1D);CHECKGLERROR + } + else + { + if (unit->t1d) + qglDisable(GL_TEXTURE_1D);CHECKGLERROR + } + qglBindTexture(GL_TEXTURE_1D, (unit->t1d = m->tex1d[i]));CHECKGLERROR + } + if (unit->t2d != m->tex[i]) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + if (gl_state.unit != i) + { + qglActiveTexture(GL_TEXTURE0_ARB + (gl_state.unit = i));CHECKGLERROR + } + if (m->tex[i]) + { + if (unit->t2d == 0) + qglEnable(GL_TEXTURE_2D);CHECKGLERROR + } + else + { + if (unit->t2d) + qglDisable(GL_TEXTURE_2D);CHECKGLERROR + } + qglBindTexture(GL_TEXTURE_2D, (unit->t2d = m->tex[i]));CHECKGLERROR + } + if (unit->t3d != m->tex3d[i]) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + if (gl_state.unit != i) + { + qglActiveTexture(GL_TEXTURE0_ARB + (gl_state.unit = i));CHECKGLERROR + } + if (m->tex3d[i]) + { + if (unit->t3d == 0) + qglEnable(GL_TEXTURE_3D);CHECKGLERROR + } + else + { + if (unit->t3d) + qglDisable(GL_TEXTURE_3D);CHECKGLERROR + } + qglBindTexture(GL_TEXTURE_3D, (unit->t3d = m->tex3d[i]));CHECKGLERROR + } + if (unit->tcubemap != m->texcubemap[i]) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + if (gl_state.unit != i) + { + qglActiveTexture(GL_TEXTURE0_ARB + (gl_state.unit = i));CHECKGLERROR + } + if (m->texcubemap[i]) + { + if (unit->tcubemap == 0) + qglEnable(GL_TEXTURE_CUBE_MAP_ARB);CHECKGLERROR + } + else + { + if (unit->tcubemap) + qglDisable(GL_TEXTURE_CUBE_MAP_ARB);CHECKGLERROR + } + qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, (unit->tcubemap = m->texcubemap[i]));CHECKGLERROR + } + } + combinergb = m->texcombinergb[i]; + if (!combinergb) + combinergb = GL_MODULATE; + if (unit->combinergb != combinergb) { - mesh->textures[i] = 0; - mesh->texturergbscale[i] = 1; +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + if (gl_state.unit != i) + { + qglActiveTexture(GL_TEXTURE0_ARB + (gl_state.unit = i));CHECKGLERROR + } + unit->combinergb = combinergb; + if (gl_combine.integer) + { + qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, unit->combinergb);CHECKGLERROR + } + else + { + qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, unit->combinergb);CHECKGLERROR + } } - mesh->chain = NULL; - - // transparent meshs are broken up into individual triangles which can - // be sorted by depth - index = m->index; - tri = &buf_transtri[currenttranstriangle++]; - tri->mesh = mesh; - tri->index[0] = 0 + currenttransvertex; - tri->index[1] = 1 + currenttransvertex; - tri->index[2] = 2 + currenttransvertex; - tri = &buf_transtri[currenttranstriangle++]; - tri->mesh = mesh; - tri->index[0] = 0 + currenttransvertex; - tri->index[1] = 2 + currenttransvertex; - tri->index[2] = 3 + currenttransvertex; - - mesh->firstvert = currenttransvertex; - mesh->lastvert = currenttransvertex + 3; - currenttransvertex += 4; - } - else - { - if (2 > max_meshs || 4 > max_verts) + combinealpha = m->texcombinealpha[i]; + if (!combinealpha) + combinealpha = GL_MODULATE; + if (unit->combinealpha != combinealpha) { - Con_Printf("R_Mesh_Draw: mesh too big for buffers\n"); - return; +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + if (gl_state.unit != i) + { + qglActiveTexture(GL_TEXTURE0_ARB + (gl_state.unit = i));CHECKGLERROR + } + unit->combinealpha = combinealpha; + if (gl_combine.integer) + { + qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_ALPHA_ARB, unit->combinealpha);CHECKGLERROR + } } - - if (currentmesh >= max_meshs || (currenttriangle + 2) > max_batch || (currentvertex + 4) > max_verts) - R_Mesh_Render(); - - c_meshs++; - c_meshtris += 2; - vert = &buf_vertex[currentvertex]; -#if FLOATCOLORS - fcolor = &buf_fcolor[currentvertex]; + scale = max(m->texrgbscale[i], 1); + if (gl_state.units[i].rgbscale != scale) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); #endif - bcolor = &buf_bcolor[currentvertex]; - texcoord = &buf_texcoord[0][currentvertex]; - - mesh = &buf_mesh[currentmesh++]; - mesh->blendfunc1 = m->blendfunc1; - mesh->blendfunc2 = m->blendfunc2; - mesh->depthmask = false; - mesh->depthtest = !m->depthdisable; - mesh->firsttriangle = currenttriangle; - mesh->triangles = 2; - mesh->textures[0] = m->tex[0]; - mesh->texturergbscale[0] = overbright ? 4 : 1; - for (i = 1;i < backendunits;i++) + if (gl_state.unit != i) + { + qglActiveTexture(GL_TEXTURE0_ARB + (gl_state.unit = i));CHECKGLERROR + } + qglTexEnvi(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, (gl_state.units[i].rgbscale = scale));CHECKGLERROR + } + scale = max(m->texalphascale[i], 1); + if (gl_state.units[i].alphascale != scale) { - mesh->textures[i] = 0; - mesh->texturergbscale[i] = 1; +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); +#endif + if (gl_state.unit != i) + { + qglActiveTexture(GL_TEXTURE0_ARB + (gl_state.unit = i));CHECKGLERROR + } + qglTexEnvi(GL_TEXTURE_ENV, GL_ALPHA_SCALE, (gl_state.units[i].alphascale = scale));CHECKGLERROR } - - // opaque meshs are rendered directly - index = (int *)&buf_tri[currenttriangle]; - index[0] = 0 + currentvertex; - index[1] = 1 + currentvertex; - index[2] = 2 + currentvertex; - index[3] = 0 + currentvertex; - index[4] = 2 + currentvertex; - index[5] = 3 + currentvertex; - mesh->firstvert = currentvertex; - mesh->lastvert = currentvertex + 3; - currenttriangle += 2; - currentvertex += 4; - } - - // buf_vertex_t must match the size of the decal vertex array (or vice versa) - memcpy(vert, m->vertex, 4 * sizeof(buf_vertex_t)); - -#if FLOATCOLORS - if (floatcolors) - { - cr = m->cr * scaler; - cg = m->cg * scaler; - cb = m->cb * scaler; - ca = m->ca; - fcolor[0].c[0] = cr; - fcolor[0].c[1] = cg; - fcolor[0].c[2] = cb; - fcolor[0].c[3] = ca; - fcolor[1].c[0] = cr; - fcolor[1].c[1] = cg; - fcolor[1].c[2] = cb; - fcolor[1].c[3] = ca; - fcolor[2].c[0] = cr; - fcolor[2].c[1] = cg; - fcolor[2].c[2] = cb; - fcolor[2].c[3] = ca; - fcolor[3].c[0] = cr; - fcolor[3].c[1] = cg; - fcolor[3].c[2] = cb; - fcolor[3].c[3] = ca; - } - else - { + if (unit->arrayenabled) + { + p = gl_state.pointervertexcount ? m->pointer_texcoord[i] : NULL; + if (unit->pointer_texcoord != p) + { +#ifdef MESH_BATCH + if (gl_batchelementcount) + R_Mesh_EndBatch(); #endif - c = m->cr * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;flatbcolor.c[0] = (byte) j; - c = m->cg * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;flatbcolor.c[1] = (byte) j; - c = m->cb * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;flatbcolor.c[2] = (byte) j; - c = m->ca + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;flatbcolor.c[3] = (byte) j; - bcolor[0] = flatbcolor; - bcolor[1] = flatbcolor; - bcolor[2] = flatbcolor; - bcolor[3] = flatbcolor; -#if FLOATCOLORS + unit->pointer_texcoord = p; + if (gl_state.clientunit != i) + { + qglClientActiveTexture(GL_TEXTURE0_ARB + (gl_state.clientunit = i));CHECKGLERROR + } + if (unit->arrayis3d) + qglTexCoordPointer(3, GL_FLOAT, sizeof(float[3]), p ? p : varray_buf_texcoord3f[i]); + else + qglTexCoordPointer(2, GL_FLOAT, sizeof(float[2]), p ? p : varray_buf_texcoord2f[i]); + CHECKGLERROR + } + } } -#endif +} - // buf_texcoord_t must be the same size as the decal texcoord array (or vice versa) - memcpy(&texcoord[0].t[0], m->texcoords[0], 4 * sizeof(buf_texcoord_t)); +void R_Mesh_State(const rmeshstate_t *m) +{ + R_Mesh_MainState(m); + R_Mesh_TextureState(m); } /* @@ -1640,190 +1436,437 @@ void R_Mesh_DrawDecal(const rmeshinfo_t *m) ============================================================================== */ -float CalcFov (float fov_x, float width, float height); -void R_ClearScreen(void); - -void SCR_ScreenShot(char *filename, int x, int y, int width, int height) +qboolean SCR_ScreenShot(char *filename, int x, int y, int width, int height, qboolean jpeg) { - int i; - byte *buffer; + qboolean ret; + int i, j; + qbyte *buffer; + + if (!r_render.integer) + return false; buffer = Mem_Alloc(tempmempool, width*height*3); - glReadPixels (x, y, width, height, GL_RGB, GL_UNSIGNED_BYTE, buffer); + qglReadPixels (x, y, width, height, GL_RGB, GL_UNSIGNED_BYTE, buffer); CHECKGLERROR // LordHavoc: compensate for v_overbrightbits when using hardware gamma if (v_hwgamma.integer) + { for (i = 0;i < width * height * 3;i++) - buffer[i] <<= v_overbrightbits.integer; + { + j = buffer[i] << v_overbrightbits.integer; + buffer[i] = (qbyte) (bound(0, j, 255)); + } + } - Image_WriteTGARGB_preflipped(filename, width, height, buffer); + if (jpeg) + ret = JPEG_SaveImage_preflipped (filename, width, height, buffer); + else + ret = Image_WriteTGARGB_preflipped (filename, width, height, buffer); Mem_Free(buffer); + return ret; } -/* -================== -SCR_ScreenShot_f -================== -*/ -void SCR_ScreenShot_f (void) +//============================================================================= + +void R_ClearScreen(void) { - int i; - char filename[16]; - char checkname[MAX_OSPATH]; -// -// find a file name to save it to -// - strcpy(filename, "dp0000.tga"); - - for (i=0 ; i<=9999 ; i++) + if (r_render.integer) { - filename[2] = (i/1000)%10 + '0'; - filename[3] = (i/ 100)%10 + '0'; - filename[4] = (i/ 10)%10 + '0'; - filename[5] = (i/ 1)%10 + '0'; - sprintf (checkname, "%s/%s", com_gamedir, filename); - if (Sys_FileTime(checkname) == -1) - break; // file doesn't exist + // clear to black + qglClearColor(0,0,0,0);CHECKGLERROR + qglClearDepth(1);CHECKGLERROR + if (gl_stencil) + { + // LordHavoc: we use a stencil centered around 128 instead of 0, + // to avoid clamping interfering with strange shadow volume + // drawing orders + qglClearStencil(128);CHECKGLERROR + } + // clear the screen + qglClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT | (gl_stencil ? GL_STENCIL_BUFFER_BIT : 0));CHECKGLERROR + // set dithering mode + if (gl_dither.integer) + { + qglEnable(GL_DITHER);CHECKGLERROR + } + else + { + qglDisable(GL_DITHER);CHECKGLERROR + } } - if (i==10000) - { - Con_Printf ("SCR_ScreenShot_f: Couldn't create a TGA file\n"); - return; - } - - SCR_ScreenShot(filename, vid.realx, vid.realy, vid.realwidth, vid.realheight); - Con_Printf ("Wrote %s\n", filename); } /* -=============== -R_Envmap_f +================== +SCR_UpdateScreen -Grab six views for environment mapping tests -=============== +This is called every frame, and can also be called explicitly to flush +text to the screen. +================== */ -struct -{ - float angles[3]; - char *name; -} -envmapinfo[6] = -{ - {{ 0, 0, 0}, "ft"}, - {{ 0, 90, 0}, "rt"}, - {{ 0, 180, 0}, "bk"}, - {{ 0, 270, 0}, "lf"}, - {{-90, 90, 0}, "up"}, - {{ 90, 90, 0}, "dn"} -}; -static void R_Envmap_f (void) +void SCR_UpdateScreen (void) { - int j, size; - char filename[256], basename[256]; - - if (Cmd_Argc() != 3) + if (gl_delayfinish.integer) { - Con_Printf ("envmap : save out 6 cubic environment map images, usable with loadsky, note that size must one of 128, 256, 512, or 1024 and can't be bigger than your current resolution\n"); - return; + VID_Finish (); + + R_TimeReport("finish"); } - if (!r_render.integer) - return; + if (r_textureunits.integer > gl_textureunits) + Cvar_SetValueQuick(&r_textureunits, gl_textureunits); + if (r_textureunits.integer < 1) + Cvar_SetValueQuick(&r_textureunits, 1); + + if (gl_combine.integer && (!gl_combine_extension || r_textureunits.integer < 2)) + Cvar_SetValueQuick(&gl_combine, 0); + + // lighting scale + r_colorscale = 1.0f / (float) (1 << v_overbrightbits.integer); + + // lightmaps only + r_lightmapscalebit = v_overbrightbits.integer; + if (gl_combine.integer && r_textureunits.integer > 1) + r_lightmapscalebit += 2; + + R_TimeReport("setup"); + + R_ClearScreen(); - strcpy(basename, Cmd_Argv(1)); - size = atoi(Cmd_Argv(2)); - if (size != 128 && size != 256 && size != 512 && size != 1024) + R_TimeReport("clear"); + + if (scr_conlines < vid.conheight && cls.signon == SIGNONS) + R_RenderView(); + + // draw 2D stuff + R_DrawQueue(); + + if (gl_delayfinish.integer) { - Con_Printf("envmap: size must be one of 128, 256, 512, or 1024\n"); - return; + // tell driver to commit it's partially full geometry queue to the rendering queue + // (this doesn't wait for the commands themselves to complete) + qglFlush(); } - if (size > vid.realwidth || size > vid.realheight) + else { - Con_Printf("envmap: your resolution is not big enough to render that size\n"); - return; - } - - envmap = true; + VID_Finish (); - r_refdef.x = 0; - r_refdef.y = 0; - r_refdef.width = size; - r_refdef.height = size; + R_TimeReport("finish"); + } +} - r_refdef.fov_x = 90; - r_refdef.fov_y = 90; +// utility functions - for (j = 0;j < 6;j++) +void R_Mesh_CopyVertex3f(const float *vertex3f, int numverts) +{ +#ifdef MESH_VAR + if (mesh_var) { - sprintf(filename, "env/%s%s.tga", basename, envmapinfo[j].name); - VectorCopy(envmapinfo[j].angles, r_refdef.viewangles); - R_ClearScreen(); - R_RenderView (); - SCR_ScreenShot(filename, vid.realx, vid.realy, size, size); + float *out = varray_vertex3f; + while (--numverts) + { + *out++ = *vertex3f++; + *out++ = *vertex3f++; + *out++ = *vertex3f++; + } } + else +#endif + memcpy(varray_vertex3f, vertex3f, numverts * sizeof(float[3])); +} - envmap = false; +void R_Mesh_CopyTexCoord2f(int tmu, const float *texcoord2f, int numverts) +{ +#ifdef MESH_VAR + if (mesh_var) + { + float *out = varray_texcoord2f[tmu]; + while (numverts--) + { + *out++ = *texcoord2f++; + *out++ = *texcoord2f++; + } + } + else +#endif + memcpy(varray_texcoord2f[tmu], texcoord2f, numverts * sizeof(float[2])); } -//============================================================================= +void R_Mesh_CopyColor4f(const float *color4f, int numverts) +{ +#ifdef MESH_VAR + if (mesh_var) + { + float *out = varray_color4f; + while (numverts--) + { + *out++ = *color4f++; + *out++ = *color4f++; + *out++ = *color4f++; + *out++ = *color4f++; + } + } + else +#endif + memcpy(varray_color4f, color4f, numverts * sizeof(float[4])); +} -void R_ClearScreen(void) +void R_ScrollTexCoord2f (float *out2f, const float *in2f, int numverts, float s, float t) { - if (r_render.integer) + while (numverts--) { - glClearColor(0,0,0,0); - CHECKGLERROR - glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT); // LordHavoc: clear the screen (around the view as well) - CHECKGLERROR - if (gl_dither.integer) - glEnable(GL_DITHER); - else - glDisable(GL_DITHER); - CHECKGLERROR + *out2f++ = *in2f++ + s; + *out2f++ = *in2f++ + t; } } -/* -================== -SCR_UpdateScreen +//=========================================================================== +// vertex array caching subsystem +//=========================================================================== -This is called every frame, and can also be called explicitly to flush -text to the screen. -================== -*/ -void SCR_UpdateScreen (void) +typedef struct rcachearraylink_s { - //Mem_CheckSentinelsGlobal(); - //R_TimeReport("memtest"); + struct rcachearraylink_s *next, *prev; + struct rcachearrayitem_s *data; +} +rcachearraylink_t; - glFinish (); - CHECKGLERROR +typedef struct rcachearrayitem_s +{ + // the original request structure + rcachearrayrequest_t request; + // active + int active; + // offset into r_mesh_rcachedata + int offset; + // for linking this into the sequential list + rcachearraylink_t sequentiallink; + // for linking this into the lookup list + rcachearraylink_t hashlink; +} +rcachearrayitem_t; - VID_Finish (); +#define RCACHEARRAY_HASHSIZE 65536 +#define RCACHEARRAY_ITEMS 4096 +#define RCACHEARRAY_DEFAULTSIZE (4 << 20) - R_TimeReport("finish"); +// all active items are linked into this chain in sorted order +static rcachearraylink_t r_mesh_rcachesequentialchain; +// all inactive items are linked into this chain in unknown order +static rcachearraylink_t r_mesh_rcachefreechain; +// all active items are also linked into these chains (using their hashlink) +static rcachearraylink_t r_mesh_rcachechain[RCACHEARRAY_HASHSIZE]; - if (gl_combine.integer && !gl_combine_extension) - Cvar_SetValue("gl_combine", 0); +// all items are stored here, whether active or inactive +static rcachearrayitem_t r_mesh_rcacheitems[RCACHEARRAY_ITEMS]; - lightscalebit = v_overbrightbits.integer; - if (gl_combine.integer && r_multitexture.integer) - lightscalebit += 2; +// size of data buffer +static int r_mesh_rcachedata_size = RCACHEARRAY_DEFAULTSIZE; +// data buffer +static qbyte r_mesh_rcachedata[RCACHEARRAY_DEFAULTSIZE]; - lightscale = 1.0f / (float) (1 << lightscalebit); - overbrightscale = 1.0f / (float) (1 << v_overbrightbits.integer); +// current state +static int r_mesh_rcachedata_offset; +static rcachearraylink_t *r_mesh_rcachesequentialchain_current; - R_TimeReport("setup"); +static void R_Mesh_CacheArray_Startup(void) +{ + int i; + rcachearraylink_t *l; + // prepare all the linked lists + l = &r_mesh_rcachesequentialchain;l->next = l->prev = l;l->data = NULL; + l = &r_mesh_rcachefreechain;l->next = l->prev = l;l->data = NULL; + memset(&r_mesh_rcachechain, 0, sizeof(r_mesh_rcachechain)); + for (i = 0;i < RCACHEARRAY_HASHSIZE;i++) + { + l = &r_mesh_rcachechain[i]; + l->next = l->prev = l; + l->data = NULL; + } + memset(&r_mesh_rcacheitems, 0, sizeof(r_mesh_rcacheitems)); + for (i = 0;i < RCACHEARRAY_ITEMS;i++) + { + r_mesh_rcacheitems[i].hashlink.data = r_mesh_rcacheitems[i].sequentiallink.data = &r_mesh_rcacheitems[i]; + l = &r_mesh_rcacheitems[i].sequentiallink; + l->next = &r_mesh_rcachefreechain; + l->prev = l->next->prev; + l->next->prev = l->prev->next = l; + } + // clear other state + r_mesh_rcachedata_offset = 0; + r_mesh_rcachesequentialchain_current = &r_mesh_rcachesequentialchain; +} - R_ClearScreen(); +static void R_Mesh_CacheArray_Shutdown(void) +{ +} - R_TimeReport("clear"); +/* +static void R_Mesh_CacheArray_ValidateState(int num) +{ + rcachearraylink_t *l, *lhead; + lhead = &r_mesh_rcachesequentialchain; + if (r_mesh_rcachesequentialchain_current == lhead) + return; + for (l = lhead->next;l != lhead;l = l->next) + if (r_mesh_rcachesequentialchain_current == l) + return; + Sys_Error("%i", num); +} +*/ - if (scr_conlines < vid.conheight) - R_RenderView(); +int R_Mesh_CacheArray(rcachearrayrequest_t *r) +{ + rcachearraylink_t *l, *lhead, *lnext; + rcachearrayitem_t *d; + int hashindex, offset, offsetend; - // draw 2D stuff - R_DrawQueue(); + //R_Mesh_CacheArray_ValidateState(3); + // calculate a hashindex to choose a cache chain + r->data = NULL; + hashindex = CRC_Block((void *)r, sizeof(*r)) % RCACHEARRAY_HASHSIZE; + + // is it already cached? + for (lhead = &r_mesh_rcachechain[hashindex], l = lhead->next;l != lhead;l = l->next) + { + if (!memcmp(&l->data->request, r, sizeof(l->data->request))) + { + // we have it cached already + r->data = r_mesh_rcachedata + l->data->offset; + return false; + } + } + + // we need to add a new cache item, this means finding a place for the new + // data and making sure we have a free item available, lots of work... + + // check if buffer needs to wrap + if (r_mesh_rcachedata_offset + r->data_size > r_mesh_rcachedata_size) + { + /* + if (r->data_size * 10 > r_mesh_rcachedata_size) + { + // realloc whole cache + } + */ + // reset back to start + r_mesh_rcachedata_offset = 0; + r_mesh_rcachesequentialchain_current = &r_mesh_rcachesequentialchain; + } + offset = r_mesh_rcachedata_offset; + r_mesh_rcachedata_offset += r->data_size; + offsetend = r_mesh_rcachedata_offset; + //R_Mesh_CacheArray_ValidateState(4); + + /* + { + int n; + for (lhead = &r_mesh_rcachesequentialchain, l = lhead->next, n = 0;l != lhead;l = l->next, n++); + Con_Printf("R_Mesh_CacheArray: new data range %i:%i, %i items are already linked\n", offset, offsetend, n); + } + */ + + // make room for the new data (remove old items) + lhead = &r_mesh_rcachesequentialchain; + l = r_mesh_rcachesequentialchain_current; + if (l == lhead) + l = l->next; + while (l != lhead && l->data->offset < offsetend && l->data->offset + l->data->request.data_size > offset) + { + //r_mesh_rcachesequentialchain_current = l; + //R_Mesh_CacheArray_ValidateState(8); + lnext = l->next; + // if at the end of the chain, wrap around + if (lnext == lhead) + lnext = lnext->next; + //r_mesh_rcachesequentialchain_current = lnext; + //R_Mesh_CacheArray_ValidateState(10); + + // unlink from sequential chain + l->next->prev = l->prev; + l->prev->next = l->next; + //R_Mesh_CacheArray_ValidateState(11); + // link into free chain + l->next = &r_mesh_rcachefreechain; + l->prev = l->next->prev; + l->next->prev = l->prev->next = l; + //R_Mesh_CacheArray_ValidateState(12); + + l = &l->data->hashlink; + // unlink from hash chain + l->next->prev = l->prev; + l->prev->next = l->next; + + l = lnext; + //r_mesh_rcachesequentialchain_current = l; + //R_Mesh_CacheArray_ValidateState(9); + } + //r_mesh_rcachesequentialchain_current = l; + //R_Mesh_CacheArray_ValidateState(5); + // gobble an extra item if we have no free items available + if (r_mesh_rcachefreechain.next == &r_mesh_rcachefreechain) + { + lnext = l->next; + + // unlink from sequential chain + l->next->prev = l->prev; + l->prev->next = l->next; + // link into free chain + l->next = &r_mesh_rcachefreechain; + l->prev = l->next->prev; + l->next->prev = l->prev->next = l; + + l = &l->data->hashlink; + // unlink from hash chain + l->next->prev = l->prev; + l->prev->next = l->next; + + l = lnext; + } + r_mesh_rcachesequentialchain_current = l; + //R_Mesh_CacheArray_ValidateState(6); + + // now take an item from the free chain + l = r_mesh_rcachefreechain.next; + // set it up + d = l->data; + d->request = *r; + d->offset = offset; + // unlink + l->next->prev = l->prev; + l->prev->next = l->next; + // relink to sequential + l->next = r_mesh_rcachesequentialchain_current->prev; + l->prev = l->next->prev; + while (l->next->data && l->data && l->next->data->offset <= d->offset) + { + //Con_Printf(">\n"); + l->next = l->next->next; + l->prev = l->prev->next; + } + while (l->prev->data && l->data && l->prev->data->offset >= d->offset) + { + //Con_Printf("<\n"); + l->prev = l->prev->prev; + l->next = l->next->prev; + } + l->next->prev = l->prev->next = l; + // also link into hash chain + l = &l->data->hashlink; + l->next = &r_mesh_rcachechain[hashindex]; + l->prev = l->next->prev; + l->prev->next = l; + l->next->prev = l->prev->next = l; + + + //r_mesh_rcachesequentialchain_current = d->sequentiallink.next; + + //R_Mesh_CacheArray_ValidateState(7); + // and finally set the data pointer + r->data = r_mesh_rcachedata + d->offset; + // and tell the caller to fill the array + return true; } +