12 |
|
|
13 |
|
#include <stdio.h> |
14 |
|
|
15 |
+ |
#ifdef MSDOS |
16 |
+ |
#include <fcntl.h> |
17 |
+ |
#endif |
18 |
+ |
|
19 |
|
#include "color.h" |
20 |
|
|
21 |
|
#include "ambient.h" |
22 |
|
|
23 |
|
|
24 |
|
int dataonly = 0; |
25 |
< |
|
25 |
> |
int header = 1; |
26 |
|
int reverse = 0; |
27 |
|
|
28 |
|
AMBVAL av; |
29 |
|
|
30 |
|
|
31 |
|
main(argc, argv) /* load ambient values from a file */ |
32 |
+ |
int argc; |
33 |
|
char *argv[]; |
34 |
|
{ |
35 |
|
FILE *fp; |
44 |
|
case 'r': |
45 |
|
reverse = 1; |
46 |
|
break; |
47 |
+ |
case 'h': |
48 |
+ |
header = 0; |
49 |
+ |
break; |
50 |
|
default: |
51 |
|
fprintf(stderr, "%s: unknown option '%s'\n", |
52 |
|
argv[0], argv[i]); |
61 |
|
fprintf(stderr, "%s: file not found\n", argv[i]); |
62 |
|
return(1); |
63 |
|
} |
64 |
< |
if (reverse) |
64 |
> |
if (reverse) { |
65 |
> |
if (header) { |
66 |
> |
if (checkheader(fp, "ascii", stdout) < 0) |
67 |
> |
goto formaterr; |
68 |
> |
} else { |
69 |
> |
newheader("RADIANCE", stdout); |
70 |
> |
printargs(argc, argv, stdout); |
71 |
> |
} |
72 |
> |
fputformat(AMBFMT, stdout); |
73 |
> |
putchar('\n'); |
74 |
> |
#ifdef MSDOS |
75 |
> |
setmode(fileno(stdout), O_BINARY); |
76 |
> |
#endif |
77 |
> |
putambmagic(stdout); |
78 |
|
writamb(fp); |
79 |
< |
else |
79 |
> |
} else { |
80 |
> |
#ifdef MSDOS |
81 |
> |
setmode(fileno(fp), O_BINARY); |
82 |
> |
#endif |
83 |
> |
if (checkheader(fp, AMBFMT, header ? stdout : (FILE *)NULL) < 0) |
84 |
> |
goto formaterr; |
85 |
> |
if (!hasambmagic(fp)) |
86 |
> |
goto formaterr; |
87 |
> |
if (header) { |
88 |
> |
fputformat("ascii", stdout); |
89 |
> |
putchar('\n'); |
90 |
> |
} |
91 |
|
lookamb(fp); |
92 |
+ |
} |
93 |
|
fclose(fp); |
94 |
|
return(0); |
95 |
+ |
formaterr: |
96 |
+ |
fprintf(stderr, "%s: format error on input\n", argv[0]); |
97 |
+ |
exit(1); |
98 |
|
} |
99 |
|
|
100 |
|
|
101 |
|
lookamb(fp) /* get ambient values from a file */ |
102 |
|
FILE *fp; |
103 |
|
{ |
104 |
< |
while (fread((char *)&av, sizeof(AMBVAL), 1, fp) == 1) { |
104 |
> |
while (readambval(&av, fp)) { |
105 |
|
if (dataonly) { |
106 |
|
printf("%f\t%f\t%f\t", av.pos[0], av.pos[1], av.pos[2]); |
107 |
|
printf("%f\t%f\t%f\t", av.dir[0], av.dir[1], av.dir[2]); |
168 |
|
&av.gdir[0], &av.gdir[1], &av.gdir[2]) != 3) |
169 |
|
return; |
170 |
|
av.next = NULL; |
171 |
< |
fwrite((char *)&av, sizeof(AMBVAL), 1, stdout); |
171 |
> |
writambval(&av, stdout); |
172 |
|
if (ferror(stdout)) |
173 |
|
exit(1); |
174 |
|
} |