OLD | NEW |
(Empty) | |
| 1 /* exif-mnote-data-pentax.c |
| 2 * |
| 3 * Copyright (c) 2002, 2003 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., 51 Franklin Street, Fifth Floor, |
| 18 * Boston, MA 02110-1301 USA. |
| 19 */ |
| 20 |
| 21 #include "config.h" |
| 22 #include "exif-mnote-data-pentax.h" |
| 23 |
| 24 #include <stdlib.h> |
| 25 #include <string.h> |
| 26 #include <stdio.h> |
| 27 |
| 28 #include <libexif/exif-byte-order.h> |
| 29 #include <libexif/exif-utils.h> |
| 30 |
| 31 static void |
| 32 exif_mnote_data_pentax_clear (ExifMnoteDataPentax *n) |
| 33 { |
| 34 ExifMnoteData *d = (ExifMnoteData *) n; |
| 35 unsigned int i; |
| 36 |
| 37 if (!n) return; |
| 38 |
| 39 if (n->entries) { |
| 40 for (i = 0; i < n->count; i++) |
| 41 if (n->entries[i].data) { |
| 42 exif_mem_free (d->mem, n->entries[i].data); |
| 43 n->entries[i].data = NULL; |
| 44 } |
| 45 exif_mem_free (d->mem, n->entries); |
| 46 n->entries = NULL; |
| 47 n->count = 0; |
| 48 } |
| 49 } |
| 50 |
| 51 static void |
| 52 exif_mnote_data_pentax_free (ExifMnoteData *n) |
| 53 { |
| 54 if (!n) return; |
| 55 |
| 56 exif_mnote_data_pentax_clear ((ExifMnoteDataPentax *) n); |
| 57 } |
| 58 |
| 59 static char * |
| 60 exif_mnote_data_pentax_get_value (ExifMnoteData *d, unsigned int i, char *val, u
nsigned int maxlen) |
| 61 { |
| 62 ExifMnoteDataPentax *n = (ExifMnoteDataPentax *) d; |
| 63 |
| 64 if (!n) return NULL; |
| 65 if (n->count <= i) return NULL; |
| 66 return mnote_pentax_entry_get_value (&n->entries[i], val, maxlen); |
| 67 } |
| 68 |
| 69 /** |
| 70 * @brief save the MnoteData from ne to buf |
| 71 * |
| 72 * @param ne extract the data from this structure |
| 73 * @param *buf write the mnoteData to this buffer (buffer will be allocated) |
| 74 * @param buf_size the final size of the buffer |
| 75 */ |
| 76 static void |
| 77 exif_mnote_data_pentax_save (ExifMnoteData *ne, |
| 78 unsigned char **buf, unsigned int *buf_size) |
| 79 { |
| 80 ExifMnoteDataPentax *n = (ExifMnoteDataPentax *) ne; |
| 81 size_t i, |
| 82 base = 0, /* internal MakerNote tag number offset */ |
| 83 o2 = 4 + 2; /* offset to first tag entry, past header */ |
| 84 size_t datao = n->offset; /* this MakerNote style uses offsets |
| 85 based on main IFD, not makernote IFD */ |
| 86 |
| 87 if (!n || !buf || !buf_size) return; |
| 88 |
| 89 /* |
| 90 * Allocate enough memory for header, the number of entries, entries, |
| 91 * and next IFD pointer |
| 92 */ |
| 93 *buf_size = o2 + 2 + n->count * 12 + 4; |
| 94 switch (n->version) { |
| 95 case casioV2: |
| 96 base = MNOTE_PENTAX2_TAG_BASE; |
| 97 *buf = exif_mem_alloc (ne->mem, *buf_size); |
| 98 if (!*buf) { |
| 99 EXIF_LOG_NO_MEMORY(ne->log, "ExifMnoteDataPentax", *buf_
size); |
| 100 return; |
| 101 } |
| 102 /* Write the magic header */ |
| 103 strcpy ((char *)*buf, "QVC"); |
| 104 exif_set_short (*buf + 4, n->order, (ExifShort) 0); |
| 105 |
| 106 break; |
| 107 |
| 108 case pentaxV3: |
| 109 base = MNOTE_PENTAX2_TAG_BASE; |
| 110 *buf = exif_mem_alloc (ne->mem, *buf_size); |
| 111 if (!*buf) { |
| 112 EXIF_LOG_NO_MEMORY(ne->log, "ExifMnoteDataPentax", *buf_
size); |
| 113 return; |
| 114 } |
| 115 |
| 116 /* Write the magic header */ |
| 117 strcpy ((char *)*buf, "AOC"); |
| 118 exif_set_short (*buf + 4, n->order, (ExifShort) ( |
| 119 (n->order == EXIF_BYTE_ORDER_INTEL) ? |
| 120 ('I' << 8) | 'I' : |
| 121 ('M' << 8) | 'M')); |
| 122 break; |
| 123 |
| 124 case pentaxV2: |
| 125 base = MNOTE_PENTAX2_TAG_BASE; |
| 126 *buf = exif_mem_alloc (ne->mem, *buf_size); |
| 127 if (!*buf) { |
| 128 EXIF_LOG_NO_MEMORY(ne->log, "ExifMnoteDataPentax", *buf_
size); |
| 129 return; |
| 130 } |
| 131 |
| 132 /* Write the magic header */ |
| 133 strcpy ((char *)*buf, "AOC"); |
| 134 exif_set_short (*buf + 4, n->order, (ExifShort) 0); |
| 135 break; |
| 136 |
| 137 case pentaxV1: |
| 138 /* It looks like this format doesn't have a magic header as |
| 139 * such, just has a fixed number of entries equal to 0x001b */ |
| 140 *buf_size -= 6; |
| 141 o2 -= 6; |
| 142 *buf = exif_mem_alloc (ne->mem, *buf_size); |
| 143 if (!*buf) { |
| 144 EXIF_LOG_NO_MEMORY(ne->log, "ExifMnoteDataPentax", *buf_
size); |
| 145 return; |
| 146 } |
| 147 break; |
| 148 |
| 149 default: |
| 150 /* internal error */ |
| 151 return; |
| 152 } |
| 153 |
| 154 /* Write the number of entries. */ |
| 155 exif_set_short (*buf + o2, n->order, (ExifShort) n->count); |
| 156 o2 += 2; |
| 157 |
| 158 /* Save each entry */ |
| 159 for (i = 0; i < n->count; i++) { |
| 160 size_t doff; /* offset to current data portion of tag */ |
| 161 size_t s; |
| 162 unsigned char *t; |
| 163 size_t o = o2 + i * 12; /* current offset into output buffer *
/ |
| 164 exif_set_short (*buf + o + 0, n->order, |
| 165 (ExifShort) (n->entries[i].tag - base)); |
| 166 exif_set_short (*buf + o + 2, n->order, |
| 167 (ExifShort) n->entries[i].format); |
| 168 exif_set_long (*buf + o + 4, n->order, |
| 169 n->entries[i].components); |
| 170 o += 8; |
| 171 s = exif_format_get_size (n->entries[i].format) * |
| 172 n->entries[i].components; |
| 173 if (s > 65536) { |
| 174 /* Corrupt data: EXIF data size is limited to the |
| 175 * maximum size of a JPEG segment (64 kb). |
| 176 */ |
| 177 continue; |
| 178 } |
| 179 if (s > 4) { |
| 180 size_t ts = *buf_size + s; |
| 181 doff = *buf_size; |
| 182 t = exif_mem_realloc (ne->mem, *buf, |
| 183 sizeof (char) * ts); |
| 184 if (!t) { |
| 185 EXIF_LOG_NO_MEMORY(ne->log, "ExifMnoteDataPentax
", ts); |
| 186 return; |
| 187 } |
| 188 *buf = t; |
| 189 *buf_size = ts; |
| 190 exif_set_long (*buf + o, n->order, datao + doff); |
| 191 } else |
| 192 doff = o; |
| 193 |
| 194 /* Write the data. */ |
| 195 if (n->entries[i].data) { |
| 196 memcpy (*buf + doff, n->entries[i].data, s); |
| 197 } else { |
| 198 /* Most certainly damaged input file */ |
| 199 memset (*buf + doff, 0, s); |
| 200 } |
| 201 } |
| 202 |
| 203 /* Sanity check the buffer size */ |
| 204 if (*buf_size < (o2 + n->count * 12 + 4)) { |
| 205 exif_log (ne->log, EXIF_LOG_CODE_CORRUPT_DATA, "ExifMnoteDataPen
tax", |
| 206 "Buffer overflow"); |
| 207 } |
| 208 |
| 209 /* Reset next IFD pointer */ |
| 210 exif_set_long (*buf + o2 + n->count * 12, n->order, 0); |
| 211 } |
| 212 |
| 213 static void |
| 214 exif_mnote_data_pentax_load (ExifMnoteData *en, |
| 215 const unsigned char *buf, unsigned int buf_size) |
| 216 { |
| 217 ExifMnoteDataPentax *n = (ExifMnoteDataPentax *) en; |
| 218 size_t i, tcount, o, datao, base = 0; |
| 219 ExifShort c; |
| 220 |
| 221 if (!n || !buf || !buf_size) { |
| 222 exif_log (en->log, EXIF_LOG_CODE_CORRUPT_DATA, |
| 223 "ExifMnoteDataPentax", "Short MakerNote"); |
| 224 return; |
| 225 } |
| 226 datao = 6 + n->offset; |
| 227 if ((datao + 8 < datao) || (datao + 8 < 8) || (datao + 8 > buf_size)) { |
| 228 exif_log (en->log, EXIF_LOG_CODE_CORRUPT_DATA, |
| 229 "ExifMnoteDataPentax", "Short MakerNote"); |
| 230 return; |
| 231 } |
| 232 |
| 233 /* Detect variant of Pentax/Casio MakerNote found */ |
| 234 if (!memcmp(buf + datao, "AOC", 4)) { |
| 235 if ((buf[datao + 4] == 'I') && (buf[datao + 5] == 'I')) { |
| 236 n->version = pentaxV3; |
| 237 n->order = EXIF_BYTE_ORDER_INTEL; |
| 238 } else if ((buf[datao + 4] == 'M') && (buf[datao + 5] == 'M')) { |
| 239 n->version = pentaxV3; |
| 240 n->order = EXIF_BYTE_ORDER_MOTOROLA; |
| 241 } else { |
| 242 /* Uses Casio v2 tags */ |
| 243 n->version = pentaxV2; |
| 244 } |
| 245 exif_log (en->log, EXIF_LOG_CODE_DEBUG, "ExifMnoteDataPentax", |
| 246 "Parsing Pentax maker note v%d...", (int)n->version); |
| 247 datao += 4 + 2; |
| 248 base = MNOTE_PENTAX2_TAG_BASE; |
| 249 } else if (!memcmp(buf + datao, "QVC", 4)) { |
| 250 exif_log (en->log, EXIF_LOG_CODE_DEBUG, "ExifMnoteDataPentax", |
| 251 "Parsing Casio maker note v2..."); |
| 252 n->version = casioV2; |
| 253 base = MNOTE_CASIO2_TAG_BASE; |
| 254 datao += 4 + 2; |
| 255 } else { |
| 256 /* probably assert(!memcmp(buf + datao, "\x00\x1b", 2)) */ |
| 257 exif_log (en->log, EXIF_LOG_CODE_DEBUG, "ExifMnoteDataPentax", |
| 258 "Parsing Pentax maker note v1..."); |
| 259 n->version = pentaxV1; |
| 260 } |
| 261 |
| 262 /* Read the number of tags */ |
| 263 c = exif_get_short (buf + datao, n->order); |
| 264 datao += 2; |
| 265 |
| 266 /* Remove any old entries */ |
| 267 exif_mnote_data_pentax_clear (n); |
| 268 |
| 269 /* Reserve enough space for all the possible MakerNote tags */ |
| 270 n->entries = exif_mem_alloc (en->mem, sizeof (MnotePentaxEntry) * c); |
| 271 if (!n->entries) { |
| 272 EXIF_LOG_NO_MEMORY(en->log, "ExifMnoteDataPentax", sizeof (Mnote
PentaxEntry) * c); |
| 273 return; |
| 274 } |
| 275 |
| 276 /* Parse all c entries, storing ones that are successfully parsed */ |
| 277 tcount = 0; |
| 278 for (i = c, o = datao; i; --i, o += 12) { |
| 279 size_t s; |
| 280 if ((o + 12 < o) || (o + 12 < 12) || (o + 12 > buf_size)) { |
| 281 exif_log (en->log, EXIF_LOG_CODE_CORRUPT_DATA, |
| 282 "ExifMnoteDataPentax", "Short MakerNote"); |
| 283 break; |
| 284 } |
| 285 |
| 286 n->entries[tcount].tag = exif_get_short (buf + o + 0, n->
order) + base; |
| 287 n->entries[tcount].format = exif_get_short (buf + o + 2, n->
order); |
| 288 n->entries[tcount].components = exif_get_long (buf + o + 4, n->
order); |
| 289 n->entries[tcount].order = n->order; |
| 290 |
| 291 exif_log (en->log, EXIF_LOG_CODE_DEBUG, "ExifMnotePentax", |
| 292 "Loading entry 0x%x ('%s')...", n->entries[tcount].tag
, |
| 293 mnote_pentax_tag_get_name (n->entries[tcount].tag)); |
| 294 |
| 295 /* |
| 296 * Size? If bigger than 4 bytes, the actual data is not |
| 297 * in the entry but somewhere else (offset). |
| 298 */ |
| 299 s = exif_format_get_size (n->entries[tcount].format) * |
| 300 n->entries[tcount].components; |
| 301 n->entries[tcount].size = s; |
| 302 if (s) { |
| 303 size_t dataofs = o + 8; |
| 304 if (s > 4) |
| 305 /* The data in this case is merely a pointer */ |
| 306 dataofs = exif_get_long (buf + dataofs, n->order
) + 6; |
| 307 if ((dataofs + s < dataofs) || (dataofs + s < s) || |
| 308 (dataofs + s > buf_size)) { |
| 309 exif_log (en->log, EXIF_LOG_CODE_DEBUG, |
| 310 "ExifMnoteDataPentax", "Tag da
ta past end " |
| 311 "of buffer (%u > %u)", dataofs + s, bu
f_size); |
| 312 continue; |
| 313 } |
| 314 |
| 315 n->entries[tcount].data = exif_mem_alloc (en->mem, s); |
| 316 if (!n->entries[tcount].data) { |
| 317 EXIF_LOG_NO_MEMORY(en->log, "ExifMnoteDataPentax
", s); |
| 318 continue; |
| 319 } |
| 320 memcpy (n->entries[tcount].data, buf + dataofs, s); |
| 321 } |
| 322 |
| 323 /* Tag was successfully parsed */ |
| 324 ++tcount; |
| 325 } |
| 326 /* Store the count of successfully parsed tags */ |
| 327 n->count = tcount; |
| 328 } |
| 329 |
| 330 static unsigned int |
| 331 exif_mnote_data_pentax_count (ExifMnoteData *n) |
| 332 { |
| 333 return n ? ((ExifMnoteDataPentax *) n)->count : 0; |
| 334 } |
| 335 |
| 336 static unsigned int |
| 337 exif_mnote_data_pentax_get_id (ExifMnoteData *d, unsigned int n) |
| 338 { |
| 339 ExifMnoteDataPentax *note = (ExifMnoteDataPentax *) d; |
| 340 |
| 341 if (!note) return 0; |
| 342 if (note->count <= n) return 0; |
| 343 return note->entries[n].tag; |
| 344 } |
| 345 |
| 346 static const char * |
| 347 exif_mnote_data_pentax_get_name (ExifMnoteData *d, unsigned int n) |
| 348 { |
| 349 ExifMnoteDataPentax *note = (ExifMnoteDataPentax *) d; |
| 350 |
| 351 if (!note) return NULL; |
| 352 if (note->count <= n) return NULL; |
| 353 return mnote_pentax_tag_get_name (note->entries[n].tag); |
| 354 } |
| 355 |
| 356 static const char * |
| 357 exif_mnote_data_pentax_get_title (ExifMnoteData *d, unsigned int n) |
| 358 { |
| 359 ExifMnoteDataPentax *note = (ExifMnoteDataPentax *) d; |
| 360 |
| 361 if (!note) return NULL; |
| 362 if (note->count <= n) return NULL; |
| 363 return mnote_pentax_tag_get_title (note->entries[n].tag); |
| 364 } |
| 365 |
| 366 static const char * |
| 367 exif_mnote_data_pentax_get_description (ExifMnoteData *d, unsigned int n) |
| 368 { |
| 369 ExifMnoteDataPentax *note = (ExifMnoteDataPentax *) d; |
| 370 |
| 371 if (!note) return NULL; |
| 372 if (note->count <= n) return NULL; |
| 373 return mnote_pentax_tag_get_description (note->entries[n].tag); |
| 374 } |
| 375 |
| 376 static void |
| 377 exif_mnote_data_pentax_set_offset (ExifMnoteData *d, unsigned int o) |
| 378 { |
| 379 if (d) ((ExifMnoteDataPentax *) d)->offset = o; |
| 380 } |
| 381 |
| 382 static void |
| 383 exif_mnote_data_pentax_set_byte_order (ExifMnoteData *d, ExifByteOrder o) |
| 384 { |
| 385 ExifByteOrder o_orig; |
| 386 ExifMnoteDataPentax *n = (ExifMnoteDataPentax *) d; |
| 387 unsigned int i; |
| 388 |
| 389 if (!n) return; |
| 390 |
| 391 o_orig = n->order; |
| 392 n->order = o; |
| 393 for (i = 0; i < n->count; i++) { |
| 394 n->entries[i].order = o; |
| 395 exif_array_set_byte_order (n->entries[i].format, n->entries[i].d
ata, |
| 396 n->entries[i].components, o_orig, o); |
| 397 } |
| 398 } |
| 399 |
| 400 int |
| 401 exif_mnote_data_pentax_identify (const ExifData *ed, const ExifEntry *e) |
| 402 { |
| 403 if ((e->size >= 8) && !memcmp (e->data, "AOC", 4)) { |
| 404 if (((e->data[4] == 'I') && (e->data[5] == 'I')) || |
| 405 ((e->data[4] == 'M') && (e->data[5] == 'M'))) |
| 406 return pentaxV3; |
| 407 else |
| 408 /* Uses Casio v2 tags */ |
| 409 return pentaxV2; |
| 410 } |
| 411 |
| 412 if ((e->size >= 8) && !memcmp (e->data, "QVC", 4)) |
| 413 return casioV2; |
| 414 |
| 415 /* This isn't a very robust test, so make sure it's done last */ |
| 416 /* Maybe we should additionally check for a make of Asahi or Pentax */ |
| 417 if ((e->size >= 2) && (e->data[0] == 0x00) && (e->data[1] == 0x1b)) |
| 418 return pentaxV1; |
| 419 |
| 420 return 0; |
| 421 } |
| 422 |
| 423 ExifMnoteData * |
| 424 exif_mnote_data_pentax_new (ExifMem *mem) |
| 425 { |
| 426 ExifMnoteData *d; |
| 427 |
| 428 if (!mem) return NULL; |
| 429 |
| 430 d = exif_mem_alloc (mem, sizeof (ExifMnoteDataPentax)); |
| 431 if (!d) return NULL; |
| 432 |
| 433 exif_mnote_data_construct (d, mem); |
| 434 |
| 435 /* Set up function pointers */ |
| 436 d->methods.free = exif_mnote_data_pentax_free; |
| 437 d->methods.set_byte_order = exif_mnote_data_pentax_set_byte_order; |
| 438 d->methods.set_offset = exif_mnote_data_pentax_set_offset; |
| 439 d->methods.load = exif_mnote_data_pentax_load; |
| 440 d->methods.save = exif_mnote_data_pentax_save; |
| 441 d->methods.count = exif_mnote_data_pentax_count; |
| 442 d->methods.get_id = exif_mnote_data_pentax_get_id; |
| 443 d->methods.get_name = exif_mnote_data_pentax_get_name; |
| 444 d->methods.get_title = exif_mnote_data_pentax_get_title; |
| 445 d->methods.get_description = exif_mnote_data_pentax_get_description; |
| 446 d->methods.get_value = exif_mnote_data_pentax_get_value; |
| 447 |
| 448 return d; |
| 449 } |
OLD | NEW |