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

Comparing ray/src/util/findglare.c (file contents):
Revision 1.15 by greg, Fri Apr 5 14:26:47 1991 UTC vs.
Revision 2.11 by schorsch, Fri Jan 2 12:51:54 2004 UTC

# Line 1 | Line 1
1 /* Copyright (c) 1991 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   * Find glare sources in a scene or image.
6   *
# Line 12 | Line 9 | static char SCCSid[] = "$SunId$ LBL";
9  
10   #include "glare.h"
11  
12 < #define FEQ(a,b)        ((a)-(b)<=FTINY&&(a)-(b)<=FTINY)
12 > #define FEQ(a,b)        ((a)-(b)<=FTINY&&(b)-(a)<=FTINY)
13   #define VEQ(v1,v2)      (FEQ((v1)[0],(v2)[0])&&FEQ((v1)[1],(v2)[1]) \
14                                  &&FEQ((v1)[2],(v2)[2]))
15  
16 < char    *rtargv[32] = {"rtrace", "-h", "-ov", "-fff"};
17 < int     rtargc = 4;
16 > char    *rtargv[64] = {"rtrace", "-h-", "-ov", "-fff", "-ld-", "-i-", "-I-"};
17 > int     rtargc = 7;
18  
19   VIEW    ourview = STDVIEW;              /* our view */
20   VIEW    pictview = STDVIEW;             /* picture view */
# Line 36 | Line 33 | ANGLE  glarang[180] = {AEND};          /* glare calculation ang
33   int     nglarangs = 0;
34   double  maxtheta;                       /* maximum angle (in radians) */
35   int     hsize;                          /* horizontal size */
39 int     hlim;                           /* central limit of horizontal */
36  
37   struct illum    *indirect;              /* array of indirect illuminances */
38  
39   long    npixinvw;                       /* number of pixels in view */
40   long    npixmiss;                       /* number of pixels missed */
41  
42 + static int angcmp(const void    *ap1, const void        *ap2);
43 + static void init(void);
44 + static void cleanup(void);
45 + static void printsources(void);
46 + static void printillum(void);
47  
48 < main(argc, argv)
49 < int     argc;
50 < char    *argv[];
48 >
49 >
50 > int
51 > main(
52 >        int     argc,
53 >        char    *argv[]
54 > )
55   {
56 +        int     combine = 1;
57          int     gotview = 0;
58          int     rval, i;
59          char    *err;
# Line 55 | Line 61 | char   *argv[];
61          progname = argv[0];
62                                          /* process options */
63          for (i = 1; i < argc && argv[i][0] == '-'; i++) {
64 +                                                /* expand arguments */
65 +                while ((rval = expandarg(&argc, &argv, i)) > 0)
66 +                        ;
67 +                if (rval < 0) {
68 +                        fprintf(stderr, "%s: cannot expand '%s'",
69 +                                        argv[0], argv[i]);
70 +                        exit(1);
71 +                }
72                  rval = getviewopt(&ourview, argc-i, argv+i);
73                  if (rval >= 0) {
74                          i += rval;
# Line 75 | Line 89 | char   *argv[];
89                          }
90                          if (argv[i][2] != 'f')
91                                  goto userr;
92 <                        rval = viewfile(argv[++i], &ourview, 0, 0);
92 >                        rval = viewfile(argv[++i], &ourview, NULL);
93                          if (rval < 0) {
94                                  fprintf(stderr,
95                                  "%s: cannot open view file \"%s\"\n",
# Line 101 | Line 115 | char   *argv[];
115                  case 'p':
116                          picture = argv[++i];
117                          break;
118 +                case 'c':
119 +                        combine = !combine;
120 +                        break;
121                  case 'd':
122 +                        rtargv[rtargc++] = argv[i];
123 +                        if (argv[i][2] != 'v')
124 +                                rtargv[rtargc++] = argv[++i];
125 +                        break;
126                  case 'l':
127 +                        if (argv[i][2] == 'd')
128 +                                break;
129 +                        /* FALL THROUGH */
130 +                case 's':
131 +                case 'P':
132                          rtargv[rtargc++] = argv[i];
133                          rtargv[rtargc++] = argv[++i];
134                          break;
135 +                case 'w':
136 +                        rtargv[rtargc++] = argv[i];
137 +                        break;
138                  case 'a':
139                          rtargv[rtargc++] = argv[i];
140                          if (argv[i][2] == 'v') {
# Line 127 | Line 156 | char   *argv[];
156          }
157                                                  /* get view */
158          if (picture != NULL) {
159 <                rval = viewfile(picture, &pictview, 0, 0);
159 >                rval = viewfile(picture, &pictview, NULL);
160                  if (rval < 0) {
161                          fprintf(stderr, "%s: cannot open picture file \"%s\"\n",
162                                          progname, picture);
# Line 154 | Line 183 | char   *argv[];
183                                          progname);
184                          exit(1);
185                  }
186 <                copystruct(&ourview, &pictview);
186 >                ourview = pictview;
187          } else if (picture != NULL && !VEQ(ourview.vp, pictview.vp)) {
188                  fprintf(stderr, "%s: picture must have same viewpoint\n",
189                                  progname);
# Line 179 | Line 208 | char   *argv[];
208          if (threshold <= FTINY)
209                  comp_thresh();                  /* compute glare threshold */
210          analyze();                              /* analyze view */
211 +        if (combine)
212 +                absorb_specks();                /* eliminate tiny sources */
213          cleanup();                              /* tidy up */
214                                                  /* print header */
215 +        newheader("RADIANCE", stdout);
216          printargs(argc, argv, stdout);
217          fputs(VIEWSTR, stdout);
218          fprintview(&ourview, stdout);
219 <        printf("\n\n");
219 >        printf("\n");
220 >        fputformat("ascii", stdout);
221 >        printf("\n");
222          printsources();                         /* print glare sources */
223          printillum();                           /* print illuminances */
224          exit(0);
# Line 196 | Line 230 | userr:
230   }
231  
232  
233 < init()                          /* initialize global variables */
233 > static int
234 > angcmp(         /* compare two angles */
235 >        const void      *ap1,
236 >        const void      *ap2
237 > )
238   {
239 +        register int    a1, a2;
240 +
241 +        a1 = *(ANGLE *)ap1;
242 +        a2 = *(ANGLE *)ap2;
243 +        if (a1 == a2) {
244 +                fprintf(stderr, "%s: duplicate glare angle (%d)\n",
245 +                                progname, a1);
246 +                exit(1);
247 +        }
248 +        return(a1-a2);
249 + }
250 +
251 +
252 + static void
253 + init(void)                              /* initialize global variables */
254 + {
255          double  d;
256          register int    i;
257  
# Line 207 | Line 261 | init()                         /* initialize global variables */
261                                                  /* set direction vectors */
262          for (i = 0; glarang[i] != AEND; i++)
263                  ;
264 <        if (i > 0 && (glarang[0] <= 0 || glarang[i-1] >= 180)) {
265 <                fprintf(stderr, "%s: glare angles must be between 1 and 179\n",
264 >        qsort(glarang, i, sizeof(ANGLE), angcmp);
265 >        if (i > 0 && (glarang[0] <= 0 || glarang[i-1] > 180)) {
266 >                fprintf(stderr, "%s: glare angles must be between 1 and 180\n",
267                                  progname);
268                  exit(1);
269          }
# Line 219 | Line 274 | init()                         /* initialize global variables */
274                  maxtheta = (PI/180.)*glarang[nglarangs-1];
275          else
276                  maxtheta = 0.0;
277 <        hlim = sampdens*maxtheta;
223 <        hsize = hlim + sampdens - 1;
277 >        hsize = hlim(0) + sampdens - 1;
278          if (hsize > (int)(PI*sampdens))
279                  hsize = PI*sampdens;
280          indirect = (struct illum *)calloc(nglardirs, sizeof(struct illum));
281          if (indirect == NULL)
282                  memerr("indirect illuminances");
283          npixinvw = npixmiss = 0L;
284 <        copystruct(&leftview, &ourview);
285 <        copystruct(&rightview, &ourview);
284 >        leftview = ourview;
285 >        rightview = ourview;
286          spinvector(leftview.vdir, ourview.vdir, ourview.vup, maxtheta);
287          spinvector(rightview.vdir, ourview.vdir, ourview.vup, -maxtheta);
288          setview(&leftview);
# Line 272 | Line 326 | init()                         /* initialize global variables */
326   }
327  
328  
329 < cleanup()                               /* close files, wait for children */
329 > static void
330 > cleanup(void)                           /* close files, wait for children */
331   {
332          if (verbose)
333 <                fprintf(stderr, "%s: cleaning up...\n", progname);
333 >                fprintf(stderr, "%s: cleaning up...        \n", progname);
334          if (picture != NULL)
335                  close_pict();
336          if (octree != NULL)
337                  done_rtrace();
338          if (npixinvw < 100*npixmiss)
339 <                fprintf(stderr, "%s: warning -- missing %ld%% of samples\n",
340 <                                progname, 100L*npixmiss/npixinvw);
339 >                fprintf(stderr, "%s: warning -- missing %d%% of samples\n",
340 >                                progname, (int)(100L*npixmiss/npixinvw));
341   }
342  
343  
344 < compdir(vd, x, y)                       /* compute direction for x,y */
345 < FVECT   vd;
346 < int     x, y;
344 > extern int
345 > compdir(                        /* compute direction for x,y */
346 >        FVECT   vd,
347 >        int     x,
348 >        int     y
349 > )
350   {
351 <        static int      cury = 10000;
294 <        static double   err, cmpval;
295 <        long    t;
351 >        int     hl;
352          FVECT   org;                    /* dummy variable */
353  
354 <        if (x <= -hlim)                 /* left region */
354 >        hl = hlim(y);
355 >        if (x <= -hl) {                 /* left region */
356 >                if (x <= -hl-sampdens)
357 >                        return(-1);
358                  return(viewray(org, vd, &leftview,
359 <                                (double)(x+hlim)/(2*sampdens)+.5,
359 >                                (double)(x+hl)/(2*sampdens)+.5,
360                                  (double)y/(2*sampdens)+.5));
361 <        if (x >= hlim)                  /* right region */
361 >        }
362 >        if (x >= hl) {                  /* right region */
363 >                if (x >= hl+sampdens)
364 >                        return(-1);
365                  return(viewray(org, vd, &rightview,
366 <                                (double)(x-hlim)/(2*sampdens)+.5,
366 >                                (double)(x-hl)/(2*sampdens)+.5,
367                                  (double)y/(2*sampdens)+.5));
306                                        /* central region */
307                                /* avoid over-counting of poles */
308        if (cury != y) {
309                err = 0.0;
310                cmpval = sqrt(1.0 - (double)((long)y*y)/((long)vsize*vsize));
311                cury = y;
368          }
369 <        err += cmpval;
314 <        if (err <= 0.5)
315 <                return(-1);
316 <        err -= 1.0;
369 >                                        /* central region */
370          if (viewray(org, vd, &ourview, .5, (double)y/(2*sampdens)+.5) < 0)
371                  return(-1);
372 <        spinvector(vd, vd, ourview.vup, h_theta(x));
372 >        spinvector(vd, vd, ourview.vup, h_theta(x,y));
373          return(0);
374   }
375  
376  
377 < memerr(s)                       /* malloc failure */
378 < char    *s;
377 > extern double
378 > pixsize(                /* return the solid angle of pixel at (x,y) */
379 >        int     x,
380 >        int     y
381 > )
382   {
383 +        register int    hl, xo;
384 +        double  disc;
385 +
386 +        hl = hlim(y);
387 +        if (x < -hl)
388 +                xo = x+hl;
389 +        else if (x > hl)
390 +                xo = x-hl;
391 +        else
392 +                xo = 0;
393 +        disc = 1. - (double)((long)xo*xo + (long)y*y)/((long)sampdens*sampdens);
394 +        if (disc <= FTINY*FTINY)
395 +                return(0.);
396 +        return(1./(sampdens*sampdens*sqrt(disc)));
397 + }
398 +
399 +
400 + extern void
401 + memerr(                 /* malloc failure */
402 +        char    *s
403 + )
404 + {
405          fprintf(stderr, "%s: out of memory for %s\n", progname, s);
406          exit(1);
407   }
408  
409  
410 < printsources()                  /* print out glare sources */
410 > static void
411 > printsources(void)                      /* print out glare sources */
412   {
413          register struct source  *sp;
414  
# Line 342 | Line 421 | printsources()                 /* print out glare sources */
421   }
422  
423  
424 < printillum()                    /* print out indirect illuminances */
424 > static void
425 > printillum(void)                        /* print out indirect illuminances */
426   {
427          register int    i;
428  

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines