123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261 |
- #include "quakedef.h"
- #include "r_local.h"
- int r_dlightframecount;
- void R_AnimateLight (void)
- {
- int i,j,k;
-
- i = (int)(cl.time*10);
- for (j=0 ; j<MAX_LIGHTSTYLES ; j++)
- {
- if (!cl_lightstyle[j].length)
- {
- d_lightstylevalue[j] = 256;
- continue;
- }
- k = i % cl_lightstyle[j].length;
- k = cl_lightstyle[j].map[k] - 'a';
- k = k*22;
- d_lightstylevalue[j] = k;
- }
- }
- void R_MarkLights (dlight_t *light, int bit, mnode_t *node)
- {
- mplane_t *splitplane;
- float dist;
- msurface_t *surf;
- int i;
-
- if (node->contents < 0)
- return;
- splitplane = node->plane;
- dist = DotProduct (light->origin, splitplane->normal) - splitplane->dist;
-
- if (dist > light->radius)
- {
- R_MarkLights (light, bit, node->children[0]);
- return;
- }
- if (dist < -light->radius)
- {
- R_MarkLights (light, bit, node->children[1]);
- return;
- }
-
- surf = cl.worldmodel->surfaces + node->firstsurface;
- for (i=0 ; i<node->numsurfaces ; i++, surf++)
- {
- if (surf->dlightframe != r_dlightframecount)
- {
- surf->dlightbits = 0;
- surf->dlightframe = r_dlightframecount;
- }
- surf->dlightbits |= bit;
- }
- R_MarkLights (light, bit, node->children[0]);
- R_MarkLights (light, bit, node->children[1]);
- }
- void R_PushDlights (void)
- {
- int i;
- dlight_t *l;
- r_dlightframecount = r_framecount + 1;
-
- l = cl_dlights;
- for (i=0 ; i<MAX_DLIGHTS ; i++, l++)
- {
- if (l->die < cl.time || !l->radius)
- continue;
- R_MarkLights ( l, 1<<i, cl.worldmodel->nodes );
- }
- }
- int RecursiveLightPoint (mnode_t *node, vec3_t start, vec3_t end)
- {
- int r;
- float front, back, frac;
- int side;
- mplane_t *plane;
- vec3_t mid;
- msurface_t *surf;
- int s, t, ds, dt;
- int i;
- mtexinfo_t *tex;
- byte *lightmap;
- unsigned scale;
- int maps;
- if (node->contents < 0)
- return -1;
-
- plane = node->plane;
- front = DotProduct (start, plane->normal) - plane->dist;
- back = DotProduct (end, plane->normal) - plane->dist;
- side = front < 0;
-
- if ( (back < 0) == side)
- return RecursiveLightPoint (node->children[side], start, end);
-
- frac = front / (front-back);
- mid[0] = start[0] + (end[0] - start[0])*frac;
- mid[1] = start[1] + (end[1] - start[1])*frac;
- mid[2] = start[2] + (end[2] - start[2])*frac;
-
- r = RecursiveLightPoint (node->children[side], start, mid);
- if (r >= 0)
- return r;
-
- if ( (back < 0) == side )
- return -1;
-
- surf = cl.worldmodel->surfaces + node->firstsurface;
- for (i=0 ; i<node->numsurfaces ; i++, surf++)
- {
- if (surf->flags & SURF_DRAWTILED)
- continue;
- tex = surf->texinfo;
-
- s = DotProduct (mid, tex->vecs[0]) + tex->vecs[0][3];
- t = DotProduct (mid, tex->vecs[1]) + tex->vecs[1][3];;
- if (s < surf->texturemins[0] ||
- t < surf->texturemins[1])
- continue;
-
- ds = s - surf->texturemins[0];
- dt = t - surf->texturemins[1];
-
- if ( ds > surf->extents[0] || dt > surf->extents[1] )
- continue;
- if (!surf->samples)
- return 0;
- ds >>= 4;
- dt >>= 4;
- lightmap = surf->samples;
- r = 0;
- if (lightmap)
- {
- lightmap += dt * ((surf->extents[0]>>4)+1) + ds;
- for (maps = 0 ; maps < MAXLIGHTMAPS && surf->styles[maps] != 255 ;
- maps++)
- {
- scale = d_lightstylevalue[surf->styles[maps]];
- r += *lightmap * scale;
- lightmap += ((surf->extents[0]>>4)+1) *
- ((surf->extents[1]>>4)+1);
- }
-
- r >>= 8;
- }
-
- return r;
- }
- return RecursiveLightPoint (node->children[!side], mid, end);
- }
- int R_LightPoint (vec3_t p)
- {
- vec3_t end;
- int r;
-
- if (!cl.worldmodel->lightdata)
- return 255;
-
- end[0] = p[0];
- end[1] = p[1];
- end[2] = p[2] - 2048;
-
- r = RecursiveLightPoint (cl.worldmodel->nodes, p, end);
-
- if (r == -1)
- r = 0;
- if (r < r_refdef.ambientlight)
- r = r_refdef.ambientlight;
- return r;
- }
|