bool
TIFFOutput::write_exif_data ()
{
#if defined(TIFF_VERSION_BIG) && TIFFLIB_VERSION >= 20120922
// Older versions of libtiff do not support writing Exif directories
// First, see if we have any Exif data at all
bool any_exif = false;
for (size_t i = 0, e = m_spec.extra_attribs.size(); i < e; ++i) {
const ImageIOParameter &p (m_spec.extra_attribs[i]);
int tag, tifftype, count;
if (exif_tag_lookup (p.name(), tag, tifftype, count) &&
tifftype != TIFF_NOTYPE) {
if (tag == EXIFTAG_SECURITYCLASSIFICATION ||
tag == EXIFTAG_IMAGEHISTORY ||
tag == EXIFTAG_ISOSPEEDRATINGS)
continue; // libtiff doesn't understand these
any_exif = true;
break;
}
}
if (! any_exif)
return true;
// First, finish writing the current directory
if (! TIFFWriteDirectory (m_tif)) {
error ("failed TIFFWriteDirectory()");
return false;
}
// Create an Exif directory
if (TIFFCreateEXIFDirectory (m_tif) != 0) {
error ("failed TIFFCreateEXIFDirectory()");
return false;
}
for (size_t i = 0, e = m_spec.extra_attribs.size(); i < e; ++i) {
const ImageIOParameter &p (m_spec.extra_attribs[i]);
int tag, tifftype, count;
if (exif_tag_lookup (p.name(), tag, tifftype, count) &&
tifftype != TIFF_NOTYPE) {
if (tag == EXIFTAG_SECURITYCLASSIFICATION ||
tag == EXIFTAG_IMAGEHISTORY ||
tag == EXIFTAG_ISOSPEEDRATINGS)
continue; // libtiff doesn't understand these
bool ok = false;
if (tifftype == TIFF_ASCII) {
ok = TIFFSetField (m_tif, tag, *(char**)p.data());
} else if ((tifftype == TIFF_SHORT || tifftype == TIFF_LONG) &&
p.type() == TypeDesc::SHORT) {
ok = TIFFSetField (m_tif, tag, (int)*(short *)p.data());
} else if ((tifftype == TIFF_SHORT || tifftype == TIFF_LONG) &&
p.type() == TypeDesc::INT) {
ok = TIFFSetField (m_tif, tag, *(int *)p.data());
} else if ((tifftype == TIFF_RATIONAL || tifftype == TIFF_SRATIONAL) &&
p.type() == TypeDesc::FLOAT) {
ok = TIFFSetField (m_tif, tag, *(float *)p.data());
} else if ((tifftype == TIFF_RATIONAL || tifftype == TIFF_SRATIONAL) &&
p.type() == TypeDesc::DOUBLE) {
ok = TIFFSetField (m_tif, tag, *(double *)p.data());
}
if (! ok) {
// std::cout << "Unhandled EXIF " << p.name() << " " << p.type() << "\n";
}
}
}
// Now write the directory of Exif data
uint64 dir_offset = 0;
if (! TIFFWriteCustomDirectory (m_tif, &dir_offset)) {
error ("failed TIFFWriteCustomDirectory() of the Exif data");
return false;
}
// Go back to the first directory, and add the EXIFIFD pointer.
// std::cout << "diffdir = " << tiffdir << "\n";
TIFFSetDirectory (m_tif, 0);
TIFFSetField (m_tif, TIFFTAG_EXIFIFD, dir_offset);
#endif
return true; // all is ok
}
bool
TIFFOutput::write_exif_data ()
{
#if defined(TIFF_VERSION_BIG) && TIFFLIB_VERSION >= 20120922
// Older versions of libtiff do not support writing Exif directories
if (m_spec.get_int_attribute ("tiff:write_exif", 1) == 0) {
// The special metadata "tiff:write_exif", if present and set to 0
// (the default is 1), will cause us to skip outputting Exif data.
// This is useful in cases where we think the TIFF file will need to
// be read by an app that links against an old version of libtiff
// that will have trouble reading the Exif directory.
return true;
}
// First, see if we have any Exif data at all
bool any_exif = false;
for (size_t i = 0, e = m_spec.extra_attribs.size(); i < e; ++i) {
const ImageIOParameter &p (m_spec.extra_attribs[i]);
int tag, tifftype, count;
if (exif_tag_lookup (p.name(), tag, tifftype, count) &&
tifftype != TIFF_NOTYPE) {
if (tag == EXIFTAG_SECURITYCLASSIFICATION ||
tag == EXIFTAG_IMAGEHISTORY ||
tag == EXIFTAG_ISOSPEEDRATINGS)
continue; // libtiff doesn't understand these
any_exif = true;
break;
}
}
if (! any_exif)
return true;
if (m_compression == COMPRESSION_JPEG) {
// For reasons we don't understand, JPEG-compressed TIFF seems
// to not output properly without a directory checkpoint here.
TIFFCheckpointDirectory (m_tif);
}
// First, finish writing the current directory
if (! TIFFWriteDirectory (m_tif)) {
error ("failed TIFFWriteDirectory()");
return false;
}
// Create an Exif directory
if (TIFFCreateEXIFDirectory (m_tif) != 0) {
error ("failed TIFFCreateEXIFDirectory()");
return false;
}
for (size_t i = 0, e = m_spec.extra_attribs.size(); i < e; ++i) {
const ImageIOParameter &p (m_spec.extra_attribs[i]);
int tag, tifftype, count;
if (exif_tag_lookup (p.name(), tag, tifftype, count) &&
tifftype != TIFF_NOTYPE) {
if (tag == EXIFTAG_SECURITYCLASSIFICATION ||
tag == EXIFTAG_IMAGEHISTORY ||
tag == EXIFTAG_ISOSPEEDRATINGS)
continue; // libtiff doesn't understand these
bool ok = false;
if (tifftype == TIFF_ASCII) {
ok = TIFFSetField (m_tif, tag, *(char**)p.data());
} else if ((tifftype == TIFF_SHORT || tifftype == TIFF_LONG) &&
p.type() == TypeDesc::SHORT) {
ok = TIFFSetField (m_tif, tag, (int)*(short *)p.data());
} else if ((tifftype == TIFF_SHORT || tifftype == TIFF_LONG) &&
p.type() == TypeDesc::INT) {
ok = TIFFSetField (m_tif, tag, *(int *)p.data());
} else if ((tifftype == TIFF_RATIONAL || tifftype == TIFF_SRATIONAL) &&
p.type() == TypeDesc::FLOAT) {
ok = TIFFSetField (m_tif, tag, *(float *)p.data());
} else if ((tifftype == TIFF_RATIONAL || tifftype == TIFF_SRATIONAL) &&
p.type() == TypeDesc::DOUBLE) {
ok = TIFFSetField (m_tif, tag, *(double *)p.data());
}
if (! ok) {
// std::cout << "Unhandled EXIF " << p.name() << " " << p.type() << "\n";
}
}
}
// Now write the directory of Exif data
uint64 dir_offset = 0;
if (! TIFFWriteCustomDirectory (m_tif, &dir_offset)) {
error ("failed TIFFWriteCustomDirectory() of the Exif data");
return false;
}
// Go back to the first directory, and add the EXIFIFD pointer.
// std::cout << "diffdir = " << tiffdir << "\n";
TIFFSetDirectory (m_tif, 0);
TIFFSetField (m_tif, TIFFTAG_EXIFIFD, dir_offset);
#endif
return true; // all is ok
}
int
main()
{
TIFF *tif;
unsigned char buf[SPP] = { 0, 127, 255 };
uint64 dir_offset = 0, dir_offset2 = 0;
uint64 read_dir_offset = 0, read_dir_offset2 = 0;
uint64 *dir_offset2_ptr = NULL;
char *ascii_value;
uint16 count16 = 0;
/* We write the main directory as a simple image. */
tif = TIFFOpen(filename, "w+");
if (!tif) {
fprintf (stderr, "Can't create test TIFF file %s.\n", filename);
return 1;
}
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, rows_per_strip)) {
fprintf (stderr, "Can't set SamplesPerPixel 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;
}
/* Write dummy pixel data. */
if (TIFFWriteScanline(tif, buf, 0, 0) == -1) {
fprintf (stderr, "Can't write image data.\n");
goto failure;
}
if (!TIFFWriteDirectory( tif )) {
fprintf (stderr, "TIFFWriteDirectory() failed.\n");
goto failure;
}
/*
* Now create an EXIF directory.
*/
if (TIFFCreateEXIFDirectory(tif) != 0) {
fprintf (stderr, "TIFFCreateEXIFDirectory() failed.\n" );
goto failure;
}
if (!TIFFSetField( tif, EXIFTAG_SPECTRALSENSITIVITY, "EXIF Spectral Sensitivity")) {
fprintf (stderr, "Can't write SPECTRALSENSITIVITY\n" );
goto failure;
}
if (!TIFFWriteCustomDirectory( tif, &dir_offset )) {
fprintf (stderr, "TIFFWriteCustomDirectory() with EXIF failed.\n");
goto failure;
}
/*
* Now create a custom directory with tags that conflict with mainline
* TIFF tags.
*/
TIFFFreeDirectory( tif );
if (TIFFCreateCustomDirectory(tif, &customFieldArray) != 0) {
fprintf (stderr, "TIFFCreateEXIFDirectory() failed.\n" );
goto failure;
}
if (!TIFFSetField( tif, TIFFTAG_IMAGEWIDTH, "*Custom1")) { /* not really IMAGEWIDTH */
fprintf (stderr, "Can't write pseudo-IMAGEWIDTH.\n" );
goto failure;
}
if (!TIFFSetField( tif, TIFFTAG_DOTRANGE, "*Custom2")) { /* not really DOTWIDTH */
fprintf (stderr, "Can't write pseudo-DOTWIDTH.\n" );
goto failure;
}
if (!TIFFWriteCustomDirectory( tif, &dir_offset2 )) {
fprintf (stderr, "TIFFWriteCustomDirectory() with EXIF failed.\n");
goto failure;
}
/*
* Go back to the first directory, and add the EXIFIFD pointer.
*/
TIFFSetDirectory(tif, 0);
TIFFSetField(tif, TIFFTAG_EXIFIFD, dir_offset );
TIFFSetField(tif, TIFFTAG_SUBIFD, 1, &dir_offset2 );
TIFFClose(tif);
/* Ok, now test whether we can read written values in the EXIF directory. */
tif = TIFFOpen(filename, "r");
TIFFGetField(tif, TIFFTAG_EXIFIFD, &read_dir_offset );
if( read_dir_offset != dir_offset ) {
fprintf (stderr, "Did not get expected EXIFIFD.\n" );
goto failure;
}
TIFFGetField(tif, TIFFTAG_SUBIFD, &count16, &dir_offset2_ptr );
read_dir_offset2 = dir_offset2_ptr[0];
if( read_dir_offset2 != dir_offset2 || count16 != 1) {
fprintf (stderr, "Did not get expected SUBIFD.\n" );
goto failure;
}
if( !TIFFReadEXIFDirectory(tif, read_dir_offset) ) {
fprintf (stderr, "TIFFReadEXIFDirectory() failed.\n" );
goto failure;
}
if (!TIFFGetField( tif, EXIFTAG_SPECTRALSENSITIVITY, &ascii_value) ) {
fprintf (stderr, "reading SPECTRALSENSITIVITY failed.\n" );
goto failure;
}
if( strcmp(ascii_value,"EXIF Spectral Sensitivity") != 0) {
fprintf (stderr, "got wrong SPECTRALSENSITIVITY value.\n" );
goto failure;
}
/* Try reading the Custom directory */
if( !TIFFReadCustomDirectory(tif, read_dir_offset2, &customFieldArray) ) {
fprintf (stderr, "TIFFReadCustomDirectory() failed.\n" );
goto failure;
}
if (!TIFFGetField( tif, TIFFTAG_IMAGEWIDTH, &ascii_value) ) {
fprintf (stderr, "reading pseudo-IMAGEWIDTH failed.\n" );
goto failure;
}
if( strcmp(ascii_value,"*Custom1") != 0) {
fprintf (stderr, "got wrong pseudo-IMAGEWIDTH value.\n" );
goto failure;
}
if (!TIFFGetField( tif, TIFFTAG_DOTRANGE, &ascii_value) ) {
fprintf (stderr, "reading pseudo-DOTRANGE failed.\n" );
goto failure;
}
if( strcmp(ascii_value,"*Custom2") != 0) {
fprintf (stderr, "got wrong pseudo-DOTRANGE value.\n" );
goto failure;
}
TIFFClose(tif);
/* All tests passed; delete file and exit with success status. */
unlink(filename);
return 0;
failure:
/*
* Something goes wrong; close file and return unsuccessful status.
* Do not remove the file for further manual investigation.
*/
TIFFClose(tif);
return 1;
}
