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

Comparing ray/src/hd/rhd_qtree.c (file contents):
Revision 3.14 by gregl, Mon Dec 29 17:31:45 1997 UTC vs.
Revision 3.17 by gregl, Thu Jan 1 13:00:15 1998 UTC

# Line 29 | Line 29 | double qtDepthEps = .05;       /* epsilon to compare depths
29   int     qtMinNodesiz = 2;       /* minimum node dimension (pixels) */
30   struct rleaves  qtL;            /* our pile of leaves */
31  
32 + int     rayqleft = 0;           /* rays left to queue before flush */
33 +
34 + static int4     falleaves;      /* our list of fallen leaves */
35 +
36 + #define composted(li)   (qtL.bl <= qtL.tl ? \
37 +                                        ((li) < qtL.bl || (li) >= qtL.tl) : \
38 +                                        ((li) < qtL.bl && (li) >= qtL.tl))
39 +
40   #define TBUNDLESIZ      409     /* number of twigs in a bundle */
41  
42   static RTREE    **twigbundle;   /* free twig blocks (NULL term.) */
# Line 120 | Line 128 | register int   n;
128          qtL.rgb = (BYTE (*)[3])(qtL.chr + n);
129          qtL.nl = n;
130          qtL.tml = qtL.bl = qtL.tl = 0;
131 +        falleaves = -1;
132          return(n);
133   }
134  
# Line 150 | Line 159 | register RTREE *tp;
159                                  tp->flgs &= ~BRF(i);
160                  } else if (tp->flgs & LFF(i)) {
161                          li = tp->k[i].li;
162 <                        if (qtL.bl < qtL.tl ?
154 <                                (li < qtL.bl || li >= qtL.tl) :
155 <                                (li < qtL.bl && li >= qtL.tl))
162 >                        if (composted(li))
163                                  tp->flgs &= ~LFF(i);
164                  }
165   }
# Line 162 | Line 169 | int
169   qtCompost(pct)                  /* free up some leaves */
170   int     pct;
171   {
172 +        register int4   *fl;
173          int     nused, nclear, nmapped;
166
174                                  /* figure out how many leaves to clear */
175          nclear = qtL.nl * pct / 100;
176          nused = qtL.tl - qtL.bl;
# Line 174 | Line 181 | int    pct;
181          if (nclear >= nused) {  /* clear them all */
182                  qtFreeTree(0);
183                  qtL.tml = qtL.bl = qtL.tl = 0;
184 +                falleaves = -1;
185                  return(nused);
186          }
187                                  /* else clear leaves from bottom */
# Line 182 | Line 190 | int    pct;
190          qtL.bl += nclear;
191          if (qtL.bl >= qtL.nl) qtL.bl -= qtL.nl;
192          if (nmapped <= nclear) qtL.tml = qtL.bl;
193 <        shaketree(&qtrunk);
193 >        shaketree(&qtrunk);     /* dereference composted leaves */
194 >        for (fl = &falleaves; *fl >= 0; fl = qtL.wd + *fl)
195 >                while (composted(*fl))
196 >                        if ((*fl = qtL.wd[*fl]) < 0)
197 >                                return(nclear);
198          return(nclear);
199   }
200  
# Line 225 | Line 237 | int    x, y;
237  
238  
239   static
240 < addleaf(li)                     /* add a leaf to our tree */
241 < int     li;
240 > putleaf(li, drop)               /* put a leaf in our tree */
241 > register int    li;
242 > int     drop;
243   {
244          register RTREE  *tp = &qtrunk;
245          int     x0=0, y0=0, x1=odev.hres, y1=odev.vres;
246 <        int     lo = -1;
246 >        register int    lo = -1;
247          double  d2;
248          int     x, y, mx, my;
249          double  z;
250          FVECT   ip, wp, vd;
251          register int    q;
252 +                                        /* check for dead leaf */
253 +        if (!qtL.chr[li][1] && !(qtL.chr[li][0] | qtL.chr[li][2]))
254 +                return(0);
255                                          /* compute leaf location in view */
256          VCOPY(wp, qtL.wp[li]);
257          viewloc(ip, &odev.v, wp);
258          if (ip[2] <= 0. || ip[0] < 0. || ip[0] >= 1.
259                          || ip[1] < 0. || ip[1] >= 1.)
260 <                return(-1);                     /* behind or outside view */
260 >                goto dropit;                    /* behind or outside view */
261   #ifdef DEBUG
262          if (odev.v.type == VT_PAR | odev.v.vfore > FTINY)
263 <                error(INTERNAL, "bad view assumption in addleaf");
263 >                error(INTERNAL, "bad view assumption in putleaf");
264   #endif
265          for (q = 0; q < 3; q++)
266                  vd[q] = (wp[q] - odev.v.vp[q])/ip[2];
267          d2 = fdir2diff(qtL.wd[li], vd);
268   #ifdef MAXDIFF2
269          if (d2 > MAXDIFF2)
270 <                return(0);                      /* leaf dir. too far off */
270 >                goto dropit;                    /* leaf dir. too far off */
271   #endif
272          x = ip[0] * odev.hres;
273          y = ip[1] * odev.vres;
# Line 273 | Line 289 | int    li;
289                  if (!(tp->flgs & LFF(q))) {     /* found stem for leaf */
290                          tp->k[q].li = li;
291                          tp->flgs |= CHLFF(q);
292 <                        break;
292 >                        return(1);
293                  }      
294                  if (lo != tp->k[q].li) {        /* check old leaf */
295                          lo = tp->k[q].li;
# Line 283 | Line 299 | int    li;
299                                                  /* is node minimum size? */
300                  if (y1-y0 <= qtMinNodesiz || x1-x0 <= qtMinNodesiz) {
301                          if (z > (1.+qtDepthEps)*ip[2])
302 <                                return(0);              /* old one closer */
302 >                                break;                  /* old one closer */
303                          if (z >= (1.-qtDepthEps)*ip[2] &&
304                                          fdir2diff(qtL.wd[lo], vd) < d2)
305 <                                return(0);              /* old one better */
306 <                        tp->k[q].li = li;               /* else new one is */
305 >                                break;                  /* old one better */
306 >                        tp->k[q].li = li;               /* attach new */
307                          tp->flgs |= CHF(q);
308 +                        li = lo;                        /* drop old... */
309                          break;
310                  }
311                  tp->flgs &= ~LFF(q);            /* else grow tree */
# Line 302 | Line 319 | int    li;
319                  tp->flgs = CH_ANY|LFF(q);       /* all new */
320                  tp->k[q].li = lo;
321          }
322 <        return(1);              /* done */
322 > dropit:
323 >        if (drop)
324 >                if (li+1 == (qtL.tl ? qtL.tl : qtL.nl))
325 >                        qtL.tl = li;            /* special case */
326 >                else {
327 >                        qtL.chr[li][0] = qtL.chr[li][1] = qtL.chr[li][2] = 0;
328 >                        qtL.wd[li] = falleaves;
329 >                        falleaves = li;
330 >                }
331 >        return(li == lo);
332   }
333  
334  
# Line 311 | Line 337 | COLR   c;
337   FVECT   p, v;
338   {
339          register int    li;
340 <
341 <        li = qtL.tl++;
342 <        if (qtL.tl >= qtL.nl)   /* advance to next leaf in ring */
343 <                qtL.tl = 0;
344 <        if (qtL.tl == qtL.bl)   /* need to shake some free */
345 <                qtCompost(LFREEPCT);
340 >        int     mapit;
341 >                                /* grab a leaf */
342 >        if (!imm_mode && falleaves >= 0) {      /* check for fallen leaves */
343 >                li = falleaves;
344 >                falleaves = qtL.wd[li];
345 >                mapit = qtL.tml <= qtL.tl ?
346 >                                (li < qtL.tml || li >= qtL.tl) :
347 >                                (li < qtL.tml && li >= qtL.tl) ;
348 >        } else {                                /* else allocate new one */
349 >                li = qtL.tl++;
350 >                if (qtL.tl >= qtL.nl)           /* next leaf in ring */
351 >                        qtL.tl = 0;
352 >                if (qtL.tl == qtL.bl)           /* need to shake some free */
353 >                        qtCompost(LFREEPCT);
354 >                mapit = 0;                      /* we'll map it later */
355 >        }
356          VCOPY(qtL.wp[li], p);
357          qtL.wd[li] = encodedir(v);
358          tmCvColrs(&qtL.brt[li], qtL.chr[li], c, 1);
359 <        if (!addleaf(li))
360 <                qtL.tl = li;    /* unget this leaf */
359 >        if (putleaf(li, 1)) {
360 >                if (mapit)
361 >                        tmMapPixels(qtL.rgb+li, qtL.brt+li, qtL.chr+li, 1);
362 >                if (--rayqleft == 0)
363 >                        dev_flush();            /* flush output */
364 >        }
365   }
366  
367  
# Line 334 | Line 374 | qtReplant()                    /* replant our tree using new view */
374          qtFreeTree(0);                  /* blow the old tree away */
375                                          /* regrow it in new place */
376          for (i = qtL.bl; i != qtL.tl; ) {
377 <                addleaf(i);
377 >                putleaf(i, 0);
378                  if (++i >= qtL.nl) i = 0;
379          }
380   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines