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

Comparing ray/src/cv/bsdfrep.c (file contents):
Revision 2.13 by greg, Sun Mar 24 17:22:23 2013 UTC vs.
Revision 2.19 by greg, Sat Nov 9 05:47:49 2013 UTC

# Line 14 | Line 14 | static const char RCSid[] = "$Id$";
14   #include "rtio.h"
15   #include "resolu.h"
16   #include "bsdfrep.h"
17 +                                /* name and manufacturer if known */
18 + char                    bsdf_name[256];
19 + char                    bsdf_manuf[256];
20                                  /* active grid resolution */
21   int                     grid_res = GRIDRES;
22  
# Line 27 | Line 30 | int                    input_orient = 0;
30   int                     output_orient = 0;
31  
32                                  /* BSDF histogram */
33 < int                     bsdf_hist[HISTLEN];
33 > unsigned long           bsdf_hist[HISTLEN];
34  
35                                  /* BSDF value for boundary regions */
36   double                  bsdf_min = 0;
# Line 205 | Line 208 | rotate_rbf(RBFNODE *rbf, const FVECT invec)
208          VCOPY(rbf->invec, invec);
209   }
210  
208 – /* Compute volume associated with Gaussian lobe */
209 – double
210 – rbf_volume(const RBFVAL *rbfp)
211 – {
212 –        double  rad = R2ANG(rbfp->crad);
213 –
214 –        return((2.*M_PI) * rbfp->peak * rad*rad);
215 – }
216 –
211   /* Compute outgoing vector from grid position */
212   void
213   ovec_from_pos(FVECT vec, int xpos, int ypos)
# Line 243 | Line 237 | pos_from_vec(int pos[2], const FVECT vec)
237          pos[1] = (int)(sq[1]*grid_res);
238   }
239  
240 + /* Compute volume associated with Gaussian lobe */
241 + double
242 + rbf_volume(const RBFVAL *rbfp)
243 + {
244 +        double  rad = R2ANG(rbfp->crad);
245 +        FVECT   odir;
246 +        double  elev, integ;
247 +                                /* infinite integral approximation */
248 +        integ = (2.*M_PI) * rbfp->peak * rad*rad;
249 +                                /* check if we're near horizon */
250 +        ovec_from_pos(odir, rbfp->gx, rbfp->gy);
251 +        elev = output_orient*odir[2];
252 +                                /* apply cut-off correction if > 1% */
253 +        if (elev < 2.8*rad) {
254 +                /* elev = asin(elev);   /* this is so crude, anyway... */
255 +                integ *= 1. - .5*exp(-.5*elev*elev/(rad*rad));
256 +        }
257 +        return(integ);
258 + }
259 +
260   /* Evaluate RBF for DSF at the given normalized outgoing direction */
261   double
262   eval_rbfrep(const RBFNODE *rp, const FVECT outvec)
263   {
264 +        const double    rfact2 = (38./M_PI/M_PI)*(grid_res*grid_res);
265          double          minval = bsdf_min*output_orient*outvec[2];
266 +        int             pos[2];
267          double          res = 0;
268          const RBFVAL    *rbfp;
269          FVECT           odir;
270 <        double          sig2;
270 >        double          rad2;
271          int             n;
272 +                                /* check for wrong side */
273 +        if (outvec[2] > 0 ^ output_orient > 0)
274 +                return(.0);
275                                  /* use minimum if no information avail. */
276 <        if (rp == NULL) {
258 <                if (outvec[2] > 0 ^ output_orient > 0)
259 <                        return(.0);
276 >        if (rp == NULL)
277                  return(minval);
278 <        }
278 >                                /* optimization for fast lobe culling */
279 >        pos_from_vec(pos, outvec);
280 >                                /* sum radial basis function */
281          rbfp = rp->rbfa;
282          for (n = rp->nrbf; n--; rbfp++) {
283 +                int     d2 = (pos[0]-rbfp->gx)*(pos[0]-rbfp->gx) +
284 +                                (pos[1]-rbfp->gy)*(pos[1]-rbfp->gy);
285 +                rad2 = R2ANG(rbfp->crad);
286 +                rad2 *= rad2;
287 +                if (d2 > rad2*rfact2)
288 +                        continue;
289                  ovec_from_pos(odir, rbfp->gx, rbfp->gy);
290 <                sig2 = R2ANG(rbfp->crad);
266 <                sig2 = (DOT(odir,outvec) - 1.) / (sig2*sig2);
267 <                if (sig2 > -19.)
268 <                        res += rbfp->peak * exp(sig2);
290 >                res += rbfp->peak * exp((DOT(odir,outvec) - 1.) / rad2);
291          }
292          if (res < minval)       /* never return less than minval */
293                  return(minval);
# Line 385 | Line 407 | clear_bsdf_rep(void)
407                  dsf_list = rbf->next;
408                  free(rbf);
409          }
410 +        bsdf_name[0] = '\0';
411 +        bsdf_manuf[0] = '\0';
412          inp_coverage = 0;
413          single_plane_incident = -1;
414          input_orient = output_orient = 0;
# Line 399 | Line 423 | save_bsdf_rep(FILE *ofp)
423          MIGRATION       *mig;
424          int             i, n;
425                                          /* finish header */
426 +        if (bsdf_name[0])
427 +                fprintf(ofp, "NAME=%s\n", bsdf_name);
428 +        if (bsdf_manuf[0])
429 +                fprintf(ofp, "MANUFACT=%s\n", bsdf_manuf);
430          fprintf(ofp, "SYMMETRY=%d\n", !single_plane_incident * inp_coverage);
431          fprintf(ofp, "IO_SIDES= %d %d\n", input_orient, output_orient);
432          fprintf(ofp, "GRIDRES=%d\n", grid_res);
# Line 455 | Line 483 | headline(char *s, void *p)
483   {
484          char    fmt[32];
485  
486 +        if (!strncmp(s, "NAME=", 5)) {
487 +                strcpy(bsdf_name, s+5);
488 +                bsdf_name[strlen(bsdf_name)-1] = '\0';
489 +        }
490 +        if (!strncmp(s, "MANUFACT=", 9)) {
491 +                strcpy(bsdf_manuf, s+9);
492 +                bsdf_manuf[strlen(bsdf_manuf)-1] = '\0';
493 +        }
494          if (!strncmp(s, "SYMMETRY=", 9)) {
495                  inp_coverage = atoi(s+9);
496                  single_plane_incident = !inp_coverage;
# Line 494 | Line 530 | load_bsdf_rep(FILE *ifp)
530                                  progname);
531                  return(0);
532          }
533 <        rbfh.next = NULL;               /* read each DSF */
498 <        rbfh.ejl = NULL;
533 >        memset(&rbfh, 0, sizeof(rbfh)); /* read each DSF */
534          while ((rbfh.ord = getint(4, ifp)) >= 0) {
535                  RBFNODE         *newrbf;
536  
# Line 512 | Line 547 | load_bsdf_rep(FILE *ifp)
547                                          sizeof(RBFVAL)*(rbfh.nrbf-1));
548                  if (newrbf == NULL)
549                          goto memerr;
550 <                memcpy(newrbf, &rbfh, sizeof(RBFNODE)-sizeof(RBFVAL));
550 >                *newrbf = rbfh;
551                  for (i = 0; i < rbfh.nrbf; i++) {
552                          newrbf->rbfa[i].peak = getflt(ifp);
553                          newrbf->rbfa[i].crad = getint(2, ifp) & 0xffff;

Diff Legend

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