| 24 |
|
extern const char BIGEND[]; |
| 25 |
|
extern const char FMTSTR[]; |
| 26 |
|
|
| 27 |
– |
int contrib = 0; // computing contributions? |
| 28 |
– |
|
| 29 |
– |
int xres = 0; // horizontal (scan) size |
| 30 |
– |
int yres = 0; // vertical resolution |
| 31 |
– |
|
| 27 |
|
// new/exclusive, overwrite if exists, or recover data |
| 28 |
|
int RSDOflags[] = {RDSwrite|RDSexcl|RDSextend, RDSwrite|RDSextend, |
| 29 |
|
RDSread|RDSwrite}; |
| 35 |
|
struct RcontribMod { |
| 36 |
|
RcontribOutput * opl; // pointer to first output channel |
| 37 |
|
char * params; // parameters string |
| 38 |
< |
EPNODE * binv; // bin expression |
| 38 |
> |
EPNODE * binv; // bin expression (NULL if 1 bin) |
| 39 |
|
int nbins; // bin count this modifier |
| 40 |
|
int coffset; // column offset in bytes |
| 41 |
|
DCOLORV cbin[1]; // bin accumulator (extends struct) |
| 63 |
|
RcontribMod * |
| 64 |
|
NewRcMod(const char *prms, const char *binexpr, int ncbins) |
| 65 |
|
{ |
| 71 |
– |
if (ncbins <= 0) return NULL; |
| 66 |
|
if (!prms) prms = ""; |
| 67 |
< |
if (!binexpr | (ncbins == 1)) |
| 68 |
< |
binexpr = "0"; |
| 69 |
< |
|
| 67 |
> |
if (!binexpr & (ncbins > 1)) { |
| 68 |
> |
error(USER, "missing bin expression"); |
| 69 |
> |
return NULL; |
| 70 |
> |
} |
| 71 |
> |
if (ncbins <= 1) { // shouldn't have bin expression? |
| 72 |
> |
if (binexpr && strcmp(binexpr, "0")) |
| 73 |
> |
error(WARNING, "ignoring non-zero expression for single bin"); |
| 74 |
> |
prms = ""; |
| 75 |
> |
binexpr = NULL; |
| 76 |
> |
ncbins = 1; |
| 77 |
> |
} |
| 78 |
|
RcontribMod * mp = (RcontribMod *)ecalloc(1, sizeof(RcontribMod) + |
| 79 |
|
sizeof(DCOLORV)*(NCSAMP*ncbins-1) + |
| 80 |
|
strlen(prms)+1); |
| 81 |
|
|
| 82 |
|
mp->params = strcpy((char *)(mp->cbin + ncbins*NCSAMP), prms); |
| 83 |
< |
mp->binv = eparse(const_cast<char *>(binexpr)); |
| 83 |
> |
if (binexpr) { |
| 84 |
> |
mp->binv = eparse(const_cast<char *>(binexpr)); |
| 85 |
> |
CHECK(mp->binv->type==NUM, WARNING, "constant bin expression"); |
| 86 |
> |
} |
| 87 |
|
mp->nbins = ncbins; |
| 88 |
|
return mp; |
| 89 |
|
} |
| 93 |
|
FreeRcMod(void *p) |
| 94 |
|
{ |
| 95 |
|
if (!p) return; |
| 96 |
< |
epfree((*(RcontribMod *)p).binv, true); |
| 96 |
> |
EPNODE * bep = (*(RcontribMod *)p).binv; |
| 97 |
> |
if (bep) epfree(bep, true); |
| 98 |
|
efree(p); |
| 99 |
|
} |
| 100 |
|
|
| 141 |
|
if (!mp) |
| 142 |
|
return 0; // not in our modifier list |
| 143 |
|
|
| 144 |
< |
worldfunc(RCCONTEXT, r); // compute bin # |
| 145 |
< |
set_eparams(mp->params); |
| 146 |
< |
double bval = evalue(mp->binv); |
| 147 |
< |
if (bval <= -.5) |
| 148 |
< |
return 0; // silently ignore negative bin index |
| 149 |
< |
DCOLORV * dvp = (*mp)[int(bval + .5)]; |
| 144 |
> |
int bi = 0; // get bin index |
| 145 |
> |
if (mp->binv) { |
| 146 |
> |
worldfunc(RCCONTEXT, r); |
| 147 |
> |
set_eparams(mp->params); |
| 148 |
> |
double bval = evalue(mp->binv); |
| 149 |
> |
if (bval <= -.5) |
| 150 |
> |
return 0; // silently ignore negative bin index |
| 151 |
> |
bi = int(bval + .5); |
| 152 |
> |
} |
| 153 |
> |
DCOLORV * dvp = (*mp)[bi]; |
| 154 |
|
if (!dvp) { |
| 155 |
< |
sprintf(errmsg, "bad bin number for '%s' (%.1f ignored)", mname, bval); |
| 155 |
> |
sprintf(errmsg, "bad bin number for '%s' (%d ignored)", mname, bi); |
| 156 |
|
error(WARNING, errmsg); |
| 157 |
|
return 0; |
| 158 |
|
} |
| 159 |
|
SCOLOR contr; |
| 160 |
|
raycontrib(contr, r, PRIMARY); // compute coefficient |
| 161 |
< |
if (contrib) |
| 161 |
> |
if (rcp->HasFlag(RCcontrib)) |
| 162 |
|
smultscolor(contr, r->rcol); // -> value contribution |
| 163 |
|
for (int i = 0; i < NCSAMP; i++) |
| 164 |
|
*dvp++ += contr[i]; // accumulate color/spectrum |
| 188 |
|
RcontribSimulManager::AddModifier(const char *modn, const char *outspec, |
| 189 |
|
const char *prms, const char *binval, int bincnt) |
| 190 |
|
{ |
| 191 |
< |
if (!modn | !outspec | (bincnt <= 0) || !*modn | !*outspec) { |
| 191 |
> |
if (!modn | !outspec || !*modn | !*outspec) { |
| 192 |
|
error(WARNING, "ignoring bad call to AddModifier()"); |
| 193 |
|
return false; |
| 194 |
|
} |
| 195 |
|
if (!nChan) { // initial call? |
| 196 |
+ |
if ((xres < 0) | (yres <= 0)) { |
| 197 |
+ |
error(USER, "xres, yres must be set before first modifier"); |
| 198 |
+ |
return false; |
| 199 |
+ |
} |
| 200 |
|
if (!SetDataFormat(dtyp)) |
| 201 |
|
return false; |
| 202 |
|
nChan = NCSAMP; |
| 203 |
|
} else if (nChan != NCSAMP) { |
| 204 |
< |
error(INTERNAL, "number of spectral channels must be fixed"); |
| 204 |
> |
error(USER, "number of spectral channels must be fixed"); |
| 205 |
|
return false; |
| 206 |
|
} |
| 207 |
|
if (Ready()) { |
| 224 |
|
const int binndx = hasFormat(outspec, "diouxX"); |
| 225 |
|
int bin0 = 0; |
| 226 |
|
char fnbuf[512]; |
| 227 |
< |
if (!modndx | (modndx > binndx)) |
| 227 |
> |
if (!modndx || (binndx > 0) & (modndx > binndx)) |
| 228 |
|
sprintf(fnbuf, outspec, bin0, modn); |
| 229 |
|
else |
| 230 |
|
sprintf(fnbuf, outspec, modn, bin0); |
| 253 |
|
mp->opl = op; // first (maybe only) output channel |
| 254 |
|
if (modndx) // remember modifier if part of name |
| 255 |
|
op->omod = lp->key; |
| 256 |
< |
if (binndx > 0) { // append output image/bin list |
| 256 |
> |
if (binndx) { // append output image/bin list |
| 257 |
|
op->rowBytes += dsiz; |
| 258 |
|
op->obin = bin0; |
| 259 |
|
for (bincnt = 1; bincnt < mp->nbins; bincnt++) { |
| 260 |
< |
if (!modndx | (modndx > binndx)) |
| 260 |
> |
if (!modndx || (binndx > 0) & (modndx > binndx)) |
| 261 |
|
sprintf(fnbuf, outspec, bin0+bincnt, modn); |
| 262 |
|
else |
| 263 |
|
sprintf(fnbuf, outspec, modn, bin0+bincnt); |
| 276 |
|
op->rowBytes += dsiz; |
| 277 |
|
} |
| 278 |
|
} else // else send all results to this channel |
| 279 |
< |
op->rowBytes += bincnt*dsiz; |
| 279 |
> |
op->rowBytes += mp->nbins*dsiz; |
| 280 |
|
return true; |
| 281 |
|
} |
| 282 |
|
|
| 303 |
|
return true; |
| 304 |
|
} |
| 305 |
|
|
| 306 |
+ |
// call-back to check if modifier has been loaded |
| 307 |
+ |
static int |
| 308 |
+ |
checkModExists(const LUENT *lp, void *p) |
| 309 |
+ |
{ |
| 310 |
+ |
if (modifier(lp->key) != OVOID) |
| 311 |
+ |
return 1; |
| 312 |
+ |
|
| 313 |
+ |
sprintf(errmsg, "tracked modifier '%s' not found in main scene", lp->key); |
| 314 |
+ |
error(WARNING, errmsg); |
| 315 |
+ |
return 0; |
| 316 |
+ |
} |
| 317 |
+ |
|
| 318 |
|
// Prepare output channels and return # completed rows |
| 319 |
|
int |
| 320 |
|
RcontribSimulManager::PrepOutput() |
| 323 |
|
error(INTERNAL, "PrepOutput() called before octree & modifiers assigned"); |
| 324 |
|
return -1; |
| 325 |
|
} |
| 326 |
+ |
if (!cdsF) { |
| 327 |
+ |
error(INTERNAL, "missing RdataShare constructor call (*cdsF)"); |
| 328 |
+ |
return -1; |
| 329 |
+ |
} |
| 330 |
+ |
if (lu_doall(&modLUT, checkModExists, NULL) < 0) |
| 331 |
+ |
return -1; |
| 332 |
+ |
|
| 333 |
|
int remWarnings = 20; |
| 334 |
|
for (RcontribOutput *op = outList; op; op = op->next) { |
| 335 |
|
if (op->rData) { |
| 391 |
|
strcpy(hdr+begData, ROWZEROSTR); |
| 392 |
|
rowCountPos = begData+LNROWSTR; |
| 393 |
|
begData += sizeof(ROWZEROSTR)-1; |
| 394 |
< |
if (!xres | (rowBytes > esiz)) { |
| 394 |
> |
if (!rcp->xres | (rowBytes > esiz)) { |
| 395 |
|
sprintf(hdr+begData, "NCOLS=%d\n", int(rowBytes/esiz)); |
| 396 |
|
begData += strlen(hdr+begData); |
| 397 |
|
} |
| 429 |
|
hdr[begData++] = ' '; |
| 430 |
|
hdr[begData++] = '\n'; // EOL for data format |
| 431 |
|
hdr[begData++] = '\n'; // end of nominal header |
| 432 |
< |
if ((xres > 0) & (rowBytes == esiz)) { // tack on resolution string? |
| 433 |
< |
sprintf(hdr+begData, PIXSTDFMT, yres, xres); |
| 432 |
> |
if ((rcp->xres > 0) & (rowBytes == esiz)) { // tack on resolution string? |
| 433 |
> |
sprintf(hdr+begData, PIXSTDFMT, rcp->yres, rcp->xres); |
| 434 |
|
begData += strlen(hdr+begData); |
| 435 |
|
} |
| 436 |
|
return rData->ReleaseMemory(hdr, RDSwrite); |
| 476 |
|
return -1; |
| 477 |
|
} |
| 478 |
|
// check format |
| 479 |
< |
if (!(cp = findArgs(hdr, FMTSTR, begData)) || strcmp(cp, formstr(etyp))) { |
| 479 |
> |
if (!(cp = findArgs(hdr, FMTSTR, begData)) || |
| 480 |
> |
strncmp(cp, formstr(etyp), strlen(formstr(etyp)))) { |
| 481 |
|
sprintf(errmsg, "expected %s%s in '%s'", FMTSTR, formstr(etyp), GetName()); |
| 482 |
|
error(USER, errmsg); |
| 483 |
|
return -1; |
| 484 |
|
} |
| 485 |
|
// check #columns |
| 486 |
|
if (((cp = findArgs(hdr, "NCOLS=", begData)) && atoi(cp)*esiz != rowBytes) || |
| 487 |
< |
!xres | (rowBytes > esiz)) { |
| 487 |
> |
!rcp->xres | (rowBytes > esiz)) { |
| 488 |
|
sprintf(errmsg, "expected NCOLS=%d in '%s'", |
| 489 |
|
int(rowBytes/esiz), GetName()); |
| 490 |
|
error(USER, errmsg); |
| 499 |
|
rowCountPos = cp - hdr; |
| 500 |
|
int rlast = atoi(cp); |
| 501 |
|
begData++; // advance past closing EOL |
| 502 |
< |
if ((xres > 0) & (rowBytes == esiz)) { // check/skip resolution string? |
| 502 |
> |
if ((rcp->xres > 0) & (rowBytes == esiz)) { // check/skip resolution string? |
| 503 |
|
char rbuf[64]; |
| 504 |
< |
sprintf(rbuf, PIXSTDFMT, yres, xres); |
| 504 |
> |
sprintf(rbuf, PIXSTDFMT, rcp->yres, rcp->xres); |
| 505 |
|
int rlen = strlen(rbuf); |
| 506 |
|
if (strncmp(rbuf, hdr+begData, rlen)) { |
| 507 |
|
sprintf(errmsg, "bad resolution string in '%s'", GetName()); |
| 666 |
|
FD_ISSET(kid[n].w, &writeset) | |
| 667 |
|
FD_ISSET(kid[n].w, &errset)) { |
| 668 |
|
// update output row counts |
| 669 |
< |
UpdateRowsDone(kidRow[n]); |
| 669 |
> |
if (!FD_ISSET(kid[n].w, &errset)) |
| 670 |
> |
UpdateRowsDone(kidRow[n]); |
| 671 |
|
kidRow[n] = -1; // flag it available |
| 672 |
|
pn = n; |
| 673 |
|
} |
| 751 |
|
close(kid[nkids].w); |
| 752 |
|
free(kid); free(kidRow); |
| 753 |
|
kid = NULL; kidRow = NULL; |
| 719 |
– |
rowsDone.NewBitMap(0); |
| 754 |
|
RunChild(); // should never return |
| 755 |
|
_exit(1); |
| 756 |
|
} |
| 799 |
|
return 0; |
| 800 |
|
} |
| 801 |
|
if (nt < 0) |
| 802 |
< |
return nkids; |
| 802 |
> |
return NThreads(); |
| 803 |
|
if (!nt) nt = GetNCores(); |
| 804 |
|
int status = 0; |
| 805 |
|
if (nt == 1) |
| 812 |
|
sprintf(errmsg, "non-zero (%d) status from child", status); |
| 813 |
|
error(WARNING, errmsg); |
| 814 |
|
} |
| 815 |
< |
return nkids; |
| 815 |
> |
return NThreads(); |
| 816 |
|
} |