| 55 |
|
|
| 56 |
|
#if defined(_WIN32) || defined(_WIN64) |
| 57 |
|
#define RCONTRIB_FEATURES "Accumulation\nSummation\nRecovery\n" \ |
| 58 |
< |
"Hyperspectral\nImmediateIrradiance\n" \ |
| 58 |
> |
"ImmediateIrradiance\n" \ |
| 59 |
|
"ProgressReporting\nDistanceLimiting\n" \ |
| 60 |
|
"InputFormats=a,f,d\nOutputFormats=a,f,d,c\n" \ |
| 61 |
< |
"Outputs=V,W\n" |
| 61 |
> |
"Outputs=V,W\n" \ |
| 62 |
> |
"OutputCS=RGB,spec\n" |
| 63 |
|
#else |
| 64 |
|
#define RCONTRIB_FEATURES "Multiprocessing\n" \ |
| 65 |
|
"Accumulation\nSummation\nRecovery\n" \ |
| 66 |
< |
"Hyperspectral\nImmediateIrradiance\n" \ |
| 66 |
> |
"ImmediateIrradiance\n" \ |
| 67 |
|
"ProgressReporting\nDistanceLimiting\n" \ |
| 68 |
|
"InputFormats=a,f,d\nOutputFormats=a,f,d,c\n" \ |
| 69 |
< |
"Outputs=V,W\n" |
| 69 |
> |
"Outputs=V,W\n" \ |
| 70 |
> |
"OutputCS=RGB,spec\n" |
| 71 |
|
#endif |
| 72 |
|
|
| 73 |
|
static void |
| 74 |
|
printdefaults(void) /* print default values to stdout */ |
| 75 |
|
{ |
| 76 |
|
printf("-c %-5d\t\t\t# accumulated rays per record\n", accumulate); |
| 75 |
– |
if (NCSAMP > 3) { |
| 76 |
– |
printf("-cs %-2d\t\t\t\t# number of spectral bins\n", NCSAMP); |
| 77 |
– |
printf("-cw %3.0f %3.0f\t\t\t# wavelength limits (nm)\n", |
| 78 |
– |
WLPART[3], WLPART[0]); |
| 79 |
– |
} |
| 77 |
|
printf("-V%c\t\t\t\t# output %s\n", contrib ? '+' : '-', |
| 78 |
|
contrib ? "contributions" : "coefficients"); |
| 79 |
|
if (imm_irrad) |
| 88 |
|
"-h-\t\t\t\t# no header\n"); |
| 89 |
|
printf("-f%c%c\t\t\t\t# format input/output = %s/%s\n", |
| 90 |
|
inpfmt, outfmt, formstr(inpfmt), formstr(outfmt)); |
| 91 |
+ |
if (report_intvl > 0) |
| 92 |
+ |
printf("-t %-9d\t\t\t# time between reports\n", report_intvl); |
| 93 |
|
printf(erract[WARNING].pf != NULL ? |
| 94 |
|
"-w+\t\t\t\t# warning messages on\n" : |
| 95 |
|
"-w-\t\t\t\t# warning messages off\n"); |
| 210 |
|
if (_setmaxstdio(i) == i) |
| 211 |
|
break; |
| 212 |
|
#endif |
| 213 |
< |
/* initialize calcomp routines early */ |
| 215 |
< |
initfunc(); |
| 213 |
> |
initfunc(); /* initialize calcomp routines */ |
| 214 |
|
calcontext(RCCONTEXT); |
| 215 |
|
/* option city */ |
| 216 |
|
for (i = 1; i < argc; i++) { |
| 262 |
|
if (rval) erract[WARNING].pf = wputs; |
| 263 |
|
else erract[WARNING].pf = NULL; |
| 264 |
|
break; |
| 267 |
– |
case 'e': /* expression */ |
| 268 |
– |
check(2,"s"); |
| 269 |
– |
scompile(argv[++i], NULL, 0); |
| 270 |
– |
break; |
| 265 |
|
case 'l': /* limit distance */ |
| 266 |
|
if (argv[i][2] != 'd') |
| 267 |
|
goto badopt; |
| 270 |
|
case 'I': /* immed. irradiance */ |
| 271 |
|
check_bool(2,imm_irrad); |
| 272 |
|
break; |
| 273 |
< |
case 'f': /* file or force or format */ |
| 280 |
< |
if (!argv[i][2]) { |
| 281 |
< |
check(2,"s"); |
| 282 |
< |
loadfunc(argv[++i]); |
| 283 |
< |
break; |
| 284 |
< |
} |
| 273 |
> |
case 'f': /* force or format */ |
| 274 |
|
if (argv[i][2] == 'o') { |
| 275 |
|
check_bool(3,force_open); |
| 276 |
|
break; |
| 291 |
|
check(2,"s"); |
| 292 |
|
set_eparams(prms = argv[++i]); |
| 293 |
|
break; |
| 294 |
< |
case 'c': /* spectral sampling or count */ |
| 295 |
< |
switch (argv[i][2]) { |
| 296 |
< |
#if MAXCSAMP>3 |
| 308 |
< |
case 's': /* spectral bin count */ |
| 309 |
< |
check(3,"i"); |
| 310 |
< |
NCSAMP = atoi(argv[++i]); |
| 311 |
< |
break; |
| 312 |
< |
case 'w': /* wavelength extrema */ |
| 313 |
< |
check(3,"ff"); |
| 314 |
< |
WLPART[0] = atof(argv[++i]); |
| 315 |
< |
WLPART[3] = atof(argv[++i]); |
| 316 |
< |
break; |
| 317 |
< |
#endif |
| 318 |
< |
case '\0': /* sample count */ |
| 319 |
< |
check(2,"i"); |
| 320 |
< |
accumulate = atoi(argv[++i]); |
| 321 |
< |
break; |
| 322 |
< |
default: |
| 323 |
< |
goto badopt; |
| 324 |
< |
} |
| 294 |
> |
case 'c': /* sample count */ |
| 295 |
> |
check(2,"i"); |
| 296 |
> |
accumulate = atoi(argv[++i]); |
| 297 |
|
break; |
| 298 |
|
case 'b': /* bin expression/count */ |
| 299 |
|
if (argv[i][2] == 'n') { |
| 324 |
|
error(USER, "missing required modifier argument"); |
| 325 |
|
/* override some option settings */ |
| 326 |
|
override_options(); |
| 327 |
+ |
/* set/check spectral sampling */ |
| 328 |
+ |
if (setspectrsamp(CNDX, WLPART) < 0) |
| 329 |
+ |
error(USER, "unsupported spectral sampling"); |
| 330 |
|
/* initialize object types */ |
| 331 |
|
initotypes(); |
| 332 |
|
/* initialize urand */ |
| 381 |
|
|
| 382 |
|
rcontrib(); /* trace ray contributions (loop) */ |
| 383 |
|
|
| 409 |
– |
ambsync(); /* flush ambient file */ |
| 410 |
– |
|
| 384 |
|
/* PMAP: free photon maps */ |
| 385 |
|
ray_done_pmap(); |
| 386 |
|
|
| 405 |
|
) |
| 406 |
|
{ |
| 407 |
|
int lasterrno = errno; |
| 408 |
+ |
if (erract[WARNING].pf == NULL) |
| 409 |
+ |
return; /* called by calcomp or someone */ |
| 410 |
|
eputs(s); |
| 411 |
|
errno = lasterrno; |
| 412 |
|
} |