Blame libtiff/tif_getimage.c

Packit 7838c8
/* $Id: tif_getimage.c,v 1.114 2017-11-17 20:21:00 erouault Exp $ */
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Copyright (c) 1991-1997 Sam Leffler
Packit 7838c8
 * Copyright (c) 1991-1997 Silicon Graphics, Inc.
Packit 7838c8
 *
Packit 7838c8
 * Permission to use, copy, modify, distribute, and sell this software and 
Packit 7838c8
 * its documentation for any purpose is hereby granted without fee, provided
Packit 7838c8
 * that (i) the above copyright notices and this permission notice appear in
Packit 7838c8
 * all copies of the software and related documentation, and (ii) the names of
Packit 7838c8
 * Sam Leffler and Silicon Graphics may not be used in any advertising or
Packit 7838c8
 * publicity relating to the software without the specific, prior written
Packit 7838c8
 * permission of Sam Leffler and Silicon Graphics.
Packit 7838c8
 * 
Packit 7838c8
 * THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND, 
Packit 7838c8
 * EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY 
Packit 7838c8
 * WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.  
Packit 7838c8
 * 
Packit 7838c8
 * IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
Packit 7838c8
 * ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
Packit 7838c8
 * OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
Packit 7838c8
 * WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF 
Packit 7838c8
 * LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE 
Packit 7838c8
 * OF THIS SOFTWARE.
Packit 7838c8
 */
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * TIFF Library
Packit 7838c8
 *
Packit 7838c8
 * Read and return a packed RGBA image.
Packit 7838c8
 */
Packit 7838c8
#include "tiffiop.h"
Packit 7838c8
#include <stdio.h>
Packit 7838c8
Packit 7838c8
static int gtTileContig(TIFFRGBAImage*, uint32*, uint32, uint32);
Packit 7838c8
static int gtTileSeparate(TIFFRGBAImage*, uint32*, uint32, uint32);
Packit 7838c8
static int gtStripContig(TIFFRGBAImage*, uint32*, uint32, uint32);
Packit 7838c8
static int gtStripSeparate(TIFFRGBAImage*, uint32*, uint32, uint32);
Packit 7838c8
static int PickContigCase(TIFFRGBAImage*);
Packit 7838c8
static int PickSeparateCase(TIFFRGBAImage*);
Packit 7838c8
Packit 7838c8
static int BuildMapUaToAa(TIFFRGBAImage* img);
Packit 7838c8
static int BuildMapBitdepth16To8(TIFFRGBAImage* img);
Packit 7838c8
Packit 7838c8
static const char photoTag[] = "PhotometricInterpretation";
Packit 7838c8
Packit 7838c8
/* 
Packit 7838c8
 * Helper constants used in Orientation tag handling
Packit 7838c8
 */
Packit 7838c8
#define FLIP_VERTICALLY 0x01
Packit 7838c8
#define FLIP_HORIZONTALLY 0x02
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Color conversion constants. We will define display types here.
Packit 7838c8
 */
Packit 7838c8
Packit 7838c8
static const TIFFDisplay display_sRGB = {
Packit 7838c8
	{			/* XYZ -> luminance matrix */
Packit 7838c8
		{  3.2410F, -1.5374F, -0.4986F },
Packit 7838c8
		{  -0.9692F, 1.8760F, 0.0416F },
Packit 7838c8
		{  0.0556F, -0.2040F, 1.0570F }
Packit 7838c8
	},	
Packit 7838c8
	100.0F, 100.0F, 100.0F,	/* Light o/p for reference white */
Packit 7838c8
	255, 255, 255,		/* Pixel values for ref. white */
Packit 7838c8
	1.0F, 1.0F, 1.0F,	/* Residual light o/p for black pixel */
Packit 7838c8
	2.4F, 2.4F, 2.4F,	/* Gamma values for the three guns */
Packit 7838c8
};
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Check the image to see if TIFFReadRGBAImage can deal with it.
Packit 7838c8
 * 1/0 is returned according to whether or not the image can
Packit 7838c8
 * be handled.  If 0 is returned, emsg contains the reason
Packit 7838c8
 * why it is being rejected.
Packit 7838c8
 */
Packit 7838c8
int
Packit 7838c8
TIFFRGBAImageOK(TIFF* tif, char emsg[1024])
Packit 7838c8
{
Packit 7838c8
	TIFFDirectory* td = &tif->tif_dir;
Packit 7838c8
	uint16 photometric;
Packit 7838c8
	int colorchannels;
Packit 7838c8
Packit 7838c8
	if (!tif->tif_decodestatus) {
Packit 7838c8
		sprintf(emsg, "Sorry, requested compression method is not configured");
Packit 7838c8
		return (0);
Packit 7838c8
	}
Packit 7838c8
	switch (td->td_bitspersample) {
Packit 7838c8
		case 1:
Packit 7838c8
		case 2:
Packit 7838c8
		case 4:
Packit 7838c8
		case 8:
Packit 7838c8
		case 16:
Packit 7838c8
			break;
Packit 7838c8
		default:
Packit 7838c8
			sprintf(emsg, "Sorry, can not handle images with %d-bit samples",
Packit 7838c8
			    td->td_bitspersample);
Packit 7838c8
			return (0);
Packit 7838c8
	}
Packit 7838c8
        if (td->td_sampleformat == SAMPLEFORMAT_IEEEFP) {
Packit 7838c8
                sprintf(emsg, "Sorry, can not handle images with IEEE floating-point samples");
Packit 7838c8
                return (0);
Packit 7838c8
        }
Packit 7838c8
	colorchannels = td->td_samplesperpixel - td->td_extrasamples;
Packit 7838c8
	if (!TIFFGetField(tif, TIFFTAG_PHOTOMETRIC, &photometric)) {
Packit 7838c8
		switch (colorchannels) {
Packit 7838c8
			case 1:
Packit 7838c8
				photometric = PHOTOMETRIC_MINISBLACK;
Packit 7838c8
				break;
Packit 7838c8
			case 3:
Packit 7838c8
				photometric = PHOTOMETRIC_RGB;
Packit 7838c8
				break;
Packit 7838c8
			default:
Packit 7838c8
				sprintf(emsg, "Missing needed %s tag", photoTag);
Packit 7838c8
				return (0);
Packit 7838c8
		}
Packit 7838c8
	}
Packit 7838c8
	switch (photometric) {
Packit 7838c8
		case PHOTOMETRIC_MINISWHITE:
Packit 7838c8
		case PHOTOMETRIC_MINISBLACK:
Packit 7838c8
		case PHOTOMETRIC_PALETTE:
Packit 7838c8
			if (td->td_planarconfig == PLANARCONFIG_CONTIG
Packit 7838c8
			    && td->td_samplesperpixel != 1
Packit 7838c8
			    && td->td_bitspersample < 8 ) {
Packit 7838c8
				sprintf(emsg,
Packit 7838c8
				    "Sorry, can not handle contiguous data with %s=%d, "
Packit 7838c8
				    "and %s=%d and Bits/Sample=%d",
Packit 7838c8
				    photoTag, photometric,
Packit 7838c8
				    "Samples/pixel", td->td_samplesperpixel,
Packit 7838c8
				    td->td_bitspersample);
Packit 7838c8
				return (0);
Packit 7838c8
			}
Packit 7838c8
			/*
Packit 7838c8
			 * We should likely validate that any extra samples are either
Packit 7838c8
			 * to be ignored, or are alpha, and if alpha we should try to use
Packit 7838c8
			 * them.  But for now we won't bother with this.
Packit 7838c8
			*/
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_YCBCR:
Packit 7838c8
			/*
Packit 7838c8
			 * TODO: if at all meaningful and useful, make more complete
Packit 7838c8
			 * support check here, or better still, refactor to let supporting
Packit 7838c8
			 * code decide whether there is support and what meaningful
Packit 7838c8
			 * error to return
Packit 7838c8
			 */
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_RGB:
Packit 7838c8
			if (colorchannels < 3) {
Packit 7838c8
				sprintf(emsg, "Sorry, can not handle RGB image with %s=%d",
Packit 7838c8
				    "Color channels", colorchannels);
Packit 7838c8
				return (0);
Packit 7838c8
			}
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_SEPARATED:
Packit 7838c8
			{
Packit 7838c8
				uint16 inkset;
Packit 7838c8
				TIFFGetFieldDefaulted(tif, TIFFTAG_INKSET, &inkset);
Packit 7838c8
				if (inkset != INKSET_CMYK) {
Packit 7838c8
					sprintf(emsg,
Packit 7838c8
					    "Sorry, can not handle separated image with %s=%d",
Packit 7838c8
					    "InkSet", inkset);
Packit 7838c8
					return 0;
Packit 7838c8
				}
Packit 7838c8
				if (td->td_samplesperpixel < 4) {
Packit 7838c8
					sprintf(emsg,
Packit 7838c8
					    "Sorry, can not handle separated image with %s=%d",
Packit 7838c8
					    "Samples/pixel", td->td_samplesperpixel);
Packit 7838c8
					return 0;
Packit 7838c8
				}
Packit 7838c8
				break;
Packit 7838c8
			}
Packit 7838c8
		case PHOTOMETRIC_LOGL:
Packit 7838c8
			if (td->td_compression != COMPRESSION_SGILOG) {
Packit 7838c8
				sprintf(emsg, "Sorry, LogL data must have %s=%d",
Packit 7838c8
				    "Compression", COMPRESSION_SGILOG);
Packit 7838c8
				return (0);
Packit 7838c8
			}
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_LOGLUV:
Packit 7838c8
			if (td->td_compression != COMPRESSION_SGILOG &&
Packit 7838c8
			    td->td_compression != COMPRESSION_SGILOG24) {
Packit 7838c8
				sprintf(emsg, "Sorry, LogLuv data must have %s=%d or %d",
Packit 7838c8
				    "Compression", COMPRESSION_SGILOG, COMPRESSION_SGILOG24);
Packit 7838c8
				return (0);
Packit 7838c8
			}
Packit 7838c8
			if (td->td_planarconfig != PLANARCONFIG_CONTIG) {
Packit 7838c8
				sprintf(emsg, "Sorry, can not handle LogLuv images with %s=%d",
Packit 7838c8
				    "Planarconfiguration", td->td_planarconfig);
Packit 7838c8
				return (0);
Packit 7838c8
			}
Packit 7838c8
			if ( td->td_samplesperpixel != 3 || colorchannels != 3 ) {
Packit 7838c8
                                sprintf(emsg,
Packit 7838c8
                                        "Sorry, can not handle image with %s=%d, %s=%d",
Packit 7838c8
                                        "Samples/pixel", td->td_samplesperpixel,
Packit 7838c8
                                        "colorchannels", colorchannels);
Packit 7838c8
                                return 0;
Packit 7838c8
                        }
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_CIELAB:
Packit 7838c8
                        if ( td->td_samplesperpixel != 3 || colorchannels != 3 || td->td_bitspersample != 8 ) {
Packit 7838c8
                                sprintf(emsg,
Packit 7838c8
                                        "Sorry, can not handle image with %s=%d, %s=%d and %s=%d",
Packit 7838c8
                                        "Samples/pixel", td->td_samplesperpixel,
Packit 7838c8
                                        "colorchannels", colorchannels,
Packit 7838c8
                                        "Bits/sample", td->td_bitspersample);
Packit 7838c8
                                return 0;
Packit 7838c8
                        }
Packit 7838c8
			break;
Packit 7838c8
                default:
Packit 7838c8
			sprintf(emsg, "Sorry, can not handle image with %s=%d",
Packit 7838c8
			    photoTag, photometric);
Packit 7838c8
			return (0);
Packit 7838c8
	}
Packit 7838c8
	return (1);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
void
Packit 7838c8
TIFFRGBAImageEnd(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
	if (img->Map) {
Packit 7838c8
		_TIFFfree(img->Map);
Packit 7838c8
		img->Map = NULL;
Packit 7838c8
	}
Packit 7838c8
	if (img->BWmap) {
Packit 7838c8
		_TIFFfree(img->BWmap);
Packit 7838c8
		img->BWmap = NULL;
Packit 7838c8
	}
Packit 7838c8
	if (img->PALmap) {
Packit 7838c8
		_TIFFfree(img->PALmap);
Packit 7838c8
		img->PALmap = NULL;
Packit 7838c8
	}
Packit 7838c8
	if (img->ycbcr) {
Packit 7838c8
		_TIFFfree(img->ycbcr);
Packit 7838c8
		img->ycbcr = NULL;
Packit 7838c8
	}
Packit 7838c8
	if (img->cielab) {
Packit 7838c8
		_TIFFfree(img->cielab);
Packit 7838c8
		img->cielab = NULL;
Packit 7838c8
	}
Packit 7838c8
	if (img->UaToAa) {
Packit 7838c8
		_TIFFfree(img->UaToAa);
Packit 7838c8
		img->UaToAa = NULL;
Packit 7838c8
	}
Packit 7838c8
	if (img->Bitdepth16To8) {
Packit 7838c8
		_TIFFfree(img->Bitdepth16To8);
Packit 7838c8
		img->Bitdepth16To8 = NULL;
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	if( img->redcmap ) {
Packit 7838c8
		_TIFFfree( img->redcmap );
Packit 7838c8
		_TIFFfree( img->greencmap );
Packit 7838c8
		_TIFFfree( img->bluecmap );
Packit 7838c8
                img->redcmap = img->greencmap = img->bluecmap = NULL;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
static int
Packit 7838c8
isCCITTCompression(TIFF* tif)
Packit 7838c8
{
Packit 7838c8
    uint16 compress;
Packit 7838c8
    TIFFGetField(tif, TIFFTAG_COMPRESSION, &compress);
Packit 7838c8
    return (compress == COMPRESSION_CCITTFAX3 ||
Packit 7838c8
	    compress == COMPRESSION_CCITTFAX4 ||
Packit 7838c8
	    compress == COMPRESSION_CCITTRLE ||
Packit 7838c8
	    compress == COMPRESSION_CCITTRLEW);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
int
Packit 7838c8
TIFFRGBAImageBegin(TIFFRGBAImage* img, TIFF* tif, int stop, char emsg[1024])
Packit 7838c8
{
Packit 7838c8
	uint16* sampleinfo;
Packit 7838c8
	uint16 extrasamples;
Packit 7838c8
	uint16 planarconfig;
Packit 7838c8
	uint16 compress;
Packit 7838c8
	int colorchannels;
Packit 7838c8
	uint16 *red_orig, *green_orig, *blue_orig;
Packit 7838c8
	int n_color;
Packit 7838c8
	
Packit 7838c8
	if( !TIFFRGBAImageOK(tif, emsg) )
Packit 7838c8
		return 0;
Packit 7838c8
Packit 7838c8
	/* Initialize to normal values */
Packit 7838c8
	img->row_offset = 0;
Packit 7838c8
	img->col_offset = 0;
Packit 7838c8
	img->redcmap = NULL;
Packit 7838c8
	img->greencmap = NULL;
Packit 7838c8
	img->bluecmap = NULL;
Packit 7838c8
	img->Map = NULL;
Packit 7838c8
	img->BWmap = NULL;
Packit 7838c8
	img->PALmap = NULL;
Packit 7838c8
	img->ycbcr = NULL;
Packit 7838c8
	img->cielab = NULL;
Packit 7838c8
	img->UaToAa = NULL;
Packit 7838c8
	img->Bitdepth16To8 = NULL;
Packit 7838c8
	img->req_orientation = ORIENTATION_BOTLEFT;     /* It is the default */
Packit 7838c8
Packit 7838c8
	img->tif = tif;
Packit 7838c8
	img->stoponerr = stop;
Packit 7838c8
	TIFFGetFieldDefaulted(tif, TIFFTAG_BITSPERSAMPLE, &img->bitspersample);
Packit 7838c8
	switch (img->bitspersample) {
Packit 7838c8
		case 1:
Packit 7838c8
		case 2:
Packit 7838c8
		case 4:
Packit 7838c8
		case 8:
Packit 7838c8
		case 16:
Packit 7838c8
			break;
Packit 7838c8
		default:
Packit 7838c8
			sprintf(emsg, "Sorry, can not handle images with %d-bit samples",
Packit 7838c8
			    img->bitspersample);
Packit 7838c8
			goto fail_return;
Packit 7838c8
	}
Packit 7838c8
	img->alpha = 0;
Packit 7838c8
	TIFFGetFieldDefaulted(tif, TIFFTAG_SAMPLESPERPIXEL, &img->samplesperpixel);
Packit 7838c8
	TIFFGetFieldDefaulted(tif, TIFFTAG_EXTRASAMPLES,
Packit 7838c8
	    &extrasamples, &sampleinfo);
Packit 7838c8
	if (extrasamples >= 1)
Packit 7838c8
	{
Packit 7838c8
		switch (sampleinfo[0]) {
Packit 7838c8
			case EXTRASAMPLE_UNSPECIFIED:          /* Workaround for some images without */
Packit 7838c8
				if (img->samplesperpixel > 3)  /* correct info about alpha channel */
Packit 7838c8
					img->alpha = EXTRASAMPLE_ASSOCALPHA;
Packit 7838c8
				break;
Packit 7838c8
			case EXTRASAMPLE_ASSOCALPHA:           /* data is pre-multiplied */
Packit 7838c8
			case EXTRASAMPLE_UNASSALPHA:           /* data is not pre-multiplied */
Packit 7838c8
				img->alpha = sampleinfo[0];
Packit 7838c8
				break;
Packit 7838c8
		}
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
#ifdef DEFAULT_EXTRASAMPLE_AS_ALPHA
Packit 7838c8
	if( !TIFFGetField(tif, TIFFTAG_PHOTOMETRIC, &img->photometric))
Packit 7838c8
		img->photometric = PHOTOMETRIC_MINISWHITE;
Packit 7838c8
Packit 7838c8
	if( extrasamples == 0
Packit 7838c8
	    && img->samplesperpixel == 4
Packit 7838c8
	    && img->photometric == PHOTOMETRIC_RGB )
Packit 7838c8
	{
Packit 7838c8
		img->alpha = EXTRASAMPLE_ASSOCALPHA;
Packit 7838c8
		extrasamples = 1;
Packit 7838c8
	}
Packit 7838c8
#endif
Packit 7838c8
Packit 7838c8
	colorchannels = img->samplesperpixel - extrasamples;
Packit 7838c8
	TIFFGetFieldDefaulted(tif, TIFFTAG_COMPRESSION, &compress);
Packit 7838c8
	TIFFGetFieldDefaulted(tif, TIFFTAG_PLANARCONFIG, &planarconfig);
Packit 7838c8
	if (!TIFFGetField(tif, TIFFTAG_PHOTOMETRIC, &img->photometric)) {
Packit 7838c8
		switch (colorchannels) {
Packit 7838c8
			case 1:
Packit 7838c8
				if (isCCITTCompression(tif))
Packit 7838c8
					img->photometric = PHOTOMETRIC_MINISWHITE;
Packit 7838c8
				else
Packit 7838c8
					img->photometric = PHOTOMETRIC_MINISBLACK;
Packit 7838c8
				break;
Packit 7838c8
			case 3:
Packit 7838c8
				img->photometric = PHOTOMETRIC_RGB;
Packit 7838c8
				break;
Packit 7838c8
			default:
Packit 7838c8
				sprintf(emsg, "Missing needed %s tag", photoTag);
Packit 7838c8
                                goto fail_return;
Packit 7838c8
		}
Packit 7838c8
	}
Packit 7838c8
	switch (img->photometric) {
Packit 7838c8
		case PHOTOMETRIC_PALETTE:
Packit 7838c8
			if (!TIFFGetField(tif, TIFFTAG_COLORMAP,
Packit 7838c8
			    &red_orig, &green_orig, &blue_orig)) {
Packit 7838c8
				sprintf(emsg, "Missing required \"Colormap\" tag");
Packit 7838c8
                                goto fail_return;
Packit 7838c8
			}
Packit 7838c8
Packit 7838c8
			/* copy the colormaps so we can modify them */
Packit 7838c8
			n_color = (1U << img->bitspersample);
Packit 7838c8
			img->redcmap = (uint16 *) _TIFFmalloc(sizeof(uint16)*n_color);
Packit 7838c8
			img->greencmap = (uint16 *) _TIFFmalloc(sizeof(uint16)*n_color);
Packit 7838c8
			img->bluecmap = (uint16 *) _TIFFmalloc(sizeof(uint16)*n_color);
Packit 7838c8
			if( !img->redcmap || !img->greencmap || !img->bluecmap ) {
Packit 7838c8
				sprintf(emsg, "Out of memory for colormap copy");
Packit 7838c8
                                goto fail_return;
Packit 7838c8
			}
Packit 7838c8
Packit 7838c8
			_TIFFmemcpy( img->redcmap, red_orig, n_color * 2 );
Packit 7838c8
			_TIFFmemcpy( img->greencmap, green_orig, n_color * 2 );
Packit 7838c8
			_TIFFmemcpy( img->bluecmap, blue_orig, n_color * 2 );
Packit 7838c8
Packit 7838c8
			/* fall through... */
Packit 7838c8
		case PHOTOMETRIC_MINISWHITE:
Packit 7838c8
		case PHOTOMETRIC_MINISBLACK:
Packit 7838c8
			if (planarconfig == PLANARCONFIG_CONTIG
Packit 7838c8
			    && img->samplesperpixel != 1
Packit 7838c8
			    && img->bitspersample < 8 ) {
Packit 7838c8
				sprintf(emsg,
Packit 7838c8
				    "Sorry, can not handle contiguous data with %s=%d, "
Packit 7838c8
				    "and %s=%d and Bits/Sample=%d",
Packit 7838c8
				    photoTag, img->photometric,
Packit 7838c8
				    "Samples/pixel", img->samplesperpixel,
Packit 7838c8
				    img->bitspersample);
Packit 7838c8
                                goto fail_return;
Packit 7838c8
			}
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_YCBCR:
Packit 7838c8
			/* It would probably be nice to have a reality check here. */
Packit 7838c8
			if (planarconfig == PLANARCONFIG_CONTIG)
Packit 7838c8
				/* can rely on libjpeg to convert to RGB */
Packit 7838c8
				/* XXX should restore current state on exit */
Packit 7838c8
				switch (compress) {
Packit 7838c8
					case COMPRESSION_JPEG:
Packit 7838c8
						/*
Packit 7838c8
						 * TODO: when complete tests verify complete desubsampling
Packit 7838c8
						 * and YCbCr handling, remove use of TIFFTAG_JPEGCOLORMODE in
Packit 7838c8
						 * favor of tif_getimage.c native handling
Packit 7838c8
						 */
Packit 7838c8
						TIFFSetField(tif, TIFFTAG_JPEGCOLORMODE, JPEGCOLORMODE_RGB);
Packit 7838c8
						img->photometric = PHOTOMETRIC_RGB;
Packit 7838c8
						break;
Packit 7838c8
					default:
Packit 7838c8
						/* do nothing */;
Packit 7838c8
						break;
Packit 7838c8
				}
Packit 7838c8
			/*
Packit 7838c8
			 * TODO: if at all meaningful and useful, make more complete
Packit 7838c8
			 * support check here, or better still, refactor to let supporting
Packit 7838c8
			 * code decide whether there is support and what meaningful
Packit 7838c8
			 * error to return
Packit 7838c8
			 */
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_RGB:
Packit 7838c8
			if (colorchannels < 3) {
Packit 7838c8
				sprintf(emsg, "Sorry, can not handle RGB image with %s=%d",
Packit 7838c8
				    "Color channels", colorchannels);
Packit 7838c8
                                goto fail_return;
Packit 7838c8
			}
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_SEPARATED:
Packit 7838c8
			{
Packit 7838c8
				uint16 inkset;
Packit 7838c8
				TIFFGetFieldDefaulted(tif, TIFFTAG_INKSET, &inkset);
Packit 7838c8
				if (inkset != INKSET_CMYK) {
Packit 7838c8
					sprintf(emsg, "Sorry, can not handle separated image with %s=%d",
Packit 7838c8
					    "InkSet", inkset);
Packit 7838c8
                                        goto fail_return;
Packit 7838c8
				}
Packit 7838c8
				if (img->samplesperpixel < 4) {
Packit 7838c8
					sprintf(emsg, "Sorry, can not handle separated image with %s=%d",
Packit 7838c8
					    "Samples/pixel", img->samplesperpixel);
Packit 7838c8
                                        goto fail_return;
Packit 7838c8
				}
Packit 7838c8
			}
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_LOGL:
Packit 7838c8
			if (compress != COMPRESSION_SGILOG) {
Packit 7838c8
				sprintf(emsg, "Sorry, LogL data must have %s=%d",
Packit 7838c8
				    "Compression", COMPRESSION_SGILOG);
Packit 7838c8
                                goto fail_return;
Packit 7838c8
			}
Packit 7838c8
			TIFFSetField(tif, TIFFTAG_SGILOGDATAFMT, SGILOGDATAFMT_8BIT);
Packit 7838c8
			img->photometric = PHOTOMETRIC_MINISBLACK;	/* little white lie */
Packit 7838c8
			img->bitspersample = 8;
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_LOGLUV:
Packit 7838c8
			if (compress != COMPRESSION_SGILOG && compress != COMPRESSION_SGILOG24) {
Packit 7838c8
				sprintf(emsg, "Sorry, LogLuv data must have %s=%d or %d",
Packit 7838c8
				    "Compression", COMPRESSION_SGILOG, COMPRESSION_SGILOG24);
Packit 7838c8
                                goto fail_return;
Packit 7838c8
			}
Packit 7838c8
			if (planarconfig != PLANARCONFIG_CONTIG) {
Packit 7838c8
				sprintf(emsg, "Sorry, can not handle LogLuv images with %s=%d",
Packit 7838c8
				    "Planarconfiguration", planarconfig);
Packit 7838c8
				return (0);
Packit 7838c8
			}
Packit 7838c8
			TIFFSetField(tif, TIFFTAG_SGILOGDATAFMT, SGILOGDATAFMT_8BIT);
Packit 7838c8
			img->photometric = PHOTOMETRIC_RGB;		/* little white lie */
Packit 7838c8
			img->bitspersample = 8;
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_CIELAB:
Packit 7838c8
			break;
Packit 7838c8
		default:
Packit 7838c8
			sprintf(emsg, "Sorry, can not handle image with %s=%d",
Packit 7838c8
			    photoTag, img->photometric);
Packit 7838c8
                        goto fail_return;
Packit 7838c8
	}
Packit 7838c8
	TIFFGetField(tif, TIFFTAG_IMAGEWIDTH, &img->width);
Packit 7838c8
	TIFFGetField(tif, TIFFTAG_IMAGELENGTH, &img->height);
Packit 7838c8
	TIFFGetFieldDefaulted(tif, TIFFTAG_ORIENTATION, &img->orientation);
Packit 7838c8
	img->isContig =
Packit 7838c8
	    !(planarconfig == PLANARCONFIG_SEPARATE && img->samplesperpixel > 1);
Packit 7838c8
	if (img->isContig) {
Packit 7838c8
		if (!PickContigCase(img)) {
Packit 7838c8
			sprintf(emsg, "Sorry, can not handle image");
Packit 7838c8
			goto fail_return;
Packit 7838c8
		}
Packit 7838c8
	} else {
Packit 7838c8
		if (!PickSeparateCase(img)) {
Packit 7838c8
			sprintf(emsg, "Sorry, can not handle image");
Packit 7838c8
			goto fail_return;
Packit 7838c8
		}
Packit 7838c8
	}
Packit 7838c8
	return 1;
Packit 7838c8
Packit 7838c8
  fail_return:
Packit 7838c8
        TIFFRGBAImageEnd( img );
Packit 7838c8
        return 0;
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
int
Packit 7838c8
TIFFRGBAImageGet(TIFFRGBAImage* img, uint32* raster, uint32 w, uint32 h)
Packit 7838c8
{
Packit 7838c8
    if (img->get == NULL) {
Packit 7838c8
		TIFFErrorExt(img->tif->tif_clientdata, TIFFFileName(img->tif), "No \"get\" routine setup");
Packit 7838c8
		return (0);
Packit 7838c8
	}
Packit 7838c8
	if (img->put.any == NULL) {
Packit 7838c8
		TIFFErrorExt(img->tif->tif_clientdata, TIFFFileName(img->tif),
Packit 7838c8
		"No \"put\" routine setupl; probably can not handle image format");
Packit 7838c8
		return (0);
Packit 7838c8
    }
Packit 7838c8
    return (*img->get)(img, raster, w, h);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Read the specified image into an ABGR-format rastertaking in account
Packit 7838c8
 * specified orientation.
Packit 7838c8
 */
Packit 7838c8
int
Packit 7838c8
TIFFReadRGBAImageOriented(TIFF* tif,
Packit 7838c8
			  uint32 rwidth, uint32 rheight, uint32* raster,
Packit 7838c8
			  int orientation, int stop)
Packit 7838c8
{
Packit 7838c8
    char emsg[1024] = "";
Packit 7838c8
    TIFFRGBAImage img;
Packit 7838c8
    int ok;
Packit 7838c8
Packit 7838c8
	if (TIFFRGBAImageOK(tif, emsg) && TIFFRGBAImageBegin(&img, tif, stop, emsg)) {
Packit 7838c8
		img.req_orientation = (uint16)orientation;
Packit 7838c8
		/* XXX verify rwidth and rheight against width and height */
Packit 7838c8
		ok = TIFFRGBAImageGet(&img, raster+(rheight-img.height)*rwidth,
Packit 7838c8
			rwidth, img.height);
Packit 7838c8
		TIFFRGBAImageEnd(&img;;
Packit 7838c8
	} else {
Packit 7838c8
		TIFFErrorExt(tif->tif_clientdata, TIFFFileName(tif), "%s", emsg);
Packit 7838c8
		ok = 0;
Packit 7838c8
    }
Packit 7838c8
    return (ok);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Read the specified image into an ABGR-format raster. Use bottom left
Packit 7838c8
 * origin for raster by default.
Packit 7838c8
 */
Packit 7838c8
int
Packit 7838c8
TIFFReadRGBAImage(TIFF* tif,
Packit 7838c8
		  uint32 rwidth, uint32 rheight, uint32* raster, int stop)
Packit 7838c8
{
Packit 7838c8
	return TIFFReadRGBAImageOriented(tif, rwidth, rheight, raster,
Packit 7838c8
					 ORIENTATION_BOTLEFT, stop);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
static int 
Packit 7838c8
setorientation(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
	switch (img->orientation) {
Packit 7838c8
		case ORIENTATION_TOPLEFT:
Packit 7838c8
		case ORIENTATION_LEFTTOP:
Packit 7838c8
			if (img->req_orientation == ORIENTATION_TOPRIGHT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_RIGHTTOP)
Packit 7838c8
				return FLIP_HORIZONTALLY;
Packit 7838c8
			else if (img->req_orientation == ORIENTATION_BOTRIGHT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_RIGHTBOT)
Packit 7838c8
				return FLIP_HORIZONTALLY | FLIP_VERTICALLY;
Packit 7838c8
			else if (img->req_orientation == ORIENTATION_BOTLEFT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_LEFTBOT)
Packit 7838c8
				return FLIP_VERTICALLY;
Packit 7838c8
			else
Packit 7838c8
				return 0;
Packit 7838c8
		case ORIENTATION_TOPRIGHT:
Packit 7838c8
		case ORIENTATION_RIGHTTOP:
Packit 7838c8
			if (img->req_orientation == ORIENTATION_TOPLEFT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_LEFTTOP)
Packit 7838c8
				return FLIP_HORIZONTALLY;
Packit 7838c8
			else if (img->req_orientation == ORIENTATION_BOTRIGHT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_RIGHTBOT)
Packit 7838c8
				return FLIP_VERTICALLY;
Packit 7838c8
			else if (img->req_orientation == ORIENTATION_BOTLEFT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_LEFTBOT)
Packit 7838c8
				return FLIP_HORIZONTALLY | FLIP_VERTICALLY;
Packit 7838c8
			else
Packit 7838c8
				return 0;
Packit 7838c8
		case ORIENTATION_BOTRIGHT:
Packit 7838c8
		case ORIENTATION_RIGHTBOT:
Packit 7838c8
			if (img->req_orientation == ORIENTATION_TOPLEFT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_LEFTTOP)
Packit 7838c8
				return FLIP_HORIZONTALLY | FLIP_VERTICALLY;
Packit 7838c8
			else if (img->req_orientation == ORIENTATION_TOPRIGHT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_RIGHTTOP)
Packit 7838c8
				return FLIP_VERTICALLY;
Packit 7838c8
			else if (img->req_orientation == ORIENTATION_BOTLEFT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_LEFTBOT)
Packit 7838c8
				return FLIP_HORIZONTALLY;
Packit 7838c8
			else
Packit 7838c8
				return 0;
Packit 7838c8
		case ORIENTATION_BOTLEFT:
Packit 7838c8
		case ORIENTATION_LEFTBOT:
Packit 7838c8
			if (img->req_orientation == ORIENTATION_TOPLEFT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_LEFTTOP)
Packit 7838c8
				return FLIP_VERTICALLY;
Packit 7838c8
			else if (img->req_orientation == ORIENTATION_TOPRIGHT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_RIGHTTOP)
Packit 7838c8
				return FLIP_HORIZONTALLY | FLIP_VERTICALLY;
Packit 7838c8
			else if (img->req_orientation == ORIENTATION_BOTRIGHT ||
Packit 7838c8
			    img->req_orientation == ORIENTATION_RIGHTBOT)
Packit 7838c8
				return FLIP_HORIZONTALLY;
Packit 7838c8
			else
Packit 7838c8
				return 0;
Packit 7838c8
		default:	/* NOTREACHED */
Packit 7838c8
			return 0;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Get an tile-organized image that has
Packit 7838c8
 *	PlanarConfiguration contiguous if SamplesPerPixel > 1
Packit 7838c8
 * or
Packit 7838c8
 *	SamplesPerPixel == 1
Packit 7838c8
 */	
Packit 7838c8
static int
Packit 7838c8
gtTileContig(TIFFRGBAImage* img, uint32* raster, uint32 w, uint32 h)
Packit 7838c8
{
Packit 7838c8
    TIFF* tif = img->tif;
Packit 7838c8
    tileContigRoutine put = img->put.contig;
Packit 7838c8
    uint32 col, row, y, rowstoread;
Packit 7838c8
    tmsize_t pos;
Packit 7838c8
    uint32 tw, th;
Packit 7838c8
    unsigned char* buf = NULL;
Packit 7838c8
    int32 fromskew, toskew;
Packit 7838c8
    uint32 nrow;
Packit 7838c8
    int ret = 1, flip;
Packit 7838c8
    uint32 this_tw, tocol;
Packit 7838c8
    int32 this_toskew, leftmost_toskew;
Packit 7838c8
    int32 leftmost_fromskew;
Packit 7838c8
    uint32 leftmost_tw;
Packit 7838c8
    tmsize_t bufsize;
Packit 7838c8
Packit 7838c8
    bufsize = TIFFTileSize(tif);
Packit 7838c8
    if (bufsize == 0) {
Packit 7838c8
        TIFFErrorExt(tif->tif_clientdata, TIFFFileName(tif), "%s", "No space for tile buffer");
Packit 7838c8
        return (0);
Packit 7838c8
    }
Packit 7838c8
Packit 7838c8
    TIFFGetField(tif, TIFFTAG_TILEWIDTH, &tw);
Packit 7838c8
    TIFFGetField(tif, TIFFTAG_TILELENGTH, &th);
Packit 7838c8
Packit 7838c8
    flip = setorientation(img);
Packit 7838c8
    if (flip & FLIP_VERTICALLY) {
Packit 7838c8
	    y = h - 1;
Packit 7838c8
	    toskew = -(int32)(tw + w);
Packit 7838c8
    }
Packit 7838c8
    else {
Packit 7838c8
	    y = 0;
Packit 7838c8
	    toskew = -(int32)(tw - w);
Packit 7838c8
    }
Packit 7838c8
     
Packit 7838c8
    /*
Packit 7838c8
     *	Leftmost tile is clipped on left side if col_offset > 0.
Packit 7838c8
     */
Packit 7838c8
    leftmost_fromskew = img->col_offset % tw;
Packit 7838c8
    leftmost_tw = tw - leftmost_fromskew;
Packit 7838c8
    leftmost_toskew = toskew + leftmost_fromskew;
Packit 7838c8
    for (row = 0; ret != 0 && row < h; row += nrow)
Packit 7838c8
    {
Packit 7838c8
        rowstoread = th - (row + img->row_offset) % th;
Packit 7838c8
    	nrow = (row + rowstoread > h ? h - row : rowstoread);
Packit 7838c8
	fromskew = leftmost_fromskew;
Packit 7838c8
	this_tw = leftmost_tw;
Packit 7838c8
	this_toskew = leftmost_toskew;
Packit 7838c8
	tocol = 0;
Packit 7838c8
	col = img->col_offset;
Packit 7838c8
	while (tocol < w)
Packit 7838c8
        {
Packit 7838c8
	    if (_TIFFReadTileAndAllocBuffer(tif, (void**) &buf, bufsize, col,
Packit 7838c8
			     row+img->row_offset, 0, 0)==(tmsize_t)(-1) &&
Packit 7838c8
                (buf == NULL || img->stoponerr))
Packit 7838c8
            {
Packit 7838c8
                ret = 0;
Packit 7838c8
                break;
Packit 7838c8
            }
Packit 7838c8
            pos = ((row+img->row_offset) % th) * TIFFTileRowSize(tif) + \
Packit 7838c8
		   ((tmsize_t) fromskew * img->samplesperpixel);
Packit 7838c8
	    if (tocol + this_tw > w) 
Packit 7838c8
	    {
Packit 7838c8
		/*
Packit 7838c8
		 * Rightmost tile is clipped on right side.
Packit 7838c8
		 */
Packit 7838c8
		fromskew = tw - (w - tocol);
Packit 7838c8
		this_tw = tw - fromskew;
Packit 7838c8
		this_toskew = toskew + fromskew;
Packit 7838c8
	    }
Packit 7838c8
	    (*put)(img, raster+y*w+tocol, tocol, y, this_tw, nrow, fromskew, this_toskew, buf + pos);
Packit 7838c8
	    tocol += this_tw;
Packit 7838c8
	    col += this_tw;
Packit 7838c8
	    /*
Packit 7838c8
	     * After the leftmost tile, tiles are no longer clipped on left side.
Packit 7838c8
	     */
Packit 7838c8
	    fromskew = 0;
Packit 7838c8
	    this_tw = tw;
Packit 7838c8
	    this_toskew = toskew;
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
        y += ((flip & FLIP_VERTICALLY) ? -(int32) nrow : (int32) nrow);
Packit 7838c8
    }
Packit 7838c8
    _TIFFfree(buf);
Packit 7838c8
Packit 7838c8
    if (flip & FLIP_HORIZONTALLY) {
Packit 7838c8
	    uint32 line;
Packit 7838c8
Packit 7838c8
	    for (line = 0; line < h; line++) {
Packit 7838c8
		    uint32 *left = raster + (line * w);
Packit 7838c8
		    uint32 *right = left + w - 1;
Packit 7838c8
		    
Packit 7838c8
		    while ( left < right ) {
Packit 7838c8
			    uint32 temp = *left;
Packit 7838c8
			    *left = *right;
Packit 7838c8
			    *right = temp;
Packit 7838c8
			    left++;
Packit 7838c8
				right--;
Packit 7838c8
		    }
Packit 7838c8
	    }
Packit 7838c8
    }
Packit 7838c8
Packit 7838c8
    return (ret);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Get an tile-organized image that has
Packit 7838c8
 *	 SamplesPerPixel > 1
Packit 7838c8
 *	 PlanarConfiguration separated
Packit 7838c8
 * We assume that all such images are RGB.
Packit 7838c8
 */	
Packit 7838c8
static int
Packit 7838c8
gtTileSeparate(TIFFRGBAImage* img, uint32* raster, uint32 w, uint32 h)
Packit 7838c8
{
Packit 7838c8
	TIFF* tif = img->tif;
Packit 7838c8
	tileSeparateRoutine put = img->put.separate;
Packit 7838c8
	uint32 col, row, y, rowstoread;
Packit 7838c8
	tmsize_t pos;
Packit 7838c8
	uint32 tw, th;
Packit 7838c8
	unsigned char* buf = NULL;
Packit 7838c8
	unsigned char* p0 = NULL;
Packit 7838c8
	unsigned char* p1 = NULL;
Packit 7838c8
	unsigned char* p2 = NULL;
Packit 7838c8
	unsigned char* pa = NULL;
Packit 7838c8
	tmsize_t tilesize;
Packit 7838c8
	tmsize_t bufsize;
Packit 7838c8
	int32 fromskew, toskew;
Packit 7838c8
	int alpha = img->alpha;
Packit 7838c8
	uint32 nrow;
Packit 7838c8
	int ret = 1, flip;
Packit 7838c8
        uint16 colorchannels;
Packit 7838c8
	uint32 this_tw, tocol;
Packit 7838c8
	int32 this_toskew, leftmost_toskew;
Packit 7838c8
	int32 leftmost_fromskew;
Packit 7838c8
	uint32 leftmost_tw;
Packit 7838c8
Packit 7838c8
	tilesize = TIFFTileSize(tif);  
Packit 7838c8
	bufsize = TIFFSafeMultiply(tmsize_t,alpha?4:3,tilesize);
Packit 7838c8
	if (bufsize == 0) {
Packit 7838c8
		TIFFErrorExt(tif->tif_clientdata, TIFFFileName(tif), "Integer overflow in %s", "gtTileSeparate");
Packit 7838c8
		return (0);
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	TIFFGetField(tif, TIFFTAG_TILEWIDTH, &tw);
Packit 7838c8
	TIFFGetField(tif, TIFFTAG_TILELENGTH, &th);
Packit 7838c8
Packit 7838c8
	flip = setorientation(img);
Packit 7838c8
	if (flip & FLIP_VERTICALLY) {
Packit 7838c8
		y = h - 1;
Packit 7838c8
		toskew = -(int32)(tw + w);
Packit 7838c8
	}
Packit 7838c8
	else {
Packit 7838c8
		y = 0;
Packit 7838c8
		toskew = -(int32)(tw - w);
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
        switch( img->photometric )
Packit 7838c8
        {
Packit 7838c8
          case PHOTOMETRIC_MINISWHITE:
Packit 7838c8
          case PHOTOMETRIC_MINISBLACK:
Packit 7838c8
          case PHOTOMETRIC_PALETTE:
Packit 7838c8
            colorchannels = 1;
Packit 7838c8
            break;
Packit 7838c8
Packit 7838c8
          default:
Packit 7838c8
            colorchannels = 3;
Packit 7838c8
            break;
Packit 7838c8
        }
Packit 7838c8
Packit 7838c8
	/*
Packit 7838c8
	 *	Leftmost tile is clipped on left side if col_offset > 0.
Packit 7838c8
	 */
Packit 7838c8
	leftmost_fromskew = img->col_offset % tw;
Packit 7838c8
	leftmost_tw = tw - leftmost_fromskew;
Packit 7838c8
	leftmost_toskew = toskew + leftmost_fromskew;
Packit 7838c8
	for (row = 0; ret != 0 && row < h; row += nrow)
Packit 7838c8
	{
Packit 7838c8
		rowstoread = th - (row + img->row_offset) % th;
Packit 7838c8
		nrow = (row + rowstoread > h ? h - row : rowstoread);
Packit 7838c8
		fromskew = leftmost_fromskew;
Packit 7838c8
		this_tw = leftmost_tw;
Packit 7838c8
		this_toskew = leftmost_toskew;
Packit 7838c8
		tocol = 0;
Packit 7838c8
		col = img->col_offset;
Packit 7838c8
		while (tocol < w)
Packit 7838c8
		{
Packit 7838c8
                        if( buf == NULL )
Packit 7838c8
                        {
Packit 7838c8
                            if (_TIFFReadTileAndAllocBuffer(
Packit 7838c8
                                    tif, (void**) &buf, bufsize, col,
Packit 7838c8
                                    row+img->row_offset,0,0)==(tmsize_t)(-1)
Packit 7838c8
                                && (buf == NULL || img->stoponerr))
Packit 7838c8
                            {
Packit 7838c8
                                    ret = 0;
Packit 7838c8
                                    break;
Packit 7838c8
                            }
Packit 7838c8
                            p0 = buf;
Packit 7838c8
                            if( colorchannels == 1 )
Packit 7838c8
                            {
Packit 7838c8
                                p2 = p1 = p0;
Packit 7838c8
                                pa = (alpha?(p0+3*tilesize):NULL);
Packit 7838c8
                            }
Packit 7838c8
                            else
Packit 7838c8
                            {
Packit 7838c8
                                p1 = p0 + tilesize;
Packit 7838c8
                                p2 = p1 + tilesize;
Packit 7838c8
                                pa = (alpha?(p2+tilesize):NULL);
Packit 7838c8
                            }
Packit 7838c8
                        }
Packit 7838c8
			else if (TIFFReadTile(tif, p0, col,  
Packit 7838c8
			    row+img->row_offset,0,0)==(tmsize_t)(-1) && img->stoponerr)
Packit 7838c8
			{
Packit 7838c8
				ret = 0;
Packit 7838c8
				break;
Packit 7838c8
			}
Packit 7838c8
			if (colorchannels > 1 
Packit 7838c8
                            && TIFFReadTile(tif, p1, col,  
Packit 7838c8
                                            row+img->row_offset,0,1) == (tmsize_t)(-1) 
Packit 7838c8
                            && img->stoponerr)
Packit 7838c8
			{
Packit 7838c8
				ret = 0;
Packit 7838c8
				break;
Packit 7838c8
			}
Packit 7838c8
			if (colorchannels > 1 
Packit 7838c8
                            && TIFFReadTile(tif, p2, col,  
Packit 7838c8
                                            row+img->row_offset,0,2) == (tmsize_t)(-1) 
Packit 7838c8
                            && img->stoponerr)
Packit 7838c8
			{
Packit 7838c8
				ret = 0;
Packit 7838c8
				break;
Packit 7838c8
			}
Packit 7838c8
			if (alpha
Packit 7838c8
                            && TIFFReadTile(tif,pa,col,  
Packit 7838c8
                                            row+img->row_offset,0,colorchannels) == (tmsize_t)(-1) 
Packit 7838c8
                            && img->stoponerr)
Packit 7838c8
                        {
Packit 7838c8
                            ret = 0;
Packit 7838c8
                            break;
Packit 7838c8
			}
Packit 7838c8
Packit 7838c8
			pos = ((row+img->row_offset) % th) * TIFFTileRowSize(tif) + \
Packit 7838c8
			   ((tmsize_t) fromskew * img->samplesperpixel);
Packit 7838c8
			if (tocol + this_tw > w) 
Packit 7838c8
			{
Packit 7838c8
				/*
Packit 7838c8
				 * Rightmost tile is clipped on right side.
Packit 7838c8
				 */
Packit 7838c8
				fromskew = tw - (w - tocol);
Packit 7838c8
				this_tw = tw - fromskew;
Packit 7838c8
				this_toskew = toskew + fromskew;
Packit 7838c8
			}
Packit 7838c8
			(*put)(img, raster+y*w+tocol, tocol, y, this_tw, nrow, fromskew, this_toskew, \
Packit 7838c8
				p0 + pos, p1 + pos, p2 + pos, (alpha?(pa+pos):NULL));
Packit 7838c8
			tocol += this_tw;
Packit 7838c8
			col += this_tw;
Packit 7838c8
			/*
Packit 7838c8
			* After the leftmost tile, tiles are no longer clipped on left side.
Packit 7838c8
			*/
Packit 7838c8
			fromskew = 0;
Packit 7838c8
			this_tw = tw;
Packit 7838c8
			this_toskew = toskew;
Packit 7838c8
		}
Packit 7838c8
Packit 7838c8
		y += ((flip & FLIP_VERTICALLY) ?-(int32) nrow : (int32) nrow);
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	if (flip & FLIP_HORIZONTALLY) {
Packit 7838c8
		uint32 line;
Packit 7838c8
Packit 7838c8
		for (line = 0; line < h; line++) {
Packit 7838c8
			uint32 *left = raster + (line * w);
Packit 7838c8
			uint32 *right = left + w - 1;
Packit 7838c8
Packit 7838c8
			while ( left < right ) {
Packit 7838c8
				uint32 temp = *left;
Packit 7838c8
				*left = *right;
Packit 7838c8
				*right = temp;
Packit 7838c8
				left++;
Packit 7838c8
				right--;
Packit 7838c8
			}
Packit 7838c8
		}
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	_TIFFfree(buf);
Packit 7838c8
	return (ret);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Get a strip-organized image that has
Packit 7838c8
 *	PlanarConfiguration contiguous if SamplesPerPixel > 1
Packit 7838c8
 * or
Packit 7838c8
 *	SamplesPerPixel == 1
Packit 7838c8
 */	
Packit 7838c8
static int
Packit 7838c8
gtStripContig(TIFFRGBAImage* img, uint32* raster, uint32 w, uint32 h)
Packit 7838c8
{
Packit 7838c8
	TIFF* tif = img->tif;
Packit 7838c8
	tileContigRoutine put = img->put.contig;
Packit 7838c8
	uint32 row, y, nrow, nrowsub, rowstoread;
Packit 7838c8
	tmsize_t pos;
Packit 7838c8
	unsigned char* buf = NULL;
Packit 7838c8
	uint32 rowsperstrip;
Packit 7838c8
	uint16 subsamplinghor,subsamplingver;
Packit 7838c8
	uint32 imagewidth = img->width;
Packit 7838c8
	tmsize_t scanline;
Packit 7838c8
	int32 fromskew, toskew;
Packit 7838c8
	int ret = 1, flip;
Packit 7838c8
        tmsize_t maxstripsize;
Packit 7838c8
Packit 7838c8
	TIFFGetFieldDefaulted(tif, TIFFTAG_YCBCRSUBSAMPLING, &subsamplinghor, &subsamplingver);
Packit 7838c8
	if( subsamplingver == 0 ) {
Packit 7838c8
		TIFFErrorExt(tif->tif_clientdata, TIFFFileName(tif), "Invalid vertical YCbCr subsampling");
Packit 7838c8
		return (0);
Packit 7838c8
	}
Packit 7838c8
	
Packit 7838c8
	maxstripsize = TIFFStripSize(tif);
Packit 7838c8
Packit 7838c8
	flip = setorientation(img);
Packit 7838c8
	if (flip & FLIP_VERTICALLY) {
Packit 7838c8
		y = h - 1;
Packit 7838c8
		toskew = -(int32)(w + w);
Packit 7838c8
	} else {
Packit 7838c8
		y = 0;
Packit 7838c8
		toskew = -(int32)(w - w);
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	TIFFGetFieldDefaulted(tif, TIFFTAG_ROWSPERSTRIP, &rowsperstrip);
Packit 7838c8
Packit 7838c8
	scanline = TIFFScanlineSize(tif);
Packit 7838c8
	fromskew = (w < imagewidth ? imagewidth - w : 0);
Packit 7838c8
	for (row = 0; row < h; row += nrow)
Packit 7838c8
	{
Packit 7838c8
		rowstoread = rowsperstrip - (row + img->row_offset) % rowsperstrip;
Packit 7838c8
		nrow = (row + rowstoread > h ? h - row : rowstoread);
Packit 7838c8
		nrowsub = nrow;
Packit 7838c8
		if ((nrowsub%subsamplingver)!=0)
Packit 7838c8
			nrowsub+=subsamplingver-nrowsub%subsamplingver;
Packit 7838c8
		if (_TIFFReadEncodedStripAndAllocBuffer(tif,
Packit 7838c8
		    TIFFComputeStrip(tif,row+img->row_offset, 0),
Packit 7838c8
		    (void**)(&buf),
Packit 7838c8
                    maxstripsize,
Packit 7838c8
		    ((row + img->row_offset)%rowsperstrip + nrowsub) * scanline)==(tmsize_t)(-1)
Packit 7838c8
		    && (buf == NULL || img->stoponerr))
Packit 7838c8
		{
Packit 7838c8
			ret = 0;
Packit 7838c8
			break;
Packit 7838c8
		}
Packit 7838c8
Packit 7838c8
		pos = ((row + img->row_offset) % rowsperstrip) * scanline + \
Packit 7838c8
			((tmsize_t) img->col_offset * img->samplesperpixel);
Packit 7838c8
		(*put)(img, raster+y*w, 0, y, w, nrow, fromskew, toskew, buf + pos);
Packit 7838c8
		y += ((flip & FLIP_VERTICALLY) ? -(int32) nrow : (int32) nrow);
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	if (flip & FLIP_HORIZONTALLY) {
Packit 7838c8
		uint32 line;
Packit 7838c8
Packit 7838c8
		for (line = 0; line < h; line++) {
Packit 7838c8
			uint32 *left = raster + (line * w);
Packit 7838c8
			uint32 *right = left + w - 1;
Packit 7838c8
Packit 7838c8
			while ( left < right ) {
Packit 7838c8
				uint32 temp = *left;
Packit 7838c8
				*left = *right;
Packit 7838c8
				*right = temp;
Packit 7838c8
				left++;
Packit 7838c8
				right--;
Packit 7838c8
			}
Packit 7838c8
		}
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	_TIFFfree(buf);
Packit 7838c8
	return (ret);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Get a strip-organized image with
Packit 7838c8
 *	 SamplesPerPixel > 1
Packit 7838c8
 *	 PlanarConfiguration separated
Packit 7838c8
 * We assume that all such images are RGB.
Packit 7838c8
 */
Packit 7838c8
static int
Packit 7838c8
gtStripSeparate(TIFFRGBAImage* img, uint32* raster, uint32 w, uint32 h)
Packit 7838c8
{
Packit 7838c8
	TIFF* tif = img->tif;
Packit 7838c8
	tileSeparateRoutine put = img->put.separate;
Packit 7838c8
	unsigned char *buf = NULL;
Packit 7838c8
	unsigned char *p0 = NULL, *p1 = NULL, *p2 = NULL, *pa = NULL;
Packit 7838c8
	uint32 row, y, nrow, rowstoread;
Packit 7838c8
	tmsize_t pos;
Packit 7838c8
	tmsize_t scanline;
Packit 7838c8
	uint32 rowsperstrip, offset_row;
Packit 7838c8
	uint32 imagewidth = img->width;
Packit 7838c8
	tmsize_t stripsize;
Packit 7838c8
	tmsize_t bufsize;
Packit 7838c8
	int32 fromskew, toskew;
Packit 7838c8
	int alpha = img->alpha;
Packit 7838c8
	int ret = 1, flip;
Packit 7838c8
        uint16 colorchannels;
Packit 7838c8
Packit 7838c8
	stripsize = TIFFStripSize(tif);  
Packit 7838c8
	bufsize = TIFFSafeMultiply(tmsize_t,alpha?4:3,stripsize);
Packit 7838c8
	if (bufsize == 0) {
Packit 7838c8
		TIFFErrorExt(tif->tif_clientdata, TIFFFileName(tif), "Integer overflow in %s", "gtStripSeparate");
Packit 7838c8
		return (0);
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	flip = setorientation(img);
Packit 7838c8
	if (flip & FLIP_VERTICALLY) {
Packit 7838c8
		y = h - 1;
Packit 7838c8
		toskew = -(int32)(w + w);
Packit 7838c8
	}
Packit 7838c8
	else {
Packit 7838c8
		y = 0;
Packit 7838c8
		toskew = -(int32)(w - w);
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
        switch( img->photometric )
Packit 7838c8
        {
Packit 7838c8
          case PHOTOMETRIC_MINISWHITE:
Packit 7838c8
          case PHOTOMETRIC_MINISBLACK:
Packit 7838c8
          case PHOTOMETRIC_PALETTE:
Packit 7838c8
            colorchannels = 1;
Packit 7838c8
            break;
Packit 7838c8
Packit 7838c8
          default:
Packit 7838c8
            colorchannels = 3;
Packit 7838c8
            break;
Packit 7838c8
        }
Packit 7838c8
Packit 7838c8
	TIFFGetFieldDefaulted(tif, TIFFTAG_ROWSPERSTRIP, &rowsperstrip);
Packit 7838c8
	scanline = TIFFScanlineSize(tif);  
Packit 7838c8
	fromskew = (w < imagewidth ? imagewidth - w : 0);
Packit 7838c8
	for (row = 0; row < h; row += nrow)
Packit 7838c8
	{
Packit 7838c8
		rowstoread = rowsperstrip - (row + img->row_offset) % rowsperstrip;
Packit 7838c8
		nrow = (row + rowstoread > h ? h - row : rowstoread);
Packit 7838c8
		offset_row = row + img->row_offset;
Packit 7838c8
                if( buf == NULL )
Packit 7838c8
                {
Packit 7838c8
                    if (_TIFFReadEncodedStripAndAllocBuffer(
Packit 7838c8
                            tif, TIFFComputeStrip(tif, offset_row, 0),
Packit 7838c8
                            (void**) &buf, bufsize,
Packit 7838c8
                            ((row + img->row_offset)%rowsperstrip + nrow) * scanline)==(tmsize_t)(-1)
Packit 7838c8
                        && (buf == NULL || img->stoponerr))
Packit 7838c8
                    {
Packit 7838c8
                            ret = 0;
Packit 7838c8
                            break;
Packit 7838c8
                    }
Packit 7838c8
                    p0 = buf;
Packit 7838c8
                    if( colorchannels == 1 )
Packit 7838c8
                    {
Packit 7838c8
                        p2 = p1 = p0;
Packit 7838c8
                        pa = (alpha?(p0+3*stripsize):NULL);
Packit 7838c8
                    }
Packit 7838c8
                    else
Packit 7838c8
                    {
Packit 7838c8
                        p1 = p0 + stripsize;
Packit 7838c8
                        p2 = p1 + stripsize;
Packit 7838c8
                        pa = (alpha?(p2+stripsize):NULL);
Packit 7838c8
                    }
Packit 7838c8
                }
Packit 7838c8
		else if (TIFFReadEncodedStrip(tif, TIFFComputeStrip(tif, offset_row, 0),
Packit 7838c8
		    p0, ((row + img->row_offset)%rowsperstrip + nrow) * scanline)==(tmsize_t)(-1)
Packit 7838c8
		    && img->stoponerr)
Packit 7838c8
		{
Packit 7838c8
			ret = 0;
Packit 7838c8
			break;
Packit 7838c8
		}
Packit 7838c8
		if (colorchannels > 1 
Packit 7838c8
                    && TIFFReadEncodedStrip(tif, TIFFComputeStrip(tif, offset_row, 1),
Packit 7838c8
                                            p1, ((row + img->row_offset)%rowsperstrip + nrow) * scanline) == (tmsize_t)(-1)
Packit 7838c8
		    && img->stoponerr)
Packit 7838c8
		{
Packit 7838c8
			ret = 0;
Packit 7838c8
			break;
Packit 7838c8
		}
Packit 7838c8
		if (colorchannels > 1 
Packit 7838c8
                    && TIFFReadEncodedStrip(tif, TIFFComputeStrip(tif, offset_row, 2),
Packit 7838c8
                                            p2, ((row + img->row_offset)%rowsperstrip + nrow) * scanline) == (tmsize_t)(-1)
Packit 7838c8
		    && img->stoponerr)
Packit 7838c8
		{
Packit 7838c8
			ret = 0;
Packit 7838c8
			break;
Packit 7838c8
		}
Packit 7838c8
		if (alpha)
Packit 7838c8
		{
Packit 7838c8
			if (TIFFReadEncodedStrip(tif, TIFFComputeStrip(tif, offset_row, colorchannels),
Packit 7838c8
			    pa, ((row + img->row_offset)%rowsperstrip + nrow) * scanline)==(tmsize_t)(-1)
Packit 7838c8
			    && img->stoponerr)
Packit 7838c8
			{
Packit 7838c8
				ret = 0;
Packit 7838c8
				break;
Packit 7838c8
			}
Packit 7838c8
		}
Packit 7838c8
Packit 7838c8
		pos = ((row + img->row_offset) % rowsperstrip) * scanline + \
Packit 7838c8
			((tmsize_t) img->col_offset * img->samplesperpixel);
Packit 7838c8
		(*put)(img, raster+y*w, 0, y, w, nrow, fromskew, toskew, p0 + pos, p1 + pos,
Packit 7838c8
		    p2 + pos, (alpha?(pa+pos):NULL));
Packit 7838c8
		y += ((flip & FLIP_VERTICALLY) ? -(int32) nrow : (int32) nrow);
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	if (flip & FLIP_HORIZONTALLY) {
Packit 7838c8
		uint32 line;
Packit 7838c8
Packit 7838c8
		for (line = 0; line < h; line++) {
Packit 7838c8
			uint32 *left = raster + (line * w);
Packit 7838c8
			uint32 *right = left + w - 1;
Packit 7838c8
Packit 7838c8
			while ( left < right ) {
Packit 7838c8
				uint32 temp = *left;
Packit 7838c8
				*left = *right;
Packit 7838c8
				*right = temp;
Packit 7838c8
				left++;
Packit 7838c8
				right--;
Packit 7838c8
			}
Packit 7838c8
		}
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	_TIFFfree(buf);
Packit 7838c8
	return (ret);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * The following routines move decoded data returned
Packit 7838c8
 * from the TIFF library into rasters filled with packed
Packit 7838c8
 * ABGR pixels (i.e. suitable for passing to lrecwrite.)
Packit 7838c8
 *
Packit 7838c8
 * The routines have been created according to the most
Packit 7838c8
 * important cases and optimized.  PickContigCase and
Packit 7838c8
 * PickSeparateCase analyze the parameters and select
Packit 7838c8
 * the appropriate "get" and "put" routine to use.
Packit 7838c8
 */
Packit 7838c8
#define	REPEAT8(op)	REPEAT4(op); REPEAT4(op)
Packit 7838c8
#define	REPEAT4(op)	REPEAT2(op); REPEAT2(op)
Packit 7838c8
#define	REPEAT2(op)	op; op
Packit 7838c8
#define	CASE8(x,op)			\
Packit 7838c8
    switch (x) {			\
Packit 7838c8
    case 7: op; /*-fallthrough*/ \
Packit 7838c8
    case 6: op; /*-fallthrough*/ \
Packit 7838c8
    case 5: op; /*-fallthrough*/ \
Packit 7838c8
    case 4: op; /*-fallthrough*/ \
Packit 7838c8
    case 3: op; /*-fallthrough*/ \
Packit 7838c8
    case 2: op; /*-fallthrough*/ \
Packit 7838c8
    case 1: op;				\
Packit 7838c8
    }
Packit 7838c8
#define	CASE4(x,op)	switch (x) { case 3: op; /*-fallthrough*/ case 2: op; /*-fallthrough*/ case 1: op; }
Packit 7838c8
#define	NOP
Packit 7838c8
Packit 7838c8
#define	UNROLL8(w, op1, op2) {		\
Packit 7838c8
    uint32 _x;				\
Packit 7838c8
    for (_x = w; _x >= 8; _x -= 8) {	\
Packit 7838c8
	op1;				\
Packit 7838c8
	REPEAT8(op2);			\
Packit 7838c8
    }					\
Packit 7838c8
    if (_x > 0) {			\
Packit 7838c8
	op1;				\
Packit 7838c8
	CASE8(_x,op2);			\
Packit 7838c8
    }					\
Packit 7838c8
}
Packit 7838c8
#define	UNROLL4(w, op1, op2) {		\
Packit 7838c8
    uint32 _x;				\
Packit 7838c8
    for (_x = w; _x >= 4; _x -= 4) {	\
Packit 7838c8
	op1;				\
Packit 7838c8
	REPEAT4(op2);			\
Packit 7838c8
    }					\
Packit 7838c8
    if (_x > 0) {			\
Packit 7838c8
	op1;				\
Packit 7838c8
	CASE4(_x,op2);			\
Packit 7838c8
    }					\
Packit 7838c8
}
Packit 7838c8
#define	UNROLL2(w, op1, op2) {		\
Packit 7838c8
    uint32 _x;				\
Packit 7838c8
    for (_x = w; _x >= 2; _x -= 2) {	\
Packit 7838c8
	op1;				\
Packit 7838c8
	REPEAT2(op2);			\
Packit 7838c8
    }					\
Packit 7838c8
    if (_x) {				\
Packit 7838c8
	op1;				\
Packit 7838c8
	op2;				\
Packit 7838c8
    }					\
Packit 7838c8
}
Packit 7838c8
    
Packit 7838c8
#define	SKEW(r,g,b,skew)	{ r += skew; g += skew; b += skew; }
Packit 7838c8
#define	SKEW4(r,g,b,a,skew)	{ r += skew; g += skew; b += skew; a+= skew; }
Packit 7838c8
Packit 7838c8
#define A1 (((uint32)0xffL)<<24)
Packit 7838c8
#define	PACK(r,g,b)	\
Packit 7838c8
	((uint32)(r)|((uint32)(g)<<8)|((uint32)(b)<<16)|A1)
Packit 7838c8
#define	PACK4(r,g,b,a)	\
Packit 7838c8
	((uint32)(r)|((uint32)(g)<<8)|((uint32)(b)<<16)|((uint32)(a)<<24))
Packit 7838c8
#define W2B(v) (((v)>>8)&0xff)
Packit 7838c8
/* TODO: PACKW should have be made redundant in favor of Bitdepth16To8 LUT */
Packit 7838c8
#define	PACKW(r,g,b)	\
Packit 7838c8
	((uint32)W2B(r)|((uint32)W2B(g)<<8)|((uint32)W2B(b)<<16)|A1)
Packit 7838c8
#define	PACKW4(r,g,b,a)	\
Packit 7838c8
	((uint32)W2B(r)|((uint32)W2B(g)<<8)|((uint32)W2B(b)<<16)|((uint32)W2B(a)<<24))
Packit 7838c8
Packit 7838c8
#define	DECLAREContigPutFunc(name) \
Packit 7838c8
static void name(\
Packit 7838c8
    TIFFRGBAImage* img, \
Packit 7838c8
    uint32* cp, \
Packit 7838c8
    uint32 x, uint32 y, \
Packit 7838c8
    uint32 w, uint32 h, \
Packit 7838c8
    int32 fromskew, int32 toskew, \
Packit 7838c8
    unsigned char* pp \
Packit 7838c8
)
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit palette => colormap/RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(put8bitcmaptile)
Packit 7838c8
{
Packit 7838c8
    uint32** PALmap = img->PALmap;
Packit 7838c8
    int samplesperpixel = img->samplesperpixel;
Packit 7838c8
Packit 7838c8
    (void) y;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	for (x = w; x > 0; --x)
Packit 7838c8
        {
Packit 7838c8
	    *cp++ = PALmap[*pp][0];
Packit 7838c8
            pp += samplesperpixel;
Packit 7838c8
        }
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 4-bit palette => colormap/RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(put4bitcmaptile)
Packit 7838c8
{
Packit 7838c8
    uint32** PALmap = img->PALmap;
Packit 7838c8
Packit 7838c8
    (void) x; (void) y;
Packit 7838c8
    fromskew /= 2;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	uint32* bw;
Packit 7838c8
	UNROLL2(w, bw = PALmap[*pp++], *cp++ = *bw++);
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 2-bit palette => colormap/RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(put2bitcmaptile)
Packit 7838c8
{
Packit 7838c8
    uint32** PALmap = img->PALmap;
Packit 7838c8
Packit 7838c8
    (void) x; (void) y;
Packit 7838c8
    fromskew /= 4;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	uint32* bw;
Packit 7838c8
	UNROLL4(w, bw = PALmap[*pp++], *cp++ = *bw++);
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 1-bit palette => colormap/RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(put1bitcmaptile)
Packit 7838c8
{
Packit 7838c8
    uint32** PALmap = img->PALmap;
Packit 7838c8
Packit 7838c8
    (void) x; (void) y;
Packit 7838c8
    fromskew /= 8;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	uint32* bw;
Packit 7838c8
	UNROLL8(w, bw = PALmap[*pp++], *cp++ = *bw++);
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit greyscale => colormap/RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putgreytile)
Packit 7838c8
{
Packit 7838c8
    int samplesperpixel = img->samplesperpixel;
Packit 7838c8
    uint32** BWmap = img->BWmap;
Packit 7838c8
Packit 7838c8
    (void) y;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	for (x = w; x > 0; --x)
Packit 7838c8
        {
Packit 7838c8
	    *cp++ = BWmap[*pp][0];
Packit 7838c8
            pp += samplesperpixel;
Packit 7838c8
        }
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit greyscale with associated alpha => colormap/RGBA
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putagreytile)
Packit 7838c8
{
Packit 7838c8
    int samplesperpixel = img->samplesperpixel;
Packit 7838c8
    uint32** BWmap = img->BWmap;
Packit 7838c8
Packit 7838c8
    (void) y;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	for (x = w; x > 0; --x)
Packit 7838c8
        {
Packit 7838c8
            *cp++ = BWmap[*pp][0] & ((uint32)*(pp+1) << 24 | ~A1);
Packit 7838c8
            pp += samplesperpixel;
Packit 7838c8
        }
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 16-bit greyscale => colormap/RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(put16bitbwtile)
Packit 7838c8
{
Packit 7838c8
    int samplesperpixel = img->samplesperpixel;
Packit 7838c8
    uint32** BWmap = img->BWmap;
Packit 7838c8
Packit 7838c8
    (void) y;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
        uint16 *wp = (uint16 *) pp;
Packit 7838c8
Packit 7838c8
	for (x = w; x > 0; --x)
Packit 7838c8
        {
Packit 7838c8
            /* use high order byte of 16bit value */
Packit 7838c8
Packit 7838c8
	    *cp++ = BWmap[*wp >> 8][0];
Packit 7838c8
            pp += 2 * samplesperpixel;
Packit 7838c8
            wp += samplesperpixel;
Packit 7838c8
        }
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 1-bit bilevel => colormap/RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(put1bitbwtile)
Packit 7838c8
{
Packit 7838c8
    uint32** BWmap = img->BWmap;
Packit 7838c8
Packit 7838c8
    (void) x; (void) y;
Packit 7838c8
    fromskew /= 8;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	uint32* bw;
Packit 7838c8
	UNROLL8(w, bw = BWmap[*pp++], *cp++ = *bw++);
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 2-bit greyscale => colormap/RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(put2bitbwtile)
Packit 7838c8
{
Packit 7838c8
    uint32** BWmap = img->BWmap;
Packit 7838c8
Packit 7838c8
    (void) x; (void) y;
Packit 7838c8
    fromskew /= 4;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	uint32* bw;
Packit 7838c8
	UNROLL4(w, bw = BWmap[*pp++], *cp++ = *bw++);
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 4-bit greyscale => colormap/RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(put4bitbwtile)
Packit 7838c8
{
Packit 7838c8
    uint32** BWmap = img->BWmap;
Packit 7838c8
Packit 7838c8
    (void) x; (void) y;
Packit 7838c8
    fromskew /= 2;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	uint32* bw;
Packit 7838c8
	UNROLL2(w, bw = BWmap[*pp++], *cp++ = *bw++);
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed samples, no Map => RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putRGBcontig8bittile)
Packit 7838c8
{
Packit 7838c8
    int samplesperpixel = img->samplesperpixel;
Packit 7838c8
Packit 7838c8
    (void) x; (void) y;
Packit 7838c8
    fromskew *= samplesperpixel;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	UNROLL8(w, NOP,
Packit 7838c8
	    *cp++ = PACK(pp[0], pp[1], pp[2]);
Packit 7838c8
	    pp += samplesperpixel);
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed samples => RGBA w/ associated alpha
Packit 7838c8
 * (known to have Map == NULL)
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putRGBAAcontig8bittile)
Packit 7838c8
{
Packit 7838c8
    int samplesperpixel = img->samplesperpixel;
Packit 7838c8
Packit 7838c8
    (void) x; (void) y;
Packit 7838c8
    fromskew *= samplesperpixel;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	UNROLL8(w, NOP,
Packit 7838c8
	    *cp++ = PACK4(pp[0], pp[1], pp[2], pp[3]);
Packit 7838c8
	    pp += samplesperpixel);
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed samples => RGBA w/ unassociated alpha
Packit 7838c8
 * (known to have Map == NULL)
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putRGBUAcontig8bittile)
Packit 7838c8
{
Packit 7838c8
	int samplesperpixel = img->samplesperpixel;
Packit 7838c8
	(void) y;
Packit 7838c8
	fromskew *= samplesperpixel;
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		uint32 r, g, b, a;
Packit 7838c8
		uint8* m;
Packit 7838c8
		for (x = w; x > 0; --x) {
Packit 7838c8
			a = pp[3];
Packit 7838c8
			m = img->UaToAa+((size_t) a<<8);
Packit 7838c8
			r = m[pp[0]];
Packit 7838c8
			g = m[pp[1]];
Packit 7838c8
			b = m[pp[2]];
Packit 7838c8
			*cp++ = PACK4(r,g,b,a);
Packit 7838c8
			pp += samplesperpixel;
Packit 7838c8
		}
Packit 7838c8
		cp += toskew;
Packit 7838c8
		pp += fromskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 16-bit packed samples => RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putRGBcontig16bittile)
Packit 7838c8
{
Packit 7838c8
	int samplesperpixel = img->samplesperpixel;
Packit 7838c8
	uint16 *wp = (uint16 *)pp;
Packit 7838c8
	(void) y;
Packit 7838c8
	fromskew *= samplesperpixel;
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		for (x = w; x > 0; --x) {
Packit 7838c8
			*cp++ = PACK(img->Bitdepth16To8[wp[0]],
Packit 7838c8
			    img->Bitdepth16To8[wp[1]],
Packit 7838c8
			    img->Bitdepth16To8[wp[2]]);
Packit 7838c8
			wp += samplesperpixel;
Packit 7838c8
		}
Packit 7838c8
		cp += toskew;
Packit 7838c8
		wp += fromskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 16-bit packed samples => RGBA w/ associated alpha
Packit 7838c8
 * (known to have Map == NULL)
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putRGBAAcontig16bittile)
Packit 7838c8
{
Packit 7838c8
	int samplesperpixel = img->samplesperpixel;
Packit 7838c8
	uint16 *wp = (uint16 *)pp;
Packit 7838c8
	(void) y;
Packit 7838c8
	fromskew *= samplesperpixel;
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		for (x = w; x > 0; --x) {
Packit 7838c8
			*cp++ = PACK4(img->Bitdepth16To8[wp[0]],
Packit 7838c8
			    img->Bitdepth16To8[wp[1]],
Packit 7838c8
			    img->Bitdepth16To8[wp[2]],
Packit 7838c8
			    img->Bitdepth16To8[wp[3]]);
Packit 7838c8
			wp += samplesperpixel;
Packit 7838c8
		}
Packit 7838c8
		cp += toskew;
Packit 7838c8
		wp += fromskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 16-bit packed samples => RGBA w/ unassociated alpha
Packit 7838c8
 * (known to have Map == NULL)
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putRGBUAcontig16bittile)
Packit 7838c8
{
Packit 7838c8
	int samplesperpixel = img->samplesperpixel;
Packit 7838c8
	uint16 *wp = (uint16 *)pp;
Packit 7838c8
	(void) y;
Packit 7838c8
	fromskew *= samplesperpixel;
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		uint32 r,g,b,a;
Packit 7838c8
		uint8* m;
Packit 7838c8
		for (x = w; x > 0; --x) {
Packit 7838c8
			a = img->Bitdepth16To8[wp[3]];
Packit 7838c8
			m = img->UaToAa+((size_t) a<<8);
Packit 7838c8
			r = m[img->Bitdepth16To8[wp[0]]];
Packit 7838c8
			g = m[img->Bitdepth16To8[wp[1]]];
Packit 7838c8
			b = m[img->Bitdepth16To8[wp[2]]];
Packit 7838c8
			*cp++ = PACK4(r,g,b,a);
Packit 7838c8
			wp += samplesperpixel;
Packit 7838c8
		}
Packit 7838c8
		cp += toskew;
Packit 7838c8
		wp += fromskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed CMYK samples w/o Map => RGB
Packit 7838c8
 *
Packit 7838c8
 * NB: The conversion of CMYK->RGB is *very* crude.
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putRGBcontig8bitCMYKtile)
Packit 7838c8
{
Packit 7838c8
    int samplesperpixel = img->samplesperpixel;
Packit 7838c8
    uint16 r, g, b, k;
Packit 7838c8
Packit 7838c8
    (void) x; (void) y;
Packit 7838c8
    fromskew *= samplesperpixel;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	UNROLL8(w, NOP,
Packit 7838c8
	    k = 255 - pp[3];
Packit 7838c8
	    r = (k*(255-pp[0]))/255;
Packit 7838c8
	    g = (k*(255-pp[1]))/255;
Packit 7838c8
	    b = (k*(255-pp[2]))/255;
Packit 7838c8
	    *cp++ = PACK(r, g, b);
Packit 7838c8
	    pp += samplesperpixel);
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed CMYK samples w/Map => RGB
Packit 7838c8
 *
Packit 7838c8
 * NB: The conversion of CMYK->RGB is *very* crude.
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putRGBcontig8bitCMYKMaptile)
Packit 7838c8
{
Packit 7838c8
    int samplesperpixel = img->samplesperpixel;
Packit 7838c8
    TIFFRGBValue* Map = img->Map;
Packit 7838c8
    uint16 r, g, b, k;
Packit 7838c8
Packit 7838c8
    (void) y;
Packit 7838c8
    fromskew *= samplesperpixel;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	for (x = w; x > 0; --x) {
Packit 7838c8
	    k = 255 - pp[3];
Packit 7838c8
	    r = (k*(255-pp[0]))/255;
Packit 7838c8
	    g = (k*(255-pp[1]))/255;
Packit 7838c8
	    b = (k*(255-pp[2]))/255;
Packit 7838c8
	    *cp++ = PACK(Map[r], Map[g], Map[b]);
Packit 7838c8
	    pp += samplesperpixel;
Packit 7838c8
	}
Packit 7838c8
	pp += fromskew;
Packit 7838c8
	cp += toskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
#define	DECLARESepPutFunc(name) \
Packit 7838c8
static void name(\
Packit 7838c8
    TIFFRGBAImage* img,\
Packit 7838c8
    uint32* cp,\
Packit 7838c8
    uint32 x, uint32 y, \
Packit 7838c8
    uint32 w, uint32 h,\
Packit 7838c8
    int32 fromskew, int32 toskew,\
Packit 7838c8
    unsigned char* r, unsigned char* g, unsigned char* b, unsigned char* a\
Packit 7838c8
)
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit unpacked samples => RGB
Packit 7838c8
 */
Packit 7838c8
DECLARESepPutFunc(putRGBseparate8bittile)
Packit 7838c8
{
Packit 7838c8
    (void) img; (void) x; (void) y; (void) a;
Packit 7838c8
    for( ; h > 0; --h) {
Packit 7838c8
	UNROLL8(w, NOP, *cp++ = PACK(*r++, *g++, *b++));
Packit 7838c8
	SKEW(r, g, b, fromskew);
Packit 7838c8
	cp += toskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit unpacked samples => RGBA w/ associated alpha
Packit 7838c8
 */
Packit 7838c8
DECLARESepPutFunc(putRGBAAseparate8bittile)
Packit 7838c8
{
Packit 7838c8
	(void) img; (void) x; (void) y; 
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		UNROLL8(w, NOP, *cp++ = PACK4(*r++, *g++, *b++, *a++));
Packit 7838c8
		SKEW4(r, g, b, a, fromskew);
Packit 7838c8
		cp += toskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit unpacked CMYK samples => RGBA
Packit 7838c8
 */
Packit 7838c8
DECLARESepPutFunc(putCMYKseparate8bittile)
Packit 7838c8
{
Packit 7838c8
	(void) img; (void) y;
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		uint32 rv, gv, bv, kv;
Packit 7838c8
		for (x = w; x > 0; --x) {
Packit 7838c8
			kv = 255 - *a++;
Packit 7838c8
			rv = (kv*(255-*r++))/255;
Packit 7838c8
			gv = (kv*(255-*g++))/255;
Packit 7838c8
			bv = (kv*(255-*b++))/255;
Packit 7838c8
			*cp++ = PACK4(rv,gv,bv,255);
Packit 7838c8
		}
Packit 7838c8
		SKEW4(r, g, b, a, fromskew);
Packit 7838c8
		cp += toskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit unpacked samples => RGBA w/ unassociated alpha
Packit 7838c8
 */
Packit 7838c8
DECLARESepPutFunc(putRGBUAseparate8bittile)
Packit 7838c8
{
Packit 7838c8
	(void) img; (void) y;
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		uint32 rv, gv, bv, av;
Packit 7838c8
		uint8* m;
Packit 7838c8
		for (x = w; x > 0; --x) {
Packit 7838c8
			av = *a++;
Packit 7838c8
			m = img->UaToAa+((size_t) av<<8);
Packit 7838c8
			rv = m[*r++];
Packit 7838c8
			gv = m[*g++];
Packit 7838c8
			bv = m[*b++];
Packit 7838c8
			*cp++ = PACK4(rv,gv,bv,av);
Packit 7838c8
		}
Packit 7838c8
		SKEW4(r, g, b, a, fromskew);
Packit 7838c8
		cp += toskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 16-bit unpacked samples => RGB
Packit 7838c8
 */
Packit 7838c8
DECLARESepPutFunc(putRGBseparate16bittile)
Packit 7838c8
{
Packit 7838c8
	uint16 *wr = (uint16*) r;
Packit 7838c8
	uint16 *wg = (uint16*) g;
Packit 7838c8
	uint16 *wb = (uint16*) b;
Packit 7838c8
	(void) img; (void) y; (void) a;
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		for (x = 0; x < w; x++)
Packit 7838c8
			*cp++ = PACK(img->Bitdepth16To8[*wr++],
Packit 7838c8
			    img->Bitdepth16To8[*wg++],
Packit 7838c8
			    img->Bitdepth16To8[*wb++]);
Packit 7838c8
		SKEW(wr, wg, wb, fromskew);
Packit 7838c8
		cp += toskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 16-bit unpacked samples => RGBA w/ associated alpha
Packit 7838c8
 */
Packit 7838c8
DECLARESepPutFunc(putRGBAAseparate16bittile)
Packit 7838c8
{
Packit 7838c8
	uint16 *wr = (uint16*) r;
Packit 7838c8
	uint16 *wg = (uint16*) g;
Packit 7838c8
	uint16 *wb = (uint16*) b;
Packit 7838c8
	uint16 *wa = (uint16*) a;
Packit 7838c8
	(void) img; (void) y;
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		for (x = 0; x < w; x++)
Packit 7838c8
			*cp++ = PACK4(img->Bitdepth16To8[*wr++],
Packit 7838c8
			    img->Bitdepth16To8[*wg++],
Packit 7838c8
			    img->Bitdepth16To8[*wb++],
Packit 7838c8
			    img->Bitdepth16To8[*wa++]);
Packit 7838c8
		SKEW4(wr, wg, wb, wa, fromskew);
Packit 7838c8
		cp += toskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 16-bit unpacked samples => RGBA w/ unassociated alpha
Packit 7838c8
 */
Packit 7838c8
DECLARESepPutFunc(putRGBUAseparate16bittile)
Packit 7838c8
{
Packit 7838c8
	uint16 *wr = (uint16*) r;
Packit 7838c8
	uint16 *wg = (uint16*) g;
Packit 7838c8
	uint16 *wb = (uint16*) b;
Packit 7838c8
	uint16 *wa = (uint16*) a;
Packit 7838c8
	(void) img; (void) y;
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		uint32 r2,g2,b2,a2;
Packit 7838c8
		uint8* m;
Packit 7838c8
		for (x = w; x > 0; --x) {
Packit 7838c8
			a2 = img->Bitdepth16To8[*wa++];
Packit 7838c8
			m = img->UaToAa+((size_t) a2<<8);
Packit 7838c8
			r2 = m[img->Bitdepth16To8[*wr++]];
Packit 7838c8
			g2 = m[img->Bitdepth16To8[*wg++]];
Packit 7838c8
			b2 = m[img->Bitdepth16To8[*wb++]];
Packit 7838c8
			*cp++ = PACK4(r2,g2,b2,a2);
Packit 7838c8
		}
Packit 7838c8
		SKEW4(wr, wg, wb, wa, fromskew);
Packit 7838c8
		cp += toskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed CIE L*a*b 1976 samples => RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putcontig8bitCIELab)
Packit 7838c8
{
Packit 7838c8
	float X, Y, Z;
Packit 7838c8
	uint32 r, g, b;
Packit 7838c8
	(void) y;
Packit 7838c8
	fromskew *= 3;
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		for (x = w; x > 0; --x) {
Packit 7838c8
			TIFFCIELabToXYZ(img->cielab,
Packit 7838c8
					(unsigned char)pp[0],
Packit 7838c8
					(signed char)pp[1],
Packit 7838c8
					(signed char)pp[2],
Packit 7838c8
					&X, &Y, &Z);
Packit 7838c8
			TIFFXYZToRGB(img->cielab, X, Y, Z, &r, &g, &b);
Packit 7838c8
			*cp++ = PACK(r, g, b);
Packit 7838c8
			pp += 3;
Packit 7838c8
		}
Packit 7838c8
		cp += toskew;
Packit 7838c8
		pp += fromskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * YCbCr -> RGB conversion and packing routines.
Packit 7838c8
 */
Packit 7838c8
Packit 7838c8
#define	YCbCrtoRGB(dst, Y) {						\
Packit 7838c8
	uint32 r, g, b;							\
Packit 7838c8
	TIFFYCbCrtoRGB(img->ycbcr, (Y), Cb, Cr, &r, &g, &b);		\
Packit 7838c8
	dst = PACK(r, g, b);						\
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed YCbCr samples => RGB 
Packit 7838c8
 * This function is generic for different sampling sizes, 
Packit 7838c8
 * and can handle blocks sizes that aren't multiples of the
Packit 7838c8
 * sampling size.  However, it is substantially less optimized
Packit 7838c8
 * than the specific sampling cases.  It is used as a fallback
Packit 7838c8
 * for difficult blocks.
Packit 7838c8
 */
Packit 7838c8
#ifdef notdef
Packit 7838c8
static void putcontig8bitYCbCrGenericTile( 
Packit 7838c8
    TIFFRGBAImage* img, 
Packit 7838c8
    uint32* cp, 
Packit 7838c8
    uint32 x, uint32 y, 
Packit 7838c8
    uint32 w, uint32 h, 
Packit 7838c8
    int32 fromskew, int32 toskew, 
Packit 7838c8
    unsigned char* pp,
Packit 7838c8
    int h_group, 
Packit 7838c8
    int v_group )
Packit 7838c8
Packit 7838c8
{
Packit 7838c8
    uint32* cp1 = cp+w+toskew;
Packit 7838c8
    uint32* cp2 = cp1+w+toskew;
Packit 7838c8
    uint32* cp3 = cp2+w+toskew;
Packit 7838c8
    int32 incr = 3*w+4*toskew;
Packit 7838c8
    int32   Cb, Cr;
Packit 7838c8
    int     group_size = v_group * h_group + 2;
Packit 7838c8
Packit 7838c8
    (void) y;
Packit 7838c8
    fromskew = (fromskew * group_size) / h_group;
Packit 7838c8
Packit 7838c8
    for( yy = 0; yy < h; yy++ )
Packit 7838c8
    {
Packit 7838c8
        unsigned char *pp_line;
Packit 7838c8
        int     y_line_group = yy / v_group;
Packit 7838c8
        int     y_remainder = yy - y_line_group * v_group;
Packit 7838c8
Packit 7838c8
        pp_line = pp + v_line_group * 
Packit 7838c8
Packit 7838c8
        
Packit 7838c8
        for( xx = 0; xx < w; xx++ )
Packit 7838c8
        {
Packit 7838c8
            Cb = pp
Packit 7838c8
        }
Packit 7838c8
    }
Packit 7838c8
    for (; h >= 4; h -= 4) {
Packit 7838c8
	x = w>>2;
Packit 7838c8
	do {
Packit 7838c8
	    Cb = pp[16];
Packit 7838c8
	    Cr = pp[17];
Packit 7838c8
Packit 7838c8
	    YCbCrtoRGB(cp [0], pp[ 0]);
Packit 7838c8
	    YCbCrtoRGB(cp [1], pp[ 1]);
Packit 7838c8
	    YCbCrtoRGB(cp [2], pp[ 2]);
Packit 7838c8
	    YCbCrtoRGB(cp [3], pp[ 3]);
Packit 7838c8
	    YCbCrtoRGB(cp1[0], pp[ 4]);
Packit 7838c8
	    YCbCrtoRGB(cp1[1], pp[ 5]);
Packit 7838c8
	    YCbCrtoRGB(cp1[2], pp[ 6]);
Packit 7838c8
	    YCbCrtoRGB(cp1[3], pp[ 7]);
Packit 7838c8
	    YCbCrtoRGB(cp2[0], pp[ 8]);
Packit 7838c8
	    YCbCrtoRGB(cp2[1], pp[ 9]);
Packit 7838c8
	    YCbCrtoRGB(cp2[2], pp[10]);
Packit 7838c8
	    YCbCrtoRGB(cp2[3], pp[11]);
Packit 7838c8
	    YCbCrtoRGB(cp3[0], pp[12]);
Packit 7838c8
	    YCbCrtoRGB(cp3[1], pp[13]);
Packit 7838c8
	    YCbCrtoRGB(cp3[2], pp[14]);
Packit 7838c8
	    YCbCrtoRGB(cp3[3], pp[15]);
Packit 7838c8
Packit 7838c8
	    cp += 4, cp1 += 4, cp2 += 4, cp3 += 4;
Packit 7838c8
	    pp += 18;
Packit 7838c8
	} while (--x);
Packit 7838c8
	cp += incr, cp1 += incr, cp2 += incr, cp3 += incr;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
#endif
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed YCbCr samples w/ 4,4 subsampling => RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putcontig8bitYCbCr44tile)
Packit 7838c8
{
Packit 7838c8
    uint32* cp1 = cp+w+toskew;
Packit 7838c8
    uint32* cp2 = cp1+w+toskew;
Packit 7838c8
    uint32* cp3 = cp2+w+toskew;
Packit 7838c8
    int32 incr = 3*w+4*toskew;
Packit 7838c8
Packit 7838c8
    (void) y;
Packit 7838c8
    /* adjust fromskew */
Packit 7838c8
    fromskew = (fromskew / 4) * (4*2+2);
Packit 7838c8
    if ((h & 3) == 0 && (w & 3) == 0) {				        
Packit 7838c8
        for (; h >= 4; h -= 4) {
Packit 7838c8
            x = w>>2;
Packit 7838c8
            do {
Packit 7838c8
                int32 Cb = pp[16];
Packit 7838c8
                int32 Cr = pp[17];
Packit 7838c8
Packit 7838c8
                YCbCrtoRGB(cp [0], pp[ 0]);
Packit 7838c8
                YCbCrtoRGB(cp [1], pp[ 1]);
Packit 7838c8
                YCbCrtoRGB(cp [2], pp[ 2]);
Packit 7838c8
                YCbCrtoRGB(cp [3], pp[ 3]);
Packit 7838c8
                YCbCrtoRGB(cp1[0], pp[ 4]);
Packit 7838c8
                YCbCrtoRGB(cp1[1], pp[ 5]);
Packit 7838c8
                YCbCrtoRGB(cp1[2], pp[ 6]);
Packit 7838c8
                YCbCrtoRGB(cp1[3], pp[ 7]);
Packit 7838c8
                YCbCrtoRGB(cp2[0], pp[ 8]);
Packit 7838c8
                YCbCrtoRGB(cp2[1], pp[ 9]);
Packit 7838c8
                YCbCrtoRGB(cp2[2], pp[10]);
Packit 7838c8
                YCbCrtoRGB(cp2[3], pp[11]);
Packit 7838c8
                YCbCrtoRGB(cp3[0], pp[12]);
Packit 7838c8
                YCbCrtoRGB(cp3[1], pp[13]);
Packit 7838c8
                YCbCrtoRGB(cp3[2], pp[14]);
Packit 7838c8
                YCbCrtoRGB(cp3[3], pp[15]);
Packit 7838c8
Packit 7838c8
                cp += 4;
Packit 7838c8
                cp1 += 4;
Packit 7838c8
                cp2 += 4;
Packit 7838c8
                cp3 += 4;
Packit 7838c8
                pp += 18;
Packit 7838c8
            } while (--x);
Packit 7838c8
            cp += incr;
Packit 7838c8
            cp1 += incr;
Packit 7838c8
            cp2 += incr;
Packit 7838c8
            cp3 += incr;
Packit 7838c8
            pp += fromskew;
Packit 7838c8
        }
Packit 7838c8
    } else {
Packit 7838c8
        while (h > 0) {
Packit 7838c8
            for (x = w; x > 0;) {
Packit 7838c8
                int32 Cb = pp[16];
Packit 7838c8
                int32 Cr = pp[17];
Packit 7838c8
                switch (x) {
Packit 7838c8
                default:
Packit 7838c8
                    switch (h) {
Packit 7838c8
                    default: YCbCrtoRGB(cp3[3], pp[15]); /* FALLTHROUGH */
Packit 7838c8
                    case 3:  YCbCrtoRGB(cp2[3], pp[11]); /* FALLTHROUGH */
Packit 7838c8
                    case 2:  YCbCrtoRGB(cp1[3], pp[ 7]); /* FALLTHROUGH */
Packit 7838c8
                    case 1:  YCbCrtoRGB(cp [3], pp[ 3]); /* FALLTHROUGH */
Packit 7838c8
                    }                                    /* FALLTHROUGH */
Packit 7838c8
                case 3:
Packit 7838c8
                    switch (h) {
Packit 7838c8
                    default: YCbCrtoRGB(cp3[2], pp[14]); /* FALLTHROUGH */
Packit 7838c8
                    case 3:  YCbCrtoRGB(cp2[2], pp[10]); /* FALLTHROUGH */
Packit 7838c8
                    case 2:  YCbCrtoRGB(cp1[2], pp[ 6]); /* FALLTHROUGH */
Packit 7838c8
                    case 1:  YCbCrtoRGB(cp [2], pp[ 2]); /* FALLTHROUGH */
Packit 7838c8
                    }                                    /* FALLTHROUGH */
Packit 7838c8
                case 2:
Packit 7838c8
                    switch (h) {
Packit 7838c8
                    default: YCbCrtoRGB(cp3[1], pp[13]); /* FALLTHROUGH */
Packit 7838c8
                    case 3:  YCbCrtoRGB(cp2[1], pp[ 9]); /* FALLTHROUGH */
Packit 7838c8
                    case 2:  YCbCrtoRGB(cp1[1], pp[ 5]); /* FALLTHROUGH */
Packit 7838c8
                    case 1:  YCbCrtoRGB(cp [1], pp[ 1]); /* FALLTHROUGH */
Packit 7838c8
                    }                                    /* FALLTHROUGH */
Packit 7838c8
                case 1:
Packit 7838c8
                    switch (h) {
Packit 7838c8
                    default: YCbCrtoRGB(cp3[0], pp[12]); /* FALLTHROUGH */
Packit 7838c8
                    case 3:  YCbCrtoRGB(cp2[0], pp[ 8]); /* FALLTHROUGH */
Packit 7838c8
                    case 2:  YCbCrtoRGB(cp1[0], pp[ 4]); /* FALLTHROUGH */
Packit 7838c8
                    case 1:  YCbCrtoRGB(cp [0], pp[ 0]); /* FALLTHROUGH */
Packit 7838c8
                    }                                    /* FALLTHROUGH */
Packit 7838c8
                }
Packit 7838c8
                if (x < 4) {
Packit 7838c8
                    cp += x; cp1 += x; cp2 += x; cp3 += x;
Packit 7838c8
                    x = 0;
Packit 7838c8
                }
Packit 7838c8
                else {
Packit 7838c8
                    cp += 4; cp1 += 4; cp2 += 4; cp3 += 4;
Packit 7838c8
                    x -= 4;
Packit 7838c8
                }
Packit 7838c8
                pp += 18;
Packit 7838c8
            }
Packit 7838c8
            if (h <= 4)
Packit 7838c8
                break;
Packit 7838c8
            h -= 4;
Packit 7838c8
            cp += incr;
Packit 7838c8
            cp1 += incr;
Packit 7838c8
            cp2 += incr;
Packit 7838c8
            cp3 += incr;
Packit 7838c8
            pp += fromskew;
Packit 7838c8
        }
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed YCbCr samples w/ 4,2 subsampling => RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putcontig8bitYCbCr42tile)
Packit 7838c8
{
Packit 7838c8
    uint32* cp1 = cp+w+toskew;
Packit 7838c8
    int32 incr = 2*toskew+w;
Packit 7838c8
Packit 7838c8
    (void) y;
Packit 7838c8
    fromskew = (fromskew / 4) * (4*2+2);
Packit 7838c8
    if ((w & 3) == 0 && (h & 1) == 0) {
Packit 7838c8
        for (; h >= 2; h -= 2) {
Packit 7838c8
            x = w>>2;
Packit 7838c8
            do {
Packit 7838c8
                int32 Cb = pp[8];
Packit 7838c8
                int32 Cr = pp[9];
Packit 7838c8
                
Packit 7838c8
                YCbCrtoRGB(cp [0], pp[0]);
Packit 7838c8
                YCbCrtoRGB(cp [1], pp[1]);
Packit 7838c8
                YCbCrtoRGB(cp [2], pp[2]);
Packit 7838c8
                YCbCrtoRGB(cp [3], pp[3]);
Packit 7838c8
                YCbCrtoRGB(cp1[0], pp[4]);
Packit 7838c8
                YCbCrtoRGB(cp1[1], pp[5]);
Packit 7838c8
                YCbCrtoRGB(cp1[2], pp[6]);
Packit 7838c8
                YCbCrtoRGB(cp1[3], pp[7]);
Packit 7838c8
                
Packit 7838c8
                cp += 4;
Packit 7838c8
                cp1 += 4;
Packit 7838c8
                pp += 10;
Packit 7838c8
            } while (--x);
Packit 7838c8
            cp += incr;
Packit 7838c8
            cp1 += incr;
Packit 7838c8
            pp += fromskew;
Packit 7838c8
        }
Packit 7838c8
    } else {
Packit 7838c8
        while (h > 0) {
Packit 7838c8
            for (x = w; x > 0;) {
Packit 7838c8
                int32 Cb = pp[8];
Packit 7838c8
                int32 Cr = pp[9];
Packit 7838c8
                switch (x) {
Packit 7838c8
                default:
Packit 7838c8
                    switch (h) {
Packit 7838c8
                    default: YCbCrtoRGB(cp1[3], pp[ 7]); /* FALLTHROUGH */
Packit 7838c8
                    case 1:  YCbCrtoRGB(cp [3], pp[ 3]); /* FALLTHROUGH */
Packit 7838c8
                    }                                    /* FALLTHROUGH */
Packit 7838c8
                case 3:
Packit 7838c8
                    switch (h) {
Packit 7838c8
                    default: YCbCrtoRGB(cp1[2], pp[ 6]); /* FALLTHROUGH */
Packit 7838c8
                    case 1:  YCbCrtoRGB(cp [2], pp[ 2]); /* FALLTHROUGH */
Packit 7838c8
                    }                                    /* FALLTHROUGH */
Packit 7838c8
                case 2:
Packit 7838c8
                    switch (h) {
Packit 7838c8
                    default: YCbCrtoRGB(cp1[1], pp[ 5]); /* FALLTHROUGH */
Packit 7838c8
                    case 1:  YCbCrtoRGB(cp [1], pp[ 1]); /* FALLTHROUGH */
Packit 7838c8
                    }                                    /* FALLTHROUGH */
Packit 7838c8
                case 1:
Packit 7838c8
                    switch (h) {
Packit 7838c8
                    default: YCbCrtoRGB(cp1[0], pp[ 4]); /* FALLTHROUGH */
Packit 7838c8
                    case 1:  YCbCrtoRGB(cp [0], pp[ 0]); /* FALLTHROUGH */
Packit 7838c8
                    }                                    /* FALLTHROUGH */
Packit 7838c8
                }
Packit 7838c8
                if (x < 4) {
Packit 7838c8
                    cp += x; cp1 += x;
Packit 7838c8
                    x = 0;
Packit 7838c8
                }
Packit 7838c8
                else {
Packit 7838c8
                    cp += 4; cp1 += 4;
Packit 7838c8
                    x -= 4;
Packit 7838c8
                }
Packit 7838c8
                pp += 10;
Packit 7838c8
            }
Packit 7838c8
            if (h <= 2)
Packit 7838c8
                break;
Packit 7838c8
            h -= 2;
Packit 7838c8
            cp += incr;
Packit 7838c8
            cp1 += incr;
Packit 7838c8
            pp += fromskew;
Packit 7838c8
        }
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed YCbCr samples w/ 4,1 subsampling => RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putcontig8bitYCbCr41tile)
Packit 7838c8
{
Packit 7838c8
    (void) y;
Packit 7838c8
    fromskew = (fromskew / 4) * (4*1+2);
Packit 7838c8
    do {
Packit 7838c8
	x = w>>2;
Packit 7838c8
	while(x>0) {
Packit 7838c8
	    int32 Cb = pp[4];
Packit 7838c8
	    int32 Cr = pp[5];
Packit 7838c8
Packit 7838c8
	    YCbCrtoRGB(cp [0], pp[0]);
Packit 7838c8
	    YCbCrtoRGB(cp [1], pp[1]);
Packit 7838c8
	    YCbCrtoRGB(cp [2], pp[2]);
Packit 7838c8
	    YCbCrtoRGB(cp [3], pp[3]);
Packit 7838c8
Packit 7838c8
	    cp += 4;
Packit 7838c8
	    pp += 6;
Packit 7838c8
		x--;
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
        if( (w&3) != 0 )
Packit 7838c8
        {
Packit 7838c8
	    int32 Cb = pp[4];
Packit 7838c8
	    int32 Cr = pp[5];
Packit 7838c8
Packit 7838c8
            switch( (w&3) ) {
Packit 7838c8
              case 3: YCbCrtoRGB(cp [2], pp[2]); /*-fallthrough*/
Packit 7838c8
              case 2: YCbCrtoRGB(cp [1], pp[1]); /*-fallthrough*/
Packit 7838c8
              case 1: YCbCrtoRGB(cp [0], pp[0]); /*-fallthrough*/
Packit 7838c8
              case 0: break;
Packit 7838c8
            }
Packit 7838c8
Packit 7838c8
            cp += (w&3;;
Packit 7838c8
            pp += 6;
Packit 7838c8
        }
Packit 7838c8
Packit 7838c8
	cp += toskew;
Packit 7838c8
	pp += fromskew;
Packit 7838c8
    } while (--h);
Packit 7838c8
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed YCbCr samples w/ 2,2 subsampling => RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putcontig8bitYCbCr22tile)
Packit 7838c8
{
Packit 7838c8
	uint32* cp2;
Packit 7838c8
	int32 incr = 2*toskew+w;
Packit 7838c8
	(void) y;
Packit 7838c8
	fromskew = (fromskew / 2) * (2*2+2);
Packit 7838c8
	cp2 = cp+w+toskew;
Packit 7838c8
	while (h>=2) {
Packit 7838c8
		x = w;
Packit 7838c8
		while (x>=2) {
Packit 7838c8
			uint32 Cb = pp[4];
Packit 7838c8
			uint32 Cr = pp[5];
Packit 7838c8
			YCbCrtoRGB(cp[0], pp[0]);
Packit 7838c8
			YCbCrtoRGB(cp[1], pp[1]);
Packit 7838c8
			YCbCrtoRGB(cp2[0], pp[2]);
Packit 7838c8
			YCbCrtoRGB(cp2[1], pp[3]);
Packit 7838c8
			cp += 2;
Packit 7838c8
			cp2 += 2;
Packit 7838c8
			pp += 6;
Packit 7838c8
			x -= 2;
Packit 7838c8
		}
Packit 7838c8
		if (x==1) {
Packit 7838c8
			uint32 Cb = pp[4];
Packit 7838c8
			uint32 Cr = pp[5];
Packit 7838c8
			YCbCrtoRGB(cp[0], pp[0]);
Packit 7838c8
			YCbCrtoRGB(cp2[0], pp[2]);
Packit 7838c8
			cp ++ ;
Packit 7838c8
			cp2 ++ ;
Packit 7838c8
			pp += 6;
Packit 7838c8
		}
Packit 7838c8
		cp += incr;
Packit 7838c8
		cp2 += incr;
Packit 7838c8
		pp += fromskew;
Packit 7838c8
		h-=2;
Packit 7838c8
	}
Packit 7838c8
	if (h==1) {
Packit 7838c8
		x = w;
Packit 7838c8
		while (x>=2) {
Packit 7838c8
			uint32 Cb = pp[4];
Packit 7838c8
			uint32 Cr = pp[5];
Packit 7838c8
			YCbCrtoRGB(cp[0], pp[0]);
Packit 7838c8
			YCbCrtoRGB(cp[1], pp[1]);
Packit 7838c8
			cp += 2;
Packit 7838c8
			cp2 += 2;
Packit 7838c8
			pp += 6;
Packit 7838c8
			x -= 2;
Packit 7838c8
		}
Packit 7838c8
		if (x==1) {
Packit 7838c8
			uint32 Cb = pp[4];
Packit 7838c8
			uint32 Cr = pp[5];
Packit 7838c8
			YCbCrtoRGB(cp[0], pp[0]);
Packit 7838c8
		}
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed YCbCr samples w/ 2,1 subsampling => RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putcontig8bitYCbCr21tile)
Packit 7838c8
{
Packit 7838c8
	(void) y;
Packit 7838c8
	fromskew = (fromskew / 2) * (2*1+2);
Packit 7838c8
	do {
Packit 7838c8
		x = w>>1;
Packit 7838c8
		while(x>0) {
Packit 7838c8
			int32 Cb = pp[2];
Packit 7838c8
			int32 Cr = pp[3];
Packit 7838c8
Packit 7838c8
			YCbCrtoRGB(cp[0], pp[0]);
Packit 7838c8
			YCbCrtoRGB(cp[1], pp[1]);
Packit 7838c8
Packit 7838c8
			cp += 2;
Packit 7838c8
			pp += 4;
Packit 7838c8
			x --;
Packit 7838c8
		}
Packit 7838c8
Packit 7838c8
		if( (w&1) != 0 )
Packit 7838c8
		{
Packit 7838c8
			int32 Cb = pp[2];
Packit 7838c8
			int32 Cr = pp[3];
Packit 7838c8
Packit 7838c8
			YCbCrtoRGB(cp[0], pp[0]);
Packit 7838c8
Packit 7838c8
			cp += 1;
Packit 7838c8
			pp += 4;
Packit 7838c8
		}
Packit 7838c8
Packit 7838c8
		cp += toskew;
Packit 7838c8
		pp += fromskew;
Packit 7838c8
	} while (--h);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed YCbCr samples w/ 1,2 subsampling => RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putcontig8bitYCbCr12tile)
Packit 7838c8
{
Packit 7838c8
	uint32* cp2;
Packit 7838c8
	int32 incr = 2*toskew+w;
Packit 7838c8
	(void) y;
Packit 7838c8
	fromskew = (fromskew / 1) * (1 * 2 + 2);
Packit 7838c8
	cp2 = cp+w+toskew;
Packit 7838c8
	while (h>=2) {
Packit 7838c8
		x = w;
Packit 7838c8
		do {
Packit 7838c8
			uint32 Cb = pp[2];
Packit 7838c8
			uint32 Cr = pp[3];
Packit 7838c8
			YCbCrtoRGB(cp[0], pp[0]);
Packit 7838c8
			YCbCrtoRGB(cp2[0], pp[1]);
Packit 7838c8
			cp ++;
Packit 7838c8
			cp2 ++;
Packit 7838c8
			pp += 4;
Packit 7838c8
		} while (--x);
Packit 7838c8
		cp += incr;
Packit 7838c8
		cp2 += incr;
Packit 7838c8
		pp += fromskew;
Packit 7838c8
		h-=2;
Packit 7838c8
	}
Packit 7838c8
	if (h==1) {
Packit 7838c8
		x = w;
Packit 7838c8
		do {
Packit 7838c8
			uint32 Cb = pp[2];
Packit 7838c8
			uint32 Cr = pp[3];
Packit 7838c8
			YCbCrtoRGB(cp[0], pp[0]);
Packit 7838c8
			cp ++;
Packit 7838c8
			pp += 4;
Packit 7838c8
		} while (--x);
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed YCbCr samples w/ no subsampling => RGB
Packit 7838c8
 */
Packit 7838c8
DECLAREContigPutFunc(putcontig8bitYCbCr11tile)
Packit 7838c8
{
Packit 7838c8
	(void) y;
Packit 7838c8
	fromskew = (fromskew / 1) * (1 * 1 + 2);
Packit 7838c8
	do {
Packit 7838c8
		x = w; /* was x = w>>1; patched 2000/09/25 warmerda@home.com */
Packit 7838c8
		do {
Packit 7838c8
			int32 Cb = pp[1];
Packit 7838c8
			int32 Cr = pp[2];
Packit 7838c8
Packit 7838c8
			YCbCrtoRGB(*cp++, pp[0]);
Packit 7838c8
Packit 7838c8
			pp += 3;
Packit 7838c8
		} while (--x);
Packit 7838c8
		cp += toskew;
Packit 7838c8
		pp += fromskew;
Packit 7838c8
	} while (--h);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * 8-bit packed YCbCr samples w/ no subsampling => RGB
Packit 7838c8
 */
Packit 7838c8
DECLARESepPutFunc(putseparate8bitYCbCr11tile)
Packit 7838c8
{
Packit 7838c8
	(void) y;
Packit 7838c8
	(void) a;
Packit 7838c8
	/* TODO: naming of input vars is still off, change obfuscating declaration inside define, or resolve obfuscation */
Packit 7838c8
	for( ; h > 0; --h) {
Packit 7838c8
		x = w;
Packit 7838c8
		do {
Packit 7838c8
			uint32 dr, dg, db;
Packit 7838c8
			TIFFYCbCrtoRGB(img->ycbcr,*r++,*g++,*b++,&dr,&dg,&db);
Packit 7838c8
			*cp++ = PACK(dr,dg,db);
Packit 7838c8
		} while (--x);
Packit 7838c8
		SKEW(r, g, b, fromskew);
Packit 7838c8
		cp += toskew;
Packit 7838c8
	}
Packit 7838c8
}
Packit 7838c8
#undef YCbCrtoRGB
Packit 7838c8
Packit 7838c8
static int isInRefBlackWhiteRange(float f)
Packit 7838c8
{
Packit 7838c8
    return f > (float)(-0x7FFFFFFF + 128) && f < (float)0x7FFFFFFF;
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
static int
Packit 7838c8
initYCbCrConversion(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
	static const char module[] = "initYCbCrConversion";
Packit 7838c8
Packit 7838c8
	float *luma, *refBlackWhite;
Packit 7838c8
Packit 7838c8
	if (img->ycbcr == NULL) {
Packit 7838c8
		img->ycbcr = (TIFFYCbCrToRGB*) _TIFFmalloc(
Packit 7838c8
		    TIFFroundup_32(sizeof (TIFFYCbCrToRGB), sizeof (long))  
Packit 7838c8
		    + 4*256*sizeof (TIFFRGBValue)
Packit 7838c8
		    + 2*256*sizeof (int)
Packit 7838c8
		    + 3*256*sizeof (int32)
Packit 7838c8
		    );
Packit 7838c8
		if (img->ycbcr == NULL) {
Packit 7838c8
			TIFFErrorExt(img->tif->tif_clientdata, module,
Packit 7838c8
			    "No space for YCbCr->RGB conversion state");
Packit 7838c8
			return (0);
Packit 7838c8
		}
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	TIFFGetFieldDefaulted(img->tif, TIFFTAG_YCBCRCOEFFICIENTS, &luma);
Packit 7838c8
	TIFFGetFieldDefaulted(img->tif, TIFFTAG_REFERENCEBLACKWHITE,
Packit 7838c8
	    &refBlackWhite);
Packit 7838c8
Packit 7838c8
        /* Do some validation to avoid later issues. Detect NaN for now */
Packit 7838c8
        /* and also if lumaGreen is zero since we divide by it later */
Packit 7838c8
        if( luma[0] != luma[0] ||
Packit 7838c8
            luma[1] != luma[1] ||
Packit 7838c8
            luma[1] == 0.0 ||
Packit 7838c8
            luma[2] != luma[2] )
Packit 7838c8
        {
Packit 7838c8
            TIFFErrorExt(img->tif->tif_clientdata, module,
Packit 7838c8
                "Invalid values for YCbCrCoefficients tag");
Packit 7838c8
            return (0);
Packit 7838c8
        }
Packit 7838c8
Packit 7838c8
        if( !isInRefBlackWhiteRange(refBlackWhite[0]) ||
Packit 7838c8
            !isInRefBlackWhiteRange(refBlackWhite[1]) ||
Packit 7838c8
            !isInRefBlackWhiteRange(refBlackWhite[2]) ||
Packit 7838c8
            !isInRefBlackWhiteRange(refBlackWhite[3]) ||
Packit 7838c8
            !isInRefBlackWhiteRange(refBlackWhite[4]) ||
Packit 7838c8
            !isInRefBlackWhiteRange(refBlackWhite[5]) )
Packit 7838c8
        {
Packit 7838c8
            TIFFErrorExt(img->tif->tif_clientdata, module,
Packit 7838c8
                "Invalid values for ReferenceBlackWhite tag");
Packit 7838c8
            return (0);
Packit 7838c8
        }
Packit 7838c8
Packit 7838c8
	if (TIFFYCbCrToRGBInit(img->ycbcr, luma, refBlackWhite) < 0)
Packit 7838c8
		return(0);
Packit 7838c8
	return (1);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
static tileContigRoutine
Packit 7838c8
initCIELabConversion(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
	static const char module[] = "initCIELabConversion";
Packit 7838c8
Packit 7838c8
	float   *whitePoint;
Packit 7838c8
	float   refWhite[3];
Packit 7838c8
Packit 7838c8
	TIFFGetFieldDefaulted(img->tif, TIFFTAG_WHITEPOINT, &whitePoint);
Packit 7838c8
	if (whitePoint[1] == 0.0f ) {
Packit 7838c8
		TIFFErrorExt(img->tif->tif_clientdata, module,
Packit 7838c8
		    "Invalid value for WhitePoint tag.");
Packit 7838c8
		return NULL;
Packit 7838c8
        }
Packit 7838c8
Packit 7838c8
	if (!img->cielab) {
Packit 7838c8
		img->cielab = (TIFFCIELabToRGB *)
Packit 7838c8
			_TIFFmalloc(sizeof(TIFFCIELabToRGB));
Packit 7838c8
		if (!img->cielab) {
Packit 7838c8
			TIFFErrorExt(img->tif->tif_clientdata, module,
Packit 7838c8
			    "No space for CIE L*a*b*->RGB conversion state.");
Packit 7838c8
			return NULL;
Packit 7838c8
		}
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	refWhite[1] = 100.0F;
Packit 7838c8
	refWhite[0] = whitePoint[0] / whitePoint[1] * refWhite[1];
Packit 7838c8
	refWhite[2] = (1.0F - whitePoint[0] - whitePoint[1])
Packit 7838c8
		      / whitePoint[1] * refWhite[1];
Packit 7838c8
	if (TIFFCIELabToRGBInit(img->cielab, &display_sRGB, refWhite) < 0) {
Packit 7838c8
		TIFFErrorExt(img->tif->tif_clientdata, module,
Packit 7838c8
		    "Failed to initialize CIE L*a*b*->RGB conversion state.");
Packit 7838c8
		_TIFFfree(img->cielab);
Packit 7838c8
		return NULL;
Packit 7838c8
	}
Packit 7838c8
Packit 7838c8
	return putcontig8bitCIELab;
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Greyscale images with less than 8 bits/sample are handled
Packit 7838c8
 * with a table to avoid lots of shifts and masks.  The table
Packit 7838c8
 * is setup so that put*bwtile (below) can retrieve 8/bitspersample
Packit 7838c8
 * pixel values simply by indexing into the table with one
Packit 7838c8
 * number.
Packit 7838c8
 */
Packit 7838c8
static int
Packit 7838c8
makebwmap(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
    TIFFRGBValue* Map = img->Map;
Packit 7838c8
    int bitspersample = img->bitspersample;
Packit 7838c8
    int nsamples = 8 / bitspersample;
Packit 7838c8
    int i;
Packit 7838c8
    uint32* p;
Packit 7838c8
Packit 7838c8
    if( nsamples == 0 )
Packit 7838c8
        nsamples = 1;
Packit 7838c8
Packit 7838c8
    img->BWmap = (uint32**) _TIFFmalloc(
Packit 7838c8
	256*sizeof (uint32 *)+(256*nsamples*sizeof(uint32)));
Packit 7838c8
    if (img->BWmap == NULL) {
Packit 7838c8
		TIFFErrorExt(img->tif->tif_clientdata, TIFFFileName(img->tif), "No space for B&W mapping table");
Packit 7838c8
		return (0);
Packit 7838c8
    }
Packit 7838c8
    p = (uint32*)(img->BWmap + 256);
Packit 7838c8
    for (i = 0; i < 256; i++) {
Packit 7838c8
	TIFFRGBValue c;
Packit 7838c8
	img->BWmap[i] = p;
Packit 7838c8
	switch (bitspersample) {
Packit 7838c8
#define	GREY(x)	c = Map[x]; *p++ = PACK(c,c,c);
Packit 7838c8
	case 1:
Packit 7838c8
	    GREY(i>>7);
Packit 7838c8
	    GREY((i>>6)&1;;
Packit 7838c8
	    GREY((i>>5)&1;;
Packit 7838c8
	    GREY((i>>4)&1;;
Packit 7838c8
	    GREY((i>>3)&1;;
Packit 7838c8
	    GREY((i>>2)&1;;
Packit 7838c8
	    GREY((i>>1)&1;;
Packit 7838c8
	    GREY(i&1;;
Packit 7838c8
	    break;
Packit 7838c8
	case 2:
Packit 7838c8
	    GREY(i>>6);
Packit 7838c8
	    GREY((i>>4)&3;;
Packit 7838c8
	    GREY((i>>2)&3;;
Packit 7838c8
	    GREY(i&3;;
Packit 7838c8
	    break;
Packit 7838c8
	case 4:
Packit 7838c8
	    GREY(i>>4);
Packit 7838c8
	    GREY(i&0xf);
Packit 7838c8
	    break;
Packit 7838c8
	case 8:
Packit 7838c8
        case 16:
Packit 7838c8
	    GREY(i);
Packit 7838c8
	    break;
Packit 7838c8
	}
Packit 7838c8
#undef	GREY
Packit 7838c8
    }
Packit 7838c8
    return (1);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Construct a mapping table to convert from the range
Packit 7838c8
 * of the data samples to [0,255] --for display.  This
Packit 7838c8
 * process also handles inverting B&W images when needed.
Packit 7838c8
 */ 
Packit 7838c8
static int
Packit 7838c8
setupMap(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
    int32 x, range;
Packit 7838c8
Packit 7838c8
    range = (int32)((1L<<img->bitspersample)-1);
Packit 7838c8
    
Packit 7838c8
    /* treat 16 bit the same as eight bit */
Packit 7838c8
    if( img->bitspersample == 16 )
Packit 7838c8
        range = (int32) 255;
Packit 7838c8
Packit 7838c8
    img->Map = (TIFFRGBValue*) _TIFFmalloc((range+1) * sizeof (TIFFRGBValue));
Packit 7838c8
    if (img->Map == NULL) {
Packit 7838c8
		TIFFErrorExt(img->tif->tif_clientdata, TIFFFileName(img->tif),
Packit 7838c8
			"No space for photometric conversion table");
Packit 7838c8
		return (0);
Packit 7838c8
    }
Packit 7838c8
    if (img->photometric == PHOTOMETRIC_MINISWHITE) {
Packit 7838c8
	for (x = 0; x <= range; x++)
Packit 7838c8
	    img->Map[x] = (TIFFRGBValue) (((range - x) * 255) / range);
Packit 7838c8
    } else {
Packit 7838c8
	for (x = 0; x <= range; x++)
Packit 7838c8
	    img->Map[x] = (TIFFRGBValue) ((x * 255) / range);
Packit 7838c8
    }
Packit 7838c8
    if (img->bitspersample <= 16 &&
Packit 7838c8
	(img->photometric == PHOTOMETRIC_MINISBLACK ||
Packit 7838c8
	 img->photometric == PHOTOMETRIC_MINISWHITE)) {
Packit 7838c8
	/*
Packit 7838c8
	 * Use photometric mapping table to construct
Packit 7838c8
	 * unpacking tables for samples <= 8 bits.
Packit 7838c8
	 */
Packit 7838c8
	if (!makebwmap(img))
Packit 7838c8
	    return (0);
Packit 7838c8
	/* no longer need Map, free it */
Packit 7838c8
	_TIFFfree(img->Map);
Packit 7838c8
	img->Map = NULL;
Packit 7838c8
    }
Packit 7838c8
    return (1);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
static int
Packit 7838c8
checkcmap(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
    uint16* r = img->redcmap;
Packit 7838c8
    uint16* g = img->greencmap;
Packit 7838c8
    uint16* b = img->bluecmap;
Packit 7838c8
    long n = 1L<<img->bitspersample;
Packit 7838c8
Packit 7838c8
    while (n-- > 0)
Packit 7838c8
	if (*r++ >= 256 || *g++ >= 256 || *b++ >= 256)
Packit 7838c8
	    return (16);
Packit 7838c8
    return (8);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
static void
Packit 7838c8
cvtcmap(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
    uint16* r = img->redcmap;
Packit 7838c8
    uint16* g = img->greencmap;
Packit 7838c8
    uint16* b = img->bluecmap;
Packit 7838c8
    long i;
Packit 7838c8
Packit 7838c8
    for (i = (1L<<img->bitspersample)-1; i >= 0; i--) {
Packit 7838c8
#define	CVT(x)		((uint16)((x)>>8))
Packit 7838c8
	r[i] = CVT(r[i]);
Packit 7838c8
	g[i] = CVT(g[i]);
Packit 7838c8
	b[i] = CVT(b[i]);
Packit 7838c8
#undef	CVT
Packit 7838c8
    }
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Palette images with <= 8 bits/sample are handled
Packit 7838c8
 * with a table to avoid lots of shifts and masks.  The table
Packit 7838c8
 * is setup so that put*cmaptile (below) can retrieve 8/bitspersample
Packit 7838c8
 * pixel values simply by indexing into the table with one
Packit 7838c8
 * number.
Packit 7838c8
 */
Packit 7838c8
static int
Packit 7838c8
makecmap(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
    int bitspersample = img->bitspersample;
Packit 7838c8
    int nsamples = 8 / bitspersample;
Packit 7838c8
    uint16* r = img->redcmap;
Packit 7838c8
    uint16* g = img->greencmap;
Packit 7838c8
    uint16* b = img->bluecmap;
Packit 7838c8
    uint32 *p;
Packit 7838c8
    int i;
Packit 7838c8
Packit 7838c8
    img->PALmap = (uint32**) _TIFFmalloc(
Packit 7838c8
	256*sizeof (uint32 *)+(256*nsamples*sizeof(uint32)));
Packit 7838c8
    if (img->PALmap == NULL) {
Packit 7838c8
		TIFFErrorExt(img->tif->tif_clientdata, TIFFFileName(img->tif), "No space for Palette mapping table");
Packit 7838c8
		return (0);
Packit 7838c8
	}
Packit 7838c8
    p = (uint32*)(img->PALmap + 256);
Packit 7838c8
    for (i = 0; i < 256; i++) {
Packit 7838c8
	TIFFRGBValue c;
Packit 7838c8
	img->PALmap[i] = p;
Packit 7838c8
#define	CMAP(x)	c = (TIFFRGBValue) x; *p++ = PACK(r[c]&0xff, g[c]&0xff, b[c]&0xff);
Packit 7838c8
	switch (bitspersample) {
Packit 7838c8
	case 1:
Packit 7838c8
	    CMAP(i>>7);
Packit 7838c8
	    CMAP((i>>6)&1;;
Packit 7838c8
	    CMAP((i>>5)&1;;
Packit 7838c8
	    CMAP((i>>4)&1;;
Packit 7838c8
	    CMAP((i>>3)&1;;
Packit 7838c8
	    CMAP((i>>2)&1;;
Packit 7838c8
	    CMAP((i>>1)&1;;
Packit 7838c8
	    CMAP(i&1;;
Packit 7838c8
	    break;
Packit 7838c8
	case 2:
Packit 7838c8
	    CMAP(i>>6);
Packit 7838c8
	    CMAP((i>>4)&3;;
Packit 7838c8
	    CMAP((i>>2)&3;;
Packit 7838c8
	    CMAP(i&3;;
Packit 7838c8
	    break;
Packit 7838c8
	case 4:
Packit 7838c8
	    CMAP(i>>4);
Packit 7838c8
	    CMAP(i&0xf);
Packit 7838c8
	    break;
Packit 7838c8
	case 8:
Packit 7838c8
	    CMAP(i);
Packit 7838c8
	    break;
Packit 7838c8
	}
Packit 7838c8
#undef CMAP
Packit 7838c8
    }
Packit 7838c8
    return (1);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/* 
Packit 7838c8
 * Construct any mapping table used
Packit 7838c8
 * by the associated put routine.
Packit 7838c8
 */
Packit 7838c8
static int
Packit 7838c8
buildMap(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
    switch (img->photometric) {
Packit 7838c8
    case PHOTOMETRIC_RGB:
Packit 7838c8
    case PHOTOMETRIC_YCBCR:
Packit 7838c8
    case PHOTOMETRIC_SEPARATED:
Packit 7838c8
	if (img->bitspersample == 8)
Packit 7838c8
	    break;
Packit 7838c8
	/* fall through... */
Packit 7838c8
    case PHOTOMETRIC_MINISBLACK:
Packit 7838c8
    case PHOTOMETRIC_MINISWHITE:
Packit 7838c8
	if (!setupMap(img))
Packit 7838c8
	    return (0);
Packit 7838c8
	break;
Packit 7838c8
    case PHOTOMETRIC_PALETTE:
Packit 7838c8
	/*
Packit 7838c8
	 * Convert 16-bit colormap to 8-bit (unless it looks
Packit 7838c8
	 * like an old-style 8-bit colormap).
Packit 7838c8
	 */
Packit 7838c8
	if (checkcmap(img) == 16)
Packit 7838c8
	    cvtcmap(img);
Packit 7838c8
	else
Packit 7838c8
	    TIFFWarningExt(img->tif->tif_clientdata, TIFFFileName(img->tif), "Assuming 8-bit colormap");
Packit 7838c8
	/*
Packit 7838c8
	 * Use mapping table and colormap to construct
Packit 7838c8
	 * unpacking tables for samples < 8 bits.
Packit 7838c8
	 */
Packit 7838c8
	if (img->bitspersample <= 8 && !makecmap(img))
Packit 7838c8
	    return (0);
Packit 7838c8
	break;
Packit 7838c8
    }
Packit 7838c8
    return (1);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Select the appropriate conversion routine for packed data.
Packit 7838c8
 */
Packit 7838c8
static int
Packit 7838c8
PickContigCase(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
	img->get = TIFFIsTiled(img->tif) ? gtTileContig : gtStripContig;
Packit 7838c8
	img->put.contig = NULL;
Packit 7838c8
	switch (img->photometric) {
Packit 7838c8
		case PHOTOMETRIC_RGB:
Packit 7838c8
			switch (img->bitspersample) {
Packit 7838c8
				case 8:
Packit 7838c8
					if (img->alpha == EXTRASAMPLE_ASSOCALPHA &&
Packit 7838c8
						img->samplesperpixel >= 4)
Packit 7838c8
						img->put.contig = putRGBAAcontig8bittile;
Packit 7838c8
					else if (img->alpha == EXTRASAMPLE_UNASSALPHA &&
Packit 7838c8
							 img->samplesperpixel >= 4)
Packit 7838c8
					{
Packit 7838c8
						if (BuildMapUaToAa(img))
Packit 7838c8
							img->put.contig = putRGBUAcontig8bittile;
Packit 7838c8
					}
Packit 7838c8
					else if( img->samplesperpixel >= 3 )
Packit 7838c8
						img->put.contig = putRGBcontig8bittile;
Packit 7838c8
					break;
Packit 7838c8
				case 16:
Packit 7838c8
					if (img->alpha == EXTRASAMPLE_ASSOCALPHA &&
Packit 7838c8
						img->samplesperpixel >=4 )
Packit 7838c8
					{
Packit 7838c8
						if (BuildMapBitdepth16To8(img))
Packit 7838c8
							img->put.contig = putRGBAAcontig16bittile;
Packit 7838c8
					}
Packit 7838c8
					else if (img->alpha == EXTRASAMPLE_UNASSALPHA &&
Packit 7838c8
							 img->samplesperpixel >=4 )
Packit 7838c8
					{
Packit 7838c8
						if (BuildMapBitdepth16To8(img) &&
Packit 7838c8
						    BuildMapUaToAa(img))
Packit 7838c8
							img->put.contig = putRGBUAcontig16bittile;
Packit 7838c8
					}
Packit 7838c8
					else if( img->samplesperpixel >=3 )
Packit 7838c8
					{
Packit 7838c8
						if (BuildMapBitdepth16To8(img))
Packit 7838c8
							img->put.contig = putRGBcontig16bittile;
Packit 7838c8
					}
Packit 7838c8
					break;
Packit 7838c8
			}
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_SEPARATED:
Packit 7838c8
			if (img->samplesperpixel >=4 && buildMap(img)) {
Packit 7838c8
				if (img->bitspersample == 8) {
Packit 7838c8
					if (!img->Map)
Packit 7838c8
						img->put.contig = putRGBcontig8bitCMYKtile;
Packit 7838c8
					else
Packit 7838c8
						img->put.contig = putRGBcontig8bitCMYKMaptile;
Packit 7838c8
				}
Packit 7838c8
			}
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_PALETTE:
Packit 7838c8
			if (buildMap(img)) {
Packit 7838c8
				switch (img->bitspersample) {
Packit 7838c8
					case 8:
Packit 7838c8
						img->put.contig = put8bitcmaptile;
Packit 7838c8
						break;
Packit 7838c8
					case 4:
Packit 7838c8
						img->put.contig = put4bitcmaptile;
Packit 7838c8
						break;
Packit 7838c8
					case 2:
Packit 7838c8
						img->put.contig = put2bitcmaptile;
Packit 7838c8
						break;
Packit 7838c8
					case 1:
Packit 7838c8
						img->put.contig = put1bitcmaptile;
Packit 7838c8
						break;
Packit 7838c8
				}
Packit 7838c8
			}
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_MINISWHITE:
Packit 7838c8
		case PHOTOMETRIC_MINISBLACK:
Packit 7838c8
			if (buildMap(img)) {
Packit 7838c8
				switch (img->bitspersample) {
Packit 7838c8
					case 16:
Packit 7838c8
						img->put.contig = put16bitbwtile;
Packit 7838c8
						break;
Packit 7838c8
					case 8:
Packit 7838c8
						if (img->alpha && img->samplesperpixel == 2)
Packit 7838c8
							img->put.contig = putagreytile;
Packit 7838c8
						else
Packit 7838c8
							img->put.contig = putgreytile;
Packit 7838c8
						break;
Packit 7838c8
					case 4:
Packit 7838c8
						img->put.contig = put4bitbwtile;
Packit 7838c8
						break;
Packit 7838c8
					case 2:
Packit 7838c8
						img->put.contig = put2bitbwtile;
Packit 7838c8
						break;
Packit 7838c8
					case 1:
Packit 7838c8
						img->put.contig = put1bitbwtile;
Packit 7838c8
						break;
Packit 7838c8
				}
Packit 7838c8
			}
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_YCBCR:
Packit 7838c8
			if ((img->bitspersample==8) && (img->samplesperpixel==3))
Packit 7838c8
			{
Packit 7838c8
				if (initYCbCrConversion(img)!=0)
Packit 7838c8
				{
Packit 7838c8
					/*
Packit 7838c8
					 * The 6.0 spec says that subsampling must be
Packit 7838c8
					 * one of 1, 2, or 4, and that vertical subsampling
Packit 7838c8
					 * must always be <= horizontal subsampling; so
Packit 7838c8
					 * there are only a few possibilities and we just
Packit 7838c8
					 * enumerate the cases.
Packit 7838c8
					 * Joris: added support for the [1,2] case, nonetheless, to accommodate
Packit 7838c8
					 * some OJPEG files
Packit 7838c8
					 */
Packit 7838c8
					uint16 SubsamplingHor;
Packit 7838c8
					uint16 SubsamplingVer;
Packit 7838c8
					TIFFGetFieldDefaulted(img->tif, TIFFTAG_YCBCRSUBSAMPLING, &SubsamplingHor, &SubsamplingVer);
Packit 7838c8
					switch ((SubsamplingHor<<4)|SubsamplingVer) {
Packit 7838c8
						case 0x44:
Packit 7838c8
							img->put.contig = putcontig8bitYCbCr44tile;
Packit 7838c8
							break;
Packit 7838c8
						case 0x42:
Packit 7838c8
							img->put.contig = putcontig8bitYCbCr42tile;
Packit 7838c8
							break;
Packit 7838c8
						case 0x41:
Packit 7838c8
							img->put.contig = putcontig8bitYCbCr41tile;
Packit 7838c8
							break;
Packit 7838c8
						case 0x22:
Packit 7838c8
							img->put.contig = putcontig8bitYCbCr22tile;
Packit 7838c8
							break;
Packit 7838c8
						case 0x21:
Packit 7838c8
							img->put.contig = putcontig8bitYCbCr21tile;
Packit 7838c8
							break;
Packit 7838c8
						case 0x12:
Packit 7838c8
							img->put.contig = putcontig8bitYCbCr12tile;
Packit 7838c8
							break;
Packit 7838c8
						case 0x11:
Packit 7838c8
							img->put.contig = putcontig8bitYCbCr11tile;
Packit 7838c8
							break;
Packit 7838c8
					}
Packit 7838c8
				}
Packit 7838c8
			}
Packit 7838c8
			break;
Packit 7838c8
		case PHOTOMETRIC_CIELAB:
Packit 7838c8
			if (img->samplesperpixel == 3 && buildMap(img)) {
Packit 7838c8
				if (img->bitspersample == 8)
Packit 7838c8
					img->put.contig = initCIELabConversion(img);
Packit 7838c8
				break;
Packit 7838c8
			}
Packit 7838c8
	}
Packit 7838c8
	return ((img->get!=NULL) && (img->put.contig!=NULL));
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Select the appropriate conversion routine for unpacked data.
Packit 7838c8
 *
Packit 7838c8
 * NB: we assume that unpacked single channel data is directed
Packit 7838c8
 *	 to the "packed routines.
Packit 7838c8
 */
Packit 7838c8
static int
Packit 7838c8
PickSeparateCase(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
	img->get = TIFFIsTiled(img->tif) ? gtTileSeparate : gtStripSeparate;
Packit 7838c8
	img->put.separate = NULL;
Packit 7838c8
	switch (img->photometric) {
Packit 7838c8
	case PHOTOMETRIC_MINISWHITE:
Packit 7838c8
	case PHOTOMETRIC_MINISBLACK:
Packit 7838c8
		/* greyscale images processed pretty much as RGB by gtTileSeparate */
Packit 7838c8
	case PHOTOMETRIC_RGB:
Packit 7838c8
		switch (img->bitspersample) {
Packit 7838c8
		case 8:
Packit 7838c8
			if (img->alpha == EXTRASAMPLE_ASSOCALPHA)
Packit 7838c8
				img->put.separate = putRGBAAseparate8bittile;
Packit 7838c8
			else if (img->alpha == EXTRASAMPLE_UNASSALPHA)
Packit 7838c8
			{
Packit 7838c8
				if (BuildMapUaToAa(img))
Packit 7838c8
					img->put.separate = putRGBUAseparate8bittile;
Packit 7838c8
			}
Packit 7838c8
			else
Packit 7838c8
				img->put.separate = putRGBseparate8bittile;
Packit 7838c8
			break;
Packit 7838c8
		case 16:
Packit 7838c8
			if (img->alpha == EXTRASAMPLE_ASSOCALPHA)
Packit 7838c8
			{
Packit 7838c8
				if (BuildMapBitdepth16To8(img))
Packit 7838c8
					img->put.separate = putRGBAAseparate16bittile;
Packit 7838c8
			}
Packit 7838c8
			else if (img->alpha == EXTRASAMPLE_UNASSALPHA)
Packit 7838c8
			{
Packit 7838c8
				if (BuildMapBitdepth16To8(img) &&
Packit 7838c8
				    BuildMapUaToAa(img))
Packit 7838c8
					img->put.separate = putRGBUAseparate16bittile;
Packit 7838c8
			}
Packit 7838c8
			else
Packit 7838c8
			{
Packit 7838c8
				if (BuildMapBitdepth16To8(img))
Packit 7838c8
					img->put.separate = putRGBseparate16bittile;
Packit 7838c8
			}
Packit 7838c8
			break;
Packit 7838c8
		}
Packit 7838c8
		break;
Packit 7838c8
	case PHOTOMETRIC_SEPARATED:
Packit 7838c8
		if (img->bitspersample == 8 && img->samplesperpixel == 4)
Packit 7838c8
		{
Packit 7838c8
			img->alpha = 1; // Not alpha, but seems like the only way to get 4th band
Packit 7838c8
			img->put.separate = putCMYKseparate8bittile;
Packit 7838c8
		}
Packit 7838c8
		break;
Packit 7838c8
	case PHOTOMETRIC_YCBCR:
Packit 7838c8
		if ((img->bitspersample==8) && (img->samplesperpixel==3))
Packit 7838c8
		{
Packit 7838c8
			if (initYCbCrConversion(img)!=0)
Packit 7838c8
			{
Packit 7838c8
				uint16 hs, vs;
Packit 7838c8
				TIFFGetFieldDefaulted(img->tif, TIFFTAG_YCBCRSUBSAMPLING, &hs, &vs);
Packit 7838c8
				switch ((hs<<4)|vs) {
Packit 7838c8
				case 0x11:
Packit 7838c8
					img->put.separate = putseparate8bitYCbCr11tile;
Packit 7838c8
					break;
Packit 7838c8
					/* TODO: add other cases here */
Packit 7838c8
				}
Packit 7838c8
			}
Packit 7838c8
		}
Packit 7838c8
		break;
Packit 7838c8
	}
Packit 7838c8
	return ((img->get!=NULL) && (img->put.separate!=NULL));
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
static int
Packit 7838c8
BuildMapUaToAa(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
	static const char module[]="BuildMapUaToAa";
Packit 7838c8
	uint8* m;
Packit 7838c8
	uint16 na,nv;
Packit 7838c8
	assert(img->UaToAa==NULL);
Packit 7838c8
	img->UaToAa=_TIFFmalloc(65536);
Packit 7838c8
	if (img->UaToAa==NULL)
Packit 7838c8
	{
Packit 7838c8
		TIFFErrorExt(img->tif->tif_clientdata,module,"Out of memory");
Packit 7838c8
		return(0);
Packit 7838c8
	}
Packit 7838c8
	m=img->UaToAa;
Packit 7838c8
	for (na=0; na<256; na++)
Packit 7838c8
	{
Packit 7838c8
		for (nv=0; nv<256; nv++)
Packit 7838c8
			*m++=(uint8)((nv*na+127)/255);
Packit 7838c8
	}
Packit 7838c8
	return(1);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
static int
Packit 7838c8
BuildMapBitdepth16To8(TIFFRGBAImage* img)
Packit 7838c8
{
Packit 7838c8
	static const char module[]="BuildMapBitdepth16To8";
Packit 7838c8
	uint8* m;
Packit 7838c8
	uint32 n;
Packit 7838c8
	assert(img->Bitdepth16To8==NULL);
Packit 7838c8
	img->Bitdepth16To8=_TIFFmalloc(65536);
Packit 7838c8
	if (img->Bitdepth16To8==NULL)
Packit 7838c8
	{
Packit 7838c8
		TIFFErrorExt(img->tif->tif_clientdata,module,"Out of memory");
Packit 7838c8
		return(0);
Packit 7838c8
	}
Packit 7838c8
	m=img->Bitdepth16To8;
Packit 7838c8
	for (n=0; n<65536; n++)
Packit 7838c8
		*m++=(uint8)((n+128)/257);
Packit 7838c8
	return(1);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Read a whole strip off data from the file, and convert to RGBA form.
Packit 7838c8
 * If this is the last strip, then it will only contain the portion of
Packit 7838c8
 * the strip that is actually within the image space.  The result is
Packit 7838c8
 * organized in bottom to top form.
Packit 7838c8
 */
Packit 7838c8
Packit 7838c8
Packit 7838c8
int
Packit 7838c8
TIFFReadRGBAStrip(TIFF* tif, uint32 row, uint32 * raster )
Packit 7838c8
Packit 7838c8
{
Packit 7838c8
    return TIFFReadRGBAStripExt(tif, row, raster, 0 );
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
int
Packit 7838c8
TIFFReadRGBAStripExt(TIFF* tif, uint32 row, uint32 * raster, int stop_on_error)
Packit 7838c8
Packit 7838c8
{
Packit 7838c8
    char 	emsg[1024] = "";
Packit 7838c8
    TIFFRGBAImage img;
Packit 7838c8
    int 	ok;
Packit 7838c8
    uint32	rowsperstrip, rows_to_read;
Packit 7838c8
Packit 7838c8
    if( TIFFIsTiled( tif ) )
Packit 7838c8
    {
Packit 7838c8
		TIFFErrorExt(tif->tif_clientdata, TIFFFileName(tif),
Packit 7838c8
                  "Can't use TIFFReadRGBAStrip() with tiled file.");
Packit 7838c8
	return (0);
Packit 7838c8
    }
Packit 7838c8
    
Packit 7838c8
    TIFFGetFieldDefaulted(tif, TIFFTAG_ROWSPERSTRIP, &rowsperstrip);
Packit 7838c8
    if( (row % rowsperstrip) != 0 )
Packit 7838c8
    {
Packit 7838c8
		TIFFErrorExt(tif->tif_clientdata, TIFFFileName(tif),
Packit 7838c8
				"Row passed to TIFFReadRGBAStrip() must be first in a strip.");
Packit 7838c8
		return (0);
Packit 7838c8
    }
Packit 7838c8
Packit 7838c8
    if (TIFFRGBAImageOK(tif, emsg) && TIFFRGBAImageBegin(&img, tif, stop_on_error, emsg)) {
Packit 7838c8
Packit 7838c8
        img.row_offset = row;
Packit 7838c8
        img.col_offset = 0;
Packit 7838c8
Packit 7838c8
        if( row + rowsperstrip > img.height )
Packit 7838c8
            rows_to_read = img.height - row;
Packit 7838c8
        else
Packit 7838c8
            rows_to_read = rowsperstrip;
Packit 7838c8
        
Packit 7838c8
	ok = TIFFRGBAImageGet(&img, raster, img.width, rows_to_read );
Packit 7838c8
        
Packit 7838c8
	TIFFRGBAImageEnd(&img;;
Packit 7838c8
    } else {
Packit 7838c8
		TIFFErrorExt(tif->tif_clientdata, TIFFFileName(tif), "%s", emsg);
Packit 7838c8
		ok = 0;
Packit 7838c8
    }
Packit 7838c8
    
Packit 7838c8
    return (ok);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/*
Packit 7838c8
 * Read a whole tile off data from the file, and convert to RGBA form.
Packit 7838c8
 * The returned RGBA data is organized from bottom to top of tile,
Packit 7838c8
 * and may include zeroed areas if the tile extends off the image.
Packit 7838c8
 */
Packit 7838c8
Packit 7838c8
int
Packit 7838c8
TIFFReadRGBATile(TIFF* tif, uint32 col, uint32 row, uint32 * raster)
Packit 7838c8
Packit 7838c8
{
Packit 7838c8
    return TIFFReadRGBATileExt(tif, col, row, raster, 0 );
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
Packit 7838c8
int
Packit 7838c8
TIFFReadRGBATileExt(TIFF* tif, uint32 col, uint32 row, uint32 * raster, int stop_on_error )
Packit 7838c8
{
Packit 7838c8
    char 	emsg[1024] = "";
Packit 7838c8
    TIFFRGBAImage img;
Packit 7838c8
    int 	ok;
Packit 7838c8
    uint32	tile_xsize, tile_ysize;
Packit 7838c8
    uint32	read_xsize, read_ysize;
Packit 7838c8
    uint32	i_row;
Packit 7838c8
Packit 7838c8
    /*
Packit 7838c8
     * Verify that our request is legal - on a tile file, and on a
Packit 7838c8
     * tile boundary.
Packit 7838c8
     */
Packit 7838c8
    
Packit 7838c8
    if( !TIFFIsTiled( tif ) )
Packit 7838c8
    {
Packit 7838c8
		TIFFErrorExt(tif->tif_clientdata, TIFFFileName(tif),
Packit 7838c8
				  "Can't use TIFFReadRGBATile() with stripped file.");
Packit 7838c8
		return (0);
Packit 7838c8
    }
Packit 7838c8
    
Packit 7838c8
    TIFFGetFieldDefaulted(tif, TIFFTAG_TILEWIDTH, &tile_xsize);
Packit 7838c8
    TIFFGetFieldDefaulted(tif, TIFFTAG_TILELENGTH, &tile_ysize);
Packit 7838c8
    if( (col % tile_xsize) != 0 || (row % tile_ysize) != 0 )
Packit 7838c8
    {
Packit 7838c8
		TIFFErrorExt(tif->tif_clientdata, TIFFFileName(tif),
Packit 7838c8
                  "Row/col passed to TIFFReadRGBATile() must be top"
Packit 7838c8
                  "left corner of a tile.");
Packit 7838c8
	return (0);
Packit 7838c8
    }
Packit 7838c8
Packit 7838c8
    /*
Packit 7838c8
     * Setup the RGBA reader.
Packit 7838c8
     */
Packit 7838c8
    
Packit 7838c8
    if (!TIFFRGBAImageOK(tif, emsg) 
Packit 7838c8
	|| !TIFFRGBAImageBegin(&img, tif, stop_on_error, emsg)) {
Packit 7838c8
	    TIFFErrorExt(tif->tif_clientdata, TIFFFileName(tif), "%s", emsg);
Packit 7838c8
	    return( 0 );
Packit 7838c8
    }
Packit 7838c8
Packit 7838c8
    /*
Packit 7838c8
     * The TIFFRGBAImageGet() function doesn't allow us to get off the
Packit 7838c8
     * edge of the image, even to fill an otherwise valid tile.  So we
Packit 7838c8
     * figure out how much we can read, and fix up the tile buffer to
Packit 7838c8
     * a full tile configuration afterwards.
Packit 7838c8
     */
Packit 7838c8
Packit 7838c8
    if( row + tile_ysize > img.height )
Packit 7838c8
        read_ysize = img.height - row;
Packit 7838c8
    else
Packit 7838c8
        read_ysize = tile_ysize;
Packit 7838c8
    
Packit 7838c8
    if( col + tile_xsize > img.width )
Packit 7838c8
        read_xsize = img.width - col;
Packit 7838c8
    else
Packit 7838c8
        read_xsize = tile_xsize;
Packit 7838c8
Packit 7838c8
    /*
Packit 7838c8
     * Read the chunk of imagery.
Packit 7838c8
     */
Packit 7838c8
    
Packit 7838c8
    img.row_offset = row;
Packit 7838c8
    img.col_offset = col;
Packit 7838c8
Packit 7838c8
    ok = TIFFRGBAImageGet(&img, raster, read_xsize, read_ysize );
Packit 7838c8
        
Packit 7838c8
    TIFFRGBAImageEnd(&img;;
Packit 7838c8
Packit 7838c8
    /*
Packit 7838c8
     * If our read was incomplete we will need to fix up the tile by
Packit 7838c8
     * shifting the data around as if a full tile of data is being returned.
Packit 7838c8
     *
Packit 7838c8
     * This is all the more complicated because the image is organized in
Packit 7838c8
     * bottom to top format. 
Packit 7838c8
     */
Packit 7838c8
Packit 7838c8
    if( read_xsize == tile_xsize && read_ysize == tile_ysize )
Packit 7838c8
        return( ok );
Packit 7838c8
Packit 7838c8
    for( i_row = 0; i_row < read_ysize; i_row++ ) {
Packit 7838c8
        memmove( raster + (tile_ysize - i_row - 1) * tile_xsize,
Packit 7838c8
                 raster + (read_ysize - i_row - 1) * read_xsize,
Packit 7838c8
                 read_xsize * sizeof(uint32) );
Packit 7838c8
        _TIFFmemset( raster + (tile_ysize - i_row - 1) * tile_xsize+read_xsize,
Packit 7838c8
                     0, sizeof(uint32) * (tile_xsize - read_xsize) );
Packit 7838c8
    }
Packit 7838c8
Packit 7838c8
    for( i_row = read_ysize; i_row < tile_ysize; i_row++ ) {
Packit 7838c8
        _TIFFmemset( raster + (tile_ysize - i_row - 1) * tile_xsize,
Packit 7838c8
                     0, sizeof(uint32) * tile_xsize );
Packit 7838c8
    }
Packit 7838c8
Packit 7838c8
    return (ok);
Packit 7838c8
}
Packit 7838c8
Packit 7838c8
/* vim: set ts=8 sts=8 sw=8 noet: */
Packit 7838c8
/*
Packit 7838c8
 * Local Variables:
Packit 7838c8
 * mode: c
Packit 7838c8
 * c-basic-offset: 8
Packit 7838c8
 * fill-column: 78
Packit 7838c8
 * End:
Packit 7838c8
 */