*/
#include <config.h>
-#include "exif-mnote-data.h"
-
-#include "exif-data.h"
-#include "exif-ifd.h"
-#include "exif-mnote-data-priv.h"
-#include "exif-utils.h"
-#include "exif-loader.h"
-#include "jpeg-marker.h"
+
+#include <libexif/exif-mnote-data.h>
+#include <libexif/exif-data.h>
+#include <libexif/exif-ifd.h>
+#include <libexif/exif-mnote-data-priv.h>
+#include <libexif/exif-utils.h>
+#include <libexif/exif-loader.h>
#include <libexif/exif-log.h>
+#include <libexif/i18n.h>
#include <libexif/olympus/exif-mnote-data-olympus.h>
#include <libexif/canon/exif-mnote-data-canon.h>
# define strncasecmp strnicmp
#endif
+#undef JPEG_MARKER_SOI
+#define JPEG_MARKER_SOI 0xd8
+#undef JPEG_MARKER_APP0
+#define JPEG_MARKER_APP0 0xe0
+#undef JPEG_MARKER_APP1
+#define JPEG_MARKER_APP1 0xe1
+
static const unsigned char ExifHeader[] = {0x45, 0x78, 0x69, 0x66, 0x00, 0x00};
struct _ExifDataPrivate
memcpy (entry->data, d + doff, s);
}
-#ifndef EXIF_DONT_CHANGE_MAKER_NOTE
/* If this is the MakerNote, remember the offset */
if (entry->tag == EXIF_TAG_MAKER_NOTE) {
if (entry->size > 6) exif_log (data->priv->log,
entry->data[6]);
data->priv->offset_mnote = doff;
}
-#endif
exif_entry_fix (entry);
}
exif_set_short (*d + 6 + offset + 2,
data->priv->order, (ExifShort) e->format);
+#ifndef EXIF_DONT_CHANGE_MAKER_NOTE
/* If this is the maker note tag, update it. */
if ((e->tag == EXIF_TAG_MAKER_NOTE) && data->priv->md) {
exif_mem_free (data->priv->mem, e->data);
exif_mnote_data_save (data->priv->md, &e->data, &e->size);
e->components = e->size;
}
+#endif
exif_set_long (*d + 6 + offset + 4,
data->priv->order, e->components);
if (s > 4) {
doff = *ds - 6;
*ds += s;
+
+ /*
+ * According to the TIFF specification,
+ * the offset must be an even number. If we need to introduce
+ * a padding byte, we set it to 0.
+ */
+ if (s & 1) (*ds)++;
*d = exif_mem_realloc (data->priv->mem, *d, *ds);
if (!*d) {
EXIF_LOG_NO_MEMORY (data->priv->log, "ExifData", *ds);
return;
}
- exif_set_long (*d + 6 + offset + 8,
- data->priv->order, doff);
+ exif_set_long (*d + 6 + offset + 8, data->priv->order, doff);
+ if (s & 1) *(*d + *ds - 1) = '\0';
+
} else
doff = offset + 8;
memcpy (data->data, d + offset, data->size);
}
+#undef CHECK_REC
+#define CHECK_REC(i) \
+if (data->ifd[(i)] == ifd) { \
+ exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG, \
+ "ExifData", "Recursive entry in IFD " \
+ "'%s' detected. Skipping...", \
+ exif_ifd_get_name (i)); \
+ break; \
+} \
+if (data->ifd[(i)]->count) { \
+ exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG, \
+ "ExifData", "Attemt to load IFD " \
+ "'%s' multiple times detected. " \
+ "Skipping...", \
+ exif_ifd_get_name (i)); \
+ break; \
+}
+
static void
exif_data_load_data_content (ExifData *data, ExifContent *ifd,
const unsigned char *d,
data->priv->order);
switch (tag) {
case EXIF_TAG_EXIF_IFD_POINTER:
+ CHECK_REC (EXIF_IFD_EXIF);
exif_data_load_data_content (data,
data->ifd[EXIF_IFD_EXIF], d, ds, o);
break;
case EXIF_TAG_GPS_INFO_IFD_POINTER:
+ CHECK_REC (EXIF_IFD_GPS);
exif_data_load_data_content (data,
data->ifd[EXIF_IFD_GPS], d, ds, o);
break;
case EXIF_TAG_INTEROPERABILITY_IFD_POINTER:
+ CHECK_REC (EXIF_IFD_INTEROPERABILITY);
exif_data_load_data_content (data,
data->ifd[EXIF_IFD_INTEROPERABILITY], d, ds, o);
break;
default:
/*
- * If we don't know the tag, changes are high
+ * If we don't know the tag, chances are high
* that the EXIF data does not follow the standard.
*/
if (!exif_tag_get_name (tag)) {
return;
}
entry = exif_entry_new_mem (data->priv->mem);
- exif_content_add_entry (ifd, entry);
exif_data_load_data_entry (data, entry, d, ds,
offset + 12 * i);
+ exif_content_add_entry (ifd, entry);
exif_entry_unref (entry);
break;
}
}
}
+static int
+cmp_func (const unsigned char *p1, const unsigned char *p2, ExifByteOrder o)
+{
+ ExifShort tag1 = exif_get_short (p1, o);
+ ExifShort tag2 = exif_get_short (p2, o);
+
+ return (tag1 < tag2) ? -1 : (tag1 > tag2) ? 1 : 0;
+}
+
+static int
+cmp_func_intel (const void *elem1, const void *elem2)
+{
+ return cmp_func ((const unsigned char *) elem1,
+ (const unsigned char *) elem2, EXIF_BYTE_ORDER_INTEL);
+}
+
+static int
+cmp_func_motorola (const void *elem1, const void *elem2)
+{
+ return cmp_func ((const unsigned char *) elem1,
+ (const unsigned char *) elem2, EXIF_BYTE_ORDER_MOTOROLA);
+}
+
static void
exif_data_save_data_content (ExifData *data, ExifContent *ifd,
unsigned char **d, unsigned int *ds,
"Saving %i entries (IFD '%s', offset: %i)...",
ifd->count, exif_ifd_get_name (i), offset);
for (j = 0; j < ifd->count; j++)
- exif_data_save_data_entry (data, ifd->entries[j],
- d, ds, offset + 12 * j);
+ exif_data_save_data_entry (data, ifd->entries[j], d, ds, offset + 12 * j);
+
offset += 12 * ifd->count;
/* Now save special entries. */
break;
}
+ /* Sort the directory according to TIFF specification */
+ qsort (*d + 6 + offset - (ifd->count + n_ptr + n_thumb) * 12,
+ (ifd->count + n_ptr + n_thumb), 12,
+ data->priv->order == EXIF_BYTE_ORDER_INTEL ? cmp_func_intel : cmp_func_motorola);
+
/* Correctly terminate the directory */
if (i == EXIF_IFD_0 && (data->ifd[EXIF_IFD_1]->count ||
data->size)) {
exif_set_long (*d + 6 + offset, data->priv->order, 0);
}
+typedef enum {
+ EXIF_DATA_TYPE_MAKER_NOTE_NONE = 0,
+ EXIF_DATA_TYPE_MAKER_NOTE_CANON = 1,
+ EXIF_DATA_TYPE_MAKER_NOTE_OLYMPUS = 2,
+ EXIF_DATA_TYPE_MAKER_NOTE_PENTAX = 3
+} ExifDataTypeMakerNote;
+
+static ExifDataTypeMakerNote
+exif_data_get_type_maker_note (ExifData *d)
+{
+ ExifEntry *e, *em;
+ char value[1024];
+
+ if (!d) return EXIF_DATA_TYPE_MAKER_NOTE_NONE;
+
+ e = exif_data_get_entry (d, EXIF_TAG_MAKER_NOTE);
+ if (!e) return EXIF_DATA_TYPE_MAKER_NOTE_NONE;
+
+ /* Olympus & Nikon */
+ if ((e->size >= 5) && (!memcmp (e->data, "OLYMP", 5) ||
+ !memcmp (e->data, "Nikon", 5)))
+ return EXIF_DATA_TYPE_MAKER_NOTE_OLYMPUS;
+
+ em = exif_data_get_entry (d, EXIF_TAG_MAKE);
+ if (!em) return EXIF_DATA_TYPE_MAKER_NOTE_NONE;
+
+ /* Canon */
+ if (!strcmp (exif_entry_get_value (em, value, sizeof (value)), "Canon"))
+ return EXIF_DATA_TYPE_MAKER_NOTE_CANON;
+
+ /* Pentax & some variant of Nikon */
+ if ((e->size >= 2) && (e->data[0] == 0x00) && (e->data[1] == 0x1b)) {
+ if (!strncasecmp (
+ exif_entry_get_value (em, value, sizeof(value)),
+ "Nikon", 5))
+ return EXIF_DATA_TYPE_MAKER_NOTE_OLYMPUS;
+ else
+ return EXIF_DATA_TYPE_MAKER_NOTE_PENTAX;
+ }
+
+ return EXIF_DATA_TYPE_MAKER_NOTE_NONE;
+}
+
+#define LOG_TOO_SMALL \
+exif_log (data->priv->log, EXIF_LOG_CODE_CORRUPT_DATA, "ExifData", \
+ _("Size of data too small to allow for EXIF data."));
+
void
exif_data_load_data (ExifData *data, const unsigned char *d_orig,
unsigned int ds_orig)
unsigned int l;
ExifLong offset;
ExifShort n;
- ExifEntry *e, *em;
const unsigned char *d = d_orig;
unsigned int ds = ds_orig, len;
* not, search the EXIF marker.
*/
if (ds < 6) {
- exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG, "ExifData",
- "Size too small.");
+ LOG_TOO_SMALL;
return;
}
if (!memcmp (d, ExifHeader, 6)) {
break;
/* Unknown marker or data. Give up. */
- exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG,
- "ExifData", "EXIF marker not found.");
+ exif_log (data->priv->log, EXIF_LOG_CODE_CORRUPT_DATA,
+ "ExifData", _("EXIF marker not found."));
return;
}
d++;
ds--;
if (ds < 2) {
- exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG,
- "ExifData", "Size too small.");
+ LOG_TOO_SMALL;
return;
}
len = (d[0] << 8) | d[1];
* (offset 2, length 6).
*/
if (ds < 6) {
- exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG, "ExifData",
- "Size too small.");
+ LOG_TOO_SMALL;
return;
}
if (memcmp (d, ExifHeader, 6)) {
- exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG, "ExifData",
- "EXIF header not found.");
+ exif_log (data->priv->log, EXIF_LOG_CODE_CORRUPT_DATA,
+ "ExifData", _("EXIF header not found."));
return;
}
"Found EXIF header.");
/* Byte order (offset 6, length 2) */
- if (ds < 12)
+ if (ds < 14)
return;
if (!memcmp (d + 6, "II", 2))
data->priv->order = EXIF_BYTE_ORDER_INTEL;
else if (!memcmp (d + 6, "MM", 2))
data->priv->order = EXIF_BYTE_ORDER_MOTOROLA;
- else
+ else {
+ exif_log (data->priv->log, EXIF_LOG_CODE_CORRUPT_DATA,
+ "ExifData", _("Unknown encoding."));
return;
+ }
/* Fixed value */
if (exif_get_short (d + 8, data->priv->order) != 0x002a)
exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG, "ExifData",
"IFD 0 at %i.", (int) offset);
- /* Parse the actual exif data (offset 14) */
+ /* Parse the actual exif data (usually offset 14 from start) */
exif_data_load_data_content (data, data->ifd[EXIF_IFD_0], d + 6,
ds - 6, offset);
/* IFD 1 offset */
+ if (offset + 6 + 2 > ds) {
+ return;
+ }
n = exif_get_short (d + 6 + offset, data->priv->order);
+ if (offset + 6 + 2 + 12 * n + 4 > ds) {
+ return;
+ }
offset = exif_get_long (d + 6 + offset + 2 + 12 * n, data->priv->order);
if (offset) {
exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG, "ExifData",
/* Sanity check. */
if (offset > ds - 6) {
- exif_log (data->priv->log, EXIF_LOG_CODE_DEBUG,
- "ExifData", "Bogus offset!");
+ exif_log (data->priv->log, EXIF_LOG_CODE_CORRUPT_DATA,
+ "ExifData", "Bogus offset.");
return;
}
* space between IFDs. Here is the only place where we have access
* to that data.
*/
- e = exif_data_get_entry (data, EXIF_TAG_MAKER_NOTE);
- if (e) {
-
- /* Olympus & Nikon */
- if ((e->size >= 5) && (!memcmp (e->data, "OLYMP", 5) ||
- !memcmp (e->data, "Nikon", 5))) {
- data->priv->md = exif_mnote_data_olympus_new (data->priv->mem);
- } else {
- char value[7];
- em = exif_data_get_entry (data, EXIF_TAG_MAKE);
- /* Pentax & some variant of Nikon */
- if ((e->size >= 2) && (e->data[0] == 0x00)
- && (e->data[1] == 0x1b)) {
- if (em && !strncasecmp (exif_entry_get_value (em, value, sizeof(value)), "Nikon", 5)) {
- data->priv->md = exif_mnote_data_olympus_new (data->priv->mem);
- } else {
- data->priv->md = exif_mnote_data_pentax_new (data->priv->mem);
- }
-
- } else {
- /* Canon */
- if (em) {
-
- if (!strcmp (exif_entry_get_value (em, value, sizeof(value)), "Canon"))
- data->priv->md = exif_mnote_data_canon_new (data->priv->mem);
- }
- }
- }
+ switch (exif_data_get_type_maker_note (data)) {
+ case EXIF_DATA_TYPE_MAKER_NOTE_OLYMPUS:
+ data->priv->md = exif_mnote_data_olympus_new (data->priv->mem);
+ break;
+ case EXIF_DATA_TYPE_MAKER_NOTE_PENTAX:
+ data->priv->md = exif_mnote_data_pentax_new (data->priv->mem);
+ break;
+ case EXIF_DATA_TYPE_MAKER_NOTE_CANON:
+ data->priv->md = exif_mnote_data_canon_new (data->priv->mem);
+ break;
+ default:
+ break;
+ }
- /*
- * If we are able to interpret the maker note, do so.
- */
- if (data->priv->md) {
- exif_mnote_data_log (data->priv->md, data->priv->log);
- exif_mnote_data_set_byte_order (data->priv->md,
- data->priv->order);
- exif_mnote_data_set_offset (data->priv->md,
- data->priv->offset_mnote);
- exif_mnote_data_load (data->priv->md, d, ds);
- }
+ /*
+ * If we are able to interpret the maker note, do so.
+ */
+ if (data->priv->md) {
+ exif_mnote_data_log (data->priv->md, data->priv->log);
+ exif_mnote_data_set_byte_order (data->priv->md,
+ data->priv->order);
+ exif_mnote_data_set_offset (data->priv->md,
+ data->priv->offset_mnote);
+ exif_mnote_data_load (data->priv->md, d, ds);
}
}
void
exif_data_unref (ExifData *data)
{
- if (!data)
- return;
+ if (!data) return;
data->priv->ref_count--;
- if (!data->priv->ref_count)
- exif_data_free (data);
+ if (!data->priv->ref_count) exif_data_free (data);
}
void
exif_data_free (ExifData *data)
{
unsigned int i;
+ ExifMem *mem = (data && data->priv) ? data->priv->mem : NULL;
if (!data) return;
}
}
+ if (data->data) {
+ exif_mem_free (mem, data->data);
+ data->data = NULL;
+ }
+
if (data->priv) {
- ExifMem *mem = data->priv->mem;
- if (data->data) {
- exif_mem_free (data->priv->mem, data->data);
- data->data = NULL;
+ if (data->priv->log) {
+ exif_log_unref (data->priv->log);
+ data->priv->log = NULL;
}
if (data->priv->md) {
exif_mnote_data_unref (data->priv->md);
}
exif_mem_free (mem, data->priv);
exif_mem_free (mem, data);
- exif_mem_unref (mem);
}
+
+ exif_mem_unref (mem);
}
void
entry_set_byte_order (ExifEntry *e, void *data)
{
ByteOrderChangeData *d = data;
- unsigned int i;
- ExifShort s;
- ExifLong l;
- ExifSLong sl;
- ExifRational r;
- ExifSRational sr;
if (!e)
return;
- switch (e->format) {
- case EXIF_FORMAT_SHORT:
- for (i = 0; i < e->components; i++) {
- s = exif_get_short (e->data +
- (i * exif_format_get_size (e->format)),
- d->old);
- exif_set_short (e->data +
- (i * exif_format_get_size (e->format)),
- d->new, s);
- }
- break;
- case EXIF_FORMAT_LONG:
- for (i = 0; i < e->components; i++) {
- l = exif_get_long (e->data +
- (i * exif_format_get_size (e->format)),
- d->old);
- exif_set_long (e->data +
- (i * exif_format_get_size (e->format)),
- d->new, l);
- }
- break;
- case EXIF_FORMAT_RATIONAL:
- for (i = 0; i < e->components; i++) {
- r = exif_get_rational (e->data +
- (i * exif_format_get_size (e->format)),
- d->old);
- exif_set_rational (e->data +
- (i * exif_format_get_size (e->format)),
- d->new, r);
- }
- break;
- case EXIF_FORMAT_SLONG:
- for (i = 0; i < e->components; i++) {
- sl = exif_get_slong (e->data +
- (i * exif_format_get_size (e->format)),
- d->old);
- exif_set_slong (e->data +
- (i * exif_format_get_size (e->format)),
- d->new, sl);
- }
- break;
- case EXIF_FORMAT_SRATIONAL:
- for (i = 0; i < e->components; i++) {
- sr = exif_get_srational (e->data +
- (i * exif_format_get_size (e->format)),
- d->old);
- exif_set_srational (e->data +
- (i * exif_format_get_size (e->format)),
- d->new, sr);
- }
- break;
- case EXIF_FORMAT_UNDEFINED:
- case EXIF_FORMAT_BYTE:
- case EXIF_FORMAT_SBYTE:
- case EXIF_FORMAT_ASCII:
- default:
- /* Nothing here. */
- break;
- }
+ exif_array_set_byte_order (e->format, e->data, e->components, d->old, d->new);
}
static void
void
exif_data_log (ExifData *data, ExifLog *log)
{
+ unsigned int i;
+
if (!data || !data->priv) return;
exif_log_unref (data->priv->log);
data->priv->log = log;
exif_log_ref (log);
+
+ for (i = 0; i < EXIF_IFD_COUNT; i++)
+ exif_content_log (data->ifd[i], log);
}
/* Used internally within libexif */