78 |
|
|
79 |
|
|
80 |
|
int |
81 |
< |
main(argc, argv) |
82 |
< |
int argc; |
83 |
< |
char *argv[]; |
81 |
> |
main(int argc, char *argv[]) |
82 |
|
{ |
83 |
|
POINT *row0, *row1, *row2, *rp; |
84 |
|
int i, j, m, n; |
85 |
|
char stmp[256]; |
86 |
|
|
87 |
+ |
esupport |= E_VARIABLE|E_FUNCTION|E_RCONST; |
88 |
+ |
esupport &= ~(E_OUTCHAN|E_INCHAN); |
89 |
|
varset("PI", ':', PI); |
90 |
|
funset("hermite", 5, ':', l_hermite); |
91 |
|
funset("bezier", 5, ':', l_bezier); |
97 |
|
for (i = 8; i < argc; i++) |
98 |
|
if (!strcmp(argv[i], "-e")) |
99 |
|
scompile(argv[++i], NULL, 0); |
100 |
< |
else if (!strcmp(argv[i], "-f")) |
101 |
< |
fcompile(argv[++i]); |
102 |
< |
else if (!strcmp(argv[i], "-s")) |
100 |
> |
else if (!strcmp(argv[i], "-f")) { |
101 |
> |
char *fpath = getpath(argv[++i], getrlibpath(), 0); |
102 |
> |
if (fpath == NULL) { |
103 |
> |
fprintf(stderr, "%s: cannot find file '%s'\n", |
104 |
> |
argv[0], argv[i]); |
105 |
> |
quit(1); |
106 |
> |
} |
107 |
> |
fcompile(fpath); |
108 |
> |
} else if (!strcmp(argv[i], "-s")) |
109 |
|
smooth++; |
110 |
|
else if (!strcmp(argv[i], "-o")) |
111 |
|
objout++; |
114 |
|
|
115 |
|
modname = argv[1]; |
116 |
|
surfname = argv[2]; |
117 |
< |
m = atoi(argv[6]); |
118 |
< |
n = atoi(argv[7]); |
117 |
> |
m = eval(argv[6]) + .5; |
118 |
> |
n = eval(argv[7]) + .5; |
119 |
|
if (m <= 0 || n <= 0) |
120 |
|
goto userror; |
121 |
|
if (!strcmp(argv[5], "-") || access(argv[5], 4) == 0) { /* file? */ |
158 |
|
compnorms(row0, row1, row2, n); |
159 |
|
if (objout) { |
160 |
|
printf("\nusemtl %s\n\n", modname); |
161 |
+ |
printf("o %s\n\n", surfname); |
162 |
|
putobjrow(row1, n); |
163 |
|
} |
164 |
|
/* for each row */ |
509 |
|
/* compute row 1 normals */ |
510 |
|
while (siz-- >= 0) { |
511 |
|
if (!r1[0].valid) |
512 |
< |
continue; |
512 |
> |
goto skip; |
513 |
|
if (!r0[0].valid) { |
514 |
|
if (!r2[0].valid) { |
515 |
|
r1[0].n[0] = r1[0].n[1] = r1[0].n[2] = 0.0; |
516 |
< |
continue; |
516 |
> |
goto skip; |
517 |
|
} |
518 |
|
fvsum(v1, r2[0].p, r1[0].p, -1.0); |
519 |
|
} else if (!r2[0].valid) |
523 |
|
if (!r1[-1].valid) { |
524 |
|
if (!r1[1].valid) { |
525 |
|
r1[0].n[0] = r1[0].n[1] = r1[0].n[2] = 0.0; |
526 |
< |
continue; |
526 |
> |
goto skip; |
527 |
|
} |
528 |
|
fvsum(v2, r1[1].p, r1[0].p, -1.0); |
529 |
|
} else if (!r1[1].valid) |
532 |
|
fvsum(v2, r1[1].p, r1[-1].p, -1.0); |
533 |
|
fcross(r1[0].n, v1, v2); |
534 |
|
normalize(r1[0].n); |
535 |
+ |
skip: |
536 |
|
r0++; r1++; r2++; |
537 |
|
} |
538 |
|
} |