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

Comparing ray/src/rt/rview.c (file contents):
Revision 2.12 by greg, Tue Sep 7 16:11:12 1993 UTC vs.
Revision 2.35 by greg, Tue Aug 16 18:09:53 2011 UTC

# Line 1 | Line 1
1 /* Copyright (c) 1992 Regents of the University of California */
2
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ LBL";
2 > static const char       RCSid[] = "$Id$";
3   #endif
6
4   /*
5   *  rview.c - routines and variables for interactive view generation.
6   *
7 < *     3/24/87
7 > *  External symbols declared in rpaint.h
8   */
9  
10 < #include  "ray.h"
10 > #include "copyright.h"
11  
15 #include  "rpaint.h"
16
12   #include  <signal.h>
18
13   #include  <ctype.h>
14  
15 < VIEW  ourview = STDVIEW;                /* viewing parameters */
16 < int  hresolu, vresolu;                  /* image resolution */
15 > #include  "ray.h"
16 > #include  "rpaint.h"
17  
24 int  dimlist[MAXDIM];                   /* sampling dimensions */
25 int  ndims = 0;                         /* number of sampling dimensions */
26 int  samplendx = 0;                     /* index for this sample */
27
28 int  psample = 8;                       /* pixel sample size */
29 double  maxdiff = .15;                  /* max. sample difference */
30
31 double  exposure = 1.0;                 /* exposure for scene */
32
33 double  dstrsrc = 0.0;                  /* square source distribution */
34 double  shadthresh = .1;                /* shadow threshold */
35 double  shadcert = .25;                 /* shadow certainty */
36 int  directrelay = 0;                   /* number of source relays */
37 int  vspretest = 128;                   /* virtual source pretest density */
38 int  directvis = 1;                     /* sources visible? */
39 double  srcsizerat = 0.;                /* maximum ratio source size/dist. */
40
41 double  specthresh = .3;                /* specular sampling threshold */
42 double  specjitter = 1.;                /* specular sampling jitter */
43
44 int  maxdepth = 4;                      /* maximum recursion depth */
45 double  minweight = 1e-2;               /* minimum ray weight */
46
47 COLOR  ambval = BLKCOLOR;               /* ambient value */
48 double  ambacc = 0.2;                   /* ambient accuracy */
49 int  ambres = 8;                        /* ambient resolution */
50 int  ambdiv = 32;                       /* ambient divisions */
51 int  ambssamp = 0;                      /* ambient super-samples */
52 int  ambounce = 0;                      /* ambient bounces */
53 char  *amblist[128];                    /* ambient include/exclude list */
54 int  ambincl = -1;                      /* include == 1, exclude == 0 */
55
56 int  greyscale = 0;                     /* map colors to brightness? */
57 char  *devname = dev_default;           /* output device name */
58
59 struct driver  *dev = NULL;             /* driver functions */
60
61 char  rifname[128];                     /* rad input file name */
62
63 VIEW  oldview;                          /* previous view parameters */
64
65 PNODE  ptrunk;                          /* the base of our image */
66 RECT  pframe;                           /* current frame boundaries */
67 int  pdepth;                            /* image depth in current frame */
68
69 static char  *reserve_mem = NULL;       /* pre-allocated reserve memory */
70
71 #define RESERVE_AMT     32768           /* amount of memory to reserve */
72
18   #define  CTRL(c)        ((c)-'@')
19  
20  
21 + void
22   quit(code)                      /* quit program */
23   int  code;
24   {
25 < #ifdef MSTATS
26 <        if (code == 2 && errno == ENOMEM)
27 <                printmemstats(stderr);
28 < #endif
83 <        devclose();
25 >        if (ray_pnprocs > 0)    /* close children if any */
26 >                ray_pclose(0);
27 >        else if (!ray_pnprocs)  /* in parent */
28 >                devclose();
29          exit(code);
30   }
31  
32  
33 < devopen(dname)                          /* open device driver */
34 < char  *dname;
33 > void
34 > devopen(                                /* open device driver */
35 >        char  *dname
36 > )
37   {
38          extern char  *progname, *octname;
39          char  *id;
40 <        register int  i;
40 >        int  i;
41  
42          id = octname!=NULL ? octname : progname;
43                                                  /* check device table */
44          for (i = 0; devtable[i].name; i++)
45 <                if (!strcmp(dname, devtable[i].name))
45 >                if (!strcmp(dname, devtable[i].name)) {
46                          if ((dev = (*devtable[i].init)(dname, id)) == NULL) {
47                                  sprintf(errmsg, "cannot initialize %s", dname);
48                                  error(USER, errmsg);
49                          } else
50                                  return;
51 < #ifndef NIX                                                
51 >                }
52                                                  /* not there, try exec */
53          if ((dev = comm_init(dname, id)) == NULL) {
54                  sprintf(errmsg, "cannot start device \"%s\"", dname);
55                  error(USER, errmsg);
56          }
110 #endif
57   }
58  
59  
60 < devclose()                              /* close our device */
60 > void
61 > devclose(void)                          /* close our device */
62   {
63          if (dev != NULL)
64                  (*dev->close)();
# Line 119 | Line 66 | devclose()                             /* close our device */
66   }
67  
68  
69 < printdevices()                          /* print list of output devices */
69 > void
70 > printdevices(void)                      /* print list of output devices */
71   {
72 <        register int  i;
72 >        int  i;
73  
74          for (i = 0; devtable[i].name; i++)
75                  printf("%-16s # %s\n", devtable[i].name, devtable[i].descrip);
76   }
77  
78  
79 < rview()                         /* do a view */
79 > void
80 > rview(void)                             /* do a view */
81   {
82          char  buf[32];
83  
84 <        devopen(devname);               /* open device */
85 <        newimage();                     /* start image (calls fillreserves) */
84 >        devopen(dvcname);               /* open device */
85 >        newimage(NULL);                 /* start image */
86  
87          for ( ; ; ) {                   /* quit in command() */
88                  while (hresolu <= 1<<pdepth && vresolu <= 1<<pdepth)
89                          command("done: ");
141                while (reserve_mem == NULL)
142                        command("out of memory: ");
90                  errno = 0;
91                  if (hresolu <= psample<<pdepth && vresolu <= psample<<pdepth) {
92                          sprintf(buf, "%d sampling...\n", 1<<pdepth);
# Line 148 | Line 95 | rview()                                /* do a view */
95                  } else {
96                          sprintf(buf, "%d refining...\n", 1<<pdepth);
97                          (*dev->comout)(buf);
98 <                        refine(&ptrunk, 0, 0, hresolu, vresolu, pdepth+1);
98 >                        refine(&ptrunk, pdepth+1);
99                  }
100 <                if (errno == ENOMEM)            /* ran out of memory */
154 <                        freereserves();
155 <                else if (dev->inpready)         /* noticed some input */
100 >                if (dev->inpready)              /* noticed some input */
101                          command(": ");
102                  else                            /* finished this depth */
103                          pdepth++;
# Line 160 | Line 105 | rview()                                /* do a view */
105   }
106  
107  
108 < fillreserves()                  /* fill memory reserves */
108 > void
109 > command(                        /* get/execute command */
110 >        char  *prompt
111 > )
112   {
165        if (reserve_mem != NULL)
166                return;
167        reserve_mem = malloc(RESERVE_AMT);
168 }
169
170
171 freereserves()                  /* free memory reserves */
172 {
173        if (reserve_mem == NULL)
174                return;
175        free(reserve_mem);
176        reserve_mem = NULL;
177 }
178
179
180 command(prompt)                 /* get/execute command */
181 char  *prompt;
182 {
113   #define  badcom(s)      strncmp(s, inpbuf, args-inpbuf-1)
114          char  inpbuf[256];
115          char  *args;
# Line 189 | Line 119 | again:
119                  ;
120          if (*args) *args++ = '\0';
121          else *++args = '\0';
122 +
123 +        if (waitrays() < 0)                     /* clear ray queue */
124 +                quit(1);
125          
126          switch (inpbuf[0]) {
127 <        case 'f':                               /* new frame (or free mem.) */
127 >        case 'f':                               /* new frame (|focus|free) */
128                  if (badcom("frame")) {
129 <                        if (badcom("free"))
130 <                                goto commerr;
131 <                        free_objmem();
129 >                        if (badcom("focus")) {
130 >                                if (badcom("free"))
131 >                                        goto commerr;
132 >                                free_objmem();
133 >                                break;
134 >                        }
135 >                        getfocus(args);
136                          break;
137                  }
138                  getframe(args);
# Line 226 | Line 163 | again:
163                  getexposure(args);
164                  break;
165          case 's':                               /* set a parameter */
166 <                if (badcom("set"))
166 >                if (badcom("set")) {
167 > #ifdef  SIGTSTP
168 >                        if (!badcom("stop"))
169 >                                goto dostop;
170 > #endif
171                          goto commerr;
172 +                }
173                  setparam(args);
174                  break;
175          case 'n':                               /* new picture */
176                  if (badcom("new"))
177                          goto commerr;
178 <                newimage();
178 >                newimage(args);
179                  break;
180          case 't':                               /* trace a ray */
181                  if (badcom("trace"))
# Line 247 | Line 189 | again:
189                  break;
190          case 'm':                               /* move camera (or memstats) */
191                  if (badcom("move"))
250 #ifdef  MSTATS
251                {
252                        if (badcom("memory"))
253                                goto commerr;
254                        printmemstats(stderr);
255                        break;
256                }
257 #else
192                          goto commerr;
259 #endif
193                  getmove(args);
194                  break;
195          case 'r':                               /* rotate/repaint */
196                  if (badcom("rotate")) {
197 <                        if (badcom("repaint"))
198 <                                goto commerr;
197 >                        if (badcom("repaint")) {
198 >                                if (badcom("redraw"))
199 >                                        goto commerr;
200 >                                redraw();
201 >                                break;
202 >                        }
203                          getrepaint(args);
204                          break;
205                  }
206                  getrotate(args);
207                  break;
208          case 'p':                               /* pivot view */
209 <                if (badcom("pivot"))
210 <                        goto commerr;
209 >                if (badcom("pivot")) {
210 >                        if (badcom("pause"))
211 >                                goto commerr;
212 >                        goto again;
213 >                }
214                  getpivot(args);
215                  break;
216          case CTRL('R'):                         /* redraw */
# Line 288 | Line 228 | again:
228          case CTRL('C'):                         /* interrupt */
229                  goto again;
230   #ifdef  SIGTSTP
231 <        case CTRL('Z'):                         /* stop */
231 >        case CTRL('Z'):;                        /* stop */
232 > dostop:
233                  devclose();
234                  kill(0, SIGTSTP);
235                  /* pc stops here */
236 <                devopen(devname);
236 >                devopen(dvcname);
237                  redraw();
238                  break;
239   #endif
# Line 312 | Line 253 | commerr:
253   }
254  
255  
256 < rsample()                       /* sample the image */
256 > void
257 > rsample(void)                   /* sample the image */
258   {
259          int  xsiz, ysiz, y;
318        RECT  r;
260          PNODE  *p;
261 <        register RECT  *rl;
262 <        register PNODE  **pl;
322 <        register int  x;
261 >        PNODE   **pl;
262 >        int  x;
263          /*
264           *     We initialize the bottom row in the image at our current
265           * resolution.  During sampling, we check super-pixels to the
# Line 329 | Line 269 | rsample()                      /* sample the image */
269           */
270          xsiz = (((long)(pframe.r-pframe.l)<<pdepth)+hresolu-1) / hresolu;
271          ysiz = (((long)(pframe.u-pframe.d)<<pdepth)+vresolu-1) / vresolu;
332        rl = (RECT *)malloc(xsiz*sizeof(RECT));
333        if (rl == NULL)
334                return;
272          pl = (PNODE **)malloc(xsiz*sizeof(PNODE *));
273 <        if (pl == NULL) {
337 <                free((char *)rl);
273 >        if (pl == NULL)
274                  return;
339        }
275          /*
276           * Initialize the bottom row.
277           */
278 <        rl[0].l = rl[0].d = 0;
344 <        rl[0].r = hresolu; rl[0].u = vresolu;
345 <        pl[0] = findrect(pframe.l, pframe.d, &ptrunk, rl, pdepth);
278 >        pl[0] = findrect(pframe.l, pframe.d, &ptrunk, pdepth);
279          for (x = 1; x < xsiz; x++) {
347                rl[x].l = rl[x].d = 0;
348                rl[x].r = hresolu; rl[x].u = vresolu;
280                  pl[x] = findrect(pframe.l+((x*hresolu)>>pdepth),
281 <                                pframe.d, &ptrunk, rl+x, pdepth);
281 >                                pframe.d, &ptrunk, pdepth);
282          }
283                                                  /* sample the image */
284          for (y = 0; /* y < ysiz */ ; y++) {
285                  for (x = 0; x < xsiz-1; x++) {
286 <                        if (dev->inpready || errno == ENOMEM)
286 >                        if (dev->inpready)
287                                  goto escape;
288                          /*
289                           * Test super-pixel to the right.
290                           */
291                          if (pl[x] != pl[x+1] && bigdiff(pl[x]->v,
292                                          pl[x+1]->v, maxdiff)) {
293 <                                refine(pl[x], rl[x].l, rl[x].d,
294 <                                                rl[x].r, rl[x].u, 1);
364 <                                refine(pl[x+1], rl[x+1].l, rl[x+1].d,
365 <                                                rl[x+1].r, rl[x+1].u, 1);
293 >                                refine(pl[x], 1);
294 >                                refine(pl[x+1], 1);
295                          }
296                  }
297                  if (y >= ysiz-1)
298                          break;
299                  for (x = 0; x < xsiz; x++) {
300 <                        if (dev->inpready || errno == ENOMEM)
300 >                        if (dev->inpready)
301                                  goto escape;
302                          /*
303                           * Find super-pixel at this position in next row.
304                           */
376                        r.l = r.d = 0;
377                        r.r = hresolu; r.u = vresolu;
305                          p = findrect(pframe.l+((x*hresolu)>>pdepth),
306                                  pframe.d+(((y+1)*vresolu)>>pdepth),
307 <                                        &ptrunk, &r, pdepth);
307 >                                        &ptrunk, pdepth);
308                          /*
309                           * Test super-pixel in next row.
310                           */
311                          if (pl[x] != p && bigdiff(pl[x]->v, p->v, maxdiff)) {
312 <                                refine(pl[x], rl[x].l, rl[x].d,
313 <                                                rl[x].r, rl[x].u, 1);
387 <                                refine(p, r.l, r.d, r.r, r.u, 1);
312 >                                refine(pl[x], 1);
313 >                                refine(p, 1);
314                          }
315                          /*
316                           * Copy into super-pixel array.
317                           */
392                        rl[x].l = r.l; rl[x].d = r.d;
393                        rl[x].r = r.r; rl[x].u = r.u;
318                          pl[x] = p;
319                  }
320          }
321   escape:
322 <        free((char *)rl);
399 <        free((char *)pl);
322 >        free((void *)pl);
323   }
324  
325  
326   int
327 < refine(p, xmin, ymin, xmax, ymax, pd)           /* refine a node */
328 < register PNODE  *p;
329 < int  xmin, ymin, xmax, ymax;
330 < int  pd;
327 > refine(                         /* refine a node */
328 >        PNODE   *p,
329 >        int  pd
330 > )
331   {
332          int  growth;
333          int  mx, my;
411        int  i;
334  
335          if (dev->inpready)                      /* quit for input */
336                  return(0);
# Line 416 | Line 338 | int  pd;
338          if (pd <= 0)                            /* depth limit */
339                  return(0);
340  
341 <        mx = (xmin + xmax) >> 1;
342 <        my = (ymin + ymax) >> 1;
341 >        mx = (p->xmin + p->xmax) >> 1;
342 >        my = (p->ymin + p->ymax) >> 1;
343          growth = 0;
344  
345          if (p->kid == NULL) {                   /* subdivide */
346  
347                  if ((p->kid = newptree()) == NULL)
348                          return(0);
349 +
350 +                p->kid[UR].xmin = mx;
351 +                p->kid[UR].ymin = my;
352 +                p->kid[UR].xmax = p->xmax;
353 +                p->kid[UR].ymax = p->ymax;
354 +                p->kid[UL].xmin = p->xmin;
355 +                p->kid[UL].ymin = my;
356 +                p->kid[UL].xmax = mx;
357 +                p->kid[UL].ymax = p->ymax;
358 +                p->kid[DR].xmin = mx;
359 +                p->kid[DR].ymin = p->ymin;
360 +                p->kid[DR].xmax = p->xmax;
361 +                p->kid[DR].ymax = my;
362 +                p->kid[DL].xmin = p->xmin;
363 +                p->kid[DL].ymin = p->ymin;
364 +                p->kid[DL].xmax = mx;
365 +                p->kid[DL].ymax = my;
366                  /*
367                   *  The following paint order can leave a black pixel
368                   *  if redraw() is called in (*dev->paintr)().
369                   */
370                  if (p->x >= mx && p->y >= my)
371                          pcopy(p, p->kid+UR);
372 <                else
373 <                        paint(p->kid+UR, mx, my, xmax, ymax);
372 >                else if (paint(p->kid+UR) < 0)
373 >                        quit(1);
374                  if (p->x < mx && p->y >= my)
375                          pcopy(p, p->kid+UL);
376 <                else
377 <                        paint(p->kid+UL, xmin, my, mx, ymax);
376 >                else if (paint(p->kid+UL) < 0)
377 >                        quit(1);
378                  if (p->x >= mx && p->y < my)
379                          pcopy(p, p->kid+DR);
380 <                else
381 <                        paint(p->kid+DR, mx, ymin, xmax, my);
380 >                else if (paint(p->kid+DR) < 0)
381 >                        quit(1);
382                  if (p->x < mx && p->y < my)
383                          pcopy(p, p->kid+DL);
384 <                else
385 <                        paint(p->kid+DL, xmin, ymin, mx, my);
384 >                else if (paint(p->kid+DL) < 0)
385 >                        quit(1);
386  
387                  growth++;
388          }
389                                                  /* do children */
390          if (mx > pframe.l) {
391                  if (my > pframe.d)
392 <                        growth += refine(p->kid+DL, xmin, ymin, mx, my, pd-1);
392 >                        growth += refine(p->kid+DL, pd-1);
393                  if (my < pframe.u)
394 <                        growth += refine(p->kid+UL, xmin, my, mx, ymax, pd-1);
394 >                        growth += refine(p->kid+UL, pd-1);
395          }
396          if (mx < pframe.r) {
397                  if (my > pframe.d)
398 <                        growth += refine(p->kid+DR, mx, ymin, xmax, my, pd-1);
398 >                        growth += refine(p->kid+DR, pd-1);
399                  if (my < pframe.u)
400 <                        growth += refine(p->kid+UR, mx, my, xmax, ymax, pd-1);
462 <        }
463 <                                                /* recompute sum */
464 <        if (growth) {
465 <                setcolor(p->v, 0.0, 0.0, 0.0);
466 <                for (i = 0; i < 4; i++)
467 <                        addcolor(p->v, p->kid[i].v);
468 <                scalecolor(p->v, 0.25);
400 >                        growth += refine(p->kid+UR, pd-1);
401          }
402          return(growth);
403   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines