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.32 by gwlarson, Thu Mar 4 10:29:22 1999 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 MEYERNG
16 > #define MEYERNG         0.2     /* target mean eye range (rel. to grid) */
17 > #endif
18  
17 static VIEW     dvw;            /* current view corresponding to beam list */
18
19 typedef struct {
20        int     hd;             /* holodeck section number (-1 if inactive) */
21        int     i[3];           /* voxel index (may be outside section) */
22 } VOXL;                 /* a voxel */
23
24 static VOXL voxel[8] = {        /* current voxel list */
25        {-1}, {-1}, {-1}, {-1},
26        {-1}, {-1}, {-1}, {-1}
27 };
28
19   #define CBEAMBLK        1024    /* cbeam allocation block size */
20  
21 < static struct beamcomp {
32 <        short   wants;          /* flags telling which voxels want us */
33 <        short   hd;             /* holodeck section number */
34 <        int     bi;             /* beam index */
35 < } *cbeam = NULL;        /* current beam list */
36 <
21 > static PACKHEAD *cbeam = NULL;  /* current beam list */
22   static int      ncbeams = 0;    /* number of sorted beams in cbeam */
23   static int      xcbeams = 0;    /* extra (unregistered) beams past ncbeams */
24   static int      maxcbeam = 0;   /* size of cbeam array */
25  
26 < struct cellact {
42 <        short   vi;             /* voxel index */
43 <        short   add;            /* zero means delete */
44 <        short   rev;            /* reverse ray direction? */
45 < };              /* action for cell */
26 > VIEWPOINT       cureye;         /* current eye position */
27  
47 struct beamact {
48        struct cellact  ca;     /* cell action */
49        GCOORD  gc;             /* grid coordinate */
50 };              /* beam origin and action */
28  
52
29   int
30   newcbeam()              /* allocate new entry at end of cbeam array */
31   {
# Line 58 | Line 34 | newcbeam()             /* allocate new entry at end of cbeam arra
34          if ((i = ncbeams + xcbeams++) >= maxcbeam) {    /* grow array */
35                  maxcbeam += CBEAMBLK;
36                  if (cbeam == NULL)
37 <                        cbeam = (struct beamcomp *)malloc(
38 <                                        maxcbeam*sizeof(struct beamcomp) );
37 >                        cbeam = (PACKHEAD *)malloc(
38 >                                        maxcbeam*sizeof(PACKHEAD) );
39                  else
40 <                        cbeam = (struct beamcomp *)realloc( (char *)cbeam,
41 <                                        maxcbeam*sizeof(struct beamcomp) );
40 >                        cbeam = (PACKHEAD *)realloc( (char *)cbeam,
41 >                                        maxcbeam*sizeof(PACKHEAD) );
42                  if (cbeam == NULL)
43                          error(SYSTEM, "out of memory in newcbeam");
44          }
# Line 72 | Line 48 | newcbeam()             /* allocate new entry at end of cbeam arra
48  
49   int
50   cbeamcmp(cb1, cb2)      /* compare two cbeam entries for sort: keep orphans */
51 < register struct beamcomp        *cb1, *cb2;
51 > register PACKHEAD       *cb1, *cb2;
52   {
53          register int    c;
54  
# Line 84 | Line 60 | register struct beamcomp       *cb1, *cb2;
60  
61   int
62   cbeamcmp2(cb1, cb2)     /* compare two cbeam entries for sort: no orphans */
63 < register struct beamcomp        *cb1, *cb2;
63 > register PACKHEAD       *cb1, *cb2;
64   {
65          register int    c;
66  
67 <        if (!cb1->wants)                /* put orphans at the end, unsorted */
68 <                return(cb2->wants);
67 >        if (!cb1->nr)                   /* put orphans at the end, unsorted */
68 >                return(cb2->nr);
69 >        if (!cb2->nr)
70 >                return(-1);
71          if ((c = cb1->bi - cb2->bi))    /* sort on beam index first */
72                  return(c);
73          return(cb1->hd - cb2->hd);      /* use hd to resolve matches */
# Line 100 | Line 78 | int
78   findcbeam(hd, bi)       /* find the specified beam in our sorted list */
79   int     hd, bi;
80   {
81 <        struct beamcomp cb;
82 <        register struct beamcomp        *p;
81 >        PACKHEAD        cb;
82 >        register PACKHEAD       *p;
83  
84          if (ncbeams <= 0)
85                  return(-1);
86 <        cb.wants = 0; cb.hd = hd; cb.bi = bi;
87 <        p = (struct beamcomp *)bsearch((char *)&cb, (char *)cbeam, ncbeams,
88 <                        sizeof(struct beamcomp), cbeamcmp);
86 >        cb.hd = hd; cb.bi = bi; cb.nr = cb.nc = 0;
87 >        p = (PACKHEAD *)bsearch((char *)&cb, (char *)cbeam, ncbeams,
88 >                        sizeof(PACKHEAD), cbeamcmp);
89          if (p == NULL)
90                  return(-1);
91          return(p - cbeam);
# Line 133 | Line 111 | int    bi;
111          if (bi < 1 | bi > nbeams(hdlist[hd]))
112                  error(INTERNAL, "illegal beam index in getcbeam");
113          n = newcbeam();         /* allocate and assign */
114 <        cbeam[n].wants = 0; cbeam[n].hd = hd; cbeam[n].bi = bi;
114 >        cbeam[n].hd = hd; cbeam[n].bi = bi; cbeam[n].nr = cbeam[n].nc = 0;
115          return(n);
116   }
117  
# Line 146 | Line 124 | int    adopt;
124          if (!(ncbeams += xcbeams))
125                  return;
126          xcbeams = 0;
127 <        qsort((char *)cbeam, ncbeams, sizeof(struct beamcomp),
127 >        qsort((char *)cbeam, ncbeams, sizeof(PACKHEAD),
128                          adopt ? cbeamcmp : cbeamcmp2);
129          if (adopt)
130                  return;
131          for (i = ncbeams; i--; )        /* identify orphans */
132 <                if (cbeam[i].wants)
132 >                if (cbeam[i].nr)
133                          break;
134          xcbeams = ncbeams - ++i;        /* put orphans after ncbeams */
135          ncbeams = i;
136   }
137  
138  
139 < cbeamadj(v, hr, vr)             /* adjust our beam list */
140 < VIEW    *v;
163 < int     hr, vr;
139 > beam_init(fresh)                /* clear beam list for new view(s) */
140 > int     fresh;
141   {
165        register PACKHEAD       *pa;
142          register int    i;
143 <        int     n;
144 <                                        /* first handle additions */
145 <        pa = (PACKHEAD *)malloc(xcbeams*sizeof(PACKHEAD));
146 <        if (xcbeams && pa == NULL)
147 <                goto memerr;
148 <        for (i = xcbeams; i--; ) {
149 <                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");
143 >
144 >        if (fresh)                      /* discard old beams? */
145 >                ncbeams = xcbeams = 0;
146 >        else                            /* else clear sample requests */
147 >                for (i = ncbeams+xcbeams; i--; )
148 >                        cbeam[i].nr = 0;
149 >        cureye.rng = 0.;
150   }
151  
152  
153 < cbeamop(op, bl, n, v, hr, vr)   /* update beams on server list */
154 < int     op;
155 < register struct beamcomp        *bl;
200 < int     n;
201 < VIEW    *v;
153 > int2 *
154 > beam_view(vn, hr, vr)           /* add beam view (if advisable) */
155 > VIEW    *vn;
156   int     hr, vr;
157   {
158 <        register PACKHEAD       *pa;
159 <        register int    i;
160 <
161 <        if (n <= 0)
162 <                return;
163 <        pa = (PACKHEAD *)malloc(n*sizeof(PACKHEAD));
164 <        if (pa == NULL)
165 <                error(SYSTEM, "out of memory in cbeamadd");
166 <        for (i = 0; i < n; i++) {
167 <                pa[i].hd = bl[i].hd;
214 <                pa[i].bi = bl[i].bi;
215 <                pa[i].nr = v==NULL ? 0 :
216 <                                npixels(v, hr, vr, hdlist[bl[i].hd], bl[i].bi);
158 >        int2    *slist;
159 >        BEAMLIST        blist;
160 >        double  eravg, d;
161 >        register HOLO   *hp;
162 >        register int    i, n;
163 >                                        /* compute beams for view */
164 >        slist = viewbeams(vn, hr, vr, &blist);
165 >        if (*slist < 0) {
166 >                error(COMMAND, "no sections visible from this view");
167 >                return(NULL);
168          }
169 <        serv_request(op, n*sizeof(PACKHEAD), (char *)pa);
170 <        free((char *)pa);
171 < }
172 <
173 <
174 < int
175 < 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 <                        }
169 >                                        /* sort current beam list */
170 >        cbeamsort(1);
171 >                                        /* add new beams to list */
172 >        for (i = blist.nb; i--; ) {
173 >                n = getcbeam(blist.bl[i].hd, blist.bl[i].bi);
174 >                if (blist.bl[i].nr > cbeam[n].nr)
175 >                        cbeam[n].nr = blist.bl[i].nr;
176          }
177 <        no = comn ? j : 0;              /* compute flag mapping */
178 <        for (i = 256; i--; ) {
179 <                wmap[i] = 0;
180 <                for (j = no; j--; )
181 <                        if (vmap[j] >= 0 && i & 1<<j)
182 <                                wmap[i] |= 1<<vmap[j];
177 >        free((char *)blist.bl);         /* free list */
178 >        if (MEYERNG <= FTINY)
179 >                return(slist);
180 >                                        /* compute average eye range */
181 >        eravg = 0.;
182 >        for (n = 0; slist[n] >= 0; n++) {
183 >                hp = hdlist[slist[n]];
184 >                eravg +=        MEYERNG/3. / VLEN(hp->wg[0]) +
185 >                                MEYERNG/3. / VLEN(hp->wg[1]) +
186 >                                MEYERNG/3. / VLEN(hp->wg[2]) ;
187          }
188 <                                        /* fix cbeam flags */
189 <        for (i = ncbeams; i--; )
190 <                cbeam[i].wants = wmap[cbeam[i].wants];
191 <                                        /* update our voxel list */
192 <        bcopy((char *)vl, (char *)voxel, n*sizeof(VOXL));
193 <        for (j = n; j < 8; j++)
194 <                voxel[j].hd = -1;
195 <        return(comn);                   /* return bit array of common voxels */
196 < }
260 <
261 <
262 < int
263 < get_voxels(vl, vp)      /* find voxels corresponding to view point */
264 < VOXL    vl[8];
265 < FVECT   vp;
266 < {
267 <        static int      lastn = 0, lastd = -1;
268 <        int     n = 0;
269 <        FVECT   gp;
270 <        double  d;
271 <        int     dist, bestd = 0x7fff;
272 <        VOXL    vox;
273 <        register int    i, j, k;
274 <                                        /* find closest voxels */
275 <        for (i = 0; n < 8 && hdlist[i]; i++) {
276 <                hdgrid(gp, hdlist[i], vp);
277 <                for (j = 0; n < 8 && j < 8; j++) {
278 <                        dist = 0;
279 <                        for (k = 0; k < 3; k++) {
280 <                                d = gp[k] - .5 + (j>>k & 1);
281 <                                if (d < 0.)
282 <                                        dist += -(vox.i[k] = (int)d - 1);
283 <                                else if ((vox.i[k] = d) >= hdlist[i]->grid[k])
284 <                                        dist += vox.i[k] -
285 <                                                        hdlist[i]->grid[k] + 1;
286 <                        }
287 <                        if (dist > bestd)       /* others were closer */
288 <                                continue;
289 <                        if (dist < bestd) {     /* start closer list */
290 <                                n = 0;
291 <                                bestd = dist;
292 <                        }
293 <                        vox.hd = i;             /* add this voxel */
294 <                        copystruct(&vl[n], &vox);
295 <                        n++;
296 <                }
188 >        eravg /= (double)n;
189 >                                        /* add to current eye position */
190 >        if (cureye.rng <= FTINY) {
191 >                VCOPY(cureye.vpt, vn->vp);
192 >                cureye.rng = eravg;
193 >        } else if ((d = sqrt(dist2(vn->vp,cureye.vpt))) + eravg > cureye.rng) {
194 >                for (i = 3; i--; )
195 >                        cureye.vpt[i] = 0.5*(cureye.vpt[i] + vn->vp[i]);
196 >                cureye.rng = 0.5*(cureye.rng + eravg + d);
197          }
198 <                                        /* warn of dangerous moves */
299 <        if (n < lastn && bestd >= lastd)
300 <                error(WARNING, "moving outside holodeck section");
301 <        else if (n > lastn && bestd <= lastd)
302 <                error(WARNING, "moving inside holodeck section");
303 <        lastd = bestd;
304 <        return(lastn = n);
198 >        return(slist);
199   }
200  
201  
202   int
203 < dobeam(gcp, bp)         /* express interest or disintrest in a beam */
204 < GCOORD  *gcp;
311 < register struct beamact *bp;
203 > beam_sync(all)                  /* update beam list on server */
204 > int     all;
205   {
206 <        GCOORD  gc[2];
207 <        int     bi, i;
208 <                                        /* compute beam index */
209 <        if (bp->ca.rev) {
210 <                copystruct(gc, &bp->gc);
211 <                copystruct(gc+1, gcp);
206 >                                        /* set new eye position */
207 >        serv_request(DR_VIEWPOINT, sizeof(VIEWPOINT), (char *)&cureye);
208 >                                        /* sort list (put orphans at end) */
209 >        cbeamsort(all < 0);
210 >                                        /* send beam request */
211 >        if (all) {
212 >                if (ncbeams > 0)
213 >                        serv_request(DR_NEWSET,
214 >                                        ncbeams*sizeof(PACKHEAD), cbeam);
215          } else {
216 <                copystruct(gc, gcp);
217 <                copystruct(gc+1, &bp->gc);
216 >                if (ncbeams+xcbeams > 0)
217 >                        serv_request(DR_ADJSET,
218 >                                (ncbeams+xcbeams)*sizeof(PACKHEAD), cbeam);
219          }
220 <        if ((bi = hdbindex(hdlist[voxel[bp->ca.vi].hd], gc)) <= 0)
221 <                error(CONSISTENCY, "bad grid coordinate in dobeam");
325 <        if (bp->ca.add) {               /* add it in */
326 <                i = getcbeam(voxel[bp->ca.vi].hd, bi);
327 <                cbeam[i].wants |= 1<<bp->ca.vi; /* say we want it */
328 <                return(i == ncbeams+xcbeams-1); /* return 1 if totally new */
329 <        }
330 <                                        /* else delete it */
331 <        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);
220 >        xcbeams = 0;                    /* truncate our list */
221 >        return(ncbeams);
222   }
223  
224  
225 <
226 < int
342 < docell(gcp, cap)        /* find beams corresponding to cell and voxel */
343 < GCOORD  *gcp;
344 < register struct cellact *cap;
225 > gridlines(f)                    /* run through holodeck section grid lines */
226 > int     (*f)();
227   {
228 <        FVECT   org, dir[4];
229 <        FVECT   gp, cv[4], vc;
230 <        struct beamact  bo;
231 <        register int    i;
232 <                                /* compute cell vertices */
233 <        hdcell(cv, hdlist[voxel[cap->vi].hd], gcp);
234 <                                /* compute cell and voxel centers */
235 <        for (i = 0; i < 3; i++) {
236 <                org[i] = 0.5*(cv[0][i] + cv[2][i]);
237 <                gp[i] = voxel[cap->vi].i[i] + 0.5;
238 <        }
239 <        hdworld(vc, hdlist[voxel[cap->vi].hd], gp);
240 <                                /* compute voxel pyramid using vector trick */
241 <        for (i = 0; i < 3; i++) {
242 <                dir[0][i] = vc[i] - cv[0][i];           /* to 3 */
243 <                dir[2][i] = vc[i] - cv[3][i];           /* to 0 */
244 <                if (gcp->w & 1) {       /* watch vertex order! */
245 <                        dir[1][i] = vc[i] - cv[2][i];   /* to 1 */
246 <                        dir[3][i] = vc[i] - cv[1][i];   /* to 2 */
247 <                } else {
248 <                        dir[1][i] = vc[i] - cv[1][i];   /* to 2 */
249 <                        dir[3][i] = vc[i] - cv[2][i];   /* to 1 */
250 <                }
251 <        }
252 <                                /* visit beams for opposite cells */
253 <        copystruct(&bo.ca, cap);
372 <        copystruct(&bo.gc, gcp);
373 <        return(visit_cells(org, dir, hdlist[voxel[cap->vi].hd], dobeam, &bo));
374 < }
375 <
376 <
377 < int
378 < doview(cap, vp)                 /* visit cells for a given view */
379 < struct cellact  *cap;
380 < VIEW    *vp;
381 < {
382 <        int     orient;
383 <        FVECT   org, dir[4];
384 <                                        /* compute view pyramid */
385 <        orient = viewpyramid(org, dir, hdlist[voxel[cap->vi].hd], vp);
386 <        if (!orient)
387 <                error(INTERNAL, "unusable view in doview");
388 <        cap->rev = orient < 0;
389 <                                        /* visit cells within pyramid */
390 <        return(visit_cells(org, dir, hdlist[voxel[cap->vi].hd], docell, cap));
391 < }
392 <
393 <
394 < mvview(voxi, vold, vnew)        /* move view for a voxel */
395 < int     voxi;
396 < VIEW    *vold, *vnew;
397 < {
398 <        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--;
228 >        register int    hd, w, i;
229 >        int     g0, g1;
230 >        FVECT   wp[2], mov;
231 >        double  d;
232 >                                        /* do each wall on each section */
233 >        for (hd = 0; hdlist[hd] != NULL; hd++)
234 >                for (w = 0; w < 6; w++) {
235 >                        g0 = hdwg0[w];
236 >                        g1 = hdwg1[w];
237 >                        d = 1.0/hdlist[hd]->grid[g0];
238 >                        mov[0] = d * hdlist[hd]->xv[g0][0];
239 >                        mov[1] = d * hdlist[hd]->xv[g0][1];
240 >                        mov[2] = d * hdlist[hd]->xv[g0][2];
241 >                        if (w & 1) {
242 >                                VSUM(wp[0], hdlist[hd]->orig,
243 >                                                hdlist[hd]->xv[w>>1], 1.);
244 >                                VSUM(wp[0], wp[0], mov, 1.);
245 >                        } else
246 >                                VCOPY(wp[0], hdlist[hd]->orig);
247 >                        VSUM(wp[1], wp[0], hdlist[hd]->xv[g1], 1.);
248 >                        for (i = hdlist[hd]->grid[g0]; ; ) {    /* g0 lines */
249 >                                (*f)(wp);
250 >                                if (!--i) break;
251 >                                wp[0][0] += mov[0]; wp[0][1] += mov[1];
252 >                                wp[0][2] += mov[2]; wp[1][0] += mov[0];
253 >                                wp[1][1] += mov[1]; wp[1][2] += mov[2];
254                          }
255 <                                /* take care of list tails */
256 <        for ( ; ncnt > 0; ncnt--)
257 <                netchange += docell(ngcp++, &nca);
258 <        for ( ; ocnt > 0; ocnt--)
259 <                netchange -= docell(ogcp++, &oca);
260 <                                /* clean up */
261 <        if (ogcl != NULL) free((char *)ogcl);
262 <        if (ngcl != NULL) free((char *)ngcl);
263 <        return(netchange);
264 < }
265 <
266 <
267 < beam_sync()             /* synchronize beams on server */
268 < {
269 <        cbeamop(DR_NEWSET, cbeam, ncbeams, &odev.v, odev.hres, odev.vres);
270 < }
271 <
272 <
445 < beam_view(vn)                   /* change beam view */
446 < VIEW    *vn;
447 < {
448 <        struct cellact  ca;
449 <        VOXL    vlnew[8];
450 <        int     n, comn;
451 <
452 <        if (!vn->type) {                /* clear our beam list */
453 <                set_voxels(vlnew, 0);
454 <                cbeamop(DR_DELSET, cbeam, ncbeams, NULL, 0, 0);
455 <                ncbeams = 0;
456 <                copystruct(&dvw, vn);
457 <                return;
458 <        }
459 <                                        /* find our new voxels */
460 <        n = get_voxels(vlnew, vn->vp);
461 <                                        /* set the new voxels */
462 <        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);
480 <        xcbeams = 0;                    /* truncate our list */
481 < #endif
482 <        copystruct(&dvw, vn);           /* record new view */
255 >                        d = 1.0/hdlist[hd]->grid[g1];
256 >                        mov[0] = d * hdlist[hd]->xv[g1][0];
257 >                        mov[1] = d * hdlist[hd]->xv[g1][1];
258 >                        mov[2] = d * hdlist[hd]->xv[g1][2];
259 >                        if (w & 1)
260 >                                VSUM(wp[0], hdlist[hd]->orig,
261 >                                                hdlist[hd]->xv[w>>1], 1.);
262 >                        else
263 >                                VSUM(wp[0], hdlist[hd]->orig, mov, 1.);
264 >                        VSUM(wp[1], wp[0], hdlist[hd]->xv[g0], 1.);
265 >                        for (i = hdlist[hd]->grid[g1]; ; ) {    /* g1 lines */
266 >                                (*f)(wp);
267 >                                if (!--i) break;
268 >                                wp[0][0] += mov[0]; wp[0][1] += mov[1];
269 >                                wp[0][2] += mov[2]; wp[1][0] += mov[0];
270 >                                wp[1][1] += mov[1]; wp[1][2] += mov[2];
271 >                        }
272 >                }
273   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines