int /* O - Read status */
_cupsImageReadPNG(
cups_image_t *img, /* IO - cupsImage */
FILE *fp, /* I - cupsImage file */
cups_icspace_t primary, /* I - Primary choice for colorspace */
cups_icspace_t secondary, /* I - Secondary choice for colorspace */
int saturation, /* I - Color saturation (%) */
int hue, /* I - Color hue (degrees) */
const cups_ib_t *lut) /* I - Lookup table for gamma/brightness */
{
int y; /* Looping var */
png_structp pp; /* PNG read pointer */
png_infop info; /* PNG info pointers */
png_uint_32 width, /* Width of image */
height; /* Height of image */
int bit_depth, /* Bit depth */
color_type, /* Color type */
interlace_type, /* Interlace type */
compression_type, /* Compression type */
filter_type; /* Filter type */
png_uint_32 xppm, /* X pixels per meter */
yppm; /* Y pixels per meter */
int bpp; /* Bytes per pixel */
int pass, /* Current pass */
passes; /* Number of passes required */
cups_ib_t *in, /* Input pixels */
*inptr, /* Pointer into pixels */
*out; /* Output pixels */
png_color_16 bg; /* Background color */
/*
* Setup the PNG data structures...
*/
pp = png_create_read_struct(PNG_LIBPNG_VER_STRING, NULL, NULL, NULL);
info = png_create_info_struct(pp);
/*
* Initialize the PNG read "engine"...
*/
png_init_io(pp, fp);
/*
* Get the image dimensions and load the output image...
*/
png_read_info(pp, info);
png_get_IHDR(pp, info, &width, &height, &bit_depth, &color_type,
&interlace_type, &compression_type, &filter_type);
fprintf(stderr, "DEBUG: PNG image: %dx%dx%d, color_type=%x (%s%s%s)\n",
(int)width, (int)height, bit_depth, color_type,
(color_type & PNG_COLOR_MASK_COLOR) ? "RGB" : "GRAYSCALE",
(color_type & PNG_COLOR_MASK_ALPHA) ? "+ALPHA" : "",
(color_type & PNG_COLOR_MASK_PALETTE) ? "+PALETTE" : "");
if (color_type & PNG_COLOR_MASK_PALETTE)
png_set_expand(pp);
else if (bit_depth < 8)
{
png_set_packing(pp);
png_set_expand(pp);
}
else if (bit_depth == 16)
png_set_strip_16(pp);
if (color_type & PNG_COLOR_MASK_COLOR)
img->colorspace = (primary == CUPS_IMAGE_RGB_CMYK) ? CUPS_IMAGE_RGB :
primary;
else
img->colorspace = secondary;
if (width == 0 || width > CUPS_IMAGE_MAX_WIDTH ||
height == 0 || height > CUPS_IMAGE_MAX_HEIGHT)
{
fprintf(stderr, "DEBUG: PNG image has invalid dimensions %ux%u!\n",
(unsigned)width, (unsigned)height);
fclose(fp);
return (1);
}
img->xsize = width;
img->ysize = height;
if ((xppm = png_get_x_pixels_per_meter(pp, info)) != 0 &&
(yppm = png_get_y_pixels_per_meter(pp, info)) != 0)
{
img->xppi = (int)((float)xppm * 0.0254);
img->yppi = (int)((float)yppm * 0.0254);
if (img->xppi == 0 || img->yppi == 0)
{
fprintf(stderr, "DEBUG: PNG image has invalid resolution %dx%d PPI\n",
img->xppi, img->yppi);
img->xppi = img->yppi = 128;
}
}
cupsImageSetMaxTiles(img, 0);
passes = png_set_interlace_handling(pp);
/*
* Handle transparency...
*/
if (png_get_valid(pp, info, PNG_INFO_tRNS))
png_set_tRNS_to_alpha(pp);
bg.red = 65535;
bg.green = 65535;
bg.blue = 65535;
png_set_background(pp, &bg, PNG_BACKGROUND_GAMMA_SCREEN, 0, 1.0);
if (passes == 1)
{
/*
* Load one row at a time...
*/
if (color_type == PNG_COLOR_TYPE_GRAY ||
color_type == PNG_COLOR_TYPE_GRAY_ALPHA)
in = malloc(img->xsize);
else
in = malloc(img->xsize * 3);
}
else
{
/*
* Interlaced images must be loaded all at once...
*/
size_t bufsize; /* Size of buffer */
if (color_type == PNG_COLOR_TYPE_GRAY ||
color_type == PNG_COLOR_TYPE_GRAY_ALPHA)
{
bufsize = img->xsize * img->ysize;
if ((bufsize / img->ysize) != img->xsize)
{
fprintf(stderr, "DEBUG: PNG image dimensions (%ux%u) too large!\n",
(unsigned)width, (unsigned)height);
fclose(fp);
return (1);
}
}
else
{
bufsize = img->xsize * img->ysize * 3;
if ((bufsize / (img->ysize * 3)) != img->xsize)
{
fprintf(stderr, "DEBUG: PNG image dimensions (%ux%u) too large!\n",
(unsigned)width, (unsigned)height);
fclose(fp);
return (1);
}
}
in = malloc(bufsize);
}
bpp = cupsImageGetDepth(img);
out = malloc(img->xsize * bpp);
if (!in || !out)
{
fputs("DEBUG: Unable to allocate memory for PNG image!\n", stderr);
if (in)
free(in);
if (out)
free(out);
fclose(fp);
return (1);
}
/*
* Read the image, interlacing as needed...
*/
for (pass = 1; pass <= passes; pass ++)
for (inptr = in, y = 0; y < img->ysize; y ++)
{
png_read_row(pp, (png_bytep)inptr, NULL);
if (pass == passes)
{
/*
* Output this row...
*/
if (color_type & PNG_COLOR_MASK_COLOR)
{
if ((saturation != 100 || hue != 0) && bpp > 1)
cupsImageRGBAdjust(inptr, img->xsize, saturation, hue);
switch (img->colorspace)
{
case CUPS_IMAGE_WHITE :
cupsImageRGBToWhite(inptr, out, img->xsize);
break;
case CUPS_IMAGE_RGB :
case CUPS_IMAGE_RGB_CMYK :
cupsImageRGBToRGB(inptr, out, img->xsize);
break;
case CUPS_IMAGE_BLACK :
cupsImageRGBToBlack(inptr, out, img->xsize);
break;
case CUPS_IMAGE_CMY :
cupsImageRGBToCMY(inptr, out, img->xsize);
break;
case CUPS_IMAGE_CMYK :
cupsImageRGBToCMYK(inptr, out, img->xsize);
break;
}
}
else
{
switch (img->colorspace)
{
case CUPS_IMAGE_WHITE :
memcpy(out, inptr, img->xsize);
break;
case CUPS_IMAGE_RGB :
case CUPS_IMAGE_RGB_CMYK :
cupsImageWhiteToRGB(inptr, out, img->xsize);
break;
case CUPS_IMAGE_BLACK :
cupsImageWhiteToBlack(inptr, out, img->xsize);
break;
case CUPS_IMAGE_CMY :
cupsImageWhiteToCMY(inptr, out, img->xsize);
break;
case CUPS_IMAGE_CMYK :
cupsImageWhiteToCMYK(inptr, out, img->xsize);
break;
}
}
if (lut)
cupsImageLut(out, img->xsize * bpp, lut);
_cupsImagePutRow(img, 0, y, img->xsize, out);
}
if (passes > 1)
{
if (color_type & PNG_COLOR_MASK_COLOR)
inptr += img->xsize * 3;
else
inptr += img->xsize;
}
}
png_read_end(pp, info);
png_destroy_read_struct(&pp, &info, NULL);
fclose(fp);
free(in);
free(out);
return (0);
}
int /* O - Read status */
_cupsImageReadSGI(
cups_image_t *img, /* IO - cupsImage */
FILE *fp, /* I - cupsImage file */
cups_icspace_t primary, /* I - Primary choice for colorspace */
cups_icspace_t secondary, /* I - Secondary choice for colorspace */
int saturation, /* I - Color saturation (%) */
int hue, /* I - Color hue (degrees) */
const cups_ib_t *lut) /* I - Lookup table for gamma/brightness */
{
int i, y; /* Looping vars */
int bpp; /* Bytes per pixel */
sgi_t *sgip; /* SGI image file */
cups_ib_t *in, /* Input pixels */
*inptr, /* Current input pixel */
*out; /* Output pixels */
unsigned short *rows[4], /* Row pointers for image data */
*red,
*green,
*blue,
*gray,
*alpha;
/*
* Setup the SGI file...
*/
sgip = sgiOpenFile(fp, SGI_READ, 0, 0, 0, 0, 0);
/*
* Get the image dimensions and load the output image...
*/
/*
* Check the image dimensions; since xsize and ysize are unsigned shorts,
* just check if they are 0 since they can't exceed CUPS_IMAGE_MAX_WIDTH or
* CUPS_IMAGE_MAX_HEIGHT...
*/
if (sgip->xsize == 0 || sgip->ysize == 0 ||
sgip->zsize == 0 || sgip->zsize > 4)
{
fprintf(stderr, "DEBUG: Bad SGI image dimensions %ux%ux%u!\n",
sgip->xsize, sgip->ysize, sgip->zsize);
sgiClose(sgip);
return (1);
}
if (sgip->zsize < 3)
img->colorspace = secondary;
else
img->colorspace = (primary == CUPS_IMAGE_RGB_CMYK) ? CUPS_IMAGE_RGB : primary;
img->xsize = sgip->xsize;
img->ysize = sgip->ysize;
cupsImageSetMaxTiles(img, 0);
bpp = cupsImageGetDepth(img);
if ((in = malloc(img->xsize * sgip->zsize)) == NULL)
{
fputs("DEBUG: Unable to allocate memory!\n", stderr);
sgiClose(sgip);
return (1);
}
if ((out = malloc(img->xsize * bpp)) == NULL)
{
fputs("DEBUG: Unable to allocate memory!\n", stderr);
sgiClose(sgip);
free(in);
return (1);
}
if ((rows[0] = calloc(img->xsize * sgip->zsize,
sizeof(unsigned short))) == NULL)
{
fputs("DEBUG: Unable to allocate memory!\n", stderr);
sgiClose(sgip);
free(in);
free(out);
return (1);
}
for (i = 1; i < sgip->zsize; i ++)
rows[i] = rows[0] + i * img->xsize;
/*
* Read the SGI image file...
*/
for (y = 0; y < img->ysize; y ++)
{
for (i = 0; i < sgip->zsize; i ++)
sgiGetRow(sgip, rows[i], img->ysize - 1 - y, i);
switch (sgip->zsize)
{
case 1 :
if (sgip->bpp == 1)
for (i = img->xsize - 1, gray = rows[0], inptr = in;
i >= 0;
i --)
{
*inptr++ = *gray++;
}
else
for (i = img->xsize - 1, gray = rows[0], inptr = in;
i >= 0;
i --)
{
*inptr++ = (*gray++) / 256 + 128;
}
break;
case 2 :
if (sgip->bpp == 1)
for (i = img->xsize - 1, gray = rows[0], alpha = rows[1], inptr = in;
i >= 0;
i --)
{
*inptr++ = (*gray++) * (*alpha++) / 255;
}
else
for (i = img->xsize - 1, gray = rows[0], alpha = rows[1], inptr = in;
i >= 0;
i --)
{
*inptr++ = ((*gray++) / 256 + 128) * (*alpha++) / 32767;
}
break;
case 3 :
if (sgip->bpp == 1)
for (i = img->xsize - 1, red = rows[0], green = rows[1],
blue = rows[2], inptr = in;
i >= 0;
i --)
{
*inptr++ = *red++;
*inptr++ = *green++;
*inptr++ = *blue++;
}
else
for (i = img->xsize - 1, red = rows[0], green = rows[1],
blue = rows[2], inptr = in;
i >= 0;
i --)
{
*inptr++ = (*red++) / 256 + 128;
*inptr++ = (*green++) / 256 + 128;
*inptr++ = (*blue++) / 256 + 128;
}
break;
case 4 :
if (sgip->bpp == 1)
for (i = img->xsize - 1, red = rows[0], green = rows[1],
blue = rows[2], alpha = rows[3], inptr = in;
i >= 0;
i --)
{
*inptr++ = (*red++) * (*alpha) / 255;
*inptr++ = (*green++) * (*alpha) / 255;
*inptr++ = (*blue++) * (*alpha++) / 255;
}
else
for (i = img->xsize - 1, red = rows[0], green = rows[1],
blue = rows[2], alpha = rows[3], inptr = in;
i >= 0;
i --)
{
*inptr++ = ((*red++) / 256 + 128) * (*alpha) / 32767;
*inptr++ = ((*green++) / 256 + 128) * (*alpha) / 32767;
*inptr++ = ((*blue++) / 256 + 128) * (*alpha++) / 32767;
}
break;
}
if (sgip->zsize < 3)
{
if (img->colorspace == CUPS_IMAGE_WHITE)
{
if (lut)
cupsImageLut(in, img->xsize, lut);
_cupsImagePutRow(img, 0, y, img->xsize, in);
}
else
{
switch (img->colorspace)
{
default :
break;
case CUPS_IMAGE_RGB :
case CUPS_IMAGE_RGB_CMYK :
cupsImageWhiteToRGB(in, out, img->xsize);
break;
case CUPS_IMAGE_BLACK :
cupsImageWhiteToBlack(in, out, img->xsize);
break;
case CUPS_IMAGE_CMY :
cupsImageWhiteToCMY(in, out, img->xsize);
break;
case CUPS_IMAGE_CMYK :
cupsImageWhiteToCMYK(in, out, img->xsize);
break;
}
if (lut)
cupsImageLut(out, img->xsize * bpp, lut);
_cupsImagePutRow(img, 0, y, img->xsize, out);
}
}
else
{
if ((saturation != 100 || hue != 0) && bpp > 1)
cupsImageRGBAdjust(in, img->xsize, saturation, hue);
switch (img->colorspace)
{
default :
break;
case CUPS_IMAGE_WHITE :
cupsImageRGBToWhite(in, out, img->xsize);
break;
case CUPS_IMAGE_RGB :
cupsImageRGBToRGB(in, out, img->xsize);
break;
case CUPS_IMAGE_BLACK :
cupsImageRGBToBlack(in, out, img->xsize);
break;
case CUPS_IMAGE_CMY :
cupsImageRGBToCMY(in, out, img->xsize);
break;
case CUPS_IMAGE_CMYK :
cupsImageRGBToCMYK(in, out, img->xsize);
break;
}
if (lut)
cupsImageLut(out, img->xsize * bpp, lut);
_cupsImagePutRow(img, 0, y, img->xsize, out);
}
}
free(in);
free(out);
free(rows[0]);
sgiClose(sgip);
return (0);
}
int /* O - Read status */
_cupsImageReadPIX(
cups_image_t *img, /* IO - cupsImage */
FILE *fp, /* I - cupsImage file */
cups_icspace_t primary, /* I - Primary choice for colorspace */
cups_icspace_t secondary, /* I - Secondary choice for colorspace */
int saturation, /* I - Color saturation (%) */
int hue, /* I - Color hue (degrees) */
const cups_ib_t *lut) /* I - Lookup table for gamma/brightness */
{
short width, /* Width of image */
height, /* Height of image */
depth; /* Depth of image (bits) */
int count, /* Repetition count */
bpp, /* Bytes per pixel */
x, y; /* Looping vars */
cups_ib_t r, g, b; /* Red, green/gray, blue values */
cups_ib_t *in, /* Input pixels */
*out, /* Output pixels */
*ptr; /* Pointer into pixels */
/*
* Get the image dimensions and setup the image...
*/
width = read_short(fp);
height = read_short(fp);
read_short(fp);
read_short(fp);
depth = read_short(fp);
/*
* Check the dimensions of the image. Since the short values used for the
* width and height cannot exceed CUPS_IMAGE_MAX_WIDTH or
* CUPS_IMAGE_MAX_HEIGHT, we just need to verify they are positive integers.
*/
if (width <= 0 || height <= 0 ||
(depth != 8 && depth != 24))
{
fprintf(stderr, "DEBUG: Bad PIX image dimensions %dx%dx%d\n",
width, height, depth);
fclose(fp);
return (1);
}
if (depth == 8)
img->colorspace = secondary;
else
img->colorspace = (primary == CUPS_IMAGE_RGB_CMYK) ? CUPS_IMAGE_RGB : primary;
img->xsize = width;
img->ysize = height;
cupsImageSetMaxTiles(img, 0);
bpp = cupsImageGetDepth(img);
if ((in = malloc(img->xsize * (depth / 8))) == NULL)
{
fputs("DEBUG: Unable to allocate memory!\n", stderr);
fclose(fp);
return (1);
}
if ((out = malloc(img->xsize * bpp)) == NULL)
{
fputs("DEBUG: Unable to allocate memory!\n", stderr);
fclose(fp);
free(in);
return (1);
}
/*
* Read the image data...
*/
if (depth == 8)
{
for (count = 0, y = 0, g = 0; y < img->ysize; y ++)
{
if (img->colorspace == CUPS_IMAGE_WHITE)
ptr = out;
else
ptr = in;
for (x = img->xsize; x > 0; x --, count --)
{
if (count == 0)
{
count = getc(fp);
g = getc(fp);
}
*ptr++ = g;
}
if (img->colorspace != CUPS_IMAGE_WHITE)
switch (img->colorspace)
{
default :
cupsImageWhiteToRGB(in, out, img->xsize);
break;
case CUPS_IMAGE_BLACK :
cupsImageWhiteToBlack(in, out, img->xsize);
break;
case CUPS_IMAGE_CMY :
cupsImageWhiteToCMY(in, out, img->xsize);
break;
case CUPS_IMAGE_CMYK :
cupsImageWhiteToCMYK(in, out, img->xsize);
break;
}
if (lut)
cupsImageLut(out, img->xsize * bpp, lut);
_cupsImagePutRow(img, 0, y, img->xsize, out);
}
}
else
{
for (count = 0, y = 0, r = 0, g = 0, b = 0; y < img->ysize; y ++)
{
ptr = in;
for (x = img->xsize; x > 0; x --, count --)
{
if (count == 0)
{
count = getc(fp);
b = getc(fp);
g = getc(fp);
r = getc(fp);
}
*ptr++ = r;
*ptr++ = g;
*ptr++ = b;
}
if (saturation != 100 || hue != 0)
cupsImageRGBAdjust(in, img->xsize, saturation, hue);
switch (img->colorspace)
{
default :
break;
case CUPS_IMAGE_WHITE :
cupsImageRGBToWhite(in, out, img->xsize);
break;
case CUPS_IMAGE_RGB :
cupsImageRGBToWhite(in, out, img->xsize);
break;
case CUPS_IMAGE_BLACK :
cupsImageRGBToBlack(in, out, img->xsize);
break;
case CUPS_IMAGE_CMY :
cupsImageRGBToCMY(in, out, img->xsize);
break;
case CUPS_IMAGE_CMYK :
cupsImageRGBToCMYK(in, out, img->xsize);
break;
}
if (lut)
cupsImageLut(out, img->xsize * bpp, lut);
_cupsImagePutRow(img, 0, y, img->xsize, out);
}
}
fclose(fp);
free(in);
free(out);
return (0);
}
static int /* I - 0 = success, -1 = failure */
gif_read_image(FILE *fp, /* I - Input file */
cups_image_t *img, /* I - cupsImage pointer */
gif_cmap_t cmap, /* I - Colormap */
int interlace) /* I - Non-zero = interlaced image */
{
unsigned char code_size; /* Code size */
cups_ib_t *pixels, /* Pixel buffer */
*temp; /* Current pixel */
int xpos, /* Current X position */
ypos, /* Current Y position */
pass; /* Current pass */
int pixel; /* Current pixel */
int bpp; /* Bytes per pixel */
static const int xpasses[4] = /* X interleaving */
{ 8, 8, 4, 2 },
ypasses[5] = /* Y interleaving */
{ 0, 4, 2, 1, 999999 };
bpp = cupsImageGetDepth(img);
pixels = calloc(bpp, img->xsize);
xpos = 0;
ypos = 0;
pass = 0;
code_size = getc(fp);
if (!pixels)
return (-1);
if (code_size > GIF_MAX_BITS || gif_read_lzw(fp, 1, code_size) < 0)
{
free(pixels);
return (-1);
}
temp = pixels;
while ((pixel = gif_read_lzw(fp, 0, code_size)) >= 0)
{
switch (bpp)
{
case 4 :
temp[3] = cmap[pixel][3];
case 3 :
temp[2] = cmap[pixel][2];
case 2 :
temp[1] = cmap[pixel][1];
default :
temp[0] = cmap[pixel][0];
}
xpos ++;
temp += bpp;
if (xpos == img->xsize)
{
_cupsImagePutRow(img, 0, ypos, img->xsize, pixels);
xpos = 0;
temp = pixels;
if (interlace)
{
ypos += xpasses[pass];
if (ypos >= img->ysize)
{
pass ++;
ypos = ypasses[pass];
}
}
else
ypos ++;
}
if (ypos >= img->ysize)
break;
}
free(pixels);
return (0);
}
int /* O - Read status */
_cupsImageReadJPEG(
cups_image_t *img, /* IO - cupsImage */
FILE *fp, /* I - cupsImage file */
cups_icspace_t primary, /* I - Primary choice for colorspace */
cups_icspace_t secondary, /* I - Secondary choice for colorspace */
int saturation, /* I - Color saturation (%) */
int hue, /* I - Color hue (degrees) */
const cups_ib_t *lut) /* I - Lookup table for gamma/brightness */
{
struct jpeg_decompress_struct cinfo; /* Decompressor info */
struct jpeg_error_mgr jerr; /* Error handler info */
cups_ib_t *in, /* Input pixels */
*out; /* Output pixels */
jpeg_saved_marker_ptr marker; /* Pointer to marker data */
int psjpeg = 0; /* Non-zero if Photoshop CMYK JPEG */
static const char *cspaces[] =
{ /* JPEG colorspaces... */
"JCS_UNKNOWN",
"JCS_GRAYSCALE",
"JCS_RGB",
"JCS_YCbCr",
"JCS_CMYK",
"JCS_YCCK"
};
/*
* Read the JPEG header...
*/
cinfo.err = jpeg_std_error(&jerr);
jpeg_create_decompress(&cinfo);
jpeg_save_markers(&cinfo, JPEG_APP0 + 14, 0xffff); /* Adobe JPEG */
jpeg_stdio_src(&cinfo, fp);
jpeg_read_header(&cinfo, 1);
/*
* Parse any Adobe APPE data embedded in the JPEG file. Since Adobe doesn't
* bother following standards, we have to invert the CMYK JPEG data written by
* Adobe apps...
*/
for (marker = cinfo.marker_list; marker; marker = marker->next)
if (marker->marker == (JPEG_APP0 + 14) && marker->data_length >= 12 &&
!memcmp(marker->data, "Adobe", 5))
{
fputs("DEBUG: Adobe CMYK JPEG detected (inverting color values)\n",
stderr);
psjpeg = 1;
}
cinfo.quantize_colors = 0;
fprintf(stderr, "DEBUG: num_components = %d\n", cinfo.num_components);
fprintf(stderr, "DEBUG: jpeg_color_space = %s\n",
cspaces[cinfo.jpeg_color_space]);
if (cinfo.num_components == 1)
{
fputs("DEBUG: Converting image to grayscale...\n", stderr);
cinfo.out_color_space = JCS_GRAYSCALE;
cinfo.out_color_components = 1;
cinfo.output_components = 1;
img->colorspace = secondary;
}
else if (cinfo.num_components == 4)
{
fputs("DEBUG: Converting image to CMYK...\n", stderr);
cinfo.out_color_space = JCS_CMYK;
cinfo.out_color_components = 4;
cinfo.output_components = 4;
img->colorspace = (primary == CUPS_IMAGE_RGB_CMYK) ? CUPS_IMAGE_CMYK : primary;
}
else
{
fputs("DEBUG: Converting image to RGB...\n", stderr);
cinfo.out_color_space = JCS_RGB;
cinfo.out_color_components = 3;
cinfo.output_components = 3;
img->colorspace = (primary == CUPS_IMAGE_RGB_CMYK) ? CUPS_IMAGE_RGB : primary;
}
jpeg_calc_output_dimensions(&cinfo);
if (cinfo.output_width <= 0 || cinfo.output_width > CUPS_IMAGE_MAX_WIDTH ||
cinfo.output_height <= 0 || cinfo.output_height > CUPS_IMAGE_MAX_HEIGHT)
{
fprintf(stderr, "DEBUG: Bad JPEG dimensions %dx%d!\n",
cinfo.output_width, cinfo.output_height);
jpeg_destroy_decompress(&cinfo);
fclose(fp);
return (1);
}
img->xsize = cinfo.output_width;
img->ysize = cinfo.output_height;
if (cinfo.X_density > 0 && cinfo.Y_density > 0 && cinfo.density_unit > 0)
{
if (cinfo.density_unit == 1)
{
img->xppi = cinfo.X_density;
img->yppi = cinfo.Y_density;
}
else
{
img->xppi = (int)((float)cinfo.X_density * 2.54);
img->yppi = (int)((float)cinfo.Y_density * 2.54);
}
if (img->xppi == 0 || img->yppi == 0)
{
fprintf(stderr, "DEBUG: Bad JPEG image resolution %dx%d PPI.\n",
img->xppi, img->yppi);
img->xppi = img->yppi = 128;
}
}
fprintf(stderr, "DEBUG: JPEG image %dx%dx%d, %dx%d PPI\n",
img->xsize, img->ysize, cinfo.output_components,
img->xppi, img->yppi);
cupsImageSetMaxTiles(img, 0);
in = malloc(img->xsize * cinfo.output_components);
out = malloc(img->xsize * cupsImageGetDepth(img));
jpeg_start_decompress(&cinfo);
while (cinfo.output_scanline < cinfo.output_height)
{
jpeg_read_scanlines(&cinfo, (JSAMPROW *)&in, (JDIMENSION)1);
if (psjpeg && cinfo.output_components == 4)
{
/*
* Invert CMYK data from Photoshop...
*/
cups_ib_t *ptr; /* Pointer into buffer */
int i; /* Looping var */
for (ptr = in, i = img->xsize * 4; i > 0; i --, ptr ++)
*ptr = 255 - *ptr;
}
if ((saturation != 100 || hue != 0) && cinfo.output_components == 3)
cupsImageRGBAdjust(in, img->xsize, saturation, hue);
if ((img->colorspace == CUPS_IMAGE_WHITE && cinfo.out_color_space == JCS_GRAYSCALE) ||
(img->colorspace == CUPS_IMAGE_CMYK && cinfo.out_color_space == JCS_CMYK))
{
#ifdef DEBUG
int i, j;
cups_ib_t *ptr;
fputs("DEBUG: Direct Data...\n", stderr);
fputs("DEBUG:", stderr);
for (i = 0, ptr = in; i < img->xsize; i ++)
{
putc(' ', stderr);
for (j = 0; j < cinfo.output_components; j ++, ptr ++)
fprintf(stderr, "%02X", *ptr & 255);
}
putc('\n', stderr);
#endif /* DEBUG */
if (lut)
cupsImageLut(in, img->xsize * cupsImageGetDepth(img), lut);
_cupsImagePutRow(img, 0, cinfo.output_scanline - 1, img->xsize, in);
}
else if (cinfo.out_color_space == JCS_GRAYSCALE)
{
switch (img->colorspace)
{
default :
break;
case CUPS_IMAGE_BLACK :
cupsImageWhiteToBlack(in, out, img->xsize);
break;
case CUPS_IMAGE_RGB :
cupsImageWhiteToRGB(in, out, img->xsize);
break;
case CUPS_IMAGE_CMY :
cupsImageWhiteToCMY(in, out, img->xsize);
break;
case CUPS_IMAGE_CMYK :
cupsImageWhiteToCMYK(in, out, img->xsize);
break;
}
if (lut)
cupsImageLut(out, img->xsize * cupsImageGetDepth(img), lut);
_cupsImagePutRow(img, 0, cinfo.output_scanline - 1, img->xsize, out);
}
else if (cinfo.out_color_space == JCS_RGB)
{
switch (img->colorspace)
{
default :
break;
case CUPS_IMAGE_RGB :
cupsImageRGBToRGB(in, out, img->xsize);
break;
case CUPS_IMAGE_WHITE :
cupsImageRGBToWhite(in, out, img->xsize);
break;
case CUPS_IMAGE_BLACK :
cupsImageRGBToBlack(in, out, img->xsize);
break;
case CUPS_IMAGE_CMY :
cupsImageRGBToCMY(in, out, img->xsize);
break;
case CUPS_IMAGE_CMYK :
cupsImageRGBToCMYK(in, out, img->xsize);
break;
}
if (lut)
cupsImageLut(out, img->xsize * cupsImageGetDepth(img), lut);
_cupsImagePutRow(img, 0, cinfo.output_scanline - 1, img->xsize, out);
}
else /* JCS_CMYK */
{
fputs("DEBUG: JCS_CMYK\n", stderr);
switch (img->colorspace)
{
default :
break;
case CUPS_IMAGE_WHITE :
cupsImageCMYKToWhite(in, out, img->xsize);
break;
case CUPS_IMAGE_BLACK :
cupsImageCMYKToBlack(in, out, img->xsize);
break;
case CUPS_IMAGE_CMY :
cupsImageCMYKToCMY(in, out, img->xsize);
break;
case CUPS_IMAGE_RGB :
cupsImageCMYKToRGB(in, out, img->xsize);
break;
}
if (lut)
cupsImageLut(out, img->xsize * cupsImageGetDepth(img), lut);
_cupsImagePutRow(img, 0, cinfo.output_scanline - 1, img->xsize, out);
}
}
free(in);
free(out);
jpeg_finish_decompress(&cinfo);
jpeg_destroy_decompress(&cinfo);
fclose(fp);
return (0);
}
int /* O - Read status */
_cupsImageReadPhotoCD(
cups_image_t *img, /* IO - cupsImage */
FILE *fp, /* I - cupsImage file */
cups_icspace_t primary, /* I - Primary choice for colorspace */
cups_icspace_t secondary, /* I - Secondary choice for colorspace */
int saturation, /* I - Color saturation (%) */
int hue, /* I - Color hue (degrees) */
const cups_ib_t *lut) /* I - Lookup table for gamma/brightness */
{
int x, y; /* Looping vars */
int xdir, /* X direction */
xstart; /* X starting point */
int bpp; /* Bytes per pixel */
int pass; /* Pass number */
int rotation; /* 0 for 768x512, 1 for 512x768 */
int temp, /* Adjusted luminance */
temp2, /* Red, green, and blue values */
cb, cr; /* Adjusted chroma values */
cups_ib_t *in, /* Input (YCC) pixels */
*iy, /* Luminance */
*icb, /* Blue chroma */
*icr, /* Red chroma */
*rgb, /* RGB */
*rgbptr, /* Pointer into RGB data */
*out; /* Output pixels */
(void)secondary;
/*
* Get the image orientation...
*/
fseek(fp, 72, SEEK_SET);
rotation = (getc(fp) & 63) != 8;
/*
* Seek to the start of the base image...
*/
fseek(fp, 0x30000, SEEK_SET);
/*
* Allocate and initialize...
*/
img->colorspace = (primary == CUPS_IMAGE_RGB_CMYK) ? CUPS_IMAGE_RGB : primary;
img->xppi = 128;
img->yppi = 128;
if (rotation)
{
img->xsize = 512;
img->ysize = 768;
}
else
{
img->xsize = 768;
img->ysize = 512;
}
cupsImageSetMaxTiles(img, 0);
bpp = cupsImageGetDepth(img);
if ((in = malloc(768 * 3)) == NULL)
{
fputs("DEBUG: Unable to allocate memory!\n", stderr);
fclose(fp);
return (1);
}
if ((out = malloc(768 * bpp)) == NULL)
{
fputs("DEBUG: Unable to allocate memory!\n", stderr);
fclose(fp);
free(in);
return (1);
}
if (bpp > 1)
{
if ((rgb = malloc(768 * 3)) == NULL)
{
fputs("DEBUG: Unable to allocate memory!\n", stderr);
fclose(fp);
free(in);
free(out);
return (1);
}
}
else
rgb = NULL;
if (rotation)
{
xstart = 767 * bpp;
xdir = -2 * bpp;
}
else
{
xstart = 0;
xdir = 0;
}
/*
* Read the image file...
*/
for (y = 0; y < 512; y += 2)
{
/*
* Grab the next two scanlines:
*
* YYYYYYYYYYYYYYY...
* YYYYYYYYYYYYYYY...
* CbCbCb...CrCrCr...
*/
if (fread(in, 1, 768 * 3, fp) < (768 * 3))
{
/*
* Couldn't read a row of data - return an error!
*/
free(in);
free(out);
if (bpp > 1)
free(rgb);
return (-1);
}
/*
* Process the two scanlines...
*/
for (pass = 0, iy = in; pass < 2; pass ++)
{
if (bpp == 1)
{
/*
* Just extract the luminance channel from the line and put it
* in the image...
*/
if (primary == CUPS_IMAGE_BLACK)
{
if (rotation)
{
for (rgbptr = out + xstart, x = 0; x < 768; x ++)
*rgbptr-- = 255 - *iy++;
if (lut)
cupsImageLut(out, 768, lut);
_cupsImagePutCol(img, 511 - y - pass, 0, 768, out);
}
else
{
cupsImageWhiteToBlack(iy, out, 768);
if (lut)
cupsImageLut(out, 768, lut);
_cupsImagePutRow(img, 0, y + pass, 768, out);
iy += 768;
}
}
else if (rotation)
{
for (rgbptr = out + xstart, x = 0; x < 768; x ++)
*rgbptr-- = 255 - *iy++;
if (lut)
cupsImageLut(out, 768, lut);
_cupsImagePutCol(img, 511 - y - pass, 0, 768, out);
}
else
{
if (lut)
cupsImageLut(iy, 768, lut);
_cupsImagePutRow(img, 0, y + pass, 768, iy);
iy += 768;
}
}
else
{
/*
* Convert YCbCr to RGB... While every pixel gets a luminance
* value, adjacent pixels share chroma information.
*/
cb = cr = 0.0f;
for (x = 0, rgbptr = rgb + xstart, icb = in + 1536, icr = in + 1920;
x < 768;
x ++, iy ++, rgbptr += xdir)
{
if (!(x & 1))
{
cb = (float)(*icb - 156);
cr = (float)(*icr - 137);
}
temp = 92241 * (*iy);
temp2 = (temp + 86706 * cr) / 65536;
if (temp2 < 0)
*rgbptr++ = 0;
else if (temp2 > 255)
*rgbptr++ = 255;
else
*rgbptr++ = temp2;
temp2 = (temp - 25914 * cb - 44166 * cr) / 65536;
if (temp2 < 0)
*rgbptr++ = 0;
else if (temp2 > 255)
*rgbptr++ = 255;
else
*rgbptr++ = temp2;
temp2 = (temp + 133434 * cb) / 65536;
if (temp2 < 0)
*rgbptr++ = 0;
else if (temp2 > 255)
*rgbptr++ = 255;
else
*rgbptr++ = temp2;
if (x & 1)
{
icb ++;
icr ++;
}
}
/*
* Adjust the hue and saturation if needed...
*/
if (saturation != 100 || hue != 0)
cupsImageRGBAdjust(rgb, 768, saturation, hue);
/*
* Then convert the RGB data to the appropriate colorspace and
* put it in the image...
*/
switch (img->colorspace)
{
default :
break;
case CUPS_IMAGE_RGB :
cupsImageRGBToRGB(rgb, out, 768);
break;
case CUPS_IMAGE_CMY :
cupsImageRGBToCMY(rgb, out, 768);
break;
case CUPS_IMAGE_CMYK :
cupsImageRGBToCMYK(rgb, out, 768);
break;
}
if (lut)
cupsImageLut(out, 768 * bpp, lut);
if (rotation)
_cupsImagePutCol(img, 511 - y - pass, 0, 768, out);
else
_cupsImagePutRow(img, 0, y + pass, 768, out);
}
}
}
/*
* Free memory and return...
*/
free(in);
free(out);
if (bpp > 1)
free(rgb);
return (0);
}