// r_surf.c: surface-related refresh code
#include "quakedef.h"
+#include "r_shadow.h"
+#include "portals.h"
-int lightmap_textures;
+#define MAX_LIGHTMAP_SIZE 256
-#define BLOCK_WIDTH 256
-#define BLOCK_HEIGHT 256
-// LordHavoc: increased lightmap limit from 64 to 1024
-#define MAX_LIGHTMAPS 1024
-#define LIGHTMAPSIZE (BLOCK_WIDTH*BLOCK_HEIGHT*4)
-
-int active_lightmaps;
-
-short allocated[MAX_LIGHTMAPS][BLOCK_WIDTH];
-
-byte *lightmaps[MAX_LIGHTMAPS];
-short lightmapupdate[MAX_LIGHTMAPS][2];
-
-signed int blocklights[BLOCK_WIDTH*BLOCK_HEIGHT*3]; // LordHavoc: *3 for colored lighting
-
-int lightmapalign, lightmapalignmask; // LordHavoc: NVIDIA's broken subimage fix, see BuildLightmaps for notes
-cvar_t gl_lightmapalign = {0, "gl_lightmapalign", "4"};
-cvar_t gl_lightmaprgba = {0, "gl_lightmaprgba", "1"};
-cvar_t gl_nosubimagefragments = {0, "gl_nosubimagefragments", "0"};
-cvar_t gl_nosubimage = {0, "gl_nosubimage", "0"};
-cvar_t r_ambient = {0, "r_ambient", "0"};
-cvar_t gl_vertex = {0, "gl_vertex", "0"};
-cvar_t r_dlightmap = {CVAR_SAVE, "r_dlightmap", "1"};
-cvar_t r_drawportals = {0, "r_drawportals", "0"};
-cvar_t r_testvis = {0, "r_testvis", "0"};
-cvar_t r_solidworldnode = {0, "r_solidworldnode", "3"};
-cvar_t r_pvsworldnode = {0, "r_pvsworldnode", "1"};
-
-qboolean lightmaprgba, nosubimagefragments, nosubimage;
-int lightmapbytes;
-
-int wateralpha;
-
-void gl_surf_start(void)
-{
-}
-
-void gl_surf_shutdown(void)
-{
-}
-
-void gl_surf_newmap(void)
-{
-}
-
-void GL_Surf_Init(void)
-{
- int i;
- for (i = 0;i < MAX_LIGHTMAPS;i++)
- lightmaps[i] = NULL;
- Cvar_RegisterVariable(&gl_lightmapalign);
- Cvar_RegisterVariable(&gl_lightmaprgba);
- Cvar_RegisterVariable(&gl_nosubimagefragments);
- Cvar_RegisterVariable(&gl_nosubimage);
- Cvar_RegisterVariable(&r_ambient);
- Cvar_RegisterVariable(&gl_vertex);
- Cvar_RegisterVariable(&r_dlightmap);
- Cvar_RegisterVariable(&r_drawportals);
- Cvar_RegisterVariable(&r_testvis);
- Cvar_RegisterVariable(&r_solidworldnode);
- Cvar_RegisterVariable(&r_pvsworldnode);
-
- R_RegisterModule("GL_Surf", gl_surf_start, gl_surf_shutdown, gl_surf_newmap);
-}
-
-int dlightdivtable[32768];
+cvar_t r_ambient = {0, "r_ambient", "0", "brighter world cheat (not allowed in multiplayer), value is 0-128"};
+cvar_t r_lockpvs = {0, "r_lockpvs", "0", "disables pvs switching, allows you to walk around and inspect what is visible from a given location in the map (anything not visible from your current location will not be drawn)"};
+cvar_t r_lockvisibility = {0, "r_lockvisibility", "0", "disables visibility updates, allows you to walk around and inspect what is visible from a given viewpoint in the map (anything offscreen at the moment this is enabled will not be drawn)"};
+cvar_t r_useportalculling = {0, "r_useportalculling", "1", "use advanced portal culling visibility method to improve performance over just Potentially Visible Set, provides an even more significant speed improvement in unvised maps"};
+cvar_t r_q3bsp_renderskydepth = {0, "r_q3bsp_renderskydepth", "0", "draws sky depth masking in q3 maps (as in q1 maps), this means for example that sky polygons can hide other things"};
/*
- R_AddDynamicLights
+===============
+R_BuildLightMap
+
+Combine and scale multiple lightmaps into the 8.8 format in blocklights
+===============
*/
-int R_AddDynamicLights (msurface_t *surf)
+void R_BuildLightMap (const entity_render_t *ent, msurface_t *surface)
{
- int sdtable[18], lnum, td, maxdist, maxdist2, maxdist3, i, s, t, smax, tmax, red, green, blue, lit, dist2, impacts, impactt;
- unsigned int *bl;
- float dist;
- vec3_t impact, local;
-
- // LordHavoc: use 64bit integer... shame it's not very standardized...
-#if _MSC_VER || __BORLANDC__
- __int64 k;
-#else
- long long k;
-#endif
+ int smax, tmax, i, size, size3, maps, l;
+ int *bl, scale;
+ unsigned char *lightmap, *out, *stain;
+ model_t *model = ent->model;
+ static int intblocklights[MAX_LIGHTMAP_SIZE*MAX_LIGHTMAP_SIZE*3]; // LordHavoc: *3 for colored lighting
+ static unsigned char templight[MAX_LIGHTMAP_SIZE*MAX_LIGHTMAP_SIZE*4];
- lit = false;
+ // update cached lighting info
+ surface->cached_dlight = 0;
- if (!dlightdivtable[1])
+ smax = (surface->lightmapinfo->extents[0]>>4)+1;
+ tmax = (surface->lightmapinfo->extents[1]>>4)+1;
+ size = smax*tmax;
+ size3 = size*3;
+ lightmap = surface->lightmapinfo->samples;
+
+// set to full bright if no light data
+ bl = intblocklights;
+ if (!model->brushq1.lightdata)
{
- dlightdivtable[0] = 4194304;
- for (s = 1; s < 32768; s++)
- dlightdivtable[s] = 4194304 / (s << 7);
+ for (i = 0;i < size3;i++)
+ bl[i] = 255*256;
}
-
- smax = (surf->extents[0] >> 4) + 1;
- tmax = (surf->extents[1] >> 4) + 1;
-
- for (lnum = 0; lnum < MAX_DLIGHTS; lnum++)
+ else
{
- if (!(surf->dlightbits[lnum >> 5] & (1 << (lnum & 31))))
- continue; // not lit by this light
-
- VectorSubtract (cl_dlights[lnum].origin, currententity->render.origin, local);
- dist = DotProduct (local, surf->plane->normal) - surf->plane->dist;
-
- // for comparisons to minimum acceptable light
- maxdist = (int) ((cl_dlights[lnum].radius * cl_dlights[lnum].radius));
-
- // clamp radius to avoid exceeding 32768 entry division table
- if (maxdist > 4194304)
- maxdist = 4194304;
-
- dist2 = dist * dist;
- if (dist2 >= maxdist)
- continue;
-
- impact[0] = cl_dlights[lnum].origin[0] - surf->plane->normal[0] * dist;
- impact[1] = cl_dlights[lnum].origin[1] - surf->plane->normal[1] * dist;
- impact[2] = cl_dlights[lnum].origin[2] - surf->plane->normal[2] * dist;
-
- impacts = DotProduct (impact, surf->texinfo->vecs[0]) + surf->texinfo->vecs[0][3] - surf->texturemins[0];
- impactt = DotProduct (impact, surf->texinfo->vecs[1]) + surf->texinfo->vecs[1][3] - surf->texturemins[1];
-
- s = bound(0, impacts, smax * 16) - impacts;
- t = bound(0, impactt, tmax * 16) - impactt;
- i = s * s + t * t + dist2;
- if (i > maxdist)
- continue;
+// clear to no light
+ memset(bl, 0, size3*sizeof(*bl));
- // reduce calculations
- for (s = 0, i = impacts; s < smax; s++, i -= 16)
- sdtable[s] = i * i + dist2 + LIGHTOFFSET;
+// add all the lightmaps
+ if (lightmap)
+ for (maps = 0;maps < MAXLIGHTMAPS && surface->lightmapinfo->styles[maps] != 255;maps++, lightmap += size3)
+ for (scale = r_refdef.lightstylevalue[surface->lightmapinfo->styles[maps]], i = 0;i < size3;i++)
+ bl[i] += lightmap[i] * scale;
+ }
- maxdist3 = maxdist - (int) (dist * dist);
+ stain = surface->lightmapinfo->stainsamples;
+ bl = intblocklights;
+ out = templight;
+ // the >> 16 shift adjusts down 8 bits to account for the stainmap
+ // scaling, and remaps the 0-65536 (2x overbright) to 0-256, it will
+ // be doubled during rendering to achieve 2x overbright
+ // (0 = 0.0, 128 = 1.0, 256 = 2.0)
+ if (model->brushq1.lightmaprgba)
+ {
+ for (i = 0;i < size;i++)
+ {
+ l = (*bl++ * *stain++) >> 16;*out++ = min(l, 255);
+ l = (*bl++ * *stain++) >> 16;*out++ = min(l, 255);
+ l = (*bl++ * *stain++) >> 16;*out++ = min(l, 255);
+ *out++ = 255;
+ }
+ }
+ else
+ {
+ for (i = 0;i < size;i++)
+ {
+ l = (*bl++ * *stain++) >> 16;*out++ = min(l, 255);
+ l = (*bl++ * *stain++) >> 16;*out++ = min(l, 255);
+ l = (*bl++ * *stain++) >> 16;*out++ = min(l, 255);
+ }
+ }
- // convert to 8.8 blocklights format and scale up by radius
- red = cl_dlights[lnum].color[0] * maxdist;
- green = cl_dlights[lnum].color[1] * maxdist;
- blue = cl_dlights[lnum].color[2] * maxdist;
- bl = blocklights;
+ R_UpdateTexture(surface->lightmaptexture, templight, surface->lightmapinfo->lightmaporigin[0], surface->lightmapinfo->lightmaporigin[1], smax, tmax);
- i = impactt;
- for (t = 0; t < tmax; t++, i -= 16)
+ // update the surface's deluxemap if it has one
+ if (surface->deluxemaptexture != r_texture_blanknormalmap)
+ {
+ vec3_t n;
+ unsigned char *normalmap = surface->lightmapinfo->nmapsamples;
+ lightmap = surface->lightmapinfo->samples;
+ // clear to no normalmap
+ bl = intblocklights;
+ memset(bl, 0, size3*sizeof(*bl));
+ // add all the normalmaps
+ if (lightmap && normalmap)
{
- td = i * i;
- // make sure some part of it is visible on this line
- if (td < maxdist3)
+ for (maps = 0;maps < MAXLIGHTMAPS && surface->lightmapinfo->styles[maps] != 255;maps++, lightmap += size3, normalmap += size3)
{
- maxdist2 = maxdist - td;
- for (s = 0; s < smax; s++)
+ for (scale = r_refdef.lightstylevalue[surface->lightmapinfo->styles[maps]], i = 0;i < size;i++)
{
- if (sdtable[s] < maxdist2)
- {
- k = dlightdivtable[(sdtable[s] + td) >> 7];
- bl[0] += (red * k) >> 9;
- bl[1] += (green * k) >> 9;
- bl[2] += (blue * k) >> 9;
- lit = true;
- }
- bl += 3;
+ // add the normalmap with weighting proportional to the style's lightmap intensity
+ l = (int)(VectorLength(lightmap + i*3) * scale);
+ bl[i*3+0] += ((int)normalmap[i*3+0] - 128) * l;
+ bl[i*3+1] += ((int)normalmap[i*3+1] - 128) * l;
+ bl[i*3+2] += ((int)normalmap[i*3+2] - 128) * l;
}
}
- else // skip line
- bl += smax * 3;
}
- }
- return lit;
-}
-
-
-void R_ConvertLightmap (int *in, byte *out, int width, int height, int stride)
-{
- int i, j, shift;
- stride -= (width*lightmapbytes);
- // deal with lightmap brightness scale
- shift = 7 + lightscalebit;
- if (lightmaprgba)
- {
- for (i = 0;i < height;i++, out += stride)
+ bl = intblocklights;
+ out = templight;
+ // we simply renormalize the weighted normals to get a valid deluxemap
+ if (model->brushq1.lightmaprgba)
{
- for (j = 0;j < width;j++, in += 3, out += 4)
+ for (i = 0;i < size;i++, bl += 3)
{
- out[0] = min(in[0] >> shift, 255);
- out[1] = min(in[1] >> shift, 255);
- out[2] = min(in[2] >> shift, 255);
- out[3] = 255;
+ VectorCopy(bl, n);
+ VectorNormalize(n);
+ l = (int)(n[0] * 128 + 128);*out++ = bound(0, l, 255);
+ l = (int)(n[1] * 128 + 128);*out++ = bound(0, l, 255);
+ l = (int)(n[2] * 128 + 128);*out++ = bound(0, l, 255);
+ *out++ = 255;
}
}
- }
- else
- {
- for (i = 0;i < height;i++, out += stride)
+ else
{
- for (j = 0;j < width;j++, in += 3, out += 3)
+ for (i = 0;i < size;i++, bl += 3)
{
- out[0] = min(in[0] >> shift, 255);
- out[1] = min(in[1] >> shift, 255);
- out[2] = min(in[2] >> shift, 255);
+ VectorCopy(bl, n);
+ VectorNormalize(n);
+ l = (int)(n[0] * 128 + 128);*out++ = bound(0, l, 255);
+ l = (int)(n[1] * 128 + 128);*out++ = bound(0, l, 255);
+ l = (int)(n[2] * 128 + 128);*out++ = bound(0, l, 255);
}
}
+ R_UpdateTexture(surface->deluxemaptexture, templight, surface->lightmapinfo->lightmaporigin[0], surface->lightmapinfo->lightmaporigin[1], smax, tmax);
}
}
-/*
-===============
-R_BuildLightMap
-
-Combine and scale multiple lightmaps into the 8.8 format in blocklights
-===============
-*/
-void R_BuildLightMap (msurface_t *surf, byte *dest, int stride)
+void R_StainNode (mnode_t *node, model_t *model, const vec3_t origin, float radius, const float fcolor[8])
{
- int smax, tmax;
- int i, j, size, size3;
- byte *lightmap;
- int scale;
- int maps;
- int *bl;
-
- surf->cached_dlight = 0;
- surf->cached_lightscalebit = lightscalebit;
- surf->cached_ambient = r_ambient.value;
-
- smax = (surf->extents[0]>>4)+1;
- tmax = (surf->extents[1]>>4)+1;
- size = smax*tmax;
- size3 = size*3;
- lightmap = surf->samples;
+ float ndist, a, ratio, maxdist, maxdist2, maxdist3, invradius, sdtable[256], td, dist2;
+ msurface_t *surface, *endsurface;
+ int i, s, t, smax, tmax, smax3, impacts, impactt, stained;
+ unsigned char *bl;
+ vec3_t impact;
-// set to full bright if no light data
- if ((currententity && (currententity->render.effects & EF_FULLBRIGHT)) || !cl.worldmodel->lightdata)
+ maxdist = radius * radius;
+ invradius = 1.0f / radius;
+
+loc0:
+ if (!node->plane)
+ return;
+ ndist = PlaneDiff(origin, node->plane);
+ if (ndist > radius)
{
- bl = blocklights;
- for (i=0 ; i<size ; i++)
- {
- *bl++ = 255*256;
- *bl++ = 255*256;
- *bl++ = 255*256;
- }
+ node = node->children[0];
+ goto loc0;
+ }
+ if (ndist < -radius)
+ {
+ node = node->children[1];
+ goto loc0;
+ }
+
+ dist2 = ndist * ndist;
+ maxdist3 = maxdist - dist2;
+
+ if (node->plane->type < 3)
+ {
+ VectorCopy(origin, impact);
+ impact[node->plane->type] -= ndist;
}
else
{
-// clear to no light
- j = r_ambient.value * 512.0f; // would be 256.0f logically, but using 512.0f to match winquake style
- if (j)
- {
- bl = blocklights;
- for (i = 0;i < size3;i++)
- *bl++ = j;
- }
- else
- memset(&blocklights[0], 0, size*3*sizeof(int));
+ impact[0] = origin[0] - node->plane->normal[0] * ndist;
+ impact[1] = origin[1] - node->plane->normal[1] * ndist;
+ impact[2] = origin[2] - node->plane->normal[2] * ndist;
+ }
-// add all the lightmaps
- if (lightmap)
+ for (surface = model->data_surfaces + node->firstsurface, endsurface = surface + node->numsurfaces;surface < endsurface;surface++)
+ {
+ if (surface->lightmapinfo->stainsamples)
{
- for (maps = 0;maps < MAXLIGHTMAPS && surf->styles[maps] != 255;maps++)
+ smax = (surface->lightmapinfo->extents[0] >> 4) + 1;
+ tmax = (surface->lightmapinfo->extents[1] >> 4) + 1;
+
+ impacts = (int)(DotProduct (impact, surface->lightmapinfo->texinfo->vecs[0]) + surface->lightmapinfo->texinfo->vecs[0][3] - surface->lightmapinfo->texturemins[0]);
+ impactt = (int)(DotProduct (impact, surface->lightmapinfo->texinfo->vecs[1]) + surface->lightmapinfo->texinfo->vecs[1][3] - surface->lightmapinfo->texturemins[1]);
+
+ s = bound(0, impacts, smax * 16) - impacts;
+ t = bound(0, impactt, tmax * 16) - impactt;
+ i = (int)(s * s + t * t + dist2);
+ if (i > maxdist)
+ continue;
+
+ // reduce calculations
+ for (s = 0, i = impacts; s < smax; s++, i -= 16)
+ sdtable[s] = i * i + dist2;
+
+ bl = surface->lightmapinfo->stainsamples;
+ smax3 = smax * 3;
+ stained = false;
+
+ i = impactt;
+ for (t = 0;t < tmax;t++, i -= 16)
{
- scale = d_lightstylevalue[surf->styles[maps]];
- surf->cached_light[maps] = scale; // 8.8 fraction
- bl = blocklights;
- for (i = 0;i < size3;i++)
- *bl++ += *lightmap++ * scale;
+ td = i * i;
+ // make sure some part of it is visible on this line
+ if (td < maxdist3)
+ {
+ maxdist2 = maxdist - td;
+ for (s = 0;s < smax;s++)
+ {
+ if (sdtable[s] < maxdist2)
+ {
+ ratio = lhrandom(0.0f, 1.0f);
+ a = (fcolor[3] + ratio * fcolor[7]) * (1.0f - sqrt(sdtable[s] + td) * invradius);
+ if (a >= (1.0f / 64.0f))
+ {
+ if (a > 1)
+ a = 1;
+ bl[0] = (unsigned char) ((float) bl[0] + a * ((fcolor[0] + ratio * fcolor[4]) - (float) bl[0]));
+ bl[1] = (unsigned char) ((float) bl[1] + a * ((fcolor[1] + ratio * fcolor[5]) - (float) bl[1]));
+ bl[2] = (unsigned char) ((float) bl[2] + a * ((fcolor[2] + ratio * fcolor[6]) - (float) bl[2]));
+ stained = true;
+ }
+ }
+ bl += 3;
+ }
+ }
+ else // skip line
+ bl += smax3;
}
+ // force lightmap upload
+ if (stained)
+ surface->cached_dlight = true;
}
- if (r_dlightmap.value && surf->dlightframe == r_framecount)
- if ((surf->cached_dlight = R_AddDynamicLights(surf)))
- c_light_polys++;
}
- R_ConvertLightmap(blocklights, dest, smax, tmax, stride);
-}
-
-byte templight[BLOCK_WIDTH*BLOCK_HEIGHT*4];
-void R_UpdateLightmap(msurface_t *s, int lnum)
-{
- int smax, tmax;
- // upload the new lightmap texture fragment
- if(r_upload.value)
- glBindTexture(GL_TEXTURE_2D, lightmap_textures + lnum);
- if (nosubimage || nosubimagefragments)
- {
- if (lightmapupdate[lnum][0] > s->light_t)
- lightmapupdate[lnum][0] = s->light_t;
- if (lightmapupdate[lnum][1] < (s->light_t + ((s->extents[1]>>4)+1)))
- lightmapupdate[lnum][1] = (s->light_t + ((s->extents[1]>>4)+1));
- if (lightmaprgba)
- R_BuildLightMap (s, lightmaps[s->lightmaptexturenum] + (s->light_t * BLOCK_WIDTH + s->light_s) * 4, BLOCK_WIDTH * 4);
- else
- R_BuildLightMap (s, lightmaps[s->lightmaptexturenum] + (s->light_t * BLOCK_WIDTH + s->light_s) * 3, BLOCK_WIDTH * 3);
- }
- else
+ if (node->children[0]->plane)
{
- smax = ((s->extents[0]>>4)+lightmapalign) & lightmapalignmask;
- tmax = (s->extents[1]>>4)+1;
- if (lightmaprgba)
+ if (node->children[1]->plane)
{
- R_BuildLightMap (s, templight, smax * 4);
- if(r_upload.value)
- glTexSubImage2D(GL_TEXTURE_2D, 0, s->light_s, s->light_t, smax, tmax, GL_RGBA, GL_UNSIGNED_BYTE, templight);
+ R_StainNode(node->children[0], model, origin, radius, fcolor);
+ node = node->children[1];
+ goto loc0;
}
else
{
- R_BuildLightMap (s, templight, smax * 3);
- if(r_upload.value)
- glTexSubImage2D(GL_TEXTURE_2D, 0, s->light_s, s->light_t, smax, tmax, GL_RGB , GL_UNSIGNED_BYTE, templight);
+ node = node->children[0];
+ goto loc0;
}
}
-}
-
-
-/*
-===============
-R_TextureAnimation
-
-Returns the proper texture for a given time and base texture
-===============
-*/
-texture_t *R_TextureAnimation (texture_t *base)
-{
-// texture_t *original;
-// int relative;
-// int count;
-
- if (currententity->render.frame)
+ else if (node->children[1]->plane)
{
- if (base->alternate_anims)
- base = base->alternate_anims;
+ node = node->children[1];
+ goto loc0;
}
-
- if (!base->anim_total)
- return base;
-
- return base->anim_frames[(int)(cl.time*5) % base->anim_total];
+}
- /*
- original = base;
+void R_Stain (const vec3_t origin, float radius, int cr1, int cg1, int cb1, int ca1, int cr2, int cg2, int cb2, int ca2)
+{
+ int n;
+ float fcolor[8];
+ entity_render_t *ent;
+ model_t *model;
+ vec3_t org;
+ if (r_refdef.worldmodel == NULL || !r_refdef.worldmodel->brush.data_nodes || !r_refdef.worldmodel->brushq1.lightdata)
+ return;
+ fcolor[0] = cr1;
+ fcolor[1] = cg1;
+ fcolor[2] = cb1;
+ fcolor[3] = ca1 * (1.0f / 64.0f);
+ fcolor[4] = cr2 - cr1;
+ fcolor[5] = cg2 - cg1;
+ fcolor[6] = cb2 - cb1;
+ fcolor[7] = (ca2 - ca1) * (1.0f / 64.0f);
- relative = (int)(cl.time*5) % base->anim_total;
+ R_StainNode(r_refdef.worldmodel->brush.data_nodes + r_refdef.worldmodel->brushq1.hulls[0].firstclipnode, r_refdef.worldmodel, origin, radius, fcolor);
- count = 0;
- while (base->anim_min > relative || base->anim_max <= relative)
+ // look for embedded bmodels
+ for (n = 0;n < cl.num_brushmodel_entities;n++)
{
- base = base->anim_next;
- if (!base)
- {
- Con_Printf("R_TextureAnimation: broken cycle");
- return original;
- }
- if (++count > 100)
+ ent = &cl.entities[cl.brushmodel_entities[n]].render;
+ model = ent->model;
+ if (model && model->name[0] == '*')
{
- Con_Printf("R_TextureAnimation: infinite cycle");
- return original;
+ if (model->brush.data_nodes)
+ {
+ Matrix4x4_Transform(&ent->inversematrix, origin, org);
+ R_StainNode(model->brush.data_nodes + model->brushq1.hulls[0].firstclipnode, model, org, radius, fcolor);
+ }
}
}
-
- return base;
- */
}
=============================================================
*/
-
-float turbsin[256] =
+static void R_DrawPortal_Callback(const entity_render_t *ent, const rtlight_t *rtlight, int numsurfaces, int *surfacelist)
{
- #include "gl_warp_sin.h"
-};
-#define TURBSCALE (256.0 / (2 * M_PI))
-
-
-void UploadLightmaps(void)
+ // due to the hacky nature of this function's parameters, this is never
+ // called with a batch, so numsurfaces is always 1, and the surfacelist
+ // contains only a leaf number for coloring purposes
+ const mportal_t *portal = (mportal_t *)ent;
+ int i, numpoints;
+ float *v;
+ float vertex3f[POLYGONELEMENTS_MAXPOINTS*3];
+ CHECKGLERROR
+ GL_BlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
+ GL_DepthMask(false);
+ GL_DepthTest(true);
+ GL_CullFace(GL_NONE);
+ R_Mesh_Matrix(&identitymatrix);
+
+ numpoints = min(portal->numpoints, POLYGONELEMENTS_MAXPOINTS);
+
+ R_Mesh_VertexPointer(vertex3f);
+ R_Mesh_ColorPointer(NULL);
+ R_Mesh_ResetTextureState();
+
+ i = surfacelist[0];
+ GL_Color(((i & 0x0007) >> 0) * (1.0f / 7.0f) * r_view.colorscale,
+ ((i & 0x0038) >> 3) * (1.0f / 7.0f) * r_view.colorscale,
+ ((i & 0x01C0) >> 6) * (1.0f / 7.0f) * r_view.colorscale,
+ 0.125f);
+ for (i = 0, v = vertex3f;i < numpoints;i++, v += 3)
+ VectorCopy(portal->points[i].position, v);
+ R_Mesh_Draw(0, numpoints, numpoints - 2, polygonelements);
+}
+
+// LordHavoc: this is just a nice debugging tool, very slow
+void R_DrawPortals(void)
{
- int i;
- if (nosubimage || nosubimagefragments)
+ int i, leafnum;
+ mportal_t *portal;
+ float center[3], f;
+ model_t *model = r_refdef.worldmodel;
+ if (model == NULL)
+ return;
+ for (leafnum = 0;leafnum < r_refdef.worldmodel->brush.num_leafs;leafnum++)
{
- for (i = 0;i < MAX_LIGHTMAPS;i++)
+ if (r_viewcache.world_leafvisible[leafnum])
{
- if (lightmapupdate[i][0] < lightmapupdate[i][1])
+ //for (portalnum = 0, portal = model->brush.data_portals;portalnum < model->brush.num_portals;portalnum++, portal++)
+ for (portal = r_refdef.worldmodel->brush.data_leafs[leafnum].portals;portal;portal = portal->next)
{
- if(r_upload.value)
+ if (portal->numpoints <= POLYGONELEMENTS_MAXPOINTS)
+ if (!R_CullBox(portal->mins, portal->maxs))
{
- glBindTexture(GL_TEXTURE_2D, lightmap_textures + i);
- if (nosubimage)
- {
- if (lightmaprgba)
- glTexImage2D(GL_TEXTURE_2D, 0, 3, BLOCK_WIDTH, BLOCK_HEIGHT, 0, GL_RGBA, GL_UNSIGNED_BYTE, lightmaps[i]);
- else
- glTexImage2D(GL_TEXTURE_2D, 0, 3, BLOCK_WIDTH, BLOCK_HEIGHT, 0, GL_RGB, GL_UNSIGNED_BYTE, lightmaps[i]);
- }
- else
- {
- if (lightmaprgba)
- glTexSubImage2D(GL_TEXTURE_2D, 0, 0, lightmapupdate[i][0], BLOCK_WIDTH, lightmapupdate[i][1] - lightmapupdate[i][0], GL_RGBA, GL_UNSIGNED_BYTE, lightmaps[i] + (BLOCK_WIDTH * 4 * lightmapupdate[i][0]));
- else
- glTexSubImage2D(GL_TEXTURE_2D, 0, 0, lightmapupdate[i][0], BLOCK_WIDTH, lightmapupdate[i][1] - lightmapupdate[i][0], GL_RGB, GL_UNSIGNED_BYTE, lightmaps[i] + (BLOCK_WIDTH * 3 * lightmapupdate[i][0]));
- }
+ VectorClear(center);
+ for (i = 0;i < portal->numpoints;i++)
+ VectorAdd(center, portal->points[i].position, center);
+ f = ixtable[portal->numpoints];
+ VectorScale(center, f, center);
+ R_MeshQueue_AddTransparent(center, R_DrawPortal_Callback, (entity_render_t *)portal, leafnum, r_shadow_rtlight);
}
}
- lightmapupdate[i][0] = BLOCK_HEIGHT;
- lightmapupdate[i][1] = 0;
}
}
}
-float wvert[1024*6]; // used by the following functions
-
-void RSurf_DrawSky(msurface_t *s, int transform)
+void R_View_WorldVisibility(void)
{
- glpoly_t *p;
- int i;
- float *v;
+ int i, j, *mark;
+ mleaf_t *leaf;
+ mleaf_t *viewleaf;
+ model_t *model = r_refdef.worldmodel;
- // LordHavoc: HalfLife maps have freaky skypolys...
- if (hlbsp)
+ if (!model)
return;
- for (p=s->polys ; p ; p=p->next)
+ // if possible find the leaf the view origin is in
+ viewleaf = model->brush.PointInLeaf ? model->brush.PointInLeaf(model, r_view.origin) : NULL;
+ // if possible fetch the visible cluster bits
+ if (!r_lockpvs.integer && model->brush.FatPVS)
+ model->brush.FatPVS(model, r_view.origin, 2, r_viewcache.world_pvsbits, sizeof(r_viewcache.world_pvsbits));
+
+ if (!r_lockvisibility.integer)
{
- if (currentskypoly < MAX_SKYPOLYS && currentskyvert + p->numverts <= MAX_SKYVERTS)
+ // clear the visible surface and leaf flags arrays
+ memset(r_viewcache.world_surfacevisible, 0, model->num_surfaces);
+ memset(r_viewcache.world_leafvisible, 0, model->brush.num_leafs);
+
+ r_viewcache.world_novis = false;
+
+ // if floating around in the void (no pvs data available, and no
+ // portals available), simply use all on-screen leafs.
+ if (!viewleaf || viewleaf->clusterindex < 0)
{
- skypoly[currentskypoly].firstvert = currentskyvert;
- skypoly[currentskypoly++].verts = p->numverts;
- if (transform)
+ // no visibility method: (used when floating around in the void)
+ // simply cull each leaf to the frustum (view pyramid)
+ // similar to quake's RecursiveWorldNode but without cache misses
+ r_viewcache.world_novis = true;
+ for (j = 0, leaf = model->brush.data_leafs;j < model->brush.num_leafs;j++, leaf++)
{
- for (i = 0,v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE)
+ // if leaf is in current pvs and on the screen, mark its surfaces
+ if (!R_CullBox(leaf->mins, leaf->maxs))
{
- softwaretransform(v, skyvert[currentskyvert].v);
- currentskyvert++;
+ r_refdef.stats.world_leafs++;
+ r_viewcache.world_leafvisible[j] = true;
+ if (leaf->numleafsurfaces)
+ for (i = 0, mark = leaf->firstleafsurface;i < leaf->numleafsurfaces;i++, mark++)
+ r_viewcache.world_surfacevisible[*mark] = true;
}
}
- else
+ }
+ // if the user prefers to disable portal culling (testing?), simply
+ // use all on-screen leafs that are in the pvs.
+ else if (!r_useportalculling.integer)
+ {
+ // pvs method:
+ // simply check if each leaf is in the Potentially Visible Set,
+ // and cull to frustum (view pyramid)
+ // similar to quake's RecursiveWorldNode but without cache misses
+ for (j = 0, leaf = model->brush.data_leafs;j < model->brush.num_leafs;j++, leaf++)
+ {
+ // if leaf is in current pvs and on the screen, mark its surfaces
+ if (CHECKPVSBIT(r_viewcache.world_pvsbits, leaf->clusterindex) && !R_CullBox(leaf->mins, leaf->maxs))
+ {
+ r_refdef.stats.world_leafs++;
+ r_viewcache.world_leafvisible[j] = true;
+ if (leaf->numleafsurfaces)
+ for (i = 0, mark = leaf->firstleafsurface;i < leaf->numleafsurfaces;i++, mark++)
+ r_viewcache.world_surfacevisible[*mark] = true;
+ }
+ }
+ }
+ // otherwise use a recursive portal flow, culling each portal to
+ // frustum and checking if the leaf the portal leads to is in the pvs
+ else
+ {
+ int leafstackpos;
+ mportal_t *p;
+ mleaf_t *leafstack[8192];
+ // simple-frustum portal method:
+ // follows portals leading outward from viewleaf, does not venture
+ // offscreen or into leafs that are not visible, faster than
+ // Quake's RecursiveWorldNode and vastly better in unvised maps,
+ // often culls some surfaces that pvs alone would miss
+ // (such as a room in pvs that is hidden behind a wall, but the
+ // passage leading to the room is off-screen)
+ leafstack[0] = viewleaf;
+ leafstackpos = 1;
+ while (leafstackpos)
{
- for (i = 0,v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE)
+ r_refdef.stats.world_leafs++;
+ leaf = leafstack[--leafstackpos];
+ r_viewcache.world_leafvisible[leaf - model->brush.data_leafs] = true;
+ // mark any surfaces bounding this leaf
+ if (leaf->numleafsurfaces)
+ for (i = 0, mark = leaf->firstleafsurface;i < leaf->numleafsurfaces;i++, mark++)
+ r_viewcache.world_surfacevisible[*mark] = true;
+ // follow portals into other leafs
+ // the checks are:
+ // if viewer is behind portal (portal faces outward into the scene)
+ // and the portal polygon's bounding box is on the screen
+ // and the leaf has not been visited yet
+ // and the leaf is visible in the pvs
+ // (the first two checks won't cause as many cache misses as the leaf checks)
+ for (p = leaf->portals;p;p = p->next)
{
- VectorCopy(v, skyvert[currentskyvert].v);
- currentskyvert++;
+ r_refdef.stats.world_portals++;
+ if (DotProduct(r_view.origin, p->plane.normal) < (p->plane.dist + 1) && !R_CullBox(p->mins, p->maxs) && !r_viewcache.world_leafvisible[p->past - model->brush.data_leafs] && CHECKPVSBIT(r_viewcache.world_pvsbits, p->past->clusterindex))
+ leafstack[leafstackpos++] = p->past;
}
}
}
}
}
-int RSurf_Light(int *dlightbits, glpoly_t *polys)
+void R_Q1BSP_DrawSky(entity_render_t *ent)
+{
+ if (ent->model == NULL)
+ return;
+ R_DrawSurfaces(ent, true);
+}
+
+void R_Q1BSP_Draw(entity_render_t *ent)
{
- float cr, cg, cb, radius, radius2, f, *v, *wv;
- int i, a, b, lit = false;
- unsigned int c, d;
- dlight_t *light;
- vec_t *lightorigin;
- glpoly_t *p;
- for (a = 0;a < 8;a++)
+ model_t *model = ent->model;
+ if (model == NULL)
+ return;
+ R_DrawSurfaces(ent, false);
+}
+
+typedef struct r_q1bsp_getlightinfo_s
+{
+ model_t *model;
+ vec3_t relativelightorigin;
+ float lightradius;
+ int *outleaflist;
+ unsigned char *outleafpvs;
+ int outnumleafs;
+ int *outsurfacelist;
+ unsigned char *outsurfacepvs;
+ int outnumsurfaces;
+ vec3_t outmins;
+ vec3_t outmaxs;
+ vec3_t lightmins;
+ vec3_t lightmaxs;
+ const unsigned char *pvs;
+}
+r_q1bsp_getlightinfo_t;
+
+void R_Q1BSP_RecursiveGetLightInfo(r_q1bsp_getlightinfo_t *info, mnode_t *node)
+{
+ int sides;
+ mleaf_t *leaf;
+ for (;;)
{
- if ((c = dlightbits[a]))
+ mplane_t *plane = node->plane;
+ //if (!BoxesOverlap(info->lightmins, info->lightmaxs, node->mins, node->maxs))
+ // return;
+ if (!plane)
+ break;
+ if (plane->type < 3)
+ sides = ((info->lightmaxs[plane->type] >= plane->dist) | ((info->lightmins[plane->type] < plane->dist) << 1));
+ else
+ sides = BoxOnPlaneSide(info->lightmins, info->lightmaxs, plane);
+ if (sides == 3)
+ {
+ R_Q1BSP_RecursiveGetLightInfo(info, node->children[0]);
+ node = node->children[1];
+ }
+ else if (sides == 0)
+ return; // ERROR: NAN bounding box!
+ else
+ node = node->children[sides - 1];
+ }
+ leaf = (mleaf_t *)node;
+ if (info->pvs == NULL || CHECKPVSBIT(info->pvs, leaf->clusterindex))
+ {
+ info->outmins[0] = min(info->outmins[0], leaf->mins[0]);
+ info->outmins[1] = min(info->outmins[1], leaf->mins[1]);
+ info->outmins[2] = min(info->outmins[2], leaf->mins[2]);
+ info->outmaxs[0] = max(info->outmaxs[0], leaf->maxs[0]);
+ info->outmaxs[1] = max(info->outmaxs[1], leaf->maxs[1]);
+ info->outmaxs[2] = max(info->outmaxs[2], leaf->maxs[2]);
+ if (info->outleafpvs)
+ {
+ int leafindex = leaf - info->model->brush.data_leafs;
+ if (!CHECKPVSBIT(info->outleafpvs, leafindex))
+ {
+ SETPVSBIT(info->outleafpvs, leafindex);
+ info->outleaflist[info->outnumleafs++] = leafindex;
+ }
+ }
+ if (info->outsurfacepvs)
{
- for (b = 0, d = 1;c;b++, d <<= 1)
+ int leafsurfaceindex;
+ for (leafsurfaceindex = 0;leafsurfaceindex < leaf->numleafsurfaces;leafsurfaceindex++)
{
- if (c & d)
+ int surfaceindex = leaf->firstleafsurface[leafsurfaceindex];
+ if (!CHECKPVSBIT(info->outsurfacepvs, surfaceindex))
{
- c -= d;
- light = &cl_dlights[a * 32 + b];
- lightorigin = light->origin;
- cr = light->color[0];
- cg = light->color[1];
- cb = light->color[2];
- radius = light->radius*light->radius;
- radius2 = radius * 256.0f;
- wv = wvert;
- for (p = polys;p;p = p->next)
+ msurface_t *surface = info->model->data_surfaces + surfaceindex;
+ if (BoxesOverlap(info->lightmins, info->lightmaxs, surface->mins, surface->maxs))
{
- for (i = 0, v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE)
+ int triangleindex, t;
+ const int *e;
+ const vec_t *v[3];
+ for (triangleindex = 0, t = surface->num_firstshadowmeshtriangle, e = info->model->brush.shadowmesh->element3i + t * 3;triangleindex < surface->num_triangles;triangleindex++, t++, e += 3)
{
- f = VectorDistance2(wv, lightorigin);
- if (f < radius)
+ v[0] = info->model->brush.shadowmesh->vertex3f + e[0] * 3;
+ v[1] = info->model->brush.shadowmesh->vertex3f + e[1] * 3;
+ v[2] = info->model->brush.shadowmesh->vertex3f + e[2] * 3;
+ if (PointInfrontOfTriangle(info->relativelightorigin, v[0], v[1], v[2]) && info->lightmaxs[0] > min(v[0][0], min(v[1][0], v[2][0])) && info->lightmins[0] < max(v[0][0], max(v[1][0], v[2][0])) && info->lightmaxs[1] > min(v[0][1], min(v[1][1], v[2][1])) && info->lightmins[1] < max(v[0][1], max(v[1][1], v[2][1])) && info->lightmaxs[2] > min(v[0][2], min(v[1][2], v[2][2])) && info->lightmins[2] < max(v[0][2], max(v[1][2], v[2][2])))
{
- f = radius2 / (f + LIGHTOFFSET);
- wv[3] += cr * f;
- wv[4] += cg * f;
- wv[5] += cb * f;
- lit = true;
+ SETPVSBIT(info->outsurfacepvs, surfaceindex);
+ info->outsurfacelist[info->outnumsurfaces++] = surfaceindex;
+ break;
}
- wv += 6;
}
}
}
}
}
}
- return lit;
}
-void RSurf_DrawWater(msurface_t *s, texture_t *t, int transform, int alpha)
+void R_Q1BSP_GetLightInfo(entity_render_t *ent, vec3_t relativelightorigin, float lightradius, vec3_t outmins, vec3_t outmaxs, int *outleaflist, unsigned char *outleafpvs, int *outnumleafspointer, int *outsurfacelist, unsigned char *outsurfacepvs, int *outnumsurfacespointer)
+{
+ r_q1bsp_getlightinfo_t info;
+ VectorCopy(relativelightorigin, info.relativelightorigin);
+ info.lightradius = lightradius;
+ info.lightmins[0] = info.relativelightorigin[0] - info.lightradius;
+ info.lightmins[1] = info.relativelightorigin[1] - info.lightradius;
+ info.lightmins[2] = info.relativelightorigin[2] - info.lightradius;
+ info.lightmaxs[0] = info.relativelightorigin[0] + info.lightradius;
+ info.lightmaxs[1] = info.relativelightorigin[1] + info.lightradius;
+ info.lightmaxs[2] = info.relativelightorigin[2] + info.lightradius;
+ if (ent->model == NULL)
+ {
+ VectorCopy(info.lightmins, outmins);
+ VectorCopy(info.lightmaxs, outmaxs);
+ *outnumleafspointer = 0;
+ *outnumsurfacespointer = 0;
+ return;
+ }
+ info.model = ent->model;
+ info.outleaflist = outleaflist;
+ info.outleafpvs = outleafpvs;
+ info.outnumleafs = 0;
+ info.outsurfacelist = outsurfacelist;
+ info.outsurfacepvs = outsurfacepvs;
+ info.outnumsurfaces = 0;
+ VectorCopy(info.relativelightorigin, info.outmins);
+ VectorCopy(info.relativelightorigin, info.outmaxs);
+ memset(outleafpvs, 0, (info.model->brush.num_leafs + 7) >> 3);
+ memset(outsurfacepvs, 0, (info.model->nummodelsurfaces + 7) >> 3);
+ if (info.model->brush.GetPVS)
+ info.pvs = info.model->brush.GetPVS(info.model, info.relativelightorigin);
+ else
+ info.pvs = NULL;
+ R_UpdateAllTextureInfo(ent);
+ if (r_shadow_compilingrtlight)
+ {
+ // use portal recursion for exact light volume culling, and exact surface checking
+ Portal_Visibility(info.model, info.relativelightorigin, info.outleaflist, info.outleafpvs, &info.outnumleafs, info.outsurfacelist, info.outsurfacepvs, &info.outnumsurfaces, NULL, 0, true, info.lightmins, info.lightmaxs, info.outmins, info.outmaxs);
+ }
+ else if (r_shadow_realtime_dlight_portalculling.integer)
+ {
+ // use portal recursion for exact light volume culling, but not the expensive exact surface checking
+ Portal_Visibility(info.model, info.relativelightorigin, info.outleaflist, info.outleafpvs, &info.outnumleafs, info.outsurfacelist, info.outsurfacepvs, &info.outnumsurfaces, NULL, 0, r_shadow_realtime_dlight_portalculling.integer >= 2, info.lightmins, info.lightmaxs, info.outmins, info.outmaxs);
+ }
+ else
+ {
+ // use BSP recursion as lights are often small
+ R_Q1BSP_RecursiveGetLightInfo(&info, info.model->brush.data_nodes);
+ }
+
+ // limit combined leaf box to light boundaries
+ outmins[0] = max(info.outmins[0] - 1, info.lightmins[0]);
+ outmins[1] = max(info.outmins[1] - 1, info.lightmins[1]);
+ outmins[2] = max(info.outmins[2] - 1, info.lightmins[2]);
+ outmaxs[0] = min(info.outmaxs[0] + 1, info.lightmaxs[0]);
+ outmaxs[1] = min(info.outmaxs[1] + 1, info.lightmaxs[1]);
+ outmaxs[2] = min(info.outmaxs[2] + 1, info.lightmaxs[2]);
+
+ *outnumleafspointer = info.outnumleafs;
+ *outnumsurfacespointer = info.outnumsurfaces;
+}
+
+void R_Q1BSP_CompileShadowVolume(entity_render_t *ent, vec3_t relativelightorigin, vec3_t relativelightdirection, float lightradius, int numsurfaces, const int *surfacelist)
+{
+ model_t *model = ent->model;
+ msurface_t *surface;
+ int surfacelistindex;
+ float projectdistance = relativelightdirection ? lightradius : lightradius + model->radius*2 + r_shadow_projectdistance.value;
+ texture_t *texture;
+ r_shadow_compilingrtlight->static_meshchain_shadow = Mod_ShadowMesh_Begin(r_main_mempool, 32768, 32768, NULL, NULL, NULL, false, false, true);
+ R_Shadow_PrepareShadowMark(model->brush.shadowmesh->numtriangles);
+ for (surfacelistindex = 0;surfacelistindex < numsurfaces;surfacelistindex++)
+ {
+ surface = model->data_surfaces + surfacelist[surfacelistindex];
+ texture = surface->texture;
+ if ((texture->basematerialflags & (MATERIALFLAG_NODRAW | MATERIALFLAG_TRANSPARENT | MATERIALFLAG_WALL)) != MATERIALFLAG_WALL)
+ continue;
+ if ((texture->textureflags & (Q3TEXTUREFLAG_TWOSIDED | Q3TEXTUREFLAG_AUTOSPRITE | Q3TEXTUREFLAG_AUTOSPRITE2)) || (ent->flags & RENDER_NOCULLFACE))
+ continue;
+ R_Shadow_MarkVolumeFromBox(surface->num_firstshadowmeshtriangle, surface->num_triangles, model->brush.shadowmesh->vertex3f, model->brush.shadowmesh->element3i, relativelightorigin, relativelightdirection, r_shadow_compilingrtlight->cullmins, r_shadow_compilingrtlight->cullmaxs, surface->mins, surface->maxs);
+ }
+ R_Shadow_VolumeFromList(model->brush.shadowmesh->numverts, model->brush.shadowmesh->numtriangles, model->brush.shadowmesh->vertex3f, model->brush.shadowmesh->element3i, model->brush.shadowmesh->neighbor3i, relativelightorigin, relativelightdirection, projectdistance, numshadowmark, shadowmarklist);
+ r_shadow_compilingrtlight->static_meshchain_shadow = Mod_ShadowMesh_Finish(r_main_mempool, r_shadow_compilingrtlight->static_meshchain_shadow, false, false);
+}
+
+void R_Q1BSP_DrawShadowVolume_Batch(const vec3_t relativelightorigin, const vec3_t relativelightdirection, const vec3_t lightmins, const vec3_t lightmaxs, int texturenumsurfaces, msurface_t **texturesurfacelist)
{
- int i;
- float os = turbsin[(int)(cl.time * TURBSCALE) & 255], ot = turbsin[(int)(cl.time * TURBSCALE + 96.0) & 255];
- glpoly_t *p;
- float *v;
- // FIXME: make fog texture if water texture is transparent?
+ int texturesurfaceindex;
+ RSurf_PrepareVerticesForBatch(false, false, texturenumsurfaces, texturesurfacelist);
+ for (texturesurfaceindex = 0;texturesurfaceindex < texturenumsurfaces;texturesurfaceindex++)
+ {
+ msurface_t *surface = texturesurfacelist[texturesurfaceindex];
+ R_Shadow_MarkVolumeFromBox(surface->num_firsttriangle, surface->num_triangles, rsurface_vertex3f, rsurface_model->surfmesh.data_element3i, relativelightorigin, relativelightdirection, lightmins, lightmaxs, surface->mins, surface->maxs);
+ }
+}
- if (s->dlightframe != r_framecount)
+void R_Q1BSP_DrawShadowVolume(entity_render_t *ent, vec3_t relativelightorigin, vec3_t relativelightdirection, float lightradius, int modelnumsurfaces, const int *modelsurfacelist, const vec3_t lightmins, const vec3_t lightmaxs)
+{
+ model_t *model = ent->model;
+ msurface_t *surface;
+ int modelsurfacelistindex;
+ int f = 0;
+ float projectdistance = relativelightdirection ? lightradius : lightradius + model->radius*2 + r_shadow_projectdistance.value;
+ texture_t *t = NULL;
+ const int maxsurfacelist = 1024;
+ int numsurfacelist = 0;
+ msurface_t *surfacelist[1024];
+ // check the box in modelspace, it was already checked in worldspace
+ if (!BoxesOverlap(model->normalmins, model->normalmaxs, lightmins, lightmaxs))
+ return;
+ R_UpdateAllTextureInfo(ent);
+ if (model->brush.shadowmesh)
{
- vec3_t temp;
- // LordHavoc: fast path for no vertex lighting cases
- if (transform)
+ R_Shadow_PrepareShadowMark(model->brush.shadowmesh->numtriangles);
+ for (modelsurfacelistindex = 0;modelsurfacelistindex < modelnumsurfaces;modelsurfacelistindex++)
{
- if (r_waterripple.value)
- {
- for (p=s->polys ; p ; p=p->next)
- {
- transpolybegin(R_GetTexture(t->texture), R_GetTexture(t->glowtexture), 0, TPOLYTYPE_ALPHA);
- for (i = 0,v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE)
- {
- softwaretransform(v, temp);
- transpolyvert(temp[0], temp[1], temp[2] + r_waterripple.value * turbsin[(int)((temp[0]*(1.0f/32.0f)+cl.time) * TURBSCALE) & 255] * turbsin[(int)((temp[1]*(1.0f/32.0f)+cl.time) * TURBSCALE) & 255] * (1.0f / 64.0f), (v[3] + os) * (1.0f/64.0f), (v[4] + ot) * (1.0f/64.0f), 128, 128, 128, alpha);
- }
- transpolyend();
- }
- }
- else
- {
- for (p=s->polys ; p ; p=p->next)
- {
- transpolybegin(R_GetTexture(t->texture), R_GetTexture(t->glowtexture), 0, TPOLYTYPE_ALPHA);
- for (i = 0,v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE)
- {
- softwaretransform(v, temp);
- transpolyvert(temp[0], temp[1], temp[2], (v[3] + os) * (1.0f/64.0f), (v[4] + ot) * (1.0f/64.0f), 128, 128, 128, alpha);
- }
- transpolyend();
- }
- }
+ surface = model->data_surfaces + modelsurfacelist[modelsurfacelistindex];
+ t = surface->texture->currentframe;
+ if ((t->currentmaterialflags & (MATERIALFLAG_NODRAW | MATERIALFLAG_TRANSPARENT | MATERIALFLAG_WALL)) != MATERIALFLAG_WALL)
+ continue;
+ if ((t->textureflags & (Q3TEXTUREFLAG_TWOSIDED | Q3TEXTUREFLAG_AUTOSPRITE | Q3TEXTUREFLAG_AUTOSPRITE2)) || (ent->flags & RENDER_NOCULLFACE))
+ continue;
+ R_Shadow_MarkVolumeFromBox(surface->num_firstshadowmeshtriangle, surface->num_triangles, model->brush.shadowmesh->vertex3f, model->brush.shadowmesh->element3i, relativelightorigin, relativelightdirection, lightmins, lightmaxs, surface->mins, surface->maxs);
}
- else
+ R_Shadow_VolumeFromList(model->brush.shadowmesh->numverts, model->brush.shadowmesh->numtriangles, model->brush.shadowmesh->vertex3f, model->brush.shadowmesh->element3i, model->brush.shadowmesh->neighbor3i, relativelightorigin, relativelightdirection, projectdistance, numshadowmark, shadowmarklist);
+ }
+ else
+ {
+ projectdistance = lightradius + model->radius*2;
+ RSurf_ActiveEntity(ent, false, false);
+ R_Shadow_PrepareShadowMark(model->surfmesh.num_triangles);
+ // identify lit faces within the bounding box
+ for (modelsurfacelistindex = 0;modelsurfacelistindex < modelnumsurfaces;modelsurfacelistindex++)
{
- if (r_waterripple.value)
- {
- for (p=s->polys ; p ; p=p->next)
- {
- transpolybegin(R_GetTexture(t->texture), R_GetTexture(t->glowtexture), 0, TPOLYTYPE_ALPHA);
- for (i = 0,v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE)
- transpolyvert(v[0], v[1], v[2] + r_waterripple.value * turbsin[(int)((v[0]*(1.0f/32.0f)+cl.time) * TURBSCALE) & 255] * turbsin[(int)((v[1]*(1.0f/32.0f)+cl.time) * TURBSCALE) & 255] * (1.0f / 64.0f), (v[3] + os) * (1.0f/64.0f), (v[4] + ot) * (1.0f/64.0f), 128, 128, 128, alpha);
- transpolyend();
- }
- }
- else
+ surface = model->data_surfaces + modelsurfacelist[modelsurfacelistindex];
+ if (t != surface->texture || numsurfacelist >= maxsurfacelist)
{
- for (p=s->polys ; p ; p=p->next)
+ if (numsurfacelist)
{
- transpolybegin(R_GetTexture(t->texture), R_GetTexture(t->glowtexture), 0, TPOLYTYPE_ALPHA);
- for (i = 0,v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE)
- transpolyvert(v[0], v[1], v[2], (v[3] + os) * (1.0f/64.0f), (v[4] + ot) * (1.0f/64.0f), 128, 128, 128, alpha);
- transpolyend();
+ R_Q1BSP_DrawShadowVolume_Batch(relativelightorigin, relativelightdirection, lightmins, lightmaxs, numsurfacelist, surfacelist);
+ numsurfacelist = 0;
}
+ t = surface->texture;
+ rsurface_texture = t->currentframe;
+ f = (rsurface_texture->currentmaterialflags & (MATERIALFLAG_NODRAW | MATERIALFLAG_TRANSPARENT | MATERIALFLAG_WALL)) == MATERIALFLAG_WALL;
}
+ if (f && surface->num_triangles)
+ surfacelist[numsurfacelist++] = surface;
}
+ if (numsurfacelist)
+ R_Q1BSP_DrawShadowVolume_Batch(relativelightorigin, relativelightdirection, lightmins, lightmaxs, numsurfacelist, surfacelist);
+ R_Shadow_VolumeFromList(model->surfmesh.num_vertices, model->surfmesh.num_triangles, rsurface_vertex3f, model->surfmesh.data_element3i, model->surfmesh.data_neighbor3i, relativelightorigin, relativelightdirection, projectdistance, numshadowmark, shadowmarklist);
}
- else
- {
- float *wv;
- wv = wvert;
- for (p = s->polys;p;p = p->next)
+}
+
+#define BATCHSIZE 256
+
+static void R_Q1BSP_DrawLight_TransparentCallback(const entity_render_t *ent, const rtlight_t *rtlight, int numsurfaces, int *surfacelist)
+{
+ int surfacelistindex, batchcount;
+ texture_t *t;
+ msurface_t *batchsurfaces[BATCHSIZE];
+ // note: in practice this never actually batches, oh well
+ R_Shadow_RenderMode_Begin();
+ R_Shadow_RenderMode_ActiveLight((rtlight_t *)rtlight);
+ R_Shadow_RenderMode_Lighting(false, true);
+ R_Shadow_SetupEntityLight(ent);
+ t = NULL;
+ batchcount = 0;
+ for (surfacelistindex = 0;surfacelistindex < numsurfaces;surfacelistindex++)
+ {
+ msurface_t *surface = ent->model->data_surfaces + surfacelist[surfacelistindex];
+ if (t != surface->texture)
+ {
+ if (batchcount > 0)
+ R_Shadow_RenderSurfacesLighting(batchcount, batchsurfaces);
+ batchcount = 0;
+ t = surface->texture;
+ R_UpdateTextureInfo(ent, t);
+ rsurface_texture = t->currentframe;
+ }
+ batchsurfaces[batchcount++] = surface;
+ }
+ if (batchcount > 0)
+ R_Shadow_RenderSurfacesLighting(batchcount, batchsurfaces);
+ R_Shadow_RenderMode_End();
+}
+
+static void R_Q1BSP_DrawLight_TransparentBatch(int batchnumsurfaces, msurface_t **batchsurfacelist)
+{
+ int batchsurfaceindex;
+ msurface_t *batchsurface;
+ vec3_t tempcenter, center;
+ for (batchsurfaceindex = 0;batchsurfaceindex < batchnumsurfaces;batchsurfaceindex++)
+ {
+ batchsurface = batchsurfacelist[batchsurfaceindex];
+ tempcenter[0] = (batchsurface->mins[0] + batchsurface->maxs[0]) * 0.5f;
+ tempcenter[1] = (batchsurface->mins[1] + batchsurface->maxs[1]) * 0.5f;
+ tempcenter[2] = (batchsurface->mins[2] + batchsurface->maxs[2]) * 0.5f;
+ Matrix4x4_Transform(&rsurface_entity->matrix, tempcenter, center);
+ R_MeshQueue_AddTransparent(rsurface_texture->currentmaterialflags & MATERIALFLAG_NODEPTHTEST ? r_view.origin : center, R_Q1BSP_DrawLight_TransparentCallback, rsurface_entity, batchsurface - rsurface_model->data_surfaces, r_shadow_rtlight);
+ }
+}
+
+#define RSURF_MAX_BATCHSURFACES 1024
+
+void R_Q1BSP_DrawLight(entity_render_t *ent, int numsurfaces, const int *surfacelist)
+{
+ model_t *model = ent->model;
+ msurface_t *surface;
+ int surfacelistindex, batchnumsurfaces;
+ msurface_t *batchsurfacelist[RSURF_MAX_BATCHSURFACES];
+ texture_t *tex;
+ qboolean skip;
+ CHECKGLERROR
+ RSurf_ActiveEntity(ent, true, true);
+ R_UpdateAllTextureInfo(ent);
+ tex = NULL;
+ rsurface_texture = NULL;
+ skip = false;
+ batchnumsurfaces = 0;
+ CHECKGLERROR
+ for (surfacelistindex = 0;surfacelistindex < numsurfaces;surfacelistindex++)
+ {
+ if ((ent == r_refdef.worldentity && !r_viewcache.world_surfacevisible[surfacelist[surfacelistindex]]))
+ continue;
+ surface = model->data_surfaces + surfacelist[surfacelistindex];
+ r_refdef.stats.lights_lighttriangles += surface->num_triangles;
+ if (tex != surface->texture)
{
- for (i = 0, v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE)
+ if (batchnumsurfaces > 0)
{
- if (transform)
- softwaretransform(v, wv);
+ if (rsurface_texture->currentmaterialflags & MATERIALFLAG_BLENDED)
+ R_Q1BSP_DrawLight_TransparentBatch(batchnumsurfaces, batchsurfacelist);
else
- VectorCopy(v, wv);
- if (r_waterripple.value)
- wv[2] += r_waterripple.value * turbsin[(int)((wv[0]*(1.0f/32.0f)+cl.time) * TURBSCALE) & 255] * turbsin[(int)((wv[1]*(1.0f/32.0f)+cl.time) * TURBSCALE) & 255] * (1.0f / 64.0f);
- wv[3] = wv[4] = wv[5] = 128.0f;
- wv += 6;
+ R_Shadow_RenderSurfacesLighting(batchnumsurfaces, batchsurfacelist);
+ batchnumsurfaces = 0;
}
+ tex = surface->texture;
+ rsurface_texture = surface->texture->currentframe;
+ skip = (rsurface_texture->currentmaterialflags & MATERIALFLAG_SKY) != 0;
+ if (skip)
+ continue;
}
- if (s->dlightframe == r_framecount)
- RSurf_Light(s->dlightbits, s->polys);
- wv = wvert;
- for (p=s->polys ; p ; p=p->next)
+ if (!skip && surface->num_triangles)
{
- transpolybegin(R_GetTexture(t->texture), R_GetTexture(t->glowtexture), 0, TPOLYTYPE_ALPHA);
- for (i = 0,v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE, wv += 6)
- transpolyvert(wv[0], wv[1], wv[2], (v[3] + os) * (1.0f/64.0f), (v[4] + ot) * (1.0f/64.0f), wv[3], wv[4], wv[5], alpha);
- transpolyend();
+ if (batchnumsurfaces == RSURF_MAX_BATCHSURFACES)
+ {
+ if (rsurface_texture->currentmaterialflags & MATERIALFLAG_BLENDED)
+ R_Q1BSP_DrawLight_TransparentBatch(batchnumsurfaces, batchsurfacelist);
+ else
+ R_Shadow_RenderSurfacesLighting(batchnumsurfaces, batchsurfacelist);
+ batchnumsurfaces = 0;
+ }
+ batchsurfacelist[batchnumsurfaces++] = surface;
}
}
+ if (batchnumsurfaces > 0)
+ {
+ if (rsurface_texture->currentmaterialflags & MATERIALFLAG_BLENDED)
+ R_Q1BSP_DrawLight_TransparentBatch(batchnumsurfaces, batchsurfacelist);
+ else
+ R_Shadow_RenderSurfacesLighting(batchnumsurfaces, batchsurfacelist);
+ batchnumsurfaces = 0;
+ }
}
-void RSurf_DrawWall(msurface_t *s, texture_t *t, int transform)
+//Made by [515]
+void R_ReplaceWorldTexture (void)
{
- int i, lit = false, polys = 0, verts = 0;
- float *v;
- glpoly_t *p;
- wallpoly_t *wp;
- wallvert_t *out;
- wallvertcolor_t *outcolor;
- // check for lightmap modification
- if (s->cached_dlight
- || (r_dynamic.value && r_dlightmap.value && s->dlightframe == r_framecount)
- || r_ambient.value != s->cached_ambient
- || lightscalebit != s->cached_lightscalebit
- || (r_dynamic.value
- && ((s->styles[0] != 255 && d_lightstylevalue[s->styles[0]] != s->cached_light[0])
- || (s->styles[1] != 255 && d_lightstylevalue[s->styles[1]] != s->cached_light[1])
- || (s->styles[2] != 255 && d_lightstylevalue[s->styles[2]] != s->cached_light[2])
- || (s->styles[3] != 255 && d_lightstylevalue[s->styles[3]] != s->cached_light[3]))))
- R_UpdateLightmap(s, s->lightmaptexturenum);
- if (s->dlightframe != r_framecount || r_dlightmap.value)
+ model_t *m;
+ texture_t *t;
+ int i;
+ const char *r, *newt;
+ m = r_refdef.worldmodel;
+
+ if(Cmd_Argc() < 2)
{
- // LordHavoc: fast path version for no vertex lighting cases
- wp = &wallpoly[currentwallpoly];
- out = &wallvert[currentwallvert];
- for (p = s->polys;p;p = p->next)
- {
- if ((currentwallpoly >= MAX_WALLPOLYS) || (currentwallvert+p->numverts > MAX_WALLVERTS))
- return;
- wp->texnum = (unsigned short) R_GetTexture(t->texture);
- wp->lighttexnum = (unsigned short) (lightmap_textures + s->lightmaptexturenum);
- wp->glowtexnum = (unsigned short) R_GetTexture(t->glowtexture);
- wp->firstvert = currentwallvert;
- wp->numverts = p->numverts;
- wp->lit = false;
- wp++;
- currentwallpoly++;
- currentwallvert += p->numverts;
- v = p->verts[0];
- if (transform)
- {
- for (i = 0;i < p->numverts;i++, v += VERTEXSIZE, out++)
- {
- softwaretransform(v, out->vert);
- out->vert[3] = v[3];
- out->vert[4] = v[4];
- out->vert[5] = v[5];
- out->vert[6] = v[6];
- }
- }
- else
- {
- /*
- for (i = 0;i < p->numverts;i++, v += VERTEXSIZE, out++)
- {
- VectorCopy(v, out->vert);
- out->vert[3] = v[3];
- out->vert[4] = v[4];
- out->vert[5] = v[5];
- out->vert[6] = v[6];
- }
- */
- memcpy(out, v, sizeof(vec_t) * VERTEXSIZE * p->numverts);
- out += p->numverts;
- }
- }
- }
- else
- {
- float *wv;
- wv = wvert;
- for (p = s->polys;p;p = p->next)
- {
- for (i = 0, v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE)
- {
- if (transform)
- softwaretransform(v, wv);
- else
- VectorCopy(v, wv);
- wv[3] = wv[4] = wv[5] = 0.0f;
- wv += 6;
- }
- verts += p->numverts;
- polys++;
- }
- if ((currentwallpoly + polys > MAX_WALLPOLYS) || (currentwallvert+verts > MAX_WALLVERTS))
- return;
- if ((!r_dlightmap.value) && s->dlightframe == r_framecount)
- lit = RSurf_Light(s->dlightbits, s->polys);
- wv = wvert;
- wp = &wallpoly[currentwallpoly];
- out = &wallvert[currentwallvert];
- outcolor = &wallvertcolor[currentwallvert];
- currentwallpoly += polys;
- for (p = s->polys;p;p = p->next)
- {
- v = p->verts[0];
- wp->texnum = (unsigned short) R_GetTexture(t->texture);
- wp->lighttexnum = (unsigned short) (lightmap_textures + s->lightmaptexturenum);
- wp->glowtexnum = (unsigned short) R_GetTexture(t->glowtexture);
- wp->firstvert = currentwallvert;
- wp->numverts = p->numverts;
- wp->lit = lit;
- wp++;
- currentwallvert += p->numverts;
- for (i = 0;i < p->numverts;i++, v += VERTEXSIZE, wv += 6, out++, outcolor++)
- {
- if (lit)
- {
- if (lighthalf)
- {
- outcolor->r = (byte) (bound(0, (int) wv[3] >> 1, 255));
- outcolor->g = (byte) (bound(0, (int) wv[4] >> 1, 255));
- outcolor->b = (byte) (bound(0, (int) wv[5] >> 1, 255));
- outcolor->a = 255;
- }
- else
- {
- outcolor->r = (byte) (bound(0, (int) wv[3], 255));
- outcolor->g = (byte) (bound(0, (int) wv[4], 255));
- outcolor->b = (byte) (bound(0, (int) wv[5], 255));
- outcolor->a = 255;
- }
- }
- out->vert[0] = wv[0];
- out->vert[1] = wv[1];
- out->vert[2] = wv[2];
- out->vert[3] = v[3];
- out->vert[4] = v[4];
- out->vert[5] = v[5];
- out->vert[6] = v[6];
- }
- }
- }
-}
-
-// LordHavoc: transparent brush models
-void RSurf_DrawWallVertex(msurface_t *s, texture_t *t, int transform, int isbmodel)
-{
- int i, alpha, size3;
- float *v, *wv, scale;
- glpoly_t *p;
- byte *lm;
- alpha = (int) (modelalpha * 255.0f);
- size3 = ((s->extents[0]>>4)+1)*((s->extents[1]>>4)+1)*3; // *3 for colored lighting
- wv = wvert;
- for (p = s->polys;p;p = p->next)
- {
- for (i = 0, v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE)
- {
- if (transform)
- softwaretransform(v, wv);
- else
- VectorCopy(v, wv);
- wv[3] = wv[4] = wv[5] = r_ambient.value * 2.0f;
- if (s->styles[0] != 255)
- {
- lm = (byte *)((long) s->samples + (int) v[7]);
- scale = d_lightstylevalue[s->styles[0]] * (1.0f / 128.0f);wv[3] += lm[size3*0+0] * scale;wv[4] += lm[size3*0+1] * scale;wv[5] += lm[size3*0+2] * scale;
- if (s->styles[1] != 255)
- {
- scale = d_lightstylevalue[s->styles[1]] * (1.0f / 128.0f);wv[3] += lm[size3*1+0] * scale;wv[4] += lm[size3*1+1] * scale;wv[5] += lm[size3*1+2] * scale;
- if (s->styles[2] != 255)
- {
- scale = d_lightstylevalue[s->styles[2]] * (1.0f / 128.0f);wv[3] += lm[size3*2+0] * scale;wv[4] += lm[size3*2+1] * scale;wv[5] += lm[size3*2+2] * scale;
- if (s->styles[3] != 255)
- {
- scale = d_lightstylevalue[s->styles[3]] * (1.0f / 128.0f);wv[3] += lm[size3*3+0] * scale;wv[4] += lm[size3*3+1] * scale;wv[5] += lm[size3*3+2] * scale;
- }
- }
- }
- }
- wv += 6;
- }
- }
- if (s->dlightframe == r_framecount)
- RSurf_Light(s->dlightbits, s->polys);
- wv = wvert;
- if (isbmodel && (currententity->render.colormod[0] != 1 || currententity->render.colormod[1] != 1 || currententity->render.colormod[2] != 1))
- {
- for (p = s->polys;p;p = p->next)
- {
- v = p->verts[0];
- transpolybegin(R_GetTexture(t->texture), R_GetTexture(t->glowtexture), 0, currententity->render.effects & EF_ADDITIVE ? TPOLYTYPE_ADD : TPOLYTYPE_ALPHA);
- for (i = 0,v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE, wv += 6)
- transpolyvert(wv[0], wv[1], wv[2], v[3], v[4], wv[3] * currententity->render.colormod[0], wv[4] * currententity->render.colormod[1], wv[5] * currententity->render.colormod[2], alpha);
- transpolyend();
- }
- }
- else
- {
- for (p = s->polys;p;p = p->next)
- {
- v = p->verts[0];
- transpolybegin(R_GetTexture(t->texture), R_GetTexture(t->glowtexture), 0, currententity->render.effects & EF_ADDITIVE ? TPOLYTYPE_ADD : TPOLYTYPE_ALPHA);
- for (i = 0,v = p->verts[0];i < p->numverts;i++, v += VERTEXSIZE, wv += 6)
- transpolyvert(wv[0], wv[1], wv[2], v[3], v[4], wv[3], wv[4], wv[5], alpha);
- transpolyend();
- }
- }
-}
-
-void R_NoVisMarkLights (vec3_t lightorigin, dlight_t *light, int bit, int bitindex, model_t *model);
-
-float bmverts[256*3];
-
-int vertexworld;
-
-/*
-void RBrushModelSurf_DoVisible(msurface_t *surf)
-{
-// float *v, *bmv, *endbmv;
-// glpoly_t *p;
-// for (p = surf->polys;p;p = p->next)
-// {
-// for (v = p->verts[0], bmv = bmpoints, endbmv = bmv + p->numverts * 3;bmv < endbmv;v += VERTEXSIZE, bmv += 3)
-// softwaretransform(v, bmv);
-// if (R_Clip_Polygon(bmpoints, p->numverts, sizeof(float) * 3, surf->flags & SURF_CLIPSOLID))
- surf->visframe = r_framecount;
-// }
-}
-*/
-
-void RBrushModelSurf_Callback(void *data, void *data2)
-{
- entity_t *ent = data2;
- msurface_t *surf = data;
- texture_t *t;
-
- /*
- // FIXME: implement better dupe prevention in AddPolygon callback code
- if (ent->render.model->firstmodelsurface != 0)
- {
- // it's not an instanced model, so we already rely on there being only one of it (usually a valid assumption, but QC can break this)
- if (surf->visframe == r_framecount)
- return;
- }
- */
- surf->visframe = r_framecount;
-
- c_faces++;
-
- currententity = ent;
- modelalpha = ent->render.alpha;
-
- softwaretransformforbrushentity (ent);
-
- if (surf->flags & (SURF_DRAWSKY | SURF_DRAWTURB))
- {
- // sky and liquid don't need sorting (skypoly/transpoly)
- if (surf->flags & SURF_DRAWSKY)
- RSurf_DrawSky(surf, true);
- else
- RSurf_DrawWater(surf, R_TextureAnimation(surf->texinfo->texture), true, surf->flags & SURF_DRAWNOALPHA ? 255 : wateralpha);
- }
- else
- {
- t = R_TextureAnimation(surf->texinfo->texture);
- if (surf->texinfo->texture->transparent || vertexworld || ent->render.alpha != 1 || ent->render.model->firstmodelsurface == 0 || (ent->render.effects & EF_FULLBRIGHT) || ent->render.colormod[0] != 1 || ent->render.colormod[2] != 1 || ent->render.colormod[2] != 1)
- RSurf_DrawWallVertex(surf, t, true, true);
- else
- RSurf_DrawWall(surf, t, true);
- }
-}
-
-/*
-=================
-R_DrawBrushModel
-=================
-*/
-void R_DrawBrushModel (entity_t *e)
-{
- int i, j, vertexlit;
- vec3_t mins, maxs;
- msurface_t *s;
- model_t *clmodel;
- int rotated;
- vec3_t org;
- glpoly_t *p;
-
- currententity = e;
-
- clmodel = e->render.model;
-
- if (e->render.angles[0] || e->render.angles[1] || e->render.angles[2])
- {
- rotated = true;
- for (i=0 ; i<3 ; i++)
- {
- mins[i] = e->render.origin[i] - clmodel->radius;
- maxs[i] = e->render.origin[i] + clmodel->radius;
- }
- }
- else
- {
- rotated = false;
- VectorAdd (e->render.origin, clmodel->mins, mins);
- VectorAdd (e->render.origin, clmodel->maxs, maxs);
- }
-
- if (R_CullBox (mins, maxs))
- return;
-
- c_bmodels++;
-
- VectorSubtract (r_origin, e->render.origin, modelorg);
- if (rotated)
- {
- vec3_t temp;
- vec3_t forward, right, up;
-
- VectorCopy (modelorg, temp);
- AngleVectors (e->render.angles, forward, right, up);
- modelorg[0] = DotProduct (temp, forward);
- modelorg[1] = -DotProduct (temp, right);
- modelorg[2] = DotProduct (temp, up);
- }
-
- softwaretransformforbrushentity (e);
-
- for (i = 0, s = &clmodel->surfaces[clmodel->firstmodelsurface];i < clmodel->nummodelsurfaces;i++, s++)
- {
- s->visframe = -1;
- if (((s->flags & SURF_PLANEBACK) == 0) == (PlaneDiff(modelorg, s->plane) >= 0))
- s->visframe = r_framecount;
- }
-
-// calculate dynamic lighting for bmodel if it's not an instanced model
- for (i = 0;i < MAX_DLIGHTS;i++)
- {
- if (!cl_dlights[i].radius)
- continue;
-
- VectorSubtract(cl_dlights[i].origin, currententity->render.origin, org);
- R_NoVisMarkLights (org, &cl_dlights[i], 1<<(i&31), i >> 5, clmodel);
- }
- vertexlit = modelalpha != 1 || clmodel->firstmodelsurface == 0 || (currententity->render.effects & EF_FULLBRIGHT) || currententity->render.colormod[0] != 1 || currententity->render.colormod[2] != 1 || currententity->render.colormod[2] != 1;
-
- // draw texture
- for (i = 0, s = &clmodel->surfaces[clmodel->firstmodelsurface];i < clmodel->nummodelsurfaces;i++, s++)
- {
- if (s->visframe == r_framecount)
- {
-// R_DrawSurf(s, true, vertexlit || s->texinfo->texture->transparent);
- if (r_ser.value)
- {
- for (p = s->polys;p;p = p->next)
- {
- for (j = 0;j < p->numverts;j++)
- softwaretransform(&p->verts[j][0], bmverts + j * 3);
- R_Clip_AddPolygon(bmverts, p->numverts, 3 * sizeof(float), (s->flags & SURF_CLIPSOLID) != 0 && modelalpha == 1, RBrushModelSurf_Callback, s, e, NULL);
- }
- }
- else
- {
- if (s->flags & (SURF_DRAWSKY | SURF_DRAWTURB))
- {
- // sky and liquid don't need sorting (skypoly/transpoly)
- if (s->flags & SURF_DRAWSKY)
- RSurf_DrawSky(s, true);
- else
- RSurf_DrawWater(s, R_TextureAnimation(s->texinfo->texture), true, s->flags & SURF_DRAWNOALPHA ? 255 : wateralpha);
- }
- else
- {
- texture_t *t = R_TextureAnimation(s->texinfo->texture);
- if (vertexlit || s->texinfo->texture->transparent)
- RSurf_DrawWallVertex(s, t, true, true);
- else
- RSurf_DrawWall(s, t, true);
- }
- }
- }
- }
- UploadLightmaps();
-}
-
-/*
-=============================================================
-
- WORLD MODEL
-
-=============================================================
-*/
-
-/*
-static byte *worldvis;
-
-void R_MarkLeaves (void)
-{
- static float noviscache;
- if (r_oldviewleaf == r_viewleaf && noviscache == r_novis.value)
- return;
-
- r_oldviewleaf = r_viewleaf;
- noviscache = r_novis.value;
-
- worldvis = Mod_LeafPVS (r_viewleaf, cl.worldmodel);
-}
-*/
-
-void RSurf_Callback(void *data, void *junk)
-{
- ((msurface_t *)data)->visframe = r_framecount;
-}
-
-/*
-void RSurf_Callback(void *data, void *junk)
-{
- msurface_t *surf = data;
- texture_t *t;
-
-// if (surf->visframe == r_framecount)
-// return;
-
- surf->visframe = r_framecount;
-
- c_faces++;
-
- if (surf->flags & (SURF_DRAWSKY | SURF_DRAWTURB))
- {
- // sky and liquid don't need sorting (skypoly/transpoly)
- if (surf->flags & SURF_DRAWSKY)
- RSurf_DrawSky(surf, false);
- else
- RSurf_DrawWater(surf, R_TextureAnimation(surf->texinfo->texture), false, surf->flags & SURF_DRAWNOALPHA ? 255 : wateralpha);
- }
- else
- {
- t = R_TextureAnimation(surf->texinfo->texture);
- if (vertexworld)
- RSurf_DrawWallVertex(surf, t, false, false);
- else
- RSurf_DrawWall(surf, t, false);
- }
-}
-*/
-
-/*
-mleaf_t *r_oldviewleaf;
-int r_markvisframecount = 0;
-
-void R_MarkLeaves (void)
-{
- static float noviscache;
- int i, l, k, c;
- mleaf_t *leaf;
- msurface_t *surf, **mark, **endmark;
- model_t *model = cl.worldmodel;
-// mportal_t *portal;
- glpoly_t *p;
- byte *in;
- int row;
-
- // ignore testvis if the map just changed
- if (r_testvis.value && model->nodes->markvisframe == r_markvisframecount)
- return;
-
- if (r_oldviewleaf == r_viewleaf && noviscache == r_novis.value)
- return;
-
- r_oldviewleaf = r_viewleaf;
- noviscache = r_novis.value;
-
- if ((in = r_viewleaf->compressed_vis))
- {
- row = (model->numleafs+7)>>3;
-
- if (!r_testvis.value)
- r_markvisframecount++;
-
- // LordHavoc: mark the root node as visible, it will terminate all other ascensions
- model->nodes->markvisframe = r_markvisframecount;
-
- k = 0;
- while (k < row)
- {
- c = *in++;
- if (c)
- {
- l = model->numleafs - (k << 3);
- if (l > 8)
- l = 8;
- for (i=0 ; i<l ; i++)
- {
- if (c & (1<<i))
- {
- leaf = &model->leafs[(k << 3)+i+1];
- node = (mnode_t *)leaf;
- do
- {
- node->markvisframe = r_markvisframecount;
- node = node->parent;
- }
- while (node->markvisframecount != r_markvisframecount);
- }
- }
- k++;
- }
- else
- k += *in++;
- }
- }
- else
- {
- // LordHavoc: no vis data, mark everything as visible
- model->nodes->markvisframe = r_markvisframecount;
-
- for (i = 1;i < model->numleafs;i++)
- {
- node = (mnode_t *)&model->leafs[i];
- do
- {
- node->markvisframe = r_markvisframecount;
- node = node->parent;
- }
- while (node->markvisframecount != r_markvisframecount);
- }
- }
-}
-*/
-
-void R_SolidWorldNode (void)
-{
- if ((int) r_solidworldnode.value == 3)
- {
- int portalstack;
- mportal_t *p, *pstack[8192];
- msurface_t *surf, **mark, **endmark;
- mleaf_t *leaf;
- glpoly_t *poly;
- tinyplane_t plane;
-
- leaf = r_viewleaf;
- leaf->worldnodeframe = r_framecount;
- portalstack = 0;
- loc0:
- c_leafs++;
-
- leaf->visframe = r_framecount;
-
- if (leaf->nummarksurfaces)
- {
- mark = leaf->firstmarksurface;
- endmark = mark + leaf->nummarksurfaces;
- if (r_ser.value)
- {
- do
- {
- surf = *mark++;
- // make sure surfaces are only processed once
- if (surf->worldnodeframe == r_framecount)
- continue;
- surf->worldnodeframe = r_framecount;
- if (PlaneDist(r_origin, surf->plane) < surf->plane->dist)
- {
- if (surf->flags & SURF_PLANEBACK)
- {
- VectorNegate(surf->plane->normal, plane.normal);
- plane.dist = -surf->plane->dist;
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), (surf->flags & SURF_CLIPSOLID) != 0, RSurf_Callback, surf, NULL, &plane);
- }
- }
- else
- {
- if (!(surf->flags & SURF_PLANEBACK))
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), (surf->flags & SURF_CLIPSOLID) != 0, RSurf_Callback, surf, NULL, (tinyplane_t *)surf->plane);
- }
- }
- while (mark < endmark);
- }
- else
- {
- do
- {
- surf = *mark++;
- // make sure surfaces are only processed once
- if (surf->worldnodeframe == r_framecount)
- continue;
- surf->worldnodeframe = r_framecount;
- if (PlaneDist(r_origin, surf->plane) < surf->plane->dist)
- {
- if (surf->flags & SURF_PLANEBACK)
- surf->visframe = r_framecount;
- }
- else
- {
- if (!(surf->flags & SURF_PLANEBACK))
- surf->visframe = r_framecount;
- }
- }
- while (mark < endmark);
- }
- }
-
- // follow portals into other leafs
- p = leaf->portals;
- for (;p;p = p->next)
- {
- if (DotProduct(r_origin, p->plane.normal) < p->plane.dist)
- {
- leaf = p->past;
- if (leaf->worldnodeframe != r_framecount)
- {
- leaf->worldnodeframe = r_framecount;
- if (leaf->contents != CONTENTS_SOLID)
- {
- if (R_NotCulledBox(leaf->mins, leaf->maxs))
- {
- pstack[portalstack++] = p;
- goto loc0;
-
- loc1:
- p = pstack[--portalstack];
- }
- }
- }
- }
- }
-
- if (portalstack)
- goto loc1;
- }
- else if ((int) r_solidworldnode.value == 2)
- {
- mnode_t *nodestack[8192], *node = cl.worldmodel->nodes;
- int nodestackpos = 0;
- glpoly_t *poly;
-
-loc2:
- if (R_NotCulledBox(node->mins, node->maxs))
- {
- if (r_ser.value)
- {
- if (node->numsurfaces)
- {
- msurface_t *surf = cl.worldmodel->surfaces + node->firstsurface, *surfend = surf + node->numsurfaces;
- tinyplane_t plane;
- if (PlaneDiff (r_origin, node->plane) < 0)
- {
- for (;surf < surfend;surf++)
- {
- if (surf->flags & SURF_PLANEBACK)
- {
- VectorNegate(surf->plane->normal, plane.normal);
- plane.dist = -surf->plane->dist;
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), surf->flags & SURF_CLIPSOLID, RSurf_Callback, surf, NULL, &plane);
- }
- }
- }
- else
- {
- for (;surf < surfend;surf++)
- {
- if (!(surf->flags & SURF_PLANEBACK))
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), surf->flags & SURF_CLIPSOLID, RSurf_Callback, surf, NULL, (tinyplane_t *)surf->plane);
- }
- }
- }
- }
- else
- {
- if (node->numsurfaces)
- {
- msurface_t *surf = cl.worldmodel->surfaces + node->firstsurface, *surfend = surf + node->numsurfaces;
- if (PlaneDiff (r_origin, node->plane) < 0)
- {
- for (;surf < surfend;surf++)
- {
- if (surf->flags & SURF_PLANEBACK)
- surf->visframe = r_framecount;
- }
- }
- else
- {
- for (;surf < surfend;surf++)
- {
- if (!(surf->flags & SURF_PLANEBACK))
- surf->visframe = r_framecount;
- }
- }
- }
- }
-
- // recurse down the children
- if (node->children[0]->contents >= 0)
- {
- if (node->children[1]->contents >= 0)
- {
- if (nodestackpos < 8192)
- nodestack[nodestackpos++] = node->children[1];
- node = node->children[0];
- goto loc2;
- }
- else
- ((mleaf_t *)node->children[1])->visframe = r_framecount;
- node = node->children[0];
- goto loc2;
- }
- else
- {
- ((mleaf_t *)node->children[0])->visframe = r_framecount;
- if (node->children[1]->contents >= 0)
- {
- node = node->children[1];
- goto loc2;
- }
- else if (nodestackpos > 0)
- {
- ((mleaf_t *)node->children[1])->visframe = r_framecount;
- node = nodestack[--nodestackpos];
- goto loc2;
- }
- }
- }
- else if (nodestackpos > 0)
- {
- node = nodestack[--nodestackpos];
- goto loc2;
- }
- }
- else if ((int) r_solidworldnode.value == 1 && r_ser.value)
- {
- glpoly_t *poly;
- msurface_t *surf, *endsurf;
- tinyplane_t plane;
-
- surf = &cl.worldmodel->surfaces[cl.worldmodel->firstmodelsurface];
- endsurf = surf + cl.worldmodel->nummodelsurfaces;
- for (;surf < endsurf;surf++)
- {
- if (PlaneDiff(r_origin, surf->plane) < 0)
- {
- if (surf->flags & SURF_PLANEBACK)
- {
- VectorNegate(surf->plane->normal, plane.normal);
- plane.dist = -surf->plane->dist;
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), (surf->flags & SURF_CLIPSOLID) != 0, RSurf_Callback, surf, NULL, &plane);
- }
- }
- else
- {
- if (!(surf->flags & SURF_PLANEBACK))
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), (surf->flags & SURF_CLIPSOLID) != 0, RSurf_Callback, surf, NULL, (tinyplane_t *)&surf->plane);
- }
- }
- }
- else
- {
- int l;
- mleaf_t *leaf;
- msurface_t *surf, **mark, **endmark;
- glpoly_t *poly;
- tinyplane_t plane;
-
- for (l = 0, leaf = cl.worldmodel->leafs;l < cl.worldmodel->numleafs;l++, leaf++)
- {
- if (R_CullBox(leaf->mins, leaf->maxs))
- continue;
- leaf->visframe = r_framecount;
- c_leafs++;
- if (leaf->nummarksurfaces)
- {
-// if (R_CullBox(leaf->mins, leaf->maxs))
-// continue;
-
- if (leaf->nummarksurfaces)
- {
- mark = leaf->firstmarksurface;
- endmark = mark + leaf->nummarksurfaces;
- if (r_ser.value)
- {
- do
- {
- surf = *mark++;
- // make sure surfaces are only processed once
- if (surf->worldnodeframe == r_framecount)
- continue;
- surf->worldnodeframe = r_framecount;
- if (PlaneDist(r_origin, surf->plane) < surf->plane->dist)
- {
- if (surf->flags & SURF_PLANEBACK)
- {
- VectorNegate(surf->plane->normal, plane.normal);
- plane.dist = -surf->plane->dist;
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), (surf->flags & SURF_CLIPSOLID) != 0, RSurf_Callback, surf, NULL, &plane);
- }
- }
- else
- {
- if (!(surf->flags & SURF_PLANEBACK))
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), (surf->flags & SURF_CLIPSOLID) != 0, RSurf_Callback, surf, NULL, (tinyplane_t *)surf->plane);
- }
- }
- while (mark < endmark);
- }
- else
- {
- do
- {
- surf = *mark++;
- // make sure surfaces are only processed once
- if (surf->worldnodeframe == r_framecount)
- continue;
- surf->worldnodeframe = r_framecount;
- if (PlaneDist(r_origin, surf->plane) < surf->plane->dist)
- {
- if (surf->flags & SURF_PLANEBACK)
- surf->visframe = r_framecount;
- }
- else
- {
- if (!(surf->flags & SURF_PLANEBACK))
- surf->visframe = r_framecount;
- }
- }
- while (mark < endmark);
- }
- }
- }
- }
- }
-}
-
-/*
-void RSurf_Callback(void *data, void *junk)
-{
- ((msurface_t *)data)->visframe = r_framecount;
-}
-
-int R_FrustumTestPolygon(float *points, int numpoints, int stride);
-
-void RSurf_DoVisible(msurface_t *surf)
-{
- glpoly_t *p;
- for (p = surf->polys;p;p = p->next)
- if (R_FrustumTestPolygon((float *) p->verts, p->numverts, VERTEXSIZE * sizeof(float)) >= 3)
-// R_Clip_Polygon((float *) p->verts, p->numverts, VERTEXSIZE * sizeof(float), true, RSurf_Callback, surf, 1);
-// if (R_Clip_Polygon((float *) p->verts, p->numverts, VERTEXSIZE * sizeof(float), surf->flags & SURF_CLIPSOLID))
- surf->visframe = r_framecount;
-}
-*/
-
-//mleaf_t *llistbuffer[32768], *l, **llist;
-
-/*
-void RSurfLeaf_Callback(void *data)
-{
- int portalstackpos = 0;
- mleaf_t *leaf;
- mportal_t *p, *portalstack[32768];
- msurface_t *surf, **mark, **endmark;
- do
- {
-
- leaf = data;
- if (leaf->visframe == r_framecount)
- return;
- leaf->visframe = r_framecount;
-
- c_leafs++;
-
- if (leaf->nummarksurfaces)
- {
- mark = leaf->firstmarksurface;
- endmark = mark + leaf->nummarksurfaces;
- do
- {
- surf = *mark++;
- // make sure surfaces are only processed once
- if (surf->worldnodeframe == r_framecount)
- continue;
- surf->worldnodeframe = r_framecount;
- if (PlaneDist(modelorg, surf->plane) < surf->plane->dist)
- {
- if (surf->flags & SURF_PLANEBACK)
- RSurf_DoVisible(surf);
- }
- else
- {
- if (!(surf->flags & SURF_PLANEBACK))
- RSurf_DoVisible(surf);
- }
- }
- while (mark < endmark);
- }
-
- // follow portals into other leafs
- for (p = leaf->portals;p;p = p->next)
- {
- if (p->past->visframe != r_framecount && DotProduct(r_origin, p->plane.normal) < p->plane.dist)
- {
- // R_Clip_Portal((float *) p->points, p->numpoints, sizeof(float) * 3, RSurfLeaf_Callback, p->past, 1);
- if (R_Clip_Portal((float *) p->points, p->numpoints, sizeof(float) * 3))
- portalstack[portalstackpos++] = p;
- }
- }
- }
- while(portalstackpos);
- RSurfLeaf_Callback(p->past);
- // upon returning, R_ProcessSpans will notice that the spans have changed and restart the line, this is ok because we're not adding any polygons that aren't already behind the portal
-}
-*/
-
-/*
-// experimental and inferior to the other in recursion depth allowances
-void R_PortalWorldNode (void)
-{
-// int i, j;
- mportal_t *p;
- msurface_t *surf, **mark, **endmark;
- mleaf_t *leaf, *llistbuffer[32768], **l, **llist;
-
- leaf = r_viewleaf;
- leaf->visframe = r_framecount;
- l = llist = &llistbuffer[0];
- *llist++ = r_viewleaf;
- while (l < llist)
- {
- leaf = *l++;
-
- c_leafs++;
-
- if (leaf->nummarksurfaces)
- {
- mark = leaf->firstmarksurface;
- endmark = mark + leaf->nummarksurfaces;
- do
- {
- surf = *mark++;
- // make sure surfaces are only processed once
- if (surf->worldnodeframe == r_framecount)
- continue;
- surf->worldnodeframe = r_framecount;
- if (PlaneDist(modelorg, surf->plane) < surf->plane->dist)
- {
- if (surf->flags & SURF_PLANEBACK)
- RSurf_DoVisible(surf);
- }
- else
- {
- if (!(surf->flags & SURF_PLANEBACK))
- RSurf_DoVisible(surf);
- }
- }
- while (mark < endmark);
- }
-
- // follow portals into other leafs
- for (p = leaf->portals;p;p = p->next)
- {
- if (p->past->visframe != r_framecount)
- {
- if (R_Clip_Portal((float *) p->points, p->numpoints, sizeof(float) * 3))
- {
- p->past->visframe = r_framecount;
- *llist++ = p->past;
- }
- }
- }
-
-// for (p = leaf->portals;p;p = p->next)
-// {
-// leaf = p->past;
-// if (leaf->worldnodeframe != r_framecount)
-// {
-// leaf->worldnodeframe = r_framecount;
-// i = (leaf - cl.worldmodel->leafs) - 1;
-// if ((worldvis[i>>3] & (1<<(i&7))) && R_NotCulledBox(leaf->mins, leaf->maxs))
-// *llist++ = leaf;
-// }
-// }
- }
-
-// i = 0;
-// j = 0;
-// p = r_viewleaf->portals;
-// for (;p;p = p->next)
-// {
-// j++;
-// if (p->past->worldnodeframe != r_framecount)
-// i++;
-// }
-// if (i)
-// Con_Printf("%i portals of viewleaf (%i portals) were not checked\n", i, j);
-}
-*/
-
-
-int r_portalframecount = 0;
-
-/*
-void R_Portal_Callback(void *data, void *data2)
-{
- mleaf_t *leaf = data;
- if (!r_testvis.value)
- ((mportal_t *)data2)->visframe = r_portalframecount;
- if (leaf->visframe != r_framecount)
- {
- c_leafs++;
- leaf->visframe = r_framecount;
- }
-}
-*/
-
-void R_PVSWorldNode()
-{
- if (r_pvsworldnode.value == 1)
- {
- int portalstack, i;
- mportal_t *p, *pstack[8192];
- msurface_t *surf, **mark, **endmark;
- mleaf_t *leaf;
- tinyplane_t plane;
- glpoly_t *poly;
- byte *worldvis;
-
- worldvis = Mod_LeafPVS (r_viewleaf, cl.worldmodel);
-
- leaf = r_viewleaf;
- leaf->worldnodeframe = r_framecount;
- portalstack = 0;
- loc0:
- c_leafs++;
-
- leaf->visframe = r_framecount;
-
- if (leaf->nummarksurfaces)
- {
- mark = leaf->firstmarksurface;
- endmark = mark + leaf->nummarksurfaces;
- if (r_ser.value)
- {
- do
- {
- surf = *mark++;
- // make sure surfaces are only processed once
- if (surf->worldnodeframe == r_framecount)
- continue;
- surf->worldnodeframe = r_framecount;
- if (PlaneDist(modelorg, surf->plane) < surf->plane->dist)
- {
- if (surf->flags & SURF_PLANEBACK)
- {
- VectorNegate(surf->plane->normal, plane.normal);
- plane.dist = -surf->plane->dist;
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), (surf->flags & SURF_CLIPSOLID) != 0, RSurf_Callback, surf, NULL, &plane);
- }
- }
- else
- {
- if (!(surf->flags & SURF_PLANEBACK))
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), (surf->flags & SURF_CLIPSOLID) != 0, RSurf_Callback, surf, NULL, (tinyplane_t *)surf->plane);
- }
- }
- while (mark < endmark);
- }
- else
- {
- do
- {
- surf = *mark++;
- // make sure surfaces are only processed once
- if (surf->worldnodeframe == r_framecount)
- continue;
- surf->worldnodeframe = r_framecount;
- if (PlaneDist(modelorg, surf->plane) < surf->plane->dist)
- {
- if (surf->flags & SURF_PLANEBACK)
- surf->visframe = r_framecount;
- }
- else
- {
- if (!(surf->flags & SURF_PLANEBACK))
- surf->visframe = r_framecount;
- }
- }
- while (mark < endmark);
- }
- }
-
- // follow portals into other leafs
- p = leaf->portals;
- for (;p;p = p->next)
- {
- if (DotProduct(r_origin, p->plane.normal) < p->plane.dist)
- {
- leaf = p->past;
- if (leaf->worldnodeframe != r_framecount)
- {
- leaf->worldnodeframe = r_framecount;
- if (leaf->contents != CONTENTS_SOLID)
- {
- i = (leaf - cl.worldmodel->leafs) - 1;
- if (worldvis[i>>3] & (1<<(i&7)))
- {
- if (R_NotCulledBox(leaf->mins, leaf->maxs))
- {
- pstack[portalstack++] = p;
- goto loc0;
-
- loc1:
- p = pstack[--portalstack];
- }
- }
- }
- }
- }
- }
-
- if (portalstack)
- goto loc1;
- }
- else
- {
- int i/*, l*/, k, c, row, numbits, bit, leafnum, numleafs;
- mleaf_t *leaf;
- msurface_t *surf, **mark, **endmark;
- model_t *model = cl.worldmodel;
- byte *in;
- // mportal_t *portal;
- glpoly_t *poly;
- tinyplane_t plane;
-
- // c_leafs++;
- // r_viewleaf->visframe = r_framecount;
- if (!r_testvis.value)
- r_portalframecount++;
-
- numleafs = model->numleafs;
- numbits = numleafs;
- k = 0;
- in = r_viewleaf->compressed_vis;
- row = (numbits + 7) >> 3;
- while (k < row)
- {
- c = *in++;
- if (c)
- {
- for (i = 0, bit = 1;c;i++, bit <<= 1)
- {
- if (c & bit)
- {
- leafnum = (k << 3)+i+1;
- if (leafnum > numleafs)
- return;
- c -= bit;
- leaf = &model->leafs[leafnum];
- if (R_NotCulledBox(leaf->mins, leaf->maxs))
- {
- //for (portal = leaf->portals;portal;portal = portal->next)
- // if (DotProduct(r_origin, portal->plane.normal) > portal->plane.dist)
- // R_Clip_AddPolygon((float *)portal->points, portal->numpoints, sizeof(mvertex_t), false, R_Portal_Callback, leaf, portal, portal->plane);
- //leaf->visframe = r_framecount;
- c_leafs++;
- if (leaf->nummarksurfaces)
- {
- mark = leaf->firstmarksurface;
- endmark = mark + leaf->nummarksurfaces;
- if (r_ser.value)
- {
- do
- {
- surf = *mark++;
- // make sure surfaces are only processed once
- if (surf->worldnodeframe == r_framecount)
- continue;
- surf->worldnodeframe = r_framecount;
- if (PlaneDist(r_origin, surf->plane) < surf->plane->dist)
- {
- if (surf->flags & SURF_PLANEBACK)
- {
- VectorNegate(surf->plane->normal, plane.normal);
- plane.dist = -surf->plane->dist;
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), (surf->flags & SURF_CLIPSOLID) != 0, RSurf_Callback, surf, NULL, &plane);
- }
- }
- else
- {
- if (!(surf->flags & SURF_PLANEBACK))
- for (poly = surf->polys;poly;poly = poly->next)
- R_Clip_AddPolygon((float *)poly->verts, poly->numverts, VERTEXSIZE * sizeof(float), (surf->flags & SURF_CLIPSOLID) != 0, RSurf_Callback, surf, NULL, (tinyplane_t *)surf->plane);
- }
- }
- while (mark < endmark);
- }
- else
- {
- do
- {
- surf = *mark++;
- // make sure surfaces are only processed once
- if (surf->worldnodeframe == r_framecount)
- continue;
- surf->worldnodeframe = r_framecount;
- if (PlaneDist(r_origin, surf->plane) < surf->plane->dist)
- {
- if (surf->flags & SURF_PLANEBACK)
- surf->visframe = r_framecount;
- }
- else
- {
- if (!(surf->flags & SURF_PLANEBACK))
- surf->visframe = r_framecount;
- }
- }
- while (mark < endmark);
- }
- }
- }
- }
- }
- k++;
- }
- else
- k += *in++;
- }
+ Con_Print("r_replacemaptexture <texname> <newtexname> - replaces texture\n");
+ Con_Print("r_replacemaptexture <texname> - switch back to default texture\n");
+ return;
}
-}
-
-entity_t clworldent;
-
-void R_DrawSurfaces (void)
-{
- msurface_t *surf, *endsurf;
- texture_t *t, *currentt;
- int vertex = gl_vertex.value;
-
- currententity = &clworldent;
- modelalpha = 1;
- softwaretransformidentity();
- surf = &cl.worldmodel->surfaces[cl.worldmodel->firstmodelsurface];
- endsurf = surf + cl.worldmodel->nummodelsurfaces;
- t = currentt = NULL;
- for (;surf < endsurf;surf++)
+ if(!cl.islocalgame || !cl.worldmodel)
{
- if (surf->visframe == r_framecount)
- {
- c_faces++;
- if (surf->flags & (SURF_DRAWSKY | SURF_DRAWTURB))
- {
- if (surf->flags & SURF_DRAWSKY)
- RSurf_DrawSky(surf, false);
- else
- {
- if (currentt != surf->texinfo->texture)
- {
- currentt = surf->texinfo->texture;
- t = R_TextureAnimation(surf->texinfo->texture);
- }
- RSurf_DrawWater(surf, t, false, surf->flags & SURF_DRAWNOALPHA ? 255 : wateralpha);
- }
- }
- else
- {
- if (currentt != surf->texinfo->texture)
- {
- currentt = surf->texinfo->texture;
- t = R_TextureAnimation(surf->texinfo->texture);
- }
- if (vertex)
- RSurf_DrawWallVertex(surf, t, false, false);
- else
- RSurf_DrawWall(surf, t, false);
- }
- }
- }
-}
-
-void R_DrawPortals(void)
-{
- int drawportals, i, r, g, b;
-// mleaf_t *leaf, *endleaf;
- mportal_t *portal, *endportal;
- mvertex_t *point/*, *endpoint*/;
- drawportals = (int)r_drawportals.value;
- if (drawportals < 1)
+ Con_Print("This command works only in singleplayer\n");
return;
- /*
- leaf = cl.worldmodel->leafs;
- endleaf = leaf + cl.worldmodel->numleafs;
- for (;leaf < endleaf;leaf++)
- {
- if (leaf->visframe == r_framecount && leaf->portals)
- {
- i = leaf - cl.worldmodel->leafs;
- r = (i & 0x0007) << 5;
- g = (i & 0x0038) << 2;
- b = (i & 0x01C0) >> 1;
- portal = leaf->portals;
- while (portal)
- {
- transpolybegin(0, 0, 0, TPOLYTYPE_ALPHA);
- point = portal->points + portal->numpoints - 1;
- endpoint = portal->points;
- for (;point >= endpoint;point--)
- transpolyvertub(point->position[0], point->position[1], point->position[2], 0, 0, r, g, b, 32);
- transpolyend();
- portal = portal->next;
- }
- }
}
- */
- portal = cl.worldmodel->portals;
- endportal = portal + cl.worldmodel->numportals;
- for (;portal < endportal;portal++)
+ r = Cmd_Argv(1);
+ newt = Cmd_Argv(2);
+ if(!newt[0])
+ newt = r;
+ for(i=0,t=m->data_textures;i<m->num_textures;i++,t++)
{
- if (portal->visframe == r_portalframecount)
+ if(t->width && !strcasecmp(t->name, r))
{
- i = portal - cl.worldmodel->portals;
- r = (i & 0x0007) << 5;
- g = (i & 0x0038) << 2;
- b = (i & 0x01C0) >> 1;
- transpolybegin(0, 0, 0, TPOLYTYPE_ALPHA);
- point = portal->points;
- if (PlaneDiff(r_origin, (&portal->plane)) > 0)
+ if(Mod_LoadSkinFrame(&t->skinframes[0], (char*)newt, TEXF_MIPMAP | TEXF_ALPHA | TEXF_PRECACHE | TEXF_PICMIP, false, r_fullbrights.integer))
{
- for (i = portal->numpoints - 1;i >= 0;i--)
- transpolyvertub(point[i].position[0], point[i].position[1], point[i].position[2], 0, 0, r, g, b, 32);
+ Con_Printf("%s replaced with %s\n", r, newt);
+ return;
}
else
{
- for (i = 0;i < portal->numpoints;i++)
- transpolyvertub(point[i].position[0], point[i].position[1], point[i].position[2], 0, 0, r, g, b, 32);
+ Con_Printf("%s was not found\n", newt);
+ Mod_LoadSkinFrame(&t->skinframes[0], (char*)r, TEXF_MIPMAP | TEXF_ALPHA | TEXF_PRECACHE | TEXF_PICMIP, false, r_fullbrights.integer);//back to default
+ return;
}
- transpolyend();
}
}
}
-/*
-=============
-R_DrawWorld
-=============
-*/
-void R_DrawWorld (void)
+//Made by [515]
+void R_ListWorldTextures (void)
{
- wateralpha = bound(0, r_wateralpha.value*255.0f, 255);
- vertexworld = gl_vertex.value;
-
- memset (&clworldent, 0, sizeof(clworldent));
- clworldent.render.model = cl.worldmodel;
- clworldent.render.colormod[0] = clworldent.render.colormod[1] = clworldent.render.colormod[2] = 1;
- modelalpha = clworldent.render.alpha = 1;
- clworldent.render.scale = 1;
+ model_t *m;
+ texture_t *t;
+ int i;
+ m = r_refdef.worldmodel;
- VectorCopy (r_origin, modelorg);
-
- currententity = &clworldent;
-
- softwaretransformidentity(); // LordHavoc: clear transform
-
- if (cl.worldmodel)
- {
- if (r_novis.value || r_viewleaf->compressed_vis == NULL)
- R_SolidWorldNode ();
- else
- {
-// R_MarkLeaves ();
- R_PVSWorldNode ();
- }
- }
+ Con_Print("Worldmodel textures :\n");
+ for(i=0,t=m->data_textures;i<m->num_textures;i++,t++)
+ if (t->numskinframes)
+ Con_Printf("%s\n", t->name);
}
-/*
-=============================================================================
-
- LIGHTMAP ALLOCATION
-
-=============================================================================
-*/
-
-// returns a texture number and the position inside it
-int AllocBlock (int w, int h, short *x, short *y)
+#if 0
+static void gl_surf_start(void)
{
- int i, j;
- int best, best2;
- int texnum;
-
- for (texnum = 0;texnum < MAX_LIGHTMAPS;texnum++)
- {
- best = BLOCK_HEIGHT;
-
- for (i = 0;i < BLOCK_WIDTH - w;i += lightmapalign) // LordHavoc: NVIDIA has broken subimage, so align the lightmaps
- {
- best2 = 0;
-
- for (j=0 ; j<w ; j++)
- {
- if (allocated[texnum][i+j] >= best)
- break;
- if (allocated[texnum][i+j] > best2)
- best2 = allocated[texnum][i+j];
- }
- if (j == w)
- { // this is a valid spot
- *x = i;
- *y = best = best2;
- }
- }
-
- if (best + h > BLOCK_HEIGHT)
- continue;
-
- if (nosubimagefragments || nosubimage)
- {
- if (!lightmaps[texnum])
- {
- lightmaps[texnum] = qmalloc(BLOCK_WIDTH*BLOCK_HEIGHT*4);
- memset(lightmaps[texnum], 0, BLOCK_WIDTH*BLOCK_HEIGHT*4);
- }
- }
- // LordHavoc: clear texture to blank image, fragments are uploaded using subimage
- else if (!allocated[texnum][0])
- {
- byte blank[BLOCK_WIDTH*BLOCK_HEIGHT*4];
- memset(blank, 0, sizeof(blank));
- if(r_upload.value)
- {
- glBindTexture(GL_TEXTURE_2D, lightmap_textures + texnum);
- glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
- glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
- if (lightmaprgba)
- glTexImage2D (GL_TEXTURE_2D, 0, 3, BLOCK_WIDTH, BLOCK_HEIGHT, 0, GL_RGBA, GL_UNSIGNED_BYTE, blank);
- else
- glTexImage2D (GL_TEXTURE_2D, 0, 3, BLOCK_WIDTH, BLOCK_HEIGHT, 0, GL_RGB, GL_UNSIGNED_BYTE, blank);
- }
- }
-
- for (i = 0;i < w;i++)
- allocated[texnum][*x + i] = best + h;
-
- return texnum;
- }
-
- Host_Error ("AllocBlock: full, unable to find room for %i by %i lightmap", w, h);
- return 0;
}
-
-//int nColinElim;
-
-/*
-================
-BuildSurfaceDisplayList
-================
-*/
-void BuildSurfaceDisplayList (model_t *model, mvertex_t *vertices, msurface_t *fa)
+static void gl_surf_shutdown(void)
{
- int i, j, lindex, lnumverts;
- medge_t *pedges;
- float *vec;
- float s, t;
- glpoly_t *poly;
-
-// reconstruct the polygon
- pedges = model->edges;
- lnumverts = fa->numedges;
-
- //
- // draw texture
- //
- poly = Hunk_AllocName (sizeof(glpolysizeof_t) + lnumverts * sizeof(float[VERTEXSIZE]), "surfaces");
- poly->next = fa->polys;
- fa->polys = poly;
-// poly->flags = fa->flags;
- poly->numverts = lnumverts;
-
- for (i=0 ; i<lnumverts ; i++)
- {
- lindex = model->surfedges[fa->firstedge + i];
-
- if (lindex > 0)
- vec = vertices[pedges[lindex].v[0]].position;
- else
- vec = vertices[pedges[-lindex].v[1]].position;
-
- s = DotProduct (vec, fa->texinfo->vecs[0]) + fa->texinfo->vecs[0][3];
- t = DotProduct (vec, fa->texinfo->vecs[1]) + fa->texinfo->vecs[1][3];
-
- VectorCopy (vec, poly->verts[i]);
- poly->verts[i][3] = s / fa->texinfo->texture->width;
- poly->verts[i][4] = t / fa->texinfo->texture->height;
-
- //
- // lightmap texture coordinates
- //
- s -= fa->texturemins[0];
- t -= fa->texturemins[1];
- s += 8;
- t += 8;
- // LordHavoc: calc lightmap data offset
- j = (bound(0l, (int)t>>4, fa->extents[1]>>4) * ((fa->extents[0]>>4)+1) + bound(0l, (int)s>>4, fa->extents[0]>>4)) * 3;
- poly->verts[i][7] = j;
- s += fa->light_s*16;
- s /= BLOCK_WIDTH*16; //fa->texinfo->texture->width;
-
- t += fa->light_t*16;
- t /= BLOCK_HEIGHT*16; //fa->texinfo->texture->height;
-
- poly->verts[i][5] = s;
- poly->verts[i][6] = t;
- }
-
- //
- // remove co-linear points - Ed
- //
- /*
- if (!gl_keeptjunctions.value)
- {
- for (i = 0 ; i < lnumverts ; ++i)
- {
- vec3_t v1, v2;
- float *prev, *this, *next;
-
- prev = poly->verts[(i + lnumverts - 1) % lnumverts];
- this = poly->verts[i];
- next = poly->verts[(i + 1) % lnumverts];
-
- VectorSubtract( this, prev, v1 );
- VectorNormalize( v1 );
- VectorSubtract( next, prev, v2 );
- VectorNormalize( v2 );
-
- // skip co-linear points
- #define COLINEAR_EPSILON 0.001
- if ((fabs( v1[0] - v2[0] ) <= COLINEAR_EPSILON) &&
- (fabs( v1[1] - v2[1] ) <= COLINEAR_EPSILON) &&
- (fabs( v1[2] - v2[2] ) <= COLINEAR_EPSILON))
- {
- int j;
- for (j = i + 1; j < lnumverts; ++j)
- {
- int k;
- for (k = 0; k < VERTEXSIZE; ++k)
- poly->verts[j - 1][k] = poly->verts[j][k];
- }
- --lnumverts;
- ++nColinElim;
- // retry next vertex next time, which is now current vertex
- --i;
- }
- }
- poly->numverts = lnumverts;
- }
- */
}
-/*
-========================
-GL_CreateSurfaceLightmap
-========================
-*/
-void GL_CreateSurfaceLightmap (msurface_t *surf)
+static void gl_surf_newmap(void)
{
- int smax, tmax;
-
- if (surf->flags & (SURF_DRAWSKY|SURF_DRAWTURB))
- return;
-
- smax = (surf->extents[0]>>4)+1;
- tmax = (surf->extents[1]>>4)+1;
-
- surf->lightmaptexturenum = AllocBlock (smax, tmax, &surf->light_s, &surf->light_t);
- if (nosubimage || nosubimagefragments)
- return;
- glBindTexture(GL_TEXTURE_2D, lightmap_textures + surf->lightmaptexturenum);
- smax = ((surf->extents[0]>>4)+lightmapalign) & lightmapalignmask;
- if (lightmaprgba)
- {
- R_BuildLightMap (surf, templight, smax * 4);
- if(r_upload.value)
- glTexSubImage2D(GL_TEXTURE_2D, 0, surf->light_s, surf->light_t, smax, tmax, GL_RGBA, GL_UNSIGNED_BYTE, templight);
- }
- else
- {
- R_BuildLightMap (surf, templight, smax * 3);
- if(r_upload.value)
- glTexSubImage2D(GL_TEXTURE_2D, 0, surf->light_s, surf->light_t, smax, tmax, GL_RGB , GL_UNSIGNED_BYTE, templight);
- }
}
+#endif
-
-/*
-==================
-GL_BuildLightmaps
-
-Builds the lightmap texture
-with all the surfaces from all brush models
-==================
-*/
-void GL_BuildLightmaps (void)
+void GL_Surf_Init(void)
{
- int i, j;
- model_t *m;
-
- memset (allocated, 0, sizeof(allocated));
-
- r_framecount = 1; // no dlightcache
-
- if (gl_nosubimagefragments.value)
- nosubimagefragments = 1;
- else
- nosubimagefragments = 0;
-
- if (gl_nosubimage.value)
- nosubimage = 1;
- else
- nosubimage = 0;
-
- if (gl_lightmaprgba.value)
- {
- lightmaprgba = true;
- lightmapbytes = 4;
- }
- else
- {
- lightmaprgba = false;
- lightmapbytes = 3;
- }
-
- // LordHavoc: NVIDIA seems to have a broken glTexSubImage2D,
- // it needs to be aligned on 4 pixel boundaries...
- // so I implemented an adjustable lightmap alignment
- if (gl_lightmapalign.value < 1)
- gl_lightmapalign.value = 1;
- if (gl_lightmapalign.value > 16)
- gl_lightmapalign.value = 16;
- lightmapalign = 1;
- while (lightmapalign < gl_lightmapalign.value)
- lightmapalign <<= 1;
- gl_lightmapalign.value = lightmapalign;
- lightmapalignmask = ~(lightmapalign - 1);
- if (nosubimagefragments || nosubimage)
- {
- lightmapalign = 1;
- lightmapalignmask = ~0;
- }
- if (!lightmap_textures)
- lightmap_textures = R_GetTextureSlots(MAX_LIGHTMAPS);
+ Cvar_RegisterVariable(&r_ambient);
+ Cvar_RegisterVariable(&r_lockpvs);
+ Cvar_RegisterVariable(&r_lockvisibility);
+ Cvar_RegisterVariable(&r_useportalculling);
+ Cvar_RegisterVariable(&r_q3bsp_renderskydepth);
- for (j=1 ; j<MAX_MODELS ; j++)
- {
- m = cl.model_precache[j];
- if (!m)
- break;
- if (m->name[0] == '*')
- continue;
- for (i=0 ; i<m->numsurfaces ; i++)
- {
- if ( m->surfaces[i].flags & SURF_DRAWTURB )
- continue;
- if ( m->surfaces[i].flags & SURF_DRAWSKY )
- continue;
- GL_CreateSurfaceLightmap (m->surfaces + i);
- BuildSurfaceDisplayList (m, m->vertexes, m->surfaces + i);
- }
- }
+ Cmd_AddCommand ("r_replacemaptexture", R_ReplaceWorldTexture, "override a map texture for testing purposes"); // By [515]
+ Cmd_AddCommand ("r_listmaptextures", R_ListWorldTextures, "list all textures used by the current map"); // By [515]
- if (nosubimage || nosubimagefragments)
- {
- // LordHavoc: switch to second TMU as an upload hint for voodoo2
- // (don't know if it really pays attention or not, but original
- // glquake did this...)
- if(r_upload.value)
- if (gl_mtexable)
- qglActiveTexture(GL_TEXTURE1_ARB);
- for (i = 0;i < MAX_LIGHTMAPS;i++)
- {
- if (!allocated[i][0])
- break;
- lightmapupdate[i][0] = BLOCK_HEIGHT;
- lightmapupdate[i][1] = 0;
- if(r_upload.value)
- {
- glBindTexture(GL_TEXTURE_2D, lightmap_textures + i);
- glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
- glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
- if (lightmaprgba)
- glTexImage2D(GL_TEXTURE_2D, 0, 3, BLOCK_WIDTH, BLOCK_HEIGHT, 0, GL_RGBA, GL_UNSIGNED_BYTE, lightmaps[i]);
- else
- glTexImage2D(GL_TEXTURE_2D, 0, 3, BLOCK_WIDTH, BLOCK_HEIGHT, 0, GL_RGB, GL_UNSIGNED_BYTE, lightmaps[i]);
- }
- }
- if(r_upload.value)
- if (gl_mtexable)
- qglActiveTexture(GL_TEXTURE0_ARB);
- }
+ //R_RegisterModule("GL_Surf", gl_surf_start, gl_surf_shutdown, gl_surf_newmap);
}
projects / xonotic / darkplaces.git / blobdiff