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

Comparing ray/src/rt/rpict.c (file contents):
Revision 1.19 by greg, Thu Mar 1 08:19:01 1990 UTC vs.
Revision 2.4 by greg, Sat Dec 28 18:43:15 1991 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1986 Regents of the University of California */
1 > /* Copyright (c) 1991 Regents of the University of California */
2  
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ LBL";
# Line 15 | Line 15 | static char SCCSid[] = "$SunId$ LBL";
15   #ifdef BSD
16   #include  <sys/time.h>
17   #include  <sys/resource.h>
18 – #else
19 – #include  <signal.h>
18   #endif
19 +
20 + #include  <signal.h>
21   #include  <fcntl.h>
22  
23   #include  "view.h"
24  
25 + #include  "resolu.h"
26 +
27   #include  "random.h"
28  
29 + int  dimlist[MAXDIM];                   /* sampling dimensions */
30 + int  ndims = 0;                         /* number of sampling dimensions */
31 + int  samplendx;                         /* sample index number */
32 +
33   VIEW  ourview = STDVIEW;                /* view parameters */
34   int  hresolu = 512;                     /* horizontal resolution */
35   int  vresolu = 512;                     /* vertical resolution */
# Line 36 | Line 42 | double  dstrpix = 0.67;                        /* square pixel distribution
42   double  dstrsrc = 0.0;                  /* square source distribution */
43   double  shadthresh = .05;               /* shadow threshold */
44   double  shadcert = .5;                  /* shadow certainty */
45 + int  directrelay = 1;                   /* number of source relays */
46 + int  vspretest = 512;                   /* virtual source pretest density */
47 + int  directinvis = 0;                   /* sources invisible? */
48 + double  srcsizerat = .25;               /* maximum ratio source size/dist. */
49  
50   int  maxdepth = 6;                      /* maximum recursion depth */
51   double  minweight = 5e-3;               /* minimum ray weight */
# Line 53 | Line 63 | int  ralrm = 0;                                /* seconds between reports */
63  
64   double  pctdone = 0.0;                  /* percentage done */
65  
66 + long  tlastrept = 0L;                   /* time at last report */
67 +
68 + extern long  time();
69 + extern long  tstart;                    /* starting time */
70 +
71   extern long  nrays;                     /* number of rays traced */
72  
73 < #define  MAXDIV         32              /* maximum sample size */
73 > #define  MAXDIV         16              /* maximum sample size */
74  
75   #define  pixjitter()    (.5+dstrpix*(.5-frandom()))
76  
# Line 72 | Line 87 | int  code;
87   }
88  
89  
90 + #ifdef BSD
91   report()                /* report progress */
92   {
77 – #ifdef BSD
93          struct rusage  rubuf;
94          double  t;
95  
# Line 87 | Line 102 | report()               /* report progress */
102  
103          sprintf(errmsg, "%ld rays, %4.2f%% done after %5.4f CPU hours\n",
104                          nrays, pctdone, t/3600.0);
105 +        eputs(errmsg);
106 +        tlastrept = time((long *)0);
107 + }
108   #else
109 + report()                /* report progress */
110 + {
111 +        tlastrept = time((long *)0);
112 +        sprintf(errmsg, "%ld rays, %4.2f%% done after %5.4f hours\n",
113 +                        nrays, pctdone, (tlastrept-tstart)/3600.0);
114 +        eputs(errmsg);
115          signal(SIGALRM, report);
116 <        sprintf(errmsg, "%ld rays, %4.2f%% done\n", nrays, pctdone);
116 > }
117   #endif
94 –        eputs(errmsg);
118  
96 –        if (ralrm > 0)
97 –                alarm(ralrm);
98 – }
119  
100 –
120   render(zfile, oldfile)                          /* render the scene */
121   char  *zfile, *oldfile;
122   {
123          extern long  lseek();
124          COLOR  *scanbar[MAXDIV+1];      /* scanline arrays of pixel values */
125          float  *zbar[MAXDIV+1];         /* z values */
126 +        char  *sampdens;                /* previous sample density */
127          int  ypos;                      /* current scanline */
128          int  ystep;                     /* current y step size */
129 +        int  hstep;                     /* h step size */
130          int  zfd;
131          COLOR  *colptr;
132          float  *zptr;
# Line 113 | Line 134 | char  *zfile, *oldfile;
134                                          /* check sampling */
135          if (psample < 1)
136                  psample = 1;
137 <        else if (psample > MAXDIV)
137 >        else if (psample > MAXDIV) {
138 >                sprintf(errmsg, "pixel sampling reduced from %d to %d",
139 >                                psample, MAXDIV);
140 >                error(WARNING, errmsg);
141                  psample = MAXDIV;
142 +        }
143                                          /* allocate scanlines */
144          for (i = 0; i <= psample; i++) {
145                  scanbar[i] = (COLOR *)malloc(hresolu*sizeof(COLOR));
146                  if (scanbar[i] == NULL)
147                          goto memerr;
148          }
149 +        hstep = (psample*140+49)/99;            /* quincunx sampling */
150 +        ystep = (psample*99+70)/140;
151 +        if (hstep > 2) {
152 +                i = hresolu/hstep + 2;
153 +                if ((sampdens = malloc(i)) == NULL)
154 +                        goto memerr;
155 +                while (i--)
156 +                        sampdens[i] = hstep;
157 +        } else
158 +                sampdens = NULL;
159                                          /* open z file */
160          if (zfile != NULL) {
161                  if ((zfd = open(zfile, O_WRONLY|O_CREAT, 0666)) == -1) {
# Line 138 | Line 173 | char  *zfile, *oldfile;
173                          zbar[i] = NULL;
174          }
175                                          /* write out boundaries */
176 <        fputresolu(YMAJOR|YDECR, hresolu, vresolu, stdout);
176 >        fprtresolu(hresolu, vresolu, stdout);
177                                          /* recover file and compute first */
178          i = salvage(oldfile);
179 <        if (zfd != -1 && lseek(zfd, (long)i*hresolu*sizeof(float), 0) == -1)
179 >        if (zfd != -1 && i > 0 &&
180 >                        lseek(zfd, (long)i*hresolu*sizeof(float), 0) == -1)
181                  error(SYSTEM, "z file seek error in render");
182 +        pctdone = 100.0*i/vresolu;
183 +        if (ralrm > 0)                  /* report init stats */
184 +                report();
185 + #ifndef  BSD
186 +        else
187 + #endif
188 +        signal(SIGALRM, report);
189          ypos = vresolu-1 - i;
190 <        fillscanline(scanbar[0], zbar[0], hresolu, ypos, psample);
148 <        ystep = psample;
190 >        fillscanline(scanbar[0], zbar[0], sampdens, hresolu, ypos, hstep);
191                                                  /* compute scanlines */
192          for (ypos -= ystep; ypos > -ystep; ypos -= ystep) {
151 –                                                        /* record progress */
152 –                pctdone = 100.0*(vresolu-1-ypos-ystep)/vresolu;
193                                                          /* bottom adjust? */
194                  if (ypos < 0) {
195                          ystep += ypos;
# Line 162 | Line 202 | char  *zfile, *oldfile;
202                  zbar[ystep] = zbar[0];
203                  zbar[0] = zptr;
204                                                          /* fill base line */
205 <                fillscanline(scanbar[0], zbar[0], hresolu, ypos, psample);
205 >                fillscanline(scanbar[0], zbar[0], sampdens,
206 >                                hresolu, ypos, hstep);
207                                                          /* fill bar */
208                  fillscanbar(scanbar, zbar, hresolu, ypos, ystep);
209                                                          /* write it out */
210 + #ifndef  BSD
211 +                signal(SIGALRM, SIG_IGN);       /* don't interrupt writes */
212 + #endif
213                  for (i = ystep; i > 0; i--) {
214                          if (zfd != -1 && write(zfd, (char *)zbar[i],
215                                          hresolu*sizeof(float))
# Line 176 | Line 220 | char  *zfile, *oldfile;
220                  }
221                  if (fflush(stdout) == EOF)
222                          goto writerr;
223 +                                                        /* record progress */
224 +                pctdone = 100.0*(vresolu-1-ypos)/vresolu;
225 +                if (ralrm > 0 && time((long *)0) >= tlastrept+ralrm)
226 +                        report();
227 + #ifndef  BSD
228 +                else
229 +                        signal(SIGALRM, report);
230 + #endif
231          }
232                                                  /* clean up */
233          if (zfd != -1) {
234                  if (write(zfd, (char *)zbar[0], hresolu*sizeof(float))
235                                  < hresolu*sizeof(float))
236                          goto writerr;
237 <                close(zfd);
237 >                if (close(zfd) == -1)
238 >                        goto writerr;
239                  for (i = 0; i <= psample; i++)
240                          free((char *)zbar[i]);
241          }
# Line 191 | Line 244 | char  *zfile, *oldfile;
244                  goto writerr;
245          for (i = 0; i <= psample; i++)
246                  free((char *)scanbar[i]);
247 +        if (sampdens != NULL)
248 +                free(sampdens);
249          pctdone = 100.0;
250          return;
251   writerr:
# Line 200 | Line 255 | memerr:
255   }
256  
257  
258 < fillscanline(scanline, zline, xres, y, xstep)   /* fill scan line at y */
258 > fillscanline(scanline, zline, sd, xres, y, xstep)       /* fill scan at y */
259   register COLOR  *scanline;
260   register float  *zline;
261 + register char  *sd;
262   int  xres, y, xstep;
263   {
264 <        int  b = xstep;
264 >        static int  nc = 0;             /* number of calls */
265 >        int  bl = xstep, b = xstep;
266          double  z;
267          register int  i;
268          
269          z = pixvalue(scanline[0], 0, y);
270          if (zline) zline[0] = z;
271 <
272 <        for (i = xstep; i < xres-1+xstep; i += xstep) {
271 >                                /* zig-zag start for quincunx pattern */
272 >        for (i = ++nc & 1 ? xstep : xstep/2; i < xres-1+xstep; i += xstep) {
273                  if (i >= xres) {
274                          xstep += xres-1-i;
275                          i = xres-1;
276                  }
277                  z = pixvalue(scanline[i], i, y);
278                  if (zline) zline[i] = z;
279 <                
280 <                b = fillsample(scanline+i-xstep, zline ? zline+i-xstep : NULL,
281 <                                i-xstep, y, xstep, 0, b/2);
279 >                if (sd) b = sd[0] > sd[1] ? sd[0] : sd[1];
280 >                if (i <= xstep)
281 >                        b = fillsample(scanline, zline, 0, y, i, 0, b/2);
282 >                else
283 >                        b = fillsample(scanline+i-xstep,
284 >                                        zline ? zline+i-xstep : NULL,
285 >                                        i-xstep, y, xstep, 0, b/2);
286 >                if (sd) *sd++ = nc & 1 ? bl : b;
287 >                bl = b;
288          }
289 +        if (sd && nc & 1) *sd = bl;
290   }
291  
292  
# Line 234 | Line 298 | int  xres, y, ysize;
298          COLOR  vline[MAXDIV+1];
299          float  zline[MAXDIV+1];
300          int  b = ysize;
237 –        double  z;
301          register int  i, j;
302          
303          for (i = 0; i < xres; i++) {
# Line 318 | Line 381 | pixvalue(col, x, y)            /* compute pixel value */
381   COLOR  col;                     /* returned color */
382   int  x, y;                      /* pixel position */
383   {
384 <        static RAY  thisray;    /* our ray for this pixel */
384 >        static RAY  thisray;
385  
386 <        viewray(thisray.rorg, thisray.rdir, &ourview,
387 <                        (x+pixjitter())/hresolu, (y+pixjitter())/vresolu);
386 >        if (viewray(thisray.rorg, thisray.rdir, &ourview,
387 >                        (x+pixjitter())/hresolu, (y+pixjitter())/vresolu) < 0) {
388 >                setcolor(col, 0.0, 0.0, 0.0);
389 >                return(0.0);
390 >        }
391  
392          rayorigin(&thisray, NULL, PRIMARY, 1.0);
393 <        
393 >
394 >        samplendx = pixnumber(x,y,hresolu,vresolu);     /* set pixel index */
395 >
396          rayvalue(&thisray);                     /* trace ray */
397  
398          copycolor(col, thisray.rcol);           /* return color */
399          
400 <        return(thisray.rot);                    /* return distance */
400 >        return(thisray.rt);                     /* return distance */
401   }
402  
403  
# Line 352 | Line 420 | char  *oldfile;
420                                  /* discard header */
421          getheader(fp, NULL);
422                                  /* get picture size */
423 <        if (fgetresolu(&x, &y, fp) != (YMAJOR|YDECR)) {
423 >        if (!fscnresolu(&x, &y, fp)) {
424                  sprintf(errmsg, "bad recover file \"%s\"", oldfile);
425                  error(WARNING, errmsg);
426                  fclose(fp);
# Line 382 | Line 450 | char  *oldfile;
450          return(y);
451   writerr:
452          error(SYSTEM, "write error in salvage");
453 + }
454 +
455 +
456 + int
457 + pixnumber(x, y, xres, yres)             /* compute pixel index (brushed) */
458 + register int  x, y;
459 + int  xres, yres;
460 + {
461 +        x -= y;
462 +        while (x < 0)
463 +                x += xres;
464 +        return((((x>>2)*yres + y) << 2) + (x & 3));
465   }

Diff Legend

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