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

Comparing ray/src/rt/rv3.c (file contents):
Revision 2.18 by greg, Mon Jun 13 20:07:56 2005 UTC vs.
Revision 2.33 by greg, Fri Oct 8 20:41:04 2010 UTC

# Line 16 | Line 16 | static const char      RCSid[] = "$Id$";
16   #include  "random.h"
17  
18   #ifndef WFLUSH
19 < #ifdef SPEED
20 < #define WFLUSH          (5*SPEED)
21 < #else
22 < #define WFLUSH          100             /* flush after this many rays */
19 > #define WFLUSH          64              /* flush after this many primary rays */
20   #endif
21 + #ifndef WFLUSH1
22 + #define WFLUSH1         512             /* or this many total rays */
23   #endif
24  
25 +
26   #ifdef  SMLFLT
27   #define  sscanvec(s,v)  (sscanf(s,"%f %f %f",v,v+1,v+2)==3)
28   #else
29   #define  sscanvec(s,v)  (sscanf(s,"%lf %lf %lf",v,v+1,v+2)==3)
30   #endif
31  
32 + static RNUMBER  niflush;                /* flushes since newimage() */
33  
34   int
35 < getrect(s, r)                           /* get a box */
36 < char  *s;
37 < register RECT  *r;
35 > getrect(                                /* get a box */
36 >        char  *s,
37 >        RECT  *r
38 > )
39   {
40          int  x0, y0, x1, y1;
41  
# Line 78 | Line 80 | register RECT  *r;
80  
81  
82   int
83 < getinterest(s, direc, vec, mp)          /* get area of interest */
84 < char  *s;
85 < int  direc;
86 < FVECT  vec;
87 < double  *mp;
83 > getinterest(            /* get area of interest */
84 >        char  *s,
85 >        int  direc,
86 >        FVECT  vec,
87 >        double  *mp
88 > )
89   {
90          int  x, y;
91          RAY  thisray;
92 <        register int  i;
92 >        int  i;
93  
94          if (sscanf(s, "%lf", mp) != 1)
95                  *mp = 1.0;
# Line 135 | Line 138 | double  *mp;
138  
139  
140   float *         /* keep consistent with COLOR typedef */
141 < greyof(col)                             /* convert color to greyscale */
142 < register COLOR  col;
141 > greyof(                         /* convert color to greyscale */
142 >        COLOR  col
143 > )
144   {
145          static COLOR  gcol;
146          double  b;
# Line 146 | Line 150 | register COLOR  col;
150          return(gcol);
151   }
152  
153 + static void
154 + recolor(                                        /* recolor the given node */
155 +        PNODE *p
156 + )
157 + {
158 +        while (p->kid != NULL) {                /* need to propogate down */
159 +                int  mx = (p->xmin + p->xmax) >> 1;
160 +                int  my = (p->ymin + p->ymax) >> 1;
161 +                int  ki;
162 +                if (p->x >= mx)
163 +                        ki = (p->y >= my) ? UR : DR;
164 +                else
165 +                        ki = (p->y >= my) ? UL : DL;
166 +                pcopy(p, p->kid+ki);
167 +                p = p->kid + ki;
168 +        }
169  
170 < void
171 < paint(p, xmin, ymin, xmax, ymax)        /* compute and paint a rectangle */
172 < register PNODE  *p;
173 < int  xmin, ymin, xmax, ymax;
170 >        (*dev->paintr)(greyscale?greyof(p->v):p->v,
171 >                        p->xmin, p->ymin, p->xmax, p->ymax);
172 > }
173 >
174 > int
175 > paint(                  /* compute and paint a rectangle */
176 >        PNODE  *p
177 > )
178   {
155 –        static unsigned long  lastflush = 0;
179          static RAY  thisray;
180          double  h, v;
181  
182 <        if (xmax - xmin <= 0 || ymax - ymin <= 0) {     /* empty */
183 <                p->x = xmin;
184 <                p->y = ymin;
182 >        if ((p->xmax <= p->xmin) | (p->ymax <= p->ymin)) {      /* empty */
183 >                p->x = p->xmin;
184 >                p->y = p->ymin;
185                  setcolor(p->v, 0.0, 0.0, 0.0);
186 <                return;
186 >                return(0);
187          }
188                                                  /* jitter ray direction */
189 <        h = xmin + (xmax-xmin)*frandom();
190 <        v = ymin + (ymax-ymin)*frandom();
189 >        p->x = h = p->xmin + (p->xmax-p->xmin)*frandom();
190 >        p->y = v = p->ymin + (p->ymax-p->ymin)*frandom();
191          
192          if ((thisray.rmax = viewray(thisray.rorg, thisray.rdir, &ourview,
193                          h/hresolu, v/vresolu)) < -FTINY) {
194                  setcolor(thisray.rcol, 0.0, 0.0, 0.0);
195 <        } else {
195 >        } else if (nproc == 1) {                /* immediate mode */
196 >                ray_trace(&thisray);
197 >        } else {                                /* queuing mode */
198 >                int     rval;
199                  rayorigin(&thisray, PRIMARY, NULL, NULL);
200 <                samplendx = rand_samp ? random() : samplendx+1;
201 <                rayvalue(&thisray);
200 >                thisray.rno = (RNUMBER)p;
201 >                rval = ray_pqueue(&thisray);
202 >                if (!rval)
203 >                        return(0);
204 >                if (rval < 0)
205 >                        return(-1);
206 >                                                /* random color place holder */
207 >                setcolor(p->v, frandom(), frandom(), frandom());
208 >                                                /* get node for returned ray */
209 >                p = (PNODE *)thisray.rno;
210          }
211  
178 –        p->x = h;
179 –        p->y = v;
212          copycolor(p->v, thisray.rcol);
213          scalecolor(p->v, exposure);
214  
215 <        (*dev->paintr)(greyscale?greyof(p->v):p->v, xmin, ymin, xmax, ymax);
215 >        recolor(p);                             /* paint it */
216  
217 <        if (dev->flush != NULL && nrays - lastflush >= WFLUSH) {
218 <                lastflush = nrays;
219 <                (*dev->flush)();
217 >        if (dev->flush != NULL) {               /* shall we check for input? */
218 >                static RNUMBER  lastflush = 0;
219 >                RNUMBER         counter = raynum;
220 >                int             flushintvl;
221 >                if (nproc == 1) {
222 >                        counter = nrays;
223 >                        flushintvl = WFLUSH1;
224 >                } else if (ambounce == 0)
225 >                        flushintvl = nproc*WFLUSH;
226 >                else if (niflush < WFLUSH)
227 >                        flushintvl = nproc*niflush/(ambounce+1);
228 >                else
229 >                        flushintvl = nproc*WFLUSH/(ambounce+1);
230 >                if (lastflush > counter)
231 >                        lastflush = 0;          /* counter wrapped */
232 >
233 >                if (counter - lastflush >= flushintvl) {
234 >                        lastflush = counter;
235 >                        (*dev->flush)();
236 >                        niflush++;
237 >                }
238          }
239 +        return(1);
240   }
241  
242  
243 + int
244 + waitrays(void)                                  /* finish up pending rays */
245 + {
246 +        int     nwaited = 0;
247 +        int     rval;
248 +        RAY     raydone;
249 +
250 +        if (nproc <= 1)                         /* immediate mode? */
251 +                return(0);
252 +        while ((rval = ray_presult(&raydone, 0)) > 0) {
253 +                PNODE  *p = (PNODE *)raydone.rno;
254 +                copycolor(p->v, raydone.rcol);
255 +                scalecolor(p->v, exposure);
256 +                recolor(p);
257 +                nwaited++;
258 +        }
259 +        if (rval < 0)
260 +                return(-1);
261 +        return(nwaited);
262 + }
263 +
264 +
265   void
266 < newimage()                              /* start a new image */
266 > newimage(                                       /* start a new image */
267 >        char *s
268 > )
269   {
270 +        extern int      ray_pnprocs;
271 +        int             newnp;
272 +                                                /* change in nproc? */
273 +        if (s != NULL && sscanf(s, "%d", &newnp) == 1 &&
274 +                        (newnp > 0) & (newnp != nproc)) {
275 +                if (!newparam) {
276 +                        if (newnp == 1)
277 +                                ray_pclose(0);
278 +                        else if (newnp < ray_pnprocs)
279 +                                ray_pclose(ray_pnprocs - newnp);
280 +                        else
281 +                                ray_popen(newnp - ray_pnprocs);
282 +                }
283 +                nproc = newnp;
284 +        }
285                                                  /* free old image */
286          freepkids(&ptrunk);
197 –                                                /* save reserve memory */
198 –        fillreserves();
287                                                  /* compute resolution */
288          hresolu = dev->xsiz;
289          vresolu = dev->ysiz;
290          normaspect(viewaspect(&ourview), &dev->pixaspect, &hresolu, &vresolu);
291 <        pframe.l = pframe.d = 0;
292 <        pframe.r = hresolu; pframe.u = vresolu;
291 >        ptrunk.xmin = ptrunk.ymin = pframe.l = pframe.d = 0;
292 >        ptrunk.xmax = pframe.r = hresolu;
293 >        ptrunk.ymax = pframe.u = vresolu;
294          pdepth = 0;
295                                                  /* clear device */
296          (*dev->clear)(hresolu, vresolu);
297 <                                                /* get first value */
298 <        paint(&ptrunk, 0, 0, hresolu, vresolu);
297 >
298 >        if (newparam) {                         /* (re)start rendering procs */
299 >                if (ray_pnprocs > 0)
300 >                        ray_pclose(0);
301 >                if (nproc > 1)
302 >                        ray_popen(nproc);
303 >                newparam = 0;
304 >        }
305 >        niflush = 0;                            /* get first value */
306 >        paint(&ptrunk);
307   }
308  
309  
310   void
311 < redraw()                                /* redraw the image */
311 > redraw(void)                            /* redraw the image */
312   {
313          (*dev->clear)(hresolu, vresolu);
314          (*dev->comout)("redrawing...\n");
# Line 221 | Line 318 | redraw()                               /* redraw the image */
318  
319  
320   void
321 < repaint(xmin, ymin, xmax, ymax)                 /* repaint a region */
322 < int  xmin, ymin, xmax, ymax;
321 > repaint(                                /* repaint a region */
322 >        int  xmin,
323 >        int  ymin,
324 >        int  xmax,
325 >        int  ymax
326 > )
327   {
328          RECT  reg;
329  
330          reg.l = xmin; reg.r = xmax;
331          reg.d = ymin; reg.u = ymax;
332  
333 <        paintrect(&ptrunk, 0, 0, hresolu, vresolu, &reg);
333 >        paintrect(&ptrunk, &reg);
334   }
335  
336  
337   void
338 < paintrect(p, xmin, ymin, xmax, ymax, r)         /* paint picture rectangle */
339 < register PNODE  *p;
340 < int  xmin, ymin, xmax, ymax;
341 < register RECT  *r;
338 > paintrect(                              /* paint picture rectangle */
339 >        PNODE  *p,
340 >        RECT  *r
341 > )
342   {
343          int  mx, my;
344  
345 <        if (xmax - xmin <= 0 || ymax - ymin <= 0)
345 >        if (p->xmax - p->xmin <= 0 || p->ymax - p->ymin <= 0)
346                  return;
347  
348          if (p->kid == NULL) {
349                  (*dev->paintr)(greyscale?greyof(p->v):p->v,
350 <                                xmin, ymin, xmax, ymax);        /* do this */
350 >                        p->xmin, p->ymin, p->xmax, p->ymax);    /* do this */
351                  return;
352          }
353 <        mx = (xmin + xmax) >> 1;                                /* do kids */
354 <        my = (ymin + ymax) >> 1;
353 >        mx = (p->xmin + p->xmax) >> 1;                          /* do kids */
354 >        my = (p->ymin + p->ymax) >> 1;
355          if (mx > r->l) {
356                  if (my > r->d)
357 <                        paintrect(p->kid+DL, xmin, ymin, mx, my, r);
357 >                        paintrect(p->kid+DL, r);
358                  if (my < r->u)
359 <                        paintrect(p->kid+UL, xmin, my, mx, ymax, r);
359 >                        paintrect(p->kid+UL, r);
360          }
361          if (mx < r->r) {
362                  if (my > r->d)
363 <                        paintrect(p->kid+DR, mx, ymin, xmax, my, r);
363 >                        paintrect(p->kid+DR, r);
364                  if (my < r->u)
365 <                        paintrect(p->kid+UR, mx, my, xmax, ymax, r);
365 >                        paintrect(p->kid+UR, r);
366          }
367   }
368  
369  
370   PNODE *
371 < findrect(x, y, p, r, pd)                /* find a rectangle */
372 < int  x, y;
373 < register PNODE  *p;
374 < register RECT  *r;
375 < int  pd;
371 > findrect(                               /* find a rectangle */
372 >        int  x,
373 >        int  y,
374 >        PNODE  *p,
375 >        int  pd
376 > )
377   {
378          int  mx, my;
379  
380          while (p->kid != NULL && pd--) {
381  
382 <                mx = (r->l + r->r) >> 1;
383 <                my = (r->d + r->u) >> 1;
382 >                mx = (p->xmin + p->xmax) >> 1;
383 >                my = (p->ymin + p->ymax) >> 1;
384  
385                  if (x < mx) {
284 –                        r->r = mx;
386                          if (y < my) {
286 –                                r->u = my;
387                                  p = p->kid+DL;
388                          } else {
289 –                                r->d = my;
389                                  p = p->kid+UL;
390                          }
391                  } else {
293 –                        r->l = mx;
392                          if (y < my) {
295 –                                r->u = my;
393                                  p = p->kid+DR;
394                          } else {
298 –                                r->d = my;
395                                  p = p->kid+UR;
396                          }
397                  }
# Line 305 | Line 401 | int  pd;
401  
402  
403   void
404 < scalepict(p, sf)                        /* scale picture values */
405 < register PNODE  *p;
406 < double  sf;
404 > compavg(                                /* recompute averages */
405 >        PNODE   *p
406 > )
407   {
408 +        int     i, navg;
409 +        
410 +        if (p->kid == NULL)
411 +                return;
412 +
413 +        setcolor(p->v, .0, .0, .0);
414 +        navg = 0;
415 +        for (i = 0; i < 4; i++) {
416 +                if (p->kid[i].xmin >= p->kid[i].xmax) continue;
417 +                if (p->kid[i].ymin >= p->kid[i].ymax) continue;
418 +                compavg(p->kid+i);
419 +                addcolor(p->v, p->kid[i].v);
420 +                navg++;
421 +        }
422 +        if (navg > 1)
423 +                scalecolor(p->v, 1./navg);
424 + }
425 +
426 +
427 + void
428 + scalepict(                              /* scale picture values */
429 +        PNODE  *p,
430 +        double  sf
431 + )
432 + {
433          scalecolor(p->v, sf);           /* do this node */
434  
435          if (p->kid == NULL)
# Line 322 | Line 443 | double  sf;
443  
444  
445   void
446 < getpictcolrs(yoff, scan, p, xsiz, ysiz) /* get scanline from picture */
447 < int  yoff;
448 < register COLR  *scan;
449 < register PNODE  *p;
450 < int  xsiz, ysiz;
446 > getpictcolrs(                           /* get scanline from picture */
447 >        int  yoff,
448 >        COLR  *scan,
449 >        PNODE  *p,
450 >        int  xsiz,
451 >        int  ysiz
452 > )
453   {
454 <        register int  mx;
454 >        int  mx;
455          int  my;
456  
457          if (p->kid == NULL) {                   /* do this node */
# Line 353 | Line 476 | int  xsiz, ysiz;
476  
477  
478   void
479 < freepkids(p)                            /* free pnode's children */
480 < register PNODE  *p;
479 > freepkids(                              /* free pnode's children */
480 >        PNODE  *p
481 > )
482   {
483          if (p->kid == NULL)
484                  return;
# Line 368 | Line 492 | register PNODE  *p;
492  
493  
494   void
495 < newview(vp)                             /* change viewing parameters */
496 < register VIEW  *vp;
495 > newview(                                        /* change viewing parameters */
496 >        VIEW  *vp
497 > )
498   {
499          char  *err;
500  
# Line 379 | Line 504 | register VIEW  *vp;
504          } else if (memcmp((char *)vp, (char *)&ourview, sizeof(VIEW))) {
505                  oldview = ourview;
506                  ourview = *vp;
507 <                newimage();
507 >                newimage(NULL);
508          }
509   }
510  
511  
512   void
513 < moveview(angle, elev, mag, vc)                  /* move viewpoint */
514 < double  angle, elev, mag;
515 < FVECT  vc;
513 > moveview(                                       /* move viewpoint */
514 >        double  angle,
515 >        double  elev,
516 >        double  mag,
517 >        FVECT  vc
518 > )
519   {
520          double  d;
521          FVECT  v1;
522          VIEW  nv = ourview;
523 <        register int  i;
523 >        int  i;
524  
525          spinvector(nv.vdir, ourview.vdir, ourview.vup, angle*(PI/180.));
526          if (elev != 0.0) {
# Line 425 | Line 553 | FVECT  vc;
553  
554  
555   void
556 < pcopy(p1, p2)                           /* copy paint node p1 into p2 */
557 < register PNODE  *p1, *p2;
556 > pcopy(                                  /* copy paint node p1 into p2 */
557 >        PNODE  *p1,
558 >        PNODE  *p2
559 > )
560   {
561          copycolor(p2->v, p1->v);
562          p2->x = p1->x;
# Line 435 | Line 565 | register PNODE  *p1, *p2;
565  
566  
567   void
568 < zoomview(vp, zf)                        /* zoom in or out */
569 < register VIEW  *vp;
570 < double  zf;
568 > zoomview(                               /* zoom in or out */
569 >        VIEW  *vp,
570 >        double  zf
571 > )
572   {
573          switch (vp->type) {
574          case VT_PAR:                            /* parallel view */
# Line 451 | Line 582 | double  zf;
582                  vp->vert /= zf;
583                  if (vp->vert > 360.)
584                          vp->vert = 360.;
585 +                return;
586 +        case VT_PLS:                            /* planisphere fisheye */
587 +                vp->horiz = sin((PI/180./2.)*vp->horiz) /
588 +                                (1.0 + cos((PI/180./2.)*vp->horiz)) / zf;
589 +                vp->horiz *= vp->horiz;
590 +                vp->horiz = (2.*180./PI)*acos((1. - vp->horiz) /
591 +                                                (1. + vp->horiz));
592 +                vp->vert = sin((PI/180./2.)*vp->vert) /
593 +                                (1.0 + cos((PI/180./2.)*vp->vert)) / zf;
594 +                vp->vert *= vp->vert;
595 +                vp->vert = (2.*180./PI)*acos((1. - vp->vert) /
596 +                                                (1. + vp->vert));
597                  return;
598          case VT_CYL:                            /* cylindrical panorama */
599                  vp->horiz /= zf;

Diff Legend

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