3 * Copyright © 2001 Lutz Müller <lutz@users.sourceforge.net>
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2 of the License, or (at your option) any later version.
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the
17 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18 * Boston, MA 02111-1307, USA.
22 #include "exif-mnote-data.h"
24 #include "exif-data.h"
26 #include "exif-mnote-data-priv.h"
27 #include "exif-utils.h"
28 #include "exif-loader.h"
29 #include "jpeg-marker.h"
30 #include <libexif/exif-log.h>
32 #include <libexif/olympus/exif-mnote-data-olympus.h>
33 #include <libexif/canon/exif-mnote-data-canon.h>
34 #include <libexif/pentax/exif-mnote-data-pentax.h>
41 #define MAX(a, b) (((a) > (b)) ? (a) : (b))
45 static const unsigned char ExifHeader[] = {0x45, 0x78, 0x69, 0x66, 0x00, 0x00};
47 struct _ExifDataPrivate
55 unsigned int ref_count;
57 /* Temporarily used while loading data */
58 unsigned int offset_mnote;
62 exif_data_alloc (ExifData *data, unsigned int i)
66 /* This is the only call to calloc in this file. */
70 if (data) EXIF_LOG_NO_MEMORY (data->priv->log, "ExifData", i);
75 exif_data_get_mnote_data (ExifData *d)
77 return (d && d->priv) ? d->priv->md : NULL;
86 data = exif_data_alloc (NULL, sizeof (ExifData));
87 if (!data) return (NULL);
88 data->priv = exif_data_alloc (data, sizeof (ExifDataPrivate));
89 if (!data->priv) { free (data); return (NULL); }
90 data->priv->ref_count = 1;
92 for (i = 0; i < EXIF_IFD_COUNT; i++) {
93 data->ifd[i] = exif_content_new ();
95 exif_data_free (data);
98 data->ifd[i]->parent = data;
105 exif_data_new_from_data (const unsigned char *data, unsigned int size)
109 edata = exif_data_new ();
110 exif_data_load_data (edata, data, size);
115 exif_data_load_data_entry (ExifData *data, ExifEntry *entry,
116 const unsigned char *d,
117 unsigned int size, unsigned int offset)
119 unsigned int s, doff;
121 entry->tag = exif_get_short (d + offset + 0, data->priv->order);
122 entry->format = exif_get_short (d + offset + 2, data->priv->order);
123 entry->components = exif_get_long (d + offset + 4, data->priv->order);
125 exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG, "ExifData",
126 "Loading entry 0x%x ('%s')...", entry->tag,
127 exif_tag_get_name (entry->tag));
130 * Size? If bigger than 4 bytes, the actual data is not
131 * in the entry but somewhere else (offset).
133 s = exif_format_get_size (entry->format) * entry->components;
137 doff = exif_get_long (d + offset + 8, data->priv->order);
145 entry->data = exif_data_alloc (data, s);
148 memcpy (entry->data, d + doff, s);
151 /* If this is the MakerNote, remember the offset */
152 if (entry->tag == EXIF_TAG_MAKER_NOTE) {
153 if (entry->size > 6) exif_log (data->priv->log,
154 EXIF_LOG_CODE_DEBUG, "ExifData",
155 "MakerNote found (%02x %02x %02x %02x "
156 "%02x %02x %02x...).",
157 entry->data[0], entry->data[1], entry->data[2],
158 entry->data[3], entry->data[4], entry->data[5],
160 data->priv->offset_mnote = doff;
163 exif_entry_fix (entry);
167 exif_data_save_data_entry (ExifData *data, ExifEntry *e,
168 unsigned char **d, unsigned int *ds,
171 unsigned int doff, s;
174 * Each entry is 12 bytes long. The memory for the entry has
175 * already been allocated.
177 exif_set_short (*d + 6 + offset + 0,
178 data->priv->order, (ExifShort) e->tag);
179 exif_set_short (*d + 6 + offset + 2,
180 data->priv->order, (ExifShort) e->format);
182 /* If this is the maker note tag, update it. */
183 if ((e->tag == EXIF_TAG_MAKER_NOTE) && data->priv->md) {
187 exif_mnote_data_set_offset (data->priv->md, *ds - 6);
188 exif_mnote_data_save (data->priv->md, &e->data, &e->size);
189 e->components = e->size;
192 exif_set_long (*d + 6 + offset + 4,
193 data->priv->order, e->components);
196 * Size? If bigger than 4 bytes, the actual data is not in
197 * the entry but somewhere else.
199 s = exif_format_get_size (e->format) * e->components;
203 *d = realloc (*d, *ds);
205 EXIF_LOG_NO_MEMORY (data->priv->log, "ExifData", *ds);
208 exif_set_long (*d + 6 + offset + 8,
209 data->priv->order, doff);
213 /* Write the data. Fill unneeded bytes with 0. */
214 memcpy (*d + 6 + doff, e->data, s);
215 if (s < 4) memset (*d + 6 + doff + s, 0, (4 - s));
219 exif_data_load_data_thumbnail (ExifData *data, const unsigned char *d,
220 unsigned int ds, ExifLong offset, ExifLong size)
222 if (ds < offset + size) {
223 exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG, "ExifData",
224 "Bogus thumbnail offset and size: %i < %i + %i.",
225 (int) ds, (int) offset, (int) size);
228 if (data->data) free (data->data);
230 data->data = exif_data_alloc (data, data->size);
231 if (!data->data) return;
232 memcpy (data->data, d + offset, data->size);
236 exif_data_load_data_content (ExifData *data, ExifContent *ifd,
237 const unsigned char *d,
238 unsigned int ds, unsigned int offset)
240 ExifLong o, thumbnail_offset = 0, thumbnail_length = 0;
246 /* Read the number of entries */
247 if (offset >= ds - 1) return;
248 n = exif_get_short (d + offset, data->priv->order);
249 exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG, "ExifData",
250 "Loading %i entries...", n);
253 /* Check if we have enough data. */
254 if (offset + 12 * n > ds) n = (ds - offset) / 12;
256 for (i = 0; i < n; i++) {
258 tag = exif_get_short (d + offset + 12 * i, data->priv->order);
260 case EXIF_TAG_EXIF_IFD_POINTER:
261 case EXIF_TAG_GPS_INFO_IFD_POINTER:
262 case EXIF_TAG_INTEROPERABILITY_IFD_POINTER:
263 case EXIF_TAG_JPEG_INTERCHANGE_FORMAT_LENGTH:
264 case EXIF_TAG_JPEG_INTERCHANGE_FORMAT:
265 o = exif_get_long (d + offset + 12 * i + 8,
268 case EXIF_TAG_EXIF_IFD_POINTER:
269 exif_data_load_data_content (data,
270 data->ifd[EXIF_IFD_EXIF], d, ds, o);
272 case EXIF_TAG_GPS_INFO_IFD_POINTER:
273 exif_data_load_data_content (data,
274 data->ifd[EXIF_IFD_GPS], d, ds, o);
276 case EXIF_TAG_INTEROPERABILITY_IFD_POINTER:
277 exif_data_load_data_content (data,
278 data->ifd[EXIF_IFD_INTEROPERABILITY], d, ds, o);
280 case EXIF_TAG_JPEG_INTERCHANGE_FORMAT:
282 printf ("Thumbnail at %i.\n", (int) o);
284 thumbnail_offset = o;
285 if (thumbnail_offset && thumbnail_length)
286 exif_data_load_data_thumbnail (data, d,
287 ds, thumbnail_offset,
290 case EXIF_TAG_JPEG_INTERCHANGE_FORMAT_LENGTH:
292 printf ("Thumbnail size: %i.\n", (int) o);
294 thumbnail_length = o;
295 if (thumbnail_offset && thumbnail_length)
296 exif_data_load_data_thumbnail (data, d,
297 ds, thumbnail_offset,
307 * If we don't know the tag, changes are high
308 * that the EXIF data does not follow the standard.
310 if (!exif_tag_get_name (tag)) return;
311 entry = exif_entry_new ();
312 exif_content_add_entry (ifd, entry);
313 exif_data_load_data_entry (data, entry, d, ds,
315 exif_entry_unref (entry);
322 exif_data_save_data_content (ExifData *data, ExifContent *ifd,
323 unsigned char **d, unsigned int *ds,
326 unsigned int j, n_ptr = 0, n_thumb = 0;
329 if (!data || !ifd || !d || !ds)
332 for (i = 0; i < EXIF_IFD_COUNT; i++)
333 if (ifd == data->ifd[i])
335 if (i == EXIF_IFD_COUNT)
339 * Check if we need some extra entries for pointers or the thumbnail.
345 * The pointer to IFD_EXIF is in IFD_0. The pointer to
346 * IFD_INTEROPERABILITY is in IFD_EXIF.
348 if (data->ifd[EXIF_IFD_EXIF]->count ||
349 data->ifd[EXIF_IFD_INTEROPERABILITY]->count)
352 /* The pointer to IFD_GPS is in IFD_0. */
353 if (data->ifd[EXIF_IFD_GPS]->count)
362 if (data->ifd[EXIF_IFD_INTEROPERABILITY]->count)
369 * Allocate enough memory for all entries
370 * and the number of entries.
372 *ds += (2 + (ifd->count + n_ptr + n_thumb) * 12 + 4);
373 *d = realloc (*d, *ds);
375 EXIF_LOG_NO_MEMORY (data->priv->log, "ExifData", *ds);
379 /* Save the number of entries */
380 exif_set_short (*d + 6 + offset, data->priv->order,
381 (ExifShort) (ifd->count + n_ptr + n_thumb));
385 printf ("Saving %i entries (IFD '%s', offset: %i)...\n",
386 ifd->count, exif_ifd_get_name (i), offset);
389 /* Save each entry */
390 for (j = 0; j < ifd->count; j++)
391 exif_data_save_data_entry (data, ifd->entries[j],
392 d, ds, offset + 12 * j);
393 offset += 12 * ifd->count;
395 /* Now save special entries. */
400 * The pointer to IFD_EXIF is in IFD_0.
401 * However, the pointer to IFD_INTEROPERABILITY is in IFD_EXIF,
402 * therefore, if IFD_INTEROPERABILITY is not empty, we need
403 * IFD_EXIF even if latter is empty.
405 if (data->ifd[EXIF_IFD_EXIF]->count ||
406 data->ifd[EXIF_IFD_INTEROPERABILITY]->count) {
407 exif_set_short (*d + 6 + offset + 0, data->priv->order,
408 EXIF_TAG_EXIF_IFD_POINTER);
409 exif_set_short (*d + 6 + offset + 2, data->priv->order,
411 exif_set_long (*d + 6 + offset + 4, data->priv->order,
413 exif_set_long (*d + 6 + offset + 8, data->priv->order,
415 exif_data_save_data_content (data,
416 data->ifd[EXIF_IFD_EXIF], d, ds, *ds - 6);
420 /* The pointer to IFD_GPS is in IFD_0, too. */
421 if (data->ifd[EXIF_IFD_GPS]->count) {
422 exif_set_short (*d + 6 + offset + 0, data->priv->order,
423 EXIF_TAG_GPS_INFO_IFD_POINTER);
424 exif_set_short (*d + 6 + offset + 2, data->priv->order,
426 exif_set_long (*d + 6 + offset + 4, data->priv->order,
428 exif_set_long (*d + 6 + offset + 8, data->priv->order,
430 exif_data_save_data_content (data,
431 data->ifd[EXIF_IFD_GPS], d, ds, *ds - 6);
439 * The pointer to IFD_INTEROPERABILITY is in IFD_EXIF.
442 if (data->ifd[EXIF_IFD_INTEROPERABILITY]->count) {
443 exif_set_short (*d + 6 + offset + 0, data->priv->order,
444 EXIF_TAG_INTEROPERABILITY_IFD_POINTER);
445 exif_set_short (*d + 6 + offset + 2, data->priv->order,
447 exif_set_long (*d + 6 + offset + 4, data->priv->order,
449 exif_set_long (*d + 6 + offset + 8, data->priv->order,
451 exif_data_save_data_content (data,
452 data->ifd[EXIF_IFD_INTEROPERABILITY], d, ds,
461 * Information about the thumbnail (if any) is saved in
466 /* EXIF_TAG_JPEG_INTERCHANGE_FORMAT */
467 exif_set_short (*d + 6 + offset + 0, data->priv->order,
468 EXIF_TAG_JPEG_INTERCHANGE_FORMAT);
469 exif_set_short (*d + 6 + offset + 2, data->priv->order,
471 exif_set_long (*d + 6 + offset + 4, data->priv->order,
473 exif_set_long (*d + 6 + offset + 8, data->priv->order,
476 *d = realloc (*d, *ds);
478 EXIF_LOG_NO_MEMORY (data->priv->log, "ExifData",
482 memcpy (*d + *ds - data->size, data->data, data->size);
485 printf ("Wrote %i bytes of thumbnail data at offset "
486 "%i.\n", data->size, *ds - data->size);
487 printf ("We currently have %i bytes EXIF data.\n", *ds);
490 /* EXIF_TAG_JPEG_INTERCHANGE_FORMAT_LENGTH */
491 exif_set_short (*d + 6 + offset + 0, data->priv->order,
492 EXIF_TAG_JPEG_INTERCHANGE_FORMAT_LENGTH);
493 exif_set_short (*d + 6 + offset + 2, data->priv->order,
495 exif_set_long (*d + 6 + offset + 4, data->priv->order,
497 exif_set_long (*d + 6 + offset + 8, data->priv->order,
507 /* Correctly terminate the directory */
508 if (i == EXIF_IFD_0 && (data->ifd[EXIF_IFD_1]->count ||
512 * We are saving IFD 0. Tell where IFD 1 starts and save
515 exif_set_long (*d + 6 + offset, data->priv->order, *ds - 6);
516 exif_data_save_data_content (data, data->ifd[EXIF_IFD_1], d, ds,
519 exif_set_long (*d + 6 + offset, data->priv->order, 0);
523 exif_data_load_data (ExifData *data, const unsigned char *d_orig,
524 unsigned int ds_orig)
530 const unsigned char *d = d_orig;
531 unsigned int ds = ds_orig, len;
539 printf ("Parsing %i byte(s) EXIF data...\n", ds);
543 * It can be that the data starts with the EXIF header. If it does
544 * not, search the EXIF marker.
548 printf ("Size too small.\n");
552 if (!memcmp (d, ExifHeader, 6)) {
554 printf ("Found EXIF header.\n");
558 printf ("Data begins with 0x%x 0x%x 0x%x 0x%x 0x%x 0x%x "
559 "0x%x...\n", d[0], d[1], d[2], d[3], d[4], d[5], d[6]);
562 while ((d[0] == 0xff) && ds) {
567 /* JPEG_MARKER_SOI */
568 if (d[0] == JPEG_MARKER_SOI) {
574 /* JPEG_MARKER_APP0 */
575 if (d[0] == JPEG_MARKER_APP0) {
578 l = (d[0] << 8) | d[1];
586 /* JPEG_MARKER_APP1 */
587 if (d[0] == JPEG_MARKER_APP1)
590 /* Unknown marker or data. Give up. */
592 printf ("EXIF marker not found.\n");
600 printf ("Size too small.\n");
604 len = (d[0] << 8) | d[1];
606 printf ("We have to deal with %i byte(s) of EXIF data.\n", len);
613 * Verify the exif header
614 * (offset 2, length 6).
618 printf ("Size too small.\n");
622 if (memcmp (d, ExifHeader, 6)) {
624 printf ("EXIF header not found.\n");
630 printf ("Found EXIF header.\n");
633 /* Byte order (offset 6, length 2) */
636 if (!memcmp (d + 6, "II", 2))
637 data->priv->order = EXIF_BYTE_ORDER_INTEL;
638 else if (!memcmp (d + 6, "MM", 2))
639 data->priv->order = EXIF_BYTE_ORDER_MOTOROLA;
644 if (exif_get_short (d + 8, data->priv->order) != 0x002a)
648 offset = exif_get_long (d + 10, data->priv->order);
650 printf ("IFD 0 at %i.\n", (int) offset);
653 /* Parse the actual exif data (offset 14) */
654 exif_data_load_data_content (data, data->ifd[EXIF_IFD_0], d + 6,
658 n = exif_get_short (d + 6 + offset, data->priv->order);
659 offset = exif_get_long (d + 6 + offset + 2 + 12 * n, data->priv->order);
662 printf ("IFD 1 at %i.\n", (int) offset);
666 if (offset > ds - 6) {
668 printf ("Bogus offset!\n");
673 exif_data_load_data_content (data, data->ifd[EXIF_IFD_1], d + 6,
678 * If we got an EXIF_TAG_MAKER_NOTE, try to interpret it. Some
679 * cameras use pointers in the maker note tag that point to the
680 * space between IFDs. Here is the only place where we have access
683 e = exif_data_get_entry (data, EXIF_TAG_MAKER_NOTE);
686 /* Olympus & Nikon */
687 if ((e->size >= 5) && (!memcmp (e->data, "OLYMP", 5) ||
688 !memcmp (e->data, "Nikon", 5))) {
689 data->priv->md = exif_mnote_data_olympus_new ();
692 em = exif_data_get_entry (data, EXIF_TAG_MAKE);
693 /* Pentax & some variant of Nikon */
694 if ((e->size >= 2) && (e->data[0] == 0x00)
695 && (e->data[1] == 0x1b)) {
696 if (em && !strncasecmp (exif_entry_get_value (em, value, sizeof(value)), "Nikon", 5)) {
697 data->priv->md = exif_mnote_data_olympus_new ();
699 data->priv->md = exif_mnote_data_pentax_new ();
706 if (!strcmp (exif_entry_get_value (em, value, sizeof(value)), "Canon"))
707 data->priv->md = exif_mnote_data_canon_new ();
713 * If we are able to interpret the maker note, do so.
715 if (data->priv->md) {
716 exif_mnote_data_log (data->priv->md, data->priv->log);
717 exif_mnote_data_set_byte_order (data->priv->md,
719 exif_mnote_data_set_offset (data->priv->md,
720 data->priv->offset_mnote);
721 exif_mnote_data_load (data->priv->md, d, ds);
727 exif_data_save_data (ExifData *data, unsigned char **d, unsigned int *ds)
729 if (!data || !d || !ds)
734 *d = exif_data_alloc (data, *ds);
736 memcpy (*d, ExifHeader, 6);
738 /* Order (offset 6) */
739 if (data->priv->order == EXIF_BYTE_ORDER_INTEL) {
740 memcpy (*d + 6, "II", 2);
742 memcpy (*d + 6, "MM", 2);
745 /* Fixed value (2 bytes, offset 8) */
746 exif_set_short (*d + 8, data->priv->order, 0x002a);
749 * IFD 0 offset (4 bytes, offset 10).
750 * We will start 8 bytes after the
751 * EXIF header (2 bytes for order, another 2 for the test, and
752 * 4 bytes for the IFD 0 offset make 8 bytes together).
754 exif_set_long (*d + 10, data->priv->order, 8);
756 /* Now save IFD 0. IFD 1 will be saved automatically. */
758 printf ("Saving IFDs...\n");
760 exif_data_save_data_content (data, data->ifd[EXIF_IFD_0], d, ds,
764 printf ("Saved %i byte(s) EXIF data.\n", *ds);
769 exif_data_new_from_file (const char *path)
774 loader = exif_loader_new ();
775 exif_loader_write_file (loader, path);
776 edata = exif_loader_get_data (loader);
777 exif_loader_unref (loader);
783 exif_data_ref (ExifData *data)
788 data->priv->ref_count++;
792 exif_data_unref (ExifData *data)
797 data->priv->ref_count--;
798 if (!data->priv->ref_count)
799 exif_data_free (data);
803 exif_data_free (ExifData *data)
810 for (i = 0; i < EXIF_IFD_COUNT; i++) {
812 exif_content_unref (data->ifd[i]);
821 if (data->priv->md) {
822 exif_mnote_data_unref (data->priv->md);
823 data->priv->md = NULL;
832 exif_data_dump (ExifData *data)
839 for (i = 0; i < EXIF_IFD_COUNT; i++) {
840 if (data->ifd[i] && data->ifd[i]->count) {
841 printf ("Dumping IFD '%s'...\n",
842 exif_ifd_get_name (i));
843 exif_content_dump (data->ifd[i], 0);
848 printf ("%i byte(s) thumbnail data available.", data->size);
849 if (data->size >= 4) {
850 printf ("0x%02x 0x%02x ... 0x%02x 0x%02x\n",
851 data->data[0], data->data[1],
852 data->data[data->size - 2],
853 data->data[data->size - 1]);
859 exif_data_get_byte_order (ExifData *data)
864 return (data->priv->order);
868 exif_data_foreach_content (ExifData *data, ExifDataForeachContentFunc func,
876 for (i = 0; i < EXIF_IFD_COUNT; i++)
877 func (data->ifd[i], user_data);
880 typedef struct _ByteOrderChangeData ByteOrderChangeData;
881 struct _ByteOrderChangeData {
882 ExifByteOrder old, new;
886 entry_set_byte_order (ExifEntry *e, void *data)
888 ByteOrderChangeData *d = data;
900 case EXIF_FORMAT_SHORT:
901 for (i = 0; i < e->components; i++) {
902 s = exif_get_short (e->data +
903 (i * exif_format_get_size (e->format)),
905 exif_set_short (e->data +
906 (i * exif_format_get_size (e->format)),
910 case EXIF_FORMAT_LONG:
911 for (i = 0; i < e->components; i++) {
912 l = exif_get_long (e->data +
913 (i * exif_format_get_size (e->format)),
915 exif_set_long (e->data +
916 (i * exif_format_get_size (e->format)),
920 case EXIF_FORMAT_RATIONAL:
921 for (i = 0; i < e->components; i++) {
922 r = exif_get_rational (e->data +
923 (i * exif_format_get_size (e->format)),
925 exif_set_rational (e->data +
926 (i * exif_format_get_size (e->format)),
930 case EXIF_FORMAT_SLONG:
931 for (i = 0; i < e->components; i++) {
932 sl = exif_get_slong (e->data +
933 (i * exif_format_get_size (e->format)),
935 exif_set_slong (e->data +
936 (i * exif_format_get_size (e->format)),
940 case EXIF_FORMAT_SRATIONAL:
941 for (i = 0; i < e->components; i++) {
942 sr = exif_get_srational (e->data +
943 (i * exif_format_get_size (e->format)),
945 exif_set_srational (e->data +
946 (i * exif_format_get_size (e->format)),
950 case EXIF_FORMAT_UNDEFINED:
951 case EXIF_FORMAT_BYTE:
952 case EXIF_FORMAT_SBYTE:
953 case EXIF_FORMAT_ASCII:
961 content_set_byte_order (ExifContent *content, void *data)
963 exif_content_foreach_entry (content, entry_set_byte_order, data);
967 exif_data_set_byte_order (ExifData *data, ExifByteOrder order)
969 ByteOrderChangeData d;
971 if (!data || (order == data->priv->order))
974 d.old = data->priv->order;
976 exif_data_foreach_content (data, content_set_byte_order, &d);
977 data->priv->order = order;
979 exif_mnote_data_set_byte_order (data->priv->md, order);
983 exif_data_log (ExifData *data, ExifLog *log)
985 if (!data || !data->priv) return;
986 exif_log_unref (data->priv->log);
987 data->priv->log = log;
991 /* Used internally within libexif */
992 ExifLog *exif_data_get_log (ExifData *);
994 exif_data_get_log (ExifData *data)
996 if (!data || !data->priv) return NULL;
997 return data->priv->log;