libexif/exif-content.c

   1 /* exif-content.c
   2  *
   3  * Copyright © 2001 Lutz Müller <lutz@users.sourceforge.net>
   4  *
   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.
   9  *
  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.
  14  *
  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.
  19  */
  20
  21 #include <config.h>
  22
  23 #include <libexif/exif-content.h>
  24 #include <libexif/exif-system.h>
  25
  26 #include <stdlib.h>
  27 #include <stdio.h>
  28 #include <string.h>
  29
  30 /* unused constant
  31  * static const unsigned char ExifHeader[] = {0x45, 0x78, 0x69, 0x66, 0x00, 0x00};
  32  */
  33
  34 struct _ExifContentPrivate
  35 {
  36         unsigned int ref_count;
  37
  38         ExifMem *mem;
  39         ExifLog *log;
  40 };
  41
  42 ExifContent *
  43 exif_content_new (void)
  44 {
  45         ExifMem *mem = exif_mem_new_default ();
  46         ExifContent *content = exif_content_new_mem (mem);
  47
  48         exif_mem_unref (mem);
  49
  50         return content;
  51 }
  52
  53 ExifContent *
  54 exif_content_new_mem (ExifMem *mem)
  55 {
  56         ExifContent *content;
  57
  58         if (!mem) return NULL;
  59
  60         content = exif_mem_alloc (mem, (ExifLong) sizeof (ExifContent));
  61         if (!content)
  62                 return NULL;
  63         content->priv = exif_mem_alloc (mem,
  64                                 (ExifLong) sizeof (ExifContentPrivate));
  65         if (!content->priv) {
  66                 exif_mem_free (mem, content);
  67                 return NULL;
  68         }
  69
  70         content->priv->ref_count = 1;
  71
  72         content->priv->mem = mem;
  73         exif_mem_ref (mem);
  74
  75         return content;
  76 }
  77
  78 void
  79 exif_content_ref (ExifContent *content)
  80 {
  81         content->priv->ref_count++;
  82 }
  83
  84 void
  85 exif_content_unref (ExifContent *content)
  86 {
  87         content->priv->ref_count--;
  88         if (!content->priv->ref_count)
  89                 exif_content_free (content);
  90 }
  91
  92 void
  93 exif_content_free (ExifContent *content)
  94 {
  95         ExifMem *mem = (content && content->priv) ? content->priv->mem : NULL;
  96         unsigned int i;
  97
  98         if (!content) return;
  99
 100         for (i = 0; i < content->count; i++)
 101                 exif_entry_unref (content->entries[i]);
 102         exif_mem_free (mem, content->entries);
 103
 104         if (content->priv) {
 105                 exif_log_unref (content->priv->log);
 106         }
 107
 108         exif_mem_free (mem, content->priv);
 109         exif_mem_free (mem, content);
 110         exif_mem_unref (mem);
 111 }
 112
 113 void
 114 exif_content_dump (ExifContent *content, unsigned int indent)
 115 {
 116         char buf[1024];
 117         unsigned int i;
 118
 119         for (i = 0; i < 2 * indent; i++)
 120                 buf[i] = ' ';
 121         buf[i] = '\0';
 122
 123         if (!content)
 124                 return;
 125
 126         printf ("%sDumping exif content (%u entries)...\n", buf,
 127                 content->count);
 128         for (i = 0; i < content->count; i++)
 129                 exif_entry_dump (content->entries[i], indent + 1);
 130 }
 131
 132 void
 133 exif_content_add_entry (ExifContent *c, ExifEntry *entry)
 134 {
 135         ExifEntry **entries;
 136         if (!c || !c->priv || !entry || entry->parent) return;
 137
 138         /* One tag can only be added once to an IFD. */
 139         if (exif_content_get_entry (c, entry->tag)) {
 140                 exif_log (c->priv->log, EXIF_LOG_CODE_DEBUG, "ExifContent",
 141                         "An attempt has been made to add "
 142                         "the tag '%s' twice to an IFD. This is against "
 143                         "specification.", exif_tag_get_name (entry->tag));
 144                 return;
 145         }
 146
 147         entries = exif_mem_realloc (c->priv->mem,
 148                 c->entries, sizeof (ExifEntry*) * (c->count + 1));
 149         if (!entries) return;
 150         entry->parent = c;
 151         entries[c->count++] = entry;
 152         c->entries = entries;
 153         exif_entry_ref (entry);
 154 }
 155
 156 void
 157 exif_content_remove_entry (ExifContent *c, ExifEntry *e)
 158 {
 159         unsigned int i;
 160         ExifEntry **t;
 161
 162         if (!c || !c->priv || !e || (e->parent != c)) return;
 163
 164         /* Search the entry */
 165         for (i = 0; i < c->count; i++) if (c->entries[i] == e) break;
 166         if (i == c->count) return;
 167
 168         /* Remove the entry */
 169         memmove (&c->entries[i], &c->entries[i + 1],
 170                  sizeof (ExifEntry*) * (c->count - i - 1));
 171         c->count--;
 172         e->parent = NULL;
 173         exif_entry_unref (e);
 174         t = exif_mem_realloc (c->priv->mem, c->entries,
 175                                         sizeof(ExifEntry*) * c->count);
 176         if (t) c->entries = t;
 177 }
 178
 179 ExifEntry *
 180 exif_content_get_entry (ExifContent *content, ExifTag tag)
 181 {
 182         unsigned int i;
 183
 184         if (!content)
 185                 return (NULL);
 186
 187         for (i = 0; i < content->count; i++)
 188                 if (content->entries[i]->tag == tag)
 189                         return (content->entries[i]);
 190         return (NULL);
 191 }
 192
 193 void
 194 exif_content_foreach_entry (ExifContent *content,
 195                             ExifContentForeachEntryFunc func, void *data)
 196 {
 197         unsigned int i;
 198
 199         if (!content || !func)
 200                 return;
 201
 202         for (i = 0; i < content->count; i++)
 203                 func (content->entries[i], data);
 204 }
 205
 206 void
 207 exif_content_log (ExifContent *content, ExifLog *log)
 208 {
 209         if (!content || !content->priv || !log || content->priv->log == log)
 210                 return;
 211
 212         if (content->priv->log) exif_log_unref (content->priv->log);
 213         content->priv->log = log;
 214         exif_log_ref (log);
 215 }
 216
 217 ExifIfd
 218 exif_content_get_ifd (ExifContent *c)
 219 {
 220         if (!c || !c->parent) return EXIF_IFD_COUNT;
 221
 222         return
 223                 ((c)->parent->ifd[EXIF_IFD_0] == (c)) ? EXIF_IFD_0 :
 224                 ((c)->parent->ifd[EXIF_IFD_1] == (c)) ? EXIF_IFD_1 :
 225                 ((c)->parent->ifd[EXIF_IFD_EXIF] == (c)) ? EXIF_IFD_EXIF :
 226                 ((c)->parent->ifd[EXIF_IFD_GPS] == (c)) ? EXIF_IFD_GPS :
 227                 ((c)->parent->ifd[EXIF_IFD_INTEROPERABILITY] == (c)) ? EXIF_IFD_INTEROPERABILITY :
 228                 EXIF_IFD_COUNT;
 229 }
 230
 231 static void
 232 fix_func (ExifEntry *e, void *UNUSED(data))
 233 {
 234         exif_entry_fix (e);
 235 }
 236
 237 void
 238 exif_content_fix (ExifContent *c)
 239 {
 240         ExifIfd ifd = exif_content_get_ifd (c);
 241         ExifDataType dt;
 242         ExifTag t;
 243         ExifEntry *e;
 244
 245         if (!c) return;
 246
 247         dt = exif_data_get_data_type (c->parent);
 248
 249         /* First of all, fix all existing entries. */
 250         exif_content_foreach_entry (c, fix_func, NULL);
 251
 252         /*
 253          * Then check for existing tags that are not allowed and for
 254          * non-existing mandatory tags.
 255          */
 256         for (t = 0; t <= 0xffff; t++) {
 257                 switch (exif_tag_get_support_level_in_ifd (t, ifd, dt)) {
 258                 case EXIF_SUPPORT_LEVEL_MANDATORY:
 259                         if (exif_content_get_entry (c, t)) break;
 260                         exif_log (c->priv->log, EXIF_LOG_CODE_DEBUG, "exif-content",
 261                                         "Tag '%s' is mandatory in IFD '%s' and has therefore been added.",
 262                                         exif_tag_get_name_in_ifd (t, ifd), exif_ifd_get_name (ifd));
 263                         e = exif_entry_new ();
 264                         exif_content_add_entry (c, e);
 265                         exif_entry_initialize (e, t);
 266                         exif_entry_unref (e);
 267                         break;
 268                 case EXIF_SUPPORT_LEVEL_NOT_RECORDED:
 269                         e = exif_content_get_entry (c, t);
 270                         if (!e) break;
 271                         exif_log (c->priv->log, EXIF_LOG_CODE_DEBUG, "exif-content",
 272                                         "Tag '%s' is not recorded in IFD '%s' and has therefore been "
 273                                         "removed.", exif_tag_get_name_in_ifd (t, ifd),
 274                                         exif_ifd_get_name (ifd));
 275                         exif_content_remove_entry (c, e);
 276                         break;
 277                 case EXIF_SUPPORT_LEVEL_OPTIONAL:
 278                 default:
 279                         break;
 280                 }
 281         }
 282 }