3 * Copyright (C) 2008 The Geeqie Team
5 * Author: Vladimir Nadvornik
7 * This software is released under the GNU General Public License (GNU GPL).
8 * Please read the included file COPYING for more information.
9 * This software comes with no warranty of any kind, use at your own risk!
18 #include <exiv2/image.hpp>
19 #include <exiv2/exif.hpp>
22 // EXIV2_TEST_VERSION is defined in Exiv2 0.15 and newer.
23 #ifndef EXIV2_TEST_VERSION
24 # define EXIV2_TEST_VERSION(major,minor,patch) \
25 ( EXIV2_VERSION >= EXIV2_MAKE_VERSION(major,minor,patch) )
29 #include <sys/types.h>
35 #include <exiv2/tiffparser.hpp>
36 #include <exiv2/tiffcomposite.hpp>
37 #include <exiv2/tiffvisitor.hpp>
38 #include <exiv2/tiffimage.hpp>
39 #include <exiv2/cr2image.hpp>
40 #include <exiv2/crwimage.hpp>
41 #if EXIV2_TEST_VERSION(0,16,0)
42 #include <exiv2/orfimage.hpp>
44 #if EXIV2_TEST_VERSION(0,13,0)
45 #include <exiv2/rafimage.hpp>
47 #include <exiv2/futils.hpp>
57 #include "filefilter.h"
58 #include "ui_fileops.h"
63 Exiv2::Image::AutoPtr image;
64 Exiv2::Image::AutoPtr sidecar;
65 Exiv2::ExifData::const_iterator exifIter; /* for exif_get_next_item */
66 Exiv2::IptcData::const_iterator iptcIter; /* for exif_get_next_item */
67 #if EXIV2_TEST_VERSION(0,16,0)
68 Exiv2::XmpData::const_iterator xmpIter; /* for exif_get_next_item */
72 /* the icc profile in jpeg is not technically exif - store it here */
73 unsigned char *cp_data;
76 _ExifData(gchar *path, gchar *sidecar_path)
81 gchar *pathl = path_from_utf8(path);
82 image = Exiv2::ImageFactory::open(pathl);
84 // g_assert (image.get() != 0);
85 image->readMetadata();
87 #if EXIV2_TEST_VERSION(0,16,0)
88 DEBUG_2("xmp count %li", image->xmpData().count());
89 if (sidecar_path && image->xmpData().empty())
91 gchar *sidecar_pathl = path_from_utf8(sidecar_path);
92 sidecar = Exiv2::ImageFactory::open(sidecar_pathl);
93 g_free(sidecar_pathl);
94 sidecar->readMetadata();
95 have_sidecar = sidecar->good();
96 DEBUG_2("sidecar xmp count %li", sidecar->xmpData().count());
100 #if EXIV2_TEST_VERSION(0,14,0)
101 if (image->mimeType() == std::string("image/jpeg"))
103 /* try to get jpeg color profile */
104 Exiv2::BasicIo &io = image->io();
105 gint open = io.isopen();
106 if (!open) io.open();
107 unsigned char *mapped = (unsigned char*)io.mmap();
108 if (mapped) exif_jpeg_parse_color(this, mapped, io.size());
110 if (!open) io.close();
117 if (cp_data) g_free(cp_data);
122 if (have_sidecar) sidecar->writeMetadata();
123 image->writeMetadata();
126 Exiv2::ExifData &exifData ()
128 return image->exifData();
131 Exiv2::IptcData &iptcData ()
133 return image->iptcData();
136 #if EXIV2_TEST_VERSION(0,16,0)
137 Exiv2::XmpData &xmpData ()
139 return have_sidecar ? sidecar->xmpData() : image->xmpData();
147 ExifData *exif_read(gchar *path, gchar *sidecar_path)
149 DEBUG_1("exif read %s, sidecar: %s", path, sidecar_path ? sidecar_path : "-");
151 return new ExifData(path, sidecar_path);
153 catch (Exiv2::AnyError& e) {
154 std::cout << "Caught Exiv2 exception '" << e << "'\n";
160 int exif_write(ExifData *exif)
163 exif->writeMetadata();
166 catch (Exiv2::AnyError& e) {
167 std::cout << "Caught Exiv2 exception '" << e << "'\n";
174 void exif_free(ExifData *exif)
180 ExifItem *exif_get_item(ExifData *exif, const gchar *key)
183 Exiv2::Metadatum *item = NULL;
185 Exiv2::ExifKey ekey(key);
186 Exiv2::ExifData::iterator pos = exif->exifData().findKey(ekey);
187 if (pos == exif->exifData().end()) return NULL;
190 catch (Exiv2::AnyError& e) {
192 Exiv2::IptcKey ekey(key);
193 Exiv2::IptcData::iterator pos = exif->iptcData().findKey(ekey);
194 if (pos == exif->iptcData().end()) return NULL;
197 catch (Exiv2::AnyError& e) {
198 #if EXIV2_TEST_VERSION(0,16,0)
199 Exiv2::XmpKey ekey(key);
200 Exiv2::XmpData::iterator pos = exif->xmpData().findKey(ekey);
201 if (pos == exif->xmpData().end()) return NULL;
206 return (ExifItem *)item;
208 catch (Exiv2::AnyError& e) {
209 std::cout << "Caught Exiv2 exception '" << e << "'\n";
214 ExifItem *exif_add_item(ExifData *exif, const gchar *key)
217 Exiv2::Metadatum *item = NULL;
219 Exiv2::ExifKey ekey(key);
220 exif->exifData().add(ekey, NULL);
221 Exiv2::ExifData::iterator pos = exif->exifData().end(); // a hack, there should be a better way to get the currently added item
225 catch (Exiv2::AnyError& e) {
227 Exiv2::IptcKey ekey(key);
228 exif->iptcData().add(ekey, NULL);
229 Exiv2::IptcData::iterator pos = exif->iptcData().end();
233 catch (Exiv2::AnyError& e) {
234 #if EXIV2_TEST_VERSION(0,16,0)
235 Exiv2::XmpKey ekey(key);
236 exif->xmpData().add(ekey, NULL);
237 Exiv2::XmpData::iterator pos = exif->xmpData().end();
243 return (ExifItem *)item;
245 catch (Exiv2::AnyError& e) {
246 std::cout << "Caught Exiv2 exception '" << e << "'\n";
252 ExifItem *exif_get_first_item(ExifData *exif)
255 exif->exifIter = exif->exifData().begin();
256 exif->iptcIter = exif->iptcData().begin();
257 #if EXIV2_TEST_VERSION(0,16,0)
258 exif->xmpIter = exif->xmpData().begin();
260 if (exif->exifIter != exif->exifData().end())
262 const Exiv2::Metadatum *item = &*exif->exifIter;
264 return (ExifItem *)item;
266 if (exif->iptcIter != exif->iptcData().end())
268 const Exiv2::Metadatum *item = &*exif->iptcIter;
270 return (ExifItem *)item;
272 #if EXIV2_TEST_VERSION(0,16,0)
273 if (exif->xmpIter != exif->xmpData().end())
275 const Exiv2::Metadatum *item = &*exif->xmpIter;
277 return (ExifItem *)item;
283 catch (Exiv2::AnyError& e) {
284 std::cout << "Caught Exiv2 exception '" << e << "'\n";
289 ExifItem *exif_get_next_item(ExifData *exif)
292 if (exif->exifIter != exif->exifData().end())
294 const Exiv2::Metadatum *item = &*exif->exifIter;
296 return (ExifItem *)item;
298 if (exif->iptcIter != exif->iptcData().end())
300 const Exiv2::Metadatum *item = &*exif->iptcIter;
302 return (ExifItem *)item;
304 #if EXIV2_TEST_VERSION(0,16,0)
305 if (exif->xmpIter != exif->xmpData().end())
307 const Exiv2::Metadatum *item = &*exif->xmpIter;
309 return (ExifItem *)item;
314 catch (Exiv2::AnyError& e) {
315 std::cout << "Caught Exiv2 exception '" << e << "'\n";
320 char *exif_item_get_tag_name(ExifItem *item)
323 if (!item) return NULL;
324 return g_strdup(((Exiv2::Metadatum *)item)->key().c_str());
326 catch (Exiv2::AnyError& e) {
327 std::cout << "Caught Exiv2 exception '" << e << "'\n";
332 guint exif_item_get_tag_id(ExifItem *item)
336 return ((Exiv2::Metadatum *)item)->tag();
338 catch (Exiv2::AnyError& e) {
339 std::cout << "Caught Exiv2 exception '" << e << "'\n";
344 guint exif_item_get_elements(ExifItem *item)
348 return ((Exiv2::Metadatum *)item)->count();
350 catch (Exiv2::AnyError& e) {
351 std::cout << "Caught Exiv2 exception '" << e << "'\n";
356 char *exif_item_get_data(ExifItem *item, guint *data_len)
360 Exiv2::Metadatum *md = (Exiv2::Metadatum *)item;
361 if(data_len) *data_len = md->size();
362 char *data = (char *)g_malloc(md->size());
363 long res = md->copy((Exiv2::byte *)data, Exiv2::littleEndian /* should not matter */);
364 g_assert(res == md->size());
367 catch (Exiv2::AnyError& e) {
368 std::cout << "Caught Exiv2 exception '" << e << "'\n";
373 char *exif_item_get_description(ExifItem *item)
376 if (!item) return NULL;
377 return g_strdup(((Exiv2::Metadatum *)item)->tagLabel().c_str());
379 catch (std::exception& e) {
380 // std::cout << "Caught Exiv2 exception '" << e << "'\n";
386 invalidTypeId, unsignedByte, asciiString, unsignedShort,
387 unsignedLong, unsignedRational, signedByte, undefined,
388 signedShort, signedLong, signedRational, string,
389 date, time, comment, directory,
390 xmpText, xmpAlt, xmpBag, xmpSeq,
394 static guint format_id_trans_tbl [] = {
396 EXIF_FORMAT_BYTE_UNSIGNED,
398 EXIF_FORMAT_SHORT_UNSIGNED,
399 EXIF_FORMAT_LONG_UNSIGNED,
400 EXIF_FORMAT_RATIONAL_UNSIGNED,
402 EXIF_FORMAT_UNDEFINED,
405 EXIF_FORMAT_RATIONAL,
409 EXIF_FORMAT_UNDEFINED,
418 guint exif_item_get_format_id(ExifItem *item)
421 if (!item) return EXIF_FORMAT_UNKNOWN;
422 guint id = ((Exiv2::Metadatum *)item)->typeId();
423 if (id >= (sizeof(format_id_trans_tbl) / sizeof(format_id_trans_tbl[0])) ) return EXIF_FORMAT_UNKNOWN;
424 return format_id_trans_tbl[id];
426 catch (Exiv2::AnyError& e) {
427 std::cout << "Caught Exiv2 exception '" << e << "'\n";
428 return EXIF_FORMAT_UNKNOWN;
432 const char *exif_item_get_format_name(ExifItem *item, gint brief)
435 if (!item) return NULL;
436 return ((Exiv2::Metadatum *)item)->typeName();
438 catch (Exiv2::AnyError& e) {
439 std::cout << "Caught Exiv2 exception '" << e << "'\n";
445 gchar *exif_item_get_data_as_text(ExifItem *item)
448 if (!item) return NULL;
449 // std::stringstream str; // does not work with Exiv2::Metadatum because operator<< is not virtual
450 // str << *((Exiv2::Metadatum *)item);
451 // return g_strdup(str.str().c_str());
452 return g_strdup(((Exiv2::Metadatum *)item)->toString().c_str());
454 catch (Exiv2::AnyError& e) {
459 gchar *exif_item_get_string(ExifItem *item, int idx)
462 if (!item) return NULL;
463 Exiv2::Metadatum *em = (Exiv2::Metadatum *)item;
464 #if EXIV2_TEST_VERSION(0,16,0)
465 std::string str = em->toString(idx);
467 std::string str = em->toString(); // FIXME
469 if (idx == 0 && str == "") str = em->toString();
470 if (str.length() > 5 && str.substr(0, 5) == "lang=")
472 std::string::size_type pos = str.find_first_of(' ');
473 if (pos != std::string::npos) str = str.substr(pos+1);
476 return g_strdup(str.c_str());
478 catch (Exiv2::AnyError& e) {
484 gint exif_item_get_integer(ExifItem *item, gint *value)
488 *value = ((Exiv2::Metadatum *)item)->toLong();
491 catch (Exiv2::AnyError& e) {
492 std::cout << "Caught Exiv2 exception '" << e << "'\n";
497 ExifRational *exif_item_get_rational(ExifItem *item, gint *sign)
500 if (!item) return NULL;
501 Exiv2::Rational v = ((Exiv2::Metadatum *)item)->toRational();
502 static ExifRational ret;
505 if (sign) *sign = (((Exiv2::Metadatum *)item)->typeId() == Exiv2::signedRational);
508 catch (Exiv2::AnyError& e) {
509 std::cout << "Caught Exiv2 exception '" << e << "'\n";
514 const gchar *exif_get_tag_description_by_key(const gchar *key)
517 Exiv2::ExifKey ekey(key);
518 return Exiv2::ExifTags::tagLabel(ekey.tag(), ekey.ifdId ());
520 catch (Exiv2::AnyError& e) {
521 std::cout << "Caught Exiv2 exception '" << e << "'\n";
526 int exif_item_set_string(ExifItem *item, const char *str)
530 ((Exiv2::Metadatum *)item)->setValue(std::string(str));
533 catch (Exiv2::AnyError& e) {
538 int exif_item_delete(ExifData *exif, ExifItem *item)
542 for (Exiv2::ExifData::iterator i = exif->exifData().begin(); i != exif->exifData().end(); ++i) {
543 if (((Exiv2::Metadatum *)item) == &*i) {
544 i = exif->exifData().erase(i);
548 for (Exiv2::IptcData::iterator i = exif->iptcData().begin(); i != exif->iptcData().end(); ++i) {
549 if (((Exiv2::Metadatum *)item) == &*i) {
550 i = exif->iptcData().erase(i);
554 #if EXIV2_TEST_VERSION(0,16,0)
555 for (Exiv2::XmpData::iterator i = exif->xmpData().begin(); i != exif->xmpData().end(); ++i) {
556 if (((Exiv2::Metadatum *)item) == &*i) {
557 i = exif->xmpData().erase(i);
564 catch (Exiv2::AnyError& e) {
569 void exif_add_jpeg_color_profile(ExifData *exif, unsigned char *cp_data, guint cp_length)
571 if (exif->cp_data) g_free(exif->cp_data);
572 exif->cp_data = cp_data;
573 exif->cp_length =cp_length;
576 unsigned char *exif_get_color_profile(ExifData *exif, guint *data_len)
580 if (data_len) *data_len = exif->cp_length;
581 return (unsigned char *) g_memdup(exif->cp_data, exif->cp_length);
583 ExifItem *prof_item = exif_get_item(exif, "Exif.Image.InterColorProfile");
584 if (prof_item && exif_item_get_format_id(prof_item) == EXIF_FORMAT_UNDEFINED)
585 return (unsigned char *) exif_item_get_data(prof_item, data_len);
593 /* This is a dirty hack to support raw file preview, bassed on
594 tiffparse.cpp from Exiv2 examples */
602 const Exiv2::Value *find(uint16_t tag, uint16_t group);
604 unsigned long preview_offset();
608 Exiv2::TiffComponent::AutoPtr rootDir;
609 Exiv2::byte *map_data;
611 unsigned long offset;
614 using namespace Exiv2;
616 RawFile::RawFile(int fd) : map_data(NULL), map_len(0), offset(0)
619 if (fstat(fd, &st) == -1)
623 map_len = st.st_size;
624 map_data = (Exiv2::byte *) mmap(0, map_len, PROT_READ, MAP_PRIVATE, fd, 0);
625 if (map_data == MAP_FAILED)
629 type = Exiv2::ImageFactory::getType(map_data, map_len);
631 #if EXIV2_TEST_VERSION(0,16,0)
632 TiffHeaderBase *tiffHeader = NULL;
634 TiffHeade2 *tiffHeader = NULL;
636 Cr2Header *cr2Header = NULL;
639 case Exiv2::ImageType::tiff:
640 tiffHeader = new TiffHeade2();
642 case Exiv2::ImageType::cr2:
643 cr2Header = new Cr2Header();
645 #if EXIV2_TEST_VERSION(0,16,0)
646 case Exiv2::ImageType::orf:
647 tiffHeader = new OrfHeader();
650 #if EXIV2_TEST_VERSION(0,13,0)
651 case Exiv2::ImageType::raf:
652 if (map_len < 84 + 4) throw Error(14);
653 offset = getULong(map_data + 84, bigEndian);
656 case Exiv2::ImageType::crw:
658 // Parse the image, starting with a CIFF header component
659 Exiv2::CiffHeader::AutoPtr parseTree(new Exiv2::CiffHeader);
660 parseTree->read(map_data, map_len);
661 CiffComponent *entry = parseTree->findComponent(0x2007, 0);
662 if (entry) offset = entry->pData() - map_data;
667 throw Error(3, "RAW");
670 // process tiff-like formats
672 TiffCompFactoryFct createFct = TiffCreator::create;
674 rootDir = createFct(Tag::root, Group::none);
675 if (0 == rootDir.get()) {
676 throw Error(1, "No root element defined in TIFF structure");
681 if (!tiffHeader->read(map_data, map_len)) throw Error(3, "TIFF");
682 #if EXIV2_TEST_VERSION(0,16,0)
683 rootDir->setStart(map_data + tiffHeader->offset());
685 rootDir->setStart(map_data + tiffHeader->ifdOffset());
691 rootDir->setStart(map_data + cr2Header->offset());
694 TiffRwState::AutoPtr state(new TiffRwState(tiffHeader ? tiffHeader->byteOrder() : littleEndian, 0, createFct));
696 TiffReader reader(map_data,
701 rootDir->accept(reader);
709 RawFile::~RawFile(void)
711 if (map_data && munmap(map_data, map_len) == -1)
713 printf("Failed to unmap file \n");
717 const Value * RawFile::find(uint16_t tag, uint16_t group)
719 TiffFinder finder(tag, group);
720 rootDir->accept(finder);
721 TiffEntryBase* te = dynamic_cast<TiffEntryBase*>(finder.result());
724 DEBUG_1("(tag: %04x %04x) ", tag, group);
731 unsigned long RawFile::preview_offset(void)
734 if (offset) return offset;
736 if (type == Exiv2::ImageType::cr2)
738 val = find(0x111, Group::ifd0);
739 if (val) return val->toLong();
744 val = find(0x201, Group::sub0_0);
745 if (val) return val->toLong();
747 val = find(0x201, Group::ifd0);
748 if (val) return val->toLong();
750 val = find(0x201, Group::ignr); // for PEF files, originally it was probably ifd2
751 if (val) return val->toLong();
753 val = find(0x111, Group::sub0_1); // dng
754 if (val) return val->toLong();
760 extern "C" gint format_raw_img_exif_offsets_fd(int fd, const gchar *path,
761 unsigned char *header_data, const guint header_len,
762 guint *image_offset, guint *exif_offset)
765 unsigned long offset;
767 /* given image pathname, first do simple (and fast) file extension test */
768 if (!filter_file_class(path, FORMAT_CLASS_RAWIMAGE)) return 0;
772 offset = rf.preview_offset();
773 DEBUG_1("%s: offset %lu", path, offset);
775 catch (Exiv2::AnyError& e) {
776 std::cout << "Caught Exiv2 exception '" << e << "'\n";
780 if (image_offset && offset > 0)
782 *image_offset = offset;
783 if ((unsigned long) lseek(fd, *image_offset, SEEK_SET) != *image_offset)
785 printf("Failed to seek to embedded image\n");
788 if (*exif_offset) *exif_offset = 0;