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.1 by greg, Mon Mar 18 12:15:38 1991 UTC vs.
Revision 2.2 by greg, Tue May 12 09:36:14 1992 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"};
19 > char    *rtargv[32] = {"rtrace", "-h-", "-ov", "-fff"};
20   int     rtargc = 4;
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 */
35 – 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 55 | Line 62 | char   *argv[];
62                          continue;
63                  }
64                  switch (argv[i][1]) {
65 +                case 't':
66 +                        threshold = atof(argv[++i]);
67 +                        break;
68 +                case 'r':
69 +                        sampdens = atoi(argv[++i])/2;
70 +                        break;
71                  case 'v':
72                          if (argv[i][2] == '\0') {
73                                  verbose++;
# Line 88 | Line 101 | char   *argv[];
101                  case 'p':
102                          picture = argv[++i];
103                          break;
104 +                case 'c':
105 +                        combine = !combine;
106 +                        break;
107                  case 'd':
108                  case 'l':
109 +                case 's':
110                          rtargv[rtargc++] = argv[i];
111                          rtargv[rtargc++] = argv[++i];
112                          break;
# Line 163 | Line 180 | char   *argv[];
180                  exit(1);
181          }
182          init();                                 /* initialize program */
183 <        comp_thresh();                          /* compute glare threshold */
183 >        if (threshold <= FTINY)
184 >                comp_thresh();                  /* compute glare threshold */
185          analyze();                              /* analyze view */
186 +        if (combine)
187 +                absorb_specks();                /* eliminate tiny sources */
188          cleanup();                              /* tidy up */
189                                                  /* print header */
190          printargs(argc, argv, stdout);
191          fputs(VIEWSTR, stdout);
192          fprintview(&ourview, stdout);
193 <        printf("\n\n");
193 >        printf("\n");
194 >        fputformat("ascii", stdout);
195 >        printf("\n");
196          printsources();                         /* print glare sources */
197          printillum();                           /* print illuminances */
198          exit(0);
# Line 182 | Line 204 | userr:
204   }
205  
206  
207 + int
208 + angcmp(ap1, ap2)                /* compare two angles */
209 + ANGLE   *ap1, *ap2;
210 + {
211 +        register int    a1, a2;
212 +
213 +        a1 = *ap1;
214 +        a2 = *ap2;
215 +        if (a1 == a2) {
216 +                fprintf(stderr, "%s: duplicate glare angle (%d)\n",
217 +                                progname, a1);
218 +                exit(1);
219 +        }
220 +        return(a1-a2);
221 + }
222 +
223 +
224   init()                          /* initialize global variables */
225   {
226          double  d;
# Line 193 | Line 232 | init()                         /* initialize global variables */
232                                                  /* set direction vectors */
233          for (i = 0; glarang[i] != AEND; i++)
234                  ;
235 <        if (glarang[0] <= 0 || glarang[i-1] >= 180) {
236 <                fprintf(stderr, "%s: glare angles must be between 1 and 179\n",
235 >        qsort(glarang, i, sizeof(ANGLE), angcmp);
236 >        if (i > 0 && (glarang[0] <= 0 || glarang[i-1] > 180)) {
237 >                fprintf(stderr, "%s: glare angles must be between 1 and 180\n",
238                                  progname);
239                  exit(1);
240          }
241          nglarangs = i;
242          /* nglardirs = 2*nglarangs + 1; */
243 <        /* maxtheta = (PI/180.)*glarang[nglarangs-1]; */
244 <        /* vsize = SAMPDENS; */
245 <        hlim = SAMPDENS*maxtheta;
246 <        hsize = SAMPDENS + hlim;
247 <        if (hsize > (int)(PI*SAMPDENS))
248 <                hsize = PI*SAMPDENS;
243 >        /* vsize = sampdens - 1; */
244 >        if (nglarangs > 0)
245 >                maxtheta = (PI/180.)*glarang[nglarangs-1];
246 >        else
247 >                maxtheta = 0.0;
248 >        hsize = hlim(0) + sampdens - 1;
249 >        if (hsize > (int)(PI*sampdens))
250 >                hsize = PI*sampdens;
251          indirect = (struct illum *)calloc(nglardirs, sizeof(struct illum));
252          if (indirect == NULL)
253                  memerr("indirect illuminances");
254 +        npixinvw = npixmiss = 0L;
255          copystruct(&leftview, &ourview);
256          copystruct(&rightview, &ourview);
257 <        spinvector(leftview.vdir, ourview.vdir, ourview.vup, -maxtheta);
258 <        spinvector(rightview.vdir, ourview.vdir, ourview.vup, maxtheta);
257 >        spinvector(leftview.vdir, ourview.vdir, ourview.vup, maxtheta);
258 >        spinvector(rightview.vdir, ourview.vdir, ourview.vup, -maxtheta);
259          setview(&leftview);
260          setview(&rightview);
261          indirect[nglarangs].lcos =
262          indirect[nglarangs].rcos = cos(maxtheta);
263 <        indirect[nglarangs].lsin =
264 <        -(indirect[nglarangs].rsin = sin(maxtheta));
263 >        indirect[nglarangs].rsin =
264 >        -(indirect[nglarangs].lsin = sin(maxtheta));
265          indirect[nglarangs].theta = 0.0;
266          for (i = 0; i < nglarangs; i++) {
267                  d = (glarang[nglarangs-1] - glarang[i])*(PI/180.);
268                  indirect[nglarangs-i-1].lcos =
269                  indirect[nglarangs+i+1].rcos = cos(d);
270 <                indirect[nglarangs-i-1].lsin =
271 <                -(indirect[nglarangs+i+1].rsin = sin(d));
270 >                indirect[nglarangs+i+1].rsin =
271 >                -(indirect[nglarangs-i-1].lsin = sin(d));
272                  d = (glarang[nglarangs-1] + glarang[i])*(PI/180.);
273                  indirect[nglarangs-i-1].rcos =
274                  indirect[nglarangs+i+1].lcos = cos(d);
275 <                indirect[nglarangs+i+1].lsin =
276 <                -(indirect[nglarangs-i-1].rsin = sin(d));
277 <                indirect[nglarangs-i-1].theta = -(PI/180.)*glarang[i];
278 <                indirect[nglarangs+i+1].theta = (PI/180.)*glarang[i];
275 >                indirect[nglarangs-i-1].rsin =
276 >                -(indirect[nglarangs+i+1].lsin = sin(d));
277 >                indirect[nglarangs-i-1].theta = (PI/180.)*glarang[i];
278 >                indirect[nglarangs+i+1].theta = -(PI/180.)*glarang[i];
279          }
280                                                  /* open picture */
281          if (picture != NULL) {
# Line 257 | Line 300 | init()                         /* initialize global variables */
300   cleanup()                               /* close files, wait for children */
301   {
302          if (verbose)
303 <                fprintf(stderr, "%s: cleaning up...\n", progname);
303 >                fprintf(stderr, "%s: cleaning up...        \n", progname);
304          if (picture != NULL)
305                  close_pict();
306          if (octree != NULL)
307                  done_rtrace();
308 +        if (npixinvw < 100*npixmiss)
309 +                fprintf(stderr, "%s: warning -- missing %ld%% of samples\n",
310 +                                progname, 100L*npixmiss/npixinvw);
311   }
312  
313  
# Line 269 | Line 315 | compdir(vd, x, y)                      /* compute direction for x,y */
315   FVECT   vd;
316   int     x, y;
317   {
318 +        int     hl;
319          FVECT   org;                    /* dummy variable */
320  
321 <        if (x <= -hlim)                 /* left region */
321 >        hl = hlim(y);
322 >        if (x <= -hl) {                 /* left region */
323 >                if (x <= -hl-sampdens)
324 >                        return(-1);
325                  return(viewray(org, vd, &leftview,
326 <                                (x+hlim)/(2.*SAMPDENS)+.5,
327 <                                y/(2.*SAMPDENS)+.5));
328 <        if (x >= hlim)                  /* right region */
326 >                                (double)(x+hl)/(2*sampdens)+.5,
327 >                                (double)y/(2*sampdens)+.5));
328 >        }
329 >        if (x >= hl) {                  /* right region */
330 >                if (x >= hl+sampdens)
331 >                        return(-1);
332                  return(viewray(org, vd, &rightview,
333 <                                (x-hlim)/(2.*SAMPDENS)+.5,
334 <                                y/(2.*SAMPDENS)+.5));
335 <                                                /* central region */
336 <        if (viewray(org, vd, &ourview, .5, y/(2.*SAMPDENS)+.5) < 0)
333 >                                (double)(x-hl)/(2*sampdens)+.5,
334 >                                (double)y/(2*sampdens)+.5));
335 >        }
336 >                                        /* central region */
337 >        if (viewray(org, vd, &ourview, .5, (double)y/(2*sampdens)+.5) < 0)
338                  return(-1);
339 <        spinvector(vd, vd, ourview.vup, h_theta(x));
339 >        spinvector(vd, vd, ourview.vup, h_theta(x,y));
340          return(0);
341   }
342  
343  
344 < spinvector(vres, vorig, vnorm, theta)   /* rotate vector around normal */
345 < FVECT  vres, vorig, vnorm;
346 < double  theta;
344 > double
345 > pixsize(x, y)           /* return the solid angle of pixel at (x,y) */
346 > int     x, y;
347   {
348 <        extern double  sin(), cos();
349 <        double  sint, cost, dotp;
350 <        FVECT  vperp;
351 <        register int  i;
352 <        
353 <        sint = sin(theta);
354 <        cost = cos(theta);
355 <        dotp = DOT(vorig, vnorm);
356 <        fcross(vperp, vnorm, vorig);
357 <        for (i = 0; i < 3; i++)
358 <                vres[i] = vnorm[i]*dotp*(1.-cost) +
359 <                                vorig[i]*cost + vperp[i]*sint;
348 >        register int    hl, xo;
349 >        double  disc;
350 >
351 >        hl = hlim(y);
352 >        if (x < -hl)
353 >                xo = x+hl;
354 >        else if (x > hl)
355 >                xo = x-hl;
356 >        else
357 >                xo = 0;
358 >        disc = 1. - (double)(xo*xo + y*y)/(sampdens*sampdens);
359 >        if (disc <= FTINY)
360 >                return(0.);
361 >        return(1./(sampdens*sampdens*sqrt(disc)));
362   }
363  
364  
365   memerr(s)                       /* malloc failure */
366   char    *s;
367   {
368 <        fprintf(stderr, "%s: out of memory for %s\n", s);
368 >        fprintf(stderr, "%s: out of memory for %s\n", progname, s);
369          exit(1);
370   }
371  
# Line 333 | Line 389 | printillum()                   /* print out indirect illuminances */
389  
390          printf("BEGIN indirect illuminance\n");
391          for (i = 0; i < nglardirs; i++)
392 <                printf("\t%f\t%f\n", (180.0/PI)*indirect[i].theta,
393 <                                PI * indirect[i].sum / (double)indirect[i].n);
394 <        printf("END indirect illuminances\n");
392 >                if (indirect[i].n > FTINY)
393 >                        printf("\t%.0f\t%f\n", (180.0/PI)*indirect[i].theta,
394 >                                        PI * indirect[i].sum / indirect[i].n);
395 >        printf("END indirect illuminance\n");
396   }

Diff Legend

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