1267 lines
34 KiB
C
1267 lines
34 KiB
C
/* $Header: /cvs/maptools/cvsroot/libtiff/tools/tiffcp.c,v 1.1 1999-07-27 21:50:28 mike Exp $ */
|
|
|
|
/*
|
|
* Copyright (c) 1988-1997 Sam Leffler
|
|
* Copyright (c) 1991-1997 Silicon Graphics, Inc.
|
|
*
|
|
* Permission to use, copy, modify, distribute, and sell this software and
|
|
* its documentation for any purpose is hereby granted without fee, provided
|
|
* that (i) the above copyright notices and this permission notice appear in
|
|
* all copies of the software and related documentation, and (ii) the names of
|
|
* Sam Leffler and Silicon Graphics may not be used in any advertising or
|
|
* publicity relating to the software without the specific, prior written
|
|
* permission of Sam Leffler and Silicon Graphics.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND,
|
|
* EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY
|
|
* WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.
|
|
*
|
|
* IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
|
|
* ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
|
|
* OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
|
|
* WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF
|
|
* LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE
|
|
* OF THIS SOFTWARE.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
#include <ctype.h>
|
|
|
|
#include "tiffio.h"
|
|
|
|
#if defined(VMS)
|
|
#define unlink delete
|
|
#endif
|
|
|
|
#define streq(a,b) (strcmp(a,b) == 0)
|
|
#define strneq(a,b,n) (strncmp(a,b,n) == 0)
|
|
|
|
#define TRUE 1
|
|
#define FALSE 0
|
|
|
|
static int outtiled = -1;
|
|
static uint32 tilewidth;
|
|
static uint32 tilelength;
|
|
|
|
static uint16 config;
|
|
static uint16 compression;
|
|
static uint16 predictor;
|
|
static uint16 fillorder;
|
|
static uint32 rowsperstrip;
|
|
static uint32 g3opts;
|
|
static int ignore = FALSE; /* if true, ignore read errors */
|
|
static uint32 defg3opts = (uint32) -1;
|
|
static int quality = 75; /* JPEG quality */
|
|
static int jpegcolormode = JPEGCOLORMODE_RGB;
|
|
static uint16 defcompression = (uint16) -1;
|
|
static uint16 defpredictor = (uint16) -1;
|
|
|
|
static int tiffcp(TIFF*, TIFF*);
|
|
static int processCompressOptions(char*);
|
|
static void usage(void);
|
|
|
|
int
|
|
main(int argc, char* argv[])
|
|
{
|
|
uint16 defconfig = (uint16) -1;
|
|
uint16 deffillorder = 0;
|
|
uint32 deftilewidth = (uint32) -1;
|
|
uint32 deftilelength = (uint32) -1;
|
|
uint32 defrowsperstrip = (uint32) -1;
|
|
uint32 diroff = 0;
|
|
TIFF* in;
|
|
TIFF* out;
|
|
char mode[10];
|
|
char* mp = mode;
|
|
int c;
|
|
extern int optind;
|
|
extern char* optarg;
|
|
|
|
*mp++ = 'w';
|
|
*mp = '\0';
|
|
while ((c = getopt(argc, argv, "c:f:l:o:p:r:w:aistBLMC")) != -1)
|
|
switch (c) {
|
|
case 'a': /* append to output */
|
|
mode[0] = 'a';
|
|
break;
|
|
case 'c': /* compression scheme */
|
|
if (!processCompressOptions(optarg))
|
|
usage();
|
|
break;
|
|
case 'f': /* fill order */
|
|
if (streq(optarg, "lsb2msb"))
|
|
deffillorder = FILLORDER_LSB2MSB;
|
|
else if (streq(optarg, "msb2lsb"))
|
|
deffillorder = FILLORDER_MSB2LSB;
|
|
else
|
|
usage();
|
|
break;
|
|
case 'i': /* ignore errors */
|
|
ignore = TRUE;
|
|
break;
|
|
case 'l': /* tile length */
|
|
outtiled = TRUE;
|
|
deftilelength = atoi(optarg);
|
|
break;
|
|
case 'o': /* initial directory offset */
|
|
diroff = strtoul(optarg, NULL, 0);
|
|
break;
|
|
case 'p': /* planar configuration */
|
|
if (streq(optarg, "separate"))
|
|
defconfig = PLANARCONFIG_SEPARATE;
|
|
else if (streq(optarg, "contig"))
|
|
defconfig = PLANARCONFIG_CONTIG;
|
|
else
|
|
usage();
|
|
break;
|
|
case 'r': /* rows/strip */
|
|
defrowsperstrip = atoi(optarg);
|
|
break;
|
|
case 's': /* generate stripped output */
|
|
outtiled = FALSE;
|
|
break;
|
|
case 't': /* generate tiled output */
|
|
outtiled = TRUE;
|
|
break;
|
|
case 'w': /* tile width */
|
|
outtiled = TRUE;
|
|
deftilewidth = atoi(optarg);
|
|
break;
|
|
case 'B':
|
|
*mp++ = 'b'; *mp = '\0';
|
|
break;
|
|
case 'L':
|
|
*mp++ = 'l'; *mp = '\0';
|
|
break;
|
|
case 'M':
|
|
*mp++ = 'm'; *mp = '\0';
|
|
break;
|
|
case 'C':
|
|
*mp++ = 'c'; *mp = '\0';
|
|
break;
|
|
case '?':
|
|
usage();
|
|
/*NOTREACHED*/
|
|
}
|
|
if (argc - optind < 2)
|
|
usage();
|
|
out = TIFFOpen(argv[argc-1], mode);
|
|
if (out == NULL)
|
|
return (-2);
|
|
mode[0] = 'r';
|
|
for (; optind < argc-1 ; optind++) {
|
|
in = TIFFOpen(argv[optind], mode);
|
|
if (in == NULL)
|
|
return (-3);
|
|
if (diroff != 0 && !TIFFSetSubDirectory(in, diroff)) {
|
|
TIFFError(TIFFFileName(in),
|
|
"Error, setting subdirectory at %#x", diroff);
|
|
(void) TIFFClose(out);
|
|
return (1);
|
|
}
|
|
do {
|
|
config = defconfig;
|
|
compression = defcompression;
|
|
predictor = defpredictor;
|
|
fillorder = deffillorder;
|
|
rowsperstrip = defrowsperstrip;
|
|
tilewidth = deftilewidth;
|
|
tilelength = deftilelength;
|
|
g3opts = defg3opts;
|
|
if (!tiffcp(in, out) || !TIFFWriteDirectory(out)) {
|
|
(void) TIFFClose(out);
|
|
return (1);
|
|
}
|
|
} while (TIFFReadDirectory(in));
|
|
(void) TIFFClose(in);
|
|
}
|
|
(void) TIFFClose(out);
|
|
return (0);
|
|
}
|
|
|
|
static void
|
|
processG3Options(char* cp)
|
|
{
|
|
if (cp = strchr(cp, ':')) {
|
|
if (defg3opts == (uint32) -1)
|
|
defg3opts = 0;
|
|
do {
|
|
cp++;
|
|
if (strneq(cp, "1d", 2))
|
|
defg3opts &= ~GROUP3OPT_2DENCODING;
|
|
else if (strneq(cp, "2d", 2))
|
|
defg3opts |= GROUP3OPT_2DENCODING;
|
|
else if (strneq(cp, "fill", 4))
|
|
defg3opts |= GROUP3OPT_FILLBITS;
|
|
else
|
|
usage();
|
|
} while (cp = strchr(cp, ':'));
|
|
}
|
|
}
|
|
|
|
static int
|
|
processCompressOptions(char* opt)
|
|
{
|
|
if (streq(opt, "none")) {
|
|
defcompression = COMPRESSION_NONE;
|
|
} else if (streq(opt, "packbits")) {
|
|
defcompression = COMPRESSION_PACKBITS;
|
|
} else if (strneq(opt, "jpeg", 4)) {
|
|
char* cp = strchr(opt, ':');
|
|
if (cp && isdigit(cp[1]))
|
|
quality = atoi(cp+1);
|
|
if (cp && strchr(cp, 'r'))
|
|
jpegcolormode = JPEGCOLORMODE_RAW;
|
|
defcompression = COMPRESSION_JPEG;
|
|
} else if (strneq(opt, "g3", 2)) {
|
|
processG3Options(opt);
|
|
defcompression = COMPRESSION_CCITTFAX3;
|
|
} else if (streq(opt, "g4")) {
|
|
defcompression = COMPRESSION_CCITTFAX4;
|
|
} else if (strneq(opt, "lzw", 3)) {
|
|
char* cp = strchr(opt, ':');
|
|
if (cp)
|
|
defpredictor = atoi(cp+1);
|
|
defcompression = COMPRESSION_LZW;
|
|
} else if (strneq(opt, "zip", 3)) {
|
|
char* cp = strchr(opt, ':');
|
|
if (cp)
|
|
defpredictor = atoi(cp+1);
|
|
defcompression = COMPRESSION_DEFLATE;
|
|
} else
|
|
return (0);
|
|
return (1);
|
|
}
|
|
|
|
char* stuff[] = {
|
|
"usage: tiffcp [options] input... output",
|
|
"where options are:",
|
|
" -a append to output instead of overwriting",
|
|
" -o offset set initial directory offset",
|
|
" -p contig pack samples contiguously (e.g. RGBRGB...)",
|
|
" -p separate store samples separately (e.g. RRR...GGG...BBB...)",
|
|
" -s write output in strips",
|
|
" -t write output in tiles",
|
|
" -i ignore read errors",
|
|
"",
|
|
" -r # make each strip have no more than # rows",
|
|
" -w # set output tile width (pixels)",
|
|
" -l # set output tile length (pixels)",
|
|
"",
|
|
" -f lsb2msb force lsb-to-msb FillOrder for output",
|
|
" -f msb2lsb force msb-to-lsb FillOrder for output",
|
|
"",
|
|
" -c lzw[:opts] compress output with Lempel-Ziv & Welch encoding",
|
|
" -c zip[:opts] compress output with deflate encoding",
|
|
" -c jpeg[:opts]compress output with JPEG encoding",
|
|
" -c packbits compress output with packbits encoding",
|
|
" -c g3[:opts] compress output with CCITT Group 3 encoding",
|
|
" -c g4 compress output with CCITT Group 4 encoding",
|
|
" -c none use no compression algorithm on output",
|
|
"",
|
|
"Group 3 options:",
|
|
" 1d use default CCITT Group 3 1D-encoding",
|
|
" 2d use optional CCITT Group 3 2D-encoding",
|
|
" fill byte-align EOL codes",
|
|
"For example, -c g3:2d:fill to get G3-2D-encoded data with byte-aligned EOLs",
|
|
"",
|
|
"JPEG options:",
|
|
" # set compression quality level (0-100, default 75)",
|
|
" r output color image as RGB rather than YCbCr",
|
|
"For example, -c jpeg:r:50 to get JPEG-encoded RGB data with 50% comp. quality",
|
|
"",
|
|
"LZW and deflate options:",
|
|
" # set predictor value",
|
|
"For example, -c lzw:2 to get LZW-encoded data with horizontal differencing",
|
|
NULL
|
|
};
|
|
|
|
static void
|
|
usage(void)
|
|
{
|
|
char buf[BUFSIZ];
|
|
int i;
|
|
|
|
setbuf(stderr, buf);
|
|
for (i = 0; stuff[i] != NULL; i++)
|
|
fprintf(stderr, "%s\n", stuff[i]);
|
|
exit(-1);
|
|
}
|
|
|
|
static void
|
|
CheckAndCorrectColormap(TIFF* tif, int n, uint16* r, uint16* g, uint16* b)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < n; i++)
|
|
if (r[i] >= 256 || g[i] >= 256 || b[i] >= 256)
|
|
return;
|
|
TIFFWarning(TIFFFileName(tif), "Scaling 8-bit colormap");
|
|
#define CVT(x) (((x) * ((1L<<16)-1)) / 255)
|
|
for (i = 0; i < n; i++) {
|
|
r[i] = CVT(r[i]);
|
|
g[i] = CVT(g[i]);
|
|
b[i] = CVT(b[i]);
|
|
}
|
|
#undef CVT
|
|
}
|
|
|
|
#define CopyField(tag, v) \
|
|
if (TIFFGetField(in, tag, &v)) TIFFSetField(out, tag, v)
|
|
#define CopyField2(tag, v1, v2) \
|
|
if (TIFFGetField(in, tag, &v1, &v2)) TIFFSetField(out, tag, v1, v2)
|
|
#define CopyField3(tag, v1, v2, v3) \
|
|
if (TIFFGetField(in, tag, &v1, &v2, &v3)) TIFFSetField(out, tag, v1, v2, v3)
|
|
#define CopyField4(tag, v1, v2, v3, v4) \
|
|
if (TIFFGetField(in, tag, &v1, &v2, &v3, &v4)) TIFFSetField(out, tag, v1, v2, v3, v4)
|
|
|
|
static void
|
|
cpTag(TIFF* in, TIFF* out, uint16 tag, uint16 count, TIFFDataType type)
|
|
{
|
|
switch (type) {
|
|
case TIFF_SHORT:
|
|
if (count == 1) {
|
|
uint16 shortv;
|
|
CopyField(tag, shortv);
|
|
} else if (count == 2) {
|
|
uint16 shortv1, shortv2;
|
|
CopyField2(tag, shortv1, shortv2);
|
|
} else if (count == 4) {
|
|
uint16 *tr, *tg, *tb, *ta;
|
|
CopyField4(tag, tr, tg, tb, ta);
|
|
} else if (count == (uint16) -1) {
|
|
uint16 shortv1;
|
|
uint16* shortav;
|
|
CopyField2(tag, shortv1, shortav);
|
|
}
|
|
break;
|
|
case TIFF_LONG:
|
|
{ uint32 longv;
|
|
CopyField(tag, longv);
|
|
}
|
|
break;
|
|
case TIFF_RATIONAL:
|
|
if (count == 1) {
|
|
float floatv;
|
|
CopyField(tag, floatv);
|
|
} else if (count == (uint16) -1) {
|
|
float* floatav;
|
|
CopyField(tag, floatav);
|
|
}
|
|
break;
|
|
case TIFF_ASCII:
|
|
{ char* stringv;
|
|
CopyField(tag, stringv);
|
|
}
|
|
break;
|
|
case TIFF_DOUBLE:
|
|
if (count == 1) {
|
|
double doublev;
|
|
CopyField(tag, doublev);
|
|
} else if (count == (uint16) -1) {
|
|
double* doubleav;
|
|
CopyField(tag, doubleav);
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
static struct cpTag {
|
|
uint16 tag;
|
|
uint16 count;
|
|
TIFFDataType type;
|
|
} tags[] = {
|
|
{ TIFFTAG_SUBFILETYPE, 1, TIFF_LONG },
|
|
{ TIFFTAG_THRESHHOLDING, 1, TIFF_SHORT },
|
|
{ TIFFTAG_DOCUMENTNAME, 1, TIFF_ASCII },
|
|
{ TIFFTAG_IMAGEDESCRIPTION, 1, TIFF_ASCII },
|
|
{ TIFFTAG_MAKE, 1, TIFF_ASCII },
|
|
{ TIFFTAG_MODEL, 1, TIFF_ASCII },
|
|
{ TIFFTAG_ORIENTATION, 1, TIFF_SHORT },
|
|
{ TIFFTAG_MINSAMPLEVALUE, 1, TIFF_SHORT },
|
|
{ TIFFTAG_MAXSAMPLEVALUE, 1, TIFF_SHORT },
|
|
{ TIFFTAG_XRESOLUTION, 1, TIFF_RATIONAL },
|
|
{ TIFFTAG_YRESOLUTION, 1, TIFF_RATIONAL },
|
|
{ TIFFTAG_PAGENAME, 1, TIFF_ASCII },
|
|
{ TIFFTAG_XPOSITION, 1, TIFF_RATIONAL },
|
|
{ TIFFTAG_YPOSITION, 1, TIFF_RATIONAL },
|
|
{ TIFFTAG_RESOLUTIONUNIT, 1, TIFF_SHORT },
|
|
{ TIFFTAG_PAGENUMBER, 2, TIFF_SHORT },
|
|
{ TIFFTAG_SOFTWARE, 1, TIFF_ASCII },
|
|
{ TIFFTAG_DATETIME, 1, TIFF_ASCII },
|
|
{ TIFFTAG_ARTIST, 1, TIFF_ASCII },
|
|
{ TIFFTAG_HOSTCOMPUTER, 1, TIFF_ASCII },
|
|
{ TIFFTAG_WHITEPOINT, 1, TIFF_RATIONAL },
|
|
{ TIFFTAG_PRIMARYCHROMATICITIES,(uint16) -1,TIFF_RATIONAL },
|
|
{ TIFFTAG_HALFTONEHINTS, 2, TIFF_SHORT },
|
|
{ TIFFTAG_INKSET, 1, TIFF_SHORT },
|
|
{ TIFFTAG_INKNAMES, 1, TIFF_ASCII },
|
|
{ TIFFTAG_NUMBEROFINKS, 1, TIFF_SHORT },
|
|
{ TIFFTAG_DOTRANGE, 2, TIFF_SHORT },
|
|
{ TIFFTAG_TARGETPRINTER, 1, TIFF_ASCII },
|
|
{ TIFFTAG_SAMPLEFORMAT, 1, TIFF_SHORT },
|
|
{ TIFFTAG_YCBCRCOEFFICIENTS, (uint16) -1,TIFF_RATIONAL },
|
|
{ TIFFTAG_YCBCRSUBSAMPLING, 2, TIFF_SHORT },
|
|
{ TIFFTAG_YCBCRPOSITIONING, 1, TIFF_SHORT },
|
|
{ TIFFTAG_REFERENCEBLACKWHITE, (uint16) -1,TIFF_RATIONAL },
|
|
{ TIFFTAG_EXTRASAMPLES, (uint16) -1, TIFF_SHORT },
|
|
{ TIFFTAG_SMINSAMPLEVALUE, 1, TIFF_DOUBLE },
|
|
{ TIFFTAG_SMAXSAMPLEVALUE, 1, TIFF_DOUBLE },
|
|
{ TIFFTAG_STONITS, 1, TIFF_DOUBLE },
|
|
};
|
|
#define NTAGS (sizeof (tags) / sizeof (tags[0]))
|
|
|
|
#define CopyTag(tag, count, type) cpTag(in, out, tag, count, type)
|
|
|
|
typedef int (*copyFunc)
|
|
(TIFF* in, TIFF* out, uint32 l, uint32 w, uint16 samplesperpixel);
|
|
static copyFunc pickCopyFunc(TIFF*, TIFF*, uint16, uint16);
|
|
|
|
static int
|
|
tiffcp(TIFF* in, TIFF* out)
|
|
{
|
|
uint16 bitspersample, samplesperpixel;
|
|
copyFunc cf;
|
|
uint32 w, l;
|
|
struct cpTag* p;
|
|
|
|
CopyField(TIFFTAG_IMAGEWIDTH, w);
|
|
CopyField(TIFFTAG_IMAGELENGTH, l);
|
|
CopyField(TIFFTAG_BITSPERSAMPLE, bitspersample);
|
|
CopyField(TIFFTAG_SAMPLESPERPIXEL, samplesperpixel);
|
|
if (compression != (uint16)-1)
|
|
TIFFSetField(out, TIFFTAG_COMPRESSION, compression);
|
|
else
|
|
CopyField(TIFFTAG_COMPRESSION, compression);
|
|
if (compression == COMPRESSION_JPEG && jpegcolormode == JPEGCOLORMODE_RGB)
|
|
TIFFSetField(out, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_YCBCR);
|
|
else if (compression == COMPRESSION_SGILOG || compression == COMPRESSION_SGILOG24)
|
|
TIFFSetField(out, TIFFTAG_PHOTOMETRIC,
|
|
samplesperpixel == 1 ?
|
|
PHOTOMETRIC_LOGL : PHOTOMETRIC_LOGLUV);
|
|
else
|
|
CopyTag(TIFFTAG_PHOTOMETRIC, 1, TIFF_SHORT);
|
|
if (fillorder != 0)
|
|
TIFFSetField(out, TIFFTAG_FILLORDER, fillorder);
|
|
else
|
|
CopyTag(TIFFTAG_FILLORDER, 1, TIFF_SHORT);
|
|
/*
|
|
* Choose tiles/strip for the output image according to
|
|
* the command line arguments (-tiles, -strips) and the
|
|
* structure of the input image.
|
|
*/
|
|
if (outtiled == -1)
|
|
outtiled = TIFFIsTiled(in);
|
|
if (outtiled) {
|
|
/*
|
|
* Setup output file's tile width&height. If either
|
|
* is not specified, use either the value from the
|
|
* input image or, if nothing is defined, use the
|
|
* library default.
|
|
*/
|
|
if (tilewidth == (uint32) -1)
|
|
TIFFGetField(in, TIFFTAG_TILEWIDTH, &tilewidth);
|
|
if (tilelength == (uint32) -1)
|
|
TIFFGetField(in, TIFFTAG_TILELENGTH, &tilelength);
|
|
TIFFDefaultTileSize(out, &tilewidth, &tilelength);
|
|
TIFFSetField(out, TIFFTAG_TILEWIDTH, tilewidth);
|
|
TIFFSetField(out, TIFFTAG_TILELENGTH, tilelength);
|
|
} else {
|
|
/*
|
|
* RowsPerStrip is left unspecified: use either the
|
|
* value from the input image or, if nothing is defined,
|
|
* use the library default.
|
|
*/
|
|
if (rowsperstrip == (uint32) -1)
|
|
TIFFGetField(in, TIFFTAG_ROWSPERSTRIP, &rowsperstrip);
|
|
rowsperstrip = TIFFDefaultStripSize(out, rowsperstrip);
|
|
TIFFSetField(out, TIFFTAG_ROWSPERSTRIP, rowsperstrip);
|
|
}
|
|
if (config != (uint16) -1)
|
|
TIFFSetField(out, TIFFTAG_PLANARCONFIG, config);
|
|
else
|
|
CopyField(TIFFTAG_PLANARCONFIG, config);
|
|
if (samplesperpixel <= 4)
|
|
CopyTag(TIFFTAG_TRANSFERFUNCTION, 4, TIFF_SHORT);
|
|
CopyTag(TIFFTAG_COLORMAP, 4, TIFF_SHORT);
|
|
/* SMinSampleValue & SMaxSampleValue */
|
|
switch (compression) {
|
|
case COMPRESSION_JPEG:
|
|
TIFFSetField(out, TIFFTAG_JPEGQUALITY, quality);
|
|
TIFFSetField(out, TIFFTAG_JPEGCOLORMODE, jpegcolormode);
|
|
break;
|
|
case COMPRESSION_LZW:
|
|
case COMPRESSION_DEFLATE:
|
|
if (predictor != (uint16)-1)
|
|
TIFFSetField(out, TIFFTAG_PREDICTOR, predictor);
|
|
else
|
|
CopyField(TIFFTAG_PREDICTOR, predictor);
|
|
break;
|
|
case COMPRESSION_CCITTFAX3:
|
|
case COMPRESSION_CCITTFAX4:
|
|
if (compression == COMPRESSION_CCITTFAX3) {
|
|
if (g3opts != (uint32) -1)
|
|
TIFFSetField(out, TIFFTAG_GROUP3OPTIONS,
|
|
g3opts);
|
|
else
|
|
CopyField(TIFFTAG_GROUP3OPTIONS, g3opts);
|
|
} else
|
|
CopyTag(TIFFTAG_GROUP4OPTIONS, 1, TIFF_LONG);
|
|
CopyTag(TIFFTAG_BADFAXLINES, 1, TIFF_LONG);
|
|
CopyTag(TIFFTAG_CLEANFAXDATA, 1, TIFF_LONG);
|
|
CopyTag(TIFFTAG_CONSECUTIVEBADFAXLINES, 1, TIFF_LONG);
|
|
CopyTag(TIFFTAG_FAXRECVPARAMS, 1, TIFF_LONG);
|
|
CopyTag(TIFFTAG_FAXRECVTIME, 1, TIFF_LONG);
|
|
CopyTag(TIFFTAG_FAXSUBADDRESS, 1, TIFF_ASCII);
|
|
break;
|
|
}
|
|
{ uint32 len32;
|
|
void** data;
|
|
if (TIFFGetField(in, TIFFTAG_ICCPROFILE, &len32, &data))
|
|
TIFFSetField(out, TIFFTAG_ICCPROFILE, len32, data);
|
|
}
|
|
for (p = tags; p < &tags[NTAGS]; p++)
|
|
CopyTag(p->tag, p->count, p->type);
|
|
|
|
cf = pickCopyFunc(in, out, bitspersample, samplesperpixel);
|
|
return (cf ? (*cf)(in, out, l, w, samplesperpixel) : FALSE);
|
|
}
|
|
|
|
/*
|
|
* Copy Functions.
|
|
*/
|
|
#define DECLAREcpFunc(x) \
|
|
static int x(TIFF* in, TIFF* out, \
|
|
uint32 imagelength, uint32 imagewidth, tsample_t spp)
|
|
|
|
#define DECLAREreadFunc(x) \
|
|
static void x(TIFF* in, \
|
|
uint8* buf, uint32 imagelength, uint32 imagewidth, tsample_t spp)
|
|
typedef void (*readFunc)(TIFF*, uint8*, uint32, uint32, tsample_t);
|
|
|
|
#define DECLAREwriteFunc(x) \
|
|
static int x(TIFF* out, \
|
|
uint8* buf, uint32 imagelength, uint32 imagewidth, tsample_t spp)
|
|
typedef int (*writeFunc)(TIFF*, uint8*, uint32, uint32, tsample_t);
|
|
|
|
/*
|
|
* Contig -> contig by scanline for rows/strip change.
|
|
*/
|
|
DECLAREcpFunc(cpContig2ContigByRow)
|
|
{
|
|
tdata_t buf = _TIFFmalloc(TIFFScanlineSize(in));
|
|
uint32 row;
|
|
|
|
(void) imagewidth; (void) spp;
|
|
for (row = 0; row < imagelength; row++) {
|
|
if (TIFFReadScanline(in, buf, row, 0) < 0 && !ignore)
|
|
goto done;
|
|
if (TIFFWriteScanline(out, buf, row, 0) < 0)
|
|
goto bad;
|
|
}
|
|
done:
|
|
_TIFFfree(buf);
|
|
return (TRUE);
|
|
bad:
|
|
_TIFFfree(buf);
|
|
return (FALSE);
|
|
}
|
|
|
|
/*
|
|
* Strip -> strip for change in encoding.
|
|
*/
|
|
DECLAREcpFunc(cpDecodedStrips)
|
|
{
|
|
tsize_t stripsize = TIFFStripSize(in);
|
|
tdata_t buf = _TIFFmalloc(stripsize);
|
|
|
|
(void) imagewidth; (void) spp;
|
|
if (buf) {
|
|
tstrip_t s, ns = TIFFNumberOfStrips(in);
|
|
uint32 row = 0;
|
|
for (s = 0; s < ns; s++) {
|
|
tsize_t cc = (row + rowsperstrip > imagelength) ?
|
|
TIFFVStripSize(in, imagelength - row) : stripsize;
|
|
if (TIFFReadEncodedStrip(in, s, buf, cc) < 0 && !ignore)
|
|
break;
|
|
if (TIFFWriteEncodedStrip(out, s, buf, cc) < 0) {
|
|
_TIFFfree(buf);
|
|
return (FALSE);
|
|
}
|
|
row += rowsperstrip;
|
|
}
|
|
_TIFFfree(buf);
|
|
return (TRUE);
|
|
}
|
|
return (FALSE);
|
|
}
|
|
|
|
/*
|
|
* Separate -> separate by row for rows/strip change.
|
|
*/
|
|
DECLAREcpFunc(cpSeparate2SeparateByRow)
|
|
{
|
|
tdata_t buf = _TIFFmalloc(TIFFScanlineSize(in));
|
|
uint32 row;
|
|
tsample_t s;
|
|
|
|
(void) imagewidth;
|
|
for (s = 0; s < spp; s++) {
|
|
for (row = 0; row < imagelength; row++) {
|
|
if (TIFFReadScanline(in, buf, row, s) < 0 && !ignore)
|
|
goto done;
|
|
if (TIFFWriteScanline(out, buf, row, s) < 0)
|
|
goto bad;
|
|
}
|
|
}
|
|
done:
|
|
_TIFFfree(buf);
|
|
return (TRUE);
|
|
bad:
|
|
_TIFFfree(buf);
|
|
return (FALSE);
|
|
}
|
|
|
|
/*
|
|
* Contig -> separate by row.
|
|
*/
|
|
DECLAREcpFunc(cpContig2SeparateByRow)
|
|
{
|
|
tdata_t inbuf = _TIFFmalloc(TIFFScanlineSize(in));
|
|
tdata_t outbuf = _TIFFmalloc(TIFFScanlineSize(out));
|
|
register uint8 *inp, *outp;
|
|
register uint32 n;
|
|
uint32 row;
|
|
tsample_t s;
|
|
|
|
/* unpack channels */
|
|
for (s = 0; s < spp; s++) {
|
|
for (row = 0; row < imagelength; row++) {
|
|
if (TIFFReadScanline(in, inbuf, row, 0) < 0 && !ignore)
|
|
goto done;
|
|
inp = ((uint8*)inbuf) + s;
|
|
outp = (uint8*)outbuf;
|
|
for (n = imagewidth; n-- > 0;) {
|
|
*outp++ = *inp;
|
|
inp += spp;
|
|
}
|
|
if (TIFFWriteScanline(out, outbuf, row, s) < 0)
|
|
goto bad;
|
|
}
|
|
}
|
|
done:
|
|
if (inbuf) _TIFFfree(inbuf);
|
|
if (outbuf) _TIFFfree(outbuf);
|
|
return (TRUE);
|
|
bad:
|
|
if (inbuf) _TIFFfree(inbuf);
|
|
if (outbuf) _TIFFfree(outbuf);
|
|
return (FALSE);
|
|
}
|
|
|
|
/*
|
|
* Separate -> contig by row.
|
|
*/
|
|
DECLAREcpFunc(cpSeparate2ContigByRow)
|
|
{
|
|
tdata_t inbuf = _TIFFmalloc(TIFFScanlineSize(in));
|
|
tdata_t outbuf = _TIFFmalloc(TIFFScanlineSize(out));
|
|
register uint8 *inp, *outp;
|
|
register uint32 n;
|
|
uint32 row;
|
|
tsample_t s;
|
|
|
|
for (row = 0; row < imagelength; row++) {
|
|
/* merge channels */
|
|
for (s = 0; s < spp; s++) {
|
|
if (TIFFReadScanline(in, inbuf, row, s) < 0 && !ignore)
|
|
goto done;
|
|
inp = (uint8*)inbuf;
|
|
outp = ((uint8*)outbuf) + s;
|
|
for (n = imagewidth; n-- > 0;) {
|
|
*outp = *inp++;
|
|
outp += spp;
|
|
}
|
|
}
|
|
if (TIFFWriteScanline(out, outbuf, row, 0) < 0)
|
|
goto bad;
|
|
}
|
|
done:
|
|
if (inbuf) _TIFFfree(inbuf);
|
|
if (outbuf) _TIFFfree(outbuf);
|
|
return (TRUE);
|
|
bad:
|
|
if (inbuf) _TIFFfree(inbuf);
|
|
if (outbuf) _TIFFfree(outbuf);
|
|
return (FALSE);
|
|
}
|
|
|
|
static void
|
|
cpStripToTile(uint8* out, uint8* in,
|
|
uint32 rows, uint32 cols, int outskew, int inskew)
|
|
{
|
|
while (rows-- > 0) {
|
|
uint32 j = cols;
|
|
while (j-- > 0)
|
|
*out++ = *in++;
|
|
out += outskew;
|
|
in += inskew;
|
|
}
|
|
}
|
|
|
|
static void
|
|
cpContigBufToSeparateBuf(uint8* out, uint8* in,
|
|
uint32 rows, uint32 cols, int outskew, int inskew, tsample_t spp)
|
|
{
|
|
while (rows-- > 0) {
|
|
uint32 j = cols;
|
|
while (j-- > 0)
|
|
*out++ = *in, in += spp;
|
|
out += outskew;
|
|
in += inskew;
|
|
}
|
|
}
|
|
|
|
static void
|
|
cpSeparateBufToContigBuf(uint8* out, uint8* in,
|
|
uint32 rows, uint32 cols, int outskew, int inskew, tsample_t spp)
|
|
{
|
|
while (rows-- > 0) {
|
|
uint32 j = cols;
|
|
while (j-- > 0)
|
|
*out = *in++, out += spp;
|
|
out += outskew;
|
|
in += inskew;
|
|
}
|
|
}
|
|
|
|
static int
|
|
cpImage(TIFF* in, TIFF* out, readFunc fin, writeFunc fout,
|
|
uint32 imagelength, uint32 imagewidth, tsample_t spp)
|
|
{
|
|
int status = FALSE;
|
|
tdata_t buf = _TIFFmalloc(TIFFRasterScanlineSize(in) * imagelength);
|
|
if (buf) {
|
|
(*fin)(in, (uint8*)buf, imagelength, imagewidth, spp);
|
|
status = (fout)(out, (uint8*)buf, imagelength, imagewidth, spp);
|
|
_TIFFfree(buf);
|
|
}
|
|
return (status);
|
|
}
|
|
|
|
DECLAREreadFunc(readContigStripsIntoBuffer)
|
|
{
|
|
tsize_t scanlinesize = TIFFScanlineSize(in);
|
|
uint8* bufp = buf;
|
|
uint32 row;
|
|
|
|
(void) imagewidth; (void) spp;
|
|
for (row = 0; row < imagelength; row++) {
|
|
if (TIFFReadScanline(in, (tdata_t) bufp, row, 0) < 0 && !ignore)
|
|
break;
|
|
bufp += scanlinesize;
|
|
}
|
|
}
|
|
|
|
DECLAREreadFunc(readSeparateStripsIntoBuffer)
|
|
{
|
|
tsize_t scanlinesize = TIFFScanlineSize(in);
|
|
tdata_t scanline = _TIFFmalloc(scanlinesize);
|
|
|
|
(void) imagewidth;
|
|
if (scanline) {
|
|
uint8* bufp = (uint8*) buf;
|
|
uint32 row;
|
|
tsample_t s;
|
|
|
|
for (row = 0; row < imagelength; row++) {
|
|
/* merge channels */
|
|
for (s = 0; s < spp; s++) {
|
|
uint8* bp = bufp + s;
|
|
tsize_t n = scanlinesize;
|
|
|
|
if (TIFFReadScanline(in, scanline, row, s) < 0 && !ignore)
|
|
goto done;
|
|
while (n-- > 0)
|
|
*bp = *bufp++, bp += spp;
|
|
}
|
|
bufp += scanlinesize;
|
|
}
|
|
done:
|
|
_TIFFfree(scanline);
|
|
}
|
|
}
|
|
|
|
DECLAREreadFunc(readContigTilesIntoBuffer)
|
|
{
|
|
tdata_t tilebuf = _TIFFmalloc(TIFFTileSize(in));
|
|
uint32 imagew = TIFFScanlineSize(in);
|
|
uint32 tilew = TIFFTileRowSize(in);
|
|
int iskew = imagew - tilew;
|
|
uint8* bufp = (uint8*) buf;
|
|
uint32 tw, tl;
|
|
uint32 row;
|
|
|
|
(void) spp;
|
|
if (tilebuf == 0)
|
|
return;
|
|
(void) TIFFGetField(in, TIFFTAG_TILEWIDTH, &tw);
|
|
(void) TIFFGetField(in, TIFFTAG_TILELENGTH, &tl);
|
|
for (row = 0; row < imagelength; row += tl) {
|
|
uint32 nrow = (row+tl > imagelength) ? imagelength-row : tl;
|
|
uint32 colb = 0;
|
|
uint32 col;
|
|
|
|
for (col = 0; col < imagewidth; col += tw) {
|
|
if (TIFFReadTile(in, tilebuf, col, row, 0, 0) < 0 &&
|
|
!ignore)
|
|
goto done;
|
|
if (colb + tilew > imagew) {
|
|
uint32 width = imagew - colb;
|
|
uint32 oskew = tilew - width;
|
|
cpStripToTile(bufp + colb,
|
|
tilebuf, nrow, width,
|
|
oskew + iskew, oskew);
|
|
} else
|
|
cpStripToTile(bufp + colb,
|
|
tilebuf, nrow, tilew,
|
|
iskew, 0);
|
|
colb += tilew;
|
|
}
|
|
bufp += imagew * nrow;
|
|
}
|
|
done:
|
|
_TIFFfree(tilebuf);
|
|
}
|
|
|
|
DECLAREreadFunc(readSeparateTilesIntoBuffer)
|
|
{
|
|
uint32 imagew = TIFFScanlineSize(in);
|
|
uint32 tilew = TIFFTileRowSize(in);
|
|
int iskew = imagew - tilew;
|
|
tdata_t tilebuf = _TIFFmalloc(TIFFTileSize(in));
|
|
uint8* bufp = (uint8*) buf;
|
|
uint32 tw, tl;
|
|
uint32 row;
|
|
|
|
if (tilebuf == 0)
|
|
return;
|
|
(void) TIFFGetField(in, TIFFTAG_TILEWIDTH, &tw);
|
|
(void) TIFFGetField(in, TIFFTAG_TILELENGTH, &tl);
|
|
for (row = 0; row < imagelength; row += tl) {
|
|
uint32 nrow = (row+tl > imagelength) ? imagelength-row : tl;
|
|
uint32 colb = 0;
|
|
uint32 col;
|
|
|
|
for (col = 0; col < imagewidth; col += tw) {
|
|
tsample_t s;
|
|
|
|
for (s = 0; s < spp; s++) {
|
|
if (TIFFReadTile(in, tilebuf, col, row, 0, s) < 0 && !ignore)
|
|
goto done;
|
|
/*
|
|
* Tile is clipped horizontally. Calculate
|
|
* visible portion and skewing factors.
|
|
*/
|
|
if (colb + tilew > imagew) {
|
|
uint32 width = imagew - colb;
|
|
int oskew = tilew - width;
|
|
cpSeparateBufToContigBuf(bufp+colb+s,
|
|
tilebuf, nrow, width,
|
|
oskew + iskew, oskew, spp);
|
|
} else
|
|
cpSeparateBufToContigBuf(bufp+colb+s,
|
|
tilebuf, nrow, tw,
|
|
iskew, 0, spp);
|
|
}
|
|
colb += tilew;
|
|
}
|
|
bufp += imagew * nrow;
|
|
}
|
|
done:
|
|
_TIFFfree(tilebuf);
|
|
}
|
|
|
|
DECLAREwriteFunc(writeBufferToContigStrips)
|
|
{
|
|
uint32 row, rowsperstrip;
|
|
tstrip_t strip = 0;
|
|
|
|
(void) imagewidth; (void) spp;
|
|
(void) TIFFGetFieldDefaulted(out, TIFFTAG_ROWSPERSTRIP, &rowsperstrip);
|
|
for (row = 0; row < imagelength; row += rowsperstrip) {
|
|
uint32 nrows = (row+rowsperstrip > imagelength) ?
|
|
imagelength-row : rowsperstrip;
|
|
tsize_t stripsize = TIFFVStripSize(out, nrows);
|
|
if (TIFFWriteEncodedStrip(out, strip++, buf, stripsize) < 0)
|
|
return (FALSE);
|
|
row += rowsperstrip, buf += stripsize;
|
|
}
|
|
return (TRUE);
|
|
}
|
|
|
|
DECLAREwriteFunc(writeBufferToSeparateStrips)
|
|
{
|
|
uint32 rowsize = imagewidth * spp;
|
|
uint32 rowsperstrip;
|
|
tdata_t obuf = _TIFFmalloc(TIFFStripSize(out));
|
|
tstrip_t strip = 0;
|
|
tsample_t s;
|
|
|
|
if (obuf == NULL)
|
|
return (0);
|
|
(void) TIFFGetFieldDefaulted(out, TIFFTAG_ROWSPERSTRIP, &rowsperstrip);
|
|
for (s = 0; s < spp; s++) {
|
|
uint32 row;
|
|
for (row = 0; row < imagelength; row += rowsperstrip) {
|
|
uint32 nrows = (row+rowsperstrip > imagelength) ?
|
|
imagelength-row : rowsperstrip;
|
|
tsize_t stripsize = TIFFVStripSize(out, nrows);
|
|
|
|
cpContigBufToSeparateBuf(
|
|
obuf, (uint8*) buf + row*rowsize + s,
|
|
nrows, imagewidth, 0, 0, spp);
|
|
if (TIFFWriteEncodedStrip(out, strip++, obuf, stripsize) < 0) {
|
|
_TIFFfree(obuf);
|
|
return (FALSE);
|
|
}
|
|
}
|
|
}
|
|
_TIFFfree(obuf);
|
|
return (TRUE);
|
|
|
|
}
|
|
|
|
DECLAREwriteFunc(writeBufferToContigTiles)
|
|
{
|
|
uint32 imagew = TIFFScanlineSize(out);
|
|
uint32 tilew = TIFFTileRowSize(out);
|
|
int iskew = imagew - tilew;
|
|
tdata_t obuf = _TIFFmalloc(TIFFTileSize(out));
|
|
uint8* bufp = (uint8*) buf;
|
|
uint32 tl, tw;
|
|
uint32 row;
|
|
|
|
(void) spp;
|
|
if (obuf == NULL)
|
|
return (FALSE);
|
|
(void) TIFFGetField(out, TIFFTAG_TILELENGTH, &tl);
|
|
(void) TIFFGetField(out, TIFFTAG_TILEWIDTH, &tw);
|
|
for (row = 0; row < imagelength; row += tilelength) {
|
|
uint32 nrow = (row+tl > imagelength) ? imagelength-row : tl;
|
|
uint32 colb = 0;
|
|
uint32 col;
|
|
|
|
for (col = 0; col < imagewidth; col += tw) {
|
|
/*
|
|
* Tile is clipped horizontally. Calculate
|
|
* visible portion and skewing factors.
|
|
*/
|
|
if (colb + tilew > imagew) {
|
|
uint32 width = imagew - colb;
|
|
int oskew = tilew - width;
|
|
cpStripToTile(obuf, bufp + colb, nrow, width,
|
|
oskew, oskew + iskew);
|
|
} else
|
|
cpStripToTile(obuf, bufp + colb, nrow, tilew,
|
|
0, iskew);
|
|
if (TIFFWriteTile(out, obuf, col, row, 0, 0) < 0) {
|
|
_TIFFfree(obuf);
|
|
return (FALSE);
|
|
}
|
|
colb += tilew;
|
|
}
|
|
bufp += nrow * imagew;
|
|
}
|
|
_TIFFfree(obuf);
|
|
return (TRUE);
|
|
}
|
|
|
|
DECLAREwriteFunc(writeBufferToSeparateTiles)
|
|
{
|
|
uint32 imagew = TIFFScanlineSize(out);
|
|
tsize_t tilew = TIFFTileRowSize(out);
|
|
uint32 iimagew = TIFFRasterScanlineSize(out);
|
|
int iskew = iimagew - tilew*spp;
|
|
tdata_t obuf = _TIFFmalloc(TIFFTileSize(out));
|
|
uint8* bufp = (uint8*) buf;
|
|
uint32 tl, tw;
|
|
uint32 row;
|
|
|
|
if (obuf == NULL)
|
|
return (FALSE);
|
|
(void) TIFFGetField(out, TIFFTAG_TILELENGTH, &tl);
|
|
(void) TIFFGetField(out, TIFFTAG_TILEWIDTH, &tw);
|
|
for (row = 0; row < imagelength; row += tl) {
|
|
uint32 nrow = (row+tl > imagelength) ? imagelength-row : tl;
|
|
uint32 colb = 0;
|
|
uint32 col;
|
|
|
|
for (col = 0; col < imagewidth; col += tw) {
|
|
tsample_t s;
|
|
for (s = 0; s < spp; s++) {
|
|
/*
|
|
* Tile is clipped horizontally. Calculate
|
|
* visible portion and skewing factors.
|
|
*/
|
|
if (colb + tilew > imagew) {
|
|
uint32 width = imagew - colb;
|
|
int oskew = tilew - width;
|
|
|
|
cpContigBufToSeparateBuf(obuf,
|
|
bufp + (colb*spp) + s,
|
|
nrow, width,
|
|
oskew, (oskew*spp)+iskew, spp);
|
|
} else
|
|
cpContigBufToSeparateBuf(obuf,
|
|
bufp + (colb*spp) + s,
|
|
nrow, tilewidth,
|
|
0, iskew, spp);
|
|
if (TIFFWriteTile(out, obuf, col, row, 0, s) < 0) {
|
|
_TIFFfree(obuf);
|
|
return (FALSE);
|
|
}
|
|
}
|
|
colb += tilew;
|
|
}
|
|
bufp += nrow * iimagew;
|
|
}
|
|
_TIFFfree(obuf);
|
|
return (TRUE);
|
|
}
|
|
|
|
/*
|
|
* Contig strips -> contig tiles.
|
|
*/
|
|
DECLAREcpFunc(cpContigStrips2ContigTiles)
|
|
{
|
|
return cpImage(in, out,
|
|
readContigStripsIntoBuffer,
|
|
writeBufferToContigTiles,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Contig strips -> separate tiles.
|
|
*/
|
|
DECLAREcpFunc(cpContigStrips2SeparateTiles)
|
|
{
|
|
return cpImage(in, out,
|
|
readContigStripsIntoBuffer,
|
|
writeBufferToSeparateTiles,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Separate strips -> contig tiles.
|
|
*/
|
|
DECLAREcpFunc(cpSeparateStrips2ContigTiles)
|
|
{
|
|
return cpImage(in, out,
|
|
readSeparateStripsIntoBuffer,
|
|
writeBufferToContigTiles,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Separate strips -> separate tiles.
|
|
*/
|
|
DECLAREcpFunc(cpSeparateStrips2SeparateTiles)
|
|
{
|
|
return cpImage(in, out,
|
|
readSeparateStripsIntoBuffer,
|
|
writeBufferToSeparateTiles,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Contig strips -> contig tiles.
|
|
*/
|
|
DECLAREcpFunc(cpContigTiles2ContigTiles)
|
|
{
|
|
return cpImage(in, out,
|
|
readContigTilesIntoBuffer,
|
|
writeBufferToContigTiles,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Contig tiles -> separate tiles.
|
|
*/
|
|
DECLAREcpFunc(cpContigTiles2SeparateTiles)
|
|
{
|
|
return cpImage(in, out,
|
|
readContigTilesIntoBuffer,
|
|
writeBufferToSeparateTiles,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Separate tiles -> contig tiles.
|
|
*/
|
|
DECLAREcpFunc(cpSeparateTiles2ContigTiles)
|
|
{
|
|
return cpImage(in, out,
|
|
readSeparateTilesIntoBuffer,
|
|
writeBufferToContigTiles,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Separate tiles -> separate tiles (tile dimension change).
|
|
*/
|
|
DECLAREcpFunc(cpSeparateTiles2SeparateTiles)
|
|
{
|
|
return cpImage(in, out,
|
|
readSeparateTilesIntoBuffer,
|
|
writeBufferToSeparateTiles,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Contig tiles -> contig tiles (tile dimension change).
|
|
*/
|
|
DECLAREcpFunc(cpContigTiles2ContigStrips)
|
|
{
|
|
return cpImage(in, out,
|
|
readContigTilesIntoBuffer,
|
|
writeBufferToContigStrips,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Contig tiles -> separate strips.
|
|
*/
|
|
DECLAREcpFunc(cpContigTiles2SeparateStrips)
|
|
{
|
|
return cpImage(in, out,
|
|
readContigTilesIntoBuffer,
|
|
writeBufferToSeparateStrips,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Separate tiles -> contig strips.
|
|
*/
|
|
DECLAREcpFunc(cpSeparateTiles2ContigStrips)
|
|
{
|
|
return cpImage(in, out,
|
|
readSeparateTilesIntoBuffer,
|
|
writeBufferToContigStrips,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Separate tiles -> separate strips.
|
|
*/
|
|
DECLAREcpFunc(cpSeparateTiles2SeparateStrips)
|
|
{
|
|
return cpImage(in, out,
|
|
readSeparateTilesIntoBuffer,
|
|
writeBufferToSeparateStrips,
|
|
imagelength, imagewidth, spp);
|
|
}
|
|
|
|
/*
|
|
* Select the appropriate copy function to use.
|
|
*/
|
|
static copyFunc
|
|
pickCopyFunc(TIFF* in, TIFF* out, uint16 bitspersample, uint16 samplesperpixel)
|
|
{
|
|
uint16 shortv;
|
|
uint32 w, l, tw, tl;
|
|
int bychunk;
|
|
|
|
(void) TIFFGetField(in, TIFFTAG_PLANARCONFIG, &shortv);
|
|
if (shortv != config && bitspersample != 8 && samplesperpixel > 1) {
|
|
fprintf(stderr,
|
|
"%s: Can not handle different planar configuration w/ bits/sample != 8\n",
|
|
TIFFFileName(in));
|
|
return (NULL);
|
|
}
|
|
TIFFGetField(in, TIFFTAG_IMAGEWIDTH, &w);
|
|
TIFFGetField(in, TIFFTAG_IMAGELENGTH, &l);
|
|
if (TIFFIsTiled(out)) {
|
|
if (!TIFFGetField(in, TIFFTAG_TILEWIDTH, &tw))
|
|
tw = w;
|
|
if (!TIFFGetField(in, TIFFTAG_TILELENGTH, &tl))
|
|
tl = l;
|
|
bychunk = (tw == tilewidth && tl == tilelength);
|
|
} else if (TIFFIsTiled(in)) {
|
|
TIFFGetField(in, TIFFTAG_TILEWIDTH, &tw);
|
|
TIFFGetField(in, TIFFTAG_TILELENGTH, &tl);
|
|
bychunk = (tw == w && tl == rowsperstrip);
|
|
} else {
|
|
uint32 irps = (uint32) -1L;
|
|
TIFFGetField(in, TIFFTAG_ROWSPERSTRIP, &irps);
|
|
bychunk = (rowsperstrip == irps);
|
|
}
|
|
#define T 1
|
|
#define F 0
|
|
#define pack(a,b,c,d,e) ((long)(((a)<<11)|((b)<<3)|((c)<<2)|((d)<<1)|(e)))
|
|
switch(pack(shortv,config,TIFFIsTiled(in),TIFFIsTiled(out),bychunk)) {
|
|
/* Strips -> Tiles */
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_CONTIG, F,T,F):
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_CONTIG, F,T,T):
|
|
return cpContigStrips2ContigTiles;
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_SEPARATE, F,T,F):
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_SEPARATE, F,T,T):
|
|
return cpContigStrips2SeparateTiles;
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_CONTIG, F,T,F):
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_CONTIG, F,T,T):
|
|
return cpSeparateStrips2ContigTiles;
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_SEPARATE, F,T,F):
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_SEPARATE, F,T,T):
|
|
return cpSeparateStrips2SeparateTiles;
|
|
/* Tiles -> Tiles */
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_CONTIG, T,T,F):
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_CONTIG, T,T,T):
|
|
return cpContigTiles2ContigTiles;
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_SEPARATE, T,T,F):
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_SEPARATE, T,T,T):
|
|
return cpContigTiles2SeparateTiles;
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_CONTIG, T,T,F):
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_CONTIG, T,T,T):
|
|
return cpSeparateTiles2ContigTiles;
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_SEPARATE, T,T,F):
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_SEPARATE, T,T,T):
|
|
return cpSeparateTiles2SeparateTiles;
|
|
/* Tiles -> Strips */
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_CONTIG, T,F,F):
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_CONTIG, T,F,T):
|
|
return cpContigTiles2ContigStrips;
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_SEPARATE, T,F,F):
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_SEPARATE, T,F,T):
|
|
return cpContigTiles2SeparateStrips;
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_CONTIG, T,F,F):
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_CONTIG, T,F,T):
|
|
return cpSeparateTiles2ContigStrips;
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_SEPARATE, T,F,F):
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_SEPARATE, T,F,T):
|
|
return cpSeparateTiles2SeparateStrips;
|
|
/* Strips -> Strips */
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_CONTIG, F,F,F):
|
|
return cpContig2ContigByRow;
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_CONTIG, F,F,T):
|
|
return cpDecodedStrips;
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_SEPARATE, F,F,F):
|
|
case pack(PLANARCONFIG_CONTIG, PLANARCONFIG_SEPARATE, F,F,T):
|
|
return cpContig2SeparateByRow;
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_CONTIG, F,F,F):
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_CONTIG, F,F,T):
|
|
return cpSeparate2ContigByRow;
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_SEPARATE, F,F,F):
|
|
case pack(PLANARCONFIG_SEPARATE, PLANARCONFIG_SEPARATE, F,F,T):
|
|
return cpSeparate2SeparateByRow;
|
|
}
|
|
#undef pack
|
|
#undef F
|
|
#undef T
|
|
fprintf(stderr, "tiffcp: %s: Don't know how to copy/convert image.\n",
|
|
TIFFFileName(in));
|
|
return (NULL);
|
|
}
|