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