219 |
|
rgbinp = TM_XYZPRIM; |
220 |
|
return(0); |
221 |
|
} |
222 |
+ |
if (!strcmp(fmt,SPECFMT)) |
223 |
+ |
return(0); |
224 |
|
return(-1); |
225 |
|
} |
226 |
|
if (isprims(s)) { /* get input primaries */ |
228 |
|
rgbinp = myinprims; |
229 |
|
return(0); |
230 |
|
} |
231 |
+ |
if (isncomp(s)) { |
232 |
+ |
NCSAMP = ncompval(s); |
233 |
+ |
return(0); |
234 |
+ |
} |
235 |
+ |
if (iswlsplit(s)) { |
236 |
+ |
wlsplitval(WLPART, s); |
237 |
+ |
return(0); |
238 |
+ |
} |
239 |
|
/* should I grok colcorr also? */ |
240 |
|
return(0); |
241 |
|
} |
259 |
|
usexfm = (monpri != NULL ? rgbinp != monpri : |
260 |
|
rgbinp != TM_XYZPRIM && rgbinp != stdprims); |
261 |
|
if (usexfm) { |
262 |
< |
double expcomp = pow(2.0, (double)bradj); |
262 |
> |
RGBPRIMP destpri = monpri != NULL ? monpri : stdprims; |
263 |
> |
double expcomp = pow(2.0, (double)bradj); |
264 |
|
if (rgbinp == TM_XYZPRIM) |
265 |
< |
compxyz2rgbWBmat(xfm, monpri); |
265 |
> |
compxyz2rgbWBmat(xfm, destpri); |
266 |
|
else |
267 |
< |
comprgb2rgbWBmat(xfm, rgbinp, monpri); |
267 |
> |
comprgb2rgbWBmat(xfm, rgbinp, destpri); |
268 |
|
for (y = 0; y < 3; y++) |
269 |
|
for (x = 0; x < 3; x++) |
270 |
|
xfm[y][x] *= expcomp; |
279 |
|
} |
280 |
|
/* convert each scanline */ |
281 |
|
for ( ; y != yend; y += ystp) { |
282 |
< |
if (freadcolrs(scanin, bwr->hdr->width, rfp) < 0) |
282 |
> |
if (fread2colrs(scanin, bwr->hdr->width, rfp, NCSAMP, WLPART) < 0) |
283 |
|
quiterr("error reading Radiance picture"); |
284 |
|
if (usexfm) |
285 |
|
for (x = bwr->hdr->width; x--; ) { |