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         e->parent = NULL;
 172         exif_entry_unref (e);
 173         t = exif_mem_realloc (c->priv->mem, c->entries,
 174                                 sizeof(ExifEntry*) * (c->count - 1));
 175         if (t) {
 176                 c->entries = t;
 177                 c->count--;
 178         }
 179 }
 180
 181 ExifEntry *
 182 exif_content_get_entry (ExifContent *content, ExifTag tag)
 183 {
 184         unsigned int i;
 185
 186         if (!content)
 187                 return (NULL);
 188
 189         for (i = 0; i < content->count; i++)
 190                 if (content->entries[i]->tag == tag)
 191                         return (content->entries[i]);
 192         return (NULL);
 193 }
 194
 195 void
 196 exif_content_foreach_entry (ExifContent *content,
 197                             ExifContentForeachEntryFunc func, void *data)
 198 {
 199         unsigned int i;
 200
 201         if (!content || !func)
 202                 return;
 203
 204         for (i = 0; i < content->count; i++)
 205                 func (content->entries[i], data);
 206 }
 207
 208 void
 209 exif_content_log (ExifContent *content, ExifLog *log)
 210 {
 211         if (!content || !content->priv || !log || content->priv->log == log)
 212                 return;
 213
 214         if (content->priv->log) exif_log_unref (content->priv->log);
 215         content->priv->log = log;
 216         exif_log_ref (log);
 217 }
 218
 219 ExifIfd
 220 exif_content_get_ifd (ExifContent *c)
 221 {
 222         if (!c || !c->parent) return EXIF_IFD_COUNT;
 223
 224         return
 225                 ((c)->parent->ifd[EXIF_IFD_0] == (c)) ? EXIF_IFD_0 :
 226                 ((c)->parent->ifd[EXIF_IFD_1] == (c)) ? EXIF_IFD_1 :
 227                 ((c)->parent->ifd[EXIF_IFD_EXIF] == (c)) ? EXIF_IFD_EXIF :
 228                 ((c)->parent->ifd[EXIF_IFD_GPS] == (c)) ? EXIF_IFD_GPS :
 229                 ((c)->parent->ifd[EXIF_IFD_INTEROPERABILITY] == (c)) ? EXIF_IFD_INTEROPERABILITY :
 230                 EXIF_IFD_COUNT;
 231 }
 232
 233 static void
 234 fix_func (ExifEntry *e, void *UNUSED(data))
 235 {
 236         exif_entry_fix (e);
 237 }
 238
 239 void
 240 exif_content_fix (ExifContent *c)
 241 {
 242         ExifIfd ifd = exif_content_get_ifd (c);
 243         ExifDataType dt;
 244         ExifTag t;
 245         ExifEntry *e;
 246
 247         if (!c) return;
 248
 249         dt = exif_data_get_data_type (c->parent);
 250
 251         /* First of all, fix all existing entries. */
 252         exif_content_foreach_entry (c, fix_func, NULL);
 253
 254         /*
 255          * Then check for existing tags that are not allowed and for
 256          * non-existing mandatory tags.
 257          */
 258         for (t = 0; t <= 0xffff; t++) {
 259                 switch (exif_tag_get_support_level_in_ifd (t, ifd, dt)) {
 260                 case EXIF_SUPPORT_LEVEL_MANDATORY:
 261                         if (exif_content_get_entry (c, t)) break;
 262                         exif_log (c->priv->log, EXIF_LOG_CODE_DEBUG, "exif-content",
 263                                         "Tag '%s' is mandatory in IFD '%s' and has therefore been added.",
 264                                         exif_tag_get_name_in_ifd (t, ifd), exif_ifd_get_name (ifd));
 265                         e = exif_entry_new ();
 266                         exif_content_add_entry (c, e);
 267                         exif_entry_initialize (e, t);
 268                         exif_entry_unref (e);
 269                         break;
 270                 case EXIF_SUPPORT_LEVEL_NOT_RECORDED:
 271                         e = exif_content_get_entry (c, t);
 272                         if (!e) break;
 273                         exif_log (c->priv->log, EXIF_LOG_CODE_DEBUG, "exif-content",
 274                                         "Tag '%s' is not recorded in IFD '%s' and has therefore been "
 275                                         "removed.", exif_tag_get_name_in_ifd (t, ifd),
 276                                         exif_ifd_get_name (ifd));
 277                         exif_content_remove_entry (c, e);
 278                         break;
 279                 case EXIF_SUPPORT_LEVEL_OPTIONAL:
 280                 default:
 281                         break;
 282                 }
 283         }
 284 }