68 |
|
|
69 |
|
int fillo = F_FORE|F_BACK; /* selected fill options */ |
70 |
|
int fillsamp = 0; /* sample separation (0 == inf) */ |
71 |
– |
extern int backfill(), rcalfill(); /* fill functions */ |
72 |
– |
int (*fillfunc)() = backfill; /* selected fill function */ |
71 |
|
COLR backcolr = BLKCOLR; /* background color */ |
72 |
|
COLOR backcolor = BLKCOLOR; /* background color (float) */ |
73 |
|
double backz = 0.0; /* background z value */ |
90 |
|
int packsiz; /* actual packet size */ |
91 |
|
int queuesiz = 0; /* number of pixels pending */ |
92 |
|
|
93 |
< |
extern double movepixel(); |
93 |
> |
typedef void fillfunc_t(int x, int y); |
94 |
|
|
95 |
|
static gethfunc headline; |
96 |
+ |
static int nextview(FILE *fp); |
97 |
+ |
static void compavgview(void); |
98 |
+ |
static void addpicture(char *pfile, char *zspec); |
99 |
+ |
static int pixform(MAT4 xfmat, VIEW *vw1, VIEW *vw2); |
100 |
+ |
static void addscanline(struct bound *xl, int y, |
101 |
+ |
COLR *pline, float *zline, struct position *lasty); |
102 |
+ |
static void addpixel(struct position *p0, struct position *p1, |
103 |
+ |
struct position *p2, COLR pix, double w, double z); |
104 |
+ |
static double movepixel(FVECT pos); |
105 |
+ |
static int getperim(struct bound *xl, struct bound *yl, float *zline, int zfd); |
106 |
+ |
static void backpicture(fillfunc_t *fill, int samp); |
107 |
+ |
static void fillpicture(fillfunc_t *fill); |
108 |
+ |
static int clipaft(void); |
109 |
+ |
static int addblur(void); |
110 |
+ |
static void writepicture(void); |
111 |
+ |
static void writedistance(char *fname); |
112 |
+ |
static fillfunc_t backfill; |
113 |
+ |
static fillfunc_t rcalfill; |
114 |
+ |
static void calstart(char *prog, char *args); |
115 |
+ |
static void caldone(void); |
116 |
+ |
static void clearqueue(void); |
117 |
+ |
static void syserror(char *s); |
118 |
|
|
119 |
+ |
fillfunc_t *fillfunc = backfill; /* selected fill function */ |
120 |
|
|
121 |
< |
main(argc, argv) /* interpolate pictures */ |
122 |
< |
int argc; |
123 |
< |
char *argv[]; |
121 |
> |
int |
122 |
> |
main( /* interpolate pictures */ |
123 |
> |
int argc, |
124 |
> |
char *argv[] |
125 |
> |
) |
126 |
|
{ |
127 |
|
#define check(ol,al) if (argv[an][ol] || \ |
128 |
|
badarg(argc-an-1,argv+an+1,al)) \ |
134 |
|
char *expcomp = NULL; |
135 |
|
int i, an, rval; |
136 |
|
|
137 |
+ |
SET_DEFAULT_BINARY(); |
138 |
+ |
SET_FILE_BINARY(stdout); |
139 |
+ |
|
140 |
|
progname = argv[0]; |
141 |
|
|
142 |
|
for (an = 1; an < argc && argv[an][0] == '-'; an++) { |
361 |
|
void *p |
362 |
|
) |
363 |
|
{ |
364 |
< |
char fmt[32]; |
364 |
> |
char fmt[MAXFMTLEN]; |
365 |
|
|
366 |
|
if (isheadid(s)) |
367 |
|
return(0); |
387 |
|
} |
388 |
|
|
389 |
|
|
390 |
< |
nextview(fp) /* get and set next view */ |
391 |
< |
FILE *fp; |
390 |
> |
static int |
391 |
> |
nextview( /* get and set next view */ |
392 |
> |
FILE *fp |
393 |
> |
) |
394 |
|
{ |
395 |
|
char linebuf[256]; |
396 |
|
char *err; |
397 |
< |
register int i; |
397 |
> |
int i; |
398 |
|
|
399 |
|
if (fp != NULL) { |
400 |
|
do /* get new view */ |
417 |
|
avgview.vdir[i] += ourview.vdir[i]; |
418 |
|
avgview.vup[i] += ourview.vup[i]; |
419 |
|
} |
420 |
+ |
avgview.vdist += ourview.vdist; |
421 |
|
avgview.horiz += ourview.horiz; |
422 |
|
avgview.vert += ourview.vert; |
423 |
|
avgview.hoff += ourview.hoff; |
428 |
|
} |
429 |
|
|
430 |
|
|
431 |
< |
compavgview() /* compute average view */ |
431 |
> |
static void |
432 |
> |
compavgview(void) /* compute average view */ |
433 |
|
{ |
434 |
< |
register int i; |
434 |
> |
int i; |
435 |
|
double f; |
436 |
|
|
437 |
|
if (nvavg < 2) |
442 |
|
avgview.vdir[i] *= f; |
443 |
|
avgview.vup[i] *= f; |
444 |
|
} |
445 |
+ |
avgview.vdist *= f; |
446 |
|
avgview.horiz *= f; |
447 |
|
avgview.vert *= f; |
448 |
|
avgview.hoff *= f; |
455 |
|
} |
456 |
|
|
457 |
|
|
458 |
< |
addpicture(pfile, zspec) /* add picture to output */ |
459 |
< |
char *pfile, *zspec; |
458 |
> |
static void |
459 |
> |
addpicture( /* add picture to output */ |
460 |
> |
char *pfile, |
461 |
> |
char *zspec |
462 |
> |
) |
463 |
|
{ |
464 |
|
FILE *pfp; |
465 |
|
int zfd; |
497 |
|
zin = (float *)malloc(scanlen(&tresolu)*sizeof(float)); |
498 |
|
if (zin == NULL) |
499 |
|
syserror(progname); |
500 |
< |
if ((zfd = open(zspec, O_RDONLY)) == -1) { |
500 |
> |
if ((zfd = open_float_depth(zspec, (long)tresolu.xr*tresolu.yr)) < 0) { |
501 |
|
double zvalue; |
502 |
< |
register int x; |
502 |
> |
int x; |
503 |
|
if (!isflt(zspec) || (zvalue = atof(zspec)) <= 0.0) |
504 |
|
syserror(zspec); |
505 |
|
for (x = scanlen(&tresolu); x-- > 0; ) |
556 |
|
} |
557 |
|
|
558 |
|
|
559 |
< |
pixform(xfmat, vw1, vw2) /* compute view1 to view2 matrix */ |
560 |
< |
register MAT4 xfmat; |
561 |
< |
register VIEW *vw1, *vw2; |
559 |
> |
static int |
560 |
> |
pixform( /* compute view1 to view2 matrix */ |
561 |
> |
MAT4 xfmat, |
562 |
> |
VIEW *vw1, |
563 |
> |
VIEW *vw2 |
564 |
> |
) |
565 |
|
{ |
566 |
< |
double m4t[4][4]; |
566 |
> |
MAT4 m4t; |
567 |
|
|
568 |
|
if ((vw1->type != VT_PER) & (vw1->type != VT_PAR)) |
569 |
|
return(0); |
600 |
|
} |
601 |
|
|
602 |
|
|
603 |
< |
addscanline(xl, y, pline, zline, lasty) /* add scanline to output */ |
604 |
< |
struct bound *xl; |
605 |
< |
int y; |
606 |
< |
COLR *pline; |
607 |
< |
float *zline; |
608 |
< |
struct position *lasty; /* input/output */ |
603 |
> |
static void |
604 |
> |
addscanline( /* add scanline to output */ |
605 |
> |
struct bound *xl, |
606 |
> |
int y, |
607 |
> |
COLR *pline, |
608 |
> |
float *zline, |
609 |
> |
struct position *lasty /* input/output */ |
610 |
> |
) |
611 |
|
{ |
612 |
|
FVECT pos; |
613 |
|
struct position lastx, newpos; |
614 |
|
double wt; |
615 |
< |
register int x; |
615 |
> |
int x; |
616 |
|
|
617 |
|
lastx.z = 0; |
618 |
|
for (x = xl->max; x >= xl->min; x--) { |
634 |
|
} |
635 |
|
|
636 |
|
|
637 |
< |
addpixel(p0, p1, p2, pix, w, z) /* fill in pixel parallelogram */ |
638 |
< |
struct position *p0, *p1, *p2; |
639 |
< |
COLR pix; |
640 |
< |
double w; |
641 |
< |
double z; |
637 |
> |
static void |
638 |
> |
addpixel( /* fill in pixel parallelogram */ |
639 |
> |
struct position *p0, |
640 |
> |
struct position *p1, |
641 |
> |
struct position *p2, |
642 |
> |
COLR pix, |
643 |
> |
double w, |
644 |
> |
double z |
645 |
> |
) |
646 |
|
{ |
647 |
|
double zt = 2.*zeps*p0->z; /* threshold */ |
648 |
|
COLOR pval; /* converted+weighted pixel */ |
650 |
|
int l1, l2, c1, c2; /* side lengths and counters */ |
651 |
|
int p1isy; /* p0p1 along y? */ |
652 |
|
int x1, y1; /* p1 position */ |
653 |
< |
register int x, y; /* final position */ |
653 |
> |
int x, y; /* final position */ |
654 |
|
|
655 |
|
/* compute vector p0p1 */ |
656 |
|
if (fillo&F_FORE && ABS(p1->z-p0->z) <= zt) { |
715 |
|
} |
716 |
|
|
717 |
|
|
718 |
< |
double |
719 |
< |
movepixel(pos) /* reposition image point */ |
720 |
< |
register FVECT pos; |
718 |
> |
static double |
719 |
> |
movepixel( /* reposition image point */ |
720 |
> |
FVECT pos |
721 |
> |
) |
722 |
|
{ |
723 |
|
FVECT pt, tdir, odir; |
724 |
|
double d; |
753 |
|
if (viewray(pt, tdir, &theirview, pos[0], pos[1]) < -FTINY) |
754 |
|
return(0); |
755 |
|
if ((!normdist) & (theirview.type == VT_PER)) /* adjust */ |
756 |
< |
pos[2] *= sqrt(1. + pos[0]*pos[0]*theirview.hn2 |
713 |
< |
+ pos[1]*pos[1]*theirview.vn2); |
756 |
> |
pos[2] /= DOT(theirview.vdir, tdir); |
757 |
|
pt[0] += tdir[0]*pos[2]; |
758 |
|
pt[1] += tdir[1]*pos[2]; |
759 |
|
pt[2] += tdir[2]*pos[2]; |
760 |
< |
viewloc(pos, &ourview, pt); |
718 |
< |
if (pos[2] <= 0) |
760 |
> |
if (viewloc(pos, &ourview, pt) <= 0) |
761 |
|
return(0); |
762 |
|
} |
763 |
|
if ((pos[0] < 0) | (pos[0] >= 1-FTINY) | (pos[1] < 0) | (pos[1] >= 1-FTINY)) |
779 |
|
} |
780 |
|
|
781 |
|
|
782 |
< |
getperim(xl, yl, zline, zfd) /* compute overlapping image area */ |
783 |
< |
register struct bound *xl; |
784 |
< |
struct bound *yl; |
785 |
< |
float *zline; |
786 |
< |
int zfd; |
782 |
> |
static int |
783 |
> |
getperim( /* compute overlapping image area */ |
784 |
> |
struct bound *xl, |
785 |
> |
struct bound *yl, |
786 |
> |
float *zline, |
787 |
> |
int zfd |
788 |
> |
) |
789 |
|
{ |
790 |
|
int step; |
791 |
|
FVECT pos; |
792 |
< |
register int x, y; |
792 |
> |
int x, y; |
793 |
|
/* set up step size */ |
794 |
|
if (scanlen(&tresolu) < numscans(&tresolu)) |
795 |
|
step = scanlen(&tresolu)/NSTEPS; |
865 |
|
} |
866 |
|
|
867 |
|
|
868 |
< |
backpicture(fill, samp) /* background fill algorithm */ |
869 |
< |
int (*fill)(); |
870 |
< |
int samp; |
868 |
> |
static void |
869 |
> |
backpicture( /* background fill algorithm */ |
870 |
> |
fillfunc_t *fill, |
871 |
> |
int samp |
872 |
> |
) |
873 |
|
{ |
874 |
|
int *yback, xback; |
875 |
|
int y; |
876 |
< |
register int x, i; |
876 |
> |
int x, i; |
877 |
|
/* get back buffer */ |
878 |
|
yback = (int *)malloc(hresolu*sizeof(int)); |
879 |
|
if (yback == NULL) |
975 |
|
} |
976 |
|
|
977 |
|
|
978 |
< |
fillpicture(fill) /* paint in empty pixels using fill */ |
979 |
< |
int (*fill)(); |
978 |
> |
static void |
979 |
> |
fillpicture( /* paint in empty pixels using fill */ |
980 |
> |
fillfunc_t *fill |
981 |
> |
) |
982 |
|
{ |
983 |
< |
register int x, y; |
983 |
> |
int x, y; |
984 |
|
|
985 |
|
for (y = 0; y < vresolu; y++) |
986 |
|
for (x = 0; x < hresolu; x++) |
991 |
|
} |
992 |
|
|
993 |
|
|
994 |
< |
clipaft() /* perform aft clipping as indicated */ |
994 |
> |
static int |
995 |
> |
clipaft(void) /* perform aft clipping as indicated */ |
996 |
|
{ |
997 |
< |
register int x, y; |
997 |
> |
int x, y; |
998 |
|
int adjtest = (ourview.type == VT_PER) & zisnorm; |
999 |
|
double tstdist; |
1000 |
|
double yzn2, vx; |
1028 |
|
} |
1029 |
|
|
1030 |
|
|
1031 |
< |
addblur() /* add to blurred picture */ |
1031 |
> |
static int |
1032 |
> |
addblur(void) /* add to blurred picture */ |
1033 |
|
{ |
1034 |
|
COLOR cval; |
1035 |
|
double d; |
1036 |
< |
register int i; |
1036 |
> |
int i; |
1037 |
|
|
1038 |
|
if (!blurring) |
1039 |
|
return(0); |
1069 |
|
} |
1070 |
|
|
1071 |
|
|
1072 |
< |
writepicture() /* write out picture (alters buffer) */ |
1072 |
> |
static void |
1073 |
> |
writepicture(void) /* write out picture (alters buffer) */ |
1074 |
|
{ |
1075 |
|
int y; |
1076 |
< |
register int x; |
1076 |
> |
int x; |
1077 |
|
double d; |
1078 |
|
|
1079 |
|
fprtresolu(hresolu, vresolu, stdout); |
1101 |
|
} |
1102 |
|
|
1103 |
|
|
1104 |
< |
writedistance(fname) /* write out z file (alters buffer) */ |
1105 |
< |
char *fname; |
1104 |
> |
static void |
1105 |
> |
writedistance( /* write out z file (alters buffer) */ |
1106 |
> |
char *fname |
1107 |
> |
) |
1108 |
|
{ |
1109 |
|
int donorm = normdist & !zisnorm ? 1 : |
1110 |
|
(ourview.type == VT_PER) & !normdist & zisnorm ? -1 : 0; |
1116 |
|
for (y = vresolu-1; y >= 0; y--) { |
1117 |
|
if (donorm) { |
1118 |
|
double vx, yzn2, d; |
1119 |
< |
register int x; |
1119 |
> |
int x; |
1120 |
|
yzn2 = (y+.5)/vresolu + ourview.voff - .5; |
1121 |
|
yzn2 = 1. + yzn2*yzn2*ourview.vn2; |
1122 |
|
for (x = 0; x < hresolu; x++) { |
1136 |
|
} |
1137 |
|
|
1138 |
|
|
1139 |
< |
backfill(x, y) /* fill pixel with background */ |
1140 |
< |
int x, y; |
1139 |
> |
static void |
1140 |
> |
backfill( /* fill pixel with background */ |
1141 |
> |
int x, |
1142 |
> |
int y |
1143 |
> |
) |
1144 |
|
{ |
1145 |
|
if (averaging) { |
1146 |
|
copycolor(sscan(y)[x], backcolor); |
1151 |
|
} |
1152 |
|
|
1153 |
|
|
1154 |
< |
calstart(prog, args) /* start fill calculation */ |
1155 |
< |
char *prog, *args; |
1154 |
> |
static void |
1155 |
> |
calstart( /* start fill calculation */ |
1156 |
> |
char *prog, |
1157 |
> |
char *args |
1158 |
> |
) |
1159 |
|
{ |
1160 |
|
char combuf[512]; |
1161 |
|
char *argv[64]; |
1162 |
|
int rval; |
1163 |
< |
register char **wp, *cp; |
1163 |
> |
char **wp, *cp; |
1164 |
|
|
1165 |
< |
if (PDesc.running) { |
1165 |
> |
if (PDesc.flags & PF_RUNNING) { |
1166 |
|
fprintf(stderr, "%s: too many calculations\n", progname); |
1167 |
|
exit(1); |
1168 |
|
} |
1194 |
|
} |
1195 |
|
|
1196 |
|
|
1197 |
< |
caldone() /* done with calculation */ |
1197 |
> |
static void |
1198 |
> |
caldone(void) /* done with calculation */ |
1199 |
|
{ |
1200 |
< |
if (!PDesc.running) |
1200 |
> |
if (!(PDesc.flags & PF_RUNNING)) |
1201 |
|
return; |
1202 |
|
clearqueue(); |
1203 |
|
close_process(&PDesc); |
1204 |
|
} |
1205 |
|
|
1206 |
|
|
1207 |
< |
rcalfill(x, y) /* fill with ray-calculated pixel */ |
1208 |
< |
int x, y; |
1207 |
> |
static void |
1208 |
> |
rcalfill( /* fill with ray-calculated pixel */ |
1209 |
> |
int x, |
1210 |
> |
int y |
1211 |
> |
) |
1212 |
|
{ |
1213 |
|
if (queuesiz >= packsiz) /* flush queue if needed */ |
1214 |
|
clearqueue(); |
1219 |
|
} |
1220 |
|
|
1221 |
|
|
1222 |
< |
clearqueue() /* process queue */ |
1222 |
> |
static void |
1223 |
> |
clearqueue(void) /* process queue */ |
1224 |
|
{ |
1225 |
|
FVECT orig, dir; |
1226 |
|
float fbuf[6*(PACKSIZ+1)]; |
1227 |
< |
register float *fbp; |
1228 |
< |
register int i; |
1227 |
> |
float *fbp; |
1228 |
> |
int i; |
1229 |
|
double vx, vy; |
1230 |
|
|
1231 |
|
if (queuesiz == 0) |
1276 |
|
} |
1277 |
|
|
1278 |
|
|
1279 |
< |
syserror(s) /* report error and exit */ |
1280 |
< |
char *s; |
1279 |
> |
static void |
1280 |
> |
syserror( /* report error and exit */ |
1281 |
> |
char *s |
1282 |
> |
) |
1283 |
|
{ |
1284 |
|
perror(s); |
1285 |
|
exit(1); |