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.8 by gregl, Tue Dec 2 15:02:37 1997 UTC vs.
Revision 3.24 by gwlarson, Tue Sep 15 15:59:31 1998 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1997 Silicon Graphics, Inc. */
1 > /* Copyright (c) 1998 Silicon Graphics, Inc. */
2  
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ SGI";
# Line 12 | Line 12 | static char SCCSid[] = "$SunId$ SGI";
12   #include "rhdisp.h"
13   #include "rhdriver.h"
14  
15 < extern GCOORD   *getviewcells();
15 > #ifndef MAXDIST
16 > #define MAXDIST         42      /* maximum distance outside section */
17 > #endif
18  
19 < static VIEW     dvw;            /* current view corresponding to beam list */
19 > #define MAXVOXEL        32      /* maximum number of active voxels */
20  
21   typedef struct {
22          int     hd;             /* holodeck section number (-1 if inactive) */
23          int     i[3];           /* voxel index (may be outside section) */
24   } VOXL;                 /* a voxel */
25  
26 < static VOXL voxel[8] = {        /* current voxel list */
25 <        {-1}, {-1}, {-1}, {-1},
26 <        {-1}, {-1}, {-1}, {-1}
27 < };
26 > static VOXL voxel[MAXVOXEL] = {{-1}};   /* current voxel list */
27  
28   #define CBEAMBLK        1024    /* cbeam allocation block size */
29  
30   static struct beamcomp {
31 <        short   wants;          /* flags telling which voxels want us */
33 <        short   hd;             /* holodeck section number */
31 >        int     hd;             /* holodeck section number */
32          int     bi;             /* beam index */
33 +        int4    nr;             /* number of samples desired */
34   } *cbeam = NULL;        /* current beam list */
35  
36   static int      ncbeams = 0;    /* number of sorted beams in cbeam */
# Line 40 | Line 39 | static int     maxcbeam = 0;   /* size of cbeam array */
39  
40   struct cellact {
41          short   vi;             /* voxel index */
43        short   add;            /* zero means delete */
42          short   rev;            /* reverse ray direction? */
43 +        VIEW    *vp;            /* view for image */
44 +        short   hr, vr;         /* image resolution */
45   };              /* action for cell */
46  
47   struct beamact {
# Line 88 | Line 88 | register struct beamcomp       *cb1, *cb2;
88   {
89          register int    c;
90  
91 <        if (!cb1->wants)                /* put orphans at the end, unsorted */
92 <                return(cb2->wants);
91 >        if (!cb1->nr)                   /* put orphans at the end, unsorted */
92 >                return(cb2->nr);
93 >        if (!cb2->nr)
94 >                return(-1);
95          if ((c = cb1->bi - cb2->bi))    /* sort on beam index first */
96                  return(c);
97          return(cb1->hd - cb2->hd);      /* use hd to resolve matches */
# Line 105 | Line 107 | int    hd, bi;
107  
108          if (ncbeams <= 0)
109                  return(-1);
110 <        cb.wants = 0; cb.hd = hd; cb.bi = bi;
110 >        cb.hd = hd; cb.bi = bi; cb.nr = 0;
111          p = (struct beamcomp *)bsearch((char *)&cb, (char *)cbeam, ncbeams,
112                          sizeof(struct beamcomp), cbeamcmp);
113          if (p == NULL)
# Line 133 | Line 135 | int    bi;
135          if (bi < 1 | bi > nbeams(hdlist[hd]))
136                  error(INTERNAL, "illegal beam index in getcbeam");
137          n = newcbeam();         /* allocate and assign */
138 <        cbeam[n].wants = 0; cbeam[n].hd = hd; cbeam[n].bi = bi;
138 >        cbeam[n].nr = 0; cbeam[n].hd = hd; cbeam[n].bi = bi;
139          return(n);
140   }
141  
# Line 151 | Line 153 | int    adopt;
153          if (adopt)
154                  return;
155          for (i = ncbeams; i--; )        /* identify orphans */
156 <                if (cbeam[i].wants)
156 >                if (cbeam[i].nr)
157                          break;
158          xcbeams = ncbeams - ++i;        /* put orphans after ncbeams */
159          ncbeams = i;
160   }
161  
162  
163 < cbeamadj(v, hr, vr)             /* adjust our beam list */
162 < VIEW    *v;
163 < int     hr, vr;
164 < {
165 <        register PACKHEAD       *pa;
166 <        register int    i;
167 <        int     n;
168 <                                        /* first handle additions */
169 <        pa = (PACKHEAD *)malloc(xcbeams*sizeof(PACKHEAD));
170 <        if (xcbeams && pa == NULL)
171 <                goto memerr;
172 <        for (i = xcbeams; i--; ) {
173 <                pa[i].hd = cbeam[ncbeams+i].hd;
174 <                pa[i].bi = cbeam[ncbeams+i].bi;
175 <                pa[i].nr = npixels(v, hr, vr, hdlist[pa[i].hd], pa[i].bi);
176 <        }
177 <        n = xcbeams;                    /* now sort list for deletions */
178 <        cbeamsort(0);
179 <        pa = (PACKHEAD *)realloc((char *)pa, (n+xcbeams)*sizeof(PACKHEAD));
180 <        if (n+xcbeams && pa == NULL)
181 <                goto memerr;
182 <        for (i = xcbeams; i--; ) {
183 <                pa[n+i].hd = cbeam[ncbeams+i].hd;
184 <                pa[n+i].bi = cbeam[ncbeams+i].bi;
185 <                pa[n+i].nr = 0;
186 <        }
187 <        n += xcbeams;
188 <        xcbeams = 0;                    /* delete orphans */
189 <        serv_request(DR_ADJSET, n*sizeof(PACKHEAD), (char *)pa);
190 <        free((char *)pa);
191 <        return;
192 < memerr:
193 <        error(SYSTEM, "out of memory in cbeamadj");
194 < }
195 <
196 <
197 < cbeamop(op, bl, n, v, hr, vr)   /* update beams on server list */
163 > cbeamop(op, bl, n)              /* update beams on server list */
164   int     op;
165   register struct beamcomp        *bl;
166   int     n;
201 VIEW    *v;
202 int     hr, vr;
167   {
168          register PACKHEAD       *pa;
169          register int    i;
# Line 208 | Line 172 | int    hr, vr;
172                  return;
173          pa = (PACKHEAD *)malloc(n*sizeof(PACKHEAD));
174          if (pa == NULL)
175 <                error(SYSTEM, "out of memory in cbeamadd");
175 >                error(SYSTEM, "out of memory in cbeamop");
176          for (i = 0; i < n; i++) {
177                  pa[i].hd = bl[i].hd;
178                  pa[i].bi = bl[i].bi;
179 <                pa[i].nr = v==NULL ? 0 :
180 <                                npixels(v, hr, vr, hdlist[bl[i].hd], bl[i].bi);
179 >                pa[i].nr = bl[i].nr;
180 >                pa[i].nc = 0;
181          }
182          serv_request(op, n*sizeof(PACKHEAD), (char *)pa);
183          free((char *)pa);
184   }
185  
186  
187 < int
188 < set_voxels(vl, n)       /* set new voxel array */
225 < VOXL    vl[8];
226 < int     n;
227 < {
228 <        short   wmap[256];
229 <        int     vmap[8];
230 <        int     comn = 0;
231 <        int     no;
232 <        register int    i, j;
233 <                                        /* find common voxels */
234 <        for (j = 0; j < 8 && voxel[j].hd >= 0; j++) {
235 <                vmap[j] = -1;
236 <                for (i = n; i--; )
237 <                        if (!bcmp((char *)(vl+i), (char *)(voxel+j),
238 <                                        sizeof(VOXL))) {
239 <                                vmap[j] = i;
240 <                                comn |= 1<<i;
241 <                                break;
242 <                        }
243 <        }
244 <        no = comn ? j : 0;              /* compute flag mapping */
245 <        for (i = 256; i--; ) {
246 <                wmap[i] = 0;
247 <                for (j = no; j--; )
248 <                        if (vmap[j] >= 0 && i & 1<<j)
249 <                                wmap[i] |= 1<<vmap[j];
250 <        }
251 <                                        /* fix cbeam flags */
252 <        for (i = ncbeams; i--; )
253 <                cbeam[i].wants = wmap[cbeam[i].wants];
254 <                                        /* update our voxel list */
255 <        bcopy((char *)vl, (char *)voxel, n*sizeof(VOXL));
256 <        for (j = n; j < 8; j++)
257 <                voxel[j].hd = -1;
258 <        return(comn);                   /* return bit array of common voxels */
259 < }
260 <
261 <
262 < int
263 < get_voxels(vl, vp)      /* find voxels corresponding to view point */
264 < VOXL    vl[8];
187 > unsigned int4
188 > add_voxels(vp)          /* add voxels corresponding to view point */
189   FVECT   vp;
190   {
191 <        static int      lastn = 0, lastd = -1;
268 <        int     n = 0;
191 >        int     first, n, rfl = 0;
192          FVECT   gp;
193          double  d;
194          int     dist, bestd = 0x7fff;
195          VOXL    vox;
196          register int    i, j, k;
197 +                                        /* count voxels in list already */
198 +        for (first = 0; first < MAXVOXEL && voxel[first].hd >= 0; first++)
199 +                ;
200                                          /* find closest voxels */
201 <        for (i = 0; n < 8 && hdlist[i]; i++) {
201 >        for (n = first, i = 0; n < MAXVOXEL && hdlist[i]; i++) {
202                  hdgrid(gp, hdlist[i], vp);
203 <                for (j = 0; n < 8 && j < 8; j++) {
203 >                for (j = 0; n < MAXVOXEL && j < 8; j++) {
204                          dist = 0;
205                          for (k = 0; k < 3; k++) {
206                                  d = gp[k] - .5 + (j>>k & 1);
# Line 287 | Line 213 | FVECT  vp;
213                          if (dist > bestd)       /* others were closer */
214                                  continue;
215                          if (dist < bestd) {     /* start closer list */
216 <                                n = 0;
216 >                                n = first;
217                                  bestd = dist;
218 +                                rfl = 0;
219                          }
220 +                                                /* check if already in list */
221 +                        for (k = first; k--; )
222 +                                if (voxel[k].hd == i &&
223 +                                                voxel[k].i[0] == vox.i[0] &&
224 +                                                voxel[k].i[1] == vox.i[1] &&
225 +                                                voxel[k].i[2] == vox.i[2])
226 +                                        break;
227 +                        if (k >= 0) {
228 +                                rfl |= 1<<k;
229 +                                continue;
230 +                        }
231                          vox.hd = i;             /* add this voxel */
232 <                        copystruct(&vl[n], &vox);
233 <                        n++;
232 >                        copystruct(&voxel[n], &vox);
233 >                        rfl |= 1<<n++;
234                  }
235          }
236 <                                        /* warn of dangerous moves */
237 <        if (n < lastn && bestd >= lastd)
238 <                error(WARNING, "moving outside holodeck section");
239 <        else if (n > lastn && bestd <= lastd)
240 <                error(WARNING, "moving inside holodeck section");
241 <        lastd = bestd;
242 <        return(lastn = n);
236 >                                        /* check for really stupid move */
237 >        if (bestd > MAXDIST) {
238 >                error(COMMAND, "move past outer limits");
239 >                return(0);
240 >        }
241 >        if (n < MAXVOXEL)
242 >                voxel[n].hd = -1;
243 >        return(rfl);
244   }
245  
246  
247   int
248 < dobeam(gcp, bp)         /* express interest or disintrest in a beam */
248 > dobeam(gcp, bp)         /* express interest in a beam */
249   GCOORD  *gcp;
250   register struct beamact *bp;
251   {
252          GCOORD  gc[2];
253 <        int     bi, i;
253 >        int     bi, i, n;
254                                          /* compute beam index */
255          if (bp->ca.rev) {
256                  copystruct(gc, &bp->gc);
# Line 322 | Line 261 | register struct beamact        *bp;
261          }
262          if ((bi = hdbindex(hdlist[voxel[bp->ca.vi].hd], gc)) <= 0)
263                  error(CONSISTENCY, "bad grid coordinate in dobeam");
264 <        if (bp->ca.add) {               /* add it in */
265 <                i = getcbeam(voxel[bp->ca.vi].hd, bi);
266 <                cbeam[i].wants |= 1<<bp->ca.vi; /* say we want it */
267 <                return(i == ncbeams+xcbeams-1); /* return 1 if totally new */
268 <        }
269 <                                        /* else delete it */
270 <        i = findcbeam(voxel[bp->ca.vi].hd, bi);
332 <        if (i >= 0 && cbeam[i].wants & 1<<bp->ca.vi) {
333 <                cbeam[i].wants &= ~(1<<bp->ca.vi);      /* we don't want it */
334 <                return(1);                      /* indicate change */
335 <        }
336 <        return(0);
264 >                                        /* add it in */
265 >        i = getcbeam(voxel[bp->ca.vi].hd, bi);
266 >        n = npixels(bp->ca.vp, bp->ca.hr, bp->ca.vr,
267 >                        hdlist[cbeam[i].hd], cbeam[i].bi);
268 >        if (n > cbeam[i].nr)
269 >                cbeam[i].nr = n;
270 >        return(i == ncbeams+xcbeams-1); /* return 1 if totally new */
271   }
272  
273  
# Line 343 | Line 277 | docell(gcp, cap)       /* find beams corresponding to cell a
277   GCOORD  *gcp;
278   register struct cellact *cap;
279   {
280 +        register HOLO   *hp = hdlist[voxel[cap->vi].hd];
281          FVECT   org, dir[4];
282 <        FVECT   gp, cv[4], vc;
282 >        FVECT   vgp, cgp, vc;
283 >        FVECT   v1, v2;
284          struct beamact  bo;
285 +        int     axmax, j;
286 +        double  d, avmax;
287          register int    i;
288 <                                /* compute cell vertices */
289 <        hdcell(cv, hdlist[voxel[cap->vi].hd], gcp);
290 <                                /* compute cell and voxel centers */
291 <        for (i = 0; i < 3; i++) {
292 <                org[i] = 0.5*(cv[0][i] + cv[2][i]);
293 <                gp[i] = voxel[cap->vi].i[i] + 0.5;
294 <        }
295 <        hdworld(vc, hdlist[voxel[cap->vi].hd], gp);
296 <                                /* compute voxel pyramid using vector trick */
297 <        for (i = 0; i < 3; i++) {
298 <                dir[0][i] = vc[i] - cv[0][i];           /* to 3 */
299 <                dir[2][i] = vc[i] - cv[3][i];           /* to 0 */
300 <                if (gcp->w & 1) {       /* watch vertex order! */
301 <                        dir[1][i] = vc[i] - cv[2][i];   /* to 1 */
302 <                        dir[3][i] = vc[i] - cv[1][i];   /* to 2 */
303 <                } else {
304 <                        dir[1][i] = vc[i] - cv[1][i];   /* to 2 */
305 <                        dir[3][i] = vc[i] - cv[2][i];   /* to 1 */
288 >                                /* compute cell center */
289 >        cgp[gcp->w>>1] = gcp->w&1 ? hp->grid[gcp->w>>1] : 0 ;
290 >        cgp[hdwg0[gcp->w]] = gcp->i[0] + .5;
291 >        cgp[hdwg1[gcp->w]] = gcp->i[1] + .5;
292 >        hdworld(org, hp, cgp);
293 >                                /* compute direction to voxel center */
294 >        for (i = 3; i--; )
295 >                vgp[i] = voxel[cap->vi].i[i] + .5;
296 >        hdworld(vc, hp, vgp);
297 >        for (i = 3; i--; )
298 >                vc[i] -= org[i];
299 >                                /* compute maximum area axis */
300 >        axmax = -1; avmax = 0;
301 >        for (i = 3; i--; ) {
302 >                d = vgp[i] - cgp[i];
303 >                if (d < 0.) d = -d;
304 >                if (d > avmax) {
305 >                        avmax = d;
306 >                        axmax = i;
307                  }
308          }
309 + #ifdef DEBUG
310 +        if (axmax < 0)
311 +                error(CONSISTENCY, "botched axis computation in docell");
312 + #endif
313 +                                /* compute offset vectors */
314 +        d = 0.5/hp->grid[j=(axmax+1)%3];
315 +        for (i = 3; i--; )
316 +                v1[i] = hp->xv[j][i] * d;
317 +        d = 0.5/hp->grid[j=(axmax+2)%3];
318 +        if (DOT(hp->wg[axmax], vc) < 0.)
319 +                d = -d; /* reverse vertex order */
320 +        for (i = 3; i--; )
321 +                v2[i] = hp->xv[j][i] * d;
322 +                                /* compute voxel pyramid */
323 +        for (i = 3; i--; ) {
324 +                dir[0][i] = vc[i] - v1[i] - v2[i];
325 +                dir[1][i] = vc[i] + v1[i] - v2[i];
326 +                dir[2][i] = vc[i] + v1[i] + v2[i];
327 +                dir[3][i] = vc[i] - v1[i] + v2[i];
328 +        }
329                                  /* visit beams for opposite cells */
330          copystruct(&bo.ca, cap);
331          copystruct(&bo.gc, gcp);
332 <        return(visit_cells(org, dir, hdlist[voxel[cap->vi].hd], dobeam, &bo));
332 >        return(visit_cells(org, dir, hp, dobeam, &bo));
333   }
334  
335  
336   int
337 < doview(cap, vp)                 /* visit cells for a given view */
337 > doview(cap)                     /* visit cells for a given view */
338   struct cellact  *cap;
380 VIEW    *vp;
339   {
340          int     orient;
341          FVECT   org, dir[4];
342                                          /* compute view pyramid */
343 <        orient = viewpyramid(org, dir, hdlist[voxel[cap->vi].hd], vp);
343 >        orient = viewpyramid(org, dir, hdlist[voxel[cap->vi].hd], cap->vp);
344          if (!orient)
345                  error(INTERNAL, "unusable view in doview");
346          cap->rev = orient < 0;
# Line 391 | Line 349 | VIEW   *vp;
349   }
350  
351  
352 < mvview(voxi, vold, vnew)        /* move view for a voxel */
353 < int     voxi;
396 < VIEW    *vold, *vnew;
352 > beam_init(fresh)                /* clear beam list for new view(s) */
353 > int     fresh;
354   {
355 <        int     netchange = 0;
399 <        struct cellact  oca, nca;
400 <        int     ocnt, ncnt;
401 <        int     c;
402 <        GCOORD  *ogcl, *ngcl;
403 <        register GCOORD *ogcp, *ngcp;
404 <                                /* get old and new cell lists */
405 <        ogcp = ogcl = getviewcells(&ocnt, hdlist[voxel[voxi].hd], vold);
406 <        ngcp = ngcl = getviewcells(&ncnt, hdlist[voxel[voxi].hd], vnew);
407 <                                /* set up actions */
408 <        oca.vi = nca.vi = voxi;
409 <        oca.rev = nca.rev = 0;
410 <        oca.add = 0; nca.add = 1;
411 <        if ((oca.rev = ocnt < 0))
412 <                ocnt = -ocnt;
413 <        if ((nca.rev = ncnt < 0))
414 <                ncnt = -ncnt;
415 <        if (nca.rev == oca.rev)         /* add and delete cells in order */
416 <                while (ocnt > 0 & ncnt > 0)
417 <                        if ((c = cellcmp(ogcp, ngcp)) > 0) {    /* new cell */
418 <                                netchange += docell(ngcp++, &nca);
419 <                                ncnt--;
420 <                        } else if (c < 0) {                     /* old cell */
421 <                                netchange -= docell(ogcp++, &oca);
422 <                                ocnt--;
423 <                        } else {                                /* same cell */
424 <                                ogcp++; ocnt--;
425 <                                ngcp++; ncnt--;
426 <                        }
427 <                                /* take care of list tails */
428 <        for ( ; ncnt > 0; ncnt--)
429 <                netchange += docell(ngcp++, &nca);
430 <        for ( ; ocnt > 0; ocnt--)
431 <                netchange -= docell(ogcp++, &oca);
432 <                                /* clean up */
433 <        if (ogcl != NULL) free((char *)ogcl);
434 <        if (ngcl != NULL) free((char *)ngcl);
435 <        return(netchange);
436 < }
355 >        register int    i;
356  
357 <
358 < beam_sync()             /* synchronize beams on server */
359 < {
360 <        cbeamop(DR_NEWSET, cbeam, ncbeams, &odev.v, odev.hres, odev.vres);
357 >        if (fresh)                      /* discard old beams? */
358 >                ncbeams = xcbeams = 0;
359 >        else                            /* else clear sample requests */
360 >                for (i = ncbeams+xcbeams; i--; )
361 >                        cbeam[i].nr = 0;
362 >        voxel[0].hd = -1;               /* clear voxel list */
363   }
364  
365  
366 < beam_view(vn)                   /* change beam view */
366 > beam_view(vn, hr, vr)           /* add beam view (if advisable) */
367   VIEW    *vn;
368 + int     hr, vr;
369   {
370          struct cellact  ca;
371 <        VOXL    vlnew[8];
372 <        int     n, comn;
371 >        unsigned int4   vfl;
372 >                                        /* sort our list */
373 >        cbeamsort(1);
374 >                                        /* add new voxels */
375 >        vfl = add_voxels(vn->vp);
376 >        if (!vfl)
377 >                return(0);
378 >        ca.vp = vn; ca.hr = hr; ca.vr = vr;
379 >                                        /* update our beam list */
380 >        for (ca.vi = 0; vfl; vfl >>= 1, ca.vi++)
381 >                if (vfl & 1)
382 >                        doview(&ca);
383 >        return(1);
384 > }
385  
386 <        if (!vn->type) {                /* clear our beam list */
387 <                set_voxels(vlnew, 0);
388 <                cbeamop(DR_DELSET, cbeam, ncbeams, NULL, 0, 0);
389 <                ncbeams = 0;
390 <                copystruct(&dvw, vn);
391 <                return;
392 <        }
393 <                                        /* find our new voxels */
394 <        n = get_voxels(vlnew, vn->vp);
395 <                                        /* set the new voxels */
396 <        comn = set_voxels(vlnew, n);
463 <        if (!dvw.type)
464 <                comn = 0;
465 <        ca.add = 1;                     /* update our beam list */
466 <        for (ca.vi = n; ca.vi--; )
467 <                if (comn & 1<<ca.vi)    /* change which cells we see */
468 <                        mvview(ca.vi, &dvw, vn);
469 <                else                    /* else add all new cells */
470 <                        doview(&ca, vn);
471 < #if 1
472 <        cbeamadj(vn, odev.hres, odev.vres);
473 < #else
474 <                                        /* inform server of new beams */
475 <        cbeamop(DR_ADDSET, cbeam+ncbeams, xcbeams, vn, odev.hres, odev.vres);
476 <                                        /* sort list to put orphans at end */
477 <        cbeamsort(0);
478 <                                        /* tell server to delete orphans */
479 <        cbeamop(DR_DELSET, cbeam+ncbeams, xcbeams, NULL, 0, 0);
386 >
387 > int
388 > beam_sync(all)                  /* update beam list on server */
389 > int     all;
390 > {
391 >                                        /* sort list (put orphans at end) */
392 >        cbeamsort(all < 0);
393 >        if (all)
394 >                cbeamop(DR_NEWSET, cbeam, ncbeams);
395 >        else
396 >                cbeamop(DR_ADJSET, cbeam, ncbeams+xcbeams);
397          xcbeams = 0;                    /* truncate our list */
398 < #endif
482 <        copystruct(&dvw, vn);           /* record new view */
398 >        return(ncbeams);
399   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines