gl_backend.c

   1
   2 #include "quakedef.h"
   3 #include "cl_collision.h"
   4
   5 cvar_t gl_mesh_drawrangeelements = {0, "gl_mesh_drawrangeelements", "1", "use glDrawRangeElements function if available instead of glDrawElements (for performance comparisons or bug testing)"};
   6 cvar_t gl_mesh_testarrayelement = {0, "gl_mesh_testarrayelement", "0", "use glBegin(GL_TRIANGLES);glArrayElement();glEnd(); primitives instead of glDrawElements (useful to test for driver bugs with glDrawElements)"};
   7 cvar_t gl_mesh_testmanualfeeding = {0, "gl_mesh_testmanualfeeding", "0", "use glBegin(GL_TRIANGLES);glTexCoord2f();glVertex3f();glEnd(); primitives instead of glDrawElements (useful to test for driver bugs with glDrawElements)"};
   8 cvar_t gl_paranoid = {0, "gl_paranoid", "0", "enables OpenGL error checking and other tests"};
   9 cvar_t gl_printcheckerror = {0, "gl_printcheckerror", "0", "prints all OpenGL error checks, useful to identify location of driver crashes"};
  10
  11 cvar_t r_render = {0, "r_render", "1", "enables rendering calls (you want this on!)"};
  12 cvar_t r_waterwarp = {CVAR_SAVE, "r_waterwarp", "1", "warp view while underwater"};
  13 cvar_t gl_polyblend = {CVAR_SAVE, "gl_polyblend", "1", "tints view while underwater, hurt, etc"};
  14 cvar_t gl_dither = {CVAR_SAVE, "gl_dither", "1", "enables OpenGL dithering (16bit looks bad with this off)"};
  15 cvar_t gl_lockarrays = {0, "gl_lockarrays", "1", "enables use of glLockArraysEXT, may cause glitches with some broken drivers"};
  16
  17 int gl_maxdrawrangeelementsvertices;
  18 int gl_maxdrawrangeelementsindices;
  19
  20 #ifdef DEBUGGL
  21 int errornumber = 0;
  22
  23 void GL_PrintError(int errornumber, char *filename, int linenumber)
  24 {
  25         switch(errornumber)
  26         {
  27 #ifdef GL_INVALID_ENUM
  28         case GL_INVALID_ENUM:
  29                 Con_Printf("GL_INVALID_ENUM at %s:%i\n", filename, linenumber);
  30                 break;
  31 #endif
  32 #ifdef GL_INVALID_VALUE
  33         case GL_INVALID_VALUE:
  34                 Con_Printf("GL_INVALID_VALUE at %s:%i\n", filename, linenumber);
  35                 break;
  36 #endif
  37 #ifdef GL_INVALID_OPERATION
  38         case GL_INVALID_OPERATION:
  39                 Con_Printf("GL_INVALID_OPERATION at %s:%i\n", filename, linenumber);
  40                 break;
  41 #endif
  42 #ifdef GL_STACK_OVERFLOW
  43         case GL_STACK_OVERFLOW:
  44                 Con_Printf("GL_STACK_OVERFLOW at %s:%i\n", filename, linenumber);
  45                 break;
  46 #endif
  47 #ifdef GL_STACK_UNDERFLOW
  48         case GL_STACK_UNDERFLOW:
  49                 Con_Printf("GL_STACK_UNDERFLOW at %s:%i\n", filename, linenumber);
  50                 break;
  51 #endif
  52 #ifdef GL_OUT_OF_MEMORY
  53         case GL_OUT_OF_MEMORY:
  54                 Con_Printf("GL_OUT_OF_MEMORY at %s:%i\n", filename, linenumber);
  55                 break;
  56 #endif
  57 #ifdef GL_TABLE_TOO_LARGE
  58         case GL_TABLE_TOO_LARGE:
  59                 Con_Printf("GL_TABLE_TOO_LARGE at %s:%i\n", filename, linenumber);
  60                 break;
  61 #endif
  62         default:
  63                 Con_Printf("GL UNKNOWN (%i) at %s:%i\n", errornumber, filename, linenumber);
  64                 break;
  65         }
  66 }
  67 #endif
  68
  69 #define BACKENDACTIVECHECK if (!backendactive) Sys_Error("GL backend function called when backend is not active");
  70
  71 void SCR_ScreenShot_f (void);
  72
  73 static matrix4x4_t backend_viewmatrix;
  74 static matrix4x4_t backend_modelmatrix;
  75 static matrix4x4_t backend_modelviewmatrix;
  76 static matrix4x4_t backend_glmodelviewmatrix;
  77 static matrix4x4_t backend_projectmatrix;
  78
  79 static unsigned int backendunits, backendimageunits, backendarrayunits, backendactive;
  80
  81 /*
  82 note: here's strip order for a terrain row:
  83 0--1--2--3--4
  84 |\ |\ |\ |\ |
  85 | \| \| \| \|
  86 A--B--C--D--E
  87 clockwise
  88
  89 A0B, 01B, B1C, 12C, C2D, 23D, D3E, 34E
  90
  91 *elements++ = i + row;
  92 *elements++ = i;
  93 *elements++ = i + row + 1;
  94 *elements++ = i;
  95 *elements++ = i + 1;
  96 *elements++ = i + row + 1;
  97
  98
  99 for (y = 0;y < rows - 1;y++)
 100 {
 101         for (x = 0;x < columns - 1;x++)
 102         {
 103                 i = y * rows + x;
 104                 *elements++ = i + columns;
 105                 *elements++ = i;
 106                 *elements++ = i + columns + 1;
 107                 *elements++ = i;
 108                 *elements++ = i + 1;
 109                 *elements++ = i + columns + 1;
 110         }
 111 }
 112
 113 alternative:
 114 0--1--2--3--4
 115 | /| /|\ | /|
 116 |/ |/ | \|/ |
 117 A--B--C--D--E
 118 counterclockwise
 119
 120 for (y = 0;y < rows - 1;y++)
 121 {
 122         for (x = 0;x < columns - 1;x++)
 123         {
 124                 i = y * rows + x;
 125                 *elements++ = i;
 126                 *elements++ = i + columns;
 127                 *elements++ = i + columns + 1;
 128                 *elements++ = i + columns;
 129                 *elements++ = i + columns + 1;
 130                 *elements++ = i + 1;
 131         }
 132 }
 133 */
 134
 135 int polygonelements[(POLYGONELEMENTS_MAXPOINTS-2)*3];
 136 int quadelements[QUADELEMENTS_MAXQUADS*6];
 137
 138 void GL_Backend_AllocArrays(void)
 139 {
 140 }
 141
 142 void GL_Backend_FreeArrays(void)
 143 {
 144 }
 145
 146 static void gl_backend_start(void)
 147 {
 148         Con_Print("OpenGL Backend starting...\n");
 149         CHECKGLERROR
 150
 151         if (qglDrawRangeElements != NULL)
 152         {
 153                 CHECKGLERROR
 154                 qglGetIntegerv(GL_MAX_ELEMENTS_VERTICES, &gl_maxdrawrangeelementsvertices);
 155                 CHECKGLERROR
 156                 qglGetIntegerv(GL_MAX_ELEMENTS_INDICES, &gl_maxdrawrangeelementsindices);
 157                 CHECKGLERROR
 158                 Con_Printf("glDrawRangeElements detected (max vertices %i, max indices %i)\n", gl_maxdrawrangeelementsvertices, gl_maxdrawrangeelementsindices);
 159         }
 160
 161         backendunits = min(MAX_TEXTUREUNITS, gl_textureunits);
 162         backendimageunits = backendunits;
 163         backendarrayunits = backendunits;
 164         if (gl_support_fragment_shader)
 165         {
 166                 CHECKGLERROR
 167                 qglGetIntegerv(GL_MAX_TEXTURE_IMAGE_UNITS_ARB, (int *)&backendimageunits);
 168                 CHECKGLERROR
 169                 qglGetIntegerv(GL_MAX_TEXTURE_COORDS_ARB, (int *)&backendarrayunits);
 170                 CHECKGLERROR
 171                 Con_Printf("GLSL shader support detected: texture units = %i texenv, %i image, %i array\n", backendunits, backendimageunits, backendarrayunits);
 172         }
 173         else if (backendunits > 1)
 174                 Con_Printf("multitexture detected: texture units = %i\n", backendunits);
 175         else
 176                 Con_Printf("singletexture\n");
 177
 178         GL_Backend_AllocArrays();
 179
 180         Con_Printf("OpenGL backend started.\n");
 181
 182         CHECKGLERROR
 183
 184         backendactive = true;
 185 }
 186
 187 static void gl_backend_shutdown(void)
 188 {
 189         backendunits = 0;
 190         backendimageunits = 0;
 191         backendarrayunits = 0;
 192         backendactive = false;
 193
 194         Con_Print("OpenGL Backend shutting down\n");
 195
 196         GL_Backend_FreeArrays();
 197 }
 198
 199 static void gl_backend_newmap(void)
 200 {
 201 }
 202
 203 void gl_backend_init(void)
 204 {
 205         int i;
 206
 207         for (i = 0;i < POLYGONELEMENTS_MAXPOINTS - 2;i++)
 208         {
 209                 polygonelements[i * 3 + 0] = 0;
 210                 polygonelements[i * 3 + 1] = i + 1;
 211                 polygonelements[i * 3 + 2] = i + 2;
 212         }
 213         // elements for rendering a series of quads as triangles
 214         for (i = 0;i < QUADELEMENTS_MAXQUADS;i++)
 215         {
 216                 quadelements[i * 6 + 0] = i * 4;
 217                 quadelements[i * 6 + 1] = i * 4 + 1;
 218                 quadelements[i * 6 + 2] = i * 4 + 2;
 219                 quadelements[i * 6 + 3] = i * 4;
 220                 quadelements[i * 6 + 4] = i * 4 + 2;
 221                 quadelements[i * 6 + 5] = i * 4 + 3;
 222         }
 223
 224         Cvar_RegisterVariable(&r_render);
 225         Cvar_RegisterVariable(&r_waterwarp);
 226         Cvar_RegisterVariable(&gl_polyblend);
 227         Cvar_RegisterVariable(&gl_dither);
 228         Cvar_RegisterVariable(&gl_lockarrays);
 229         Cvar_RegisterVariable(&gl_paranoid);
 230         Cvar_RegisterVariable(&gl_printcheckerror);
 231 #ifdef NORENDER
 232         Cvar_SetValue("r_render", 0);
 233 #endif
 234
 235         Cvar_RegisterVariable(&gl_mesh_drawrangeelements);
 236         Cvar_RegisterVariable(&gl_mesh_testarrayelement);
 237         Cvar_RegisterVariable(&gl_mesh_testmanualfeeding);
 238
 239         R_RegisterModule("GL_Backend", gl_backend_start, gl_backend_shutdown, gl_backend_newmap);
 240 }
 241
 242 void GL_SetupView_Orientation_Identity (void)
 243 {
 244         backend_viewmatrix = identitymatrix;
 245         memset(&backend_modelmatrix, 0, sizeof(backend_modelmatrix));
 246 }
 247
 248 void GL_SetupView_Orientation_FromEntity(matrix4x4_t *matrix)
 249 {
 250         matrix4x4_t tempmatrix, basematrix;
 251         Matrix4x4_Invert_Simple(&tempmatrix, matrix);
 252         Matrix4x4_CreateRotate(&basematrix, -90, 1, 0, 0);
 253         Matrix4x4_ConcatRotate(&basematrix, 90, 0, 0, 1);
 254         Matrix4x4_Concat(&backend_viewmatrix, &basematrix, &tempmatrix);
 255         //Matrix4x4_ConcatRotate(&backend_viewmatrix, -angles[2], 1, 0, 0);
 256         //Matrix4x4_ConcatRotate(&backend_viewmatrix, -angles[0], 0, 1, 0);
 257         //Matrix4x4_ConcatRotate(&backend_viewmatrix, -angles[1], 0, 0, 1);
 258         //Matrix4x4_ConcatTranslate(&backend_viewmatrix, -origin[0], -origin[1], -origin[2]);
 259         memset(&backend_modelmatrix, 0, sizeof(backend_modelmatrix));
 260 }
 261
 262 void GL_SetupView_Mode_Perspective (double frustumx, double frustumy, double zNear, double zFar)
 263 {
 264         double m[16];
 265
 266         if (!r_render.integer)
 267                 return;
 268
 269         // set up viewpoint
 270         qglMatrixMode(GL_PROJECTION);CHECKGLERROR
 271         qglLoadIdentity();CHECKGLERROR
 272         // set view pyramid
 273         qglFrustum(-frustumx * zNear, frustumx * zNear, -frustumy * zNear, frustumy * zNear, zNear, zFar);CHECKGLERROR
 274         qglGetDoublev(GL_PROJECTION_MATRIX, m);
 275         backend_projectmatrix.m[0][0] = m[0];
 276         backend_projectmatrix.m[1][0] = m[1];
 277         backend_projectmatrix.m[2][0] = m[2];
 278         backend_projectmatrix.m[3][0] = m[3];
 279         backend_projectmatrix.m[0][1] = m[4];
 280         backend_projectmatrix.m[1][1] = m[5];
 281         backend_projectmatrix.m[2][1] = m[6];
 282         backend_projectmatrix.m[3][1] = m[7];
 283         backend_projectmatrix.m[0][2] = m[8];
 284         backend_projectmatrix.m[1][2] = m[9];
 285         backend_projectmatrix.m[2][2] = m[10];
 286         backend_projectmatrix.m[3][2] = m[11];
 287         backend_projectmatrix.m[0][3] = m[12];
 288         backend_projectmatrix.m[1][3] = m[13];
 289         backend_projectmatrix.m[2][3] = m[14];
 290         backend_projectmatrix.m[3][3] = m[15];
 291         qglMatrixMode(GL_MODELVIEW);CHECKGLERROR
 292         GL_SetupView_Orientation_Identity();
 293 }
 294
 295 void GL_SetupView_Mode_PerspectiveInfiniteFarClip (double frustumx, double frustumy, double zNear)
 296 {
 297         double nudge, m[16];
 298
 299         if (!r_render.integer)
 300                 return;
 301
 302         // set up viewpoint
 303         qglMatrixMode(GL_PROJECTION);CHECKGLERROR
 304         qglLoadIdentity();CHECKGLERROR
 305         // set view pyramid
 306         nudge = 1.0 - 1.0 / (1<<23);
 307         m[ 0] = 1.0 / frustumx;
 308         m[ 1] = 0;
 309         m[ 2] = 0;
 310         m[ 3] = 0;
 311         m[ 4] = 0;
 312         m[ 5] = 1.0 / frustumy;
 313         m[ 6] = 0;
 314         m[ 7] = 0;
 315         m[ 8] = 0;
 316         m[ 9] = 0;
 317         m[10] = -nudge;
 318         m[11] = -1;
 319         m[12] = 0;
 320         m[13] = 0;
 321         m[14] = -2 * zNear * nudge;
 322         m[15] = 0;
 323         qglLoadMatrixd(m);
 324         qglMatrixMode(GL_MODELVIEW);CHECKGLERROR
 325         GL_SetupView_Orientation_Identity();
 326         backend_projectmatrix.m[0][0] = m[0];
 327         backend_projectmatrix.m[1][0] = m[1];
 328         backend_projectmatrix.m[2][0] = m[2];
 329         backend_projectmatrix.m[3][0] = m[3];
 330         backend_projectmatrix.m[0][1] = m[4];
 331         backend_projectmatrix.m[1][1] = m[5];
 332         backend_projectmatrix.m[2][1] = m[6];
 333         backend_projectmatrix.m[3][1] = m[7];
 334         backend_projectmatrix.m[0][2] = m[8];
 335         backend_projectmatrix.m[1][2] = m[9];
 336         backend_projectmatrix.m[2][2] = m[10];
 337         backend_projectmatrix.m[3][2] = m[11];
 338         backend_projectmatrix.m[0][3] = m[12];
 339         backend_projectmatrix.m[1][3] = m[13];
 340         backend_projectmatrix.m[2][3] = m[14];
 341         backend_projectmatrix.m[3][3] = m[15];
 342 }
 343
 344 void GL_SetupView_Mode_Ortho (double x1, double y1, double x2, double y2, double zNear, double zFar)
 345 {
 346         double m[16];
 347
 348         if (!r_render.integer)
 349                 return;
 350
 351         // set up viewpoint
 352         qglMatrixMode(GL_PROJECTION);CHECKGLERROR
 353         qglLoadIdentity();CHECKGLERROR
 354         qglOrtho(x1, x2, y2, y1, zNear, zFar);
 355         qglGetDoublev(GL_PROJECTION_MATRIX, m);
 356         backend_projectmatrix.m[0][0] = m[0];
 357         backend_projectmatrix.m[1][0] = m[1];
 358         backend_projectmatrix.m[2][0] = m[2];
 359         backend_projectmatrix.m[3][0] = m[3];
 360         backend_projectmatrix.m[0][1] = m[4];
 361         backend_projectmatrix.m[1][1] = m[5];
 362         backend_projectmatrix.m[2][1] = m[6];
 363         backend_projectmatrix.m[3][1] = m[7];
 364         backend_projectmatrix.m[0][2] = m[8];
 365         backend_projectmatrix.m[1][2] = m[9];
 366         backend_projectmatrix.m[2][2] = m[10];
 367         backend_projectmatrix.m[3][2] = m[11];
 368         backend_projectmatrix.m[0][3] = m[12];
 369         backend_projectmatrix.m[1][3] = m[13];
 370         backend_projectmatrix.m[2][3] = m[14];
 371         backend_projectmatrix.m[3][3] = m[15];
 372         qglMatrixMode(GL_MODELVIEW);CHECKGLERROR
 373         GL_SetupView_Orientation_Identity();
 374 }
 375
 376 typedef struct gltextureunit_s
 377 {
 378         int t1d, t2d, t3d, tcubemap;
 379         int arrayenabled;
 380         unsigned int arraycomponents;
 381         const void *pointer_texcoord;
 382         float rgbscale, alphascale;
 383         int combinergb, combinealpha;
 384         // FIXME: add more combine stuff
 385         // texmatrixenabled exists only to avoid unnecessary texmatrix compares
 386         int texmatrixenabled;
 387         matrix4x4_t matrix;
 388 }
 389 gltextureunit_t;
 390
 391 static struct gl_state_s
 392 {
 393         int blendfunc1;
 394         int blendfunc2;
 395         int blend;
 396         GLboolean depthmask;
 397         int colormask; // stored as bottom 4 bits: r g b a (3 2 1 0 order)
 398         int depthtest;
 399         int scissortest;
 400         unsigned int unit;
 401         unsigned int clientunit;
 402         gltextureunit_t units[MAX_TEXTUREUNITS];
 403         float color4f[4];
 404         int lockrange_first;
 405         int lockrange_count;
 406         const void *pointer_vertex;
 407         const void *pointer_color;
 408 }
 409 gl_state;
 410
 411 void GL_SetupTextureState(void)
 412 {
 413         unsigned int i;
 414         gltextureunit_t *unit;
 415         CHECKGLERROR
 416         gl_state.unit = MAX_TEXTUREUNITS;
 417         gl_state.clientunit = MAX_TEXTUREUNITS;
 418         for (i = 0;i < MAX_TEXTUREUNITS;i++)
 419         {
 420                 unit = gl_state.units + i;
 421                 unit->t1d = 0;
 422                 unit->t2d = 0;
 423                 unit->t3d = 0;
 424                 unit->tcubemap = 0;
 425                 unit->arrayenabled = false;
 426                 unit->arraycomponents = 0;
 427                 unit->pointer_texcoord = NULL;
 428                 unit->rgbscale = 1;
 429                 unit->alphascale = 1;
 430                 unit->combinergb = GL_MODULATE;
 431                 unit->combinealpha = GL_MODULATE;
 432                 unit->texmatrixenabled = false;
 433                 unit->matrix = identitymatrix;
 434         }
 435
 436         for (i = 0;i < backendimageunits;i++)
 437         {
 438                 GL_ActiveTexture(i);
 439                 qglBindTexture(GL_TEXTURE_1D, 0);CHECKGLERROR
 440                 qglBindTexture(GL_TEXTURE_2D, 0);CHECKGLERROR
 441                 if (gl_texture3d)
 442                 {
 443                         qglBindTexture(GL_TEXTURE_3D, 0);CHECKGLERROR
 444                 }
 445                 if (gl_texturecubemap)
 446                 {
 447                         qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, 0);CHECKGLERROR
 448                 }
 449         }
 450
 451         for (i = 0;i < backendarrayunits;i++)
 452         {
 453                 GL_ClientActiveTexture(i);
 454                 qglTexCoordPointer(2, GL_FLOAT, sizeof(float[2]), NULL);CHECKGLERROR
 455                 qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR
 456         }
 457
 458         for (i = 0;i < backendunits;i++)
 459         {
 460                 GL_ActiveTexture(i);
 461                 qglDisable(GL_TEXTURE_1D);CHECKGLERROR
 462                 qglDisable(GL_TEXTURE_2D);CHECKGLERROR
 463                 if (gl_texture3d)
 464                 {
 465                         qglDisable(GL_TEXTURE_3D);CHECKGLERROR
 466                 }
 467                 if (gl_texturecubemap)
 468                 {
 469                         qglDisable(GL_TEXTURE_CUBE_MAP_ARB);CHECKGLERROR
 470                 }
 471                 qglMatrixMode(GL_TEXTURE);
 472                 qglLoadIdentity();
 473                 qglMatrixMode(GL_MODELVIEW);
 474                 if (gl_combine.integer)
 475                 {
 476                         qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_COMBINE_ARB);CHECKGLERROR
 477                         qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, GL_MODULATE);CHECKGLERROR
 478                         qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE0_RGB_ARB, GL_TEXTURE);CHECKGLERROR
 479                         qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE1_RGB_ARB, GL_PREVIOUS_ARB);CHECKGLERROR
 480                         qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE2_RGB_ARB, GL_TEXTURE);CHECKGLERROR // for GL_INTERPOLATE_ARB mode
 481                         qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND0_RGB_ARB, GL_SRC_COLOR);CHECKGLERROR
 482                         qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND1_RGB_ARB, GL_SRC_COLOR);CHECKGLERROR
 483                         qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND2_RGB_ARB, GL_SRC_ALPHA);CHECKGLERROR
 484                         qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_ALPHA_ARB, GL_MODULATE);CHECKGLERROR
 485                         qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE0_ALPHA_ARB, GL_TEXTURE);CHECKGLERROR
 486                         qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE1_ALPHA_ARB, GL_PREVIOUS_ARB);CHECKGLERROR
 487                         qglTexEnvi(GL_TEXTURE_ENV, GL_SOURCE2_ALPHA_ARB, GL_CONSTANT_ARB);CHECKGLERROR
 488                         qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND0_ALPHA_ARB, GL_SRC_ALPHA);CHECKGLERROR
 489                         qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND1_ALPHA_ARB, GL_SRC_ALPHA);CHECKGLERROR
 490                         qglTexEnvi(GL_TEXTURE_ENV, GL_OPERAND2_ALPHA_ARB, GL_SRC_ALPHA);CHECKGLERROR
 491                         qglTexEnvi(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, 1);CHECKGLERROR
 492                         qglTexEnvi(GL_TEXTURE_ENV, GL_ALPHA_SCALE, 1);CHECKGLERROR
 493                 }
 494                 else
 495                 {
 496                         qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);CHECKGLERROR
 497                 }
 498         }
 499         CHECKGLERROR
 500 }
 501
 502 void GL_Backend_ResetState(void)
 503 {
 504         memset(&gl_state, 0, sizeof(gl_state));
 505         gl_state.depthtest = true;
 506         gl_state.blendfunc1 = GL_ONE;
 507         gl_state.blendfunc2 = GL_ZERO;
 508         gl_state.blend = false;
 509         gl_state.depthmask = GL_TRUE;
 510         gl_state.colormask = 15;
 511         gl_state.color4f[0] = gl_state.color4f[1] = gl_state.color4f[2] = gl_state.color4f[3] = 1;
 512         gl_state.lockrange_first = 0;
 513         gl_state.lockrange_count = 0;
 514         gl_state.pointer_vertex = NULL;
 515         gl_state.pointer_color = NULL;
 516
 517         CHECKGLERROR
 518
 519         qglColorMask(1, 1, 1, 1);
 520         qglEnable(GL_CULL_FACE);CHECKGLERROR
 521         qglCullFace(GL_FRONT);CHECKGLERROR
 522         qglEnable(GL_DEPTH_TEST);CHECKGLERROR
 523         qglBlendFunc(gl_state.blendfunc1, gl_state.blendfunc2);CHECKGLERROR
 524         qglDisable(GL_BLEND);CHECKGLERROR
 525         qglDepthMask(gl_state.depthmask);CHECKGLERROR
 526
 527         qglVertexPointer(3, GL_FLOAT, sizeof(float[3]), NULL);CHECKGLERROR
 528         qglEnableClientState(GL_VERTEX_ARRAY);CHECKGLERROR
 529
 530         qglColorPointer(4, GL_FLOAT, sizeof(float[4]), NULL);CHECKGLERROR
 531         qglDisableClientState(GL_COLOR_ARRAY);CHECKGLERROR
 532
 533         GL_Color(0, 0, 0, 0);
 534         GL_Color(1, 1, 1, 1);
 535
 536         GL_SetupTextureState();
 537 }
 538
 539 void GL_ActiveTexture(unsigned int num)
 540 {
 541         if (gl_state.unit != num)
 542         {
 543                 gl_state.unit = num;
 544                 if (qglActiveTexture)
 545                 {
 546                         qglActiveTexture(GL_TEXTURE0_ARB + gl_state.unit);
 547                         CHECKGLERROR
 548                 }
 549         }
 550 }
 551
 552 void GL_ClientActiveTexture(unsigned int num)
 553 {
 554         if (gl_state.clientunit != num)
 555         {
 556                 gl_state.clientunit = num;
 557                 if (qglActiveTexture)
 558                 {
 559                         qglClientActiveTexture(GL_TEXTURE0_ARB + gl_state.clientunit);
 560                         CHECKGLERROR
 561                 }
 562         }
 563 }
 564
 565 void GL_BlendFunc(int blendfunc1, int blendfunc2)
 566 {
 567         if (gl_state.blendfunc1 != blendfunc1 || gl_state.blendfunc2 != blendfunc2)
 568         {
 569                 qglBlendFunc(gl_state.blendfunc1 = blendfunc1, gl_state.blendfunc2 = blendfunc2);CHECKGLERROR
 570                 if (gl_state.blendfunc2 == GL_ZERO)
 571                 {
 572                         if (gl_state.blendfunc1 == GL_ONE)
 573                         {
 574                                 if (gl_state.blend)
 575                                 {
 576                                         gl_state.blend = 0;
 577                                         qglDisable(GL_BLEND);CHECKGLERROR
 578                                 }
 579                         }
 580                         else
 581                         {
 582                                 if (!gl_state.blend)
 583                                 {
 584                                         gl_state.blend = 1;
 585                                         qglEnable(GL_BLEND);CHECKGLERROR
 586                                 }
 587                         }
 588                 }
 589                 else
 590                 {
 591                         if (!gl_state.blend)
 592                         {
 593                                 gl_state.blend = 1;
 594                                 qglEnable(GL_BLEND);CHECKGLERROR
 595                         }
 596                 }
 597         }
 598 }
 599
 600 void GL_DepthMask(int state)
 601 {
 602         if (gl_state.depthmask != state)
 603         {
 604                 qglDepthMask(gl_state.depthmask = state);CHECKGLERROR
 605         }
 606 }
 607
 608 void GL_DepthTest(int state)
 609 {
 610         if (gl_state.depthtest != state)
 611         {
 612                 gl_state.depthtest = state;
 613                 if (gl_state.depthtest)
 614                 {
 615                         qglEnable(GL_DEPTH_TEST);CHECKGLERROR
 616                 }
 617                 else
 618                 {
 619                         qglDisable(GL_DEPTH_TEST);CHECKGLERROR
 620                 }
 621         }
 622 }
 623
 624 void GL_ColorMask(int r, int g, int b, int a)
 625 {
 626         int state = r*8 + g*4 + b*2 + a*1;
 627         if (gl_state.colormask != state)
 628         {
 629                 gl_state.colormask = state;
 630                 qglColorMask((GLboolean)r, (GLboolean)g, (GLboolean)b, (GLboolean)a);CHECKGLERROR
 631         }
 632 }
 633
 634 void GL_Color(float cr, float cg, float cb, float ca)
 635 {
 636         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)
 637         {
 638                 gl_state.color4f[0] = cr;
 639                 gl_state.color4f[1] = cg;
 640                 gl_state.color4f[2] = cb;
 641                 gl_state.color4f[3] = ca;
 642                 CHECKGLERROR
 643                 qglColor4f(gl_state.color4f[0], gl_state.color4f[1], gl_state.color4f[2], gl_state.color4f[3]);
 644                 CHECKGLERROR
 645         }
 646 }
 647
 648 void GL_LockArrays(int first, int count)
 649 {
 650         if (gl_state.lockrange_count != count || gl_state.lockrange_first != first)
 651         {
 652                 if (gl_state.lockrange_count)
 653                 {
 654                         gl_state.lockrange_count = 0;
 655                         CHECKGLERROR
 656                         qglUnlockArraysEXT();
 657                         CHECKGLERROR
 658                 }
 659                 if (count && gl_supportslockarrays && gl_lockarrays.integer && r_render.integer)
 660                 {
 661                         gl_state.lockrange_first = first;
 662                         gl_state.lockrange_count = count;
 663                         CHECKGLERROR
 664                         qglLockArraysEXT(first, count);
 665                         CHECKGLERROR
 666                 }
 667         }
 668 }
 669
 670 void GL_Scissor (int x, int y, int width, int height)
 671 {
 672         CHECKGLERROR
 673         qglScissor(x, vid.height - (y + height),width,height);
 674         CHECKGLERROR
 675 }
 676
 677 void GL_ScissorTest(int state)
 678 {
 679         if(gl_state.scissortest == state)
 680                 return;
 681
 682         CHECKGLERROR
 683         if((gl_state.scissortest = state))
 684                 qglEnable(GL_SCISSOR_TEST);
 685         else
 686                 qglDisable(GL_SCISSOR_TEST);
 687         CHECKGLERROR
 688 }
 689
 690 void GL_Clear(int mask)
 691 {
 692         qglClear(mask);CHECKGLERROR
 693 }
 694
 695 void GL_TransformToScreen(const vec4_t in, vec4_t out)
 696 {
 697         vec4_t temp;
 698         float iw;
 699         Matrix4x4_Transform4 (&backend_viewmatrix, in, temp);
 700         Matrix4x4_Transform4 (&backend_projectmatrix, temp, out);
 701         iw = 1.0f / out[3];
 702         out[0] = r_view_x + (out[0] * iw + 1.0f) * r_view_width * 0.5f;
 703         out[1] = r_view_y + (out[1] * iw + 1.0f) * r_view_height * 0.5f;
 704         out[2] = r_view_z + (out[2] * iw + 1.0f) * r_view_depth * 0.5f;
 705 }
 706
 707 // called at beginning of frame
 708 void R_Mesh_Start(void)
 709 {
 710         BACKENDACTIVECHECK
 711         CHECKGLERROR
 712         GL_Backend_ResetState();
 713 }
 714
 715 unsigned int GL_Backend_CompileProgram(int vertexstrings_count, const char **vertexstrings_list, int fragmentstrings_count, const char **fragmentstrings_list)
 716 {
 717         GLint vertexshadercompiled, fragmentshadercompiled, programlinked;
 718         GLuint vertexshaderobject, fragmentshaderobject, programobject = 0;
 719         char compilelog[MAX_INPUTLINE];
 720         CHECKGLERROR
 721
 722         programobject = qglCreateProgramObjectARB();
 723         CHECKGLERROR
 724         if (!programobject)
 725                 return 0;
 726
 727         if (developer.integer >= 100)
 728         {
 729                 int i;
 730                 Con_Printf("Compiling shader:\n");
 731                 if (vertexstrings_count)
 732                 {
 733                         Con_Printf("------ VERTEX SHADER ------\n");
 734                         for (i = 0;i < vertexstrings_count;i++)
 735                                 Con_Print(vertexstrings_list[i]);
 736                         Con_Print("\n");
 737                 }
 738                 if (fragmentstrings_count)
 739                 {
 740                         Con_Printf("------ FRAGMENT SHADER ------\n");
 741                         for (i = 0;i < fragmentstrings_count;i++)
 742                                 Con_Print(fragmentstrings_list[i]);
 743                         Con_Print("\n");
 744                 }
 745         }
 746
 747         if (vertexstrings_count)
 748         {
 749                 CHECKGLERROR
 750                 vertexshaderobject = qglCreateShaderObjectARB(GL_VERTEX_SHADER_ARB);
 751                 if (!vertexshaderobject)
 752                 {
 753                         qglDeleteObjectARB(programobject);
 754                         CHECKGLERROR
 755                         return 0;
 756                 }
 757                 qglShaderSourceARB(vertexshaderobject, vertexstrings_count, vertexstrings_list, NULL);
 758                 qglCompileShaderARB(vertexshaderobject);
 759                 CHECKGLERROR
 760                 qglGetObjectParameterivARB(vertexshaderobject, GL_OBJECT_COMPILE_STATUS_ARB, &vertexshadercompiled);
 761                 qglGetInfoLogARB(vertexshaderobject, sizeof(compilelog), NULL, compilelog);
 762                 if (compilelog[0])
 763                         Con_DPrintf("vertex shader compile log:\n%s\n", compilelog);
 764                 if (!vertexshadercompiled)
 765                 {
 766                         qglDeleteObjectARB(programobject);
 767                         qglDeleteObjectARB(vertexshaderobject);
 768                         CHECKGLERROR
 769                         return 0;
 770                 }
 771                 qglAttachObjectARB(programobject, vertexshaderobject);
 772                 qglDeleteObjectARB(vertexshaderobject);
 773                 CHECKGLERROR
 774         }
 775
 776         if (fragmentstrings_count)
 777         {
 778                 CHECKGLERROR
 779                 fragmentshaderobject = qglCreateShaderObjectARB(GL_FRAGMENT_SHADER_ARB);
 780                 if (!fragmentshaderobject)
 781                 {
 782                         qglDeleteObjectARB(programobject);
 783                         CHECKGLERROR
 784                         return 0;
 785                 }
 786                 qglShaderSourceARB(fragmentshaderobject, fragmentstrings_count, fragmentstrings_list, NULL);
 787                 qglCompileShaderARB(fragmentshaderobject);
 788                 CHECKGLERROR
 789                 qglGetObjectParameterivARB(fragmentshaderobject, GL_OBJECT_COMPILE_STATUS_ARB, &fragmentshadercompiled);
 790                 qglGetInfoLogARB(fragmentshaderobject, sizeof(compilelog), NULL, compilelog);
 791                 if (compilelog[0])
 792                         Con_DPrintf("fragment shader compile log:\n%s\n", compilelog);
 793                 if (!fragmentshadercompiled)
 794                 {
 795                         qglDeleteObjectARB(programobject);
 796                         qglDeleteObjectARB(fragmentshaderobject);
 797                         CHECKGLERROR
 798                         return 0;
 799                 }
 800                 qglAttachObjectARB(programobject, fragmentshaderobject);
 801                 qglDeleteObjectARB(fragmentshaderobject);
 802                 CHECKGLERROR
 803         }
 804
 805         qglLinkProgramARB(programobject);
 806         CHECKGLERROR
 807         qglGetObjectParameterivARB(programobject, GL_OBJECT_LINK_STATUS_ARB, &programlinked);
 808         qglGetInfoLogARB(programobject, sizeof(compilelog), NULL, compilelog);
 809         if (compilelog[0])
 810         {
 811                 Con_DPrintf("program link log:\n%s\n", compilelog);
 812                 // software vertex shader is ok but software fragment shader is WAY
 813                 // too slow, fail program if so.
 814                 // NOTE: this string might be ATI specific, but that's ok because the
 815                 // ATI R300 chip (Radeon 9500-9800/X300) is the most likely to use a
 816                 // software fragment shader due to low instruction and dependent
 817                 // texture limits.
 818                 if (strstr(compilelog, "fragment shader will run in software"))
 819                         programlinked = false;
 820         }
 821         CHECKGLERROR
 822         if (!programlinked)
 823         {
 824                 qglDeleteObjectARB(programobject);
 825                 return 0;
 826         }
 827         CHECKGLERROR
 828         return programobject;
 829 }
 830
 831 void GL_Backend_FreeProgram(unsigned int prog)
 832 {
 833         CHECKGLERROR
 834         qglDeleteObjectARB(prog);
 835         CHECKGLERROR
 836 }
 837
 838 int gl_backend_rebindtextures;
 839
 840 void GL_Backend_RenumberElements(int *out, int count, const int *in, int offset)
 841 {
 842         int i;
 843         if (offset)
 844         {
 845                 for (i = 0;i < count;i++)
 846                         *out++ = *in++ + offset;
 847         }
 848         else
 849                 memcpy(out, in, sizeof(*out) * count);
 850 }
 851
 852 // renders triangles using vertices from the active arrays
 853 int paranoidblah = 0;
 854 void R_Mesh_Draw(int firstvertex, int numvertices, int numtriangles, const int *elements)
 855 {
 856         unsigned int numelements = numtriangles * 3;
 857         if (numvertices < 3 || numtriangles < 1)
 858         {
 859                 Con_Printf("R_Mesh_Draw(%d, %d, %d, %08p);\n", firstvertex, numvertices, numtriangles, elements);
 860                 return;
 861         }
 862         //CHECKGLERROR
 863         renderstats.meshes++;
 864         renderstats.meshes_elements += numelements;
 865         if (gl_paranoid.integer)
 866         {
 867                 unsigned int i, j, size;
 868                 const int *p;
 869                 if (!qglIsEnabled(GL_VERTEX_ARRAY))
 870                         Con_Print("R_Mesh_Draw: vertex array not enabled\n");
 871                 for (j = 0, size = numvertices * 3, p = (int *)((float *)gl_state.pointer_vertex + firstvertex * 3);j < size;j++, p++)
 872                         paranoidblah += *p;
 873                 if (gl_state.pointer_color)
 874                 {
 875                         if (!qglIsEnabled(GL_COLOR_ARRAY))
 876                                 Con_Print("R_Mesh_Draw: color array set but not enabled\n");
 877                         for (j = 0, size = numvertices * 4, p = (int *)((float *)gl_state.pointer_color + firstvertex * 4);j < size;j++, p++)
 878                                 paranoidblah += *p;
 879                 }
 880                 for (i = 0;i < backendarrayunits;i++)
 881                 {
 882                         if (gl_state.units[i].arrayenabled)
 883                         {
 884                                 GL_ClientActiveTexture(i);
 885                                 if (!qglIsEnabled(GL_TEXTURE_COORD_ARRAY))
 886                                         Con_Print("R_Mesh_Draw: texcoord array set but not enabled\n");
 887                                 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++)
 888                                         paranoidblah += *p;
 889                         }
 890                 }
 891                 for (i = 0;i < (unsigned int) numtriangles * 3;i++)
 892                 {
 893                         if (elements[i] < firstvertex || elements[i] >= firstvertex + numvertices)
 894                         {
 895                                 Con_Printf("R_Mesh_Draw: invalid vertex index %i (outside range %i - %i) in elements list\n", elements[i], firstvertex, firstvertex + numvertices);
 896                                 return;
 897                         }
 898                 }
 899                 CHECKGLERROR
 900         }
 901         if (r_render.integer)
 902         {
 903                 CHECKGLERROR
 904                 if (gl_mesh_testmanualfeeding.integer)
 905                 {
 906                         unsigned int i, j;
 907                         const GLfloat *p;
 908                         qglBegin(GL_TRIANGLES);
 909                         for (i = 0;i < (unsigned int) numtriangles * 3;i++)
 910                         {
 911                                 for (j = 0;j < backendarrayunits;j++)
 912                                 {
 913                                         if (gl_state.units[j].pointer_texcoord)
 914                                         {
 915                                                 if (backendarrayunits > 1)
 916                                                 {
 917                                                         if (gl_state.units[j].arraycomponents == 4)
 918                                                         {
 919                                                                 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 4;
 920                                                                 qglMultiTexCoord4f(GL_TEXTURE0_ARB + j, p[0], p[1], p[2], p[3]);
 921                                                         }
 922                                                         else if (gl_state.units[j].arraycomponents == 3)
 923                                                         {
 924                                                                 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 3;
 925                                                                 qglMultiTexCoord3f(GL_TEXTURE0_ARB + j, p[0], p[1], p[2]);
 926                                                         }
 927                                                         else if (gl_state.units[j].arraycomponents == 2)
 928                                                         {
 929                                                                 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 2;
 930                                                                 qglMultiTexCoord2f(GL_TEXTURE0_ARB + j, p[0], p[1]);
 931                                                         }
 932                                                         else
 933                                                         {
 934                                                                 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 1;
 935                                                                 qglMultiTexCoord1f(GL_TEXTURE0_ARB + j, p[0]);
 936                                                         }
 937                                                 }
 938                                                 else
 939                                                 {
 940                                                         if (gl_state.units[j].arraycomponents == 4)
 941                                                         {
 942                                                                 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 4;
 943                                                                 qglTexCoord4f(p[0], p[1], p[2], p[3]);
 944                                                         }
 945                                                         else if (gl_state.units[j].arraycomponents == 3)
 946                                                         {
 947                                                                 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 3;
 948                                                                 qglTexCoord3f(p[0], p[1], p[2]);
 949                                                         }
 950                                                         else if (gl_state.units[j].arraycomponents == 2)
 951                                                         {
 952                                                                 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 2;
 953                                                                 qglTexCoord2f(p[0], p[1]);
 954                                                         }
 955                                                         else
 956                                                         {
 957                                                                 p = ((const GLfloat *)(gl_state.units[j].pointer_texcoord)) + elements[i] * 1;
 958                                                                 qglTexCoord1f(p[0]);
 959                                                         }
 960                                                 }
 961                                         }
 962                                 }
 963                                 if (gl_state.pointer_color)
 964                                 {
 965                                         p = ((const GLfloat *)(gl_state.pointer_color)) + elements[i] * 4;
 966                                         qglColor4f(p[0], p[1], p[2], p[3]);
 967                                 }
 968                                 p = ((const GLfloat *)(gl_state.pointer_vertex)) + elements[i] * 3;
 969                                 qglVertex3f(p[0], p[1], p[2]);
 970                         }
 971                         qglEnd();
 972                         CHECKGLERROR
 973                 }
 974                 else if (gl_mesh_testarrayelement.integer)
 975                 {
 976                         int i;
 977                         qglBegin(GL_TRIANGLES);
 978                         for (i = 0;i < numtriangles * 3;i++)
 979                         {
 980                                 qglArrayElement(elements[i]);
 981                         }
 982                         qglEnd();
 983                         CHECKGLERROR
 984                 }
 985                 else if (gl_mesh_drawrangeelements.integer && qglDrawRangeElements != NULL)
 986                 {
 987                         qglDrawRangeElements(GL_TRIANGLES, firstvertex, firstvertex + numvertices, numelements, GL_UNSIGNED_INT, elements);
 988                         CHECKGLERROR
 989                 }
 990                 else
 991                 {
 992                         qglDrawElements(GL_TRIANGLES, numelements, GL_UNSIGNED_INT, elements);
 993                         CHECKGLERROR
 994                 }
 995         }
 996 }
 997
 998 // restores backend state, used when done with 3D rendering
 999 void R_Mesh_Finish(void)
1000 {
1001         unsigned int i;
1002         BACKENDACTIVECHECK
1003         CHECKGLERROR
1004         GL_LockArrays(0, 0);
1005         CHECKGLERROR
1006
1007         for (i = 0;i < backendimageunits;i++)
1008         {
1009                 GL_ActiveTexture(i);
1010                 qglBindTexture(GL_TEXTURE_1D, 0);CHECKGLERROR
1011                 qglBindTexture(GL_TEXTURE_2D, 0);CHECKGLERROR
1012                 if (gl_texture3d)
1013                 {
1014                         qglBindTexture(GL_TEXTURE_3D, 0);CHECKGLERROR
1015                 }
1016                 if (gl_texturecubemap)
1017                 {
1018                         qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, 0);CHECKGLERROR
1019                 }
1020         }
1021         for (i = 0;i < backendarrayunits;i++)
1022         {
1023                 GL_ActiveTexture(backendarrayunits - 1 - i);
1024                 qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR
1025         }
1026         for (i = 0;i < backendunits;i++)
1027         {
1028                 GL_ActiveTexture(backendunits - 1 - i);
1029                 qglDisable(GL_TEXTURE_1D);CHECKGLERROR
1030                 qglDisable(GL_TEXTURE_2D);CHECKGLERROR
1031                 if (gl_texture3d)
1032                 {
1033                         qglDisable(GL_TEXTURE_3D);CHECKGLERROR
1034                 }
1035                 if (gl_texturecubemap)
1036                 {
1037                         qglDisable(GL_TEXTURE_CUBE_MAP_ARB);CHECKGLERROR
1038                 }
1039                 qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);CHECKGLERROR
1040                 if (gl_combine.integer)
1041                 {
1042                         qglTexEnvi(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, 1);CHECKGLERROR
1043                         qglTexEnvi(GL_TEXTURE_ENV, GL_ALPHA_SCALE, 1);CHECKGLERROR
1044                 }
1045         }
1046         qglDisableClientState(GL_COLOR_ARRAY);CHECKGLERROR
1047         qglDisableClientState(GL_VERTEX_ARRAY);CHECKGLERROR
1048
1049         qglDisable(GL_BLEND);CHECKGLERROR
1050         qglEnable(GL_DEPTH_TEST);CHECKGLERROR
1051         qglDepthMask(GL_TRUE);CHECKGLERROR
1052         qglBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);CHECKGLERROR
1053 }
1054
1055 void R_Mesh_Matrix(const matrix4x4_t *matrix)
1056 {
1057         if (memcmp(matrix, &backend_modelmatrix, sizeof(matrix4x4_t)))
1058         {
1059                 backend_modelmatrix = *matrix;
1060                 Matrix4x4_Concat(&backend_modelviewmatrix, &backend_viewmatrix, matrix);
1061                 Matrix4x4_Transpose(&backend_glmodelviewmatrix, &backend_modelviewmatrix);
1062                 qglLoadMatrixf(&backend_glmodelviewmatrix.m[0][0]);
1063         }
1064 }
1065
1066 void R_Mesh_VertexPointer(const float *vertex3f)
1067 {
1068         if (gl_state.pointer_vertex != vertex3f)
1069         {
1070                 gl_state.pointer_vertex = vertex3f;
1071                 CHECKGLERROR
1072                 qglVertexPointer(3, GL_FLOAT, sizeof(float[3]), gl_state.pointer_vertex);
1073                 CHECKGLERROR
1074         }
1075 }
1076
1077 void R_Mesh_ColorPointer(const float *color4f)
1078 {
1079         if (gl_state.pointer_color != color4f)
1080         {
1081                 CHECKGLERROR
1082                 if (!gl_state.pointer_color)
1083                 {
1084                         qglEnableClientState(GL_COLOR_ARRAY);
1085                         CHECKGLERROR
1086                 }
1087                 else if (!color4f)
1088                 {
1089                         qglDisableClientState(GL_COLOR_ARRAY);
1090                         CHECKGLERROR
1091                         // when color array is on the glColor gets trashed, set it again
1092                         qglColor4f(gl_state.color4f[0], gl_state.color4f[1], gl_state.color4f[2], gl_state.color4f[3]);
1093                         CHECKGLERROR
1094                 }
1095                 gl_state.pointer_color = color4f;
1096                 qglColorPointer(4, GL_FLOAT, sizeof(float[4]), gl_state.pointer_color);
1097                 CHECKGLERROR
1098         }
1099 }
1100
1101 void R_Mesh_TexCoordPointer(unsigned int unitnum, unsigned int numcomponents, const float *texcoord)
1102 {
1103         gltextureunit_t *unit = gl_state.units + unitnum;
1104         // update array settings
1105         if (texcoord)
1106         {
1107                 // texcoord array
1108                 if (unit->pointer_texcoord != texcoord || unit->arraycomponents != numcomponents)
1109                 {
1110                         unit->pointer_texcoord = texcoord;
1111                         unit->arraycomponents = numcomponents;
1112                         GL_ClientActiveTexture(unitnum);
1113                         qglTexCoordPointer(unit->arraycomponents, GL_FLOAT, sizeof(float) * unit->arraycomponents, unit->pointer_texcoord);
1114                         CHECKGLERROR
1115                 }
1116                 // texture array unit is enabled, enable the array
1117                 if (!unit->arrayenabled)
1118                 {
1119                         unit->arrayenabled = true;
1120                         GL_ClientActiveTexture(unitnum);
1121                         qglEnableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR
1122                 }
1123         }
1124         else
1125         {
1126                 // texture array unit is disabled, disable the array
1127                 if (unit->arrayenabled)
1128                 {
1129                         unit->arrayenabled = false;
1130                         GL_ClientActiveTexture(unitnum);
1131                         qglDisableClientState(GL_TEXTURE_COORD_ARRAY);CHECKGLERROR
1132                 }
1133         }
1134 }
1135
1136 void R_Mesh_TexBindAll(unsigned int unitnum, int tex1d, int tex2d, int tex3d, int texcubemap)
1137 {
1138         gltextureunit_t *unit = gl_state.units + unitnum;
1139         if (unitnum >= backendimageunits)
1140                 return;
1141         // update 1d texture binding
1142         if (unit->t1d != tex1d)
1143         {
1144                 GL_ActiveTexture(unitnum);
1145                 if (unitnum < backendunits)
1146                 {
1147                         if (tex1d)
1148                         {
1149                                 if (unit->t1d == 0)
1150                                         qglEnable(GL_TEXTURE_1D);
1151                         }
1152                         else
1153                         {
1154                                 if (unit->t1d)
1155                                         qglDisable(GL_TEXTURE_1D);
1156                         }
1157                 }
1158                 unit->t1d = tex1d;
1159                 qglBindTexture(GL_TEXTURE_1D, unit->t1d);
1160                 CHECKGLERROR
1161         }
1162         // update 2d texture binding
1163         if (unit->t2d != tex2d)
1164         {
1165                 GL_ActiveTexture(unitnum);
1166                 if (unitnum < backendunits)
1167                 {
1168                         if (tex2d)
1169                         {
1170                                 if (unit->t2d == 0)
1171                                         qglEnable(GL_TEXTURE_2D);
1172                         }
1173                         else
1174                         {
1175                                 if (unit->t2d)
1176                                         qglDisable(GL_TEXTURE_2D);
1177                         }
1178                 }
1179                 unit->t2d = tex2d;
1180                 qglBindTexture(GL_TEXTURE_2D, unit->t2d);
1181                 CHECKGLERROR
1182         }
1183         // update 3d texture binding
1184         if (unit->t3d != tex3d)
1185         {
1186                 GL_ActiveTexture(unitnum);
1187                 if (unitnum < backendunits)
1188                 {
1189                         if (tex3d)
1190                         {
1191                                 if (unit->t3d == 0)
1192                                         qglEnable(GL_TEXTURE_3D);
1193                         }
1194                         else
1195                         {
1196                                 if (unit->t3d)
1197                                         qglDisable(GL_TEXTURE_3D);
1198                         }
1199                 }
1200                 unit->t3d = tex3d;
1201                 qglBindTexture(GL_TEXTURE_3D, unit->t3d);
1202                 CHECKGLERROR
1203         }
1204         // update cubemap texture binding
1205         if (unit->tcubemap != texcubemap)
1206         {
1207                 GL_ActiveTexture(unitnum);
1208                 if (unitnum < backendunits)
1209                 {
1210                         if (texcubemap)
1211                         {
1212                                 if (unit->tcubemap == 0)
1213                                         qglEnable(GL_TEXTURE_CUBE_MAP_ARB);
1214                         }
1215                         else
1216                         {
1217                                 if (unit->tcubemap)
1218                                         qglDisable(GL_TEXTURE_CUBE_MAP_ARB);
1219                         }
1220                 }
1221                 unit->tcubemap = texcubemap;
1222                 qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, unit->tcubemap);
1223                 CHECKGLERROR
1224         }
1225 }
1226
1227 void R_Mesh_TexBind1D(unsigned int unitnum, int texnum)
1228 {
1229         gltextureunit_t *unit = gl_state.units + unitnum;
1230         if (unitnum >= backendimageunits)
1231                 return;
1232         // update 1d texture binding
1233         if (unit->t1d != texnum)
1234         {
1235                 GL_ActiveTexture(unitnum);
1236                 if (unitnum < backendunits)
1237                 {
1238                         if (texnum)
1239                         {
1240                                 if (unit->t1d == 0)
1241                                         qglEnable(GL_TEXTURE_1D);
1242                         }
1243                         else
1244                         {
1245                                 if (unit->t1d)
1246                                         qglDisable(GL_TEXTURE_1D);
1247                         }
1248                 }
1249                 unit->t1d = texnum;
1250                 qglBindTexture(GL_TEXTURE_1D, unit->t1d);
1251                 CHECKGLERROR
1252         }
1253         // update 2d texture binding
1254         if (unit->t2d)
1255         {
1256                 GL_ActiveTexture(unitnum);
1257                 if (unitnum < backendunits)
1258                 {
1259                         if (unit->t2d)
1260                                 qglDisable(GL_TEXTURE_2D);
1261                 }
1262                 unit->t2d = 0;
1263                 qglBindTexture(GL_TEXTURE_2D, unit->t2d);
1264                 CHECKGLERROR
1265         }
1266         // update 3d texture binding
1267         if (unit->t3d)
1268         {
1269                 GL_ActiveTexture(unitnum);
1270                 if (unitnum < backendunits)
1271                 {
1272                         if (unit->t3d)
1273                                 qglDisable(GL_TEXTURE_3D);
1274                 }
1275                 unit->t3d = 0;
1276                 qglBindTexture(GL_TEXTURE_3D, unit->t3d);
1277                 CHECKGLERROR
1278         }
1279         // update cubemap texture binding
1280         if (unit->tcubemap)
1281         {
1282                 GL_ActiveTexture(unitnum);
1283                 if (unitnum < backendunits)
1284                 {
1285                         if (unit->tcubemap)
1286                                 qglDisable(GL_TEXTURE_CUBE_MAP_ARB);
1287                 }
1288                 unit->tcubemap = 0;
1289                 qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, unit->tcubemap);
1290                 CHECKGLERROR
1291         }
1292 }
1293
1294 void R_Mesh_TexBind(unsigned int unitnum, int texnum)
1295 {
1296         gltextureunit_t *unit = gl_state.units + unitnum;
1297         if (unitnum >= backendimageunits)
1298                 return;
1299         // update 1d texture binding
1300         if (unit->t1d)
1301         {
1302                 GL_ActiveTexture(unitnum);
1303                 if (unitnum < backendunits)
1304                 {
1305                         if (unit->t1d)
1306                                 qglDisable(GL_TEXTURE_1D);
1307                 }
1308                 unit->t1d = 0;
1309                 qglBindTexture(GL_TEXTURE_1D, unit->t1d);
1310                 CHECKGLERROR
1311         }
1312         // update 2d texture binding
1313         if (unit->t2d != texnum)
1314         {
1315                 GL_ActiveTexture(unitnum);
1316                 if (unitnum < backendunits)
1317                 {
1318                         if (texnum)
1319                         {
1320                                 if (unit->t2d == 0)
1321                                         qglEnable(GL_TEXTURE_2D);
1322                         }
1323                         else
1324                         {
1325                                 if (unit->t2d)
1326                                         qglDisable(GL_TEXTURE_2D);
1327                         }
1328                 }
1329                 unit->t2d = texnum;
1330                 qglBindTexture(GL_TEXTURE_2D, unit->t2d);
1331                 CHECKGLERROR
1332         }
1333         // update 3d texture binding
1334         if (unit->t3d)
1335         {
1336                 GL_ActiveTexture(unitnum);
1337                 if (unitnum < backendunits)
1338                 {
1339                         if (unit->t3d)
1340                                 qglDisable(GL_TEXTURE_3D);
1341                 }
1342                 unit->t3d = 0;
1343                 qglBindTexture(GL_TEXTURE_3D, unit->t3d);
1344                 CHECKGLERROR
1345         }
1346         // update cubemap texture binding
1347         if (unit->tcubemap != 0)
1348         {
1349                 GL_ActiveTexture(unitnum);
1350                 if (unitnum < backendunits)
1351                 {
1352                         if (unit->tcubemap)
1353                                 qglDisable(GL_TEXTURE_CUBE_MAP_ARB);
1354                 }
1355                 unit->tcubemap = 0;
1356                 qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, unit->tcubemap);
1357                 CHECKGLERROR
1358         }
1359 }
1360
1361 void R_Mesh_TexBind3D(unsigned int unitnum, int texnum)
1362 {
1363         gltextureunit_t *unit = gl_state.units + unitnum;
1364         if (unitnum >= backendimageunits)
1365                 return;
1366         // update 1d texture binding
1367         if (unit->t1d)
1368         {
1369                 GL_ActiveTexture(unitnum);
1370                 if (unitnum < backendunits)
1371                 {
1372                         if (unit->t1d)
1373                                 qglDisable(GL_TEXTURE_1D);
1374                 }
1375                 unit->t1d = 0;
1376                 qglBindTexture(GL_TEXTURE_1D, unit->t1d);
1377                 CHECKGLERROR
1378         }
1379         // update 2d texture binding
1380         if (unit->t2d)
1381         {
1382                 GL_ActiveTexture(unitnum);
1383                 if (unitnum < backendunits)
1384                 {
1385                         if (unit->t2d)
1386                                 qglDisable(GL_TEXTURE_2D);
1387                 }
1388                 unit->t2d = 0;
1389                 qglBindTexture(GL_TEXTURE_2D, unit->t2d);
1390                 CHECKGLERROR
1391         }
1392         // update 3d texture binding
1393         if (unit->t3d != texnum)
1394         {
1395                 GL_ActiveTexture(unitnum);
1396                 if (unitnum < backendunits)
1397                 {
1398                         if (texnum)
1399                         {
1400                                 if (unit->t3d == 0)
1401                                         qglEnable(GL_TEXTURE_3D);
1402                         }
1403                         else
1404                         {
1405                                 if (unit->t3d)
1406                                         qglDisable(GL_TEXTURE_3D);
1407                         }
1408                 }
1409                 unit->t3d = texnum;
1410                 qglBindTexture(GL_TEXTURE_3D, unit->t3d);
1411                 CHECKGLERROR
1412         }
1413         // update cubemap texture binding
1414         if (unit->tcubemap != 0)
1415         {
1416                 GL_ActiveTexture(unitnum);
1417                 if (unitnum < backendunits)
1418                 {
1419                         if (unit->tcubemap)
1420                                 qglDisable(GL_TEXTURE_CUBE_MAP_ARB);
1421                 }
1422                 unit->tcubemap = 0;
1423                 qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, unit->tcubemap);
1424                 CHECKGLERROR
1425         }
1426 }
1427
1428 void R_Mesh_TexBindCubeMap(unsigned int unitnum, int texnum)
1429 {
1430         gltextureunit_t *unit = gl_state.units + unitnum;
1431         if (unitnum >= backendimageunits)
1432                 return;
1433         // update 1d texture binding
1434         if (unit->t1d)
1435         {
1436                 GL_ActiveTexture(unitnum);
1437                 if (unitnum < backendunits)
1438                 {
1439                         if (unit->t1d)
1440                                 qglDisable(GL_TEXTURE_1D);
1441                 }
1442                 unit->t1d = 0;
1443                 qglBindTexture(GL_TEXTURE_1D, unit->t1d);
1444                 CHECKGLERROR
1445         }
1446         // update 2d texture binding
1447         if (unit->t2d)
1448         {
1449                 GL_ActiveTexture(unitnum);
1450                 if (unitnum < backendunits)
1451                 {
1452                         if (unit->t2d)
1453                                 qglDisable(GL_TEXTURE_2D);
1454                 }
1455                 unit->t2d = 0;
1456                 qglBindTexture(GL_TEXTURE_2D, unit->t2d);
1457                 CHECKGLERROR
1458         }
1459         // update 3d texture binding
1460         if (unit->t3d)
1461         {
1462                 GL_ActiveTexture(unitnum);
1463                 if (unitnum < backendunits)
1464                 {
1465                         if (unit->t3d)
1466                                 qglDisable(GL_TEXTURE_3D);
1467                 }
1468                 unit->t3d = 0;
1469                 qglBindTexture(GL_TEXTURE_3D, unit->t3d);
1470                 CHECKGLERROR
1471         }
1472         // update cubemap texture binding
1473         if (unit->tcubemap != texnum)
1474         {
1475                 GL_ActiveTexture(unitnum);
1476                 if (unitnum < backendunits)
1477                 {
1478                         if (texnum)
1479                         {
1480                                 if (unit->tcubemap == 0)
1481                                         qglEnable(GL_TEXTURE_CUBE_MAP_ARB);
1482                         }
1483                         else
1484                         {
1485                                 if (unit->tcubemap)
1486                                         qglDisable(GL_TEXTURE_CUBE_MAP_ARB);
1487                         }
1488                 }
1489                 unit->tcubemap = texnum;
1490                 qglBindTexture(GL_TEXTURE_CUBE_MAP_ARB, unit->tcubemap);
1491                 CHECKGLERROR
1492         }
1493 }
1494
1495 void R_Mesh_TexMatrix(unsigned int unitnum, const matrix4x4_t *matrix)
1496 {
1497         gltextureunit_t *unit = gl_state.units + unitnum;
1498         if (matrix->m[3][3])
1499         {
1500                 // texmatrix specified, check if it is different
1501                 if (!unit->texmatrixenabled || memcmp(&unit->matrix, matrix, sizeof(matrix4x4_t)))
1502                 {
1503                         matrix4x4_t tempmatrix;
1504                         unit->texmatrixenabled = true;
1505                         unit->matrix = *matrix;
1506                         Matrix4x4_Transpose(&tempmatrix, &unit->matrix);
1507                         qglMatrixMode(GL_TEXTURE);
1508                         GL_ActiveTexture(unitnum);
1509                         qglLoadMatrixf(&tempmatrix.m[0][0]);
1510                         qglMatrixMode(GL_MODELVIEW);
1511                 }
1512         }
1513         else
1514         {
1515                 // no texmatrix specified, revert to identity
1516                 if (unit->texmatrixenabled)
1517                 {
1518                         unit->texmatrixenabled = false;
1519                         qglMatrixMode(GL_TEXTURE);
1520                         GL_ActiveTexture(unitnum);
1521                         qglLoadIdentity();
1522                         qglMatrixMode(GL_MODELVIEW);
1523                 }
1524         }
1525 }
1526
1527 void R_Mesh_TexCombine(unsigned int unitnum, int combinergb, int combinealpha, int rgbscale, int alphascale)
1528 {
1529         gltextureunit_t *unit = gl_state.units + unitnum;
1530         if (gl_combine.integer)
1531         {
1532                 // GL_ARB_texture_env_combine
1533                 if (!combinergb)
1534                         combinergb = GL_MODULATE;
1535                 if (!combinealpha)
1536                         combinealpha = GL_MODULATE;
1537                 if (!rgbscale)
1538                         rgbscale = 1;
1539                 if (!alphascale)
1540                         alphascale = 1;
1541                 if (unit->combinergb != combinergb)
1542                 {
1543                         unit->combinergb = combinergb;
1544                         GL_ActiveTexture(unitnum);
1545                         qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, unit->combinergb);CHECKGLERROR
1546                 }
1547                 if (unit->combinealpha != combinealpha)
1548                 {
1549                         unit->combinealpha = combinealpha;
1550                         GL_ActiveTexture(unitnum);
1551                         qglTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_ALPHA_ARB, unit->combinealpha);CHECKGLERROR
1552                 }
1553                 if (unit->rgbscale != rgbscale)
1554                 {
1555                         GL_ActiveTexture(unitnum);
1556                         qglTexEnvi(GL_TEXTURE_ENV, GL_RGB_SCALE_ARB, (unit->rgbscale = rgbscale));CHECKGLERROR
1557                 }
1558                 if (unit->alphascale != alphascale)
1559                 {
1560                         GL_ActiveTexture(unitnum);
1561                         qglTexEnvi(GL_TEXTURE_ENV, GL_ALPHA_SCALE, (unit->alphascale = alphascale));CHECKGLERROR
1562                 }
1563         }
1564         else
1565         {
1566                 // normal GL texenv
1567                 if (!combinergb)
1568                         combinergb = GL_MODULATE;
1569                 if (unit->combinergb != combinergb)
1570                 {
1571                         unit->combinergb = combinergb;
1572                         GL_ActiveTexture(unitnum);
1573                         qglTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, unit->combinergb);CHECKGLERROR
1574                 }
1575         }
1576 }
1577
1578 void R_Mesh_State(const rmeshstate_t *m)
1579 {
1580         unsigned int i;
1581
1582         BACKENDACTIVECHECK
1583
1584         R_Mesh_VertexPointer(m->pointer_vertex);
1585         R_Mesh_ColorPointer(m->pointer_color);
1586
1587         if (gl_backend_rebindtextures)
1588         {
1589                 gl_backend_rebindtextures = false;
1590                 GL_SetupTextureState();
1591         }
1592
1593         for (i = 0;i < backendimageunits;i++)
1594                 R_Mesh_TexBindAll(i, m->tex1d[i], m->tex[i], m->tex3d[i], m->texcubemap[i]);
1595         for (i = 0;i < backendarrayunits;i++)
1596         {
1597                 if (m->pointer_texcoord3f[i])
1598                         R_Mesh_TexCoordPointer(i, 3, m->pointer_texcoord3f[i]);
1599                 else
1600                         R_Mesh_TexCoordPointer(i, 2, m->pointer_texcoord[i]);
1601         }
1602         for (i = 0;i < backendunits;i++)
1603         {
1604                 R_Mesh_TexMatrix(i, &m->texmatrix[i]);
1605                 R_Mesh_TexCombine(i, m->texcombinergb[i], m->texcombinealpha[i], m->texrgbscale[i], m->texalphascale[i]);
1606         }
1607 }
1608
1609 void R_Mesh_Draw_ShowTris(int firstvertex, int numvertices, int numtriangles, const int *elements)
1610 {
1611         qglBegin(GL_LINES);
1612         for (;numtriangles;numtriangles--, elements += 3)
1613         {
1614                 qglArrayElement(elements[0]);qglArrayElement(elements[1]);
1615                 qglArrayElement(elements[1]);qglArrayElement(elements[2]);
1616                 qglArrayElement(elements[2]);qglArrayElement(elements[0]);
1617         }
1618         qglEnd();
1619         CHECKGLERROR
1620 }