libexif/exif-content.c

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