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

Comparing ray/src/hd/rhdisp2.c (file contents):
Revision 3.17 by gregl, Thu Jan 1 13:00:16 1998 UTC vs.
Revision 3.27 by gwlarson, Thu Dec 3 15:18:08 1998 UTC

# Line 11 | Line 11 | static char SCCSid[] = "$SunId$ SGI";
11   #include "rholo.h"
12   #include "rhdisp.h"
13   #include "rhdriver.h"
14 + #include "random.h"
15  
16   #ifndef MAXDIST
17   #define MAXDIST         42      /* maximum distance outside section */
18   #endif
19 + #ifndef NVSAMPS
20 + #define NVSAMPS         4096    /* number of ray samples per view */
21 + #endif
22 + #ifndef MEYERNG
23 + #define MEYERNG         0.2     /* target mean eye range (rel. to grid) */
24 + #endif
25 + #ifndef MAXTODO
26 + #define MAXTODO         3       /* maximum sections to look at */
27 + #endif
28 + #ifndef MAXDRAT
29 + #define MAXDRAT         3.0     /* maximum distance ratio btwn. cand. sect. */
30 + #endif
31  
19 extern GCOORD   *getviewcells();
20
21 static VIEW     dvw;            /* current view corresponding to beam list */
22
23 typedef struct {
24        int     hd;             /* holodeck section number (-1 if inactive) */
25        int     i[3];           /* voxel index (may be outside section) */
26 } VOXL;                 /* a voxel */
27
28 static VOXL voxel[8] = {        /* current voxel list */
29        {-1}, {-1}, {-1}, {-1},
30        {-1}, {-1}, {-1}, {-1}
31 };
32
32   #define CBEAMBLK        1024    /* cbeam allocation block size */
33  
34   static struct beamcomp {
35 <        short   wants;          /* flags telling which voxels want us */
37 <        short   hd;             /* holodeck section number */
35 >        int     hd;             /* holodeck section number */
36          int     bi;             /* beam index */
37 +        int4    nr;             /* number of samples desired */
38   } *cbeam = NULL;        /* current beam list */
39  
40 + VIEWPOINT       cureye;         /* current eye position */
41 +
42   static int      ncbeams = 0;    /* number of sorted beams in cbeam */
43   static int      xcbeams = 0;    /* extra (unregistered) beams past ncbeams */
44   static int      maxcbeam = 0;   /* size of cbeam array */
45  
45 struct cellact {
46        short   vi;             /* voxel index */
47        short   add;            /* zero means delete */
48        short   rev;            /* reverse ray direction? */
49 };              /* action for cell */
46  
51 struct beamact {
52        struct cellact  ca;     /* cell action */
53        GCOORD  gc;             /* grid coordinate */
54 };              /* beam origin and action */
55
56
47   int
48   newcbeam()              /* allocate new entry at end of cbeam array */
49   {
# Line 92 | Line 82 | register struct beamcomp       *cb1, *cb2;
82   {
83          register int    c;
84  
85 <        if (!cb1->wants)                /* put orphans at the end, unsorted */
86 <                return(cb2->wants);
87 <        if (!cb2->wants)
85 >        if (!cb1->nr)                   /* put orphans at the end, unsorted */
86 >                return(cb2->nr);
87 >        if (!cb2->nr)
88                  return(-1);
89          if ((c = cb1->bi - cb2->bi))    /* sort on beam index first */
90                  return(c);
# Line 111 | Line 101 | int    hd, bi;
101  
102          if (ncbeams <= 0)
103                  return(-1);
104 <        cb.wants = 0; cb.hd = hd; cb.bi = bi;
104 >        cb.hd = hd; cb.bi = bi; cb.nr = 0;
105          p = (struct beamcomp *)bsearch((char *)&cb, (char *)cbeam, ncbeams,
106                          sizeof(struct beamcomp), cbeamcmp);
107          if (p == NULL)
# Line 139 | Line 129 | int    bi;
129          if (bi < 1 | bi > nbeams(hdlist[hd]))
130                  error(INTERNAL, "illegal beam index in getcbeam");
131          n = newcbeam();         /* allocate and assign */
132 <        cbeam[n].wants = 0; cbeam[n].hd = hd; cbeam[n].bi = bi;
132 >        cbeam[n].nr = 0; cbeam[n].hd = hd; cbeam[n].bi = bi;
133          return(n);
134   }
135  
# Line 157 | Line 147 | int    adopt;
147          if (adopt)
148                  return;
149          for (i = ncbeams; i--; )        /* identify orphans */
150 <                if (cbeam[i].wants)
150 >                if (cbeam[i].nr)
151                          break;
152          xcbeams = ncbeams - ++i;        /* put orphans after ncbeams */
153          ncbeams = i;
154   }
155  
156  
157 < cbeamop(op, bl, n, v, hr, vr)   /* update beams on server list */
157 > cbeamop(op, bl, n)              /* update beams on server list */
158   int     op;
159   register struct beamcomp        *bl;
160   int     n;
171 VIEW    *v;
172 int     hr, vr;
161   {
162          register PACKHEAD       *pa;
163          register int    i;
# Line 178 | Line 166 | int    hr, vr;
166                  return;
167          pa = (PACKHEAD *)malloc(n*sizeof(PACKHEAD));
168          if (pa == NULL)
169 <                error(SYSTEM, "out of memory in cbeamadd");
169 >                error(SYSTEM, "out of memory in cbeamop");
170          for (i = 0; i < n; i++) {
171                  pa[i].hd = bl[i].hd;
172                  pa[i].bi = bl[i].bi;
173 <                pa[i].nr = v==NULL ? 0 :
186 <                                npixels(v, hr, vr, hdlist[bl[i].hd], bl[i].bi);
173 >                pa[i].nr = bl[i].nr;
174                  pa[i].nc = 0;
175          }
176          serv_request(op, n*sizeof(PACKHEAD), (char *)pa);
# Line 192 | Line 179 | int    hr, vr;
179  
180  
181   int
182 < set_voxels(vl, n)       /* set new voxel array */
183 < VOXL    vl[8];
184 < int     n;
182 > comptodo(tdl, vw)               /* compute holodeck sections in view */
183 > int     tdl[MAXTODO+1];
184 > VIEW    *vw;
185   {
199        short   wmap[256];
200        int     vmap[8];
201        int     comn = 0;
202        int     no;
203        register int    i, j;
204                                        /* find common voxels */
205        for (j = 0; j < 8 && voxel[j].hd >= 0; j++) {
206                vmap[j] = -1;
207                for (i = n; i--; )
208                        if (!bcmp((char *)(vl+i), (char *)(voxel+j),
209                                        sizeof(VOXL))) {
210                                vmap[j] = i;
211                                comn |= 1<<i;
212                                break;
213                        }
214        }
215        no = comn ? j : 0;              /* compute flag mapping */
216        for (i = 256; i--; ) {
217                wmap[i] = 0;
218                for (j = no; j--; )
219                        if (vmap[j] >= 0 && i & 1<<j)
220                                wmap[i] |= 1<<vmap[j];
221        }
222                                        /* fix cbeam flags */
223        for (i = ncbeams; i--; )
224                cbeam[i].wants = wmap[cbeam[i].wants];
225                                        /* update our voxel list */
226        bcopy((char *)vl, (char *)voxel, n*sizeof(VOXL));
227        for (j = n; j < 8; j++)
228                voxel[j].hd = -1;
229        return(comn);                   /* return bit array of common voxels */
230 }
231
232
233 int
234 get_voxels(vl, vp)      /* find voxels corresponding to view point */
235 VOXL    vl[8];
236 FVECT   vp;
237 {
186          int     n = 0;
187 <        FVECT   gp;
188 <        double  d;
189 <        int     dist, bestd = 0x7fff;
190 <        VOXL    vox;
191 <        register int    i, j, k;
192 <                                        /* find closest voxels */
193 <        for (i = 0; n < 8 && hdlist[i]; i++) {
194 <                hdgrid(gp, hdlist[i], vp);
195 <                for (j = 0; n < 8 && j < 8; j++) {
196 <                        dist = 0;
197 <                        for (k = 0; k < 3; k++) {
198 <                                d = gp[k] - .5 + (j>>k & 1);
199 <                                if (d < 0.)
200 <                                        dist += -(vox.i[k] = (int)d - 1);
201 <                                else if ((vox.i[k] = d) >= hdlist[i]->grid[k])
202 <                                        dist += vox.i[k] -
203 <                                                        hdlist[i]->grid[k] + 1;
256 <                        }
257 <                        if (dist > bestd)       /* others were closer */
258 <                                continue;
259 <                        if (dist < bestd) {     /* start closer list */
260 <                                n = 0;
261 <                                bestd = dist;
262 <                        }
263 <                        vox.hd = i;             /* add this voxel */
264 <                        copystruct(&vl[n], &vox);
265 <                        n++;
187 >        FVECT   gp, dv;
188 >        double  dist2[MAXTODO+1], thisdist2;
189 >        register int    i, j;
190 >                                        /* find closest MAXTODO sections */
191 >        for (i = 0; hdlist[i]; i++) {
192 >                hdgrid(gp, hdlist[i], vw->vp);
193 >                for (j = 0; j < 3; j++)
194 >                        if (gp[j] < 0.)
195 >                                dv[j] = -gp[j];
196 >                        else if (gp[j] > hdlist[i]->grid[j])
197 >                                dv[j] = gp[j] - hdlist[i]->grid[j];
198 >                        else
199 >                                dv[j] = 0.;
200 >                thisdist2 = DOT(dv,dv);
201 >                for (j = n; j > 0 && thisdist2 < dist2[j-1]; j--) {
202 >                        tdl[j] = tdl[j-1];
203 >                        dist2[j] = dist2[j-1];
204                  }
205 +                tdl[j] = i;
206 +                dist2[j] = thisdist2;
207 +                if (n < MAXTODO)
208 +                        n++;
209          }
210 <                                        /* check for really stupid move */
211 <        if (bestd > MAXDIST) {
210 >                                        /* watch for bad move */
211 >        if (n && dist2[0] > MAXDIST*MAXDIST) {
212                  error(COMMAND, "move past outer limits");
213                  return(0);
214          }
215 +                                        /* avoid big differences */
216 +        for (j = 1; j < n; j++)
217 +                if (dist2[j] > MAXDRAT*MAXDRAT*dist2[j-1])
218 +                        n = j;
219 +        tdl[n] = -1;
220          return(n);
221   }
222  
223  
224 < int
225 < dobeam(gcp, bp)         /* express interest or disintrest in a beam */
226 < GCOORD  *gcp;
227 < register struct beamact *bp;
224 > addview(hd, vw, hres, vres)     /* add view for section */
225 > int     hd;
226 > VIEW    *vw;
227 > int     hres, vres;
228   {
229 +        int     sampquant;
230 +        int     h, v, shr, svr;
231          GCOORD  gc[2];
232 <        int     bi, i;
233 <                                        /* compute beam index */
234 <        if (bp->ca.rev) {
235 <                copystruct(gc, &bp->gc);
236 <                copystruct(gc+1, gcp);
232 >        FVECT   rorg, rdir;
233 >                                /* compute sampling grid */
234 >        if (hres|vres && hres*vres <= NVSAMPS) {
235 >                shr = hres; svr = vres;
236 >                sampquant = 1;
237          } else {
238 <                copystruct(gc, gcp);
239 <                copystruct(gc+1, &bp->gc);
238 >                shr = sqrt(NVSAMPS/viewaspect(vw)) + .5;
239 >                svr = (NVSAMPS + shr/2)/shr;
240 >                sampquant = (hres*vres + shr*svr/2)/(shr*svr);
241          }
242 <        if ((bi = hdbindex(hdlist[voxel[bp->ca.vi].hd], gc)) <= 0)
243 <                error(CONSISTENCY, "bad grid coordinate in dobeam");
244 <        if (bp->ca.add) {               /* add it in */
245 <                i = getcbeam(voxel[bp->ca.vi].hd, bi);
246 <                cbeam[i].wants |= 1<<bp->ca.vi; /* say we want it */
247 <                return(i == ncbeams+xcbeams-1); /* return 1 if totally new */
248 <        }
249 <                                        /* else delete it */
250 <        i = findcbeam(voxel[bp->ca.vi].hd, bi);
251 <        if (i >= 0 && cbeam[i].wants & 1<<bp->ca.vi) {
252 <                cbeam[i].wants &= ~(1<<bp->ca.vi);      /* we don't want it */
253 <                return(1);                      /* indicate change */
304 <        }
305 <        return(0);
242 >                                /* intersect sample rays with section */
243 >        for (v = svr; v--; )
244 >                for (h = shr; h--; ) {
245 >                        if (viewray(rorg, rdir, vw, (v+frandom())/svr,
246 >                                                (h+frandom())/shr) < -FTINY)
247 >                                continue;
248 >                        if (hdinter(gc, NULL, NULL, hdlist[hd], rorg, rdir)
249 >                                                >= FHUGE)
250 >                                continue;
251 >                        cbeam[getcbeam(hd,hdbindex(hdlist[hd],gc))].nr +=
252 >                                        sampquant;
253 >                }
254   }
255  
256  
257 <
258 < int
311 < docell(gcp, cap)        /* find beams corresponding to cell and voxel */
312 < GCOORD  *gcp;
313 < register struct cellact *cap;
257 > beam_init(fresh)                /* clear beam list for new view(s) */
258 > int     fresh;
259   {
315        register HOLO   *hp = hdlist[voxel[cap->vi].hd];
316        FVECT   org, dir[4];
317        FVECT   vgp, cgp, vc;
318        FVECT   v1, v2;
319        struct beamact  bo;
320        int     axmax, j;
321        double  d, avmax;
260          register int    i;
323                                /* compute cell center */
324        cgp[gcp->w>>1] = gcp->w&1 ? hp->grid[gcp->w>>1] : 0 ;
325        cgp[((gcp->w>>1)+1)%3] = gcp->i[0] + .5;
326        cgp[((gcp->w>>1)+2)%3] = gcp->i[1] + .5;
327        hdworld(org, hp, cgp);
328                                /* compute direction to voxel center */
329        for (i = 3; i--; )
330                vgp[i] = voxel[cap->vi].i[i] + .5;
331        hdworld(vc, hp, vgp);
332        for (i = 3; i--; )
333                vc[i] -= org[i];
334                                /* compute maximum area axis */
335        axmax = -1; avmax = 0;
336        for (i = 3; i--; ) {
337                d = vgp[i] - cgp[i];
338                if (d < 0.) d = -d;
339                if (d > avmax) {
340                        avmax = d;
341                        axmax = i;
342                }
343        }
344 #ifdef DEBUG
345        if (axmax < 0.)
346                error(CONSISTENCY, "botched axis computation in docell");
347 #endif
348                                /* compute offset vectors */
349        d = 0.5/hp->grid[j=(axmax+1)%3];
350        for (i = 3; i--; )
351                v1[i] = hp->xv[j][i] * d;
352        d = 0.5/hp->grid[j=(axmax+2)%3];
353        if (DOT(hp->wn[axmax], vc) < 0.)
354                d = -d; /* reverse vertex ordering */
355        for (i = 3; i--; )
356                v2[i] = hp->xv[j][i] * d;
357                                /* compute voxel pyramid */
358        for (i = 3; i--; ) {
359                dir[0][i] = vc[i] - v1[i] - v2[i];
360                dir[1][i] = vc[i] + v1[i] - v2[i];
361                dir[2][i] = vc[i] + v1[i] + v2[i];
362                dir[3][i] = vc[i] - v1[i] + v2[i];
363        }
364                                /* visit beams for opposite cells */
365        copystruct(&bo.ca, cap);
366        copystruct(&bo.gc, gcp);
367        return(visit_cells(org, dir, hp, dobeam, &bo));
368 }
261  
262 <
263 < int
264 < doview(cap, vp)                 /* visit cells for a given view */
265 < struct cellact  *cap;
266 < VIEW    *vp;
267 < {
376 <        int     orient;
377 <        FVECT   org, dir[4];
378 <                                        /* compute view pyramid */
379 <        orient = viewpyramid(org, dir, hdlist[voxel[cap->vi].hd], vp);
380 <        if (!orient)
381 <                error(INTERNAL, "unusable view in doview");
382 <        cap->rev = orient < 0;
383 <                                        /* visit cells within pyramid */
384 <        return(visit_cells(org, dir, hdlist[voxel[cap->vi].hd], docell, cap));
262 >        if (fresh)                      /* discard old beams? */
263 >                ncbeams = xcbeams = 0;
264 >        else                            /* else clear sample requests */
265 >                for (i = ncbeams+xcbeams; i--; )
266 >                        cbeam[i].nr = 0;
267 >        cureye.rng = 0.;
268   }
269  
270  
271 < mvview(voxi, vold, vnew)        /* move view for a voxel */
272 < int     voxi;
273 < VIEW    *vold, *vnew;
271 > beam_view(vn, hr, vr)           /* add beam view (if advisable) */
272 > VIEW    *vn;
273 > int     hr, vr;
274   {
275 <        int     netchange = 0;
276 <        struct cellact  oca, nca;
277 <        int     ocnt, ncnt;
278 <        int     c;
279 <        GCOORD  *ogcl, *ngcl;
280 <        register GCOORD *ogcp, *ngcp;
281 <                                /* get old and new cell lists */
282 <        ogcp = ogcl = getviewcells(&ocnt, hdlist[voxel[voxi].hd], vold);
283 <        ngcp = ngcl = getviewcells(&ncnt, hdlist[voxel[voxi].hd], vnew);
284 <                                /* set up actions */
285 <        oca.vi = nca.vi = voxi;
286 <        oca.add = 0; nca.add = 1;
287 <        if ((oca.rev = ocnt < 0))
288 <                ocnt = -ocnt;
289 <        if ((nca.rev = ncnt < 0))
290 <                ncnt = -ncnt;
291 <        if (nca.rev == oca.rev)         /* add and delete cells in order */
292 <                while (ocnt > 0 & ncnt > 0)
293 <                        if ((c = cellcmp(ogcp, ngcp)) > 0) {    /* new cell */
294 <                                netchange += docell(ngcp++, &nca);
295 <                                ncnt--;
296 <                        } else if (c < 0) {                     /* old cell */
297 <                                netchange -= docell(ogcp++, &oca);
298 <                                ocnt--;
299 <                        } else {                                /* same cell */
300 <                                ogcp++; ocnt--;
301 <                                ngcp++; ncnt--;
302 <                        }
303 <                                /* take care of list tails */
304 <        for ( ; ncnt > 0; ncnt--)
305 <                netchange += docell(ngcp++, &nca);
306 <        for ( ; ocnt > 0; ocnt--)
424 <                netchange -= docell(ogcp++, &oca);
425 <                                /* clean up */
426 <        if (ogcl != NULL) free((char *)ogcl);
427 <        if (ngcl != NULL) free((char *)ngcl);
428 <        return(netchange);
275 >        int     todo[MAXTODO+1], n;
276 >        double  hdgsiz, d;
277 >        register HOLO   *hp;
278 >        register int    i;
279 >                                        /* sort our list */
280 >        cbeamsort(1);
281 >                                        /* add view to nearby sections */
282 >        if (!(n = comptodo(todo, vn)))
283 >                return(0);
284 >        for (i = 0; i < n; i++)
285 >                addview(todo[i], vn, hr, vr);
286 >        if (MEYERNG <= FTINY || vn->type == VT_PAR)
287 >                return(1);
288 >        hdgsiz = 0.;                    /* compute mean grid size */
289 >        for (i = 0; i < n; i++) {
290 >                hp = hdlist[todo[i]];
291 >                hdgsiz +=       1./3. / VLEN(hp->wg[0]) +
292 >                                1./3. / VLEN(hp->wg[1]) +
293 >                                1./3. / VLEN(hp->wg[2]) ;
294 >        }
295 >        hdgsiz /= (double)n;
296 >                                        /* add to current eye position */
297 >        if (cureye.rng <= FTINY) {
298 >                VCOPY(cureye.vpt, vn->vp);
299 >                cureye.rng = MEYERNG * hdgsiz;
300 >        } else if ((d = sqrt(dist2(vn->vp,cureye.vpt))) + MEYERNG*hdgsiz >
301 >                        cureye.rng) {
302 >                for (i = 3; i--; )
303 >                        cureye.vpt[i] = 0.5*(cureye.vpt[i] + vn->vp[i]);
304 >                cureye.rng = 0.5*(cureye.rng + MEYERNG*hdgsiz + d);
305 >        }
306 >        return(1);
307   }
308  
309  
310   int
311 < beam_sync()             /* synchronize beams on server */
311 > beam_sync(all)                  /* update beam list on server */
312 > int     all;
313   {
314 <        cbeamop(DR_NEWSET, cbeam, ncbeams, &odev.v, odev.hres, odev.vres);
315 <        return(ncbeams);
316 < }
317 <
318 <
319 < beam_view(vn)                   /* change beam view (if advisable) */
320 < VIEW    *vn;
321 < {
322 <        struct cellact  ca;
444 <        VOXL    vlnew[8];
445 <        int     n, comn;
446 <
447 <        if (vn == NULL || !vn->type) {  /* clear our beam list */
448 <                set_voxels(vlnew, 0);
449 <                cbeamop(DR_DELSET, cbeam, ncbeams, NULL, 0, 0);
450 <                ncbeams = 0;
451 <                dvw.type = 0;
452 <                return(1);
453 <        }
454 <                                        /* find our new voxels */
455 <        n = get_voxels(vlnew, vn->vp);
456 <        if (dvw.type && !n) {
457 <                copystruct(vn, &dvw);           /* cancel move */
458 <                return(0);
459 <        }
460 <                                        /* set the new voxels */
461 <        comn = set_voxels(vlnew, n);
462 <        if (!dvw.type)
463 <                comn = 0;
464 <        ca.add = 1;                     /* update our beam list */
465 <        for (ca.vi = n; ca.vi--; )
466 <                if (comn & 1<<ca.vi)    /* change which cells we see */
467 <                        mvview(ca.vi, &dvw, vn);
468 <                else                    /* else add all new cells */
469 <                        doview(&ca, vn);
470 <                                        /* inform server of new beams */
471 <        cbeamop(DR_ADDSET, cbeam+ncbeams, xcbeams, vn, odev.hres, odev.vres);
472 <                                        /* sort list to put orphans at end */
473 <        cbeamsort(0);
474 <                                        /* tell server to delete orphans */
475 <        cbeamop(DR_DELSET, cbeam+ncbeams, xcbeams, NULL, 0, 0);
314 >                                        /* set new eye position */
315 >        serv_request(DR_VIEWPOINT, sizeof(VIEWPOINT), (char *)&cureye);
316 >                                        /* sort list (put orphans at end) */
317 >        cbeamsort(all < 0);
318 >                                        /* send beam request */
319 >        if (all)
320 >                cbeamop(DR_NEWSET, cbeam, ncbeams);
321 >        else
322 >                cbeamop(DR_ADJSET, cbeam, ncbeams+xcbeams);
323          xcbeams = 0;                    /* truncate our list */
324 <        copystruct(&dvw, vn);           /* record new view */
478 <        return(1);
324 >        return(ncbeams);
325   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines