301 |
|
} |
302 |
|
|
303 |
|
|
304 |
+ |
getparam(str, dsc, typ, ptr) /* get variable from user */ |
305 |
+ |
char *str, *dsc; |
306 |
+ |
int typ; |
307 |
+ |
register union {int i; double d; COLOR C;} *ptr; |
308 |
+ |
{ |
309 |
+ |
int i0; |
310 |
+ |
double d0, d1, d2; |
311 |
+ |
char buf[48]; |
312 |
+ |
|
313 |
+ |
switch (typ) { |
314 |
+ |
case 'i': /* integer */ |
315 |
+ |
if (sscanf(str, "%d", &i0) != 1) { |
316 |
+ |
(*dev->comout)(dsc); |
317 |
+ |
sprintf(buf, " (%d): ", ptr->i); |
318 |
+ |
(*dev->comout)(buf); |
319 |
+ |
(*dev->comin)(buf, NULL); |
320 |
+ |
if (sscanf(buf, "%d", &i0) != 1) |
321 |
+ |
break; |
322 |
+ |
} |
323 |
+ |
ptr->i = i0; |
324 |
+ |
break; |
325 |
+ |
case 'r': /* real */ |
326 |
+ |
if (sscanf(str, "%lf", &d0) != 1) { |
327 |
+ |
(*dev->comout)(dsc); |
328 |
+ |
sprintf(buf, " (%.6g): ", ptr->d); |
329 |
+ |
(*dev->comout)(buf); |
330 |
+ |
(*dev->comin)(buf, NULL); |
331 |
+ |
if (sscanf(buf, "%lf", &d0) != 1) |
332 |
+ |
break; |
333 |
+ |
} |
334 |
+ |
ptr->d = d0; |
335 |
+ |
break; |
336 |
+ |
case 'b': /* boolean */ |
337 |
+ |
if (sscanf(str, "%1s", buf) != 1) { |
338 |
+ |
(*dev->comout)(dsc); |
339 |
+ |
sprintf(buf, " (%c): ", ptr->i ? 'y' : 'n'); |
340 |
+ |
(*dev->comout)(buf); |
341 |
+ |
(*dev->comin)(buf, NULL); |
342 |
+ |
} |
343 |
+ |
ptr->i = tolower(buf[0]) == 'y'; |
344 |
+ |
break; |
345 |
+ |
case 'C': /* color */ |
346 |
+ |
if (sscanf(str, "%lf %lf %lf", &d0, &d1, &d2) != 3) { |
347 |
+ |
(*dev->comout)(dsc); |
348 |
+ |
sprintf(buf, " (%.6g %.6g %.6g): ", |
349 |
+ |
colval(ptr->C,RED), |
350 |
+ |
colval(ptr->C,GRN), |
351 |
+ |
colval(ptr->C,BLU)); |
352 |
+ |
(*dev->comout)(buf); |
353 |
+ |
(*dev->comin)(buf, NULL); |
354 |
+ |
if (sscanf(buf, "%lf %lf %lf", &d0, &d1, &d2) != 3) |
355 |
+ |
break; |
356 |
+ |
} |
357 |
+ |
setcolor(ptr->C, d0, d1, d2); |
358 |
+ |
break; |
359 |
+ |
} |
360 |
+ |
} |
361 |
+ |
|
362 |
+ |
|
363 |
|
setparam(s) /* get/set program parameter */ |
364 |
|
register char *s; |
365 |
|
{ |
379 |
|
extern int ambounce; |
380 |
|
extern int directinvis; |
381 |
|
extern int do_irrad; |
382 |
< |
int i0; |
324 |
< |
double d0, d1, d2; |
325 |
< |
char buf[128], ans[4]; |
382 |
> |
char buf[128]; |
383 |
|
|
384 |
|
if (s[0] == '\0') { |
385 |
|
(*dev->comout)( |
386 |
< |
"aa ab ad ar as av b dc dj di dt i lr lw sp st: "); |
386 |
> |
"aa ab ad ar as av b dc di dj dt i lr lw sp st: "); |
387 |
|
(*dev->comin)(buf, NULL); |
388 |
|
s = buf; |
389 |
|
} |
391 |
|
case 'l': /* limit */ |
392 |
|
switch (s[1]) { |
393 |
|
case 'w': /* weight */ |
394 |
< |
if (sscanf(s+2, "%lf", &d0) != 1) { |
338 |
< |
sprintf(buf, "limit weight (%.6g): ", |
339 |
< |
minweight); |
340 |
< |
(*dev->comout)(buf); |
341 |
< |
(*dev->comin)(buf, NULL); |
342 |
< |
if (sscanf(buf, "%lf", &d0) != 1) |
343 |
< |
break; |
344 |
< |
} |
345 |
< |
minweight = d0; |
394 |
> |
getparam(s+2, "limit weight", 'r', &minweight); |
395 |
|
break; |
396 |
|
case 'r': /* reflection */ |
397 |
< |
if (sscanf(s+2, "%d", &i0) != 1) { |
349 |
< |
sprintf(buf, "limit reflection (%d): ", |
350 |
< |
maxdepth); |
351 |
< |
(*dev->comout)(buf); |
352 |
< |
(*dev->comin)(buf, NULL); |
353 |
< |
if (sscanf(buf, "%d", &i0) != 1) |
354 |
< |
break; |
355 |
< |
} |
356 |
< |
maxdepth = i0; |
397 |
> |
getparam(s+2, "limit reflection", 'i', &maxdepth); |
398 |
|
break; |
399 |
|
default: |
400 |
|
goto badparam; |
403 |
|
case 'd': /* direct */ |
404 |
|
switch (s[1]) { |
405 |
|
case 'j': /* jitter */ |
406 |
< |
if (sscanf(s+2, "%lf", &d0) != 1) { |
366 |
< |
sprintf(buf, "direct jitter (%.6g): ", |
367 |
< |
dstrsrc); |
368 |
< |
(*dev->comout)(buf); |
369 |
< |
(*dev->comin)(buf, NULL); |
370 |
< |
if (sscanf(buf, "%lf", &d0) != 1) |
371 |
< |
break; |
372 |
< |
} |
373 |
< |
dstrsrc = d0; |
406 |
> |
getparam(s+2, "direct jitter", 'r', &dstrsrc); |
407 |
|
break; |
408 |
|
case 'c': /* certainty */ |
409 |
< |
if (sscanf(s+2, "%lf", &d0) != 1) { |
377 |
< |
sprintf(buf, "direct certainty (%.6g): ", |
378 |
< |
shadcert); |
379 |
< |
(*dev->comout)(buf); |
380 |
< |
(*dev->comin)(buf, NULL); |
381 |
< |
if (sscanf(buf, "%lf", &d0) != 1) |
382 |
< |
break; |
383 |
< |
} |
384 |
< |
shadcert = d0; |
409 |
> |
getparam(s+2, "direct certainty", 'r', &shadcert); |
410 |
|
break; |
411 |
|
case 't': /* threshold */ |
412 |
< |
if (sscanf(s+2, "%lf", &d0) != 1) { |
388 |
< |
sprintf(buf, "direct threshold (%.6g): ", |
389 |
< |
shadthresh); |
390 |
< |
(*dev->comout)(buf); |
391 |
< |
(*dev->comin)(buf, NULL); |
392 |
< |
if (sscanf(buf, "%lf", &d0) != 1) |
393 |
< |
break; |
394 |
< |
} |
395 |
< |
shadthresh = d0; |
412 |
> |
getparam(s+2, "direct threshold", 'r', &shadthresh); |
413 |
|
break; |
414 |
|
case 'i': /* invisibility */ |
415 |
< |
if (sscanf(s+2, "%1s", ans) != 1) { |
416 |
< |
sprintf(buf, "direct invisibility (%c): ", |
400 |
< |
directinvis ? 'y' : 'n'); |
401 |
< |
(*dev->comout)(buf); |
402 |
< |
(*dev->comin)(buf, NULL); |
403 |
< |
if (sscanf(buf, "%1s", ans) != 1) |
404 |
< |
break; |
405 |
< |
} |
406 |
< |
directinvis = tolower(ans[0]) == 'y'; |
415 |
> |
getparam(s+2, "direct invisibility", |
416 |
> |
'b', &directinvis); |
417 |
|
break; |
418 |
|
default: |
419 |
|
goto badparam; |
420 |
|
} |
421 |
|
break; |
422 |
|
case 'b': /* black and white */ |
423 |
< |
if (sscanf(s+1, "%1s", ans) != 1) { |
414 |
< |
sprintf(buf, "black and white (%c): ", |
415 |
< |
greyscale ? 'y' : 'n'); |
416 |
< |
(*dev->comout)(buf); |
417 |
< |
(*dev->comin)(buf, NULL); |
418 |
< |
if (sscanf(buf, "%1s", ans) != 1) |
419 |
< |
break; |
420 |
< |
} |
421 |
< |
greyscale = tolower(ans[0]) == 'y'; |
423 |
> |
getparam(s+1, "black and white", 'b', &greyscale); |
424 |
|
break; |
425 |
|
case 'i': /* irradiance */ |
426 |
< |
if (sscanf(s+1, "%1s", ans) != 1) { |
425 |
< |
sprintf(buf, "irradiance (%c): ", |
426 |
< |
do_irrad ? 'y' : 'n'); |
427 |
< |
(*dev->comout)(buf); |
428 |
< |
(*dev->comin)(buf, NULL); |
429 |
< |
if (sscanf(buf, "%1s", ans) != 1) |
430 |
< |
break; |
431 |
< |
} |
432 |
< |
do_irrad = tolower(ans[0]) == 'y'; |
426 |
> |
getparam(s+1, "irradiance", 'b', &do_irrad); |
427 |
|
break; |
428 |
|
case 'a': /* ambient */ |
429 |
|
switch (s[1]) { |
430 |
|
case 'v': /* value */ |
431 |
< |
if (sscanf(s+2, "%lf %lf %lf", &d0, &d1, &d2) != 3) { |
438 |
< |
sprintf(buf, |
439 |
< |
"ambient value (%.6g %.6g %.6g): ", |
440 |
< |
colval(ambval,RED), |
441 |
< |
colval(ambval,GRN), |
442 |
< |
colval(ambval,BLU)); |
443 |
< |
(*dev->comout)(buf); |
444 |
< |
(*dev->comin)(buf, NULL); |
445 |
< |
if (sscanf(buf, "%lf %lf %lf", |
446 |
< |
&d0, &d1, &d2) != 3) |
447 |
< |
break; |
448 |
< |
} |
449 |
< |
setcolor(ambval, d0, d1, d2); |
431 |
> |
getparam(s+2, "ambient value", 'C', ambval); |
432 |
|
break; |
433 |
|
case 'a': /* accuracy */ |
434 |
< |
if (sscanf(s+2, "%lf", &d0) != 1) { |
453 |
< |
sprintf(buf, "ambient accuracy (%.6g): ", |
454 |
< |
ambacc); |
455 |
< |
(*dev->comout)(buf); |
456 |
< |
(*dev->comin)(buf, NULL); |
457 |
< |
if (sscanf(buf, "%lf", &d0) != 1) |
458 |
< |
break; |
459 |
< |
} |
460 |
< |
ambacc = d0; |
434 |
> |
getparam(s+2, "ambient accuracy", 'r', &ambacc); |
435 |
|
break; |
436 |
|
case 'd': /* divisions */ |
437 |
< |
if (sscanf(s+2, "%d", &i0) != 1) { |
464 |
< |
sprintf(buf, "ambient divisions (%d): ", |
465 |
< |
ambdiv); |
466 |
< |
(*dev->comout)(buf); |
467 |
< |
(*dev->comin)(buf, NULL); |
468 |
< |
if (sscanf(buf, "%d", &i0) != 1) |
469 |
< |
break; |
470 |
< |
} |
471 |
< |
ambdiv = i0; |
437 |
> |
getparam(s+2, "ambient divisions", 'i', &ambdiv); |
438 |
|
break; |
439 |
|
case 's': /* samples */ |
440 |
< |
if (sscanf(s+2, "%d", &i0) != 1) { |
475 |
< |
sprintf(buf, "ambient super-samples (%d): ", |
476 |
< |
ambssamp); |
477 |
< |
(*dev->comout)(buf); |
478 |
< |
(*dev->comin)(buf, NULL); |
479 |
< |
if (sscanf(buf, "%d", &i0) != 1) |
480 |
< |
break; |
481 |
< |
} |
482 |
< |
ambssamp = i0; |
440 |
> |
getparam(s+2, "ambient super-samples", 'i', &ambssamp); |
441 |
|
break; |
442 |
|
case 'b': /* bounces */ |
443 |
< |
if (sscanf(s+2, "%d", &i0) != 1) { |
486 |
< |
sprintf(buf, "ambient bounces (%d): ", |
487 |
< |
ambounce); |
488 |
< |
(*dev->comout)(buf); |
489 |
< |
(*dev->comin)(buf, NULL); |
490 |
< |
if (sscanf(buf, "%d", &i0) != 1) |
491 |
< |
break; |
492 |
< |
} |
493 |
< |
ambounce = i0; |
443 |
> |
getparam(s+2, "ambient bounces", 'i', &ambounce); |
444 |
|
break; |
445 |
|
case 'r': |
446 |
< |
if (sscanf(s+2, "%d", &i0) != 1) { |
497 |
< |
sprintf(buf, "ambient resolution (%d): ", |
498 |
< |
ambres); |
499 |
< |
(*dev->comout)(buf); |
500 |
< |
(*dev->comin)(buf, NULL); |
501 |
< |
if (sscanf(buf, "%d", &i0) != 1) |
502 |
< |
break; |
503 |
< |
} |
504 |
< |
ambres = i0; |
446 |
> |
getparam(s+2, "ambient resolution", 'i', &ambres); |
447 |
|
minarad = ambres > 0 ? thescene.cusize/ambres : 0.0; |
448 |
|
break; |
449 |
|
default: |
453 |
|
case 's': /* sample */ |
454 |
|
switch (s[1]) { |
455 |
|
case 'p': /* pixel */ |
456 |
< |
if (sscanf(s+2, "%d", &i0) != 1) { |
515 |
< |
sprintf(buf, "sample pixel (%d): ", psample); |
516 |
< |
(*dev->comout)(buf); |
517 |
< |
(*dev->comin)(buf, NULL); |
518 |
< |
if (sscanf(buf, "%d", &i0) != 1) |
519 |
< |
break; |
520 |
< |
} |
521 |
< |
psample = i0; |
456 |
> |
getparam(s+2, "sample pixel", 'i', &psample); |
457 |
|
pdepth = 0; |
458 |
|
break; |
459 |
|
case 't': /* threshold */ |
460 |
< |
if (sscanf(s+2, "%lf", &d0) != 1) { |
526 |
< |
sprintf(buf, "sample threshold (%.6g): ", |
527 |
< |
maxdiff); |
528 |
< |
(*dev->comout)(buf); |
529 |
< |
(*dev->comin)(buf, NULL); |
530 |
< |
if (sscanf(buf, "%lf", &d0) != 1) |
531 |
< |
break; |
532 |
< |
} |
533 |
< |
maxdiff = d0; |
460 |
> |
getparam(s+2, "sample threshold", 'r', &maxdiff); |
461 |
|
pdepth = 0; |
462 |
|
break; |
463 |
|
default: |