310 lines
9.1 KiB
C
310 lines
9.1 KiB
C
/*
|
|
* Copyright (c) 2004, Andrey Kiselev <dron@ak4719.spb.edu>
|
|
*
|
|
* 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.
|
|
*/
|
|
|
|
/*
|
|
* TIFF Library
|
|
*
|
|
* Functions to test strip interface of libtiff.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include "tiffio.h"
|
|
|
|
int write_strips(TIFF *tif, const tdata_t array, const tsize_t size)
|
|
{
|
|
tstrip_t strip, nstrips;
|
|
tsize_t stripsize, offset;
|
|
|
|
stripsize = TIFFStripSize(tif);
|
|
if (!stripsize)
|
|
{
|
|
fprintf(stderr, "Wrong size of strip.\n");
|
|
return -1;
|
|
}
|
|
|
|
nstrips = TIFFNumberOfStrips(tif);
|
|
for (offset = 0, strip = 0; offset < size && strip < nstrips;
|
|
offset += stripsize, strip++)
|
|
{
|
|
/*
|
|
* Properly write last strip.
|
|
*/
|
|
tsize_t bufsize = size - offset;
|
|
if (bufsize > stripsize)
|
|
bufsize = stripsize;
|
|
|
|
if (TIFFWriteEncodedStrip(tif, strip, (char *)array + offset,
|
|
bufsize) != bufsize)
|
|
{
|
|
fprintf(stderr, "Can't write strip %" PRIu32 ".\n", strip);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
int read_strips(TIFF *tif, const tdata_t array, const tsize_t size)
|
|
{
|
|
tstrip_t strip, nstrips;
|
|
tsize_t stripsize, offset;
|
|
tdata_t buf = NULL;
|
|
|
|
stripsize = TIFFStripSize(tif);
|
|
if (!stripsize)
|
|
{
|
|
fprintf(stderr, "Wrong size of strip.\n");
|
|
return -1;
|
|
}
|
|
|
|
buf = _TIFFmalloc(stripsize);
|
|
if (!buf)
|
|
{
|
|
fprintf(stderr, "Can't allocate space for strip buffer.\n");
|
|
return -1;
|
|
}
|
|
|
|
nstrips = TIFFNumberOfStrips(tif);
|
|
for (offset = 0, strip = 0; offset < size && strip < nstrips;
|
|
offset += stripsize, strip++)
|
|
{
|
|
/*
|
|
* Properly read last strip.
|
|
*/
|
|
tsize_t bufsize = size - offset;
|
|
if (bufsize > stripsize)
|
|
bufsize = stripsize;
|
|
|
|
if (TIFFReadEncodedStrip(tif, strip, buf, -1) != bufsize)
|
|
{
|
|
fprintf(stderr, "Can't read strip %" PRIu32 ".\n", strip);
|
|
return -1;
|
|
}
|
|
if (memcmp(buf, (char *)array + offset, bufsize) != 0)
|
|
{
|
|
fprintf(stderr, "Wrong data read for strip %" PRIu32 ".\n", strip);
|
|
_TIFFfree(buf);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
_TIFFfree(buf);
|
|
|
|
return 0;
|
|
}
|
|
|
|
int create_image_striped(const char *name, uint32_t width, uint32_t length,
|
|
uint32_t rowsperstrip, uint16_t compression,
|
|
uint16_t spp, uint16_t bps, uint16_t photometric,
|
|
uint16_t sampleformat, uint16_t planarconfig,
|
|
const tdata_t array, const tsize_t size)
|
|
{
|
|
TIFF *tif;
|
|
|
|
/* Test whether we can write tags. */
|
|
tif = TIFFOpen(name, "w");
|
|
if (!tif)
|
|
goto openfailure;
|
|
|
|
if (!TIFFSetField(tif, TIFFTAG_IMAGEWIDTH, width))
|
|
{
|
|
fprintf(stderr, "Can't set ImageWidth tag.\n");
|
|
goto failure;
|
|
}
|
|
if (!TIFFSetField(tif, TIFFTAG_IMAGELENGTH, length))
|
|
{
|
|
fprintf(stderr, "Can't set ImageLength tag.\n");
|
|
goto failure;
|
|
}
|
|
if (!TIFFSetField(tif, TIFFTAG_BITSPERSAMPLE, bps))
|
|
{
|
|
fprintf(stderr, "Can't set BitsPerSample tag.\n");
|
|
goto failure;
|
|
}
|
|
if (!TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL, spp))
|
|
{
|
|
fprintf(stderr, "Can't set SamplesPerPixel tag.\n");
|
|
goto failure;
|
|
}
|
|
if (!TIFFSetField(tif, TIFFTAG_ROWSPERSTRIP, rowsperstrip))
|
|
{
|
|
fprintf(stderr, "Can't set RowsPerStrip tag.\n");
|
|
goto failure;
|
|
}
|
|
if (!TIFFSetField(tif, TIFFTAG_PLANARCONFIG, planarconfig))
|
|
{
|
|
fprintf(stderr, "Can't set PlanarConfiguration tag.\n");
|
|
goto failure;
|
|
}
|
|
if (!TIFFSetField(tif, TIFFTAG_PHOTOMETRIC, photometric))
|
|
{
|
|
fprintf(stderr, "Can't set PhotometricInterpretation tag.\n");
|
|
goto failure;
|
|
}
|
|
|
|
if (write_strips(tif, array, size) < 0)
|
|
{
|
|
fprintf(stderr, "Can't write image data.\n");
|
|
goto failure;
|
|
}
|
|
|
|
TIFFClose(tif);
|
|
return 0;
|
|
|
|
failure:
|
|
TIFFClose(tif);
|
|
openfailure:
|
|
fprintf(stderr,
|
|
"Can't create test TIFF file %s:\n"
|
|
" ImageWidth=%" PRIu32 ", ImageLength=%" PRIu32
|
|
", RowsPerStrip=%" PRIu32 ", Compression=%" PRIu16 ",\n"
|
|
" BitsPerSample=%" PRIu16 ", SamplesPerPixel=%" PRIu16
|
|
", SampleFormat=%" PRIu16 ",\n"
|
|
" PlanarConfiguration=%" PRIu16
|
|
", PhotometricInterpretation=%" PRIu16 ".\n",
|
|
name, width, length, rowsperstrip, compression, bps, spp,
|
|
sampleformat, planarconfig, photometric);
|
|
return -1;
|
|
}
|
|
|
|
int read_image_striped(const char *name, uint32_t width, uint32_t length,
|
|
uint32_t rowsperstrip, uint16_t compression,
|
|
uint16_t spp, uint16_t bps, uint16_t photometric,
|
|
uint16_t sampleformat, uint16_t planarconfig,
|
|
const tdata_t array, const tsize_t size)
|
|
{
|
|
TIFF *tif;
|
|
uint16_t value_u16;
|
|
uint32_t value_u32;
|
|
|
|
/* Test whether we can read written values. */
|
|
tif = TIFFOpen(name, "r");
|
|
if (!tif)
|
|
goto openfailure;
|
|
|
|
if (TIFFIsTiled(tif))
|
|
{
|
|
fprintf(stderr, "Can't read image %s, it is tiled.\n", name);
|
|
goto failure;
|
|
}
|
|
if (!TIFFGetField(tif, TIFFTAG_IMAGEWIDTH, &value_u32) ||
|
|
value_u32 != width)
|
|
{
|
|
fprintf(stderr, "Can't get tag %d.\n", TIFFTAG_IMAGEWIDTH);
|
|
goto failure;
|
|
}
|
|
if (!TIFFGetField(tif, TIFFTAG_IMAGELENGTH, &value_u32) ||
|
|
value_u32 != length)
|
|
{
|
|
fprintf(stderr, "Can't get tag %d.\n", TIFFTAG_IMAGELENGTH);
|
|
goto failure;
|
|
}
|
|
if (!TIFFGetField(tif, TIFFTAG_BITSPERSAMPLE, &value_u16) ||
|
|
value_u16 != bps)
|
|
{
|
|
fprintf(stderr, "Can't get tag %d.\n", TIFFTAG_BITSPERSAMPLE);
|
|
goto failure;
|
|
}
|
|
if (!TIFFGetField(tif, TIFFTAG_PHOTOMETRIC, &value_u16) ||
|
|
value_u16 != photometric)
|
|
{
|
|
fprintf(stderr, "Can't get tag %d.\n", TIFFTAG_PHOTOMETRIC);
|
|
goto failure;
|
|
}
|
|
if (!TIFFGetField(tif, TIFFTAG_SAMPLESPERPIXEL, &value_u16) ||
|
|
value_u16 != spp)
|
|
{
|
|
fprintf(stderr, "Can't get tag %d.\n", TIFFTAG_SAMPLESPERPIXEL);
|
|
goto failure;
|
|
}
|
|
if (!TIFFGetField(tif, TIFFTAG_ROWSPERSTRIP, &value_u32) ||
|
|
value_u32 != rowsperstrip)
|
|
{
|
|
fprintf(stderr, "Can't get tag %d.\n", TIFFTAG_ROWSPERSTRIP);
|
|
goto failure;
|
|
}
|
|
if (!TIFFGetField(tif, TIFFTAG_PLANARCONFIG, &value_u16) ||
|
|
value_u16 != planarconfig)
|
|
{
|
|
fprintf(stderr, "Can't get tag %d.\n", TIFFTAG_PLANARCONFIG);
|
|
goto failure;
|
|
}
|
|
|
|
if (read_strips(tif, array, size) < 0)
|
|
{
|
|
fprintf(stderr, "Can't read image data.\n");
|
|
goto failure;
|
|
}
|
|
|
|
TIFFClose(tif);
|
|
return 0;
|
|
|
|
failure:
|
|
TIFFClose(tif);
|
|
openfailure:
|
|
fprintf(stderr,
|
|
"Can't read test TIFF file %s:\n"
|
|
" ImageWidth=%" PRIu32 ", ImageLength=%" PRIu32
|
|
", RowsPerStrip=%" PRIu32 ", Compression=%" PRIu16 ",\n"
|
|
" BitsPerSample=%" PRIu16 ", SamplesPerPixel=%" PRIu16
|
|
", SampleFormat=%" PRIu16 ",\n"
|
|
" PlanarConfiguration=%" PRIu16
|
|
", PhotometricInterpretation=%" PRIu16 ".\n",
|
|
name, width, length, rowsperstrip, compression, bps, spp,
|
|
sampleformat, planarconfig, photometric);
|
|
return -1;
|
|
}
|
|
|
|
int write_scanlines(TIFF *tif, const tdata_t array, const tsize_t size)
|
|
{
|
|
uint32_t length, row;
|
|
tsize_t scanlinesize, offset;
|
|
(void)size;
|
|
|
|
if (!TIFFGetField(tif, TIFFTAG_IMAGELENGTH, &length))
|
|
{
|
|
fprintf(stderr, "Can't get tag %d.\n", TIFFTAG_IMAGELENGTH);
|
|
return -1;
|
|
}
|
|
|
|
scanlinesize = TIFFScanlineSize(tif);
|
|
if (!scanlinesize)
|
|
{
|
|
fprintf(stderr, "Wrong size of scanline.\n");
|
|
return -1;
|
|
}
|
|
|
|
for (offset = 0, row = 0; row < length; offset += scanlinesize, row++)
|
|
{
|
|
if (TIFFWriteScanline(tif, (char *)array + offset, row, 0) == -1)
|
|
{
|
|
fprintf(stderr, "Can't write image data at row %" PRIu32 ".\n",
|
|
row);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|