gl_rmain.c

   1 /*
   2 Copyright (C) 1996-1997 Id Software, Inc.
   3
   4 This program is free software; you can redistribute it and/or
   5 modify it under the terms of the GNU General Public License
   6 as published by the Free Software Foundation; either version 2
   7 of the License, or (at your option) any later version.
   8
   9 This program is distributed in the hope that it will be useful,
  10 but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  12
  13 See the GNU General Public License for more details.
  14
  15 You should have received a copy of the GNU General Public License
  16 along with this program; if not, write to the Free Software
  17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  18
  19 */
  20 // r_main.c
  21
  22 #include "quakedef.h"
  23
  24 qboolean        r_cache_thrash;         // compatability
  25
  26 vec3_t          modelorg, r_entorigin;
  27 entity_t        *currententity;
  28
  29 int                     r_framecount;           // used for dlight push checking
  30
  31 mplane_t        frustum[4];
  32
  33 int                     c_brush_polys, c_alias_polys, c_light_polys, c_faces, c_nodes, c_leafs, c_models, c_bmodels, c_sprites, c_particles, c_dlights;
  34
  35 qboolean        envmap;                         // true during envmap command capture
  36
  37 // LordHavoc: moved all code related to particles into r_part.c
  38 //int                   particletexture;        // little dot for particles
  39 //int                   playertextures;         // up to 16 color translated skins
  40
  41 //
  42 // view origin
  43 //
  44 vec3_t  vup;
  45 vec3_t  vpn;
  46 vec3_t  vright;
  47 vec3_t  r_origin;
  48
  49 float   r_world_matrix[16];
  50 float   r_base_world_matrix[16];
  51
  52 //
  53 // screen size info
  54 //
  55 refdef_t        r_refdef;
  56
  57 mleaf_t         *r_viewleaf, *r_oldviewleaf;
  58
  59 unsigned short  d_lightstylevalue[256]; // 8.8 fraction of base light value
  60
  61 float ixtable[4096];
  62
  63 void R_MarkLeaves (void);
  64
  65 //cvar_t        r_norefresh = {"r_norefresh","0"};
  66 cvar_t  r_drawentities = {"r_drawentities","1"};
  67 cvar_t  r_drawviewmodel = {"r_drawviewmodel","1"};
  68 cvar_t  r_speeds = {"r_speeds","0"};
  69 cvar_t  r_speeds2 = {"r_speeds2","0"};
  70 cvar_t  r_fullbright = {"r_fullbright","0"};
  71 //cvar_t        r_lightmap = {"r_lightmap","0"};
  72 cvar_t  r_wateralpha = {"r_wateralpha","1"};
  73 cvar_t  r_dynamic = {"r_dynamic","1"};
  74 cvar_t  r_waterripple = {"r_waterripple","0"};
  75 cvar_t  r_fullbrights = {"r_fullbrights", "1"};
  76
  77 cvar_t  gl_lightmode = {"gl_lightmode", "1", true}; // LordHavoc: overbright lighting
  78 //cvar_t        r_dynamicbothsides = {"r_dynamicbothsides", "1"}; // LordHavoc: can disable dynamic lighting of backfaces, but quake maps are weird so it doesn't always work right...
  79 cvar_t  r_farclip = {"r_farclip", "6144"};
  80
  81 cvar_t  gl_fogenable = {"gl_fogenable", "0"};
  82 cvar_t  gl_fogdensity = {"gl_fogdensity", "0.25"};
  83 cvar_t  gl_fogred = {"gl_fogred","0.3"};
  84 cvar_t  gl_foggreen = {"gl_foggreen","0.3"};
  85 cvar_t  gl_fogblue = {"gl_fogblue","0.3"};
  86 cvar_t  gl_fogstart = {"gl_fogstart", "0"};
  87 cvar_t  gl_fogend = {"gl_fogend","0"};
  88 cvar_t  glfog = {"glfog", "0"};
  89
  90 /*
  91 int R_VisibleCullBox (vec3_t mins, vec3_t maxs)
  92 {
  93         int sides;
  94         mnode_t *nodestack[8192], *node;
  95         int stack = 0;
  96
  97         node = cl.worldmodel->nodes;
  98 loc0:
  99         if (node->contents < 0)
 100         {
 101                 if (((mleaf_t *)node)->visframe == r_framecount)
 102                 {
 103                         if (R_CullBox(mins, maxs))
 104                                 return true;
 105                         return false;
 106                 }
 107                 if (!stack)
 108                         return true;
 109                 node = nodestack[--stack];
 110                 goto loc0;
 111         }
 112
 113         sides = BOX_ON_PLANE_SIDE(mins, maxs, node->plane);
 114
 115 // recurse down the contacted sides
 116         if (sides & 1)
 117         {
 118                 if (sides & 2) // 3
 119                 {
 120                         // put second child on the stack for later examination
 121                         nodestack[stack++] = node->children[1];
 122                         node = node->children[0];
 123                         goto loc0;
 124                 }
 125                 else // 1
 126                 {
 127                         node = node->children[0];
 128                         goto loc0;
 129                 }
 130         }
 131         // 2
 132         node = node->children[1];
 133         goto loc0;
 134 }
 135 */
 136
 137 qboolean lighthalf;
 138
 139 vec3_t fogcolor;
 140 vec_t fogdensity;
 141 float fog_density, fog_red, fog_green, fog_blue;
 142 qboolean fogenabled;
 143 qboolean oldgl_fogenable;
 144 void FOG_framebegin(void)
 145 {
 146         if (nehahra)
 147         {
 148 //              if (!Nehahrademcompatibility)
 149 //                      gl_fogenable.value = 0;
 150                 if (gl_fogenable.value)
 151                 {
 152                         oldgl_fogenable = true;
 153                         fog_density = gl_fogdensity.value;
 154                         fog_red = gl_fogred.value;
 155                         fog_green = gl_foggreen.value;
 156                         fog_blue = gl_fogblue.value;
 157                 }
 158                 else if (oldgl_fogenable)
 159                 {
 160                         oldgl_fogenable = false;
 161                         fog_density = 0;
 162                         fog_red = 0;
 163                         fog_green = 0;
 164                         fog_blue = 0;
 165                 }
 166         }
 167         if (fog_density)
 168         {
 169                         fogcolor[0] = fog_red   = bound(0.0f, fog_red  , 1.0f);
 170                         fogcolor[1] = fog_green = bound(0.0f, fog_green, 1.0f);
 171                         fogcolor[2] = fog_blue  = bound(0.0f, fog_blue , 1.0f);
 172                         if (lighthalf)
 173                         {
 174                                 fogcolor[0] *= 0.5f;
 175                                 fogcolor[1] *= 0.5f;
 176                                 fogcolor[2] *= 0.5f;
 177                         }
 178         }
 179         if (glfog.value)
 180         {
 181                 if (!r_render.value)
 182                         return;
 183                 if(fog_density)
 184                 {
 185                         // LordHavoc: Borland C++ 5.0 was choking on this line, stupid compiler...
 186                         //GLfloat colors[4] = {(GLfloat) gl_fogred.value, (GLfloat) gl_foggreen.value, (GLfloat) gl_fogblue.value, (GLfloat) 1};
 187                         GLfloat colors[4];
 188                         colors[0] = fog_red;
 189                         colors[1] = fog_green;
 190                         colors[2] = fog_blue;
 191                         colors[3] = 1;
 192                         if (lighthalf)
 193                         {
 194                                 colors[0] *= 0.5f;
 195                                 colors[1] *= 0.5f;
 196                                 colors[2] *= 0.5f;
 197                         }
 198
 199                         glFogi (GL_FOG_MODE, GL_EXP2);
 200                         glFogf (GL_FOG_DENSITY, (GLfloat) fog_density / 100);
 201                         glFogfv (GL_FOG_COLOR, colors);
 202                         glEnable (GL_FOG);
 203                 }
 204                 else
 205                         glDisable(GL_FOG);
 206         }
 207         else
 208         {
 209                 if (fog_density)
 210                 {
 211                         fogenabled = true;
 212                         fogdensity = -4000.0f / (fog_density * fog_density);
 213                         // fog color was already set
 214                 }
 215                 else
 216                         fogenabled = false;
 217         }
 218 }
 219
 220 void FOG_frameend(void)
 221 {
 222         if (glfog.value)
 223                 glDisable(GL_FOG);
 224 }
 225
 226 void FOG_clear(void)
 227 {
 228         if (nehahra)
 229         {
 230                 Cvar_Set("gl_fogenable", "0");
 231                 Cvar_Set("gl_fogdensity", "0.2");
 232                 Cvar_Set("gl_fogred", "0.3");
 233                 Cvar_Set("gl_foggreen", "0.3");
 234                 Cvar_Set("gl_fogblue", "0.3");
 235         }
 236         fog_density = fog_red = fog_green = fog_blue = 0.0f;
 237 }
 238
 239 void FOG_registercvars(void)
 240 {
 241         Cvar_RegisterVariable (&glfog);
 242         if (nehahra)
 243         {
 244                 Cvar_RegisterVariable (&gl_fogenable);
 245                 Cvar_RegisterVariable (&gl_fogdensity);
 246                 Cvar_RegisterVariable (&gl_fogred);
 247                 Cvar_RegisterVariable (&gl_foggreen);
 248                 Cvar_RegisterVariable (&gl_fogblue);
 249                 Cvar_RegisterVariable (&gl_fogstart);
 250                 Cvar_RegisterVariable (&gl_fogend);
 251         }
 252 }
 253
 254 void gl_main_start(void)
 255 {
 256 }
 257
 258 void gl_main_shutdown(void)
 259 {
 260 }
 261
 262 void gl_main_newmap(void)
 263 {
 264 }
 265
 266 void GL_Main_Init(void)
 267 {
 268         int a;
 269         FOG_registercvars();
 270         // LordHavoc: setup 1.0f / N table for quick recipricols of integers
 271         ixtable[0] = 0;
 272         for (a = 1;a < 4096;a++)
 273                 ixtable[a] = 1.0f / a;
 274         Cvar_RegisterVariable (&r_drawentities);
 275         Cvar_RegisterVariable (&r_drawviewmodel);
 276         Cvar_RegisterVariable (&r_speeds);
 277         Cvar_RegisterVariable (&r_speeds2);
 278         Cvar_RegisterVariable (&gl_lightmode);
 279 //      Cvar_RegisterVariable (&r_dynamicwater);
 280 //      Cvar_RegisterVariable (&r_dynamicbothsides);
 281         Cvar_RegisterVariable (&r_fullbrights);
 282         Cvar_RegisterVariable (&r_wateralpha);
 283         Cvar_RegisterVariable (&r_dynamic);
 284         Cvar_RegisterVariable (&r_waterripple);
 285         Cvar_RegisterVariable (&r_farclip);
 286         if (nehahra)
 287                 Cvar_SetValue("r_fullbrights", 0);
 288 //      if (gl_vendor && strstr(gl_vendor, "3Dfx"))
 289 //              gl_lightmode.value = 0;
 290         Cvar_RegisterVariable (&r_fullbright);
 291         R_RegisterModule("GL_Main", gl_main_start, gl_main_shutdown, gl_main_newmap);
 292 }
 293
 294 extern void GL_Draw_Init(void);
 295 extern void GL_Main_Init(void);
 296 extern void GL_Models_Init(void);
 297 extern void GL_Poly_Init(void);
 298 extern void GL_Surf_Init(void);
 299 extern void GL_Screen_Init(void);
 300 extern void GL_Misc_Init(void);
 301 extern void R_Crosshairs_Init(void);
 302 extern void R_Light_Init(void);
 303 extern void R_Particles_Init(void);
 304 extern void R_Explosion_Init(void);
 305 extern void CL_Effects_Init(void);
 306 extern void R_Clip_Init(void);
 307
 308 void Render_Init(void)
 309 {
 310         R_Modules_Shutdown();
 311         R_Clip_Init();
 312         GL_Draw_Init();
 313         GL_Main_Init();
 314         GL_Models_Init();
 315         GL_Poly_Init();
 316         GL_Surf_Init();
 317         GL_Screen_Init();
 318         GL_Misc_Init();
 319         R_Crosshairs_Init();
 320         R_Light_Init();
 321         R_Particles_Init();
 322         R_Explosion_Init();
 323         CL_Effects_Init();
 324         R_Decals_Init();
 325         R_Modules_Start();
 326 }
 327
 328 /*
 329 ===============
 330 GL_Init
 331 ===============
 332 */
 333 extern char *ENGINE_EXTENSIONS;
 334 void GL_Init (void)
 335 {
 336         gl_vendor = glGetString (GL_VENDOR);
 337         Con_Printf ("GL_VENDOR: %s\n", gl_vendor);
 338         gl_renderer = glGetString (GL_RENDERER);
 339         Con_Printf ("GL_RENDERER: %s\n", gl_renderer);
 340
 341         gl_version = glGetString (GL_VERSION);
 342         Con_Printf ("GL_VERSION: %s\n", gl_version);
 343         gl_extensions = glGetString (GL_EXTENSIONS);
 344         Con_Printf ("GL_EXTENSIONS: %s\n", gl_extensions);
 345
 346 //      Con_Printf ("%s %s\n", gl_renderer, gl_version);
 347
 348         VID_CheckMultitexture();
 349         VID_CheckCVA();
 350
 351         // LordHavoc: report supported extensions
 352         Con_Printf ("\nengine extensions: %s\n", ENGINE_EXTENSIONS);
 353
 354         glCullFace(GL_FRONT);
 355         glEnable(GL_TEXTURE_2D);
 356 //      glDisable(GL_ALPHA_TEST);
 357         glAlphaFunc(GL_GREATER, 0.5);
 358
 359 //      glPolygonMode (GL_FRONT_AND_BACK, GL_FILL);
 360 }
 361
 362
 363 /*
 364 void R_RotateForEntity (entity_t *e)
 365 {
 366         glTranslatef (e->origin[0],  e->origin[1],  e->origin[2]);
 367
 368         glRotatef (e->angles[1],  0, 0, 1);
 369         glRotatef (-e->angles[0],  0, 1, 0);
 370         glRotatef (e->angles[2],  1, 0, 0);
 371
 372         glScalef (e->scale, e->scale, e->scale); // LordHavoc: model scale
 373 }
 374 */
 375
 376 // LordHavoc: shading stuff
 377 vec3_t  shadevector;
 378 vec3_t  shadecolor;
 379
 380 float   modelalpha;
 381
 382 //==================================================================================
 383
 384 void R_LerpUpdate(entity_t *ent)
 385 {
 386         int frame;
 387         frame = ent->render.frame;
 388         if (ent->render.model && ent->render.frame >= ent->render.model->numframes)
 389         {
 390                 Con_Printf("R_LerpUpdate: no such frame%6i in \"%s\"\n", ent->render.frame, ent->render.model->name);
 391                 frame = 0;
 392         }
 393
 394         if (ent->render.lerp_model != ent->render.model)
 395         {
 396                 // reset all interpolation information
 397                 ent->render.lerp_model = ent->render.model;
 398                 ent->render.frame1 = ent->render.frame2 = frame;
 399                 ent->render.frame1start = ent->render.frame2start = cl.time;
 400                 ent->render.framelerp = 1;
 401                 ent->render.lerp_starttime = 0;
 402         }
 403         else if (ent->render.frame2 != frame)
 404         {
 405                 // transition to new frame
 406                 ent->render.frame1 = ent->render.frame2;
 407                 ent->render.frame1start = ent->render.frame2start;
 408                 ent->render.frame2 = frame;
 409                 ent->render.frame2start = cl.time;
 410                 ent->render.framelerp = 0;
 411                 ent->render.lerp_starttime = cl.time;
 412         }
 413         else
 414         {
 415                 // lerp_starttime < 0 is used to prevent changing of framelerp
 416                 if (ent->render.lerp_starttime >= 0)
 417                 {
 418                         // update transition
 419                         ent->render.framelerp = (cl.time - ent->render.lerp_starttime) * 10;
 420                         ent->render.framelerp = bound(0, ent->render.framelerp, 1);
 421                 }
 422         }
 423 }
 424
 425
 426 void R_PrepareEntities (void)
 427 {
 428         int i;
 429         entity_t *ent;
 430         vec3_t v;
 431         // this updates entities that are supposed to be view relative
 432         for (i = 0;i < cl_numvisedicts;i++)
 433         {
 434                 ent = cl_visedicts[i];
 435
 436                 if (ent->render.flags & RENDER_VIEWMODEL)
 437                 {
 438                         // remove flag so it will not be repeated incase RelinkEntities is not called again for a while
 439                         ent->render.flags -= RENDER_VIEWMODEL;
 440                         // transform origin
 441                         VectorCopy(ent->render.origin, v);
 442                         ent->render.origin[0] = v[0] * vpn[0] + v[1] * vright[0] + v[2] * vup[0] + r_origin[0];
 443                         ent->render.origin[1] = v[0] * vpn[1] + v[1] * vright[1] + v[2] * vup[1] + r_origin[1];
 444                         ent->render.origin[2] = v[0] * vpn[2] + v[1] * vright[2] + v[2] * vup[2] + r_origin[2];
 445                         // adjust angles
 446                         VectorAdd(ent->render.angles, r_refdef.viewangles, ent->render.angles);
 447                 }
 448         }
 449 }
 450
 451 void R_Entity_Callback(void *data, void *junk)
 452 {
 453         ((entity_t *)data)->render.visframe = r_framecount;
 454 }
 455
 456 void R_AddModelEntities (void)
 457 {
 458         int             i;
 459         vec3_t  mins, maxs;
 460         frameblend_t blend[4];
 461
 462         if (!r_drawentities.value)
 463                 return;
 464
 465         for (i = 0;i < cl_numvisedicts;i++)
 466         {
 467                 currententity = cl_visedicts[i];
 468                 if (currententity->render.model->type == mod_brush)
 469                 {
 470                         modelalpha = currententity->render.alpha;
 471                         R_DrawBrushModel (currententity);
 472                 }
 473                 else if (currententity->render.model->type == mod_alias)
 474                 {
 475                         VectorAdd(currententity->render.origin, currententity->render.model->mins, mins);
 476                         VectorAdd(currententity->render.origin, currententity->render.model->maxs, maxs);
 477                         R_Clip_AddBox(mins, maxs, R_Entity_Callback, currententity, NULL);
 478                 }
 479                 else if (currententity->render.model->type == mod_sprite)
 480                 {
 481                         R_LerpUpdate(currententity);
 482                         R_LerpAnimation(currententity->render.model, currententity->render.frame1, currententity->render.frame2, currententity->render.frame1start, currententity->render.frame2start, currententity->render.framelerp, blend);
 483                         R_ClipSprite(currententity, blend);
 484                 }
 485         }
 486 }
 487
 488 /*
 489 =============
 490 R_DrawEntitiesOnList
 491 =============
 492 */
 493 /*
 494 void R_DrawEntitiesOnList1 (void)
 495 {
 496         int             i;
 497
 498         if (!r_drawentities.value)
 499                 return;
 500
 501         for (i = 0;i < cl_numvisedicts;i++)
 502         {
 503                 if (cl_visedicts[i]->render.visframe != r_framecount)
 504                         continue;
 505                 if (cl_visedicts[i]->render.model->type != mod_brush)
 506                         continue;
 507                 currententity = cl_visedicts[i];
 508                 modelalpha = currententity->render.alpha;
 509
 510                 R_DrawBrushModel (currententity);
 511         }
 512 }
 513 */
 514
 515 void R_DrawModels (void)
 516 {
 517         int             i;
 518         frameblend_t blend[4];
 519 //      vec3_t  mins, maxs;
 520
 521         if (!r_drawentities.value)
 522                 return;
 523
 524         for (i = 0;i < cl_numvisedicts;i++)
 525         {
 526                 if (cl_visedicts[i]->render.visframe != r_framecount)
 527                         continue;
 528                 currententity = cl_visedicts[i];
 529                 if (currententity->render.model->type != mod_alias && currententity->render.model->type != mod_sprite)
 530                         continue;
 531
 532                 modelalpha = currententity->render.alpha;
 533
 534                 if (currententity->render.model->type == mod_alias)
 535                 {
 536                         // only lerp models here because sprites were already lerped for their clip polygon
 537                         R_LerpUpdate(currententity);
 538                         R_LerpAnimation(currententity->render.model, currententity->render.frame1, currententity->render.frame2, currententity->render.frame1start, currententity->render.frame2start, currententity->render.framelerp, blend);
 539                         R_DrawAliasModel (currententity, true, modelalpha, currententity->render.model, blend, currententity->render.skinnum, currententity->render.origin, currententity->render.angles, currententity->render.scale, currententity->render.effects, currententity->render.model->flags, currententity->render.colormap);
 540                 }
 541                 else //if (currententity->render.model->type == mod_sprite)
 542                 {
 543                         // build blend array
 544                         R_LerpAnimation(currententity->render.model, currententity->render.frame1, currententity->render.frame2, currententity->render.frame1start, currententity->render.frame2start, currententity->render.framelerp, blend);
 545                         R_DrawSpriteModel (currententity, blend);
 546                 }
 547
 548                 /*
 549                 VectorAdd(cl_visedicts[i]->render.origin, cl_visedicts[i]->render.model->mins, mins);
 550                 VectorAdd(cl_visedicts[i]->render.origin, cl_visedicts[i]->render.model->maxs, maxs);
 551
 552                 switch (cl_visedicts[i]->render.model->type)
 553                 {
 554                 case mod_alias:
 555                         R_Clip_AddBox(mins, maxs, R_DrawModelCallback, cl_visedicts[i], NULL);
 556                         break;
 557                 case mod_sprite:
 558                         R_Clip_AddBox(mins, maxs, R_DrawSpriteCallback, cl_visedicts[i], NULL);
 559                         break;
 560                 }
 561                 */
 562         }
 563 }
 564
 565 /*
 566 =============
 567 R_DrawViewModel
 568 =============
 569 */
 570 void R_DrawViewModel (void)
 571 {
 572         frameblend_t blend[4];
 573
 574         if (!r_drawviewmodel.value || chase_active.value || envmap || !r_drawentities.value || cl.items & IT_INVISIBILITY || cl.stats[STAT_HEALTH] <= 0 || !cl.viewent.render.model)
 575                 return;
 576
 577         currententity = &cl.viewent;
 578         currententity->render.alpha = modelalpha = cl_entities[cl.viewentity].render.alpha; // LordHavoc: if the player is transparent, so is the gun
 579         currententity->render.effects = cl_entities[cl.viewentity].render.effects;
 580         currententity->render.scale = 1;
 581         VectorCopy(cl_entities[cl.viewentity].render.colormod, currententity->render.colormod);
 582
 583         R_LerpUpdate(currententity);
 584         R_LerpAnimation(currententity->render.model, currententity->render.frame1, currententity->render.frame2, currententity->render.frame1start, currententity->render.frame2start, currententity->render.framelerp, blend);
 585
 586         // hack the depth range to prevent view model from poking into walls
 587         glDepthRange (gldepthmin, gldepthmin + 0.3*(gldepthmax-gldepthmin));
 588         R_DrawAliasModel (currententity, false, modelalpha, currententity->render.model, blend, currententity->render.skinnum, currententity->render.origin, currententity->render.angles, currententity->render.scale, currententity->render.effects, currententity->render.model->flags, currententity->render.colormap);
 589         glDepthRange (gldepthmin, gldepthmax);
 590 }
 591
 592 void R_DrawBrushModel (entity_t *e);
 593
 594 void RotatePointAroundVector( vec3_t dst, const vec3_t dir, const vec3_t point, float degrees );
 595
 596 void R_SetFrustum (void)
 597 {
 598         int             i;
 599
 600         // LordHavoc: note to all quake engine coders, this code was making the
 601         // view frustum taller than it should have been (it assumed the view is
 602         // square; it is not square), so I disabled it
 603         /*
 604         if (r_refdef.fov_x == 90)
 605         {
 606                 // front side is visible
 607
 608                 VectorAdd (vpn, vright, frustum[0].normal);
 609                 VectorSubtract (vpn, vright, frustum[1].normal);
 610
 611                 VectorAdd (vpn, vup, frustum[2].normal);
 612                 VectorSubtract (vpn, vup, frustum[3].normal);
 613         }
 614         else
 615         {
 616         */
 617                 // rotate VPN right by FOV_X/2 degrees
 618                 RotatePointAroundVector( frustum[0].normal, vup, vpn, -(90-r_refdef.fov_x / 2 ) );
 619                 // rotate VPN left by FOV_X/2 degrees
 620                 RotatePointAroundVector( frustum[1].normal, vup, vpn, 90-r_refdef.fov_x / 2 );
 621                 // rotate VPN up by FOV_X/2 degrees
 622                 RotatePointAroundVector( frustum[2].normal, vright, vpn, 90-r_refdef.fov_y / 2 );
 623                 // rotate VPN down by FOV_X/2 degrees
 624                 RotatePointAroundVector( frustum[3].normal, vright, vpn, -( 90 - r_refdef.fov_y / 2 ) );
 625         //}
 626
 627         for (i=0 ; i<4 ; i++)
 628         {
 629                 frustum[i].type = PLANE_ANYZ;
 630                 frustum[i].dist = DotProduct (r_origin, frustum[i].normal);
 631 //              frustum[i].signbits = SignbitsForPlane (&frustum[i]);
 632                 PlaneClassify(&frustum[i]);
 633         }
 634 }
 635
 636 void R_AnimateLight (void);
 637 void V_CalcBlend (void);
 638
 639 /*
 640 ===============
 641 R_SetupFrame
 642 ===============
 643 */
 644 void R_SetupFrame (void)
 645 {
 646 // don't allow cheats in multiplayer
 647         if (cl.maxclients > 1)
 648         {
 649                 Cvar_Set ("r_fullbright", "0");
 650                 Cvar_Set ("r_ambient", "0");
 651         }
 652
 653         r_framecount++;
 654
 655 // build the transformation matrix for the given view angles
 656         VectorCopy (r_refdef.vieworg, r_origin);
 657
 658         AngleVectors (r_refdef.viewangles, vpn, vright, vup);
 659
 660 // current viewleaf
 661         r_oldviewleaf = r_viewleaf;
 662         r_viewleaf = Mod_PointInLeaf (r_origin, cl.worldmodel);
 663
 664         V_SetContentsColor (r_viewleaf->contents);
 665         V_CalcBlend ();
 666
 667         r_cache_thrash = false;
 668
 669         c_brush_polys = 0;
 670         c_alias_polys = 0;
 671         c_light_polys = 0;
 672         c_faces = 0;
 673         c_nodes = 0;
 674         c_leafs = 0;
 675         c_models = 0;
 676         c_bmodels = 0;
 677         c_sprites = 0;
 678         c_particles = 0;
 679 //      c_dlights = 0;
 680
 681         R_AnimateLight ();
 682 }
 683
 684
 685 void MYgluPerspective( GLdouble fovy, GLdouble aspect, GLdouble zNear, GLdouble zFar )
 686 {
 687    GLdouble xmin, xmax, ymin, ymax;
 688
 689    ymax = zNear * tan( fovy * M_PI / 360.0 );
 690    ymin = -ymax;
 691
 692    xmin = ymin * aspect;
 693    xmax = ymax * aspect;
 694
 695    glFrustum( xmin, xmax, ymin, ymax, zNear, zFar );
 696 }
 697
 698
 699 /*
 700 =============
 701 R_SetupGL
 702 =============
 703 */
 704 void R_SetupGL (void)
 705 {
 706         float   screenaspect;
 707         int             x, x2, y2, y, w, h;
 708
 709         if (!r_render.value)
 710                 return;
 711         //
 712         // set up viewpoint
 713         //
 714         glMatrixMode(GL_PROJECTION);
 715     glLoadIdentity ();
 716         x = r_refdef.vrect.x * glwidth/vid.width;
 717         x2 = (r_refdef.vrect.x + r_refdef.vrect.width) * glwidth/vid.width;
 718         y = (vid.height-r_refdef.vrect.y) * glheight/vid.height;
 719         y2 = (vid.height - (r_refdef.vrect.y + r_refdef.vrect.height)) * glheight/vid.height;
 720
 721         // fudge around because of frac screen scale
 722         if (x > 0)
 723                 x--;
 724         if (x2 < glwidth)
 725                 x2++;
 726         if (y2 < 0)
 727                 y2--;
 728         if (y < glheight)
 729                 y++;
 730
 731         w = x2 - x;
 732         h = y - y2;
 733
 734         if (envmap)
 735         {
 736                 x = y2 = 0;
 737                 w = h = 256;
 738         }
 739
 740         glViewport (glx + x, gly + y2, w, h);
 741     screenaspect = (float)r_refdef.vrect.width/r_refdef.vrect.height;
 742 //      yfov = 2*atan((float)r_refdef.vrect.height/r_refdef.vrect.width)*180/M_PI;
 743         MYgluPerspective (r_refdef.fov_y,  screenaspect,  4,  r_farclip.value);
 744
 745         glCullFace(GL_FRONT);
 746
 747         glMatrixMode(GL_MODELVIEW);
 748     glLoadIdentity ();
 749
 750     glRotatef (-90,  1, 0, 0);      // put Z going up
 751     glRotatef (90,  0, 0, 1);       // put Z going up
 752     glRotatef (-r_refdef.viewangles[2],  1, 0, 0);
 753     glRotatef (-r_refdef.viewangles[0],  0, 1, 0);
 754     glRotatef (-r_refdef.viewangles[1],  0, 0, 1);
 755     glTranslatef (-r_refdef.vieworg[0],  -r_refdef.vieworg[1],  -r_refdef.vieworg[2]);
 756
 757         glGetFloatv (GL_MODELVIEW_MATRIX, r_world_matrix);
 758
 759         //
 760         // set drawing parms
 761         //
 762 //      if (gl_cull.value)
 763                 glEnable(GL_CULL_FACE);
 764 //      else
 765 //              glDisable(GL_CULL_FACE);
 766
 767         glEnable(GL_BLEND); // was Disable
 768         glDisable(GL_ALPHA_TEST);
 769         glAlphaFunc(GL_GREATER, 0.5);
 770         glEnable(GL_DEPTH_TEST);
 771         glDepthMask(1);
 772         glShadeModel(GL_SMOOTH);
 773 }
 774
 775 /*
 776 =============
 777 R_Clear
 778 =============
 779 */
 780 void R_Clear (void)
 781 {
 782         if (!r_render.value)
 783                 return;
 784 //      glClear (GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT); // LordHavoc: moved to SCR_UpdateScreen
 785         gldepthmin = 0;
 786         gldepthmax = 1;
 787         glDepthFunc (GL_LEQUAL);
 788
 789         glDepthRange (gldepthmin, gldepthmax);
 790 }
 791
 792 // LordHavoc: my trick to *FIX* GLQuake lighting once and for all :)
 793 void GL_Brighten(void)
 794 {
 795         if (!r_render.value)
 796                 return;
 797         glMatrixMode(GL_PROJECTION);
 798     glLoadIdentity ();
 799         glOrtho  (0, vid.width, vid.height, 0, -99999, 99999);
 800         glMatrixMode(GL_MODELVIEW);
 801     glLoadIdentity ();
 802         glDisable (GL_DEPTH_TEST);
 803         glDisable (GL_CULL_FACE);
 804         glDisable(GL_TEXTURE_2D);
 805         glEnable(GL_BLEND);
 806         glBlendFunc (GL_DST_COLOR, GL_ONE);
 807         glBegin (GL_TRIANGLES);
 808         glColor3f (1, 1, 1);
 809         glVertex2f (-5000, -5000);
 810         glVertex2f (10000, -5000);
 811         glVertex2f (-5000, 10000);
 812         glEnd ();
 813         glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
 814         glDisable(GL_BLEND);
 815         glEnable(GL_TEXTURE_2D);
 816         glEnable (GL_DEPTH_TEST);
 817         glEnable (GL_CULL_FACE);
 818 }
 819
 820 void GL_BlendView(void)
 821 {
 822         if (!r_render.value)
 823                 return;
 824
 825         if (v_blend[3] < 0.01f)
 826                 return;
 827
 828         glMatrixMode(GL_PROJECTION);
 829     glLoadIdentity ();
 830         glOrtho  (0, vid.width, vid.height, 0, -99999, 99999);
 831         glMatrixMode(GL_MODELVIEW);
 832     glLoadIdentity ();
 833         glDisable (GL_DEPTH_TEST);
 834         glDisable (GL_CULL_FACE);
 835         glDisable(GL_TEXTURE_2D);
 836         glEnable(GL_BLEND);
 837         glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
 838         glBegin (GL_TRIANGLES);
 839         if (lighthalf)
 840                 glColor4f (v_blend[0] * 0.5f, v_blend[1] * 0.5f, v_blend[2] * 0.5f, v_blend[3]);
 841         else
 842                 glColor4fv (v_blend);
 843         glVertex2f (-5000, -5000);
 844         glVertex2f (10000, -5000);
 845         glVertex2f (-5000, 10000);
 846         glEnd ();
 847
 848         glEnable (GL_CULL_FACE);
 849         glEnable (GL_DEPTH_TEST);
 850         glDisable(GL_BLEND);
 851         glEnable(GL_TEXTURE_2D);
 852 }
 853
 854 /*
 855 ================
 856 R_RenderView
 857
 858 r_refdef must be set before the first call
 859 ================
 860 */
 861 extern void R_Sky(void);
 862 extern void UploadLightmaps(void);
 863 extern void R_DrawSurfaces(void);
 864 extern void R_DrawPortals(void);
 865 char r_speeds2_string[1024];
 866 int speedstringcount;
 867
 868 void timestring(int t, char *desc)
 869 {
 870         char tempbuf[256];
 871         int length;
 872         if (t < 1000000)
 873                 sprintf(tempbuf, " %6ius %s", t, desc);
 874         else
 875                 sprintf(tempbuf, " %6ims %s", t / 1000, desc);
 876         length = strlen(tempbuf);
 877 //      while (length < 20)
 878 //              tempbuf[length++] = ' ';
 879 //      tempbuf[length] = 0;
 880         if (speedstringcount + length > 80)
 881         {
 882                 strcat(r_speeds2_string, "\n");
 883                 speedstringcount = 0;
 884         }
 885         // skip the space at the beginning if it's the first on the line
 886         if (speedstringcount == 0)
 887         {
 888                 strcat(r_speeds2_string, tempbuf + 1);
 889                 speedstringcount = length - 1;
 890         }
 891         else
 892         {
 893                 strcat(r_speeds2_string, tempbuf);
 894                 speedstringcount += length;
 895         }
 896 }
 897
 898 #define TIMEREPORT(NAME) \
 899         if (r_speeds2.value)\
 900         {\
 901                 temptime = currtime;\
 902                 currtime = Sys_DoubleTime();\
 903                 timestring((int) ((currtime - temptime) * 1000000.0), NAME);\
 904         }
 905
 906 void R_RenderView (void)
 907 {
 908         double starttime, currtime, temptime;
 909 //      if (r_norefresh.value)
 910 //              return;
 911
 912         if (!cl.worldmodel)
 913                 Host_Error ("R_RenderView: NULL worldmodel");
 914
 915         if (r_speeds2.value)
 916         {
 917                 starttime = currtime = Sys_DoubleTime();
 918
 919                 speedstringcount = 0;
 920                 sprintf(r_speeds2_string, "org:'%c%6.2f %c%6.2f %c%6.2f' ang:'%c%3.0f %c%3.0f %c%3.0f' dir:'%c%2.3f %c%2.3f %c%2.3f'\n%6i walls %6i dlitwalls %7i modeltris %7i transpoly\nBSP: %6i faces %6i nodes %6i leafs\n%4i models %4i bmodels %4i sprites %5i particles %3i dlights\n",
 921                         r_origin[0] < 0 ? '-' : ' ', fabs(r_origin[0]), r_origin[1] < 0 ? '-' : ' ', fabs(r_origin[1]), r_origin[2] < 0 ? '-' : ' ', fabs(r_origin[2]), r_refdef.viewangles[0] < 0 ? '-' : ' ', fabs(r_refdef.viewangles[0]), r_refdef.viewangles[1] < 0 ? '-' : ' ', fabs(r_refdef.viewangles[1]), r_refdef.viewangles[2] < 0 ? '-' : ' ', fabs(r_refdef.viewangles[2]), vpn[0] < 0 ? '-' : ' ', fabs(vpn[0]), vpn[1] < 0 ? '-' : ' ', fabs(vpn[1]), vpn[2] < 0 ? '-' : ' ', fabs(vpn[2]),
 922                         c_brush_polys, c_light_polys, c_alias_polys, currenttranspoly,
 923                         c_faces, c_nodes, c_leafs,
 924                         c_models, c_bmodels, c_sprites, c_particles, c_dlights);
 925         }
 926         else
 927                 starttime = currtime = 0;
 928
 929         R_MoveParticles ();
 930         R_MoveExplosions();
 931
 932         lighthalf = gl_lightmode.value;
 933
 934         FOG_framebegin();
 935
 936         R_Clear();
 937         TIMEREPORT("clear     ")
 938
 939         // render normal view
 940
 941         R_SetupFrame ();
 942         R_SetFrustum ();
 943         R_SetupGL ();
 944         R_Clip_StartFrame();
 945
 946         R_PrepareEntities();
 947
 948         skypolyclear();
 949         wallpolyclear();
 950         transpolyclear();
 951
 952         TIMEREPORT("setup     ")
 953
 954         R_DrawWorld ();
 955         TIMEREPORT("world     ")
 956
 957         R_AddModelEntities();
 958         TIMEREPORT("addmodels")
 959
 960         R_Clip_EndFrame();
 961         TIMEREPORT("scanedge  ")
 962
 963         // now mark the lit surfaces
 964         R_PushDlights ();
 965         // yes this does add the world surfaces after the brush models
 966         R_DrawSurfaces ();
 967         R_DrawPortals ();
 968         TIMEREPORT("surfaces  ");
 969
 970         UploadLightmaps();
 971         TIMEREPORT("uploadlmap")
 972
 973         // fogged sky polys, affects depth
 974         skypolyrender();
 975
 976         // does not affect depth, draws over the sky polys
 977         if (currentskypoly)
 978                 R_Sky();
 979         TIMEREPORT("skypoly   ")
 980
 981         wallpolyrender();
 982         TIMEREPORT("wallpoly  ")
 983
 984         GL_DrawDecals();
 985         TIMEREPORT("ddecal    ")
 986
 987         // don't let sound skip if going slow
 988         if (!intimerefresh && !r_speeds2.value)
 989                 S_ExtraUpdate ();
 990
 991         R_DrawViewModel ();
 992         R_DrawModels ();
 993         TIMEREPORT("models    ")
 994
 995         R_DrawParticles ();
 996         TIMEREPORT("dparticles")
 997         R_DrawExplosions();
 998         TIMEREPORT("dexplosion")
 999
1000         transpolyrender();
1001         TIMEREPORT("transpoly ")
1002
1003         FOG_frameend();
1004
1005         GL_BlendView();
1006         TIMEREPORT("blend     ")
1007
1008         if (r_speeds2.value)
1009                 timestring((int) ((Sys_DoubleTime() - starttime) * 1000000.0), "total    ");
1010 }