11 |
|
* |
12 |
|
*/ |
13 |
|
|
14 |
+ |
#define _USE_MATH_DEFINES |
15 |
|
#include "rtio.h" |
16 |
|
#include <stdlib.h> |
17 |
|
#include <math.h> |
419 |
|
int i; |
420 |
|
/* allocate BSDF component */ |
421 |
|
sdata = ezxml_txt(ezxml_child(wdb, "WavelengthDataDirection")); |
422 |
+ |
if (!sdata) |
423 |
+ |
return RC_FAIL; |
424 |
|
/* |
425 |
|
* Remember that front and back are reversed from WINDOW 6 orientations |
426 |
|
* Favor their "Front" (incoming light) since that's more often valid |
510 |
|
df->comp[0].dist = dp; |
511 |
|
df->comp[0].func = &SDhandleMtx; |
512 |
|
/* read BSDF data */ |
513 |
< |
sdata = ezxml_txt(ezxml_child(wdb,"ScatteringData")); |
513 |
> |
sdata = ezxml_txt(ezxml_child(wdb, "ScatteringData")); |
514 |
|
if (!sdata || !*sdata) { |
515 |
|
sprintf(SDerrorDetail, "Missing BSDF ScatteringData in '%s'", |
516 |
|
sd->name); |
524 |
|
sd->name); |
525 |
|
return RC_FORMERR; |
526 |
|
} |
527 |
< |
while (*sdnext && isspace(*sdnext)) |
527 |
> |
while (isspace(*sdnext)) |
528 |
|
sdnext++; |
529 |
|
if (*sdnext == ',') sdnext++; |
530 |
|
if (rowinc) { |
531 |
|
int r = i/dp->nout; |
532 |
< |
int c = i - c*dp->nout; |
532 |
> |
int c = i - r*dp->nout; |
533 |
|
mBSDF_value(dp,r,c) = atof(sdata); |
534 |
|
} else |
535 |
|
dp->bsdf[i] = atof(sdata); |
549 |
|
for (i = n; --i; ) |
550 |
|
if (sm->bsdf[i] < minv) |
551 |
|
minv = sm->bsdf[i]; |
552 |
+ |
|
553 |
+ |
if (minv <= FTINY) |
554 |
+ |
return .0; |
555 |
+ |
|
556 |
|
for (i = n; i--; ) |
557 |
|
sm->bsdf[i] -= minv; |
558 |
|
|
578 |
|
c_cmix(&dv->spec, dv->cieY, &dv->spec, ymin, &df->comp[n].cspec[0]); |
579 |
|
dv->cieY += ymin; |
580 |
|
} |
581 |
< |
df->maxHemi -= dv->cieY; /* adjust minimum hemispherical */ |
581 |
> |
df->maxHemi -= dv->cieY; /* adjust maximum hemispherical */ |
582 |
|
/* make sure everything is set */ |
583 |
|
c_ccvt(&dv->spec, C_CSXY+C_CSSPEC); |
584 |
|
} |
587 |
|
SDError |
588 |
|
SDloadMtx(SDData *sd, ezxml_t wtl) |
589 |
|
{ |
590 |
< |
ezxml_t wld, wdb; |
591 |
< |
int rowIn; |
592 |
< |
struct BSDF_data *dp; |
593 |
< |
char *txt; |
594 |
< |
int rval; |
588 |
< |
|
590 |
> |
ezxml_t wld, wdb; |
591 |
> |
int rowIn; |
592 |
> |
char *txt; |
593 |
> |
int rval; |
594 |
> |
/* basic checks and data ordering */ |
595 |
|
txt = ezxml_txt(ezxml_child(ezxml_child(wtl, |
596 |
|
"DataDefinition"), "IncidentDataStructure")); |
597 |
|
if (txt == NULL || !*txt) { |
610 |
|
sd->name); |
611 |
|
return SDEsupport; |
612 |
|
} |
613 |
< |
/* get angle basis */ |
613 |
> |
/* get angle basis */ |
614 |
|
rval = load_angle_basis(ezxml_child(ezxml_child(wtl, |
615 |
|
"DataDefinition"), "AngleBasis")); |
616 |
|
if (rval < 0) |
617 |
|
return convert_errcode(rval); |
618 |
< |
/* load BSDF components */ |
618 |
> |
/* load BSDF components */ |
619 |
|
for (wld = ezxml_child(wtl, "WavelengthData"); |
620 |
|
wld != NULL; wld = wld->next) { |
621 |
|
if (strcasecmp(ezxml_txt(ezxml_child(wld,"Wavelength")), |
626 |
|
if ((rval = load_bsdf_data(sd, wdb, rowIn)) < 0) |
627 |
|
return convert_errcode(rval); |
628 |
|
} |
629 |
< |
/* separate diffuse components */ |
629 |
> |
/* separate diffuse components */ |
630 |
|
extract_diffuse(&sd->rLambFront, sd->rf); |
631 |
|
extract_diffuse(&sd->rLambBack, sd->rb); |
632 |
|
extract_diffuse(&sd->tLamb, sd->tf); |
633 |
< |
/* return success */ |
633 |
> |
/* return success */ |
634 |
|
return SDEnone; |
635 |
|
} |
636 |
|
|