55 |
|
static RAY thisray; /* for our convenience */ |
56 |
|
|
57 |
|
typedef void putf_t(RREAL *v, int n); |
58 |
< |
static putf_t puta, putd, putf; |
58 |
> |
static putf_t puta, putd, putf, putrgbe; |
59 |
|
|
60 |
|
typedef void oputf_t(RAY *r); |
61 |
|
static oputf_t oputo, oputd, oputv, oputV, oputl, oputL, oputc, oputp, |
118 |
|
unsigned long vcount = (hresolu > 1) ? (unsigned long)hresolu*vresolu |
119 |
|
: (unsigned long)vresolu; |
120 |
|
long nextflush = (vresolu > 0) & (hresolu > 1) ? 0 : hresolu; |
121 |
+ |
int something2flush = 0; |
122 |
|
FILE *fp; |
123 |
|
double d; |
124 |
|
FVECT orig, direc; |
137 |
|
castonly = 0; |
138 |
|
else if (castonly) |
139 |
|
nproc = 1; /* don't bother multiprocessing */ |
140 |
+ |
if ((nextflush > 0) & (nproc > nextflush)) { |
141 |
+ |
error(WARNING, "reducing number of processes to match flush interval"); |
142 |
+ |
nproc = nextflush; |
143 |
+ |
} |
144 |
|
switch (outform) { |
145 |
|
case 'a': putreal = puta; break; |
146 |
|
case 'f': putreal = putf; break; |
147 |
|
case 'd': putreal = putd; break; |
148 |
|
case 'c': |
149 |
< |
if (strcmp(outvals, "v")) |
150 |
< |
error(USER, "color format with value output only"); |
151 |
< |
break; |
149 |
> |
if (outvals[0] && (outvals[1] || !strchr("vVWrx", outvals[0]))) |
150 |
> |
error(USER, "color format only with one of 'vVWrx'"); |
151 |
> |
putreal = putrgbe; break; |
152 |
|
default: |
153 |
|
error(CONSISTENCY, "botched output format"); |
154 |
|
} |
159 |
|
if (hresolu > 0) { |
160 |
|
if (vresolu > 0) |
161 |
|
fprtresolu(hresolu, vresolu, stdout); |
162 |
< |
fflush(stdout); |
162 |
> |
else |
163 |
> |
fflush(stdout); |
164 |
|
} |
165 |
|
/* process file */ |
166 |
|
while (getvec(orig, inform, fp) == 0 && |
168 |
|
|
169 |
|
d = normalize(direc); |
170 |
|
if (d == 0.0) { /* zero ==> flush */ |
171 |
< |
if ((--nextflush <= 0) | !vcount) { |
171 |
> |
if ((--nextflush <= 0) | !vcount && something2flush) { |
172 |
|
if (ray_pnprocs > 1 && ray_fifo_flush() < 0) |
173 |
|
error(USER, "child(ren) died"); |
174 |
|
bogusray(); |
175 |
|
fflush(stdout); |
176 |
+ |
something2flush = 0; |
177 |
|
nextflush = (vresolu > 0) & (hresolu > 1) ? 0 : |
178 |
|
hresolu; |
179 |
|
} else |
186 |
|
error(USER, "child(ren) died"); |
187 |
|
fflush(stdout); |
188 |
|
nextflush = hresolu; |
189 |
< |
} |
189 |
> |
} else |
190 |
> |
something2flush = 1; |
191 |
|
} |
192 |
|
if (ferror(stdout)) |
193 |
|
error(SYSTEM, "write error"); |
301 |
|
case 'W': /* coefficient */ |
302 |
|
*table++ = oputW; |
303 |
|
castonly = 0; |
304 |
< |
if (ambounce > 0 && (ambacc > FTINY || ambssamp > 0)) |
304 |
> |
if (ambounce > 0 && (ambacc > FTINY) | (ambssamp > 0)) |
305 |
|
error(WARNING, |
306 |
|
"-otW accuracy depends on -aa 0 -as 0"); |
307 |
|
break; |
316 |
|
break; |
317 |
|
} |
318 |
|
*table = NULL; |
319 |
+ |
if (do_irrad | imm_irrad) /* compatibile? */ |
320 |
+ |
for (table = ray_out; *table != NULL; table++) |
321 |
+ |
if ((*table == oputr) | (*table == oputR) | |
322 |
+ |
(*table == oputx) | (*table == oputX)) { |
323 |
+ |
error(WARNING, "-orRxX options incompatible with -I+ and -i+"); |
324 |
+ |
break; |
325 |
+ |
} |
326 |
|
} |
327 |
|
|
328 |
|
|
329 |
|
static void |
330 |
|
bogusray(void) /* print out empty record */ |
331 |
|
{ |
317 |
– |
memset(&thisray, 0, sizeof(thisray)); |
332 |
|
rayorigin(&thisray, PRIMARY, NULL, NULL); |
333 |
|
printvals(&thisray); |
334 |
|
} |
593 |
|
{ |
594 |
|
RREAL cval[3]; |
595 |
|
|
582 |
– |
if (outform == 'c') { |
583 |
– |
COLR cout; |
584 |
– |
setcolr(cout, colval(r->rcol,RED), |
585 |
– |
colval(r->rcol,GRN), |
586 |
– |
colval(r->rcol,BLU)); |
587 |
– |
putbinary(cout, sizeof(cout), 1, stdout); |
588 |
– |
return; |
589 |
– |
} |
596 |
|
cval[0] = colval(r->rcol,RED); |
597 |
|
cval[1] = colval(r->rcol,GRN); |
598 |
|
cval[2] = colval(r->rcol,BLU); |
783 |
|
|
784 |
|
|
785 |
|
static void |
786 |
< |
putd(RREAL *v, int n) /* print binary double(s) */ |
786 |
> |
putd(RREAL *v, int n) /* output binary double(s) */ |
787 |
|
{ |
788 |
|
#ifdef SMLFLT |
789 |
|
double da[3]; |
801 |
|
|
802 |
|
|
803 |
|
static void |
804 |
< |
putf(RREAL *v, int n) /* print binary float(s) */ |
804 |
> |
putf(RREAL *v, int n) /* output binary float(s) */ |
805 |
|
{ |
806 |
|
#ifndef SMLFLT |
807 |
|
float fa[3]; |
815 |
|
#else |
816 |
|
putbinary(v, sizeof(RREAL), n, stdout); |
817 |
|
#endif |
818 |
+ |
} |
819 |
+ |
|
820 |
+ |
|
821 |
+ |
static void |
822 |
+ |
putrgbe(RREAL *v, int n) /* output RGBE color */ |
823 |
+ |
{ |
824 |
+ |
COLR cout; |
825 |
+ |
|
826 |
+ |
if (n != 3) |
827 |
+ |
error(INTERNAL, "putrgbe() not called with 3 components"); |
828 |
+ |
setcolr(cout, v[0], v[1], v[2]); |
829 |
+ |
putbinary(cout, sizeof(cout), 1, stdout); |
830 |
|
} |