11 |
|
#include "standard.h" |
12 |
|
#include "paths.h" |
13 |
|
#include <ctype.h> |
14 |
+ |
#include <sys/types.h> |
15 |
|
|
16 |
|
|
17 |
|
typedef struct { |
22 |
|
int (*fixval)(); /* assignment checking function */ |
23 |
|
} VARIABLE; |
24 |
|
|
25 |
< |
int onevalue(), catvalues(); |
25 |
> |
int onevalue(), catvalues(), boolvalue(), |
26 |
> |
qualvalue(), fltvalue(), intvalue(); |
27 |
|
|
28 |
|
/* variables */ |
29 |
|
#define OBJECT 0 /* object files */ |
63 |
|
{"pfilt", 2, 0, NULL, catvalues}, |
64 |
|
{"view", 2, 0, NULL, NULL}, |
65 |
|
{"ZONE", 2, 0, NULL, onevalue}, |
66 |
< |
{"QUALITY", 3, 0, NULL, onevalue}, |
66 |
> |
{"QUALITY", 3, 0, NULL, qualvalue}, |
67 |
|
{"OCTREE", 3, 0, NULL, onevalue}, |
68 |
|
{"PICTURE", 3, 0, NULL, onevalue}, |
69 |
|
{"AMBFILE", 3, 0, NULL, onevalue}, |
70 |
|
{"OPTFILE", 3, 0, NULL, onevalue}, |
71 |
< |
{"EXPOSURE", 3, 0, NULL, onevalue}, |
71 |
> |
{"EXPOSURE", 3, 0, NULL, fltvalue}, |
72 |
|
{"RESOLUTION", 3, 0, NULL, onevalue}, |
73 |
|
{"UP", 2, 0, NULL, onevalue}, |
74 |
< |
{"INDIRECT", 3, 0, NULL, onevalue}, |
75 |
< |
{"DETAIL", 3, 0, NULL, onevalue}, |
76 |
< |
{"PENUMBRAS", 3, 0, NULL, onevalue}, |
77 |
< |
{"VARIABILITY", 3, 0, NULL, onevalue}, |
74 |
> |
{"INDIRECT", 3, 0, NULL, intvalue}, |
75 |
> |
{"DETAIL", 3, 0, NULL, qualvalue}, |
76 |
> |
{"PENUMBRAS", 3, 0, NULL, boolvalue}, |
77 |
> |
{"VARIABILITY", 3, 0, NULL, qualvalue}, |
78 |
|
{"REPORT", 3, 0, NULL, onevalue}, |
79 |
|
}; |
80 |
|
|
81 |
|
VARIABLE *matchvar(); |
82 |
|
char *nvalue(); |
81 |
– |
int vscale(); |
83 |
|
|
84 |
|
#define UPPER(c) ((c)&~0x20) /* ASCII trick */ |
85 |
|
|
88 |
|
#define vval(vc) (vv[vc].value) |
89 |
|
#define vint(vc) atoi(vval(vc)) |
90 |
|
#define vlet(vc) UPPER(vval(vc)[0]) |
91 |
+ |
#define vscale vlet |
92 |
|
#define vbool(vc) (vlet(vc)=='T') |
93 |
|
|
94 |
< |
#define HIGH 2 |
95 |
< |
#define MEDIUM 1 |
96 |
< |
#define LOW 0 |
94 |
> |
#define HIGH 'H' |
95 |
> |
#define MEDIUM 'M' |
96 |
> |
#define LOW 'L' |
97 |
|
|
96 |
– |
int lowqopts(), medqopts(), hiqopts(); |
97 |
– |
int (*setqopts[3])() = {lowqopts, medqopts, hiqopts}; |
98 |
– |
|
99 |
– |
#define renderopts (*setqopts[vscale(QUALITY)]) |
100 |
– |
|
98 |
|
/* overture calculation file */ |
99 |
|
#ifdef NIX |
100 |
|
char overfile[] = "overture.raw"; |
102 |
|
char overfile[] = "/dev/null"; |
103 |
|
#endif |
104 |
|
|
105 |
< |
extern unsigned long fdate(), time(); |
105 |
> |
extern time_t fdate(), time(); |
106 |
|
|
107 |
< |
unsigned long scenedate; /* date of latest scene or object file */ |
108 |
< |
unsigned long octreedate; /* date of octree */ |
109 |
< |
unsigned long matdate; /* date of latest material file */ |
110 |
< |
unsigned long illumdate; /* date of last illum file */ |
107 |
> |
time_t scenedate; /* date of latest scene or object file */ |
108 |
> |
time_t octreedate; /* date of octree */ |
109 |
> |
time_t matdate; /* date of latest material file */ |
110 |
> |
time_t illumdate; /* date of last illum file */ |
111 |
|
|
112 |
|
char *oct0name; /* name of pre-mkillum octree */ |
113 |
< |
unsigned long oct0date; /* date of pre-mkillum octree */ |
113 |
> |
time_t oct0date; /* date of pre-mkillum octree */ |
114 |
|
char *oct1name; /* name of post-mkillum octree */ |
115 |
< |
unsigned long oct1date; /* date of post-mkillum octree (>= matdate) */ |
115 |
> |
time_t oct1date; /* date of post-mkillum octree (>= matdate) */ |
116 |
|
|
117 |
|
int explicate = 0; /* explicate variables */ |
118 |
|
int silent = 0; /* do work silently */ |
253 |
|
register char *ass; |
254 |
|
{ |
255 |
|
char varname[32]; |
259 |
– |
char varval[512]; |
256 |
|
int n; |
257 |
|
register char *cp; |
258 |
|
register VARIABLE *vp; |
344 |
|
} |
345 |
|
|
346 |
|
|
351 |
– |
int |
352 |
– |
vscale(vc) /* return scale for variable vc */ |
353 |
– |
int vc; |
354 |
– |
{ |
355 |
– |
switch(vlet(vc)) { |
356 |
– |
case 'H': |
357 |
– |
return(HIGH); |
358 |
– |
case 'M': |
359 |
– |
return(MEDIUM); |
360 |
– |
case 'L': |
361 |
– |
return(LOW); |
362 |
– |
} |
363 |
– |
badvalue(vc); |
364 |
– |
} |
365 |
– |
|
366 |
– |
|
347 |
|
checkvalues() /* check assignments */ |
348 |
|
{ |
349 |
|
register int i; |
382 |
|
} |
383 |
|
|
384 |
|
|
385 |
< |
unsigned long |
385 |
> |
int |
386 |
> |
badmatch(tv, cv) /* case insensitive truncated comparison */ |
387 |
> |
register char *tv, *cv; |
388 |
> |
{ |
389 |
> |
if (!*tv) return(1); /* null string cannot match */ |
390 |
> |
do |
391 |
> |
if (UPPER(*tv) != *cv++) |
392 |
> |
return(1); |
393 |
> |
while (*++tv); |
394 |
> |
return(0); /* OK */ |
395 |
> |
} |
396 |
> |
|
397 |
> |
|
398 |
> |
boolvalue(vp) /* check boolean for legal values */ |
399 |
> |
register VARIABLE *vp; |
400 |
> |
{ |
401 |
> |
if (!vp->nass) return; |
402 |
> |
onevalue(vp); |
403 |
> |
switch (UPPER(vp->value[0])) { |
404 |
> |
case 'T': |
405 |
> |
if (badmatch(vp->value, "TRUE")) break; |
406 |
> |
return; |
407 |
> |
case 'F': |
408 |
> |
if (badmatch(vp->value, "FALSE")) break; |
409 |
> |
return; |
410 |
> |
} |
411 |
> |
fprintf(stderr, "%s: illegal value for boolean variable '%s'\n", |
412 |
> |
progname, vp->name); |
413 |
> |
exit(1); |
414 |
> |
} |
415 |
> |
|
416 |
> |
|
417 |
> |
qualvalue(vp) /* check qualitative var. for legal values */ |
418 |
> |
register VARIABLE *vp; |
419 |
> |
{ |
420 |
> |
if (!vp->nass) return; |
421 |
> |
onevalue(vp); |
422 |
> |
switch (UPPER(vp->value[0])) { |
423 |
> |
case 'L': |
424 |
> |
if (badmatch(vp->value, "LOW")) break; |
425 |
> |
return; |
426 |
> |
case 'M': |
427 |
> |
if (badmatch(vp->value, "MEDIUM")) break; |
428 |
> |
return; |
429 |
> |
case 'H': |
430 |
> |
if (badmatch(vp->value, "HIGH")) break; |
431 |
> |
return; |
432 |
> |
} |
433 |
> |
fprintf(stderr, "%s: illegal value for qualitative variable '%s'\n", |
434 |
> |
progname, vp->name); |
435 |
> |
exit(1); |
436 |
> |
} |
437 |
> |
|
438 |
> |
|
439 |
> |
intvalue(vp) /* check integer variable for legal values */ |
440 |
> |
register VARIABLE *vp; |
441 |
> |
{ |
442 |
> |
if (!vp->nass) return; |
443 |
> |
onevalue(vp); |
444 |
> |
if (isint(vp->value)) return; |
445 |
> |
fprintf(stderr, "%s: illegal value for integer variable '%s'\n", |
446 |
> |
progname, vp->name); |
447 |
> |
exit(1); |
448 |
> |
} |
449 |
> |
|
450 |
> |
|
451 |
> |
fltvalue(vp) /* check float variable for legal values */ |
452 |
> |
register VARIABLE *vp; |
453 |
> |
{ |
454 |
> |
if (!vp->nass) return; |
455 |
> |
onevalue(vp); |
456 |
> |
if (isflt(vp->value)) return; |
457 |
> |
fprintf(stderr, "%s: illegal value for real variable '%s'\n", |
458 |
> |
progname, vp->name); |
459 |
> |
exit(1); |
460 |
> |
} |
461 |
> |
|
462 |
> |
|
463 |
> |
time_t |
464 |
|
checklast(fnames) /* check files and find most recent */ |
465 |
|
register char *fnames; |
466 |
|
{ |
467 |
|
char thisfile[MAXPATH]; |
468 |
< |
unsigned long thisdate, lastdate = 0; |
468 |
> |
time_t thisdate, lastdate = 0; |
469 |
|
register char *cp; |
470 |
|
|
471 |
|
if (fnames == NULL) |
513 |
|
|
514 |
|
checkfiles() /* check for existence and modified times */ |
515 |
|
{ |
516 |
< |
unsigned long objdate; |
516 |
> |
time_t objdate; |
517 |
|
|
518 |
|
if (!vdef(OCTREE)) { |
519 |
|
if ((vval(OCTREE) = bmalloc(strlen(radname)+5)) == NULL) |
672 |
|
unlink(vval(OCTREE)); |
673 |
|
exit(1); |
674 |
|
} |
675 |
< |
octreedate = time(0); |
675 |
> |
octreedate = time((time_t *)NULL); |
676 |
|
} |
677 |
|
if (oct1name == vval(OCTREE)) /* no mkillum? */ |
678 |
|
oct1date = octreedate > matdate ? octreedate : matdate; |
698 |
|
unlink(oct0name); |
699 |
|
exit(1); |
700 |
|
} |
701 |
< |
oct0date = time(0); |
701 |
> |
oct0date = time((time_t *)NULL); |
702 |
|
} |
703 |
|
mkillumopts(mkopts); /* build mkillum command */ |
704 |
|
mktemp(illumtmp); |
726 |
|
unlink(oct1name); |
727 |
|
exit(1); |
728 |
|
} |
729 |
< |
oct1date = time(0); |
729 |
> |
oct1date = time((time_t *)NULL); |
730 |
|
rmfile(illumtmp); |
731 |
|
} |
732 |
|
|
766 |
|
|
767 |
|
checkambfile() /* check date on ambient file */ |
768 |
|
{ |
769 |
< |
unsigned long afdate; |
769 |
> |
time_t afdate; |
770 |
|
|
771 |
|
if (!vdef(AMBFILE)) |
772 |
|
return; |
781 |
|
ambval() /* compute ambient value */ |
782 |
|
{ |
783 |
|
if (vdef(EXPOSURE)) { |
726 |
– |
if (!isflt(vval(EXPOSURE))) |
727 |
– |
badvalue(EXPOSURE); |
784 |
|
if (vval(EXPOSURE)[0] == '+' || vval(EXPOSURE)[0] == '-') |
785 |
|
return(.5/pow(2.,atof(vval(EXPOSURE)))); |
786 |
|
return(.5/atof(vval(EXPOSURE))); |
793 |
|
} |
794 |
|
|
795 |
|
|
796 |
+ |
renderopts(op) /* set rendering options */ |
797 |
+ |
char *op; |
798 |
+ |
{ |
799 |
+ |
switch(vscale(QUALITY)) { |
800 |
+ |
case LOW: |
801 |
+ |
lowqopts(op); |
802 |
+ |
break; |
803 |
+ |
case MEDIUM: |
804 |
+ |
medqopts(op); |
805 |
+ |
break; |
806 |
+ |
case HIGH: |
807 |
+ |
hiqopts(op); |
808 |
+ |
break; |
809 |
+ |
} |
810 |
+ |
} |
811 |
+ |
|
812 |
+ |
|
813 |
|
lowqopts(op) /* low quality rendering options */ |
814 |
|
register char *op; |
815 |
|
{ |
905 |
|
} |
906 |
|
op = addarg(op, "-pt .08"); |
907 |
|
if (vbool(PENUMBRAS)) |
908 |
< |
op = addarg(op, "-ds .2 -dj .35"); |
908 |
> |
op = addarg(op, "-ds .2 -dj .5"); |
909 |
|
else |
910 |
|
op = addarg(op, "-ds .3"); |
911 |
|
op = addarg(op, "-dt .1 -dc .5 -dr 1 -sj .7 -st .1"); |
1296 |
|
sprintf(combuf, "rview %s%s -R %s ", vw, opts, rifname); |
1297 |
|
if (rvdevice != NULL) |
1298 |
|
sprintf(combuf+strlen(combuf), "-o %s ", rvdevice); |
1299 |
+ |
if (vdef(EXPOSURE)) |
1300 |
+ |
sprintf(combuf+strlen(combuf), "-pe %s ", vval(EXPOSURE)); |
1301 |
|
strcat(combuf, oct1name); |
1302 |
|
if (runcom(combuf)) { /* run it */ |
1303 |
|
fprintf(stderr, "%s: error running rview\n", progname); |
1317 |
|
/* get pfilt options */ |
1318 |
|
pfiltopts(pfopts); |
1319 |
|
/* get resolution, reporting */ |
1320 |
< |
mult = vscale(QUALITY)+1; |
1320 |
> |
switch (vscale(QUALITY)) { |
1321 |
> |
case LOW: |
1322 |
> |
mult = 1; |
1323 |
> |
break; |
1324 |
> |
case MEDIUM: |
1325 |
> |
mult = 2; |
1326 |
> |
break; |
1327 |
> |
case HIGH: |
1328 |
> |
mult = 3; |
1329 |
> |
break; |
1330 |
> |
} |
1331 |
|
{ |
1332 |
|
int xres, yres; |
1333 |
|
double aspect; |
1388 |
|
} |
1389 |
|
sprintf(combuf, "rpict%s %s %s%s %s > %s", |
1390 |
|
rep, vw, res, opts, |
1391 |
< |
oct1name, rawfile); |
1391 |
> |
oct1name, rawfile); |
1392 |
|
} |
1393 |
|
if (runcom(combuf)) { /* run rpict */ |
1394 |
|
fprintf(stderr, "%s: error rendering view %s\n", |