tenebrae2/gl_rmain.c
2003-08-18 10:12:50 +00:00

2833 lines
71 KiB
C

/*
Copyright (C) 1996-1997 Id Software, Inc.
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/
// r_main.c
#include "quakedef.h"
entity_t r_worldentity;
qboolean r_cache_thrash; // compatability
vec3_t modelorg, r_entorigin;
entity_t *currententity;
int r_visframecount; // bumped when going to a new PVS
int r_framecount; // used for dlight push checking
int r_lightTimestamp; // PENTA: incresed when next light is started
mplane_t frustum[4];
int c_brush_polys, c_alias_polys;
qboolean envmap; // true during envmap command capture
int currenttexture = -1; // to avoid unnecessary texture sets
int cnttextures[16] = {-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1 }; // cached
int particletexture; // little dot for particles
int particletexture_smoke;
int particletexture_glow;
int particletexture_glow2;
int particletexture_tele;
int particletexture_blood;
int particletexture_dirblood;
int playertextures; // up to 16 color translated skins
int mirrortexturenum; // quake texturenum, not gltexturenum
qboolean mirror;
qboolean glare;
mplane_t *mirror_plane;
mplane_t mirror_far_plane; //far plane of the view frustum for mirrors
int mirror_clipside;
msurface_t *causticschain;
int caustics_textures[8];
qboolean busy_caustics = false;
//
// view origin
//
vec3_t vup;
vec3_t vpn;
vec3_t vright;
vec3_t r_origin;
float r_projection_matrix[16];
float r_world_matrix[16];
float r_base_world_matrix[16];
double r_Dproject_matrix[16];//PENTA
double r_Dworld_matrix[16];//PENTA
int r_Iviewport[4];//PENTA
int numClearsSaved;//PENTA
float color_black[4] = {0.0, 0.0, 0.0, 0.0};
//
// screen size info
//
refdef_t r_refdef;
mleaf_t *r_viewleaf, *r_oldviewleaf;
int d_lghtstylevalue[256]; // 8.8 fraction of base light value
void R_MarkLeaves (void);
void R_Clear (void);
cvar_t r_norefresh = {"r_norefresh","0"};
cvar_t cg_showentities = {"cg_showentities","1"};
cvar_t cg_showviewmodel = {"cg_showviewmodel","1"};
cvar_t r_fullbright = {"r_fullbright","0"};
cvar_t r_lightmap = {"r_lightmap","0"};
//cvar_t r_mirroralpha = {"r_mirroralpha","1"};
cvar_t r_wateralpha = {"r_wateralpha","0.5"};//PENTA: different default
cvar_t r_novis = {"r_novis","0"};
cvar_t gl_finish = {"gl_finish","0"};
cvar_t gl_clear = {"gl_clear","0"};
//cvar_t gl_texsort = {"gl_texsort","1"};
cvar_t gl_polyblend = {"gl_polyblend","1"};
cvar_t gl_calcdepth = {"gl_calcdepth","0"};
cvar_t sh_lightmapbright = {"sh_lightmapbright","1.0"};//PENTA: brightness of lightmaps
cvar_t sh_visiblevolumes = {"sh_visiblevolumes","0"};//PENTA: draw shadow volumes on/off
cvar_t sh_entityshadows = {"sh_entityshadows","1"};//PENTA: entities cast shadows on/off
cvar_t sh_meshshadows = {"sh_meshshadows","1"};//PENTA: entities cast shadows on/off
cvar_t sh_worldshadows = {"sh_worldshadows","1"};//PENTA: brushes cast shadows on/off
cvar_t sh_showlightsciss = {"sh_showlightsciss","0"};//PENTA: draw numer of lights used this frame
cvar_t sh_showlightvolume = {"sh_showlightvolume","0"};//PENTA: draw numer of lights used this frame
cvar_t sh_occlusiontest = {"sh_occlusiontest","0"};//PENTA: draw numer of lights used this frame
cvar_t sh_glows = {"sh_glows","1"};//PENTA: draw glows around some light sources
cvar_t cg_showfps = {"cg_showfps","0", true}; // set for running times - muff
cvar_t sh_debuginfo = {"sh_debuginfo","0"};
cvar_t sh_norevis = {"sh_norevis","0"};//PENTA: no recalculating the vis for light positions
cvar_t sh_nosvbsp = {"sh_nosvbsp","0"};//PENTA: no shadow bsp
cvar_t sh_noeclip = {"sh_noeclip","0"};//PENTA: no entity/leaf clipping for shadows
cvar_t sh_infinitevolumes = {"sh_infinitevolumes","0", true};//PENTA: Nvidia infinite volumes
cvar_t sh_noscissor = {"sh_noscissor","0"};//PENTA: no scissoring
cvar_t sh_nocleversave = {"sh_nocleversave","0"};//PENTA: don't change light drawing order to reduce stencil clears
cvar_t sh_bumpmaps = {"sh_bumpmaps","1"};//PENTA: enable disable bump mapping
cvar_t sh_playershadow = {"sh_playershadow","1"};//PENTA: the player casts a shadow (the one YOU are playing with, others always cast shadows)
cvar_t sh_nocache = {"sh_nocache","0"};
cvar_t sh_glares = {"sh_glares","0",true};
cvar_t sh_noefrags = {"sh_noefrags","0",true};
cvar_t sh_showtangent = {"sh_showtangent","0"};
cvar_t sh_noshadowpopping = {"sh_noshadowpopping","1"};
cvar_t mir_detail = {"mir_detail","1",true};
cvar_t mir_frameskip = {"mir_frameskip","1",true};
cvar_t mir_forcewater = {"mir_forcewater","0"};
cvar_t mir_distance = {"mir_distance","400",true};
cvar_t gl_wireframe = {"gl_wireframe","0"};
cvar_t gl_caustics = {"gl_caustics","1"};
cvar_t gl_truform = {"gl_truform","0"};
cvar_t gl_truform_tesselation = {"gl_truform_tesselation","4"};
cvar_t gl_mesherror = {"gl_mesherror","3"};//PENTA: subdivision of meshes
cvar_t fog_r = {"fog_r","0.2"};
cvar_t fog_g = {"fog_g","0.1"};
cvar_t fog_b = {"fog_b","0.0"};
cvar_t fog_start = {"fog_start","256"};
cvar_t fog_end = {"fog_end","700"};
cvar_t gl_fog = {"gl_fog","1"};
cvar_t fog_waterfog = {"fog_waterfog","1"};
float fog_color[4];
cvar_t r_tangentscale = {"r_tangentscale","1"};
cvar_t sh_delux = {"sh_delux","1"};
cvar_t sh_rtlights = {"sh_rtlights","1"};
mirrorplane_t mirrorplanes[NUM_MIRROR_PLANES];
int mirror_contents;
#ifndef GL_ATI_pn_triangles
#define GL_PN_TRIANGLES_ATI 0x87F0
#define GL_MAX_PN_TRIANGLES_TESSELATION_LEVEL_ATI 0x87F1
#define GL_PN_TRIANGLES_POINT_MODE_ATI 0x87F2
#define GL_PN_TRIANGLES_NORMAL_MODE_ATI 0x87F3
#define GL_PN_TRIANGLES_TESSELATION_LEVEL_ATI 0x87F4
#define GL_PN_TRIANGLES_POINT_MODE_LINEAR_ATI 0x87F5
#define GL_PN_TRIANGLES_POINT_MODE_CUBIC_ATI 0x87F6
#define GL_PN_TRIANGLES_NORMAL_MODE_LINEAR_ATI 0x87F7
#define GL_PN_TRIANGLES_NORMAL_MODE_QUADRATIC_ATI 0x87F8
typedef void (APIENTRY *PFNGLPNTRIANGLESIATIPROC)(GLenum pname, GLint param);
typedef void (APIENTRY *PFNGLPNTRIANGLESFATIPROC)(GLenum pname, GLfloat param);
#endif
// actually in gl_bumpradeon (duh...)
extern PFNGLPNTRIANGLESIATIPROC qglPNTrianglesiATI;
extern PFNGLPNTRIANGLESFATIPROC qglPNTrianglesfATI;
#define GL_INCR_WRAP_EXT 0x8507
#define GL_DECR_WRAP_EXT 0x8508
#define MIN_PLAYER_MIRROR 48 //max size of player bounding box
//extern cvar_t gl_ztrick; PENTA: Removed
/*
=================
R_CullBox
Returns true if the box is completely outside the frustom
=================
*/
qboolean R_CullBox (vec3_t mins, vec3_t maxs)
{
int i;
for (i=0 ; i<4 ; i++)
if (BoxOnPlaneSide (mins, maxs, &frustum[i]) == 2)
return true;
return false;
}
void R_RotateForEntity (entity_t *e)
{
glTranslatef (e->origin[0], e->origin[1], e->origin[2]);
glRotatef (e->angles[1], 0, 0, 1);
glRotatef (-e->angles[0], 0, 1, 0);
glRotatef (e->angles[2], 1, 0, 0);
}
int CL_PointContents (vec3_t p)
{
int cont;
cont = CM_PointContents(cl.worldmodel,p,0);
//cont = SV_HullPointContents (&cl.worldmodel->hulls[0], 0, p);
/*
if (cont <= CONTENTS_CURRENT_0 && cont >= CONTENTS_CURRENT_DOWN)
cont = CONTENTS_WATER;
*/
return cont;
}
/*
=============================================================
SPRITE MODELS
=============================================================
*/
/*
================
R_GetSpriteFrame
================
*/
mspriteframe_t *R_GetSpriteFrame (entity_t *currententity)
{
msprite_t *psprite;
int frame;
psprite = currententity->model->cache.data;
frame = currententity->frame;
if ((frame >= psprite->numframes) || (frame < 0))
{
Con_Printf ("R_DrawSprite: no such frame %d\n", frame);
frame = 0;
}
return &psprite->frames[frame];
}
/*
=================
R_DrawSpriteModel
We allow any shader on a sprite now
=================
*/
void R_DrawSpriteModel (entity_t *e)
{
msprite_t *psprite;
mspriteframe_t *frame;
float *up, *right;
float *point, *tex;
float verts[4*3];
float texco[4*2];
int indecies[6] = {0,1,2,2,3,0};
vertexdef_t def;
frame = R_GetSpriteFrame (e);
psprite = currententity->model->cache.data;
up = vup;
right = vright;
point = verts;
tex = texco;
//Point 1
VectorMA (e->origin, frame->down, up, point);
VectorMA (point, frame->left, right, point);
tex[0] = 0;
tex[1] = 1;
point += 3;
tex += 2;
//Point 2
VectorMA (e->origin, frame->up, up, point);
VectorMA (point, frame->left, right, point);
tex[0] = 0;
tex[1] = 0;
point += 3;
tex += 2;
//Point 3
VectorMA (e->origin, frame->up, up, point);
VectorMA (point, frame->right, right, point);
tex[0] = 1;
tex[1] = 0;
point += 3;
tex += 2;
//Point 4
VectorMA (e->origin, frame->down, up, point);
VectorMA (point, frame->right, right, point);
tex[0] = 1;
tex[1] = 1;
point += 3;
tex += 2;
Q_memset(&def,0,sizeof(vertexdef_t));
def.vertices = verts;
def.texcoords = texco;
def.tangents = NULL;
def.binormals = NULL;
def.normals = NULL;
def.lightmapcoords = NULL;
def.colors = NULL;
if (frame->shader->flags & SURF_NODRAW) return;
gl_bumpdriver.drawTriangleListBase(&def, indecies, 6, frame->shader, -1);
}
/*
=============================================================
ALIAS MODELS
=============================================================
*/
float r_avertexnormals[NUMVERTEXNORMALS][3] = {
#include "anorms.h"
};
vec3_t shadevector;
float shadelight, ambientlight;
// precalculated dot products for quantized angles
#define SHADEDOT_QUANT 16
float r_avertexnormal_dots[SHADEDOT_QUANT][256] =
#include "anorm_dots.h"
;
float *shadedots = r_avertexnormal_dots[0];
int lastposenum;
void GL_DrawPentaAliasFrame (aliashdr_t *paliashdr, int posenum);
/*
=============
GL_DrawAliasFrame
=============
*/
void GL_DrawAliasFrame (aliashdr_t *paliashdr, int posenum)
{
//Crappy
}
ftrivertx_t *apverts;
void GL_DrawPentaAliasFrame (aliashdr_t *paliashdr, int posenum) {
mtriangle_t *ptri;
ftrivertx_t *verts;
plane_t *planes;
int i,j;
return;
//verts = apverts;
verts = (ftrivertx_t *)((byte *)paliashdr + paliashdr->posedata);
verts += posenum * paliashdr->poseverts;
ptri = (mtriangle_t *)((byte *)paliashdr + paliashdr->triangles);
planes = (plane_t *)((byte *)paliashdr + paliashdr->planes);
planes += posenum * paliashdr->numtris;
for (i=0 ; i<paliashdr->numtris ; i++, ptri++, planes++)
{
glBegin(GL_TRIANGLES);
//Con_Printf("%i %i %i\n", (int)ptri->vertindex[0], (int)ptri->vertindex[1], (int)ptri->vertindex[2]);
glTexCoord2f(0.5, 0.5);
for (j=0; j<3; j++) {
glVertex3f(verts[ptri->vertindex[j]].v[0],
verts[ptri->vertindex[j]].v[1],
verts[ptri->vertindex[j]].v[2]);
//Con_Printf("%i \n",ptri->vertindex[j]);
}
glEnd();
}
}
extern vec3_t lightspot;
/*
int extrudeTimeStamp;
vec3_t extrudedVerts[MAXALIASVERTS]; //PENTA: Temp buffer for extruded vertices
int extrudedTimestamp[MAXALIASVERTS]; //PENTA: Temp buffer for extruded vertices
qboolean triangleVis[MAXALIASTRIS*4]; //PENTA: Temp buffer for light facingness of triangles
void R_CalcAliasFrameShadowVolume (aliashdr_t *paliashdr,int posenum) {
plane_t *planes;
ftrivertx_t *verts;
mtriangle_t *tris, *triangle;
float d, scale;
int i, j;
vec3_t v2, *v1;
planes = (plane_t *)((byte *)paliashdr + paliashdr->planes);
planes += posenum * paliashdr->numtris;
verts = (ftrivertx_t *)((byte *)paliashdr + paliashdr->posedata);
verts += posenum * paliashdr->poseverts;
tris = (mtriangle_t *)((byte *)paliashdr + paliashdr->triangles);
extrudeTimeStamp++;
//calculate visibility
for (i=0; i<paliashdr->numtris; i++) {
d = DotProduct(planes[i].normal, currentshadowlight->origin) - planes[i].dist;
if (d > 0)
triangleVis[i] = true;
else
triangleVis[i] = false;
}
//extude vertices
triangle = tris;
for (i=0; i<paliashdr->numtris; i++, triangle++) {
if (triangleVis[i]) {//backfacing extrude it!
for (j=0; j<3; j++) {
int index = triangle->vertindex[j];
if (extrudedTimestamp[index] == extrudeTimeStamp) continue;
extrudedTimestamp[index] = extrudeTimeStamp;
v1 = &extrudedVerts[index];
//for (k=0; k<3; k++)
// v2[k] = (verts[index].v[k] * paliashdr->scale[k]) + paliashdr->scale_origin[k];
VectorCopy(verts[index].v,v2);
VectorSubtract (v2, currentshadowlight->origin, (*v1));
scale = Length ((*v1));
if (sh_visiblevolumes.value) {
//make them short so that we see them
VectorScale ((*v1), (1/scale)* 70, (*v1));
} else {
//we don't have to be afraid they will clip with the far plane
//since we use the infinite matrix trick
VectorScale ((*v1), (1/scale)* currentshadowlight->radius*10, (*v1));
}
VectorAdd ((*v1), v2 ,(*v1));
}
}
}
}
*/
void R_DrawAliasFrameShadowVolume2 (aliashdr_t *paliashdr,aliasframeinstant_t *instant) {
mtriangle_t *tris, *triangle;
int i, j;
aliaslightinstant_t *linstant = instant->lightinstant;
tris = (mtriangle_t *)((byte *)paliashdr + paliashdr->triangles);
//FIXME: what's faster? less begin/ends or iterating the list multiple times?
//extude vertices
triangle = tris;
for (i=0; i<paliashdr->numtris; i++, triangle++) {
if (linstant->triangleVis[i]) {
for (j=0; j<3; j++) {
qboolean shadow = false;
if (triangle->neighbours[j] == -1) {
shadow = true;
} else if (!linstant->triangleVis[triangle->neighbours[j]]) {
shadow = true;
}
if (shadow) {
int index = triangle->vertindex[j];
glBegin(GL_QUAD_STRIP);
/*
glVertex3f(verts[index].v[0] * paliashdr->scale[0] + paliashdr->scale_origin[0],
verts[index].v[1] * paliashdr->scale[1] + paliashdr->scale_origin[1],
verts[index].v[2] * paliashdr->scale[2] + paliashdr->scale_origin[2]
);
*/
glVertex3fv(&instant->vertices[index][0]);
glVertex3fv(&linstant->extvertices[index][0]);
index = triangle->vertindex[(j+1)%3];
/*glVertex3f(verts[index].v[0] * paliashdr->scale[0] + paliashdr->scale_origin[0],
verts[index].v[1] * paliashdr->scale[1] + paliashdr->scale_origin[1],
verts[index].v[2] * paliashdr->scale[2] + paliashdr->scale_origin[2]
);
*/
glVertex3fv(&instant->vertices[index][0]);
glVertex3fv(&linstant->extvertices[index][0]);
glEnd();
}
}
glBegin(GL_TRIANGLES);
for (j=0; j<3; j++) {
int index = triangle->vertindex[j];
/*
glVertex3f(verts[index].v[0] * paliashdr->scale[0] + paliashdr->scale_origin[0],
verts[index].v[1] * paliashdr->scale[1] + paliashdr->scale_origin[1],
verts[index].v[2] * paliashdr->scale[2] + paliashdr->scale_origin[2]
);
*/
glVertex3fv(&instant->vertices[index][0]);
}
glEnd();
glBegin(GL_TRIANGLES);
for (j=2; j>=0; j--) {
glVertex3fv(&linstant->extvertices[triangle->vertindex[j]][0]);
}
glEnd();
}
/*
glBegin(GL_LINES);
for (j=0; j<3; j++) {
v2[j] = verts[ triangle->vertindex[0]].v[j] * paliashdr->scale[j] + paliashdr->scale_origin[j];
}
glVertex3fv(&v2[0]);
VectorMA(v2, 5, planes[i].normal, v2);
glVertex3fv(&v2[0]);
glEnd();
*/
}
}
/*
=============
R_DrawAliasFrameShadowVolume
=============
*/
extern vec3_t lightspot;
/*
void R_DrawAliasFrameShadowVolume (aliashdr_t *paliashdr, int posenum)
{
float s, t, l;
int i, j;
int index;
ftrivertx_t *v, *verts;
int list;
int *order;
vec3_t point,dir;
vec3_t *normal;
int count;
vec3_t fnormal;
verts = (ftrivertx_t *)((byte *)paliashdr + paliashdr->posedata);
verts += posenum * paliashdr->poseverts;
order = (int *)((byte *)paliashdr + paliashdr->commands);
while (1)
{
// get the vertex count and primitive type
count = *order++;
if (!count)
break; // done
if (count < 0)
{
count = -count;
glBegin (GL_TRIANGLE_FAN);
}
else
glBegin (GL_TRIANGLE_STRIP);
do
{
// texture coordinates come from the draw list
// (skipped for shadow volumes) glTexCoord2fv ((float *)order);
order += 2;
// normals and vertexes come from the frame list
//point[0] = verts->v[0] * paliashdr->scale[0] + paliashdr->scale_origin[0];
//point[1] = verts->v[1] * paliashdr->scale[1] + paliashdr->scale_origin[1];
//point[2] = verts->v[2] * paliashdr->scale[2] + paliashdr->scale_origin[2];
normal = &r_avertexnormals[verts->lightnormalindex];
//VectorSubtract(point,currentshadowlight->origin,dir);
VectorSubtract(verts->v,currentshadowlight->origin,dir);
VectorNormalize(dir);
if (DotProduct(dir,(*normal)) <= 0) {
//etrude to "infinity"
if (sh_visiblevolumes.value) {
VectorScale(dir,50,dir);
} else {
VectorScale(dir,currentshadowlight->radius*10,dir);
}
//VectorAdd(point,dir,point);
VectorAdd(verts->v,dir,point);
} else
VectorCopy(verts->v,point);
glVertex3fv (point);
verts++;
} while (--count);
glEnd ();
}
}
*/
/*
=================
R_DrawAliasShadowVolume
=================
*/
void R_DrawAliasSurfaceShadowVolume (aliashdr_t *paliashdr, aliasframeinstant_t *aliasframeinstant)
{
if (paliashdr->shader->flags & SURF_NOSHADOW)
return;
#if 1
//
//Pass 1 increase
//
glCullFace(GL_BACK);
glStencilOp(GL_KEEP, GL_INCR, GL_KEEP);
glCullFace(GL_FRONT);
R_DrawAliasFrameShadowVolume2 (paliashdr, aliasframeinstant);
//
// Second Pass. Decrease Stencil Value In The Shadow
//
glCullFace(GL_FRONT);
glStencilOp(GL_KEEP, GL_DECR, GL_KEEP);
glCullFace(GL_BACK);
R_DrawAliasFrameShadowVolume2 (paliashdr, aliasframeinstant);
#else
glDisable(GL_CULL_FACE);
glCullFace(GL_FRONT_AND_BACK);
checkerror();
glStencilOp(GL_KEEP, GL_INCR_WRAP_EXT, GL_KEEP);
checkerror();
qglStencilFuncSeparateATI(GL_ALWAYS, GL_ALWAYS, 0, ~0);
checkerror();
qglStencilOpSeparateATI(GL_FRONT, GL_KEEP, GL_DECR_WRAP_EXT, GL_KEEP);
checkerror();
qglStencilOpSeparateATI(GL_BACK, GL_KEEP, GL_INCR_WRAP_EXT, GL_KEEP);
checkerror();
R_DrawAliasFrameShadowVolume2 (paliashdr, aliasframeinstant);
glEnable(GL_CULL_FACE);
glCullFace(GL_BACK);
#endif
}
void R_DrawAliasShadowVolume (entity_t *e)
{
model_t *clmodel;
aliashdr_t *paliashdr;
alias3data_t *data;
aliasframeinstant_t *aliasframeinstant;
int i,maxnumsurf;
//vec3_t oldlightpos;
currententity = e;
clmodel = currententity->model;
/* no shadows casting for these */
if (clmodel->flags && EF_NOSHADOW)
return;
//
// locate the proper data
//
if (!e->aliasframeinstant) {
Con_Printf("no instant for ent %s\n", clmodel->name);
return;
}
/*
Don't cull to frustum models behind you may still cast shadows
if (R_CullBox (mins, maxs))
return;
*/
VectorCopy (currententity->origin, r_entorigin);
VectorSubtract (r_origin, r_entorigin, modelorg);
//
// locate the proper data
//
// data = (alias3data_t *)Mod_Extradata (e->model);
aliasframeinstant = e->aliasframeinstant;
data = (alias3data_t *)Mod_Extradata (e->model);
maxnumsurf = data->numSurfaces;
glPushMatrix ();
R_RotateForEntity (e);
for (i=0;i<maxnumsurf;++i)
{
paliashdr = (aliashdr_t *)((char*)data + data->ofsSurfaces[i]);
if (!aliasframeinstant) {
glPopMatrix ();
Con_Printf("R_DrawAliasShadowVolume: missing instant for ent %s\n", e->model->name);
return;
}
/* doesn't fit with new structs
if (paliashdr != ((aliasframeinstant_t *)e->model->aliasframeinstant)->paliashdr) {
//Sys_Error("Cache trashed");
r_cache_thrash = true;
((aliasframeinstant_t *)e->model->aliasframeinstant)->paliashdr = paliashdr;
}
*/
if ((e->frame >= paliashdr->numframes) || (e->frame < 0))
{
glPopMatrix ();
return;
}
//
// draw all the triangles
//
R_DrawAliasSurfaceShadowVolume(paliashdr,aliasframeinstant);
aliasframeinstant = aliasframeinstant->_next;
//VectorCopy(oldlightpos,currentshadowlight->origin);
} /* for paliashdr */
glPopMatrix();
}
/*
=================
R_SetupAliasFrame
=================
*/
void R_SetupAliasFrame (aliashdr_t *paliashdr, aliasframeinstant_t *instant)
{
float* texcoos;
int* indecies;
/*
if ((frame >= paliashdr->numframes) || (frame < 0))
{
Con_DPrintf ("R_AliasSetupFrame: no such frame %d\n", frame);
frame = 0;
}
pose = paliashdr->frames[frame].firstpose;
numposes = paliashdr->frames[frame].numposes;
apverts = (ftrivertx_t *)((byte *)paliashdr + paliashdr->frames[frame].frame);
if (numposes > 1)
{
interval = paliashdr->frames[frame].interval;
pose += (int)(cl.time / interval) % numposes;
}
*/
texcoos = (float *)((byte *)paliashdr + paliashdr->texcoords);
indecies = (int *)((byte *)paliashdr + paliashdr->indecies);
//GL_DrawAliasFrame (paliashdr, pose);
glVertexPointer(3, GL_FLOAT, 0, instant->vertices);
glEnableClientState(GL_VERTEX_ARRAY);
glNormalPointer(GL_FLOAT, 0, instant->normals);
glEnableClientState(GL_NORMAL_ARRAY);
glTexCoordPointer(2, GL_FLOAT, 0, texcoos);
glEnableClientState(GL_TEXTURE_COORD_ARRAY);
glDrawElements(GL_TRIANGLES,paliashdr->numtris*3,GL_UNSIGNED_INT,indecies);
glDisableClientState(GL_VERTEX_ARRAY);
glDisableClientState(GL_NORMAL_ARRAY);
glDisableClientState(GL_TEXTURE_COORD_ARRAY);
}
/*
Draws the tangent space of the model
*/
void R_DrawAliasTangent (aliashdr_t *paliashdr, aliasframeinstant_t *instant)
{
float* texcoos;
int* indecies;
vec3_t extr;
int i;
texcoos = (float *)((byte *)paliashdr + paliashdr->texcoords);
indecies = (int *)((byte *)paliashdr + paliashdr->indecies);
//GL_DrawAliasFrame (paliashdr, pose);
for (i=0; i<paliashdr->poseverts; i++) {
glColor3ub(255,0,0);
glBegin(GL_LINES);
glVertex3fv(&instant->vertices[i][0]);
VectorMA(instant->vertices[i],1,instant->normals[i],extr);
glVertex3fv(&extr[0]);
glEnd();
glColor3ub(0,255,0);
glBegin(GL_LINES);
glVertex3fv(&instant->vertices[i][0]);
VectorMA(instant->vertices[i],1,instant->tangents[i],extr);
glVertex3fv(&extr[0]);
glEnd();
glColor3ub(0,0,255);
glBegin(GL_LINES);
glVertex3fv(&instant->vertices[i][0]);
VectorMA(instant->vertices[i],1,instant->binomials[i],extr);
glVertex3fv(&extr[0]);
glEnd();
}
}
/*
=================
R_DrawAliasSurface
DC : draw one surface from a model
=================
*/
void R_DrawAliasSurface (aliashdr_t *paliashdr, float bright, aliasframeinstant_t *instant)
{
int i;
int anim;
//
// draw all the triangles
//
if (!busy_caustics) {
anim = (int)(cl.time*10) & 3;
if (paliashdr->shader->numcolorstages > 0)
GL_BindAdvanced(paliashdr->shader->colorstages[0].texture[0]);
}
//XYZ
if (gl_wireframe.value) {
glDisable(GL_TEXTURE_2D);
}
/*
if ( gl_truform.value )
{
glEnable(GL_PN_TRIANGLES_ATI);
qglPNTrianglesiATI(GL_PN_TRIANGLES_POINT_MODE_ATI, GL_PN_TRIANGLES_POINT_MODE_CUBIC_ATI);
qglPNTrianglesiATI(GL_PN_TRIANGLES_NORMAL_MODE_ATI, GL_PN_TRIANGLES_NORMAL_MODE_QUADRATIC_ATI);
qglPNTrianglesiATI(GL_PN_TRIANGLES_TESSELATION_LEVEL_ATI, gl_truform_tesselation.value);
}
*/
glColor3f(bright, bright, bright);
//if (busy_caustics)
// glColor3f(1,1,1);
R_SetupAliasFrame (paliashdr, instant);
// Draw luma if present
if ( !busy_caustics )
{
anim = (int)(cl.time*10) & 3;
/*
if ( paliashdr->gl_lumatex[currententity->skinnum][anim] != 0)
{
glFogfv(GL_FOG_COLOR, color_black);
glEnable(GL_BLEND);
glBlendFunc(GL_ONE, GL_ONE);
GL_SelectTexture(GL_TEXTURE1_ARB);
glDisable(GL_TEXTURE_2D);
GL_SelectTexture(GL_TEXTURE0_ARB);
glColor3f(1, 1, 1);
GL_Bind( paliashdr->gl_lumatex[currententity->skinnum][anim] );
R_SetupAliasFrame (paliashdr, instant);
glColor3f(sh_lightmapbright.value,sh_lightmapbright.value,sh_lightmapbright.value);
GL_SelectTexture(GL_TEXTURE1_ARB);
glEnable(GL_TEXTURE_2D);
GL_SelectTexture(GL_TEXTURE0_ARB);
GL_SelectTexture(GL_TEXTURE1_ARB);
glDisable(GL_BLEND);
glFogfv(GL_FOG_COLOR, fog_color);
}
*/
}
if ((sh_showtangent.value) && (!busy_caustics)) {
glDisable(GL_TEXTURE_2D);
R_DrawAliasTangent(paliashdr, instant);
glEnable(GL_TEXTURE_2D);
}
c_alias_polys += paliashdr->numtris;
if ( gl_truform.value )
{
glDisable(GL_PN_TRIANGLES_ATI);
}
}
/*
=================
R_DrawAliasModel
=================
*/
/*
void R_PrepareEntityForDraw (float bright)
{
float an;
model_t *clmodel;
clmodel = currententity->model;
VectorAdd (currententity->origin, clmodel->mins, mins);
VectorAdd (currententity->origin, clmodel->maxs, maxs);
if (R_CullBox (mins, maxs))
return;
VectorCopy (currententity->origin, r_entorigin);
VectorSubtract (r_origin, r_entorigin, modelorg);
shadelight = bright;
an = currententity->angles[1]/180*M_PI;
shadevector[0] = cos(-an);
shadevector[1] = sin(-an);
shadevector[2] = 1;
VectorNormalize (shadevector);
}
*/
void R_DrawAliasModel (float bright)
{
int i,maxnumsurf;
aliashdr_t *paliashdr;
aliasframeinstant_t *aliasframeinstant;
alias3data_t *data;
vec3_t mins,maxs;
//R_PrepareEntityForDraw (bright);
GL_DisableMultitexture();
glPushMatrix ();
R_RotateForEntity (currententity);
data = (alias3data_t *)Mod_Extradata (currententity->model);
maxnumsurf = data->numSurfaces;
aliasframeinstant = currententity->aliasframeinstant;
glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
for (i=0;i<maxnumsurf;++i){
paliashdr = (aliashdr_t *)((char*)data + data->ofsSurfaces[i]);
if (!aliasframeinstant) {
glPopMatrix();
Con_Printf("R_DrawAliasModel: missing instant for ent %s\n", currententity->model->name);
return;
}
/* disabled for now because it doesn't work with viewent
VectorAdd (currententity->origin,paliashdr->mins, mins);
VectorAdd (currententity->origin,paliashdr->maxs, maxs);
if (!R_CullBox (mins, maxs)) */
// R_DrawAliasSurface (paliashdr, bright, aliasframeinstant);
R_DrawAliasAmbient(paliashdr, aliasframeinstant);
aliasframeinstant = aliasframeinstant->_next;
}
glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_REPLACE);
glShadeModel (GL_FLAT);
glPopMatrix ();
}
//==================================================================================
void R_DrawAmbientAlias (void (*r_func)(float bright))
{
float brightness;
if (currententity->model->flags & EF_FULLBRIGHT)
{
r_func ( 1.0);
//XYZ
} else if (gl_wireframe.value) {
r_func ( 0.0);
}else {
brightness = (R_LightPoint (currententity->origin)/255.0) * sh_lightmapbright.value;
r_func (brightness);
}
}
/*
=============
PENTA:
R_DrawAmbientEntities
=============
*/
void R_DrawAmbientEntities ()
{
int i;
vec3_t mins,maxs;
if (!cg_showentities.value)
return;
//We don't draw sprites they do not cast shadows
for (i=0 ; i<cl_numvisedicts ; i++)
{
currententity = cl_visedicts[i];
if (currententity->angles[0] || currententity->angles[1] || currententity->angles[2])
{
int i;
for (i=0 ; i<3 ; i++)
{
mins[i] = currententity->origin[i] - currententity->model->radius;
maxs[i] = currententity->origin[i] + currententity->model->radius;
}
} else {
VectorAdd (currententity->origin,currententity->model->mins, mins);
VectorAdd (currententity->origin,currententity->model->maxs, maxs);
}
if (R_CullBox (mins, maxs))
continue;
if (mirror) {
if (mirror_clipside == BoxOnPlaneSide(mins, maxs, mirror_plane)) {
continue;
}
if ( BoxOnPlaneSide(mins, maxs, &mirror_far_plane) == 1) {
return;
}
}
switch (currententity->model->type)
{
case mod_alias:
R_DrawAmbientAlias (R_DrawAliasModel);
break;
case mod_brush:
glColor3f(sh_lightmapbright.value,sh_lightmapbright.value,sh_lightmapbright.value);
R_DrawBrushModelAmbient(currententity);
break;
default:
break;
}
}
}
/*
=============
PENTA:
R_DrawLightEntities
-> moved to gl_bumpdriver.c
=============
*/
/*
=============
R_DrawEntitiesOnList
Post multiply the textures with the frame buff.
=============
*//*
void R_DrawEntitiesOnList (void)
{
int i;
if (!cg_showentities.value)
return;
glBlendFunc(GL_ZERO,GL_SRC_COLOR);
glEnable(GL_BLEND);
glColor3f(1.0f, 1.0f, 1.0f);
//Con_Printf("cl_numvisedicts %d\n",cl_numvisedicts);
// draw sprites seperately, because of alpha blending
for (i=0 ; i<cl_numvisedicts ; i++)
{
currententity = cl_visedicts[i];
switch (currententity->model->type)
{
case mod_alias:
R_DrawAliasModel (1.0);
break;
case mod_brush:
//glColor3f(1.0,1.0,1.0);
///_DrawBrushModel (currententity);
break;
default:
break;
}
}
glDisable(GL_BLEND);
glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
//sprites are drawn the usual way
for (i=0 ; i<cl_numvisedicts ; i++)
{
currententity = cl_visedicts[i];
switch (currententity->model->type)
{
case mod_sprite:
R_DrawSpriteModel (currententity);
default: // <AWE> added default to suppress compiler warning.
break;
}
}
}
*/
/*
=============
R_MarkEntitiesOnList
=============
*/
void R_MarkEntitiesOnList (void)
{
int i;
float angle;
if (!cg_showentities.value)
return;
for (i=0 ; i<cl_numlightvisedicts ; i++)
{
currententity = cl_lightvisedicts[i];
switch (currententity->model->type)
{
case mod_brush:
//R_MarkBrushModelSurfaces(currententity);
R_SetupBrushInstantForLight(currententity);
break;
case mod_alias:
R_SetupInstantForLight(currententity);
break;
default:
break;
}
}
if (cl.viewent.model)
R_SetupInstantForLight(&cl.viewent);
//for player Hack: Dont let it rotate when player looks up/down this looks
//very unrealistic
if (mirror) return;
if (!cl_entities[cl.viewentity].model) return;
angle = cl_entities[cl.viewentity].angles[0];
cl_entities[cl.viewentity].angles[0] = 0;
R_SetupInstantForLight(&cl_entities[cl.viewentity]);
cl_entities[cl.viewentity].angles[0] = angle;
}
/*
=============
R_DrawEntitiesShadowVolumes
=============
*/
void R_DrawEntitiesShadowVolumes (int type)
{
int i;
float colorscale;
vec3_t dist;
vec3_t angles;
if (!cg_showentities.value)
return;
for (i=0 ; i<cl_numlightvisedicts ; i++)
{
currententity = cl_lightvisedicts[i];
if (currententity->model->type != type) continue;
switch (currententity->model->type)
{
case mod_alias:
VectorSubtract (currententity->origin, currentshadowlight->origin,dist);
colorscale = 1 - (Length(dist) / currentshadowlight->radius);
//it will be a verry faint shadow
if (colorscale < 0.1) continue;
R_DrawAliasShadowVolume(currententity);
break;
case mod_brush:
R_DrawBrushModelVolumes(currententity);
break;
default:
break;
}
}
if (mirror) return;
currententity = &cl_entities[cl.viewentity];
VectorCopy(currententity->angles,angles);
//during intermissions the viewent model is nil
if (currententity->model)
if ((currententity->model->type == type)
&& (type == mod_alias)
&& (sh_playershadow.value)
&& (!cg_thirdperson.value)) { //Fix for two player shadows in chase cam - Eradicator
//for lights cast by the player don't add the player's shadow
if (currentshadowlight->owner != currententity) {
//HACK: only horizontal angle this looks better
currententity->angles[0] = 0;
currententity->angles[2] = 0;
R_DrawAliasShadowVolume(currententity);
}
}
VectorCopy(angles,currententity->angles);
}
/*
=============
R_DrawLightSprites
Draw the overriden sprites that are lit by a cube map
=============
*/
void R_DrawLightSprites (void)
{
int i;
vec3_t dist;
float colorscale;
transform_t trans;
if (!cg_showentities.value)
return;
if ( cl_numlightvisedicts == 0 )
return;
glEnable(GL_BLEND);
glBlendFunc(GL_ONE,GL_ONE);
glDepthMask(0);
if ( currentshadowlight->filtercube )
{
glMatrixMode(GL_TEXTURE);
glPushMatrix();
GL_EnableColorShader (false);
}
else
{
GL_SelectTexture(GL_TEXTURE0_ARB);
glEnable(GL_TEXTURE_2D);
glTexEnvf (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_COMBINE_ARB);
glTexEnvf (GL_TEXTURE_ENV, GL_SOURCE0_RGB_ARB, GL_PREVIOUS_ARB);
glTexEnvf (GL_TEXTURE_ENV, GL_SOURCE1_RGB_ARB, GL_TEXTURE);
glTexEnvf (GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, GL_MODULATE);
}
for ( i = 0; i < cl_numlightvisedicts; i++)
{
currententity = cl_lightvisedicts[i];
if (currententity->model->type == mod_sprite)
{
//if ( ((msprite_t *)currententity->model->cache.data)->type
// >= SPR_VP_PARALLEL_UPRIGHT_OVER )
{
//if (currententity->light_lev)
// continue;
//We do attent instead of opengl since gl doesn't seem to do
//what we want, it never really gets to zero.
VectorSubtract(currententity->origin, currentshadowlight->origin,
dist);
colorscale = 1 - (Length(dist) / currentshadowlight->radius);
//if it's to dark we save time by not drawing it
if (colorscale < 0.1)
continue;
glColor3f(currentshadowlight->color[0]*colorscale,
currentshadowlight->color[1]*colorscale,
currentshadowlight->color[2]*colorscale);
VectorCopy(currententity->origin,trans.origin);
VectorCopy(currententity->angles,trans.angles);
trans.scale[0] = trans.scale[1] = trans.scale[2] = 1.0f;
if ( currentshadowlight->filtercube ) {
glLoadIdentity();
GL_SetupCubeMapMatrix(&trans);
}
if ( currentshadowlight->filtercube )
R_DrawSpriteModelLightWV(currententity);
else
R_DrawSpriteModelLight(currententity);
}
}
}
glDisable(GL_BLEND);
if ( currentshadowlight->filtercube )
{
GL_DisableColorShader (false);
GL_SelectTexture(GL_TEXTURE0_ARB);
glPopMatrix();
glMatrixMode(GL_MODELVIEW);
}
}
/*
=============
=============
*/
void R_DrawFullbrightSprites (void)
{
int i;
if (!cg_showentities.value)
return;
if ( cl_numvisedicts == 0 )
return;
// glEnable(GL_BLEND);
// glBlendFunc(GL_SRC_ALPHA,GL_ONE);
glDepthMask(0);
// GL_DisableMultitexture();
for (i=0 ; i<cl_numvisedicts ; i++)
{
currententity = cl_visedicts[i];
if (currententity->model->type == mod_sprite) {
//if (((msprite_t *)currententity->model->cache.data)->type >= SPR_VP_PARALLEL_UPRIGHT_OVER) {
// if (currententity->light_lev) {
// glColor3fv(&currententity->color[0]);
R_DrawSpriteModel(currententity);
// }
//} else {
// glColor3f(1.0f, 1.0f, 1.0f);
// R_DrawSpriteModel(currententity);
//}
}
}
// glDisable(GL_BLEND);
glDepthMask(1);
}
/*
=============
R_DrawViewModel
Gunnetje
=============
*/
void R_DrawViewModel (void)
{
if (!cg_showviewmodel.value)
return;
if (cg_thirdperson.value)
return;
if (envmap)
return;
if (!cg_showentities.value)
return;
if (cl.items & IT_INVISIBILITY)
return;
if (cl.stats[STAT_HEALTH] <= 0)
return;
if (mirror)
return;
currententity = &cl.viewent;
if (!currententity->model)
return;
// hack the depth range to prevent view model from poking into walls
//PENTA: would this work with stencil shadows?
if ( gl_calcdepth.value ) //Calc Depth (disables shadows on v_ models,
//but they don't poke into walls) - Eradicator
glDepthRange (gldepthmin, gldepthmin + 0.3*(gldepthmax-gldepthmin));
R_DrawAliasModel (0.1);
if ( gl_calcdepth.value ) //Calc Depth - Eradicator
glDepthRange (gldepthmin, gldepthmax);
}
/*
=============
R_DrawViewModel
Gunnetje
=============
*/
void R_DrawViewModelLight (void)
{
float colorscale;
vec3_t dist;
if (!cg_showviewmodel.value)
return;
if (cg_thirdperson.value)
return;
if (envmap)
return;
if (!cg_showentities.value)
return;
if (cl.items & IT_INVISIBILITY)
return;
if (cl.stats[STAT_HEALTH] <= 0)
return;
if (mirror)
return;
currententity = &cl.viewent;
if (!currententity->model)
return;
//We do attent instead of opengl since gl doesn't seem to do
//what we want, it never really gets to zero.
VectorSubtract (currententity->origin,currentshadowlight->origin,dist);
colorscale = 1 - (Length(dist) / currentshadowlight->radius);
//if it's to dark we save time by not drawing it
if (colorscale < 0.1) return;
glColor4f(colorscale,colorscale,colorscale,colorscale);
R_DrawAliasObjectLight(currententity,R_DrawAliasBumped);
}
/*
Returns true if we should draw the view model
*/
qboolean R_ShouldDrawViewModel (void)
{
if (!cg_showviewmodel.value)
return false;
if (cg_thirdperson.value)
return false;
if (envmap)
return false;
if (!cg_showentities.value)
return false;
if (cl.items & IT_INVISIBILITY)
return false;
if (cl.stats[STAT_HEALTH] <= 0)
return false;
if (mirror)
return false;
currententity = &cl.viewent;
if (!currententity->model)
return false;
return true;
}
extern cvar_t r_intensity;
/*
============
R_AdjustGamma
============
*/
void R_AdjustGamma(void) //Gamma - Eradicator
{
if (r_intensity.value < 0.2f)
r_intensity.value = 0.2f;
if (r_intensity.value >= 1)
{
r_intensity.value = 1;
return;
}
glBlendFunc (GL_DST_COLOR, GL_ONE_MINUS_SRC_ALPHA);
glColor4f (1, 1, 1, r_intensity.value );
glBegin (GL_QUADS);
glVertex3f (10, 100, 100);
glVertex3f (10, -100, 100);
glVertex3f (10, -100, -100);
glVertex3f (10, 100, -100);
glVertex3f (11, 100, 100);
glVertex3f (11, -100, 100);
glVertex3f (11, -100, -100);
glVertex3f (11, 100, -100);
glEnd ();
}
/*
============
R_PolyBlend
============
*/
void R_PolyBlend (void)
{
if (!gl_polyblend.value)
return;
GL_DisableMultitexture();
glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
glEnable (GL_BLEND);
glDisable (GL_DEPTH_TEST);
glDisable (GL_TEXTURE_2D);
glLoadIdentity ();
glRotatef (-90, 1, 0, 0); // put Z going up
glRotatef (90, 0, 0, 1); // put Z going up
if (v_blend[3])
{
glColor4fv (v_blend);
glBegin (GL_QUADS);
glVertex3f (10, 100, 100);
glVertex3f (10, -100, 100);
glVertex3f (10, -100, -100);
glVertex3f (10, 100, -100);
glEnd ();
}
if (r_intensity.value != 1) //Gamma - Eradicator
R_AdjustGamma();
glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
glDisable (GL_BLEND);
glEnable (GL_TEXTURE_2D);
glEnable (GL_ALPHA_TEST);
}
int SignbitsForPlane (mplane_t *out)
{
int bits, j;
// for fast box on planeside test
bits = 0;
for (j=0 ; j<3 ; j++)
{
if (out->normal[j] < 0)
bits |= 1<<j;
}
return bits;
}
void R_SetFrustum (void)
{
int i;
if (r_refdef.fov_x == 90)
{
// front side is visible
VectorAdd (vpn, vright, frustum[0].normal);
VectorSubtract (vpn, vright, frustum[1].normal);
VectorAdd (vpn, vup, frustum[2].normal);
VectorSubtract (vpn, vup, frustum[3].normal);
}
else
{
//Spedup Small Calculations - Eradicator
RotatePointAroundVector( frustum[0].normal, vup, vpn, -(90-r_refdef.fov_x * 0.5 ) );
RotatePointAroundVector( frustum[1].normal, vup, vpn, 90-r_refdef.fov_x * 0.5 );
RotatePointAroundVector( frustum[2].normal, vright, vpn, 90-r_refdef.fov_y * 0.5 );
RotatePointAroundVector( frustum[3].normal, vright, vpn, -( 90 - r_refdef.fov_y * 0.5 ) );
}
for (i=0 ; i<4 ; i++)
{
frustum[i].type = PLANE_ANYZ;
frustum[i].dist = DotProduct (r_origin, frustum[i].normal);
frustum[i].signbits = SignbitsForPlane (&frustum[i]);
}
}
/*
===============
R_SetupFrame
===============
*/
void R_SetupFrame (void)
{
// don't allow cheats in multiplayer
if (cl.maxclients > 1)
{
Cvar_Set ("r_fullbright", "0");
Cvar_Set ("gl_wireframe", "0"); //Disable this is multiplayer - Eradicator
}
R_AnimateLight ();
r_framecount++;
// build the transformation matrix for the given view angles
VectorCopy (r_refdef.vieworg, r_origin);
AngleVectors (r_refdef.viewangles, vpn, vright, vup);
// current viewleaf
r_oldviewleaf = r_viewleaf;
r_viewleaf = Mod_PointInLeaf (r_origin, cl.worldmodel);
V_SetContentsColor (r_viewleaf->contents);
V_CalcBlend ();
r_cache_thrash = false;
c_brush_polys = 0;
c_alias_polys = 0;
occlusion_cut_meshes = 0;
occlusion_cut_entities = 0;
occlusion_cut_lights = 0;
}
//PENTA: wasnt in math
//<AWE> Unused. Remove it?
GLdouble cotan(GLdouble angle) {
return (cos(angle))/sin(angle);
}
//PENTA: Matrix with infinite far clipping plane
//<AWE> - optimized with static matrix.
// - "nudge" is now defined as static const.
// - p[2][3] was "-nudge" [causing heavy z-fighting on MacOS X], but has to be -1.0.
// This issue indicates less precision on the Windows side.
// - replaced the custom cotan () with 1.0 / tan () [cotan () = cos () / sin ()].
static const GLdouble nudge = 1.0 - 1.0 / ((GLdouble) (1<<23));
void pentaGlPerspective (GLdouble fov, GLdouble aspectr, GLdouble zNear)
{
static GLdouble p[4][4] = {
{ 0.0, 0.0, 0.0, 0.0 },
{ 0.0, 0.0, 0.0, 0.0 },
{ 0.0, 0.0, 0.0, -1.0 },
{ 0.0, 0.0, 0.0, 0.0 }
};
p[0][0] = 1.0 / (aspectr * tan (fov)); // <AWE> was: p[0][0] = cotan (fov) / aspectr;
p[1][1] = 1.0 / tan (fov); // <AWE> was: p[1][1] = cotan (fov);
p[2][2] = -nudge; // PM: changed again compile error otherwise
p[3][2] = -2.0 * zNear * nudge;
glLoadMatrixd (&p[0][0]);
}
//PENTA: Matrix with infinite far clipping plane
//<AWE> Updated with "nudge". Unused. Remove it?
void pentaGlFrustum( GLdouble xmin, GLdouble xmax, GLdouble ymin, GLdouble ymax, GLdouble zNear)
{
static GLdouble p[4][4] = {
{ 0.0, 0.0, 0.0, 0.0 },
{ 0.0, 0.0, 0.0, 0.0 },
{ 0.0, 0.0, 0.0, -1.0 },
{ 0.0, 0.0, 0.0, 0.0 }
};
p[0][0] = 2 * zNear / (xmax - xmin);
p[1][1] = 2 * zNear / (ymax - ymin);
p[2][2] = -nudge; // PM: changed again compile error otherwise
p[2][0] = (xmax + xmin) / (xmax - xmin);
p[2][1] = (ymax + ymin) / (ymax - ymin);
p[3][2] = -2.0 * zNear * nudge; // <AWE> updated with MUL "nudge".
glLoadMatrixd(&p[0][0]);
}
void MYgluPerspective( GLdouble fovy, GLdouble aspect,
GLdouble zNear, GLdouble zFar )
{
/*
<AWE> Unused. Can be removed.
GLdouble xmin, xmax, ymin, ymax;
ymax = zNear * tan (fovy * M_PI / 360.0);
ymin = -ymax;
xmin = ymin * aspect;
xmax = ymax * aspect;
pentaGlFrustum( xmin, xmax, ymin, ymax, zNear);
*/
pentaGlPerspective(fovy * M_PI / 360.0, aspect, zNear);
}
/*
PENTA:
from http://www.markmorley.com/opengl/frustumculling.html
Should clean it up by using procedures.
*/
float frustumPlanes[6][4];
void ExtractFrustum() // <AWE> added return type.
{
float proj[16];
float modl[16];
float clip[16];
float t;
/* Get the current PROJECTION matrix from OpenGL */
glGetFloatv( GL_PROJECTION_MATRIX, proj );
/* Get the current MODELVIEW matrix from OpenGL */
glGetFloatv( GL_MODELVIEW_MATRIX, modl );
/* Combine the two matrices (multiply projection by modelview) */
clip[ 0] = modl[ 0] * proj[ 0] + modl[ 1] * proj[ 4] + modl[ 2] * proj[ 8] + modl[ 3] * proj[12];
clip[ 1] = modl[ 0] * proj[ 1] + modl[ 1] * proj[ 5] + modl[ 2] * proj[ 9] + modl[ 3] * proj[13];
clip[ 2] = modl[ 0] * proj[ 2] + modl[ 1] * proj[ 6] + modl[ 2] * proj[10] + modl[ 3] * proj[14];
clip[ 3] = modl[ 0] * proj[ 3] + modl[ 1] * proj[ 7] + modl[ 2] * proj[11] + modl[ 3] * proj[15];
clip[ 4] = modl[ 4] * proj[ 0] + modl[ 5] * proj[ 4] + modl[ 6] * proj[ 8] + modl[ 7] * proj[12];
clip[ 5] = modl[ 4] * proj[ 1] + modl[ 5] * proj[ 5] + modl[ 6] * proj[ 9] + modl[ 7] * proj[13];
clip[ 6] = modl[ 4] * proj[ 2] + modl[ 5] * proj[ 6] + modl[ 6] * proj[10] + modl[ 7] * proj[14];
clip[ 7] = modl[ 4] * proj[ 3] + modl[ 5] * proj[ 7] + modl[ 6] * proj[11] + modl[ 7] * proj[15];
clip[ 8] = modl[ 8] * proj[ 0] + modl[ 9] * proj[ 4] + modl[10] * proj[ 8] + modl[11] * proj[12];
clip[ 9] = modl[ 8] * proj[ 1] + modl[ 9] * proj[ 5] + modl[10] * proj[ 9] + modl[11] * proj[13];
clip[10] = modl[ 8] * proj[ 2] + modl[ 9] * proj[ 6] + modl[10] * proj[10] + modl[11] * proj[14];
clip[11] = modl[ 8] * proj[ 3] + modl[ 9] * proj[ 7] + modl[10] * proj[11] + modl[11] * proj[15];
clip[12] = modl[12] * proj[ 0] + modl[13] * proj[ 4] + modl[14] * proj[ 8] + modl[15] * proj[12];
clip[13] = modl[12] * proj[ 1] + modl[13] * proj[ 5] + modl[14] * proj[ 9] + modl[15] * proj[13];
clip[14] = modl[12] * proj[ 2] + modl[13] * proj[ 6] + modl[14] * proj[10] + modl[15] * proj[14];
clip[15] = modl[12] * proj[ 3] + modl[13] * proj[ 7] + modl[14] * proj[11] + modl[15] * proj[15];
/* Extract the numbers for the RIGHT plane */
frustumPlanes[0][0] = clip[ 3] - clip[ 0];
frustumPlanes[0][1] = clip[ 7] - clip[ 4];
frustumPlanes[0][2] = clip[11] - clip[ 8];
frustumPlanes[0][3] = clip[15] - clip[12];
/* Normalize the result */
t = sqrt( frustumPlanes[0][0] * frustumPlanes[0][0] + frustumPlanes[0][1] * frustumPlanes[0][1] + frustumPlanes[0][2] * frustumPlanes[0][2] );
frustumPlanes[0][0] /= t;
frustumPlanes[0][1] /= t;
frustumPlanes[0][2] /= t;
frustumPlanes[0][3] /= t;
/* Extract the numbers for the LEFT plane */
frustumPlanes[1][0] = clip[ 3] + clip[ 0];
frustumPlanes[1][1] = clip[ 7] + clip[ 4];
frustumPlanes[1][2] = clip[11] + clip[ 8];
frustumPlanes[1][3] = clip[15] + clip[12];
/* Normalize the result */
t = sqrt( frustumPlanes[1][0] * frustumPlanes[1][0] + frustumPlanes[1][1] * frustumPlanes[1][1] + frustumPlanes[1][2] * frustumPlanes[1][2] );
frustumPlanes[1][0] /= t;
frustumPlanes[1][1] /= t;
frustumPlanes[1][2] /= t;
frustumPlanes[1][3] /= t;
/* Extract the BOTTOM plane */
frustumPlanes[2][0] = clip[ 3] + clip[ 1];
frustumPlanes[2][1] = clip[ 7] + clip[ 5];
frustumPlanes[2][2] = clip[11] + clip[ 9];
frustumPlanes[2][3] = clip[15] + clip[13];
/* Normalize the result */
t = sqrt( frustumPlanes[2][0] * frustumPlanes[2][0] + frustumPlanes[2][1] * frustumPlanes[2][1] + frustumPlanes[2][2] * frustumPlanes[2][2] );
frustumPlanes[2][0] /= t;
frustumPlanes[2][1] /= t;
frustumPlanes[2][2] /= t;
frustumPlanes[2][3] /= t;
/* Extract the TOP plane */
frustumPlanes[3][0] = clip[ 3] - clip[ 1];
frustumPlanes[3][1] = clip[ 7] - clip[ 5];
frustumPlanes[3][2] = clip[11] - clip[ 9];
frustumPlanes[3][3] = clip[15] - clip[13];
/* Normalize the result */
t = sqrt( frustumPlanes[3][0] * frustumPlanes[3][0] + frustumPlanes[3][1] * frustumPlanes[3][1] + frustumPlanes[3][2] * frustumPlanes[3][2] );
frustumPlanes[3][0] /= t;
frustumPlanes[3][1] /= t;
frustumPlanes[3][2] /= t;
frustumPlanes[3][3] /= t;
/* Extract the FAR plane */
frustumPlanes[4][0] = clip[ 3] - clip[ 2];
frustumPlanes[4][1] = clip[ 7] - clip[ 6];
frustumPlanes[4][2] = clip[11] - clip[10];
frustumPlanes[4][3] = clip[15] - clip[14];
/* Normalize the result */
t = sqrt( frustumPlanes[4][0] * frustumPlanes[4][0] + frustumPlanes[4][1] * frustumPlanes[4][1] + frustumPlanes[4][2] * frustumPlanes[4][2] );
frustumPlanes[4][0] /= t;
frustumPlanes[4][1] /= t;
frustumPlanes[4][2] /= t;
frustumPlanes[4][3] /= t;
/* Extract the NEAR plane */
frustumPlanes[5][0] = clip[ 3] + clip[ 2];
frustumPlanes[5][1] = clip[ 7] + clip[ 6];
frustumPlanes[5][2] = clip[11] + clip[10];
frustumPlanes[5][3] = clip[15] + clip[14];
/* Normalize the result */
t = sqrt( frustumPlanes[5][0] * frustumPlanes[5][0] + frustumPlanes[5][1] * frustumPlanes[5][1] + frustumPlanes[5][2] * frustumPlanes[5][2] );
frustumPlanes[5][0] /= t;
frustumPlanes[5][1] /= t;
frustumPlanes[5][2] /= t;
frustumPlanes[5][3] /= t;
}
/*
=============
R_SetupGL
=============
*/
void R_SetupGL (void)
{
float screenaspect;
extern int glwidth, glheight;
int x, x2, y2, y, w, h;
//
// set up viewpoint
//
glMatrixMode(GL_PROJECTION);
glLoadIdentity ();
x = r_refdef.vrect.x * glwidth/vid.width;
x2 = (r_refdef.vrect.x + r_refdef.vrect.width) * glwidth/vid.width;
y = (vid.height-r_refdef.vrect.y) * glheight/vid.height;
y2 = (vid.height - (r_refdef.vrect.y + r_refdef.vrect.height)) * glheight/vid.height;
// fudge around because of frac screen scale
if (x > 0)
x--;
if (x2 < glwidth)
x2++;
if (y2 < 0)
y2--;
if (y < glheight)
y++;
w = x2 - x;
h = y - y2;
if (envmap || mirror || glare)
{
x = y2 = 0;
w = r_refdef.vrect.width;
h = r_refdef.vrect.height;
}
glViewport (glx + x, gly + y2, w, h);
screenaspect = (float)r_refdef.vrect.width/r_refdef.vrect.height;
if (mirror) screenaspect = 1.0;
// yfov = 2*atan((float)r_refdef.vrect.height/r_refdef.vrect.width)*180/M_PI;
//PENTA: decreased zfar from 4096 to reduce z-fighting on alias models
// is this ok for quake or do we need to be able to look that far??
// seems to work, I incr. znear to 5 instead of 4
MYgluPerspective (2.0 *atan((GLdouble) r_refdef.vrect.height / (GLdouble) r_refdef.vrect.width) * 180.0 / M_PI /* r_refdef.fov_y */, screenaspect, 5.0, 2048.0);
if (mirror || glare)
{
//If we are mirroring we want to use the screen projection matrix
//not the texture (=> we just calculated this) one.
glLoadIdentity();
glMultMatrixf(r_projection_matrix);
if (mirror){
if (mirror_plane->normal[2])
glScalef (1, -1, 1);
else
glScalef (-1, 1, 1);
}
} else {
//Store it for later mirror use
glGetFloatv (GL_PROJECTION_MATRIX, r_projection_matrix);
}
glMatrixMode(GL_MODELVIEW);
glLoadIdentity ();
glRotatef (-90, 1, 0, 0); // put Z going up
glRotatef (90, 0, 0, 1); // put Z going up
glRotatef (-r_refdef.viewangles[2], 1, 0, 0);
glRotatef (-r_refdef.viewangles[0], 0, 1, 0);
glRotatef (-r_refdef.viewangles[1], 0, 0, 1);
glTranslatef (-r_refdef.vieworg[0], -r_refdef.vieworg[1], -r_refdef.vieworg[2]);
glGetFloatv (GL_MODELVIEW_MATRIX, r_world_matrix);
glGetDoublev (GL_MODELVIEW_MATRIX, r_Dworld_matrix);
glGetDoublev (GL_PROJECTION_MATRIX, r_Dproject_matrix);
glGetIntegerv (GL_VIEWPORT, (GLint *) r_Iviewport); // <AWE> added cast.
ExtractFrustum();
glEnable(GL_CULL_FACE);
glDisable(GL_BLEND);
glDisable(GL_ALPHA_TEST);
glEnable(GL_DEPTH_TEST);
}
/*
================
R_RenderScene
r_refdef must be set before the first call
================
*/
void R_RenderScene (void)
{
int i, j;
shadowlight_t *l = NULL;
R_SetupFrame ();
R_SetFrustum ();
R_SetupGL ();
R_MarkLeaves (); // done here so we know if we're in water, gaat visible leafs marken
//if (!mirror)
R_InitShadowsForFrame ();
R_InitDrawWorld();
//if (!mirror) {
//To ensure invariance we have to enable scissoring even for the ambient term
//But in reality this doen't work (at least on my Geforce2 card) and you still
//get (few) z-buffer fighting.
if (!sh_noscissor.value) {
glScissor(r_Iviewport[0], r_Iviewport[1], r_Iviewport[2], r_Iviewport[3]);
glEnable(GL_SCISSOR_TEST);
}
//Ambient light drawing
//this uses the light maps as an ambient term
//it fills the z buffer
R_SetupInstants();
//XYZ - moved upwards
if (gl_wireframe.value) {
float old = sh_lightmapbright.value;
sh_lightmapbright.value = 1.0;
glPolygonMode(GL_FRONT_AND_BACK,GL_LINE);
R_DrawAmbientEntities();
glDisable(GL_TEXTURE_2D);
R_WorldMultiplyTextures();
sh_lightmapbright.value = old;
R_DrawFullbrightSprites();
DrawBlendedTextureChains();
R_DrawDecals();
R_DrawParticles();
glColor3f(1.0, 1.0, 1.0);
GL_SelectTexture(GL_TEXTURE0_ARB);
glEnable(GL_TEXTURE_2D);
glPolygonMode(GL_FRONT_AND_BACK,GL_FILL);
return;
}
R_DrawViewModel();
R_DrawAmbientEntities();
glDepthFunc(GL_LEQUAL);
R_WorldMultiplyTextures();
//if (mirror) {
// sh_lightmapbright.value = 0.3;
// return;
//}
if (!sh_noscissor.value) {
glClear(GL_STENCIL_BUFFER_BIT);
R_ClearRectList();
}
numClearsSaved = 0;
aliasCacheRequests = aliasFullCacheHits = aliasPartialCacheHits = 0;
brushCacheRequests = brushFullCacheHits = brushPartialCacheHits = 0;
glFogfv(GL_FOG_COLOR, color_black);
if (sh_rtlights.value)
for (i=0; i<numUsedShadowLights; i++) {
l = usedshadowlights[i];
currentshadowlight = l;
//Find the polygons that cast shadows for this light
if (!(l->shadowchainfilled = R_FillLightChains(l)))
continue;
glScissor(l->scizz.coords[0], l->scizz.coords[1],
l->scizz.coords[2]-l->scizz.coords[0], l->scizz.coords[3]-l->scizz.coords[1]);
if (sh_visiblevolumes.value) {
glDepthFunc(GL_LEQUAL);
glDepthMask(GL_TRUE);
} else {
glDepthMask(GL_FALSE);
if (l->castShadow) {
glDepthFunc(GL_LESS);
glEnable(GL_STENCIL_TEST);
glColorMask(false, false, false, false);
glStencilFunc(GL_ALWAYS, 1, 0xffffffff);
glClear(GL_STENCIL_BUFFER_BIT);
}
}
//All right now the shadow stuff
R_MarkEntitiesOnList();
//Shadow casting is on by default
if (l->castShadow) {
//Calculate the shadow volume (does nothing when static)
R_ConstructShadowVolume(l);
#if 1
//Pass 1 increase
glCullFace(GL_BACK);
glStencilOp(GL_KEEP, GL_INCR, GL_KEEP);
if (sh_worldshadows.value) R_DrawShadowVolume(l);
// Second Pass. Decrease Stencil Value In The Shadow
glCullFace(GL_FRONT);
glStencilOp(GL_KEEP, GL_DECR, GL_KEEP);
if (sh_worldshadows.value) R_DrawShadowVolume(l);
//PENTA: we could do the same thing for brushes as for aliasses
//Pass 1 increase
glCullFace(GL_BACK);
glStencilOp(GL_KEEP, GL_INCR, GL_KEEP);
if (sh_entityshadows.value) R_DrawEntitiesShadowVolumes(mod_brush);
// Second Pass. Decrease Stencil Value In The Shadow
glCullFace(GL_FRONT);
glStencilOp(GL_KEEP, GL_DECR, GL_KEEP);
if (sh_entityshadows.value) R_DrawEntitiesShadowVolumes(mod_brush);
#else
// glCullFace(GL_FRONT_AND_BACK);
glDisable(GL_CULL_FACE);
checkerror();
glStencilOp(GL_KEEP, GL_INCR_WRAP_EXT, GL_KEEP);
checkerror();
qglStencilFuncSeparateATI(GL_ALWAYS, GL_ALWAYS, 0, ~0);
checkerror();
qglStencilOpSeparateATI(GL_FRONT, GL_KEEP, GL_DECR_WRAP_EXT, GL_KEEP);
checkerror();
qglStencilOpSeparateATI(GL_BACK, GL_KEEP, GL_INCR_WRAP_EXT, GL_KEEP);
checkerror();
if (sh_worldshadows.value) R_DrawShadowVolume(l);
//PENTA: we could do the same thing for brushes as for aliasses
//Pass 1 increase
if (sh_entityshadows.value) R_DrawEntitiesShadowVolumes(mod_brush);
glEnable(GL_CULL_FACE);
#endif
if (sh_entityshadows.value)
R_DrawEntitiesShadowVolumes(mod_alias);
if (sh_meshshadows.value)
StencilMeshVolumes();
//Reenable drawing
glCullFace(GL_FRONT);
glStencilOp(GL_KEEP, GL_KEEP, GL_KEEP);
glDepthFunc(GL_LEQUAL);
glStencilFunc(GL_EQUAL, 0, 0xffffffff);
}
if (!sh_visiblevolumes.value) {
R_DrawWorldBumped();
glPolygonOffset(0,-5);
glEnable(GL_POLYGON_OFFSET_FILL);
R_DrawLightEntities(l);
glDisable(GL_POLYGON_OFFSET_FILL);
}
glDisable (GL_BLEND);
glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
glDisable(GL_STENCIL_TEST);
//sprites only recive "shadows" from the cubemap not the stencil
//disable scissorint for the sprites (gives "cut off" artefacts otherwise)
glDisable(GL_SCISSOR_TEST);
if (!sh_visiblevolumes.value) {
R_DrawLightSprites ();
}
if (!sh_noscissor.value)
glEnable(GL_SCISSOR_TEST);
glDepthMask(GL_TRUE);
if ((i%8) == 0)
// don't let sound get messed up if going slow
S_ExtraUpdate ();
l->visible = false;
}
glScissor(0, 0, r_Iviewport[2], r_Iviewport[3]);
glDisable(GL_SCISSOR_TEST);
glDepthFunc(GL_LEQUAL);
GL_SelectTexture(GL_TEXTURE1_ARB);
GL_DisableMultitexture();
GL_SelectTexture(GL_TEXTURE0_ARB);
glFogfv(GL_FOG_COLOR, color_black);
R_DrawFullbrightSprites();
if (skyshadernum >= 0) {
//glColor3f(1,1,1);
//R_DrawSkyChain (cl.worldmodel->mapshaders[skyshadernum]);
cl.worldmodel->mapshaders[skyshadernum].texturechain = NULL;
}
// R_DrawCaustics();
DrawBlendedTextureChains();
//Removed to fix particle & water bug (see R_RenderView) - Eradicator
//R_DrawParticles (); //to fix the particles triangles showing up after water
//put this behind the water drawing#ifdef GLTEST
R_DrawDecals();
glFogfv(GL_FOG_COLOR, fog_color);
}
void R_InitMirrorChains()
{
int i;
for (i=0; i<NUM_MIRROR_PLANES; i++) {
mirrorplanes[i].texture_object = EasyTgaLoad("penta/mirrordummy.tga");
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE );
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE );
}
}
void R_NewMirrorChains()
{
int i;
for (i=0; i<NUM_MIRROR_PLANES; i++) {
mirrorplanes[i].lockframe = 0;
mirrorplanes[i].updateframe = 0;
mirrorplanes[i].chain = NULL;
}
}
void R_ClearMirrorChains()
{
int i;
for (i=0; i<NUM_MIRROR_PLANES; i++) {
mirrorplanes[i].chain = NULL;
}
for (i=0 ; i<cl.worldmodel->nummapshaders ; i++)
{
cl.worldmodel->mapshaders[i].texturechain = NULL;
}
}
void R_AllocateMirror(msurface_t *surf)
{
int i,oldest,oindex;
mirrorplane_t *mir = NULL;
vec3_t tempnormal;
//#define NUM_MIRROR_PLANES 8
//extern mirrorplane_t mirrorplanes[NUM_MIRROR_PLANES];
//see if surface is part of an existing mirror
for (i=0; i<NUM_MIRROR_PLANES; i++) {
VectorCopy(surf->plane->normal,tempnormal);
//if (surf->flags & SURF_PLANEBACK) {
// VectorInverse(tempnormal);
//}
if ((tempnormal[0] == mirrorplanes[i].plane.normal[0]) &&
(tempnormal[1] == mirrorplanes[i].plane.normal[1]) &&
(tempnormal[2] == mirrorplanes[i].plane.normal[2]) &&
(surf->plane->dist == mirrorplanes[i].plane.dist))
{
mir = &mirrorplanes[i];
//Con_Printf("reuse mir %i\n",i);
break;
}
}
//allocate new mirror
if (!mir) {
oldest = r_framecount;
oindex = -1;
for (i=0; i<NUM_MIRROR_PLANES; i++) {
if (mirrorplanes[i].lockframe < oldest) {
oldest = mirrorplanes[i].lockframe;
oindex = i;
}
}
if (oindex == -1) {
//Be silent about this
return;
}
mir = &mirrorplanes[oindex];
VectorCopy(surf->plane->normal,mir->plane.normal);
//if (surf->flags & SURF_PLANEBACK) {
// VectorInverse(mir->plane.normal);
//}
mir->plane.dist = surf->plane->dist;
mir->plane.type = surf->plane->type;
mir->plane.signbits = surf->plane->signbits;
//Con_Printf("New mirror: n: %f %f %f d:%f\n i: %i",mir->plane.normal[0],mir->plane.normal[1],mir->plane.normal[2],mir->plane.dist,oindex);
}
mir->lockframe = r_framecount;
surf->texturechain = mir->chain;
mir->chain = surf;
}
/*
=============
R_Mirror
=============
*/
void R_Mirror (mirrorplane_t *mir)
{
float d, olddrawents = 0.0f;
entity_t *ent;
int ox, oy, ow, oh, ofovx, ofovy, cl_oldvisedicts;
vec3_t oang, oorg;
qboolean drawplayer;
if (mirror) {
Con_Printf("Warning: Resursive mirrors\n");
return;
}
mirror = true;
mirror_plane = &mir->plane;
memcpy (r_base_world_matrix, r_world_matrix, sizeof(r_base_world_matrix));
AngleVectors (r_refdef.viewangles, vpn, vright, vup);
//setup mirrored view origin & direction
VectorCopy(r_refdef.vieworg, oorg);
d = DotProduct (r_refdef.vieworg, mir->plane.normal) - mir->plane.dist;
//camera is to far away from mirror don't update it...
if (abs(d) > mir_distance.value) {
mirror = false;
return;
}
//player is very close to mirror don't draw it since he interects it and this gives bad artefacts
if (abs(d) < MIN_PLAYER_MIRROR) {
drawplayer = false;
} else {
drawplayer = true;
}
//calculate a far plane for the mirror, stuff to far away from mirrors is not drawn anymore...
VectorCopy(mir->plane.normal,mirror_far_plane.normal);
//VectorInverse(mirror_far_plane.normal);
mirror_far_plane.dist = DotProduct(r_refdef.vieworg,mir->plane.normal) + mir_distance.value;
VectorMA (r_refdef.vieworg, -2*d, mir->plane.normal, r_refdef.vieworg);
if (d < 0) {
mirror_clipside = 1;
} else {
mirror_clipside = 2;
}
d = DotProduct (vpn, mir->plane.normal);
VectorMA (vpn, -2*d, mir->plane.normal, vpn);
VectorCopy(r_refdef.viewangles, oang);
r_refdef.viewangles[0] = -asin (vpn[2])/M_PI*180;
r_refdef.viewangles[1] = atan2 (vpn[1], vpn[0])/M_PI*180;
r_refdef.viewangles[2] = -r_refdef.viewangles[2];
//Render to a small view rectangle
ox = r_refdef.vrect.x;
oy = r_refdef.vrect.y;
ow = r_refdef.vrect.width;
oh = r_refdef.vrect.height;
ofovx = r_refdef.fov_x;
ofovy = r_refdef.fov_y;
r_refdef.vrect.x = 0;
r_refdef.vrect.y = 0;
r_refdef.vrect.width = 256;
r_refdef.vrect.height = 256;
// r_refdef.fov_x = 90.0;
// r_refdef.fov_y = 90.0;//CalcFov (90.0, r_refdef.vrect.width, r_refdef.vrect.height);
r_refdef.fov_x = scr_fov.value;
r_refdef.fov_y = CalcFov (r_refdef.fov_x, r_refdef.vrect.width, r_refdef.vrect.height);
//Note: This was probably already a problem with the original quake mirrors
//the static entities are added in all mirror passes making that by the end of
//mirror rendering we are rendering the statics multiple times.
//so we back up the number of entities (dynamics are in front) and later restore it
cl_oldvisedicts = cl_numvisedicts;
olddrawents = cg_showentities.value;
if (mir_detail.value < 2) {
//Don't draw entities
cg_showentities.value = 0;
} else {
//Hack add player to back of list
if (drawplayer && cl_entities[cl.viewentity].model) {
ent = &cl_entities[cl.viewentity];
if (cl_numvisedicts < MAX_VISEDICTS)
{
cl_visedicts[cl_numvisedicts] = ent;
cl_numvisedicts++;
}
}
}
//cg_showentities.value = 0;
glFrontFace(GL_CW);
//R_RenderView ();
//Con_Printf("Render mirror\n");
//olddrawents = cg_showentities.value;
//cg_showentities.value = mir_detail.value-1;
R_RenderScene ();
cg_showentities.value = olddrawents;
Q_memcpy (mir->matrix, r_world_matrix, sizeof(r_world_matrix));
GL_Bind(mir->texture_object);
glCopyTexSubImage2D(GL_TEXTURE_2D, 0, 0, 0, 0, 0, 256, 256);
glClear (GL_DEPTH_BUFFER_BIT);
if (mir_detail.value < 2) {
cg_showentities.value = olddrawents;
}
// cg_showentities.value = 1;
r_refdef.vrect.x = ox;
r_refdef.vrect.y = oy;
r_refdef.vrect.width = ow;
r_refdef.vrect.height = oh;
r_refdef.fov_x = ofovx;
r_refdef.fov_y = ofovy;
cl_numvisedicts = cl_oldvisedicts;
VectorCopy(oorg, r_refdef.vieworg);
VectorCopy(oang, r_refdef.viewangles);
// blend on top
/*
glMatrixMode(GL_PROJECTION);
if (mir->plane.normal[2])
glScalef (1,-1,1);
else
glScalef (-1,1,1);
*/
glFrontFace(GL_CCW);
glMatrixMode(GL_MODELVIEW);
//glLoadMatrixf (r_base_world_matrix);
memcpy(r_world_matrix, r_base_world_matrix, sizeof(r_base_world_matrix));
mirror = false;
Sbar_Changed ();
}
void R_RenderMirrors()
{
int i;
for (i=0; i<NUM_MIRROR_PLANES; i++) {
if (mirrorplanes[i].chain && ((r_framecount - mirrorplanes[i].updateframe) > mir_frameskip.value)) {
R_Mirror(&mirrorplanes[i]);
mirrorplanes[i].lockframe = r_framecount;
mirrorplanes[i].updateframe = r_framecount;
}
}
}
void R_SetupMirrorShader(msurface_t *surf,mirrorplane_t *mir) {
if (mir_detail.value < 1) {
GL_Bind(newenvmap);
} else
GL_Bind(mir->texture_object);
if ((surf->flags & SURF_DRAWTURB) && !(surf->flags & SURF_GLASS)) {
//it is water
//glBlendFunc(GL_SRC_ALPHA,GL_ONE_MINUS_SRC_ALPHA);
glBlendFunc(GL_SRC_ALPHA,GL_ONE);
glEnable(GL_BLEND);
return;
} else {
if (surf->flags & SURF_DRAWTURB) {
glBlendFunc(GL_SRC_ALPHA,GL_ONE);
glEnable(GL_BLEND);
return;
}
//it is glass or a mirror
//GL_EnableMultiTexture();
glTexEnvf (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_COMBINE_ARB);
glTexEnvf (GL_TEXTURE_ENV, GL_SOURCE0_RGB_ARB, GL_TEXTURE);
glTexEnvf (GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, GL_REPLACE);
GL_EnableMultitexture();
//SHADERS GL_Bind(surf->texinfo->texture->gl_texturenum);
//No colormaps: Color maps are bound on tmu 0 so disable it
//and let tu1 modulate itself with the light map brightness
glTexEnvf (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_COMBINE_ARB);
glTexEnvf (GL_TEXTURE_ENV, GL_SOURCE0_RGB_ARB, GL_PREVIOUS_ARB);
glTexEnvf (GL_TEXTURE_ENV, GL_SOURCE1_RGB_ARB, GL_TEXTURE);
glTexEnvf (GL_TEXTURE_ENV, GL_SOURCE2_RGB_ARB, GL_TEXTURE);
glTexEnvf (GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, GL_INTERPOLATE_ARB);
glTexEnvf (GL_TEXTURE_ENV, GL_OPERAND2_RGB_ARB, GL_SRC_ALPHA);
//SHADERS GL_Bind(surf->texinfo->texture->gl_texturenum);
}
}
void R_DisableMirrorShader(msurface_t *surf,mirrorplane_t *mir) {
if ((surf->flags & SURF_DRAWTURB) && !(surf->flags & SURF_GLASS)) {
//it is water
glDisable(GL_BLEND);
return;
} else {
if (surf->flags & SURF_DRAWTURB) {
glDisable(GL_BLEND);
return;
}
glTexEnvf (GL_TEXTURE_ENV, GL_OPERAND2_RGB_ARB, GL_SRC_COLOR);
GL_DisableMultitexture();
}
}
void R_DrawMirrorSurfaces()
{
int i;
msurface_t *s;
glBlendFunc(GL_SRC_ALPHA,GL_ONE);
for (i=0; i<NUM_MIRROR_PLANES; i++) {
if (mirrorplanes[i].chain) {
glMatrixMode(GL_TEXTURE);
glPushMatrix();
if (mir_detail.value > 0) {
glLoadIdentity();
glTranslatef(0.5, 0.5, 0);
glScalef(0.5, 0.5, 0);
glMultMatrixf (r_projection_matrix);
glMultMatrixf (r_world_matrix);
} else {
//glMultMatrixf (r_projection_matrix);
glTranslatef(r_refdef.vieworg[0]/1000,r_refdef.vieworg[1]/1000,r_refdef.vieworg[2]/1000);
glTexGeni(GL_S,GL_TEXTURE_GEN_MODE,GL_SPHERE_MAP);
glTexGeni(GL_T,GL_TEXTURE_GEN_MODE,GL_SPHERE_MAP);
glEnable(GL_TEXTURE_GEN_S);
glEnable(GL_TEXTURE_GEN_T);
}
R_SetupMirrorShader(mirrorplanes[i].chain,&mirrorplanes[i]);
s = mirrorplanes[i].chain;
glNormal3fv(mirrorplanes[i].plane.normal);
for ( ; s ; s=s->texturechain) {
if ((s->flags & SURF_GLASS) && (s->flags & SURF_DRAWTURB)) {
glColor4f(1,1,1,0.5);
EmitMirrorPolys (s);
} else if (s->flags & SURF_DRAWTURB) {
glColor4f(1,1,1,r_wateralpha.value);
EmitMirrorWaterPolys (s);
} else {
glColor4f(1,1,1,1);
EmitMirrorPolys (s);
}
}
R_DisableMirrorShader(mirrorplanes[i].chain,&mirrorplanes[i]);
glPopMatrix();
if (mir_detail.value == 0) {
glDisable(GL_TEXTURE_GEN_S);
glDisable(GL_TEXTURE_GEN_T);
}
glMatrixMode(GL_MODELVIEW);
}
}
glBlendFunc(GL_SRC_ALPHA,GL_ONE_MINUS_SRC_ALPHA);
}
/*
=============
R_Clear
=============
*/
void R_Clear (void)
{
/*if (r_mirroralpha.value != 1.0)
{
if (gl_clear.value)
glClear (GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
else
glClear (GL_DEPTH_BUFFER_BIT);
gldepthmin = 0;
gldepthmax = 0.5;
glDepthFunc (GL_LEQUAL);
}
else if (gl_ztrick.value) PENTA: Removed
{
static int trickframe;
if (gl_clear.value)
glClear (GL_COLOR_BUFFER_BIT);
trickframe++;
if (trickframe & 1)
{
gldepthmin = 0;
gldepthmax = 0.49999;
glDepthFunc (GL_LEQUAL);
}
else
{
gldepthmin = 1;
gldepthmax = 0.5;
glDepthFunc (GL_GEQUAL);
}
}
else*/
{
if (gl_clear.value || gl_wireframe.value)
glClear (GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
else
glClear (GL_DEPTH_BUFFER_BIT);
gldepthmin = 0;
gldepthmax = 1;
glDepthFunc (GL_LEQUAL);
}
glDepthRange (gldepthmin, gldepthmax);
}
/*
================
R_RenderView
r_refdef must be set before the first call
================
*/
void R_RenderView (void)
{
double time1 = 0.0, time2;
GLfloat colors[4] = {(GLfloat) 0.2, (GLfloat) 0.1, (GLfloat) 0.0, (GLfloat) 0.20};
float oldfogen;
int viewcont;
if (r_norefresh.value)
return;
if (!r_worldentity.model || !cl.worldmodel)
Sys_Error ("R_RenderView: NULL worldmodel");
mirror = false;
if (gl_finish.value)
glFinish ();
R_Clear ();
viewcont = CL_PointContents(r_origin);
fog_color[3] = 1.0;
if ((viewcont & CONTENTS_WATER) && (fog_waterfog.value)){
glFogi(GL_FOG_MODE, GL_LINEAR);
fog_color[0] = 64/255.0;
fog_color[1] = 48/255.0;
fog_color[2] = 0.0;
glFogfv(GL_FOG_COLOR, fog_color);
glFogf(GL_FOG_END, 512);
glFogf(GL_FOG_START, 0);
glEnable(GL_FOG);
oldfogen = gl_fog.value;
gl_fog.value = 1.0;
} else if ((viewcont & CONTENTS_SLIME) && (fog_waterfog.value)){
glFogi(GL_FOG_MODE, GL_LINEAR);
fog_color[0] = 0.0;
fog_color[1] = 128/255.0;
fog_color[2] = 32/255.0;
glFogfv(GL_FOG_COLOR, fog_color);
glFogf(GL_FOG_END, 256);
glFogf(GL_FOG_START, 0);
glEnable(GL_FOG);
oldfogen = gl_fog.value;
gl_fog.value = 1.0;
} else if ((viewcont & CONTENTS_LAVA) && (fog_waterfog.value)){
glFogi(GL_FOG_MODE, GL_LINEAR);
fog_color[0] = 255/255.0;
fog_color[1] = 64/255.0;
fog_color[2] = 0.0;
glFogfv(GL_FOG_COLOR, fog_color);
glFogf(GL_FOG_END, 256);
glFogf(GL_FOG_START, 0);
glEnable(GL_FOG);
oldfogen = gl_fog.value;
gl_fog.value = 1.0;
} else {
glFogi(GL_FOG_MODE, GL_LINEAR);
fog_color[0] = fog_r.value/255.0;
fog_color[1] = fog_g.value/255.0;
fog_color[2] = fog_b.value/255.0;
glFogfv(GL_FOG_COLOR, fog_color);
glFogf(GL_FOG_END, fog_end.value);
glFogf(GL_FOG_START, fog_start.value);
if (gl_fog.value && !gl_wireframe.value)
glEnable(GL_FOG);
}
if (mir_detail.value > 0) {
R_RenderMirrors();
// glClear (GL_DEPTH_BUFFER_BIT);
}
R_ClearMirrorChains();
R_Glare ();
R_ClearMirrorChains();
// render normal view
R_RenderScene ();
DrawLightVolumeInfo();
//R_DrawViewModel ();
/*Rendering fog in black for particles is done to stop triangle effect on the
particles. It is done right before and fixed after each particle draw function
to avoid effection fog on the water. A particle draw is done after the water
draw to make sure particles are rendered over the surface of the water. - Eradicator*/
// R_DrawWaterSurfaces ();
R_DrawMirrorSurfaces ();
// More fog right here :)
if ((viewcont & CONTENTS_WATER) && (fog_waterfog.value)){
gl_fog.value = oldfogen;
}
glDisable(GL_FOG);
// End of all fog code...
//glFogfv(GL_FOG_COLOR, color_black); //Stops triangle effect on particles
R_DrawParticles (); //Fixes particle & water bug
//glFogfv(GL_FOG_COLOR, fog_color); //Real fog colour
//Draw a poly over the screen (underwater, slime, blood hit)
R_DrawGlare() ;
R_PolyBlend ();
}