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

Comparing ray/src/cv/bsdf2klems.c (file contents):
Revision 2.7 by greg, Thu Aug 1 16:10:13 2013 UTC vs.
Revision 2.11 by greg, Sat Nov 9 05:47:49 2013 UTC

# Line 25 | Line 25 | char                   *progname;
25   static const char       *kbasis = "LBNL/Klems Full";
26                                  /* number of BSDF samples per patch */
27   static int              npsamps = 256;
28 +                                /* limit on number of RBF lobes */
29 + static int              lobe_lim = 15000;
30  
31   /* Return angle basis corresponding to the given name */
32   ANGLE_BASIS *
# Line 56 | Line 58 | xml_header(int ac, char *av[])
58   static void
59   xml_prologue(const SDData *sd)
60   {
61 <        const char      *matn = (sd && sd->matn[0]) ? sd->matn : "Name";
62 <        const char      *makr = (sd && sd->makr[0]) ? sd->makr : "Manufacturer";
61 >        const char      *matn = (sd && sd->matn[0]) ? sd->matn :
62 >                                bsdf_name[0] ? bsdf_name : "Unknown";
63 >        const char      *makr = (sd && sd->makr[0]) ? sd->makr :
64 >                                bsdf_manuf[0] ? bsdf_manuf : "Unknown";
65          ANGLE_BASIS     *abp = get_basis(kbasis);
66          int             i;
67  
# Line 154 | Line 158 | static void
158   eval_bsdf(const char *fname)
159   {
160          ANGLE_BASIS     *abp = get_basis(kbasis);
157        float           *trans_mtx = NULL;
161          SDData          bsd;
162          SDError         ec;
163          FVECT           vin, vout;
# Line 210 | Line 213 | eval_bsdf(const char *fname)
213          }
214                                                  /* front transmission */
215          if (bsd.tf != NULL || bsd.tLamb.cieY > .002) {
213            if (bsd.tb == NULL)
214                trans_mtx = (float *)malloc(sizeof(float) *
215                                                abp->nangles*abp->nangles);
216              input_orient = 1; output_orient = -1;
217              data_prologue();
218              for (j = 0; j < abp->nangles; j++) {
# Line 227 | Line 227 | eval_bsdf(const char *fname)
227                          sum += sv.cieY;
228                      }
229                      printf("\t%.3e\n", sum/npsamps);
230                    if (trans_mtx != NULL)
231                        trans_mtx[j*abp->nangles + i] = sum/npsamps;
230                  }
231                  putchar('\n');                  /* extra space between rows */
232              }
233              data_epilogue();
234          }
235                                                  /* back transmission */
236 <        if (bsd.tb != NULL || trans_mtx != NULL) {
239 <            if (bsd.tf == NULL)
240 <                trans_mtx = (float *)malloc(sizeof(float) *
241 <                                                abp->nangles*abp->nangles);
236 >        if ((bsd.tb != NULL) | (bsd.tf != NULL)) {
237              input_orient = -1; output_orient = 1;
238              data_prologue();
239              for (j = 0; j < abp->nangles; j++) {
240 <                for (i = 0; i < abp->nangles; i++)
241 <                    if (bsd.tb != NULL) {       /* use tb if we have it */
242 <                        sum = 0;                /* average over patches */
243 <                        for (n = npsamps; n-- > 0; ) {
244 <                            fo_getvec(vout, j+(n+frandom())/npsamps, abp);
245 <                            bi_getvec(vin, i+urand(n), abp);
246 <                            ec = SDevalBSDF(&sv, vout, vin, &bsd);
252 <                            if (ec != SDEnone)
240 >                for (i = 0; i < abp->nangles; i++) {
241 >                    sum = 0;            /* average over patches */
242 >                    for (n = npsamps; n-- > 0; ) {
243 >                        fo_getvec(vout, j+(n+frandom())/npsamps, abp);
244 >                        bi_getvec(vin, i+urand(n), abp);
245 >                        ec = SDevalBSDF(&sv, vout, vin, &bsd);
246 >                        if (ec != SDEnone)
247                                  goto err;
248 <                            sum += sv.cieY;
255 <                        }
256 <                        printf("\t%.3e\n", sum/npsamps);
257 <                        if (trans_mtx != NULL)
258 <                            trans_mtx[i*abp->nangles + j] = sum/npsamps;
259 <                    } else {                    /* else transpose tf */
260 <                        printf("\t%.3e\n", trans_mtx[i*abp->nangles + j]);
248 >                        sum += sv.cieY;
249                      }
250 +                    printf("\t%.3e\n", sum/npsamps);
251 +                }
252                  putchar('\n');                  /* extra space between rows */
253              }
254              data_epilogue();
255          }
266                                                /* derived front transmission */
267        if (bsd.tf == NULL && trans_mtx != NULL) {
268            input_orient = 1; output_orient = -1;
269            data_prologue();
270            for (j = 0; j < abp->nangles; j++) {
271                for (i = 0; i < abp->nangles; i++)
272                    printf("\t%.3e\n", trans_mtx[j*abp->nangles + i]);
273                putchar('\n');                  /* extra space between rows */
274            }
275            data_epilogue();
276        }
256          SDfreeBSDF(&bsd);                       /* all done */
278        if (trans_mtx != NULL)
279                free(trans_mtx);
257          return;
258   err:
259          SDreportError(ec, stderr);
# Line 288 | Line 265 | static void
265   eval_function(char *funame)
266   {
267          ANGLE_BASIS     *abp = get_basis(kbasis);
268 +        int             assignD = (fundefined(funame) < 6);
269          double          iovec[6];
270          double          sum;
271          int             i, j, n;
# Line 308 | Line 286 | eval_function(char *funame)
286                      else
287                          bi_getvec(iovec, i+urand(n), abp);
288  
289 +                    if (assignD) {
290 +                        varset("Dx", '=', -iovec[3]);
291 +                        varset("Dy", '=', -iovec[4]);
292 +                        varset("Dz", '=', -iovec[5]);
293 +                        ++eclock;
294 +                    }
295                      sum += funvalue(funame, 6, iovec);
296                  }
297                  printf("\t%.3e\n", sum/npsamps);
# Line 339 | Line 323 | eval_rbf(void)
323              else
324                  bi_getvec(vin, i+.5*(i>0), abp);
325  
326 <            rbf = advect_rbf(vin);              /* compute radial basis func */
326 >            rbf = advect_rbf(vin, lobe_lim);    /* compute radial basis func */
327  
328              for (j = 0; j < abp->nangles; j++) {
329                  sum = 0;                        /* sample over exiting patch */
# Line 405 | Line 389 | main(int argc, char *argv[])
389                  case 'q':
390                          kbasis = "LBNL/Klems Quarter";
391                          break;
392 +                case 'l':
393 +                        lobe_lim = atoi(argv[++i]);
394 +                        break;
395                  default:
396                          goto userr;
397                  }
# Line 413 | Line 400 | main(int argc, char *argv[])
400                          fprintf(stderr,
401          "%s: need single function with 6 arguments: bsdf(ix,iy,iz,ox,oy,oz)\n",
402                                          progname);
403 +                        fprintf(stderr, "\tor 3 arguments using Dx,Dy,Dz: bsdf(ix,iy,iz)\n",
404 +                                        progname);
405                          goto userr;
406                  }
407 +                ++eclock;
408                  xml_header(argc, argv);                 /* start XML output */
409                  xml_prologue(NULL);
410                  if (dofwd) {
# Line 473 | Line 463 | main(int argc, char *argv[])
463          return(0);
464   userr:
465          fprintf(stderr,
466 <        "Usage: %s [-n spp][-h|-q][bsdf.sir ..] > bsdf.xml\n", progname);
466 >        "Usage: %s [-n spp][-h|-q][-l maxlobes] [bsdf.sir ..] > bsdf.xml\n", progname);
467          fprintf(stderr,
468          "   or: %s [-n spp][-h|-q] bsdf_in.xml > bsdf_out.xml\n", progname);
469          fprintf(stderr,

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines