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

Comparing ray/src/common/bsdf.c (file contents):
Revision 2.23 by greg, Wed Apr 20 14:44:05 2011 UTC vs.
Revision 2.34 by greg, Thu Jul 7 15:25:09 2011 UTC

# Line 10 | Line 10 | static const char RCSid[] = "$Id$";
10   *
11   */
12  
13 + #define _USE_MATH_DEFINES
14   #include <stdio.h>
15   #include <stdlib.h>
16 + #include <string.h>
17   #include <math.h>
18 + #include <ctype.h>
19   #include "ezxml.h"
20   #include "hilbert.h"
21   #include "bsdf.h"
# Line 106 | Line 109 | SDloadGeometry(SDData *sd, ezxml_t wdb)
109          if ((geom = ezxml_child(wdb, "Geometry")) == NULL ||
110                          (mgfstr = ezxml_txt(geom)) == NULL)
111                  return SDEnone;
112 +        while (isspace(*mgfstr))
113 +                ++mgfstr;
114 +        if (!*mgfstr)
115 +                return SDEnone;
116          if ((fmt = ezxml_attr(geom, "format")) != NULL &&
117                          strcasecmp(fmt, "MGF")) {
118                  sprintf(SDerrorDetail,
# Line 169 | Line 176 | SDloadFile(SDData *sd, const char *fname)
176                                  /* try loading variable resolution data */
177          lastErr = SDloadTre(sd, wtl);
178                                  /* check our result */
179 <        switch (lastErr) {
173 <        case SDEformat:
174 <        case SDEdata:
175 <        case SDEsupport:        /* possibly we just tried the wrong format */
179 >        if (lastErr == SDEsupport)      /* try matrix BSDF if not tree data */
180                  lastErr = SDloadMtx(sd, wtl);
181 <                break;
178 <        default:                /* variable res. OK else serious error */
179 <                break;
180 <        }
181 >                
182                                  /* done with XML file */
183          ezxml_free(fl);
184          
# Line 249 | Line 250 | SDfreeSpectralDF(SDSpectralDF *df)
250                  return;
251          SDfreeCumulativeCache(df);
252          for (n = df->ncomp; n-- > 0; )
253 <                (*df->comp[n].func->freeSC)(df->comp[n].dist);
253 >                if (df->comp[n].dist != NULL)
254 >                        (*df->comp[n].func->freeSC)(df->comp[n].dist);
255          free(df);
256   }
257  
# Line 405 | Line 407 | SDfreeCache(const SDData *sd)
407  
408   /* Sample an individual BSDF component */
409   SDError
410 < SDsampComponent(SDValue *sv, FVECT outVec, const FVECT inVec,
409 <                        double randX, SDComponent *sdc)
410 > SDsampComponent(SDValue *sv, FVECT ioVec, double randX, SDComponent *sdc)
411   {
412          float           coef[SDmaxCh];
413          SDError         ec;
414 +        FVECT           inVec;
415          const SDCDst    *cd;
416          double          d;
417          int             n;
418                                          /* check arguments */
419 <        if ((sv == NULL) | (outVec == NULL) | (inVec == NULL) | (sdc == NULL))
419 >        if ((sv == NULL) | (ioVec == NULL) | (sdc == NULL))
420                  return SDEargument;
421                                          /* get cumulative distribution */
422 +        VCOPY(inVec, ioVec);
423          cd = (*sdc->func->getCDist)(inVec, sdc);
424          if (cd == NULL)
425                  return SDEmemory;
426          if (cd->cTotal <= 1e-7) {       /* anything to sample? */
427                  sv->spec = c_dfcolor;
428                  sv->cieY = .0;
429 <                memset(outVec, 0, 3*sizeof(double));
429 >                memset(ioVec, 0, 3*sizeof(double));
430                  return SDEnone;
431          }
432          sv->cieY = cd->cTotal;
433                                          /* compute sample direction */
434 <        ec = (*sdc->func->sampCDist)(outVec, randX, cd);
434 >        ec = (*sdc->func->sampCDist)(ioVec, randX, cd);
435          if (ec)
436                  return ec;
437                                          /* get BSDF color */
438 <        n = (*sdc->func->getBSDFs)(coef, outVec, inVec, sdc->dist);
438 >        n = (*sdc->func->getBSDFs)(coef, ioVec, inVec, sdc);
439          if (n <= 0) {
440                  strcpy(SDerrorDetail, "BSDF sample value error");
441                  return SDEinternal;
# Line 495 | Line 498 | SDsizeBSDF(double *projSA, const FVECT v1, const RREAL
498          SDError         ec;
499          int             i;
500                                          /* check arguments */
501 <        if ((projSA == NULL) | (v1 == NULL))
501 >        if ((projSA == NULL) | (v1 == NULL) | (sd == NULL))
502                  return SDEargument;
503                                          /* initialize extrema */
504          switch (qflags) {
# Line 515 | Line 518 | SDsizeBSDF(double *projSA, const FVECT v1, const RREAL
518                  rdf = sd->rf;
519          else
520                  rdf = sd->rb;
521 <        tdf = NULL;                     /* transmitted component? */
522 <        if (v2 != NULL && v1[2] > 0 ^ v2[2] > 0) {
523 <                rdf = NULL;
524 <                tdf = sd->tf;
525 <        }
521 >        tdf = sd->tf;
522 >        if (v2 != NULL)                 /* bidirectional? */
523 >                if (v1[2] > 0 ^ v2[2] > 0)
524 >                        rdf = NULL;
525 >                else
526 >                        tdf = NULL;
527          ec = SDEdata;                   /* run through components */
528          for (i = (rdf==NULL) ? 0 : rdf->ncomp; i--; ) {
529                  ec = (*rdf->comp[i].func->queryProjSA)(projSA, v1, v2,
530 <                                                qflags, rdf->comp[i].dist);
530 >                                                qflags, &rdf->comp[i]);
531                  if (ec)
532                          return ec;
533          }
534          for (i = (tdf==NULL) ? 0 : tdf->ncomp; i--; ) {
535                  ec = (*tdf->comp[i].func->queryProjSA)(projSA, v1, v2,
536 <                                                qflags, tdf->comp[i].dist);
536 >                                                qflags, &tdf->comp[i]);
537                  if (ec)
538                          return ec;
539          }
# Line 571 | Line 575 | SDevalBSDF(SDValue *sv, const FVECT outVec, const FVEC
575          i = (sdf != NULL) ? sdf->ncomp : 0;
576          while (i-- > 0) {
577                  nch = (*sdf->comp[i].func->getBSDFs)(coef, outVec, inVec,
578 <                                                        sdf->comp[i].dist);
578 >                                                        &sdf->comp[i]);
579                  while (nch-- > 0) {
580                          c_cmix(&sv->spec, sv->cieY, &sv->spec,
581                                          coef[nch], &sdf->comp[i].cspec[nch]);
# Line 626 | Line 630 | SDdirectHemi(const FVECT inVec, int sflags, const SDDa
630  
631   /* Sample BSDF direction based on the given random variable */
632   SDError
633 < SDsampBSDF(SDValue *sv, FVECT outVec, const FVECT inVec,
630 <                        double randX, int sflags, const SDData *sd)
633 > SDsampBSDF(SDValue *sv, FVECT ioVec, double randX, int sflags, const SDData *sd)
634   {
635          SDError         ec;
636 +        FVECT           inVec;
637          int             inFront;
638          SDSpectralDF    *rdf;
639          double          rdiff;
# Line 638 | Line 642 | SDsampBSDF(SDValue *sv, FVECT outVec, const FVECT inVe
642          SDComponent     *sdc;
643          const SDCDst    **cdarr = NULL;
644                                          /* check arguments */
645 <        if ((sv == NULL) | (outVec == NULL) | (inVec == NULL) | (sd == NULL) |
645 >        if ((sv == NULL) | (ioVec == NULL) | (sd == NULL) |
646                          (randX < 0) | (randX >= 1.))
647                  return SDEargument;
648                                          /* whose side are we on? */
649 +        VCOPY(inVec, ioVec);
650          inFront = (inVec[2] > 0);
651                                          /* remember diffuse portions */
652          if (inFront) {
# Line 682 | Line 687 | SDsampBSDF(SDValue *sv, FVECT outVec, const FVECT inVe
687          }
688          if (sv->cieY <= 1e-7) {         /* anything to sample? */
689                  sv->cieY = .0;
690 <                memset(outVec, 0, 3*sizeof(double));
690 >                memset(ioVec, 0, 3*sizeof(double));
691                  return SDEnone;
692          }
693                                          /* scale random variable */
694          randX *= sv->cieY;
695                                          /* diffuse reflection? */
696          if (randX < rdiff) {
697 <                SDdiffuseSamp(outVec, inFront, randX/rdiff);
697 >                SDdiffuseSamp(ioVec, inFront, randX/rdiff);
698                  goto done;
699          }
700          randX -= rdiff;
# Line 697 | Line 702 | SDsampBSDF(SDValue *sv, FVECT outVec, const FVECT inVe
702          if ((sflags & SDsampDf+SDsampT) == SDsampDf+SDsampT) {
703                  if (randX < sd->tLamb.cieY) {
704                          sv->spec = sd->tLamb.spec;
705 <                        SDdiffuseSamp(outVec, !inFront, randX/sd->tLamb.cieY);
705 >                        SDdiffuseSamp(ioVec, !inFront, randX/sd->tLamb.cieY);
706                          goto done;
707                  }
708                  randX -= sd->tLamb.cieY;
# Line 709 | Line 714 | SDsampBSDF(SDValue *sv, FVECT outVec, const FVECT inVe
714                  return SDEinternal;
715                                          /* compute sample direction */
716          sdc = (i < nr) ? &rdf->comp[i] : &sd->tf->comp[i-nr];
717 <        ec = (*sdc->func->sampCDist)(outVec, randX/cdarr[i]->cTotal, cdarr[i]);
717 >        ec = (*sdc->func->sampCDist)(ioVec, randX/cdarr[i]->cTotal, cdarr[i]);
718          if (ec)
719                  return ec;
720                                          /* compute color */
721 <        j = (*sdc->func->getBSDFs)(coef, outVec, inVec, sdc->dist);
721 >        j = (*sdc->func->getBSDFs)(coef, ioVec, inVec, sdc);
722          if (j <= 0) {
723                  sprintf(SDerrorDetail, "BSDF \"%s\" sampling value error",
724                                  sd->name);
# Line 810 | Line 815 | SDmapDir(FVECT resVec, RREAL vMtx[3][3], const FVECT i
815  
816   #include "standard.h"
817   #include "paths.h"
813 – #include <ctype.h>
818  
819   #define MAXLATS         46              /* maximum number of latitudes */
820  
# Line 930 | Line 934 | ab_getndx(             /* get index corresponding to the given ve
934   {
935          ANGLE_BASIS  *ab = (ANGLE_BASIS *)p;
936          int     li, ndx;
937 <        double  pol, azi, d;
937 >        double  pol, azi;
938  
939          if ((v[2] < -1.0) | (v[2] > 1.0))
940                  return(-1);
# Line 1170 | Line 1174 | check_bsdf_data(       /* check that BSDF data is sane */
1174   )
1175   {
1176          double          *omega_iarr, *omega_oarr;
1177 <        double          dom, contrib, hemi_total, full_total;
1177 >        double          dom, hemi_total, full_total;
1178          int             nneg;
1179          FVECT           v;
1180          int             i, o;
# Line 1320 | Line 1324 | load_BSDF(             /* load BSDF data from file */
1324                  error(WARNING, errmsg);
1325                  ezxml_free(fl);
1326                  return(NULL);
1327 <        }              
1328 <        load_angle_basis(ezxml_child(ezxml_child(wtl,
1329 <                                "DataDefinition"), "AngleBasis"));
1327 >        }
1328 >        for (wld = ezxml_child(ezxml_child(wtl,
1329 >                                "DataDefinition"), "AngleBasis");
1330 >                        wld != NULL; wld = wld->next)
1331 >                load_angle_basis(wld);
1332          dp = (struct BSDF_data *)calloc(1, sizeof(struct BSDF_data));
1333          load_geometry(dp, ezxml_child(wtl, "Material"));
1334          for (wld = ezxml_child(wtl, "WavelengthData");

Diff Legend

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