src/exif.c

   1 /*
   2  *  GQView
   3  *  (C) 2006 John Ellis
   4  *
   5  *  Authors:
   6  *    Support for Exif file format, originally written by Eric Swalens.
   7  *    Modified by Quy Tonthat
   8  *
   9  *    Reimplemented with generic data storage by John Ellis (Nov 2003)
  10  *
  11  *  The tags were added with information from the FREE document:
  12  *     http://www.ba.wakwak.com/~tsuruzoh/Computer/Digicams/exif-e.html
  13  *
  14  *  For the official Exif Format, please refer to:
  15  *     http://www.exif.org
  16  *     http://www.exif.org/specifications.html (PDF spec sheets)
  17  *
  18  *  Notes:
  19  *     Additional tag formats should be added to the proper
  20  *     location in ExifKnownMarkersList[].
  21  *
  22  *     Human readable ouput (that needs additional processing of data to
  23  *     be useable) can be defined by adding a key to ExifFormattedList[],
  24  *     then handling that tag in the function exif_get_formatted_by_key().
  25  *     The human readable formatted keys must begin with the character 'f'.
  26  *
  27  *  Unsupported at this time:
  28  *     IFD1 (thumbnail)
  29  *     MakerNote
  30  *     GPSInfo
  31  *
  32  *  TODO:
  33  *     Convert data to useable form in the ??_as_text function for:
  34  *        ComponentsConfiguration
  35  *        UserComment (convert this to UTF-8?)
  36  *
  37
  38     This program is free software; you can redistribute it and/or modify
  39     it under the terms of the GNU General Public License as published by
  40     the Free Software Foundation; either version 2 of the License, or
  41     (at your option) any later version.
  42
  43     This program is distributed in the hope that it will be useful,
  44     but WITHOUT ANY WARRANTY; without even the implied warranty of
  45     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  46     GNU General Public License for more details.
  47
  48     You should have received a copy of the GNU General Public License
  49     along with this program; if not, write to the Free Software
  50     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  51 */
  52
  53 #ifdef HAVE_CONFIG_H
  54 #  include "config.h"
  55 #endif
  56
  57 #ifndef HAVE_EXIV2
  58
  59 #include <stdio.h>
  60 #include <string.h>
  61 #include <fcntl.h>
  62 #include <unistd.h>
  63 #include <sys/types.h>
  64 #include <sys/stat.h>
  65 #include <sys/mman.h>
  66 #include <math.h>
  67
  68 #include <glib.h>
  69
  70 #include "intl.h"
  71
  72 #include "main.h"
  73 #include "exif-int.h"
  74
  75 #include "format_raw.h"
  76 #include "ui_fileops.h"
  77
  78
  79 /*
  80  *-----------------------------------------------------------------------------
  81  * Tag formats
  82  *-----------------------------------------------------------------------------
  83  */
  84
  85 ExifFormatAttrib ExifFormatList[] = {
  86         { EXIF_FORMAT_UNKNOWN,          1, "unknown",   "unknown" },
  87         { EXIF_FORMAT_BYTE_UNSIGNED,    1, "ubyte",     "unsigned byte" },
  88         { EXIF_FORMAT_STRING,           1, "string",    "string" },
  89         { EXIF_FORMAT_SHORT_UNSIGNED,   2, "ushort",    "unsigned short" },
  90         { EXIF_FORMAT_LONG_UNSIGNED,    4, "ulong",     "unsigned long" },
  91         { EXIF_FORMAT_RATIONAL_UNSIGNED,8, "urational", "unsigned rational" },
  92         { EXIF_FORMAT_BYTE,             1, "byte",      "byte" },
  93         { EXIF_FORMAT_UNDEFINED,        1, "undefined", "undefined" },
  94         { EXIF_FORMAT_SHORT,            2, "sshort",    "signed short" },
  95         { EXIF_FORMAT_LONG,             4, "slong",     "signed long" },
  96         { EXIF_FORMAT_RATIONAL,         8, "srational", "signed rational" },
  97         { EXIF_FORMAT_FLOAT,            4, "float",     "float" },
  98         { EXIF_FORMAT_DOUBLE,           8, "double",    "double" },
  99         { -1, 0, NULL }
 100 };
 101
 102 /* tags that are special, or need special treatment */
 103 #define TAG_EXIFOFFSET          0x8769
 104 #define TAG_EXIFMAKERNOTE       0x927c
 105
 106
 107 /*
 108  *-----------------------------------------------------------------------------
 109  * Data
 110  *-----------------------------------------------------------------------------
 111  */
 112 static ExifTextList ExifCompressionList[] = {
 113         { 1, "Uncompressed" },
 114         { 2, "CCITT 1D" },
 115         { 3, "T4/Group 3 Fax" },
 116         { 4, "T6/Group 4 Fax" },
 117         { 5, "LZW" },
 118         { 6, "JPEG (old style)" },
 119         { 7, "JPEG" },
 120         { 8, "Adobe Deflate" },
 121         { 9, "JBIG B&W" },
 122         { 10, "JBIG Color" },
 123         { 32766, "Next" },
 124         { 32771, "CCIRLEW" },
 125         { 32773, "PackBits" },
 126         { 32809, "ThunderScan" },
 127         { 32895, "IT8CTPAD" },
 128         { 32896, "IT8LW" },
 129         { 32897, "IT8MP" },
 130         { 32898, "IT8BL" },
 131         { 32908, "PixasFilm" },
 132         { 32909, "PixasLog" },
 133         { 32946, "Deflate" },
 134         { 32947, "DCS" },
 135         { 34661, "JBIG" },
 136         { 34676, "SGILog" },
 137         { 34677, "SGILog24" },
 138         { 34712, "JPEF 2000" },
 139         { 34713, "Nikon NEF Compressed" },
 140         EXIF_TEXT_LIST_END
 141 };
 142
 143 static ExifTextList ExifOrientationList[] = {
 144         { EXIF_ORIENTATION_UNKNOWN,     N_("unknown") },
 145         { EXIF_ORIENTATION_TOP_LEFT,    N_("top left") },
 146         { EXIF_ORIENTATION_TOP_RIGHT,   N_("top right") },
 147         { EXIF_ORIENTATION_BOTTOM_RIGHT,N_("bottom right") },
 148         { EXIF_ORIENTATION_BOTTOM_LEFT, N_("bottom left") },
 149         { EXIF_ORIENTATION_LEFT_TOP,    N_("left top") },
 150         { EXIF_ORIENTATION_RIGHT_TOP,   N_("right top") },
 151         { EXIF_ORIENTATION_RIGHT_BOTTOM,N_("right bottom") },
 152         { EXIF_ORIENTATION_LEFT_BOTTOM, N_("left bottom") },
 153         EXIF_TEXT_LIST_END
 154 };
 155
 156 static ExifTextList ExifUnitList[] = {
 157         { EXIF_UNIT_UNKNOWN,    N_("unknown") },
 158         { EXIF_UNIT_NOUNIT,     "" },
 159         { EXIF_UNIT_INCH,       N_("inch") },
 160         { EXIF_UNIT_CENTIMETER, N_("centimeter") },
 161         EXIF_TEXT_LIST_END
 162 };
 163
 164 static ExifTextList ExifYCbCrPosList[] = {
 165         { 1,    "center" },
 166         { 2,    "datum" },
 167         EXIF_TEXT_LIST_END
 168 };
 169
 170 static ExifTextList ExifMeteringModeList[] = {
 171         { 0,    N_("unknown") },
 172         { 1,    N_("average") },
 173         { 2,    N_("center weighted") },
 174         { 3,    N_("spot") },
 175         { 4,    N_("multi-spot") },
 176         { 5,    N_("multi-segment") },
 177         { 6,    N_("partial") },
 178         { 255,  N_("other") },
 179         EXIF_TEXT_LIST_END
 180 };
 181
 182 static ExifTextList ExifExposureProgramList[] = {
 183         { 0,    N_("not defined") },
 184         { 1,    N_("manual") },
 185         { 2,    N_("normal") },
 186         { 3,    N_("aperture") },
 187         { 4,    N_("shutter") },
 188         { 5,    N_("creative") },
 189         { 6,    N_("action") },
 190         { 7,    N_("portrait") },
 191         { 8,    N_("landscape") },
 192         EXIF_TEXT_LIST_END
 193 };
 194
 195 static ExifTextList ExifLightSourceList[] = {
 196         { 0,    N_("unknown") },
 197         { 1,    N_("daylight") },
 198         { 2,    N_("fluorescent") },
 199         { 3,    N_("tungsten (incandescent)") },
 200         { 4,    N_("flash") },
 201         { 9,    N_("fine weather") },
 202         { 10,   N_("cloudy weather") },
 203         { 11,   N_("shade") },
 204         { 12,   N_("daylight fluorescent") },
 205         { 13,   N_("day white fluorescent") },
 206         { 14,   N_("cool white fluorescent") },
 207         { 15,   N_("white fluorescent") },
 208         { 17,   N_("standard light A") },
 209         { 18,   N_("standard light B") },
 210         { 19,   N_("standard light C") },
 211         { 20,   N_("D55") },
 212         { 21,   N_("D65") },
 213         { 22,   N_("D75") },
 214         { 23,   N_("D50") },
 215         { 24,   N_("ISO studio tungsten") },
 216         { 255,  N_("other") },
 217         EXIF_TEXT_LIST_END
 218 };
 219
 220 static ExifTextList ExifFlashList[] = {
 221         { 0,    N_("no") },
 222         { 1,    N_("yes") },
 223         { 5,    N_("yes, not detected by strobe") },
 224         { 7,    N_("yes, detected by strobe") },
 225         EXIF_TEXT_LIST_END
 226 };
 227
 228 static ExifTextList ExifColorSpaceList[] = {
 229         { 1,    N_("sRGB") },
 230         { 65535,N_("uncalibrated") },
 231         EXIF_TEXT_LIST_END
 232 };
 233
 234 static ExifTextList ExifSensorList[] = {
 235         { 1,    N_("not defined") },
 236         { 2,    N_("1 chip color area") },
 237         { 2,    N_("2 chip color area") },
 238         { 4,    N_("3 chip color area") },
 239         { 5,    N_("color sequential area") },
 240         { 7,    N_("trilinear") },
 241         { 8,    N_("color sequential linear") },
 242         EXIF_TEXT_LIST_END
 243 };
 244
 245 static ExifTextList ExifSourceList[] = {
 246         { 3,    N_("digital still camera") },
 247         EXIF_TEXT_LIST_END
 248 };
 249
 250 static ExifTextList ExifSceneList[] = {
 251         { 1,    N_("direct photo") },
 252         EXIF_TEXT_LIST_END
 253 };
 254
 255 static ExifTextList ExifCustRenderList[] = {
 256         { 0,    N_("normal") },
 257         { 1,    N_("custom") },
 258         EXIF_TEXT_LIST_END
 259 };
 260
 261 static ExifTextList ExifExposureModeList[] = {
 262         { 0,    N_("auto") },
 263         { 1,    N_("manual") },
 264         { 2,    N_("auto bracket") },
 265         EXIF_TEXT_LIST_END
 266 };
 267
 268 static ExifTextList ExifWhiteBalanceList[] = {
 269         { 0,    N_("auto") },
 270         { 1,    N_("manual") },
 271         EXIF_TEXT_LIST_END
 272 };
 273
 274 static ExifTextList ExifSceneCaptureList[] = {
 275         { 0,    N_("standard") },
 276         { 1,    N_("landscape") },
 277         { 2,    N_("portrait") },
 278         { 3,    N_("night scene") },
 279         EXIF_TEXT_LIST_END
 280 };
 281
 282 static ExifTextList ExifGainControlList[] = {
 283         { 0,    N_("none") },
 284         { 1,    N_("low gain up") },
 285         { 2,    N_("high gain up") },
 286         { 3,    N_("low gain down") },
 287         { 4,    N_("high gain down") },
 288         EXIF_TEXT_LIST_END
 289 };
 290
 291 static ExifTextList ExifContrastList[] = {
 292         { 0,    N_("normal") },
 293         { 1,    N_("soft") },
 294         { 2,    N_("hard") },
 295         EXIF_TEXT_LIST_END
 296 };
 297
 298 static ExifTextList ExifSaturationList[] = {
 299         { 0,    N_("normal") },
 300         { 1,    N_("low") },
 301         { 2,    N_("high") },
 302         EXIF_TEXT_LIST_END
 303 };
 304
 305 static ExifTextList ExifSharpnessList[] = {
 306         { 0,    N_("normal") },
 307         { 1,    N_("soft") },
 308         { 2,    N_("hard") },
 309         EXIF_TEXT_LIST_END
 310 };
 311
 312 static ExifTextList ExifSubjectRangeList[] = {
 313         { 0,    N_("unknown") },
 314         { 1,    N_("macro") },
 315         { 2,    N_("close") },
 316         { 3,    N_("distant") },
 317         EXIF_TEXT_LIST_END
 318 };
 319
 320 /*
 321 Tag names should match to exiv2 keys, http://www.exiv2.org/metadata.html
 322 Tags that don't match are not supported by exiv2 and should not be used anywhere in the code
 323 */
 324
 325 ExifMarker ExifKnownMarkersList[] = {
 326 { 0x0100, EXIF_FORMAT_LONG_UNSIGNED, 1,         "Exif.Image.ImageWidth",        N_("Image Width"), NULL },
 327 { 0x0101, EXIF_FORMAT_LONG_UNSIGNED, 1,         "Exif.Image.ImageLength",       N_("Image Height"), NULL },
 328 { 0x0102, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Image.BitsPerSample",     N_("Bits per Sample/Pixel"), NULL },
 329 { 0x0103, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Image.Compression",       N_("Compression"), ExifCompressionList },
 330 { 0x010e, EXIF_FORMAT_STRING, -1,               "Exif.Image.ImageDescription",  N_("Image description"), NULL },
 331 { 0x010f, EXIF_FORMAT_STRING, -1,               "Exif.Image.Make",              N_("Camera make"), NULL },
 332 { 0x0110, EXIF_FORMAT_STRING, -1,               "Exif.Image.Model",             N_("Camera model"), NULL },
 333 { 0x0112, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Image.Orientation",       N_("Orientation"), ExifOrientationList },
 334 { 0x011a, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Image.XResolution",       N_("X resolution"), NULL },
 335 { 0x011b, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Image.YResolution",       N_("Y Resolution"), NULL },
 336 { 0x0128, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Image.ResolutionUnit",    N_("Resolution units"), ExifUnitList },
 337 { 0x0131, EXIF_FORMAT_STRING, -1,               "Exif.Image.Software",          N_("Firmware"), NULL },
 338 { 0x0132, EXIF_FORMAT_STRING, 20,               "Exif.Image.DateTime",          N_("Date"), NULL },
 339 { 0x013e, EXIF_FORMAT_RATIONAL_UNSIGNED, 2,     "Exif.Image.WhitePoint",        N_("White point"), NULL },
 340 { 0x013f, EXIF_FORMAT_RATIONAL_UNSIGNED, 6,     "Exif.Image.PrimaryChromaticities",N_("Primary chromaticities"), NULL },
 341 { 0x0211, EXIF_FORMAT_RATIONAL_UNSIGNED, 3,     "Exif.Image.YCbCrCoefficients", N_("YCbCy coefficients"), NULL },
 342 { 0x0213, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Image.YCbCrPositioning",  N_("YCbCr positioning"), ExifYCbCrPosList },
 343 { 0x0214, EXIF_FORMAT_RATIONAL_UNSIGNED, 6,     "Exif.Image.ReferenceBlackWhite",N_("Black white reference"), NULL },
 344 { 0x8298, EXIF_FORMAT_STRING, -1,               "Exif.Image.Copyright",         N_("Copyright"), NULL },
 345 { 0x8769, EXIF_FORMAT_LONG_UNSIGNED, 1,         "Exif.Image.ExifTag",           N_("SubIFD Exif offset"), NULL },
 346         /* subIFD follows */
 347 { 0x829a, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.ExposureTime",      N_("Exposure time (seconds)"), NULL },
 348 { 0x829d, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.FNumber",           N_("FNumber"), NULL },
 349 { 0x8822, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.ExposureProgram",   N_("Exposure program"), ExifExposureProgramList },
 350 { 0x8824, EXIF_FORMAT_STRING, -1,               "Exif.Photo.SpectralSensitivity",N_("Spectral Sensitivity"), NULL },
 351 { 0x8827, EXIF_FORMAT_SHORT_UNSIGNED, -1,       "Exif.Photo.ISOSpeedRatings",   N_("ISO sensitivity"), NULL },
 352 { 0x8828, EXIF_FORMAT_UNDEFINED, -1,            "Exif.Photo.OECF",              N_("Optoelectric conversion factor"), NULL },
 353 { 0x9000, EXIF_FORMAT_UNDEFINED, 4,             "Exif.Photo.ExifVersion",       N_("Exif version"), NULL },
 354 { 0x9003, EXIF_FORMAT_STRING, 20,               "Exif.Photo.DateTimeOriginal",  N_("Date original"), NULL },
 355 { 0x9004, EXIF_FORMAT_STRING, 20,               "Exif.Photo.DateTimeDigitized", N_("Date digitized"), NULL },
 356 { 0x9101, EXIF_FORMAT_UNDEFINED, -1,            "Exif.Photo.ComponentsConfiguration",N_("Pixel format"), NULL },
 357 { 0x9102, EXIF_FORMAT_RATIONAL_UNSIGNED,1,      "Exif.Photo.CompressedBitsPerPixel",N_("Compression ratio"), NULL },
 358 { 0x9201, EXIF_FORMAT_RATIONAL, 1,              "Exif.Photo.ShutterSpeedValue", N_("Shutter speed"), NULL },
 359 { 0x9202, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.ApertureValue",     N_("Aperture"), NULL },
 360 { 0x9203, EXIF_FORMAT_RATIONAL, 1,              "Exif.Photo.BrightnessValue",   N_("Brightness"), NULL },
 361 { 0x9204, EXIF_FORMAT_RATIONAL, 1,              "Exif.Photo.ExposureBiasValue", N_("Exposure bias"), NULL },
 362 { 0x9205, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.MaxApertureValue",  N_("Maximum aperture"), NULL },
 363 { 0x9206, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.SubjectDistance",   N_("Subject distance"), NULL },
 364 { 0x9207, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.MeteringMode",      N_("Metering mode"), ExifMeteringModeList },
 365 { 0x9208, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.LightSource",       N_("Light source"), ExifLightSourceList },
 366 { 0x9209, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.Flash",             N_("Flash"), ExifFlashList },
 367 { 0x920a, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.FocalLength",       N_("Focal length"), NULL },
 368 { 0x9214, EXIF_FORMAT_SHORT_UNSIGNED, -1,       "Exif.Photo.SubjectArea",       N_("Subject area"), NULL },
 369 { 0x927c, EXIF_FORMAT_UNDEFINED, -1,            "Exif.Photo.MakerNote",         N_("MakerNote"), NULL },
 370 { 0x9286, EXIF_FORMAT_UNDEFINED, -1,            "Exif.Photo.UserComment",       N_("UserComment"), NULL },
 371 { 0x9290, EXIF_FORMAT_STRING, -1,               "Exif.Photo.SubSecTime",        N_("Subsecond time"), NULL },
 372 { 0x9291, EXIF_FORMAT_STRING, -1,               "Exif.Photo.SubSecTimeOriginal",N_("Subsecond time original"), NULL },
 373 { 0x9292, EXIF_FORMAT_STRING, -1,               "Exif.Photo.SubSecTimeDigitized",N_("Subsecond time digitized"), NULL },
 374 { 0xa000, EXIF_FORMAT_UNDEFINED, 4,             "Exif.Photo.FlashpixVersion",   N_("FlashPix version"), NULL },
 375 { 0xa001, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.ColorSpace",        N_("Colorspace"), ExifColorSpaceList },
 376         /* ExifImageWidth, ExifImageHeight can also be unsigned short */
 377 { 0xa002, EXIF_FORMAT_LONG_UNSIGNED, 1,         "Exif.Photo.PixelXDimension",   N_("Width"), NULL },
 378 { 0xa003, EXIF_FORMAT_LONG_UNSIGNED, 1,         "Exif.Photo.PixelYDimension",   N_("Height"), NULL },
 379 { 0xa004, EXIF_FORMAT_STRING, -1,               "Exif.Photo.RelatedSoundFile",  N_("Audio data"), NULL },
 380 { 0xa005, EXIF_FORMAT_LONG_UNSIGNED, 1,         "ExifInteroperabilityOffset",   N_("ExifR98 extension"), NULL },
 381 { 0xa20b, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.FlashEnergy",       N_("Flash strength"), NULL },
 382 { 0xa20c, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.SpatialFrequencyResponse",N_("Spatial frequency response"), NULL },
 383 { 0xa20e, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.FocalPlaneXResolution", N_("X Pixel density"), NULL },
 384 { 0xa20f, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.FocalPlaneYResolution", N_("Y Pixel density"), NULL },
 385 { 0xa210, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.FocalPlaneResolutionUnit", N_("Pixel density units"), ExifUnitList },
 386 { 0x0214, EXIF_FORMAT_SHORT_UNSIGNED, 2,        "Exif.Photo.SubjectLocation",   N_("Subject location"), NULL },
 387 { 0xa215, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.ExposureIndex",     N_("ISO sensitivity"), NULL },
 388 { 0xa217, EXIF_FORMAT_SHORT_UNSIGNED, -1,       "Exif.Photo.SensingMethod",     N_("Sensor type"), ExifSensorList },
 389 { 0xa300, EXIF_FORMAT_UNDEFINED, 1,             "Exif.Photo.FileSource",        N_("Source type"), ExifSourceList },
 390 { 0xa301, EXIF_FORMAT_UNDEFINED, 1,             "Exif.Photo.SceneType",         N_("Scene type"), ExifSceneList },
 391 { 0xa302, EXIF_FORMAT_UNDEFINED, -1,            "Exif.Image.CFAPattern",        N_("Color filter array pattern"), NULL },
 392         /* tags a4xx were added for Exif 2.2 (not just these - some above, as well) */
 393 { 0xa401, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.CustomRendered",    N_("Render process"), ExifCustRenderList },
 394 { 0xa402, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.ExposureMode",      N_("Exposure mode"), ExifExposureModeList },
 395 { 0xa403, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.WhiteBalance",      N_("White balance"), ExifWhiteBalanceList },
 396 { 0xa404, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.DigitalZoomRatio",  N_("Digital zoom ratio"), NULL },
 397 { 0xa405, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.FocalLengthIn35mmFilm",N_("Focal length (35mm)"), NULL },
 398 { 0xa406, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.SceneCaptureType",  N_("Scene capture type"), ExifSceneCaptureList },
 399 { 0xa407, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.GainControl",       N_("Gain control"), ExifGainControlList },
 400 { 0xa408, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.Contrast",          N_("Contrast"), ExifContrastList },
 401 { 0xa409, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.Saturation",        N_("Saturation"), ExifSaturationList },
 402 { 0xa40a, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.Sharpness",         N_("Sharpness"), ExifSharpnessList },
 403 { 0xa40b, EXIF_FORMAT_UNDEFINED, -1,            "Exif.Photo.DeviceSettingDescription",N_("Device setting"), NULL },
 404 { 0xa40c, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Exif.Photo.SubjectDistanceRange",N_("Subject range"), ExifSubjectRangeList },
 405 { 0xa420, EXIF_FORMAT_STRING, -1,               "Exif.Photo.ImageUniqueID",     N_("Image serial number"), NULL },
 406         /* place known, but undocumented or lesser used tags here */
 407 { 0x00fe, EXIF_FORMAT_LONG_UNSIGNED, 1,         "Exif.Image.NewSubfileType",    NULL, NULL },
 408 { 0x00ff, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "SubfileType",                  NULL, NULL },
 409 { 0x012d, EXIF_FORMAT_SHORT_UNSIGNED, 3,        "Exif.Image.TransferFunction",  NULL, NULL },
 410 { 0x013b, EXIF_FORMAT_STRING, -1,               "Exif.Image.Artist",            "Artist", NULL },
 411 { 0x013d, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Predictor",            NULL, NULL },
 412 { 0x0142, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "TileWidth",            NULL, NULL },
 413 { 0x0143, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "TileLength",           NULL, NULL },
 414 { 0x0144, EXIF_FORMAT_LONG_UNSIGNED, -1,        "TileOffsets",          NULL, NULL },
 415 { 0x0145, EXIF_FORMAT_SHORT_UNSIGNED, -1,       "TileByteCounts",       NULL, NULL },
 416 { 0x014a, EXIF_FORMAT_LONG_UNSIGNED, -1,        "Exif.Image.SubIFDs",           NULL, NULL },
 417 { 0x015b, EXIF_FORMAT_UNDEFINED, -1,            "JPEGTables",           NULL, NULL },
 418 { 0x828d, EXIF_FORMAT_SHORT_UNSIGNED, 2,        "Exif.Image.CFARepeatPatternDim",       NULL, NULL },
 419 { 0x828e, EXIF_FORMAT_BYTE_UNSIGNED, -1,        "Exif.Image.CFAPattern",                NULL, NULL },
 420 { 0x828f, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Image.BatteryLevel",              NULL, NULL },
 421 { 0x83bb, EXIF_FORMAT_LONG_UNSIGNED, -1,        "IPTC/NAA",             NULL, NULL },
 422 { 0x8773, EXIF_FORMAT_UNDEFINED, -1,            "Exif.Image.InterColorProfile",         NULL, NULL },
 423 { 0x8825, EXIF_FORMAT_LONG_UNSIGNED, 1,         "GPSInfo",              "SubIFD GPS offset", NULL },
 424 { 0x8829, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "Interlace",            NULL, NULL },
 425 { 0x882a, EXIF_FORMAT_SHORT, 1,                 "TimeZoneOffset",       NULL, NULL },
 426 { 0x882b, EXIF_FORMAT_SHORT_UNSIGNED, 1,        "SelfTimerMode",        NULL, NULL },
 427 { 0x920b, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.FlashEnergy",               NULL, NULL },
 428 { 0x920c, EXIF_FORMAT_UNDEFINED, -1,            "Exif.Photo.SpatialFrequencyResponse", NULL, NULL },
 429 { 0x920d, EXIF_FORMAT_UNDEFINED, -1,            "Noise",                NULL, NULL },
 430 { 0x9211, EXIF_FORMAT_LONG_UNSIGNED, 1,         "ImageNumber",          NULL, NULL },
 431 { 0x9212, EXIF_FORMAT_STRING, 1,                "SecurityClassification", NULL, NULL },
 432 { 0x9213, EXIF_FORMAT_STRING, -1,               "ImageHistory",         NULL, NULL },
 433 { 0x9215, EXIF_FORMAT_RATIONAL_UNSIGNED, 1,     "Exif.Photo.ExposureIndex",     NULL, NULL },
 434 { 0x9216, EXIF_FORMAT_BYTE_UNSIGNED, 4,         "TIFF/EPStandardID",    NULL, NULL },
 435
 436 EXIF_MARKER_LIST_END
 437 };
 438
 439 ExifMarker ExifUnknownMarkersList[] = {
 440 { 0x0000, EXIF_FORMAT_UNKNOWN, 0,               "unknown",      NULL, NULL },
 441 { 0x0000, EXIF_FORMAT_BYTE_UNSIGNED, -1,        "unknown",      NULL, NULL },
 442 { 0x0000, EXIF_FORMAT_STRING, -1,               "unknown",      NULL, NULL },
 443 { 0x0000, EXIF_FORMAT_SHORT_UNSIGNED, -1,       "unknown",      NULL, NULL },
 444 { 0x0000, EXIF_FORMAT_LONG_UNSIGNED, -1,        "unknown",      NULL, NULL },
 445 { 0x0000, EXIF_FORMAT_RATIONAL_UNSIGNED, -1,    "unknown",      NULL, NULL },
 446 { 0x0000, EXIF_FORMAT_BYTE, -1,                 "unknown",      NULL, NULL },
 447 { 0x0000, EXIF_FORMAT_UNDEFINED, -1,            "unknown",      NULL, NULL },
 448 { 0x0000, EXIF_FORMAT_SHORT, -1,                "unknown",      NULL, NULL },
 449 { 0x0000, EXIF_FORMAT_LONG, -1,                 "unknown",      NULL, NULL },
 450 { 0x0000, EXIF_FORMAT_RATIONAL, -1,             "unknown",      NULL, NULL },
 451 { 0x0000, EXIF_FORMAT_FLOAT, -1,                "unknown",      NULL, NULL },
 452 { 0x0000, EXIF_FORMAT_DOUBLE, -1,               "unknown",      NULL, NULL },
 453 };
 454
 455 static const ExifMarker *exif_marker_from_tag(guint16 tag, const ExifMarker *list);
 456
 457 /*
 458  *-----------------------------------------------------------------------------
 459  * ExifItem
 460  *-----------------------------------------------------------------------------
 461  */
 462
 463 ExifItem *exif_item_new(ExifFormatType format, guint tag,
 464                         guint elements, const ExifMarker *marker)
 465 {
 466         ExifItem *item;
 467
 468         item = g_new0(ExifItem, 1);
 469         item->format = format;
 470         item->tag = tag;
 471         item->marker = marker;
 472         item->elements = elements;
 473         item->data = NULL;
 474         item->data_len = 0;
 475
 476         switch (format)
 477                 {
 478                 case EXIF_FORMAT_UNKNOWN:
 479                         /* unknown, data is NULL */
 480                         return item;
 481                         break;
 482                 case EXIF_FORMAT_BYTE_UNSIGNED:
 483                         item->data_len = sizeof(char) * elements;
 484                         break;
 485                 case EXIF_FORMAT_STRING:
 486                         item->data_len = sizeof(char) * elements;
 487                         break;
 488                 case EXIF_FORMAT_SHORT_UNSIGNED:
 489                         item->data_len = sizeof(guint16) * elements;
 490                         break;
 491                 case EXIF_FORMAT_LONG_UNSIGNED:
 492                         item->data_len = sizeof(guint32) * elements;
 493                         break;
 494                 case EXIF_FORMAT_RATIONAL_UNSIGNED:
 495                         item->data_len = sizeof(ExifRational) * elements;
 496                         break;
 497                 case EXIF_FORMAT_BYTE:
 498                         item->data_len = sizeof(char) * elements;
 499                         break;
 500                 case EXIF_FORMAT_UNDEFINED:
 501                         item->data_len = sizeof(char) * elements;
 502                         break;
 503                 case EXIF_FORMAT_SHORT:
 504                         item->data_len = sizeof(gint16) * elements;
 505                         break;
 506                 case EXIF_FORMAT_LONG:
 507                         item->data_len = sizeof(gint32) * elements;
 508                         break;
 509                 case EXIF_FORMAT_RATIONAL:
 510                         item->data_len = sizeof(ExifRational) * elements;
 511                         break;
 512                 case EXIF_FORMAT_FLOAT:
 513                         item->data_len = sizeof(float) * elements;
 514                         break;
 515                 case EXIF_FORMAT_DOUBLE:
 516                         item->data_len = sizeof(double) * elements;
 517                         break;
 518                 }
 519
 520         item->data = g_malloc0(item->data_len);
 521
 522         return item;
 523 }
 524
 525 static void exif_item_free(ExifItem *item)
 526 {
 527         if (!item) return;
 528
 529         g_free(item->data);
 530         g_free(item);
 531 }
 532
 533 char *exif_item_get_tag_name(ExifItem *item)
 534 {
 535         if (!item || !item->marker) return NULL;
 536         return g_strdup(item->marker->key);
 537 }
 538
 539 guint exif_item_get_tag_id(ExifItem *item)
 540 {
 541         if (!item) return 0;
 542         return item->tag;
 543 }
 544
 545 guint exif_item_get_elements(ExifItem *item)
 546 {
 547         if (!item) return 0;
 548         return item->elements;
 549 }
 550
 551 char *exif_item_get_data(ExifItem *item, guint *data_len)
 552 {
 553         if (data_len)
 554                 *data_len = item->data_len;
 555         return g_memdup(item->data, item->data_len);
 556 }
 557
 558 guint exif_item_get_format_id(ExifItem *item)
 559 {
 560         if (!item) return EXIF_FORMAT_UNKNOWN;
 561         return item->format;
 562 }
 563
 564
 565 char *exif_item_get_description(ExifItem *item)
 566 {
 567         if (!item || !item->marker) return NULL;
 568         return g_strdup(_(item->marker->description));
 569 }
 570
 571 const char *exif_item_get_format_name(ExifItem *item, gint brief)
 572 {
 573         if (!item || !item->marker) return NULL;
 574         return (brief) ? ExifFormatList[item->format].short_name : ExifFormatList[item->format].description;
 575 }
 576
 577 static GString *string_append_raw_bytes(GString *string, gpointer data, gint ne)
 578 {
 579         gint i;
 580
 581         for (i = 0 ; i < ne; i++)
 582                 {
 583                 unsigned char c = ((char *)data)[i];
 584                 if (c < 32 || c > 127) c = '.';
 585                 g_string_append_printf(string, "%c", c);
 586                 }
 587         string = g_string_append(string, " : ");
 588         for (i = 0 ; i < ne; i++)
 589                 {
 590                 const gchar *spacer;
 591                 if (i > 0)
 592                         {
 593                         if (i%8 == 0)
 594                                 {
 595                                 spacer = " - ";
 596                                 }
 597                         else
 598                                 {
 599                                 spacer = " ";
 600                                 }
 601                         }
 602                 else
 603                         {
 604                         spacer = "";
 605                         }
 606                 g_string_append_printf(string, "%s%02x", spacer, ((char *)data)[i]);
 607                 }
 608
 609         return string;
 610 }
 611
 612
 613 gchar *exif_text_list_find_value(ExifTextList *list, guint value)
 614 {
 615         gchar *result = NULL;
 616         gint i;
 617
 618         i = 0;
 619         while (!result && list[i].value >= 0)
 620                 {
 621                 if (value == list[i].value) result = g_strdup(_(list[i].description));
 622                 i++;
 623                 }
 624         if (!result) result = g_strdup_printf("%d (%s)", value, _("unknown"));
 625
 626         return result;
 627 }
 628
 629
 630 /*
 631  *-------------------------------------------------------------------
 632  * byte order utils
 633  *-------------------------------------------------------------------
 634  */
 635
 636 /* note: the align_buf is used to avoid alignment issues (on sparc) */
 637
 638 guint16 exif_byte_get_int16(unsigned char *f, ExifByteOrder bo)
 639 {
 640         guint16 align_buf;
 641
 642         memcpy(&align_buf, f, sizeof(guint16));
 643
 644         if (bo == EXIF_BYTE_ORDER_INTEL)
 645                 return GUINT16_FROM_LE(align_buf);
 646         else
 647                 return GUINT16_FROM_BE(align_buf);
 648 }
 649
 650 guint32 exif_byte_get_int32(unsigned char *f, ExifByteOrder bo)
 651 {
 652         guint32 align_buf;
 653
 654         memcpy(&align_buf, f, sizeof(guint32));
 655
 656         if (bo == EXIF_BYTE_ORDER_INTEL)
 657                 return GUINT32_FROM_LE(align_buf);
 658         else
 659                 return GUINT32_FROM_BE(align_buf);
 660 }
 661
 662 void exif_byte_put_int16(unsigned char *f, guint16 n, ExifByteOrder bo)
 663 {
 664         guint16 align_buf;
 665
 666         if (bo == EXIF_BYTE_ORDER_INTEL)
 667                 {
 668                 align_buf = GUINT16_TO_LE(n);
 669                 }
 670         else
 671                 {
 672                 align_buf = GUINT16_TO_BE(n);
 673                 }
 674
 675         memcpy(f, &align_buf, sizeof(guint16));
 676 }
 677
 678 void exif_byte_put_int32(unsigned char *f, guint32 n, ExifByteOrder bo)
 679 {
 680         guint32 align_buf;
 681
 682         if (bo == EXIF_BYTE_ORDER_INTEL)
 683                 {
 684                 align_buf = GUINT32_TO_LE(n);
 685                 }
 686         else
 687                 {
 688                 align_buf = GUINT32_TO_BE(n);
 689                 }
 690
 691         memcpy(f, &align_buf, sizeof(guint32));
 692 }
 693
 694
 695 /*
 696  *-------------------------------------------------------------------
 697  * IFD utils
 698  *-------------------------------------------------------------------
 699  */
 700
 701 static const ExifMarker *exif_marker_from_tag(guint16 tag, const ExifMarker *list)
 702 {
 703         gint i = 0;
 704
 705         if (!list) return NULL;
 706
 707         while (list[i].tag != 0 && list[i].tag != tag)
 708                 {
 709                 i++;
 710                 }
 711
 712         return (list[i].tag == 0 ? NULL : &list[i]);
 713 }
 714
 715 static void rational_from_data(ExifRational *r, void *src, ExifByteOrder bo)
 716 {
 717         r->num = exif_byte_get_int32(src, bo);
 718         r->den = exif_byte_get_int32(src + sizeof(guint32), bo);
 719 }
 720
 721 /* src_format and item->format must be compatible
 722  * and not overrun src or item->data.
 723  */
 724 void exif_item_copy_data(ExifItem *item, void *src, guint len,
 725                          ExifFormatType src_format, ExifByteOrder bo)
 726 {
 727         gint bs;
 728         gint ne;
 729         gpointer dest;
 730         gint i;
 731
 732         bs = ExifFormatList[item->format].size;
 733         ne = item->elements;
 734         dest = item->data;
 735
 736         if (!dest ||
 737             ExifFormatList[src_format].size * ne > len)
 738                 {
 739                 gchar *tag = exif_item_get_tag_name(item);
 740                 printf("exif tag %s data size mismatch\n", tag);
 741                 g_free(tag);
 742                 return;
 743                 }
 744
 745         switch (item->format)
 746                 {
 747                 case EXIF_FORMAT_UNKNOWN:
 748                         break;
 749                 case EXIF_FORMAT_BYTE_UNSIGNED:
 750                 case EXIF_FORMAT_BYTE:
 751                 case EXIF_FORMAT_UNDEFINED:
 752                         memcpy(dest, src, len);
 753                         break;
 754                 case EXIF_FORMAT_STRING:
 755                         memcpy(dest, src, len);
 756                         /* string is NULL terminated, make sure this is true */
 757                         if (((char *)dest)[len - 1] != '\0') ((char *)dest)[len - 1] = '\0';
 758                         break;
 759                 case EXIF_FORMAT_SHORT_UNSIGNED:
 760                 case EXIF_FORMAT_SHORT:
 761                         for (i = 0; i < ne; i++)
 762                                 {
 763                                 ((guint16 *)dest)[i] = exif_byte_get_int16(src + i * bs, bo);
 764                                 }
 765                         break;
 766                 case EXIF_FORMAT_LONG_UNSIGNED:
 767                 case EXIF_FORMAT_LONG:
 768                         if (src_format == EXIF_FORMAT_SHORT_UNSIGNED ||
 769                             src_format == EXIF_FORMAT_SHORT)
 770                                 {
 771                                 /* a short fits into a long, so allow it */
 772                                 gint ss;
 773
 774                                 ss = ExifFormatList[src_format].size;
 775                                 for (i = 0; i < ne; i++)
 776                                         {
 777                                         ((gint32 *)dest)[i] =
 778                                                 (gint32)exif_byte_get_int16(src + i * ss, bo);
 779                                         }
 780                                 }
 781                         else
 782                                 {
 783                                 for (i = 0; i < ne; i++)
 784                                         {
 785                                         ((gint32 *)dest)[i] =
 786                                                 exif_byte_get_int32(src + i * bs, bo);
 787                                         }
 788                                 }
 789                         break;
 790                 case EXIF_FORMAT_RATIONAL_UNSIGNED:
 791                 case EXIF_FORMAT_RATIONAL:
 792                         for (i = 0; i < ne; i++)
 793                                 {
 794                                 rational_from_data(&((ExifRational *)dest)[i], src + i * bs, bo);
 795                                 }
 796                         break;
 797                 case EXIF_FORMAT_FLOAT:
 798                         for (i = 0; i < ne; i++)
 799                                 {
 800                                 ((float *)dest)[i] = exif_byte_get_int32(src + i * bs, bo);
 801                                 }
 802                         break;
 803                 case EXIF_FORMAT_DOUBLE:
 804                         for (i = 0; i < ne; i++)
 805                                 {
 806                                 ExifRational r;
 807
 808                                 rational_from_data(&r, src + i * bs, bo);
 809                                 if (r.den) ((double *)dest)[i] = (double)r.num / r.den;
 810                                 }
 811                         break;
 812                 }
 813 }
 814
 815 static gint exif_parse_IFD_entry(ExifData *exif, unsigned char *tiff, guint offset,
 816                                  guint size, ExifByteOrder bo,
 817                                  gint level,
 818                                  const ExifMarker *list)
 819 {
 820         guint tag;
 821         guint format;
 822         guint count;
 823         guint data_val;
 824         guint data_offset;
 825         guint data_length;
 826         const ExifMarker *marker;
 827         ExifItem *item;
 828
 829         tag = exif_byte_get_int16(tiff + offset + EXIF_TIFD_OFFSET_TAG, bo);
 830         format = exif_byte_get_int16(tiff + offset + EXIF_TIFD_OFFSET_FORMAT, bo);
 831         count = exif_byte_get_int32(tiff + offset + EXIF_TIFD_OFFSET_COUNT, bo);
 832         data_val = exif_byte_get_int32(tiff + offset + EXIF_TIFD_OFFSET_DATA, bo);
 833
 834         /* Check tag type. If it does not match, either the format is wrong,
 835          * either it is a unknown tag; so it is not really an error.
 836          */
 837         marker = exif_marker_from_tag(tag, list);
 838         if (!marker)
 839                 {
 840                 if (format >= EXIF_FORMAT_COUNT)
 841                         {
 842                         printf("warning: exif tag 0x%4x has invalid format %d\n", tag, format);
 843                         return 0;
 844                         }
 845                 /* allow non recognized tags to be displayed */
 846                 marker = &ExifUnknownMarkersList[format];
 847                 }
 848         if (marker->format != format)
 849                 {
 850                 /* Some cameras got mixed up signed/unsigned_rational
 851                  * eg KODAK DC4800 on object_distance tag
 852                  *
 853                  * FIXME: what exactly is this test trying to do?
 854                  * ok, so this test is to allow the case of swapped signed/unsigned mismatch to leak through?
 855                  */
 856                 if (!(marker->format == EXIF_FORMAT_RATIONAL_UNSIGNED && format == EXIF_FORMAT_RATIONAL) &&
 857                     !(marker->format == EXIF_FORMAT_RATIONAL && format == EXIF_FORMAT_RATIONAL_UNSIGNED) &&
 858                         /* short fits into a long so allow this mismatch
 859                          * as well (some tags allowed to be unsigned short _or_ unsigned long)
 860                          */
 861                     !(marker->format == EXIF_FORMAT_LONG_UNSIGNED && format == EXIF_FORMAT_SHORT_UNSIGNED) )
 862                         {
 863                         if (format < EXIF_FORMAT_COUNT)
 864                                 {
 865                                 printf("warning: exif tag %s format mismatch, found %s exif spec requests %s\n",
 866                                         marker->key, ExifFormatList[format].short_name,
 867                                         ExifFormatList[marker->format].short_name);
 868                                 }
 869                         else
 870                                 {
 871                                 printf("warning: exif tag %s format mismatch, found unknown id %d exif spec requests %d (%s)\n",
 872                                         marker->key, format, marker->format,
 873                                         ExifFormatList[marker->format].short_name);
 874                                 }
 875                         return 0;
 876                         }
 877                 }
 878
 879         /* Where is the data, is it available?
 880          */
 881         if (marker->components > 0 && marker->components != count)
 882                 {
 883                 printf("warning: exif tag %s has %d elements, exif spec requests %d\n",
 884                         marker->key, count, marker->components);
 885                 }
 886
 887         data_length = ExifFormatList[marker->format].size * count;
 888         if (data_length > 4)
 889                 {
 890                 data_offset = data_val;
 891                 if (size < data_offset + data_length)
 892                         {
 893                         printf("warning: exif tag %s data will overrun end of file, ignored.\n", marker->key);
 894                         return -1;
 895                         }
 896                 }
 897         else
 898                 {
 899                 data_offset = offset + EXIF_TIFD_OFFSET_DATA;
 900                 }
 901
 902         item = exif_item_new(marker->format, tag, count, marker);
 903         exif_item_copy_data(item, tiff + data_offset, data_length, format, bo);
 904         exif->items = g_list_prepend(exif->items, item);
 905
 906         if (list == ExifKnownMarkersList)
 907                 {
 908                 switch (item->tag)
 909                         {
 910                         case TAG_EXIFOFFSET:
 911                                 exif_parse_IFD_table(exif, tiff, data_val, size, bo, level + 1, list);
 912                                 break;
 913                         case TAG_EXIFMAKERNOTE:
 914                                 format_exif_makernote_parse(exif, tiff, data_val, size, bo);
 915                                 break;
 916                         }
 917                 }
 918
 919         return 0;
 920 }
 921
 922 gint exif_parse_IFD_table(ExifData *exif,
 923                           unsigned char *tiff, guint offset,
 924                           guint size, ExifByteOrder bo,
 925                           gint level,
 926                           const ExifMarker *list)
 927 {
 928         guint count;
 929         guint i;
 930
 931         /* limit damage from infinite loops */
 932         if (level > EXIF_TIFF_MAX_LEVELS) return -1;
 933
 934         /* We should be able to read number of entries in IFD0) */
 935         if (size < offset + 2) return -1;
 936
 937         count = exif_byte_get_int16(tiff + offset, bo);
 938         offset += 2;
 939
 940         /* Entries and next IFD offset must be readable */
 941         if (size < offset + count * EXIF_TIFD_SIZE + 4) return -1;
 942
 943         for (i = 0; i < count; i++)
 944                 {
 945                 exif_parse_IFD_entry(exif, tiff, offset + i * EXIF_TIFD_SIZE, size, bo, level, list);
 946                 }
 947
 948         return 0;
 949 }
 950
 951 /*
 952  *-------------------------------------------------------------------
 953  * file formats
 954  *-------------------------------------------------------------------
 955  */
 956
 957 gint exif_tiff_directory_offset(unsigned char *data, const guint len,
 958                                 guint *offset, ExifByteOrder *bo)
 959 {
 960         if (len < 8) return FALSE;
 961
 962         if (memcmp(data, "II", 2) == 0)
 963                 {
 964                 *bo = EXIF_BYTE_ORDER_INTEL;
 965                 }
 966         else if (memcmp(data, "MM", 2) == 0)
 967                 {
 968                 *bo = EXIF_BYTE_ORDER_MOTOROLA;
 969                 }
 970         else
 971                 {
 972                 return FALSE;
 973                 }
 974
 975         if (exif_byte_get_int16(data + 2, *bo) != 0x002A)
 976                 {
 977                 return FALSE;
 978                 }
 979
 980         *offset = exif_byte_get_int32(data + 4, *bo);
 981
 982         return (*offset < len);
 983 }
 984
 985 gint exif_tiff_parse(ExifData *exif, unsigned char *tiff, guint size, ExifMarker *list)
 986 {
 987         ExifByteOrder bo;
 988         guint offset;
 989
 990         if (!exif_tiff_directory_offset(tiff, size, &offset, &bo)) return -1;
 991
 992         return exif_parse_IFD_table(exif, tiff, offset, size, bo, 0, list);
 993 }
 994
 995
 996 /*
 997  *-------------------------------------------------------------------
 998  * jpeg marker utils
 999  *-------------------------------------------------------------------
1000  */
1001
1002 #define JPEG_MARKER             0xFF
1003 #define JPEG_MARKER_SOI         0xD8
1004 #define JPEG_MARKER_EOI         0xD9
1005 #define JPEG_MARKER_APP1        0xE1
1006 #define JPEG_MARKER_APP2        0xE2
1007
1008 /* jpeg container format:
1009      all data markers start with 0XFF
1010      2 byte long file start and end markers: 0xFFD8(SOI) and 0XFFD9(EOI)
1011      4 byte long data segment markers in format: 0xFFTTSSSSNNN...
1012        FF:   1 byte standard marker identifier
1013        TT:   1 byte data type
1014        SSSS: 2 bytes in Motorola byte alignment for length of the data.
1015              This value includes these 2 bytes in the count, making actual
1016              length of NN... == SSSS - 2.
1017        NNN.: the data in this segment
1018  */
1019 static ExifMarker jpeg_color_marker = { 0x8773, EXIF_FORMAT_UNDEFINED, -1, "Exif.Image.InterColorProfile", NULL, NULL };
1020
1021 void exif_add_jpeg_color_profile(ExifData *exif, unsigned char *cp_data, guint cp_length)
1022 {
1023         ExifItem *item = exif_item_new(jpeg_color_marker.format, jpeg_color_marker.tag, 1,
1024                                      &jpeg_color_marker);
1025         g_free(item->data);
1026         item->data = cp_data;
1027         item->elements = cp_length;
1028         item->data_len = cp_length;
1029         exif->items = g_list_prepend(exif->items, item);
1030
1031 }
1032
1033 static gint exif_jpeg_parse(ExifData *exif,
1034                             unsigned char *data, guint size,
1035                             ExifMarker *list)
1036 {
1037         guint seg_offset = 0;
1038         guint seg_length = 0;
1039         gint res = -1;
1040
1041         if (size < 4 ||
1042             memcmp(data, "\xFF\xD8", 2) != 0)
1043                 {
1044                 return -2;
1045                 }
1046
1047         if (exif_jpeg_segment_find(data, size, JPEG_MARKER_APP1,
1048                                    "Exif\x00\x00", 6,
1049                                    &seg_offset, &seg_length))
1050                 {
1051                 res = exif_tiff_parse(exif, data + seg_offset + 6, seg_length - 6, list);
1052                 }
1053
1054         if (exif_jpeg_parse_color(exif, data, size))
1055                 {
1056                 res = 0;
1057                 }
1058
1059         return res;
1060 }
1061
1062 unsigned char *exif_get_color_profile(ExifData *exif, guint *data_len)
1063 {
1064         ExifItem *prof_item = exif_get_item(exif, "Exif.Image.InterColorProfile");
1065         if (prof_item && exif_item_get_format_id(prof_item) == EXIF_FORMAT_UNDEFINED)
1066                 return (unsigned char*) exif_item_get_data(prof_item, data_len);
1067         return NULL;
1068 }
1069
1070
1071 /*
1072  *-------------------------------------------------------------------
1073  * misc
1074  *-------------------------------------------------------------------
1075  */
1076
1077
1078 ExifItem *exif_get_first_item(ExifData *exif)
1079 {
1080         if (exif->items)
1081                 {
1082                 ExifItem *ret = (ExifItem *)exif->items->data;
1083                 exif->current = exif->items->next;
1084                 return ret;
1085                 }
1086         exif->current = NULL;
1087         return NULL;
1088 }
1089
1090 ExifItem *exif_get_next_item(ExifData *exif)
1091 {
1092         if (exif->current)
1093                 {
1094                 ExifItem *ret = (ExifItem *)exif->current->data;
1095                 exif->current = exif->current->next;
1096                 return ret;
1097                 }
1098         return NULL;
1099 }
1100
1101 static gint map_file(const gchar *path, void **mapping, int *size)
1102 {
1103         int fd;
1104         struct stat fs;
1105
1106         if ((fd = open(path, O_RDONLY)) == -1)
1107                 {
1108                 perror(path);
1109                 return -1;
1110                 }
1111
1112         if (fstat(fd, &fs) == -1)
1113                 {
1114                 perror(path);
1115                 close(fd);
1116                 return -1;
1117                 }
1118
1119         *size = fs.st_size;
1120
1121         if ((*mapping = mmap(0, *size, PROT_READ|PROT_WRITE, MAP_PRIVATE, fd, 0)) == MAP_FAILED)
1122                 {
1123                 perror(path);
1124                 close(fd);
1125                 return -1;
1126                 }
1127
1128         close(fd);
1129         return 0;
1130 }
1131
1132 static gint unmap_file(void *mapping, int size)
1133 {
1134         if (munmap(mapping, size) == -1)
1135                 {
1136                 perror("munmap");
1137                 return -1;
1138                 }
1139
1140         return 0;
1141 }
1142
1143 void exif_free(ExifData *exif)
1144 {
1145         GList *work;
1146
1147         if (!exif) return;
1148
1149         work = exif->items;
1150         while (work)
1151                 {
1152                 ExifItem *item = work->data;
1153                 work = work->next;
1154                 exif_item_free(item);
1155                 }
1156
1157         g_list_free(exif->items);
1158         g_free(exif);
1159 }
1160
1161 ExifData *exif_read(gchar *path, gchar *sidecar_path)
1162 {
1163         ExifData *exif;
1164         void *f;
1165         int size, res;
1166         gchar *pathl;
1167
1168         if (!path) return NULL;
1169
1170         pathl = path_from_utf8(path);
1171         if (map_file(pathl, &f, &size) == -1)
1172                 {
1173                 g_free(pathl);
1174                 return NULL;
1175                 }
1176         g_free(pathl);
1177
1178         exif = g_new0(ExifData, 1);
1179         exif->items = NULL;
1180         exif->current = NULL;
1181
1182         if ((res = exif_jpeg_parse(exif, (unsigned char *)f, size,
1183                                    ExifKnownMarkersList)) == -2)
1184                 {
1185                 res = exif_tiff_parse(exif, (unsigned char *)f, size, ExifKnownMarkersList);
1186                 }
1187
1188         if (res != 0)
1189                 {
1190                 FormatRawExifType exif_type;
1191                 FormatRawExifParseFunc exif_parse_func;
1192                 guint32 offset = 0;
1193
1194                 exif_type = format_raw_exif_offset(f, size, &offset, &exif_parse_func);
1195                 switch (exif_type)
1196                         {
1197                         case FORMAT_RAW_EXIF_NONE:
1198                         default:
1199                                 break;
1200                         case FORMAT_RAW_EXIF_TIFF:
1201                                 res = exif_tiff_parse(exif, (unsigned char*)f + offset, size - offset,
1202                                                       ExifKnownMarkersList);
1203                                 break;
1204                         case FORMAT_RAW_EXIF_JPEG:
1205                                 res = exif_jpeg_parse(exif, (unsigned char*)f + offset, size - offset,
1206                                                       ExifKnownMarkersList);
1207                                 break;
1208                         case FORMAT_RAW_EXIF_IFD_II:
1209                         case FORMAT_RAW_EXIF_IFD_MM:
1210                                 res = exif_parse_IFD_table(exif, (unsigned char*)f, offset, size - offset,
1211                                                            (exif_type == FORMAT_RAW_EXIF_IFD_II) ?
1212                                                                 EXIF_BYTE_ORDER_INTEL : EXIF_BYTE_ORDER_MOTOROLA,
1213                                                            0, ExifKnownMarkersList);
1214                                 break;
1215                         case FORMAT_RAW_EXIF_PROPRIETARY:
1216                                 if (exif_parse_func)
1217                                         {
1218                                         res = exif_parse_func((unsigned char*)f + offset, size - offset, exif);
1219                                         }
1220                                 break;
1221                         }
1222                 }
1223
1224         if (res != 0)
1225                 {
1226                 exif_free(exif);
1227                 exif = NULL;
1228                 }
1229
1230         unmap_file(f, size);
1231
1232         if (exif) exif->items = g_list_reverse(exif->items);
1233
1234 #if 0
1235         exif_write_data_list(exif, stdout, TRUE);
1236         exif_write_data_list(exif, stdout, FALSE);
1237 #endif
1238
1239         return exif;
1240 }
1241
1242 ExifItem *exif_get_item(ExifData *exif, const gchar *key)
1243 {
1244         GList *work;
1245
1246         if (!key) return NULL;
1247
1248         work = exif->items;
1249         while (work)
1250                 {
1251                 ExifItem *item;
1252
1253                 item = work->data;
1254                 work = work->next;
1255                 if (item->marker->key && strcmp(key, item->marker->key) == 0) return item;
1256                 }
1257         return NULL;
1258 }
1259
1260 #define EXIF_DATA_AS_TEXT_MAX_COUNT 16
1261
1262 gchar *exif_item_get_string(ExifItem *item, int idx)
1263 {
1264         return exif_item_get_data_as_text(item);
1265 }
1266
1267
1268 gchar *exif_item_get_data_as_text(ExifItem *item)
1269 {
1270         const ExifMarker *marker;
1271         gpointer data;
1272         GString *string;
1273         gchar *text;
1274         gint ne;
1275         gint i;
1276
1277         if (!item) return NULL;
1278
1279         marker = item->marker;
1280         if (!marker) return NULL;
1281
1282         data = item->data;
1283         ne = item->elements;
1284         if (ne > EXIF_DATA_AS_TEXT_MAX_COUNT) ne = EXIF_DATA_AS_TEXT_MAX_COUNT;
1285         string = g_string_new("");
1286         switch (item->format)
1287                 {
1288                 case EXIF_FORMAT_UNKNOWN:
1289                         break;
1290                 case EXIF_FORMAT_BYTE_UNSIGNED:
1291                 case EXIF_FORMAT_BYTE:
1292                 case EXIF_FORMAT_UNDEFINED:
1293                         if (ne == 1 && marker->list)
1294                                 {
1295                                 gchar *result;
1296                                 unsigned char val;
1297
1298                                 if (item->format == EXIF_FORMAT_BYTE_UNSIGNED ||
1299                                     item->format == EXIF_FORMAT_UNDEFINED)
1300                                         {
1301                                         val = ((unsigned char *)data)[0];
1302                                         }
1303                                 else
1304                                         {
1305                                         val = (unsigned char)(((signed char *)data)[0]);
1306                                         }
1307
1308                                 result = exif_text_list_find_value(marker->list, (guint)val);
1309                                 string = g_string_append(string, result);
1310                                 g_free(result);
1311                                 }
1312                         else
1313                                 {
1314                                 string = string_append_raw_bytes(string, data, ne);
1315                                 }
1316                         break;
1317                 case EXIF_FORMAT_STRING:
1318                         string = g_string_append(string, (gchar *)(item->data));
1319                         break;
1320                 case EXIF_FORMAT_SHORT_UNSIGNED:
1321                         if (ne == 1 && marker->list)
1322                                 {
1323                                 gchar *result;
1324
1325                                 result = exif_text_list_find_value(marker->list, ((guint16 *)data)[0]);
1326                                 string = g_string_append(string, result);
1327                                 g_free(result);
1328                                 }
1329                         else for (i = 0; i < ne; i++)
1330                                 {
1331                                 g_string_append_printf(string, "%s%hd", (i > 0) ? ", " : "",
1332                                                         ((guint16 *)data)[i]);
1333                                 }
1334                         break;
1335                 case EXIF_FORMAT_LONG_UNSIGNED:
1336                         for (i = 0; i < ne; i++)
1337                                 {
1338                                 g_string_append_printf(string, "%s%ld", (i > 0) ? ", " : "",
1339                                                         (unsigned long int)((guint32 *)data)[i]);
1340                                 }
1341                         break;
1342                 case EXIF_FORMAT_RATIONAL_UNSIGNED:
1343                         for (i = 0; i < ne; i++)
1344                                 {
1345                                 ExifRational *r;
1346
1347                                 r = &((ExifRational *)data)[i];
1348                                 g_string_append_printf(string, "%s%ld/%ld", (i > 0) ? ", " : "",
1349                                                         (unsigned long)r->num, (unsigned long)r->den);
1350                                 }
1351                         break;
1352                 case EXIF_FORMAT_SHORT:
1353                         for (i = 0; i < ne; i++)
1354                                 {
1355                                 g_string_append_printf(string, "%s%hd", (i > 0) ? ", " : "",
1356                                                         ((gint16 *)data)[i]);
1357                                 }
1358                         break;
1359                 case EXIF_FORMAT_LONG:
1360                         for (i = 0; i < ne; i++)
1361                                 {
1362                                 g_string_append_printf(string, "%s%ld", (i > 0) ? ", " : "",
1363                                                         (long int)((gint32 *)data)[i]);
1364                                 }
1365                         break;
1366                 case EXIF_FORMAT_RATIONAL:
1367                         for (i = 0; i < ne; i++)
1368                                 {
1369                                 ExifRational *r;
1370
1371                                 r = &((ExifRational *)data)[i];
1372                                 g_string_append_printf(string, "%s%ld/%ld", (i > 0) ? ", " : "",
1373                                                         (long)r->num, (long)r->den);
1374                                 }
1375                         break;
1376                 case EXIF_FORMAT_FLOAT:
1377                         for (i = 0; i < ne; i++)
1378                                 {
1379                                 g_string_append_printf(string, "%s%f", (i > 0) ? ", " : "",
1380                                                         ((float *)data)[i]);
1381                                 }
1382                         break;
1383                 case EXIF_FORMAT_DOUBLE:
1384                         for (i = 0; i < ne; i++)
1385                                 {
1386                                 g_string_append_printf(string, "%s%f", (i > 0) ? ", " : "",
1387                                                         ((double *)data)[i]);
1388                                 }
1389                         break;
1390                 }
1391
1392         if (item->elements > EXIF_DATA_AS_TEXT_MAX_COUNT &&
1393             item->format != EXIF_FORMAT_STRING)
1394                 {
1395                 g_string_append(string, " ...");
1396                 }
1397
1398         text = string->str;
1399         g_string_free(string, FALSE);
1400
1401         return text;
1402 }
1403
1404 gint exif_item_get_integer(ExifItem *item, gint *value)
1405 {
1406         if (!item) return FALSE;
1407
1408         switch (item->format)
1409                 {
1410                 case EXIF_FORMAT_SHORT:
1411                         *value = (gint)(((gint16 *)(item->data))[0]);
1412                         return TRUE;
1413                         break;
1414                 case EXIF_FORMAT_SHORT_UNSIGNED:
1415                         *value = (gint)(((guint16 *)(item->data))[0]);
1416                         return TRUE;
1417                         break;
1418                 case EXIF_FORMAT_LONG:
1419                         *value = (gint)(((gint32 *)(item->data))[0]);
1420                         return TRUE;
1421                         break;
1422                 case EXIF_FORMAT_LONG_UNSIGNED:
1423                         /* FIXME: overflow possible */
1424                         *value = (gint)(((guint32 *)(item->data))[0]);
1425                         return TRUE;
1426                 default:
1427                         /* all other type return FALSE */
1428                         break;
1429                 }
1430         return FALSE;
1431 }
1432
1433
1434 ExifRational *exif_item_get_rational(ExifItem *item, gint *sign)
1435 {
1436         if (!item) return NULL;
1437
1438         if (item->format == EXIF_FORMAT_RATIONAL ||
1439             item->format == EXIF_FORMAT_RATIONAL_UNSIGNED)
1440                 {
1441                 if (sign) *sign = (item->format == EXIF_FORMAT_RATIONAL);
1442                 return &((ExifRational *)(item->data))[0];
1443                 }
1444
1445         return NULL;
1446 }
1447
1448 const gchar *exif_get_tag_description_by_key(const gchar *key)
1449 {
1450         gint i;
1451
1452         if (!key) return NULL;
1453
1454         i = 0;
1455         while (ExifKnownMarkersList[i].tag > 0)
1456                 {
1457                 if (strcmp(key, ExifKnownMarkersList[i].key) == 0) return _(ExifKnownMarkersList[i].description);
1458                 i++;
1459                 }
1460
1461         return NULL;
1462 }
1463
1464 static void exif_write_item(FILE *f, ExifItem *item)
1465 {
1466         gchar *text;
1467
1468         text = exif_item_get_data_as_text(item);
1469         if (text)
1470                 {
1471                 gchar *tag = exif_item_get_tag_name(item);
1472                 fprintf(f, "%4x %9s %30s %s\n", item->tag, ExifFormatList[item->format].short_name,
1473                         tag, text);
1474                 g_free(tag);
1475                 }
1476         g_free(text);
1477 }
1478
1479 void exif_write_data_list(ExifData *exif, FILE *f, gint human_readable_list)
1480 {
1481         if (!f || !exif) return;
1482
1483         fprintf(f, " tag   format                             key value\n");
1484         fprintf(f, "----------------------------------------------------\n");
1485
1486         if (human_readable_list)
1487                 {
1488                 gint i;
1489
1490                 i = 0;
1491                 while (ExifFormattedList[i].key)
1492                         {
1493                         gchar *text;
1494
1495                         text = exif_get_formatted_by_key(exif, ExifFormattedList[i].key, NULL);
1496                         if (text)
1497                                 {
1498                                 fprintf(f, "     %9s %30s %s\n", "string", ExifFormattedList[i].key, text);
1499                                 }
1500                         i++;
1501                         }
1502                 }
1503         else
1504                 {
1505                 GList *work;
1506
1507                 work = exif->items;
1508                 while (work)
1509                         {
1510                         ExifItem *item;
1511
1512                         item = work->data;
1513                         work = work->next;
1514
1515                         exif_write_item(f, item);
1516                         }
1517                 }
1518         fprintf(f, "----------------------------------------------------\n");
1519 }
1520
1521 int exif_write(ExifData *exif)
1522 {
1523         printf("Not compiled with EXIF write support");
1524         return 0;
1525 }
1526
1527 ExifItem *exif_add_item(ExifData *exif, const gchar *key)
1528 {
1529         return NULL;
1530 }
1531
1532 int exif_item_delete(ExifData *exif, ExifItem *item)
1533 {
1534         return 0;
1535 }
1536
1537 int exif_item_set_string(ExifItem *item, const char *str)
1538 {
1539         return 0;
1540 }
1541
1542
1543
1544 #endif
1545 /* not HAVE_EXIV2 */