ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/rt/raytrace.c
(Generate patch)

Comparing ray/src/rt/raytrace.c (file contents):
Revision 2.1 by greg, Tue Nov 12 17:09:44 1991 UTC vs.
Revision 2.2 by greg, Mon Jan 25 15:16:59 1993 UTC

# Line 29 | Line 29 | long  nrays = 0L;                      /* number of calls to localhit */
29   static FLOAT  Lambfa[5] = {PI, PI, PI, 0.0, 0.0};
30   OBJREC  Lamb = {
31          OVOID, MAT_PLASTIC, "Lambertian",
32 <        {0, 5, NULL, Lambfa}, NULL, -1,
32 >        {0, 5, NULL, Lambfa}, NULL,
33   };                                      /* a Lambertian surface */
34  
35   #define  MAXLOOP        128             /* modifier loop detection */
# Line 73 | Line 73 | rayclear(r)                    /* clear a ray for (re)evaluation */
73   register RAY  *r;
74   {
75          r->rno = raynum++;
76 +        r->cxs[0] = 0;
77          r->newcset = r->clipset;
78          r->ro = NULL;
79          r->rot = FHUGE;
# Line 151 | Line 152 | int  mod;
152                                  m = &Lamb;
153                  }
154                  (*ofun[m->otype].funp)(m, r);   /* execute function */
154 –                m->lastrno = r->rno;
155                  if (ismaterial(m->otype)) {     /* materials call raytexture */
156                          depth--;
157                          return;         /* we're done */
# Line 178 | Line 178 | int  mod;
178                          error(USER, errmsg);
179                  }
180                  (*ofun[m->otype].funp)(m, r);
181 –                m->lastrno = r->rno;
181          }
182          depth--;                        /* end here */
183   }
# Line 454 | Line 453 | CUBE  *cu;
453          register int  i;
454  
455          objset(oset, cu->cutree);
456 +        checkset(oset, r->cxs);                 /* eliminate double-checking */
457          for (i = oset[0]; i > 0; i--) {
458                  o = objptr(oset[i]);
459 –                if (o->lastrno == r->rno)               /* checked already? */
460 –                        continue;
459                  (*ofun[o->otype].funp)(o, r);
462 –                o->lastrno = r->rno;
460          }
461          if (r->ro == NULL)
462                  return(0);                      /* no scores yet */
463  
464          return(incube(cu, r->rop));             /* hit OK if in current cube */
465 + }
466 +
467 +
468 + static
469 + checkset(os, cs)                /* modify checked set and set to check */
470 + register OBJECT  os[MAXSET+1];          /* os' = os - cs */
471 + register OBJECT  cs[MAXCSET+1];         /* cs' = cs + os */
472 + {
473 +        OBJECT  cset[MAXCSET+MAXSET+1];
474 +        register int  i, j, k;
475 +                                        /* copy os in place, cset <- cs */
476 +        cset[0] = 0;
477 +        k = 0;
478 +        for (i = j = 1; i <= os[0]; i++) {
479 +                while (j <= cs[0] && cs[j] < os[i])
480 +                        cset[++cset[0]] = cs[j++];
481 +                if (j > cs[0] || os[i] != cs[j]) {      /* object to check */
482 +                        os[++k] = os[i];
483 +                        cset[++cset[0]] = os[i];
484 +                }
485 +        }
486 +        while (j <= cs[0])              /* get the rest of cs */
487 +                cset[++cset[0]] = cs[j++];
488 +        if (cset[0] > MAXCSET)          /* truncate if necessary */
489 +                cset[0] = MAXCSET;
490 +        setcopy(cs, cset);              /* copy new "checked" set back */
491 +        os[0] = k;                      /* new "to check" set size */
492   }

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines