X-Git-Url: http://de.git.xonotic.org/?a=blobdiff_plain;f=gl_backend.c;h=8ad00d63cd16d33ad661d21154c0ff18bf9d9c3f;hb=953b5703b6b003beb3818593d86ed8784915780d;hp=aff67a440c10e6f15fdfdd8c7681723b3f2c2fc6;hpb=a154190c6672544bc623b003a76833baeeb0b088;p=xonotic%2Fdarkplaces.git diff --git a/gl_backend.c b/gl_backend.c index aff67a44..8ad00d63 100644 --- a/gl_backend.c +++ b/gl_backend.c @@ -1,1222 +1,2198 @@ #include "quakedef.h" +#include "image.h" +#include "jpeg.h" +#include "cl_collision.h" + +cvar_t gl_mesh_drawrangeelements = {0, "gl_mesh_drawrangeelements", "1"}; +cvar_t gl_mesh_testarrayelement = {0, "gl_mesh_testarrayelement", "0"}; +cvar_t gl_mesh_testmanualfeeding = {0, "gl_mesh_testmanualfeeding", "0"}; +cvar_t gl_paranoid = {0, "gl_paranoid", "0"}; +cvar_t gl_printcheckerror = {0, "gl_printcheckerror", "0"}; +cvar_t r_stereo_separation = {0, "r_stereo_separation", "4"}; +cvar_t r_stereo_sidebyside = {0, "r_stereo_sidebyside", "0"}; +cvar_t r_stereo_redblue = {0, "r_stereo_redblue", "0"}; +cvar_t r_stereo_redcyan = {0, "r_stereo_redcyan", "0"}; +cvar_t r_stereo_redgreen = {0, "r_stereo_redgreen", "0"}; + +cvar_t r_render = {0, "r_render", "1"}; +cvar_t r_waterwarp = {CVAR_SAVE, "r_waterwarp", "1"}; +cvar_t gl_polyblend = {CVAR_SAVE, "gl_polyblend", "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 gl_maxdrawrangeelementsvertices; +int gl_maxdrawrangeelementsindices; -static int max_meshs; -static int max_batch; -static int max_verts; // always max_meshs * 3 -#define TRANSDEPTHRES 4096 +#ifdef DEBUGGL +int errornumber = 0; -static cvar_t gl_mesh_maxtriangles = {0, "gl_mesh_maxtriangles", "21760"}; -static cvar_t gl_mesh_batchtriangles = {0, "gl_mesh_batchtriangles", "1024"}; -static cvar_t gl_mesh_merge = {0, "gl_mesh_merge", "1"}; -static cvar_t gl_mesh_floatcolors = {0, "gl_mesh_floatcolors", "1"}; +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 + +#define BACKENDACTIVECHECK if (!backendactive) Sys_Error("GL backend function called when backend is not active\n"); + +void SCR_ScreenShot_f (void); + +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_mesh_s +static unsigned int backendunits, backendimageunits, backendarrayunits, backendactive; + +/* +note: here's strip order for a terrain row: +0--1--2--3--4 +|\ |\ |\ |\ | +| \| \| \| \| +A--B--C--D--E +clockwise + +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; + + +for (y = 0;y < rows - 1;y++) { - 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; + for (x = 0;x < columns - 1;x++) + { + i = y * rows + x; + *elements++ = i + columns; + *elements++ = i; + *elements++ = i + columns + 1; + *elements++ = i; + *elements++ = i + 1; + *elements++ = i + columns + 1; + } } -buf_mesh_t; -typedef struct buf_transtri_s +alternative: +0--1--2--3--4 +| /| /|\ | /| +|/ |/ | \|/ | +A--B--C--D--E +counterclockwise + +for (y = 0;y < rows - 1;y++) { - struct buf_transtri_s *next; - buf_mesh_t *mesh; - int index[3]; + for (x = 0;x < columns - 1;x++) + { + i = y * rows + x; + *elements++ = i; + *elements++ = i + columns; + *elements++ = i + columns + 1; + *elements++ = i + columns; + *elements++ = i + columns + 1; + *elements++ = i + 1; + } } -buf_transtri_t; +*/ + +int polygonelements[768]; -typedef struct buf_tri_s +static void R_Mesh_CacheArray_Startup(void); +static void R_Mesh_CacheArray_Shutdown(void); +void GL_Backend_AllocArrays(void) { - int index[3]; + R_Mesh_CacheArray_Startup(); } -buf_tri_t; -typedef struct +void GL_Backend_FreeArrays(void) { - float v[4]; + R_Mesh_CacheArray_Shutdown(); } -buf_vertex_t; -typedef struct +static void gl_backend_start(void) { - float c[4]; + Con_Print("OpenGL Backend starting...\n"); + CHECKGLERROR + + 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); + } + + backendunits = min(MAX_TEXTUREUNITS, gl_textureunits); + backendimageunits = backendunits; + backendarrayunits = backendunits; + if (gl_support_fragment_shader) + { + CHECKGLERROR + qglGetIntegerv(GL_MAX_TEXTURE_IMAGE_UNITS_ARB, &backendimageunits); + CHECKGLERROR + qglGetIntegerv(GL_MAX_TEXTURE_COORDS_ARB, &backendarrayunits); + CHECKGLERROR + Con_Printf("GLSL shader support detected: texture units = %i texenv, %i image, %i array\n", backendunits, backendimageunits, backendarrayunits); + } + else if (backendunits > 1) + Con_Printf("multitexture detected: texture units = %i\n", backendunits); + else + Con_Printf("singletexture\n"); + + GL_Backend_AllocArrays(); + + Con_Printf("OpenGL backend started.\n"); + + CHECKGLERROR + + backendactive = true; } -buf_fcolor_t; -typedef struct +static void gl_backend_shutdown(void) { - byte c[4]; + backendunits = 0; + backendimageunits = 0; + backendarrayunits = 0; + backendactive = false; + + Con_Print("OpenGL Backend shutting down\n"); + + GL_Backend_FreeArrays(); } -buf_bcolor_t; -typedef struct +static void gl_backend_newmap(void) { - float t[2]; } -buf_texcoord_t; - -static float meshfarclip; -static int currentmesh, currenttriangle, currentvertex, backendunits, backendactive, meshmerge, floatcolors, transranout; -static buf_mesh_t *buf_mesh; -static buf_tri_t *buf_tri; -static buf_vertex_t *buf_vertex; -static buf_fcolor_t *buf_fcolor; -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; -static buf_fcolor_t *buf_transfcolor; -static buf_bcolor_t *buf_transbcolor; -static buf_texcoord_t *buf_transtexcoord[MAX_TEXTUREUNITS]; - -static mempool_t *gl_backend_mempool; -static void gl_backend_start(void) +cvar_t scr_zoomwindow = {CVAR_SAVE, "scr_zoomwindow", "0"}; +cvar_t scr_zoomwindow_viewsizex = {CVAR_SAVE, "scr_zoomwindow_viewsizex", "20"}; +cvar_t scr_zoomwindow_viewsizey = {CVAR_SAVE, "scr_zoomwindow_viewsizey", "20"}; +cvar_t scr_zoomwindow_fov = {CVAR_SAVE, "scr_zoomwindow_fov", "20"}; + +void gl_backend_init(void) { int i; - max_verts = max_meshs * 3; + 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(&r_waterwarp); + Cvar_RegisterVariable(&r_stereo_separation); + Cvar_RegisterVariable(&r_stereo_sidebyside); + Cvar_RegisterVariable(&r_stereo_redblue); + Cvar_RegisterVariable(&r_stereo_redcyan); + Cvar_RegisterVariable(&r_stereo_redgreen); + Cvar_RegisterVariable(&gl_polyblend); + Cvar_RegisterVariable(&gl_dither); + Cvar_RegisterVariable(&gl_lockarrays); + Cvar_RegisterVariable(&gl_paranoid); + Cvar_RegisterVariable(&gl_printcheckerror); +#ifdef NORENDER + Cvar_SetValue("r_render", 0); +#endif + + Cvar_RegisterVariable(&gl_mesh_drawrangeelements); + Cvar_RegisterVariable(&gl_mesh_testarrayelement); + Cvar_RegisterVariable(&gl_mesh_testmanualfeeding); - gl_backend_mempool = Mem_AllocPool("GL_Backend"); + Cvar_RegisterVariable(&scr_zoomwindow); + Cvar_RegisterVariable(&scr_zoomwindow_viewsizex); + Cvar_RegisterVariable(&scr_zoomwindow_viewsizey); + Cvar_RegisterVariable(&scr_zoomwindow_fov); -#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));\ - } + R_RegisterModule("GL_Backend", gl_backend_start, gl_backend_shutdown, gl_backend_newmap); +} + +void GL_SetupView_Orientation_Identity (void) +{ + Matrix4x4_CreateIdentity(&backend_viewmatrix); + memset(&backend_modelmatrix, 0, sizeof(backend_modelmatrix)); +} + +void GL_SetupView_Orientation_FromEntity(matrix4x4_t *matrix) +{ + matrix4x4_t tempmatrix, basematrix; + Matrix4x4_Invert_Simple(&tempmatrix, matrix); + Matrix4x4_CreateRotate(&basematrix, -90, 1, 0, 0); + Matrix4x4_ConcatRotate(&basematrix, 90, 0, 0, 1); + Matrix4x4_Concat(&backend_viewmatrix, &basematrix, &tempmatrix); + //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)); +} + +void GL_SetupView_Mode_Perspective (double fovx, double fovy, double zNear, double zFar) +{ + double xmax, ymax; + double m[16]; + + if (!r_render.integer) + return; + + // 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 + qglGetDoublev(GL_PROJECTION_MATRIX, m); + 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]; + qglMatrixMode(GL_MODELVIEW);CHECKGLERROR + GL_SetupView_Orientation_Identity(); +} + +void GL_SetupView_Mode_PerspectiveInfiniteFarClip (double fovx, double fovy, double zNear) +{ + double nudge, m[16]; - BACKENDALLOC(buf_mesh, max_meshs, buf_mesh_t) - BACKENDALLOC(buf_tri, max_meshs, buf_tri_t) - BACKENDALLOC(buf_vertex, max_verts, buf_vertex_t) - BACKENDALLOC(buf_fcolor, max_verts, buf_fcolor_t) - BACKENDALLOC(buf_bcolor, max_verts, buf_bcolor_t) + if (!r_render.integer) + return; - 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) - BACKENDALLOC(buf_transfcolor, max_verts, buf_fcolor_t) - BACKENDALLOC(buf_transbcolor, max_verts, buf_bcolor_t) + // set up viewpoint + 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] = -nudge; + m[11] = -1; + m[12] = 0; + m[13] = 0; + m[14] = -2 * zNear * nudge; + m[15] = 0; + qglLoadMatrixd(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]; +} + +void GL_SetupView_Mode_Ortho (double x1, double y1, double x2, double y2, double zNear, double zFar) +{ + double m[16]; + if (!r_render.integer) + return; + + // set up viewpoint + qglMatrixMode(GL_PROJECTION);CHECKGLERROR + qglLoadIdentity();CHECKGLERROR + qglOrtho(x1, x2, y2, y1, zNear, zFar); + qglGetDoublev(GL_PROJECTION_MATRIX, m); + 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]; + qglMatrixMode(GL_MODELVIEW);CHECKGLERROR + GL_SetupView_Orientation_Identity(); +} + +typedef struct gltextureunit_s +{ + int t1d, t2d, t3d, tcubemap; + int arrayenabled; + unsigned int arraycomponents; + const void *pointer_texcoord; + float rgbscale, alphascale; + int combinergb, combinealpha; + // FIXME: add more combine stuff + // texmatrixenabled exists only to avoid unnecessary texmatrix compares + int texmatrixenabled; + matrix4x4_t matrix; +} +gltextureunit_t; + +static struct +{ + int blendfunc1; + int blendfunc2; + int blend; + GLboolean depthmask; + int colormask; // stored as bottom 4 bits: r g b a (3 2 1 0 order) + int depthtest; + int scissortest; + unsigned int unit; + unsigned int clientunit; + gltextureunit_t units[MAX_TEXTUREUNITS]; + float color4f[4]; + int lockrange_first; + int lockrange_count; + const void *pointer_vertex; + const void *pointer_color; +} +gl_state; + +void GL_SetupTextureState(void) +{ + unsigned int i; + gltextureunit_t *unit; + CHECKGLERROR + gl_state.unit = -1; + gl_state.clientunit = -1; for (i = 0;i < MAX_TEXTUREUNITS;i++) { - // only allocate as many texcoord arrays as we need - if (i < gl_textureunits) + unit = gl_state.units + i; + unit->t1d = 0; + unit->t2d = 0; + unit->t3d = 0; + unit->tcubemap = 0; + unit->arrayenabled = false; + unit->arraycomponents = 0; + unit->pointer_texcoord = NULL; + unit->rgbscale = 1; + unit->alphascale = 1; + unit->combinergb = GL_MODULATE; + unit->combinealpha = GL_MODULATE; + unit->texmatrixenabled = false; + unit->matrix = r_identitymatrix; + } + + for (i = 0;i < backendimageunits;i++) + { + GL_ActiveTexture(i); + qglBindTexture(GL_TEXTURE_1D, 0);CHECKGLERROR + qglBindTexture(GL_TEXTURE_2D, 0);CHECKGLERROR + if (gl_texture3d) { - BACKENDALLOC(buf_texcoord[i], max_verts, buf_texcoord_t) - BACKENDALLOC(buf_transtexcoord[i], max_verts, buf_texcoord_t) + qglBindTexture(GL_TEXTURE_3D, 0);CHECKGLERROR + } + if (gl_texturecubemap) + { + qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, 0);CHECKGLERROR + } + } + + for (i = 0;i < backendarrayunits;i++) + { + GL_ClientActiveTexture(i); + qglTexCoordPointer(2, GL_FLOAT, sizeof(float[2]), NULL);CHECKGLERROR + qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR + } + + for (i = 0;i < backendunits;i++) + { + GL_ActiveTexture(i); + 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 + } + qglMatrixMode(GL_TEXTURE); + qglLoadIdentity(); + qglMatrixMode(GL_MODELVIEW); + 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 { - buf_texcoord[i] = NULL; - buf_transtexcoord[i] = NULL; + qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);CHECKGLERROR } } - backendunits = min(MAX_TEXTUREUNITS, gl_textureunits); - backendactive = true; + CHECKGLERROR } -static void gl_backend_shutdown(void) +void GL_Backend_ResetState(void) { - int i; - /* -#define BACKENDFREE(var)\ - if (var)\ - {\ - Mem_Free(var);\ - var = NULL;\ + memset(&gl_state, 0, sizeof(gl_state)); + gl_state.depthtest = true; + gl_state.blendfunc1 = GL_ONE; + gl_state.blendfunc2 = GL_ZERO; + gl_state.blend = false; + gl_state.depthmask = GL_TRUE; + gl_state.colormask = 15; + 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.pointer_vertex = NULL; + gl_state.pointer_color = NULL; + + CHECKGLERROR + + qglColorMask(1, 1, 1, 1); + 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]), NULL);CHECKGLERROR + qglEnableClientState(GL_VERTEX_ARRAY);CHECKGLERROR + + qglColorPointer(4, GL_FLOAT, sizeof(float[4]), NULL);CHECKGLERROR + qglDisableClientState(GL_COLOR_ARRAY);CHECKGLERROR + + GL_Color(0, 0, 0, 0); + GL_Color(1, 1, 1, 1); + + GL_SetupTextureState(); +} + +void GL_ActiveTexture(unsigned int num) +{ + if (gl_state.unit != num) + { + gl_state.unit = num; + if (qglActiveTexture) + { + qglActiveTexture(GL_TEXTURE0_ARB + gl_state.unit); + CHECKGLERROR + } } - */ -#define BACKENDFREE(var) var = NULL; +} - BACKENDFREE(buf_mesh) - BACKENDFREE(buf_tri) - BACKENDFREE(buf_vertex) - BACKENDFREE(buf_fcolor) - BACKENDFREE(buf_bcolor) +void GL_ClientActiveTexture(unsigned int num) +{ + if (gl_state.clientunit != num) + { + gl_state.clientunit = num; + if (qglActiveTexture) + { + qglClientActiveTexture(GL_TEXTURE0_ARB + gl_state.clientunit); + CHECKGLERROR + } + } +} - BACKENDFREE(buf_transmesh) - BACKENDFREE(buf_transtri) - BACKENDFREE(buf_transtri_list) - BACKENDFREE(buf_transvertex) - BACKENDFREE(buf_transfcolor) - BACKENDFREE(buf_transbcolor) +void GL_BlendFunc(int blendfunc1, int blendfunc2) +{ + if (gl_state.blendfunc1 != blendfunc1 || gl_state.blendfunc2 != blendfunc2) + { + if (r_showtrispass) + return; + qglBlendFunc(gl_state.blendfunc1 = blendfunc1, gl_state.blendfunc2 = blendfunc2);CHECKGLERROR + if (gl_state.blendfunc2 == GL_ZERO) + { + if (gl_state.blendfunc1 == GL_ONE) + { + if (gl_state.blend) + { + gl_state.blend = 0; + qglDisable(GL_BLEND);CHECKGLERROR + } + } + else + { + if (!gl_state.blend) + { + gl_state.blend = 1; + qglEnable(GL_BLEND);CHECKGLERROR + } + } + } + else + { + if (!gl_state.blend) + { + gl_state.blend = 1; + qglEnable(GL_BLEND);CHECKGLERROR + } + } + } +} - for (i = 0;i < MAX_TEXTUREUNITS;i++) +void GL_DepthMask(int state) +{ + if (gl_state.depthmask != state) { - BACKENDFREE(buf_texcoord[i]) - BACKENDFREE(buf_transtexcoord[i]) + if (r_showtrispass) + return; + qglDepthMask(gl_state.depthmask = state);CHECKGLERROR } +} - Mem_FreePool(&gl_backend_mempool); +void GL_DepthTest(int state) +{ + if (gl_state.depthtest != state) + { + if (r_showtrispass) + return; + gl_state.depthtest = state; + if (gl_state.depthtest) + { + qglEnable(GL_DEPTH_TEST);CHECKGLERROR + } + else + { + qglDisable(GL_DEPTH_TEST);CHECKGLERROR + } + } +} - backendunits = 0; - backendactive = false; +void GL_ColorMask(int r, int g, int b, int a) +{ + int state = r*8 + g*4 + b*2 + a*1; + if (gl_state.colormask != state) + { + if (r_showtrispass) + return; + gl_state.colormask = state; + qglColorMask((GLboolean)r, (GLboolean)g, (GLboolean)b, (GLboolean)a);CHECKGLERROR + } } -static void gl_backend_bufferchanges(int init) +void GL_Color(float cr, float cg, float cb, float ca) { - // 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_state.pointer_color || gl_state.color4f[0] != cr || gl_state.color4f[1] != cg || gl_state.color4f[2] != cb || gl_state.color4f[3] != ca) + { + if (r_showtrispass) + return; + gl_state.color4f[0] = cr; + gl_state.color4f[1] = cg; + gl_state.color4f[2] = cb; + gl_state.color4f[3] = ca; + CHECKGLERROR + qglColor4f(gl_state.color4f[0], gl_state.color4f[1], gl_state.color4f[2], gl_state.color4f[3]); + CHECKGLERROR + } +} - 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); +void GL_ShowTrisColor(float cr, float cg, float cb, float ca) +{ + if (!r_showtrispass) + return; + r_showtrispass = false; + GL_Color(cr * r_showtris.value, cg * r_showtris.value, cb * r_showtris.value, ca); + r_showtrispass = true; +} - max_batch = gl_mesh_batchtriangles.integer; - if (max_meshs != gl_mesh_maxtriangles.integer) +void GL_LockArrays(int first, int count) +{ + if (gl_state.lockrange_count != count || gl_state.lockrange_first != first) { - max_meshs = gl_mesh_maxtriangles.integer; - - if (!init) + if (gl_state.lockrange_count) + { + gl_state.lockrange_count = 0; + CHECKGLERROR + qglUnlockArraysEXT(); + CHECKGLERROR + } + if (count && gl_supportslockarrays && gl_lockarrays.integer && r_render.integer) { - gl_backend_shutdown(); - gl_backend_start(); + gl_state.lockrange_first = first; + gl_state.lockrange_count = count; + CHECKGLERROR + qglLockArraysEXT(first, count); + CHECKGLERROR } } } -float r_farclip, r_newfarclip; - -static void gl_backend_newmap(void) +void GL_Scissor (int x, int y, int width, int height) { - r_farclip = r_newfarclip = 2048.0f; + CHECKGLERROR + qglScissor(x, vid.height - (y + height),width,height); + CHECKGLERROR } -int polyindexarray[768]; - -void gl_backend_init(void) +void GL_ScissorTest(int state) { - int i; - Cvar_RegisterVariable(&gl_mesh_maxtriangles); - Cvar_RegisterVariable(&gl_mesh_batchtriangles); - Cvar_RegisterVariable(&gl_mesh_merge); - Cvar_RegisterVariable(&gl_mesh_floatcolors); - 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; - } + if(gl_state.scissortest == state) + return; + + CHECKGLERROR + if((gl_state.scissortest = state)) + qglEnable(GL_SCISSOR_TEST); + else + qglDisable(GL_SCISSOR_TEST); + CHECKGLERROR } -static float viewdist; +void GL_Clear(int mask) +{ + if (r_showtrispass) + return; + qglClear(mask);CHECKGLERROR +} -int c_meshtris; +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_view_x + (out[0] * iw + 1.0f) * r_view_width * 0.5f; + out[1] = r_view_y + (out[1] * iw + 1.0f) * r_view_height * 0.5f; + out[2] = r_view_z + (out[2] * iw + 1.0f) * r_view_depth * 0.5f; +} // called at beginning of frame -void R_Mesh_Clear(void) +void R_Mesh_Start(void) { - 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; - floatcolors = gl_mesh_floatcolors.integer; - transranout = false; - viewdist = DotProduct(r_origin, vpn); - - c_meshtris = 0; + BACKENDACTIVECHECK + CHECKGLERROR + GL_Backend_ResetState(); } -#ifdef DEBUGGL -void GL_PrintError(int errornumber, char *filename, int linenumber) +unsigned int GL_Backend_CompileProgram(int vertexstrings_count, const char **vertexstrings_list, int fragmentstrings_count, const char **fragmentstrings_list) { - switch(errornumber) + GLint vertexshadercompiled, fragmentshadercompiled, programlinked; + GLuint vertexshaderobject, fragmentshaderobject, programobject = 0; + char compilelog[4096]; + CHECKGLERROR + + programobject = qglCreateProgramObjectARB(); + CHECKGLERROR + if (!programobject) + return 0; + + if (vertexstrings_count) { - 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; + CHECKGLERROR + vertexshaderobject = qglCreateShaderObjectARB(GL_VERTEX_SHADER_ARB); + if (!vertexshaderobject) + { + qglDeleteObjectARB(programobject); + CHECKGLERROR + return 0; + } + qglShaderSourceARB(vertexshaderobject, vertexstrings_count, vertexstrings_list, NULL); + qglCompileShaderARB(vertexshaderobject); + CHECKGLERROR + qglGetObjectParameterivARB(vertexshaderobject, GL_OBJECT_COMPILE_STATUS_ARB, &vertexshadercompiled); + qglGetInfoLogARB(vertexshaderobject, sizeof(compilelog), NULL, compilelog); + if (compilelog[0]) + Con_Printf("vertex shader compile log:\n%s\n", compilelog); + if (!vertexshadercompiled) + { + qglDeleteObjectARB(programobject); + qglDeleteObjectARB(vertexshaderobject); + CHECKGLERROR + return 0; + } + qglAttachObjectARB(programobject, vertexshaderobject); + qglDeleteObjectARB(vertexshaderobject); + CHECKGLERROR } -} - -int errornumber = 0; -#endif -// renders mesh buffers, called to flush buffers when full -void R_Mesh_Render(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; + if (fragmentstrings_count) + { + CHECKGLERROR + fragmentshaderobject = qglCreateShaderObjectARB(GL_FRAGMENT_SHADER_ARB); + if (!fragmentshaderobject) + { + qglDeleteObjectARB(programobject); + CHECKGLERROR + return 0; + } + qglShaderSourceARB(fragmentshaderobject, fragmentstrings_count, fragmentstrings_list, NULL); + qglCompileShaderARB(fragmentshaderobject); + CHECKGLERROR + qglGetObjectParameterivARB(fragmentshaderobject, GL_OBJECT_COMPILE_STATUS_ARB, &fragmentshadercompiled); + qglGetInfoLogARB(fragmentshaderobject, sizeof(compilelog), NULL, compilelog); + if (compilelog[0]) + Con_Printf("fragment shader compile log:\n%s\n", compilelog); + if (!fragmentshadercompiled) + { + qglDeleteObjectARB(programobject); + qglDeleteObjectARB(fragmentshaderobject); + CHECKGLERROR + return 0; + } + qglAttachObjectARB(programobject, fragmentshaderobject); + qglDeleteObjectARB(fragmentshaderobject); + CHECKGLERROR + } -CHECKGLERROR + qglLinkProgramARB(programobject); + CHECKGLERROR + qglGetObjectParameterivARB(programobject, GL_OBJECT_LINK_STATUS_ARB, &programlinked); + qglGetInfoLogARB(programobject, sizeof(compilelog), NULL, compilelog); + if (compilelog[0]) + { + Con_Printf("program link log:\n%s\n", compilelog); + // software vertex shader is ok but software fragment shader is WAY + // too slow, fail program if so. + // NOTE: this string might be ATI specific, but that's ok because the + // ATI R300 chip (Radeon 9500-9800/X300) is the most likely to use a + // software fragment shader due to low instruction and dependent + // texture limits. + if (strstr(compilelog, "fragment shader will run in software")) + programlinked = false; + } + CHECKGLERROR + if (!programlinked) + { + qglDeleteObjectARB(programobject); + return 0; + } + CHECKGLERROR + return programobject; +} - farclip = meshfarclip + 256.0f - viewdist; // + 256 just to be safe +void GL_Backend_FreeProgram(unsigned int prog) +{ + CHECKGLERROR + qglDeleteObjectARB(prog); + CHECKGLERROR +} - // push out farclip for next frame - if (farclip > r_newfarclip) - r_newfarclip = ceil((farclip + 255) / 256) * 256 + 256; +int gl_backend_rebindtextures; - 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 - -CHECKGLERROR - glVertexPointer(3, GL_FLOAT, sizeof(buf_vertex_t), buf_vertex); -CHECKGLERROR - glEnableClientState(GL_VERTEX_ARRAY); -CHECKGLERROR - if (floatcolors) - { - glColorPointer(4, GL_FLOAT, sizeof(buf_fcolor_t), buf_fcolor); -CHECKGLERROR +void GL_Backend_RenumberElements(int *out, int count, const int *in, int offset) +{ + int i; + if (offset) + { + for (i = 0;i < count;i++) + *out++ = *in++ + offset; } else + memcpy(out, in, sizeof(*out) * count); +} + +// renders triangles using vertices from the active arrays +int paranoidblah = 0; +void R_Mesh_Draw(int firstvertex, int numvertices, int numtriangles, const int *elements) +{ + unsigned int numelements = numtriangles * 3; + if (numvertices < 3 || numtriangles < 1) { - glColorPointer(4, GL_UNSIGNED_BYTE, sizeof(buf_bcolor_t), buf_bcolor); -CHECKGLERROR + Con_Printf("R_Mesh_Draw(%d, %d, %d, %08p);\n", firstvertex, numvertices, numtriangles, elements); + return; } - glEnableClientState(GL_COLOR_ARRAY); -CHECKGLERROR - - if (backendunits > 1) + //CHECKGLERROR + if (r_showtrispass) + { + R_Mesh_Draw_ShowTris(firstvertex, numvertices, numtriangles, elements); + return; + } + c_meshs++; + c_meshelements += numelements; + if (gl_paranoid.integer) { - for (i = 0;i < backendunits;i++) + unsigned int i, j, size; + const int *p; + if (!qglIsEnabled(GL_VERTEX_ARRAY)) + Con_Print("R_Mesh_Draw: vertex array not enabled\n"); + for (j = 0, size = numvertices * 3, p = (int *)((float *)gl_state.pointer_vertex + firstvertex * 3);j < size;j++, p++) + paranoidblah += *p; + if (gl_state.pointer_color) + { + if (!qglIsEnabled(GL_COLOR_ARRAY)) + Con_Print("R_Mesh_Draw: color array set but not enabled\n"); + for (j = 0, size = numvertices * 4, p = (int *)((float *)gl_state.pointer_color + firstvertex * 4);j < size;j++, p++) + paranoidblah += *p; + } + for (i = 0;i < backendarrayunits;i++) { - qglActiveTexture(GL_TEXTURE0_ARB + (unit = i)); -CHECKGLERROR - glBindTexture(GL_TEXTURE_2D, (texture[i] = 0)); -CHECKGLERROR - glDisable(GL_TEXTURE_2D); -CHECKGLERROR - if (gl_combine.integer) + if (gl_state.units[i].arrayenabled) { - 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 + GL_ClientActiveTexture(i); + if (!qglIsEnabled(GL_TEXTURE_COORD_ARRAY)) + Con_Print("R_Mesh_Draw: texcoord array set but not enabled\n"); + for (j = 0, size = numvertices * gl_state.units[i].arraycomponents, p = (int *)((float *)gl_state.units[i].pointer_texcoord + firstvertex * gl_state.units[i].arraycomponents);j < size;j++, p++) + paranoidblah += *p; } - else + } + for (i = 0;i < (unsigned int) numtriangles * 3;i++) + { + if (elements[i] < firstvertex || elements[i] >= firstvertex + numvertices) { - glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE); -CHECKGLERROR + Con_Printf("R_Mesh_Draw: invalid vertex index %i (outside range %i - %i) in elements list\n", elements[i], firstvertex, firstvertex + numvertices); + return; } - - 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 } + CHECKGLERROR } - else + if (r_render.integer) { - 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]; - - if (backendunits > 1) + CHECKGLERROR + if (gl_mesh_testmanualfeeding.integer) { -// int topunit = 0; - for (i = 0;i < backendunits;i++) + unsigned int i, j; + const GLfloat *p; + qglBegin(GL_TRIANGLES); + for (i = 0;i < (unsigned int) numtriangles * 3;i++) { - if (texture[i] != mesh->textures[i]) + for (j = 0;j < backendarrayunits;j++) { - if (unit != i) - { - qglActiveTexture(GL_TEXTURE0_ARB + (unit = i)); -CHECKGLERROR - } - if (texture[i] == 0) + if (gl_state.units[j].pointer_texcoord) { - 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) + if (backendarrayunits > 1) { - qglClientActiveTexture(GL_TEXTURE0_ARB + (clientunit = i)); -CHECKGLERROR + if (gl_state.units[j].arraycomponents == 4) + { + p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 4; + qglMultiTexCoord4f(GL_TEXTURE0_ARB + j, p[0], p[1], p[2], p[3]); + } + else if (gl_state.units[j].arraycomponents == 3) + { + p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 3; + qglMultiTexCoord3f(GL_TEXTURE0_ARB + j, p[0], p[1], p[2]); + } + else if (gl_state.units[j].arraycomponents == 2) + { + p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 2; + qglMultiTexCoord2f(GL_TEXTURE0_ARB + j, p[0], p[1]); + } + else + { + p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 1; + qglMultiTexCoord1f(GL_TEXTURE0_ARB + j, p[0]); + } } - 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) + else { - qglClientActiveTexture(GL_TEXTURE0_ARB + (clientunit = i)); -CHECKGLERROR + if (gl_state.units[j].arraycomponents == 4) + { + p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 4; + qglTexCoord4f(p[0], p[1], p[2], p[3]); + } + else if (gl_state.units[j].arraycomponents == 3) + { + p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 3; + qglTexCoord3f(p[0], p[1], p[2]); + } + else if (gl_state.units[j].arraycomponents == 2) + { + p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 2; + qglTexCoord2f(p[0], p[1]); + } + else + { + p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 1; + qglTexCoord1f(p[0]); + } } - glDisableClientState(GL_TEXTURE_COORD_ARRAY); -CHECKGLERROR } } - if (texturergbscale[i] != mesh->texturergbscale[i]) + if (gl_state.pointer_color) { - if (unit != i) - { - qglActiveTexture(GL_TEXTURE0_ARB + (unit = i)); -CHECKGLERROR - } - glTexEnvf(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, (texturergbscale[i] = mesh->texturergbscale[i])); -CHECKGLERROR + p = ((const GLfloat *)(gl_state.pointer_color)) + elements[i] * 4; + qglColor4f(p[0], p[1], p[2], p[3]); } -// if (texture[i]) -// topunit = i; + p = ((const GLfloat *)(gl_state.pointer_vertex)) + elements[i] * 3; + qglVertex3f(p[0], p[1], p[2]); } -// if (unit != topunit) -// { -// qglActiveTexture(GL_TEXTURE0_ARB + (unit = topunit)); -//CHECKGLERROR -// } + qglEnd(); + CHECKGLERROR } - else + else if (gl_mesh_testarrayelement.integer) { - if (texture[0] != mesh->textures[0]) + int i; + qglBegin(GL_TRIANGLES); + for (i = 0;i < numtriangles * 3;i++) { - 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 - } + qglArrayElement(elements[i]); } + qglEnd(); + CHECKGLERROR + } + else if (gl_mesh_drawrangeelements.integer && qglDrawRangeElements != NULL) + { + qglDrawRangeElements(GL_TRIANGLES, firstvertex, firstvertex + numvertices, numelements, GL_UNSIGNED_INT, elements); + CHECKGLERROR } - if (blendfunc1 != mesh->blendfunc1 || blendfunc2 != mesh->blendfunc2) + else { - blendfunc1 = mesh->blendfunc1; - blendfunc2 = mesh->blendfunc2; - glBlendFunc(blendfunc1, blendfunc2); -CHECKGLERROR - if (blendfunc2 == GL_ZERO) + qglDrawElements(GL_TRIANGLES, numelements, GL_UNSIGNED_INT, elements); + CHECKGLERROR + } + } +} + +// restores backend state, used when done with 3D rendering +void R_Mesh_Finish(void) +{ + unsigned int i; + BACKENDACTIVECHECK + CHECKGLERROR + GL_LockArrays(0, 0); + CHECKGLERROR + + for (i = 0;i < backendimageunits;i++) + { + GL_ActiveTexture(i); + qglBindTexture(GL_TEXTURE_1D, 0);CHECKGLERROR + qglBindTexture(GL_TEXTURE_2D, 0);CHECKGLERROR + if (gl_texture3d) + { + qglBindTexture(GL_TEXTURE_3D, 0);CHECKGLERROR + } + if (gl_texturecubemap) + { + qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, 0);CHECKGLERROR + } + } + for (i = 0;i < backendarrayunits;i++) + { + GL_ActiveTexture(backendarrayunits - 1 - i); + qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR + } + for (i = 0;i < backendunits;i++) + { + GL_ActiveTexture(backendunits - 1 - i); + 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 + } + qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);CHECKGLERROR + if (gl_combine.integer) + { + qglTexEnvi(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, 1);CHECKGLERROR + qglTexEnvi(GL_TEXTURE_ENV, GL_ALPHA_SCALE, 1);CHECKGLERROR + } + } + qglDisableClientState(GL_COLOR_ARRAY);CHECKGLERROR + qglDisableClientState(GL_VERTEX_ARRAY);CHECKGLERROR + + qglDisable(GL_BLEND);CHECKGLERROR + qglEnable(GL_DEPTH_TEST);CHECKGLERROR + qglDepthMask(GL_TRUE);CHECKGLERROR + qglBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);CHECKGLERROR +} + +void R_Mesh_Matrix(const matrix4x4_t *matrix) +{ + if (memcmp(matrix, &backend_modelmatrix, sizeof(matrix4x4_t))) + { + backend_modelmatrix = *matrix; + Matrix4x4_Concat(&backend_modelviewmatrix, &backend_viewmatrix, matrix); + Matrix4x4_Transpose(&backend_glmodelviewmatrix, &backend_modelviewmatrix); + qglLoadMatrixf(&backend_glmodelviewmatrix.m[0][0]); + } +} + +void R_Mesh_VertexPointer(const float *vertex3f) +{ + if (gl_state.pointer_vertex != vertex3f) + { + gl_state.pointer_vertex = vertex3f; + CHECKGLERROR + qglVertexPointer(3, GL_FLOAT, sizeof(float[3]), gl_state.pointer_vertex); + CHECKGLERROR + } +} + +void R_Mesh_ColorPointer(const float *color4f) +{ + if (r_showtrispass) + return; + if (gl_state.pointer_color != color4f) + { + CHECKGLERROR + if (!gl_state.pointer_color) + { + qglEnableClientState(GL_COLOR_ARRAY); + CHECKGLERROR + } + else if (!color4f) + { + qglDisableClientState(GL_COLOR_ARRAY); + CHECKGLERROR + // when color array is on the glColor gets trashed, set it again + qglColor4f(gl_state.color4f[0], gl_state.color4f[1], gl_state.color4f[2], gl_state.color4f[3]); + CHECKGLERROR + } + gl_state.pointer_color = color4f; + qglColorPointer(4, GL_FLOAT, sizeof(float[4]), gl_state.pointer_color); + CHECKGLERROR + } +} + +void R_Mesh_TexCoordPointer(unsigned int unitnum, unsigned int numcomponents, const float *texcoord) +{ + gltextureunit_t *unit = gl_state.units + unitnum; + if (r_showtrispass) + return; + // update array settings + if (texcoord) + { + // texcoord array + if (unit->pointer_texcoord != texcoord || unit->arraycomponents != numcomponents) + { + unit->pointer_texcoord = texcoord; + unit->arraycomponents = numcomponents; + GL_ClientActiveTexture(unitnum); + qglTexCoordPointer(unit->arraycomponents, GL_FLOAT, sizeof(float) * unit->arraycomponents, unit->pointer_texcoord); + CHECKGLERROR + } + // texture array unit is enabled, enable the array + if (!unit->arrayenabled) + { + unit->arrayenabled = true; + GL_ClientActiveTexture(unitnum); + qglEnableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR + } + } + else + { + // texture array unit is disabled, disable the array + if (unit->arrayenabled) + { + unit->arrayenabled = false; + GL_ClientActiveTexture(unitnum); + qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR + } + } +} + +void R_Mesh_TexBindAll(unsigned int unitnum, int tex1d, int tex2d, int tex3d, int texcubemap) +{ + gltextureunit_t *unit = gl_state.units + unitnum; + if (unitnum >= backendunits) + return; + if (r_showtrispass) + return; + // update 1d texture binding + if (unit->t1d != tex1d) + { + GL_ActiveTexture(unitnum); + if (unitnum < backendunits) + { + if (tex1d) { - if (blendfunc1 == GL_ONE) - { - if (blend) - { - blend = 0; - glDisable(GL_BLEND); -CHECKGLERROR - } - } - else - { - if (!blend) - { - blend = 1; - glEnable(GL_BLEND); -CHECKGLERROR - } - } + if (unit->t1d == 0) + qglEnable(GL_TEXTURE_1D); } else { - if (!blend) - { - blend = 1; - glEnable(GL_BLEND); -CHECKGLERROR - } + if (unit->t1d) + qglDisable(GL_TEXTURE_1D); } } - if (depthtest != mesh->depthtest) + unit->t1d = tex1d; + qglBindTexture(GL_TEXTURE_1D, unit->t1d); + CHECKGLERROR + } + // update 2d texture binding + if (unit->t2d != tex2d) + { + GL_ActiveTexture(unitnum); + if (unitnum < backendunits) { - depthtest = mesh->depthtest; - if (depthtest) - glEnable(GL_DEPTH_TEST); + if (tex2d) + { + if (unit->t2d == 0) + qglEnable(GL_TEXTURE_2D); + } else - glDisable(GL_DEPTH_TEST); - } - if (depthmask != mesh->depthmask) - { - depthmask = mesh->depthmask; - glDepthMask((GLboolean) depthmask); -CHECKGLERROR - } - - firsttriangle = mesh->firsttriangle; - triangles = mesh->triangles; - firstvert = mesh->firstvert; - lastvert = mesh->lastvert; - mesh = &buf_mesh[++k]; - - 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]; + if (unit->t2d) + qglDisable(GL_TEXTURE_2D); } } - -#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]); -#else - glDrawRangeElements(GL_TRIANGLES, firstvert, lastvert + 1, triangles * 3, GL_UNSIGNED_INT, (unsigned int *)&buf_tri[firsttriangle]); -#endif -CHECKGLERROR + unit->t2d = tex2d; + qglBindTexture(GL_TEXTURE_2D, unit->t2d); + CHECKGLERROR } - - currentmesh = 0; - currenttriangle = 0; - currentvertex = 0; - - GL_UnlockArray(); -CHECKGLERROR - - if (backendunits > 1) + // update 3d texture binding + if (unit->t3d != tex3d) { - for (i = backendunits - 1;i >= 0;i--) + GL_ActiveTexture(unitnum); + if (unitnum < backendunits) { - qglActiveTexture(GL_TEXTURE0_ARB + (unit = i)); -CHECKGLERROR - glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE); -CHECKGLERROR - if (gl_combine.integer) + if (tex3d) + { + if (unit->t3d == 0) + qglEnable(GL_TEXTURE_3D); + } + else { - glTexEnvf(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, 1.0f); -CHECKGLERROR + if (unit->t3d) + qglDisable(GL_TEXTURE_3D); } - if (i > 0) + } + unit->t3d = tex3d; + qglBindTexture(GL_TEXTURE_3D, unit->t3d); + CHECKGLERROR + } + // update cubemap texture binding + if (unit->tcubemap != texcubemap) + { + GL_ActiveTexture(unitnum); + if (unitnum < backendunits) + { + if (texcubemap) { - glDisable(GL_TEXTURE_2D); -CHECKGLERROR + if (unit->tcubemap == 0) + qglEnable(GL_TEXTURE_CUBE_MAP_ARB); } else { - glEnable(GL_TEXTURE_2D); -CHECKGLERROR + if (unit->tcubemap) + qglDisable(GL_TEXTURE_CUBE_MAP_ARB); } - glBindTexture(GL_TEXTURE_2D, 0); -CHECKGLERROR + } + unit->tcubemap = texcubemap; + qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, unit->tcubemap); + CHECKGLERROR + } +} - qglClientActiveTexture(GL_TEXTURE0_ARB + (clientunit = i)); -CHECKGLERROR - glDisableClientState(GL_TEXTURE_COORD_ARRAY); -CHECKGLERROR +void R_Mesh_TexBind1D(unsigned int unitnum, int texnum) +{ + gltextureunit_t *unit = gl_state.units + unitnum; + if (unitnum >= backendunits) + return; + if (r_showtrispass) + return; + // update 1d texture binding + if (unit->t1d != texnum) + { + GL_ActiveTexture(unitnum); + if (texnum) + { + if (unit->t1d == 0) + qglEnable(GL_TEXTURE_1D); + } + else + { + if (unit->t1d) + qglDisable(GL_TEXTURE_1D); } + unit->t1d = texnum; + qglBindTexture(GL_TEXTURE_1D, unit->t1d); + CHECKGLERROR } - else + // update 2d texture binding + if (unit->t2d) + { + GL_ActiveTexture(unitnum); + if (unit->t2d) + qglDisable(GL_TEXTURE_2D); + unit->t2d = 0; + qglBindTexture(GL_TEXTURE_2D, unit->t2d); + CHECKGLERROR + } + // update 3d texture binding + if (unit->t3d) { - 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 + GL_ActiveTexture(unitnum); + if (unit->t3d) + qglDisable(GL_TEXTURE_3D); + unit->t3d = 0; + qglBindTexture(GL_TEXTURE_3D, unit->t3d); + CHECKGLERROR + } + // update cubemap texture binding + if (unit->tcubemap) + { + GL_ActiveTexture(unitnum); + if (unit->tcubemap) + qglDisable(GL_TEXTURE_CUBE_MAP_ARB); + unit->tcubemap = 0; + qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, unit->tcubemap); + CHECKGLERROR + } } -void R_Mesh_AddTransparent(void) +void R_Mesh_TexBind(unsigned int unitnum, int texnum) { - 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) + gltextureunit_t *unit = gl_state.units + unitnum; + if (unitnum >= backendunits) 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 (r_showtrispass) + return; + // update 1d texture binding + if (unit->t1d) { - 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++; + GL_ActiveTexture(unitnum); + if (unit->t1d) + qglDisable(GL_TEXTURE_1D); + unit->t1d = 0; + qglBindTexture(GL_TEXTURE_1D, unit->t1d); + CHECKGLERROR } - - 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) - memcpy(&buf_fcolor[currentvertex], &buf_transfcolor[0], currenttransvertex * sizeof(buf_fcolor_t)); - else - memcpy(&buf_fcolor[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--) + // update 2d texture binding + if (unit->t2d != texnum) { - if ((tri = buf_transtri_list[j])) + GL_ActiveTexture(unitnum); + if (texnum) { - 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; - } + if (unit->t2d == 0) + qglEnable(GL_TEXTURE_2D); + } + else + { + if (unit->t2d) + qglDisable(GL_TEXTURE_2D); } + unit->t2d = texnum; + qglBindTexture(GL_TEXTURE_2D, unit->t2d); + CHECKGLERROR + } + // update 3d texture binding + if (unit->t3d) + { + GL_ActiveTexture(unitnum); + if (unit->t3d) + qglDisable(GL_TEXTURE_3D); + unit->t3d = 0; + qglBindTexture(GL_TEXTURE_3D, unit->t3d); + CHECKGLERROR + } + // update cubemap texture binding + if (unit->tcubemap != 0) + { + GL_ActiveTexture(unitnum); + if (unit->tcubemap) + qglDisable(GL_TEXTURE_CUBE_MAP_ARB); + unit->tcubemap = 0; + qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, unit->tcubemap); + CHECKGLERROR } - currentvertex += currenttransvertex; - currenttransmesh = 0; - currenttranstriangle = 0; - currenttransvertex = 0; } -void R_Mesh_Draw(const rmeshinfo_t *m) +void R_Mesh_TexBind3D(unsigned int unitnum, int texnum) { - // these are static because gcc runs out of virtual registers otherwise - static int i, j, *index, overbright; - static float c, *in, scaler, cr, cg, cb, ca; - static buf_mesh_t *mesh; - static buf_vertex_t *vert; - static buf_fcolor_t *fcolor; - static buf_bcolor_t *bcolor; - static buf_texcoord_t *texcoord[MAX_TEXTUREUNITS]; - static buf_transtri_t *tri; - static byte br, bg, bb, ba; - - if (m->index == NULL - || !m->numtriangles - || m->vertex == NULL - || !m->numverts) + gltextureunit_t *unit = gl_state.units + unitnum; + if (unitnum >= backendunits) return; - // ignore meaningless alpha meshs - if (!m->depthwrite && m->blendfunc1 == GL_SRC_ALPHA && (m->blendfunc2 == GL_ONE || m->blendfunc2 == GL_ONE_MINUS_SRC_ALPHA)) + if (r_showtrispass) + return; + // update 1d texture binding + if (unit->t1d) + { + GL_ActiveTexture(unitnum); + if (unit->t1d) + qglDisable(GL_TEXTURE_1D); + unit->t1d = 0; + qglBindTexture(GL_TEXTURE_1D, unit->t1d); + CHECKGLERROR + } + // update 2d texture binding + if (unit->t2d) + { + GL_ActiveTexture(unitnum); + if (unit->t2d) + qglDisable(GL_TEXTURE_2D); + unit->t2d = 0; + qglBindTexture(GL_TEXTURE_2D, unit->t2d); + CHECKGLERROR + } + // update 3d texture binding + if (unit->t3d != texnum) { - if (m->color) + GL_ActiveTexture(unitnum); + if (texnum) { - 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; + if (unit->t3d == 0) + qglEnable(GL_TEXTURE_3D); } - else if (m->ca < 0.01f) - return; + else + { + if (unit->t3d) + qglDisable(GL_TEXTURE_3D); + } + unit->t3d = texnum; + qglBindTexture(GL_TEXTURE_3D, unit->t3d); + CHECKGLERROR } + // update cubemap texture binding + if (unit->tcubemap != 0) + { + GL_ActiveTexture(unitnum); + if (unit->tcubemap) + qglDisable(GL_TEXTURE_CUBE_MAP_ARB); + unit->tcubemap = 0; + qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, unit->tcubemap); + CHECKGLERROR + } +} - if (!backendactive) - Sys_Error("R_Mesh_Draw: called when backend is not active\n"); +void R_Mesh_TexBindCubeMap(unsigned int unitnum, int texnum) +{ + gltextureunit_t *unit = gl_state.units + unitnum; + if (unitnum >= backendunits) + return; + if (r_showtrispass) + return; + // update 1d texture binding + if (unit->t1d) + { + GL_ActiveTexture(unitnum); + if (unit->t1d) + qglDisable(GL_TEXTURE_1D); + unit->t1d = 0; + qglBindTexture(GL_TEXTURE_1D, unit->t1d); + CHECKGLERROR + } + // update 2d texture binding + if (unit->t2d) + { + GL_ActiveTexture(unitnum); + if (unit->t2d) + qglDisable(GL_TEXTURE_2D); + unit->t2d = 0; + qglBindTexture(GL_TEXTURE_2D, unit->t2d); + CHECKGLERROR + } + // update 3d texture binding + if (unit->t3d) + { + GL_ActiveTexture(unitnum); + if (unit->t3d) + qglDisable(GL_TEXTURE_3D); + unit->t3d = 0; + qglBindTexture(GL_TEXTURE_3D, unit->t3d); + CHECKGLERROR + } + // update cubemap texture binding + if (unit->tcubemap != texnum) + { + GL_ActiveTexture(unitnum); + if (texnum) + { + if (unit->tcubemap == 0) + qglEnable(GL_TEXTURE_CUBE_MAP_ARB); + } + else + { + if (unit->tcubemap) + qglDisable(GL_TEXTURE_CUBE_MAP_ARB); + } + unit->tcubemap = texnum; + qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, unit->tcubemap); + CHECKGLERROR + } +} - scaler = 1; - if (m->blendfunc2 == GL_SRC_COLOR) +void R_Mesh_TexMatrix(unsigned int unitnum, const matrix4x4_t *matrix) +{ + gltextureunit_t *unit = gl_state.units + unitnum; + if (r_showtrispass) + return; + if (matrix->m[3][3]) { - if (m->blendfunc1 == GL_DST_COLOR) // 2x modulate with framebuffer - scaler *= 0.5f; + // texmatrix specified, check if it is different + if (!unit->texmatrixenabled || memcmp(&unit->matrix, matrix, sizeof(matrix4x4_t))) + { + matrix4x4_t tempmatrix; + unit->texmatrixenabled = true; + unit->matrix = *matrix; + Matrix4x4_Transpose(&tempmatrix, &unit->matrix); + qglMatrixMode(GL_TEXTURE); + GL_ActiveTexture(unitnum); + qglLoadMatrixf(&tempmatrix.m[0][0]); + qglMatrixMode(GL_MODELVIEW); + } } else { - if (m->tex[0]) + // no texmatrix specified, revert to identity + if (unit->texmatrixenabled) { - overbright = gl_combine.integer; - if (overbright) - scaler *= 0.25f; + unit->texmatrixenabled = false; + qglMatrixMode(GL_TEXTURE); + GL_ActiveTexture(unitnum); + qglLoadIdentity(); + qglMatrixMode(GL_MODELVIEW); } - if (lighthalf) - scaler *= 0.5f; } +} - if (m->transparent) +void R_Mesh_TexCombine(unsigned int unitnum, int combinergb, int combinealpha, int rgbscale, int alphascale) +{ + gltextureunit_t *unit = gl_state.units + unitnum; + if (r_showtrispass) + return; + if (gl_combine.integer) { - if (currenttransmesh >= max_meshs || (currenttranstriangle + m->numtriangles) > max_meshs || (currenttransvertex + m->numverts) > max_verts) + // GL_ARB_texture_env_combine + if (!combinergb) + combinergb = GL_MODULATE; + if (!combinealpha) + combinealpha = GL_MODULATE; + if (!rgbscale) + rgbscale = 1; + if (!alphascale) + alphascale = 1; + if (unit->combinergb != combinergb) { - if (!transranout) - { - Con_Printf("R_Mesh_Draw: ran out of room for transparent meshs\n"); - transranout = true; - } - return; + unit->combinergb = combinergb; + GL_ActiveTexture(unitnum); + qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, unit->combinergb);CHECKGLERROR } - - vert = &buf_transvertex[currenttransvertex]; - fcolor = &buf_transfcolor[currenttransvertex]; - 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++]; - mesh->blendfunc1 = m->blendfunc1; - mesh->blendfunc2 = m->blendfunc2; - mesh->depthmask = false; - mesh->depthtest = !m->depthdisable; - j = -1; - for (i = 0;i < backendunits;i++) + if (unit->combinealpha != combinealpha) { - 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; + unit->combinealpha = combinealpha; + GL_ActiveTexture(unitnum); + qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_ALPHA_ARB, unit->combinealpha);CHECKGLERROR } - if (overbright && j >= 0) - mesh->texturergbscale[j] = 4; - - // 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 (unit->rgbscale != rgbscale) { - tri = &buf_transtri[currenttranstriangle++]; - tri->mesh = mesh; - tri->index[0] = *index++ + currenttransvertex; - tri->index[1] = *index++ + currenttransvertex; - tri->index[2] = *index++ + currenttransvertex; + GL_ActiveTexture(unitnum); + qglTexEnvi(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, (unit->rgbscale = rgbscale));CHECKGLERROR + } + if (unit->alphascale != alphascale) + { + GL_ActiveTexture(unitnum); + qglTexEnvi(GL_TEXTURE_ENV, GL_ALPHA_SCALE, (unit->alphascale = alphascale));CHECKGLERROR } - - currenttransvertex += m->numverts; } else { - if (m->numtriangles > max_meshs || m->numverts > max_verts) + // normal GL texenv + if (!combinergb) + combinergb = GL_MODULATE; + if (unit->combinergb != combinergb) { - Con_Printf("R_Mesh_Draw: mesh too big for buffers\n"); - return; + unit->combinergb = combinergb; + GL_ActiveTexture(unitnum); + qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, unit->combinergb);CHECKGLERROR } + } +} + +void R_Mesh_State(const rmeshstate_t *m) +{ + unsigned int i; - if (currentmesh >= max_meshs || (currenttriangle + m->numtriangles) > max_batch || (currentvertex + m->numverts) > max_verts) - R_Mesh_Render(); + BACKENDACTIVECHECK - vert = &buf_vertex[currentvertex]; - fcolor = &buf_fcolor[currentvertex]; - bcolor = &buf_bcolor[currentvertex]; - for (i = 0;i < backendunits;i++) - texcoord[i] = &buf_texcoord[i][currentvertex]; + R_Mesh_VertexPointer(m->pointer_vertex); + R_Mesh_ColorPointer(m->pointer_color); - mesh = &buf_mesh[currentmesh++]; - mesh->blendfunc1 = m->blendfunc1; - mesh->blendfunc2 = m->blendfunc2; - mesh->depthmask = (m->blendfunc2 == GL_ZERO || m->depthwrite); - mesh->depthtest = !m->depthdisable; - mesh->firsttriangle = currenttriangle; - 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; + if (gl_backend_rebindtextures) + { + gl_backend_rebindtextures = false; + GL_SetupTextureState(); + } + + for (i = 0;i < backendimageunits;i++) + R_Mesh_TexBindAll(i, m->tex1d[i], m->tex[i], m->tex3d[i], m->texcubemap[i]); + for (i = 0;i < backendarrayunits;i++) + { + if (m->pointer_texcoord3f[i]) + R_Mesh_TexCoordPointer(i, 3, m->pointer_texcoord3f[i]); + else + R_Mesh_TexCoordPointer(i, 2, m->pointer_texcoord[i]); + } + for (i = 0;i < backendunits;i++) + { + R_Mesh_TexMatrix(i, &m->texmatrix[i]); + R_Mesh_TexCombine(i, m->texcombinergb[i], m->texcombinealpha[i], m->texrgbscale[i], m->texalphascale[i]); + } +} - // opaque meshs are rendered directly - index = (int *)&buf_tri[currenttriangle]; - for (i = 0;i < m->numtriangles * 3;i++) - index[i] = m->index[i] + currentvertex; - mesh->firstvert = currentvertex; - currenttriangle += m->numtriangles; - currentvertex += m->numverts; - mesh->lastvert = currentvertex - 1; +void R_Mesh_Draw_ShowTris(int firstvertex, int numvertices, int numtriangles, const int *elements) +{ + qglBegin(GL_LINES); + for (;numtriangles;numtriangles--, elements += 3) + { + qglArrayElement(elements[0]);qglArrayElement(elements[1]); + qglArrayElement(elements[1]);qglArrayElement(elements[2]); + qglArrayElement(elements[2]);qglArrayElement(elements[0]); } + qglEnd(); + CHECKGLERROR +} + +/* +============================================================================== + + SCREEN SHOTS + +============================================================================== +*/ + +qboolean SCR_ScreenShot(char *filename, qbyte *buffer1, qbyte *buffer2, qbyte *buffer3, int x, int y, int width, int height, qboolean flipx, qboolean flipy, qboolean flipdiagonal, qboolean jpeg, qboolean gammacorrect) +{ + int indices[3] = {0,1,2}; + qboolean ret; - // vertex array code is shared for transparent and opaque meshs + if (!r_render.integer) + return false; - c_meshtris += m->numtriangles; + qglReadPixels (x, y, width, height, GL_RGB, GL_UNSIGNED_BYTE, buffer1); + CHECKGLERROR - if (m->vertexstep != sizeof(buf_vertex_t)) + if (scr_screenshot_gamma.value != 1 && gammacorrect) { - 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]; - // push out farclip based on vertices encountered - c = DotProduct(vert[i].v, vpn); - if (meshfarclip < c) - meshfarclip = c; - } + int i; + double igamma = 1.0 / scr_screenshot_gamma.value; + unsigned char ramp[256]; + for (i = 0;i < 256;i++) + ramp[i] = (unsigned char) (pow(i * (1.0 / 255.0), igamma) * 255.0); + for (i = 0;i < width*height*3;i++) + buffer1[i] = ramp[buffer1[i]]; } + + Image_CopyMux (buffer2, buffer1, width, height, flipx, flipy, flipdiagonal, 3, 3, indices); + + if (jpeg) + ret = JPEG_SaveImage_preflipped (filename, width, height, buffer2); else + ret = Image_WriteTGARGB_preflipped (filename, width, height, buffer2, buffer3); + + return ret; +} + +//============================================================================= + +void R_ClearScreen(void) +{ + if (r_render.integer) { - memcpy(vert, m->vertex, m->numverts * sizeof(buf_vertex_t)); - // push out farclip based on vertices encountered - for (i = 0;i < m->numverts;i++) + // clear to black + if (fogenabled) + qglClearColor(fogcolor[0],fogcolor[1],fogcolor[2],0); + else + 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 + GL_Clear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT | (gl_stencil ? GL_STENCIL_BUFFER_BIT : 0)); + // set dithering mode + if (gl_dither.integer) + { + qglEnable(GL_DITHER);CHECKGLERROR + } + else { - c = DotProduct(vert[i].v, vpn); - if (meshfarclip < c) - meshfarclip = c; + qglDisable(GL_DITHER);CHECKGLERROR } } +} + +/* +==================== +CalcFov +==================== +*/ +float CalcFov (float fov_x, float width, float height) +{ + // calculate vision size and alter by aspect, then convert back to angle + return atan (((height/width)/vid_pixelaspect.value)*tan(fov_x/360.0*M_PI))*360.0/M_PI; +} - if (floatcolors) +int r_stereo_side; + +void SCR_DrawScreen (void) +{ + for (r_showtrispass = 0;r_showtrispass <= (r_showtris.value > 0);r_showtrispass++) { - if (m->color) + R_Mesh_Start(); + + R_TimeReport("setup"); + + if (r_showtrispass) { - for (i = 0, in = m->color;i < m->numverts;i++, (int)in += m->colorstep) - { - 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]; - } + rmeshstate_t m; + r_showtrispass = 0; + GL_BlendFunc(GL_ONE, GL_ONE); + GL_DepthTest(GL_FALSE); + GL_DepthMask(GL_FALSE); + memset(&m, 0, sizeof(m)); + R_Mesh_State(&m); + //qglEnable(GL_LINE_SMOOTH); + GL_ShowTrisColor(0.2,0.2,0.2,1); + r_showtrispass = 1; } - else + + if (cls.signon == SIGNONS) { - cr = m->cr * scaler; - cg = m->cg * scaler; - cb = m->cb * scaler; - ca = m->ca; - for (i = 0;i < m->numverts;i++) + float size; + + size = scr_viewsize.value * (1.0 / 100.0); + size = min(size, 1); + + if (r_stereo_sidebyside.integer) + { + r_refdef.width = vid.width * size / 2.5; + r_refdef.height = vid.height * size / 2.5 * (1 - bound(0, r_letterbox.value, 100) / 100); + r_refdef.x = (vid.width - r_refdef.width * 2.5) * 0.5; + r_refdef.y = (vid.height - r_refdef.height)/2; + if (r_stereo_side) + r_refdef.x += r_refdef.width * 1.5; + } + else + { + r_refdef.width = vid.width * size; + r_refdef.height = vid.height * size * (1 - bound(0, r_letterbox.value, 100) / 100); + r_refdef.x = (vid.width - r_refdef.width)/2; + r_refdef.y = (vid.height - r_refdef.height)/2; + } + + // LordHavoc: viewzoom (zoom in for sniper rifles, etc) + r_refdef.fov_x = scr_fov.value * r_refdef.fovscale_x; + r_refdef.fov_y = CalcFov (scr_fov.value, r_refdef.width, r_refdef.height) * r_refdef.fovscale_y; + + R_RenderView(); + + if (scr_zoomwindow.integer) { - fcolor[i].c[0] = cr; - fcolor[i].c[1] = cg; - fcolor[i].c[2] = cb; - fcolor[i].c[3] = ca; + float sizex = bound(10, scr_zoomwindow_viewsizex.value, 100) / 100.0; + float sizey = bound(10, scr_zoomwindow_viewsizey.value, 100) / 100.0; + r_refdef.width = vid.width * sizex; + r_refdef.height = vid.height * sizey; + r_refdef.x = (vid.width - r_refdef.width)/2; + r_refdef.y = 0; + r_refdef.fov_x = scr_zoomwindow_fov.value * r_refdef.fovscale_x; + r_refdef.fov_y = CalcFov(scr_zoomwindow_fov.value, r_refdef.width, r_refdef.height) * r_refdef.fovscale_y; + + R_RenderView(); } } + + if (!r_stereo_sidebyside.integer) + { + r_refdef.width = vid.width; + r_refdef.height = vid.height; + r_refdef.x = 0; + r_refdef.y = 0; + } + + // draw 2D stuff + R_DrawQueue(); + + R_Mesh_Finish(); + + R_TimeReport("meshfinish"); } - else + r_showtrispass = 0; + //qglDisable(GL_LINE_SMOOTH); +} + +void SCR_UpdateLoadingScreen (void) +{ + float x, y; + cachepic_t *pic; + rmeshstate_t m; + // don't do anything if not initialized yet + if (vid_hidden) + return; + r_showtrispass = 0; + VID_UpdateGamma(false); + qglViewport(0, 0, vid.width, vid.height); + //qglDisable(GL_SCISSOR_TEST); + //qglDepthMask(1); + qglColorMask(1,1,1,1); + //qglClearColor(0,0,0,0); + //qglClear(GL_COLOR_BUFFER_BIT); + //qglCullFace(GL_FRONT); + //qglDisable(GL_CULL_FACE); + //R_ClearScreen(); + R_Textures_Frame(); + GL_SetupView_Mode_Ortho(0, 0, vid_conwidth.integer, vid_conheight.integer, -10, 100); + R_Mesh_Start(); + R_Mesh_Matrix(&r_identitymatrix); + // draw the loading plaque + pic = Draw_CachePic("gfx/loading", false); + x = (vid_conwidth.integer - pic->width)/2; + y = (vid_conheight.integer - pic->height)/2; + GL_Color(1,1,1,1); + GL_BlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA); + GL_DepthTest(false); + memset(&m, 0, sizeof(m)); + m.pointer_vertex = varray_vertex3f; + m.pointer_texcoord[0] = varray_texcoord2f[0]; + m.tex[0] = R_GetTexture(pic->tex); + R_Mesh_State(&m); + varray_vertex3f[0] = varray_vertex3f[9] = x; + varray_vertex3f[1] = varray_vertex3f[4] = y; + varray_vertex3f[3] = varray_vertex3f[6] = x + pic->width; + varray_vertex3f[7] = varray_vertex3f[10] = y + pic->height; + varray_texcoord2f[0][0] = 0;varray_texcoord2f[0][1] = 0; + varray_texcoord2f[0][2] = 1;varray_texcoord2f[0][3] = 0; + varray_texcoord2f[0][4] = 1;varray_texcoord2f[0][5] = 1; + varray_texcoord2f[0][6] = 0;varray_texcoord2f[0][7] = 1; + GL_LockArrays(0, 4); + R_Mesh_Draw(0, 4, 2, polygonelements); + GL_LockArrays(0, 0); + R_Mesh_Finish(); + // refresh + VID_Finish(); +} + +/* +================== +SCR_UpdateScreen + +This is called every frame, and can also be called explicitly to flush +text to the screen. +================== +*/ +void SCR_UpdateScreen (void) +{ + if (vid_hidden) + 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) + Cvar_SetValueQuick(&gl_combine, 0); + + CHECKGLERROR + qglViewport(0, 0, vid.width, vid.height); + qglDisable(GL_SCISSOR_TEST); + qglDepthMask(1); + qglColorMask(1,1,1,1); + qglClearColor(0,0,0,0); + qglClear(GL_COLOR_BUFFER_BIT); + CHECKGLERROR + + R_TimeReport("clear"); + + if (r_stereo_redblue.integer || r_stereo_redgreen.integer || r_stereo_redcyan.integer || r_stereo_sidebyside.integer) { - if (m->color) + matrix4x4_t originalmatrix = r_refdef.viewentitymatrix; + r_refdef.viewentitymatrix.m[0][3] = originalmatrix.m[0][3] + r_stereo_separation.value * -0.5f * r_refdef.viewentitymatrix.m[0][1]; + r_refdef.viewentitymatrix.m[1][3] = originalmatrix.m[1][3] + r_stereo_separation.value * -0.5f * r_refdef.viewentitymatrix.m[1][1]; + r_refdef.viewentitymatrix.m[2][3] = originalmatrix.m[2][3] + r_stereo_separation.value * -0.5f * r_refdef.viewentitymatrix.m[2][1]; + + if (r_stereo_sidebyside.integer) + r_stereo_side = 0; + + if (r_stereo_redblue.integer || r_stereo_redgreen.integer || r_stereo_redcyan.integer) { - 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; - } + r_refdef.colormask[0] = 1; + r_refdef.colormask[1] = 0; + r_refdef.colormask[2] = 0; } - else + + SCR_DrawScreen(); + + r_refdef.viewentitymatrix.m[0][3] = originalmatrix.m[0][3] + r_stereo_separation.value * 0.5f * r_refdef.viewentitymatrix.m[0][1]; + r_refdef.viewentitymatrix.m[1][3] = originalmatrix.m[1][3] + r_stereo_separation.value * 0.5f * r_refdef.viewentitymatrix.m[1][1]; + r_refdef.viewentitymatrix.m[2][3] = originalmatrix.m[2][3] + r_stereo_separation.value * 0.5f * r_refdef.viewentitymatrix.m[2][1]; + + if (r_stereo_sidebyside.integer) + r_stereo_side = 1; + + if (r_stereo_redblue.integer || r_stereo_redgreen.integer || r_stereo_redcyan.integer) { - c = in[0] * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;br = (byte) j; - c = in[1] * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;bg = (byte) j; - c = in[2] * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;bb = (byte) j; - c = in[3] + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;ba = (byte) j; - for (i = 0;i < m->numverts;i++) - { - bcolor[i].c[0] = br; - bcolor[i].c[1] = bg; - bcolor[i].c[2] = bb; - bcolor[i].c[3] = ba; - } + r_refdef.colormask[0] = 0; + r_refdef.colormask[1] = r_stereo_redcyan.integer || r_stereo_redgreen.integer; + r_refdef.colormask[2] = r_stereo_redcyan.integer || r_stereo_redblue.integer; } - } - for (j = 0;j < MAX_TEXTUREUNITS && m->tex[j];j++) + SCR_DrawScreen(); + + r_refdef.viewentitymatrix = originalmatrix; + } + else { - 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)) + r_showtrispass = false; + SCR_DrawScreen(); + + if (r_showtris.value > 0) { - 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]; - } + rmeshstate_t m; + GL_BlendFunc(GL_ONE, GL_ONE); + GL_DepthTest(GL_FALSE); + GL_DepthMask(GL_FALSE); + memset(&m, 0, sizeof(m)); + R_Mesh_State(&m); + r_showtrispass = true; + GL_ShowTrisColor(0.2,0.2,0.2,1); + SCR_DrawScreen(); + r_showtrispass = false; } - else - memcpy(&texcoord[j][0].t[0], m->texcoords[j], m->numverts * sizeof(buf_texcoord_t)); } - #if 0 - for (;j < backendunits;j++) - memset(&texcoord[j][0].t[0], 0, m->numverts * sizeof(buf_texcoord_t)); - #endif + + VID_Finish(); + R_TimeReport("finish"); +} + + +//=========================================================================== +// dynamic vertex array buffer subsystem +//=========================================================================== + +// FIXME: someday this should be dynamically allocated and resized? +float varray_vertex3f[65536*3]; +float varray_svector3f[65536*3]; +float varray_tvector3f[65536*3]; +float varray_normal3f[65536*3]; +float varray_color4f[65536*4]; +float varray_texcoord2f[4][65536*2]; +float varray_texcoord3f[4][65536*3]; +int earray_element3i[65536]; +float varray_vertex3f2[65536*3]; + +//=========================================================================== +// vertex array caching subsystem +//=========================================================================== + +typedef struct rcachearraylink_s +{ + struct rcachearraylink_s *next, *prev; + struct rcachearrayitem_s *data; +} +rcachearraylink_t; + +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; + +#define RCACHEARRAY_HASHSIZE 65536 +#define RCACHEARRAY_ITEMS 4096 +#define RCACHEARRAY_DEFAULTSIZE (4 << 20) + +// 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]; + +// all items are stored here, whether active or inactive +static rcachearrayitem_t r_mesh_rcacheitems[RCACHEARRAY_ITEMS]; -void R_Mesh_DrawPolygon(rmeshinfo_t *m, int numverts) +// size of data buffer +static int r_mesh_rcachedata_size = RCACHEARRAY_DEFAULTSIZE; +// data buffer +static qbyte r_mesh_rcachedata[RCACHEARRAY_DEFAULTSIZE]; + +// current state +static int r_mesh_rcachedata_offset; +static rcachearraylink_t *r_mesh_rcachesequentialchain_current; + +static void R_Mesh_CacheArray_Startup(void) { - m->index = polyindexarray; - m->numverts = numverts; - m->numtriangles = numverts - 2; - if (m->numtriangles < 1) + 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++) { - Con_Printf("R_Mesh_DrawPolygon: invalid vertex count\n"); - return; + l = &r_mesh_rcachechain[i]; + l->next = l->prev = l; + l->data = NULL; } - if (m->numtriangles >= 256) + memset(&r_mesh_rcacheitems, 0, sizeof(r_mesh_rcacheitems)); + for (i = 0;i < RCACHEARRAY_ITEMS;i++) { - Con_Printf("R_Mesh_DrawPolygon: only up to 256 triangles (258 verts) supported\n"); - return; + 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; } - R_Mesh_Draw(m); + // clear other state + r_mesh_rcachedata_offset = 0; + r_mesh_rcachesequentialchain_current = &r_mesh_rcachesequentialchain; } -// LordHavoc: this thing is evil, but necessary because decals account for so much overhead -void R_Mesh_DrawDecal(const rmeshinfo_t *m) +static void R_Mesh_CacheArray_Shutdown(void) { - // these are static because gcc runs out of virtual registers otherwise - static int i, j, *index, overbright; - static float c, *in, scaler, cr, cg, cb, ca; - static buf_mesh_t *mesh; - static buf_vertex_t *vert; - static buf_fcolor_t *fcolor; - static buf_bcolor_t *bcolor; - static buf_texcoord_t *texcoord; - static buf_transtri_t *tri; - static byte br, bg, bb, ba; +} - if (!backendactive) - Sys_Error("R_Mesh_Draw: called when backend is not active\n"); +/* +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); +} +*/ - scaler = 1; - if (m->tex[0]) - { - overbright = gl_combine.integer; - if (overbright) - scaler *= 0.25f; - } - if (lighthalf) - scaler *= 0.5f; +int R_Mesh_CacheArray(rcachearrayrequest_t *r) +{ + rcachearraylink_t *l, *lhead, *lnext; + rcachearrayitem_t *d; + int hashindex, offset, offsetend; + + //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; - if (m->transparent) + // is it already cached? + for (lhead = &r_mesh_rcachechain[hashindex], l = lhead->next;l != lhead;l = l->next) { - if (currenttransmesh >= max_meshs || (currenttranstriangle + 2) > max_meshs || (currenttransvertex + 4) > max_verts) + if (!memcmp(&l->data->request, r, sizeof(l->data->request))) { - if (!transranout) - { - Con_Printf("R_Mesh_Draw: ran out of room for transparent meshs\n"); - transranout = true; - } - return; + // we have it cached already + r->data = r_mesh_rcachedata + l->data->offset; + return false; } - - vert = &buf_transvertex[currenttransvertex]; - fcolor = &buf_transfcolor[currenttransvertex]; - 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->textures[0] = m->tex[0]; - mesh->texturergbscale[0] = overbright ? 4 : 1; - for (i = 1;i < backendunits;i++) - { - mesh->textures[i] = 0; - mesh->texturergbscale[i] = 1; - } - - // 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; - - currenttransvertex += 4; } - else + + // 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 (2 > max_meshs || 4 > max_verts) + /* + if (r->data_size * 10 > r_mesh_rcachedata_size) { - Con_Printf("R_Mesh_Draw: mesh too big for buffers\n"); - return; + // 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); - if (currentmesh >= max_meshs || (currenttriangle + 2) > max_batch || (currentvertex + 4) > max_verts) - R_Mesh_Render(); - - vert = &buf_vertex[currentvertex]; - fcolor = &buf_fcolor[currentvertex]; - 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++) - { - mesh->textures[i] = 0; - mesh->texturergbscale[i] = 1; - } - - // 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; - currenttriangle += 2; - currentvertex += 4; - mesh->lastvert = currentvertex - 1; - } - - // vertex array code is shared for transparent and opaque meshs - - c_meshtris += 2; - - // buf_vertex_t must match the size of the decal vertex array (or vice versa) - memcpy(vert, m->vertex, 4 * sizeof(buf_vertex_t)); - // push out farclip based on vertices encountered - c = DotProduct(vert[0].v, vpn);if (meshfarclip < c) meshfarclip = c; - c = DotProduct(vert[1].v, vpn);if (meshfarclip < c) meshfarclip = c; - c = DotProduct(vert[2].v, vpn);if (meshfarclip < c) meshfarclip = c; - c = DotProduct(vert[3].v, vpn);if (meshfarclip < c) meshfarclip = c; - - 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; + /* + { + 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); } - else + */ + + // 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) { - c = in[0] * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;br = (byte) j; - c = in[1] * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;bg = (byte) j; - c = in[2] * scaler + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;bb = (byte) j; - c = in[3] + 32768.0f;j = (*((long *)&c) & 0x7FFFFF);if (j > 255) j = 255;ba = (byte) j; - bcolor[0].c[0] = br; - bcolor[0].c[1] = bg; - bcolor[0].c[2] = bb; - bcolor[0].c[3] = ba; - bcolor[1].c[0] = br; - bcolor[1].c[1] = bg; - bcolor[1].c[2] = bb; - bcolor[1].c[3] = ba; - bcolor[2].c[0] = br; - bcolor[2].c[1] = bg; - bcolor[2].c[2] = bb; - bcolor[2].c[3] = ba; - bcolor[3].c[0] = br; - bcolor[3].c[1] = bg; - bcolor[3].c[2] = bb; - bcolor[3].c[3] = ba; - } - - // 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)); + //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_Print(">\n"); + l->next = l->next->next; + l->prev = l->prev->next; + } + while (l->prev->data && l->data && l->prev->data->offset >= d->offset) + { + //Con_Print("<\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; } +