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.4 by greg, Mon Mar 18 16:21:09 1991 UTC vs.
Revision 2.8 by gregl, Mon Oct 20 16:35:30 1997 UTC

# Line 12 | Line 12 | static char SCCSid[] = "$SunId$ LBL";
12  
13   #include "glare.h"
14  
15 < #define FEQ(a,b)        ((a)-(b)<=FTINY&&(a)-(b)<=FTINY)
15 > #define FEQ(a,b)        ((a)-(b)<=FTINY&&(b)-(a)<=FTINY)
16   #define VEQ(v1,v2)      (FEQ((v1)[0],(v2)[0])&&FEQ((v1)[1],(v2)[1]) \
17                                  &&FEQ((v1)[2],(v2)[2]))
18  
19 < char    *rtargv[32] = {"rtrace", "-h", "-ov", "-fff"};
20 < int     rtargc = 4;
19 > char    *rtargv[64] = {"rtrace", "-h-", "-ov", "-fff", "-ld-", "-i-", "-I-"};
20 > int     rtargc = 7;
21  
22 < VIEW    ourview;                        /* our view */
22 > VIEW    ourview = STDVIEW;              /* our view */
23   VIEW    pictview = STDVIEW;             /* picture view */
24   VIEW    leftview, rightview;            /* leftmost and rightmost views */
25  
# Line 29 | Line 29 | char   *octree = NULL;                 /* octree file name */
29   int     verbose = 0;                    /* verbose reporting */
30   char    *progname;                      /* global argv[0] */
31  
32 + double  threshold = 0.;                 /* glare threshold */
33 +
34   int     sampdens = SAMPDENS;            /* sample density */
35   ANGLE   glarang[180] = {AEND};          /* glare calculation angles */
36   int     nglarangs = 0;
37   double  maxtheta;                       /* maximum angle (in radians) */
38   int     hsize;                          /* horizontal size */
37 – int     hlim;                           /* central limit of horizontal */
39  
40   struct illum    *indirect;              /* array of indirect illuminances */
41  
42 + long    npixinvw;                       /* number of pixels in view */
43 + long    npixmiss;                       /* number of pixels missed */
44  
45 +
46   main(argc, argv)
47   int     argc;
48   char    *argv[];
49   {
50 +        int     combine = 1;
51          int     gotview = 0;
52          int     rval, i;
53          char    *err;
# Line 50 | Line 55 | char   *argv[];
55          progname = argv[0];
56                                          /* process options */
57          for (i = 1; i < argc && argv[i][0] == '-'; i++) {
58 +                                                /* expand arguments */
59 +                while (rval = expandarg(&argc, &argv, i))
60 +                        if (rval < 0) {
61 +                                fprintf(stderr, "%s: cannot expand '%s'",
62 +                                                argv[0], argv[i]);
63 +                                exit(1);
64 +                        }
65                  rval = getviewopt(&ourview, argc-i, argv+i);
66                  if (rval >= 0) {
67                          i += rval;
# Line 57 | Line 69 | char   *argv[];
69                          continue;
70                  }
71                  switch (argv[i][1]) {
72 +                case 't':
73 +                        threshold = atof(argv[++i]);
74 +                        break;
75                  case 'r':
76                          sampdens = atoi(argv[++i])/2;
77                          break;
# Line 67 | Line 82 | char   *argv[];
82                          }
83                          if (argv[i][2] != 'f')
84                                  goto userr;
85 <                        rval = viewfile(argv[++i], &ourview, 0, 0);
85 >                        rval = viewfile(argv[++i], &ourview, NULL);
86                          if (rval < 0) {
87                                  fprintf(stderr,
88                                  "%s: cannot open view file \"%s\"\n",
# Line 93 | Line 108 | char   *argv[];
108                  case 'p':
109                          picture = argv[++i];
110                          break;
111 +                case 'c':
112 +                        combine = !combine;
113 +                        break;
114                  case 'd':
115 +                        rtargv[rtargc++] = argv[i];
116 +                        if (argv[i][2] != 'v')
117 +                                rtargv[rtargc++] = argv[++i];
118 +                        break;
119                  case 'l':
120 +                        if (argv[i][2] == 'd')
121 +                                break;
122 +                        /* FALL THROUGH */
123 +                case 's':
124 +                case 'P':
125                          rtargv[rtargc++] = argv[i];
126                          rtargv[rtargc++] = argv[++i];
127                          break;
128 +                case 'w':
129 +                        rtargv[rtargc++] = argv[i];
130 +                        break;
131                  case 'a':
132                          rtargv[rtargc++] = argv[i];
133                          if (argv[i][2] == 'v') {
# Line 119 | Line 149 | char   *argv[];
149          }
150                                                  /* get view */
151          if (picture != NULL) {
152 <                rval = viewfile(picture, &pictview, 0, 0);
152 >                rval = viewfile(picture, &pictview, NULL);
153                  if (rval < 0) {
154                          fprintf(stderr, "%s: cannot open picture file \"%s\"\n",
155                                          progname, picture);
# Line 168 | Line 198 | char   *argv[];
198                  exit(1);
199          }
200          init();                                 /* initialize program */
201 <        comp_thresh();                          /* compute glare threshold */
201 >        if (threshold <= FTINY)
202 >                comp_thresh();                  /* compute glare threshold */
203          analyze();                              /* analyze view */
204 +        if (combine)
205 +                absorb_specks();                /* eliminate tiny sources */
206          cleanup();                              /* tidy up */
207                                                  /* print header */
208 +        newheader("RADIANCE", stdout);
209          printargs(argc, argv, stdout);
210          fputs(VIEWSTR, stdout);
211          fprintview(&ourview, stdout);
212 <        printf("\n\n");
212 >        printf("\n");
213 >        fputformat("ascii", stdout);
214 >        printf("\n");
215          printsources();                         /* print glare sources */
216          printillum();                           /* print illuminances */
217          exit(0);
# Line 187 | Line 223 | userr:
223   }
224  
225  
226 + int
227 + angcmp(ap1, ap2)                /* compare two angles */
228 + ANGLE   *ap1, *ap2;
229 + {
230 +        register int    a1, a2;
231 +
232 +        a1 = *ap1;
233 +        a2 = *ap2;
234 +        if (a1 == a2) {
235 +                fprintf(stderr, "%s: duplicate glare angle (%d)\n",
236 +                                progname, a1);
237 +                exit(1);
238 +        }
239 +        return(a1-a2);
240 + }
241 +
242 +
243   init()                          /* initialize global variables */
244   {
245          double  d;
# Line 198 | Line 251 | init()                         /* initialize global variables */
251                                                  /* set direction vectors */
252          for (i = 0; glarang[i] != AEND; i++)
253                  ;
254 <        if (i > 0 && glarang[0] <= 0 || glarang[i-1] >= 180) {
255 <                fprintf(stderr, "%s: glare angles must be between 1 and 179\n",
254 >        qsort(glarang, i, sizeof(ANGLE), angcmp);
255 >        if (i > 0 && (glarang[0] <= 0 || glarang[i-1] > 180)) {
256 >                fprintf(stderr, "%s: glare angles must be between 1 and 180\n",
257                                  progname);
258                  exit(1);
259          }
260          nglarangs = i;
261          /* nglardirs = 2*nglarangs + 1; */
262 <        /* vsize = sampdens; */
262 >        /* vsize = sampdens - 1; */
263          if (nglarangs > 0)
264                  maxtheta = (PI/180.)*glarang[nglarangs-1];
265          else
266                  maxtheta = 0.0;
267 <        hlim = sampdens*maxtheta;
214 <        hsize = sampdens + hlim;
267 >        hsize = hlim(0) + sampdens - 1;
268          if (hsize > (int)(PI*sampdens))
269                  hsize = PI*sampdens;
270          indirect = (struct illum *)calloc(nglardirs, sizeof(struct illum));
271          if (indirect == NULL)
272                  memerr("indirect illuminances");
273 +        npixinvw = npixmiss = 0L;
274          copystruct(&leftview, &ourview);
275          copystruct(&rightview, &ourview);
276          spinvector(leftview.vdir, ourview.vdir, ourview.vup, maxtheta);
# Line 225 | Line 279 | init()                         /* initialize global variables */
279          setview(&rightview);
280          indirect[nglarangs].lcos =
281          indirect[nglarangs].rcos = cos(maxtheta);
282 <        indirect[nglarangs].lsin =
283 <        -(indirect[nglarangs].rsin = sin(maxtheta));
282 >        indirect[nglarangs].rsin =
283 >        -(indirect[nglarangs].lsin = sin(maxtheta));
284          indirect[nglarangs].theta = 0.0;
285          for (i = 0; i < nglarangs; i++) {
286                  d = (glarang[nglarangs-1] - glarang[i])*(PI/180.);
287                  indirect[nglarangs-i-1].lcos =
288                  indirect[nglarangs+i+1].rcos = cos(d);
289 <                indirect[nglarangs-i-1].lsin =
290 <                -(indirect[nglarangs+i+1].rsin = sin(d));
289 >                indirect[nglarangs+i+1].rsin =
290 >                -(indirect[nglarangs-i-1].lsin = sin(d));
291                  d = (glarang[nglarangs-1] + glarang[i])*(PI/180.);
292                  indirect[nglarangs-i-1].rcos =
293                  indirect[nglarangs+i+1].lcos = cos(d);
294 <                indirect[nglarangs+i+1].lsin =
295 <                -(indirect[nglarangs-i-1].rsin = sin(d));
296 <                indirect[nglarangs-i-1].theta = -(PI/180.)*glarang[i];
297 <                indirect[nglarangs+i+1].theta = (PI/180.)*glarang[i];
294 >                indirect[nglarangs-i-1].rsin =
295 >                -(indirect[nglarangs+i+1].lsin = sin(d));
296 >                indirect[nglarangs-i-1].theta = (PI/180.)*glarang[i];
297 >                indirect[nglarangs+i+1].theta = -(PI/180.)*glarang[i];
298          }
299                                                  /* open picture */
300          if (picture != NULL) {
# Line 265 | Line 319 | init()                         /* initialize global variables */
319   cleanup()                               /* close files, wait for children */
320   {
321          if (verbose)
322 <                fprintf(stderr, "%s: cleaning up...\n", progname);
322 >                fprintf(stderr, "%s: cleaning up...        \n", progname);
323          if (picture != NULL)
324                  close_pict();
325          if (octree != NULL)
326                  done_rtrace();
327 +        if (npixinvw < 100*npixmiss)
328 +                fprintf(stderr, "%s: warning -- missing %d%% of samples\n",
329 +                                progname, (int)(100L*npixmiss/npixinvw));
330   }
331  
332  
# Line 277 | Line 334 | compdir(vd, x, y)                      /* compute direction for x,y */
334   FVECT   vd;
335   int     x, y;
336   {
337 +        int     hl;
338          FVECT   org;                    /* dummy variable */
339  
340 <        if (x <= -hlim)                 /* left region */
340 >        hl = hlim(y);
341 >        if (x <= -hl) {                 /* left region */
342 >                if (x <= -hl-sampdens)
343 >                        return(-1);
344                  return(viewray(org, vd, &leftview,
345 <                                (x+hlim)/(2.*sampdens)+.5,
346 <                                y/(2.*sampdens)+.5));
347 <        if (x >= hlim)                  /* right region */
345 >                                (double)(x+hl)/(2*sampdens)+.5,
346 >                                (double)y/(2*sampdens)+.5));
347 >        }
348 >        if (x >= hl) {                  /* right region */
349 >                if (x >= hl+sampdens)
350 >                        return(-1);
351                  return(viewray(org, vd, &rightview,
352 <                                (x-hlim)/(2.*sampdens)+.5,
353 <                                y/(2.*sampdens)+.5));
354 <                                                /* central region */
355 <        if (viewray(org, vd, &ourview, .5, y/(2.*sampdens)+.5) < 0)
352 >                                (double)(x-hl)/(2*sampdens)+.5,
353 >                                (double)y/(2*sampdens)+.5));
354 >        }
355 >                                        /* central region */
356 >        if (viewray(org, vd, &ourview, .5, (double)y/(2*sampdens)+.5) < 0)
357                  return(-1);
358 <        spinvector(vd, vd, ourview.vup, h_theta(x));
358 >        spinvector(vd, vd, ourview.vup, h_theta(x,y));
359          return(0);
360   }
361  
362  
363 < spinvector(vres, vorig, vnorm, theta)   /* rotate vector around normal */
364 < FVECT  vres, vorig, vnorm;
365 < double  theta;
363 > double
364 > pixsize(x, y)           /* return the solid angle of pixel at (x,y) */
365 > int     x, y;
366   {
367 <        extern double  sin(), cos();
368 <        double  sint, cost, dotp;
369 <        FVECT  vperp;
370 <        register int  i;
371 <        
372 <        sint = sin(theta);
373 <        cost = cos(theta);
374 <        dotp = DOT(vorig, vnorm);
375 <        fcross(vperp, vnorm, vorig);
376 <        for (i = 0; i < 3; i++)
377 <                vres[i] = vnorm[i]*dotp*(1.-cost) +
378 <                                vorig[i]*cost + vperp[i]*sint;
367 >        register int    hl, xo;
368 >        double  disc;
369 >
370 >        hl = hlim(y);
371 >        if (x < -hl)
372 >                xo = x+hl;
373 >        else if (x > hl)
374 >                xo = x-hl;
375 >        else
376 >                xo = 0;
377 >        disc = 1. - (double)((long)xo*xo + (long)y*y)/((long)sampdens*sampdens);
378 >        if (disc <= FTINY*FTINY)
379 >                return(0.);
380 >        return(1./(sampdens*sampdens*sqrt(disc)));
381   }
382  
383  
384   memerr(s)                       /* malloc failure */
385   char    *s;
386   {
387 <        fprintf(stderr, "%s: out of memory for %s\n", s);
387 >        fprintf(stderr, "%s: out of memory for %s\n", progname, s);
388          exit(1);
389   }
390  
# Line 341 | Line 408 | printillum()                   /* print out indirect illuminances */
408  
409          printf("BEGIN indirect illuminance\n");
410          for (i = 0; i < nglardirs; i++)
411 <                printf("\t%.0f\t%f\n", (180.0/PI)*indirect[i].theta,
412 <                                PI * indirect[i].sum / (double)indirect[i].n);
411 >                if (indirect[i].n > FTINY)
412 >                        printf("\t%.0f\t%f\n", (180.0/PI)*indirect[i].theta,
413 >                                        PI * indirect[i].sum / indirect[i].n);
414          printf("END indirect illuminance\n");
415   }

Diff Legend

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