1 |
|
#ifndef lint |
2 |
< |
static const char RCSid[] = "$Id$"; |
2 |
> |
static const char RCSid[] = "$Id$"; |
3 |
|
#endif |
4 |
|
/* |
5 |
|
* raytrace.c - routines for tracing and shading rays. |
20 |
|
unsigned long raynum = 0; /* next unique ray number */ |
21 |
|
unsigned long nrays = 0; /* number of calls to localhit */ |
22 |
|
|
23 |
< |
static FLOAT Lambfa[5] = {PI, PI, PI, 0.0, 0.0}; |
23 |
> |
static RREAL Lambfa[5] = {PI, PI, PI, 0.0, 0.0}; |
24 |
|
OBJREC Lamb = { |
25 |
|
OVOID, MAT_PLASTIC, "Lambertian", |
26 |
|
{0, 5, NULL, Lambfa}, NULL, |
95 |
|
{ |
96 |
|
r->rno = raynum++; |
97 |
|
r->newcset = r->clipset; |
98 |
+ |
r->hitf = rayhit; |
99 |
|
r->robj = OVOID; |
100 |
|
r->ro = NULL; |
101 |
|
r->rox = NULL; |
102 |
|
r->rt = r->rot = FHUGE; |
103 |
|
r->pert[0] = r->pert[1] = r->pert[2] = 0.0; |
104 |
+ |
r->uv[0] = r->uv[1] = 0.0; |
105 |
|
setcolor(r->pcol, 1.0, 1.0, 1.0); |
106 |
|
setcolor(r->rcol, 0.0, 0.0, 0.0); |
107 |
|
} |
174 |
|
} |
175 |
|
******/ |
176 |
|
/* hack for irradiance calculation */ |
177 |
< |
if (do_irrad && !(r->crtype & ~(PRIMARY|TRANS))) { |
177 |
> |
if (do_irrad && !(r->crtype & ~(PRIMARY|TRANS)) && |
178 |
> |
(ofun[m->otype].flags & (T_M|T_X))) { |
179 |
|
if (irr_ignore(m->otype)) { |
180 |
|
#if MAXLOOP |
181 |
|
depth--; |
228 |
|
} |
229 |
|
|
230 |
|
|
231 |
+ |
void |
232 |
|
raytexture(r, mod) /* get material modifiers */ |
233 |
|
RAY *r; |
234 |
< |
int mod; |
234 |
> |
OBJECT mod; |
235 |
|
{ |
236 |
|
register OBJREC *m; |
237 |
|
#if MAXLOOP |
278 |
|
/* compute foreground and background */ |
279 |
|
foremat = backmat = 0; |
280 |
|
/* foreground */ |
281 |
< |
copystruct(&fr, r); |
281 |
> |
fr = *r; |
282 |
|
if (coef > FTINY) |
283 |
|
foremat = rayshade(&fr, fore); |
284 |
|
/* background */ |
285 |
< |
copystruct(&br, r); |
285 |
> |
br = *r; |
286 |
|
if (coef < 1.0-FTINY) |
287 |
|
backmat = rayshade(&br, back); |
288 |
|
/* check for transparency */ |
289 |
< |
if (backmat ^ foremat) |
289 |
> |
if (backmat ^ foremat) { |
290 |
|
if (backmat && coef > FTINY) |
291 |
|
raytrans(&fr); |
292 |
|
else if (foremat && coef < 1.0-FTINY) |
293 |
|
raytrans(&br); |
294 |
+ |
} |
295 |
|
/* mix perturbations */ |
296 |
|
for (i = 0; i < 3; i++) |
297 |
|
r->pert[i] = coef*fr.pert[i] + (1.0-coef)*br.pert[i]; |
414 |
|
} |
415 |
|
|
416 |
|
|
417 |
+ |
void |
418 |
+ |
rayhit(oset, r) /* standard ray hit test */ |
419 |
+ |
OBJECT *oset; |
420 |
+ |
RAY *r; |
421 |
+ |
{ |
422 |
+ |
OBJREC *o; |
423 |
+ |
int i; |
424 |
+ |
|
425 |
+ |
for (i = oset[0]; i > 0; i--) { |
426 |
+ |
o = objptr(oset[i]); |
427 |
+ |
if ((*ofun[o->otype].funp)(o, r)) |
428 |
+ |
r->robj = oset[i]; |
429 |
+ |
} |
430 |
+ |
} |
431 |
+ |
|
432 |
+ |
|
433 |
|
int |
434 |
|
localhit(r, scene) /* check for hit in the octree */ |
435 |
|
register RAY *r; |
488 |
|
} |
489 |
|
cxset[0] = 0; |
490 |
|
raymove(curpos, cxset, sflags, r, scene); |
491 |
< |
return(r->ro != NULL & r->ro != &Aftplane); |
491 |
> |
return((r->ro != NULL) & (r->ro != &Aftplane)); |
492 |
|
} |
493 |
|
|
494 |
|
|
585 |
|
OBJECT *cxs; |
586 |
|
{ |
587 |
|
OBJECT oset[MAXSET+1]; |
567 |
– |
register OBJREC *o; |
568 |
– |
register int i; |
588 |
|
|
589 |
|
objset(oset, cu->cutree); |
590 |
< |
checkset(oset, cxs); /* eliminate double-checking */ |
591 |
< |
for (i = oset[0]; i > 0; i--) { |
592 |
< |
o = objptr(oset[i]); |
593 |
< |
if ((*ofun[o->otype].funp)(o, r)) |
594 |
< |
r->robj = oset[i]; |
576 |
< |
} |
577 |
< |
if (r->ro == NULL) |
590 |
> |
checkset(oset, cxs); /* avoid double-checking */ |
591 |
> |
|
592 |
> |
(*r->hitf)(oset, r); /* test for hit in set */ |
593 |
> |
|
594 |
> |
if (r->robj == OVOID) |
595 |
|
return(0); /* no scores yet */ |
596 |
|
|
597 |
|
return(incube(cu, r->rop)); /* hit OK if in current cube */ |