1 //--------------------------------------------------------------------------
2 // Program to pull the information out of various types of EXIF digital
3 // camera files and show it in a reasonably consistent way
4 //
5 // This module parses the very complicated exif structures.
6 //
7 // Matthias Wandel
8 //--------------------------------------------------------------------------
9 #include "jhead.h"
10 
11 #include <math.h>
12 #include <ctype.h>
13 #include <utils/Log.h>
14 
15 static unsigned char * DirWithThumbnailPtrs;
16 static double FocalplaneXRes;
17 static double FocalplaneUnits;
18 static int ExifImageWidth;
19 static int MotorolaOrder = 0;
20 
21 // for fixing the rotation.
22 static void * OrientationPtr[2];
23 static int    OrientationNumFormat[2];
24 int NumOrientations = 0;
25 
26 
27 // Define the line below to turn on poor man's debugging output
28 #undef SUPERDEBUG
29 
30 #ifdef SUPERDEBUG
31 #define printf ALOGE
32 #endif
33 
34 //--------------------------------------------------------------------------
35 // Table of Jpeg encoding process names
36 static const TagTable_t ProcessTable[] = {
37     { M_SOF0,   "Baseline", 0, 0},
38     { M_SOF1,   "Extended sequential", 0, 0},
39     { M_SOF2,   "Progressive", 0, 0},
40     { M_SOF3,   "Lossless", 0, 0},
41     { M_SOF5,   "Differential sequential", 0, 0},
42     { M_SOF6,   "Differential progressive", 0, 0},
43     { M_SOF7,   "Differential lossless", 0, 0},
44     { M_SOF9,   "Extended sequential, arithmetic coding", 0, 0},
45     { M_SOF10,  "Progressive, arithmetic coding", 0, 0},
46     { M_SOF11,  "Lossless, arithmetic coding", 0, 0},
47     { M_SOF13,  "Differential sequential, arithmetic coding", 0, 0},
48     { M_SOF14,  "Differential progressive, arithmetic coding", 0, 0},
49     { M_SOF15,  "Differential lossless, arithmetic coding", 0, 0},
50 };
51 
52 #define PROCESS_TABLE_SIZE  (sizeof(ProcessTable) / sizeof(TagTable_t))
53 
54 // 1 - "The 0th row is at the visual top of the image,    and the 0th column is the visual left-hand side."
55 // 2 - "The 0th row is at the visual top of the image,    and the 0th column is the visual right-hand side."
56 // 3 - "The 0th row is at the visual bottom of the image, and the 0th column is the visual right-hand side."
57 // 4 - "The 0th row is at the visual bottom of the image, and the 0th column is the visual left-hand side."
58 
59 // 5 - "The 0th row is the visual left-hand side of of the image,  and the 0th column is the visual top."
60 // 6 - "The 0th row is the visual right-hand side of of the image, and the 0th column is the visual top."
61 // 7 - "The 0th row is the visual right-hand side of of the image, and the 0th column is the visual bottom."
62 // 8 - "The 0th row is the visual left-hand side of of the image,  and the 0th column is the visual bottom."
63 
64 // Note: The descriptions here are the same as the name of the command line
65 // option to pass to jpegtran to right the image
66 
67 static const char * OrientTab[9] = {
68     "Undefined",
69     "Normal",           // 1
70     "flip horizontal",  // left right reversed mirror
71     "rotate 180",       // 3
72     "flip vertical",    // upside down mirror
73     "transpose",        // Flipped about top-left <--> bottom-right axis.
74     "rotate 90",        // rotate 90 cw to right it.
75     "transverse",       // flipped about top-right <--> bottom-left axis
76     "rotate 270",       // rotate 270 to right it.
77 };
78 
79 const int BytesPerFormat[] = {0,1,1,2,4,8,1,1,2,4,8,4,8};
80 
81 //--------------------------------------------------------------------------
82 // Describes tag values
83 
84 #define TAG_INTEROP_INDEX          0x0001
85 #define TAG_INTEROP_VERSION        0x0002
86 #define TAG_IMAGE_WIDTH            0x0100
87 #define TAG_IMAGE_LENGTH           0x0101
88 #define TAG_BITS_PER_SAMPLE        0x0102
89 #define TAG_COMPRESSION            0x0103
90 #define TAG_PHOTOMETRIC_INTERP     0x0106
91 #define TAG_FILL_ORDER             0x010A
92 #define TAG_DOCUMENT_NAME          0x010D
93 #define TAG_IMAGE_DESCRIPTION      0x010E
94 #define TAG_MAKE                   0x010F
95 #define TAG_MODEL                  0x0110
96 #define TAG_SRIP_OFFSET            0x0111
97 #define TAG_ORIENTATION            0x0112
98 #define TAG_SAMPLES_PER_PIXEL      0x0115
99 #define TAG_ROWS_PER_STRIP         0x0116
100 #define TAG_STRIP_BYTE_COUNTS      0x0117
101 #define TAG_X_RESOLUTION           0x011A
102 #define TAG_Y_RESOLUTION           0x011B
103 #define TAG_PLANAR_CONFIGURATION   0x011C
104 #define TAG_RESOLUTION_UNIT        0x0128
105 #define TAG_TRANSFER_FUNCTION      0x012D
106 #define TAG_SOFTWARE               0x0131
107 #define TAG_DATETIME               0x0132
108 #define TAG_ARTIST                 0x013B
109 #define TAG_WHITE_POINT            0x013E
110 #define TAG_PRIMARY_CHROMATICITIES 0x013F
111 #define TAG_TRANSFER_RANGE         0x0156
112 #define TAG_JPEG_PROC              0x0200
113 #define TAG_THUMBNAIL_OFFSET       0x0201
114 #define TAG_THUMBNAIL_LENGTH       0x0202
115 #define TAG_Y_CB_CR_COEFFICIENTS   0x0211
116 #define TAG_Y_CB_CR_SUB_SAMPLING   0x0212
117 #define TAG_Y_CB_CR_POSITIONING    0x0213
118 #define TAG_REFERENCE_BLACK_WHITE  0x0214
119 #define TAG_RELATED_IMAGE_WIDTH    0x1001
120 #define TAG_RELATED_IMAGE_LENGTH   0x1002
121 #define TAG_CFA_REPEAT_PATTERN_DIM 0x828D
122 #define TAG_CFA_PATTERN1           0x828E
123 #define TAG_BATTERY_LEVEL          0x828F
124 #define TAG_COPYRIGHT              0x8298
125 #define TAG_EXPOSURETIME           0x829A
126 #define TAG_FNUMBER                0x829D
127 #define TAG_IPTC_NAA               0x83BB
128 #define TAG_EXIF_OFFSET            0x8769
129 #define TAG_INTER_COLOR_PROFILE    0x8773
130 #define TAG_EXPOSURE_PROGRAM       0x8822
131 #define TAG_SPECTRAL_SENSITIVITY   0x8824
132 #define TAG_GPSINFO                0x8825
133 #define TAG_ISO_EQUIVALENT         0x8827
134 #define TAG_OECF                   0x8828
135 #define TAG_EXIF_VERSION           0x9000
136 #define TAG_DATETIME_ORIGINAL      0x9003
137 #define TAG_DATETIME_DIGITIZED     0x9004
138 #define TAG_COMPONENTS_CONFIG      0x9101
139 #define TAG_CPRS_BITS_PER_PIXEL    0x9102
140 #define TAG_SHUTTERSPEED           0x9201
141 #define TAG_APERTURE               0x9202
142 #define TAG_BRIGHTNESS_VALUE       0x9203
143 #define TAG_EXPOSURE_BIAS          0x9204
144 #define TAG_MAXAPERTURE            0x9205
145 #define TAG_SUBJECT_DISTANCE       0x9206
146 #define TAG_METERING_MODE          0x9207
147 #define TAG_LIGHT_SOURCE           0x9208
148 #define TAG_FLASH                  0x9209
149 #define TAG_FOCALLENGTH            0x920A
150 #define TAG_MAKER_NOTE             0x927C
151 #define TAG_USERCOMMENT            0x9286
152 #define TAG_SUBSEC_TIME            0x9290
153 #define TAG_SUBSEC_TIME_ORIG       0x9291
154 #define TAG_SUBSEC_TIME_DIG        0x9292
155 
156 #define TAG_WINXP_TITLE            0x9c9b // Windows XP - not part of exif standard.
157 #define TAG_WINXP_COMMENT          0x9c9c // Windows XP - not part of exif standard.
158 #define TAG_WINXP_AUTHOR           0x9c9d // Windows XP - not part of exif standard.
159 #define TAG_WINXP_KEYWORDS         0x9c9e // Windows XP - not part of exif standard.
160 #define TAG_WINXP_SUBJECT          0x9c9f // Windows XP - not part of exif standard.
161 
162 #define TAG_FLASH_PIX_VERSION      0xA000
163 #define TAG_COLOR_SPACE            0xA001
164 #define TAG_EXIF_IMAGEWIDTH        0xA002
165 #define TAG_EXIF_IMAGELENGTH       0xA003
166 #define TAG_RELATED_AUDIO_FILE     0xA004
167 #define TAG_INTEROP_OFFSET         0xA005
168 #define TAG_FLASH_ENERGY           0xA20B
169 #define TAG_SPATIAL_FREQ_RESP      0xA20C
170 #define TAG_FOCAL_PLANE_XRES       0xA20E
171 #define TAG_FOCAL_PLANE_YRES       0xA20F
172 #define TAG_FOCAL_PLANE_UNITS      0xA210
173 #define TAG_SUBJECT_LOCATION       0xA214
174 #define TAG_EXPOSURE_INDEX         0xA215
175 #define TAG_SENSING_METHOD         0xA217
176 #define TAG_FILE_SOURCE            0xA300
177 #define TAG_SCENE_TYPE             0xA301
178 #define TAG_CFA_PATTERN            0xA302
179 #define TAG_CUSTOM_RENDERED        0xA401
180 #define TAG_EXPOSURE_MODE          0xA402
181 #define TAG_WHITEBALANCE           0xA403
182 #define TAG_DIGITALZOOMRATIO       0xA404
183 #define TAG_FOCALLENGTH_35MM       0xA405
184 #define TAG_SCENE_CAPTURE_TYPE     0xA406
185 #define TAG_GAIN_CONTROL           0xA407
186 #define TAG_CONTRAST               0xA408
187 #define TAG_SATURATION             0xA409
188 #define TAG_SHARPNESS              0xA40A
189 #define TAG_DISTANCE_RANGE         0xA40C
190 
191 // TODO: replace the ", 0" values in this table with the correct format, e.g. ", FMT_USHORT"
192 static const TagTable_t TagTable[] = {
193   { TAG_INTEROP_INDEX,          "InteropIndex", 0, 0},
194   { TAG_INTEROP_VERSION,        "InteropVersion", 0, 0},
195   { TAG_IMAGE_WIDTH,            "ImageWidth", FMT_USHORT, 1},
196   { TAG_IMAGE_LENGTH,           "ImageLength", FMT_USHORT, 1},
197   { TAG_BITS_PER_SAMPLE,        "BitsPerSample", FMT_USHORT, 3},
198   { TAG_COMPRESSION,            "Compression", FMT_USHORT, 1},
199   { TAG_PHOTOMETRIC_INTERP,     "PhotometricInterpretation", FMT_USHORT, 1},
200   { TAG_FILL_ORDER,             "FillOrder", 0, 0},
201   { TAG_DOCUMENT_NAME,          "DocumentName", 0, 0},
202   { TAG_IMAGE_DESCRIPTION,      "ImageDescription", 0, 0 },
203   { TAG_MAKE,                   "Make", FMT_STRING, -1},
204   { TAG_MODEL,                  "Model", FMT_STRING, -1},
205   { TAG_SRIP_OFFSET,            "StripOffsets", FMT_USHORT, 1},
206   { TAG_ORIENTATION,            "Orientation", FMT_USHORT, 1},
207   { TAG_SAMPLES_PER_PIXEL,      "SamplesPerPixel", FMT_USHORT, 3},
208   { TAG_ROWS_PER_STRIP,         "RowsPerStrip", FMT_USHORT, 1},
209   { TAG_STRIP_BYTE_COUNTS,      "StripByteCounts", FMT_USHORT, 1},
210   { TAG_X_RESOLUTION,           "XResolution", FMT_URATIONAL, 1},
211   { TAG_Y_RESOLUTION,           "YResolution", FMT_URATIONAL, 1},
212   { TAG_PLANAR_CONFIGURATION,   "PlanarConfiguration", FMT_USHORT, 1},
213   { TAG_RESOLUTION_UNIT,        "ResolutionUnit", FMT_USHORT, 1},
214   { TAG_TRANSFER_FUNCTION,      "TransferFunction", FMT_USHORT, 768},
215   { TAG_SOFTWARE,               "Software", FMT_STRING, -1},
216   { TAG_DATETIME,               "DateTime", FMT_STRING, 20},
217   { TAG_ARTIST,                 "Artist", FMT_STRING, -1},
218   { TAG_WHITE_POINT,            "WhitePoint", FMT_SRATIONAL, 2},
219   { TAG_PRIMARY_CHROMATICITIES, "PrimaryChromaticities", FMT_SRATIONAL, 6},
220   { TAG_TRANSFER_RANGE,         "TransferRange", 0, 0},
221   { TAG_JPEG_PROC,              "JPEGProc", 0, 0},
222   { TAG_THUMBNAIL_OFFSET,       "ThumbnailOffset", 0, 0},
223   { TAG_THUMBNAIL_LENGTH,       "ThumbnailLength", 0, 0},
224   { TAG_Y_CB_CR_COEFFICIENTS,   "YCbCrCoefficients", FMT_SRATIONAL, 3},
225   { TAG_Y_CB_CR_SUB_SAMPLING,   "YCbCrSubSampling", FMT_USHORT, 2},
226   { TAG_Y_CB_CR_POSITIONING,    "YCbCrPositioning", FMT_USHORT, 1},
227   { TAG_REFERENCE_BLACK_WHITE,  "ReferenceBlackWhite", FMT_SRATIONAL, 6},
228   { TAG_RELATED_IMAGE_WIDTH,    "RelatedImageWidth", 0, 0},
229   { TAG_RELATED_IMAGE_LENGTH,   "RelatedImageLength", 0, 0},
230   { TAG_CFA_REPEAT_PATTERN_DIM, "CFARepeatPatternDim", 0, 0},
231   { TAG_CFA_PATTERN1,           "CFAPattern", 0, 0},
232   { TAG_BATTERY_LEVEL,          "BatteryLevel", 0, 0},
233   { TAG_COPYRIGHT,              "Copyright", FMT_STRING, -1},
234   { TAG_EXPOSURETIME,           "ExposureTime", FMT_SRATIONAL, 1},
235   { TAG_FNUMBER,                "FNumber", FMT_SRATIONAL, 1},
236   { TAG_IPTC_NAA,               "IPTC/NAA", 0, 0},
237   { TAG_EXIF_OFFSET,            "ExifOffset", 0, 0},
238   { TAG_INTER_COLOR_PROFILE,    "InterColorProfile", 0, 0},
239   { TAG_EXPOSURE_PROGRAM,       "ExposureProgram", FMT_SSHORT, 1},
240   { TAG_SPECTRAL_SENSITIVITY,   "SpectralSensitivity", FMT_STRING, -1},
241   { TAG_GPSINFO,                "GPS Dir offset", 0, 0},
242   { TAG_ISO_EQUIVALENT,         "ISOSpeedRatings", FMT_SSHORT, -1},
243   { TAG_OECF,                   "OECF", 0, 0},
244   { TAG_EXIF_VERSION,           "ExifVersion", FMT_BYTE, 4},
245   { TAG_DATETIME_ORIGINAL,      "DateTimeOriginal", FMT_STRING, 20},
246   { TAG_DATETIME_DIGITIZED,     "DateTimeDigitized", FMT_STRING, 20},
247   { TAG_COMPONENTS_CONFIG,      "ComponentsConfiguration", FMT_BYTE, 4},
248   { TAG_CPRS_BITS_PER_PIXEL,    "CompressedBitsPerPixel", FMT_SRATIONAL, 1},
249   { TAG_SHUTTERSPEED,           "ShutterSpeedValue", FMT_SRATIONAL, 1},
250   { TAG_APERTURE,               "ApertureValue", FMT_URATIONAL, 1},
251   { TAG_BRIGHTNESS_VALUE,       "BrightnessValue", FMT_SRATIONAL, 1},
252   { TAG_EXPOSURE_BIAS,          "ExposureBiasValue", FMT_SRATIONAL, 1},
253   { TAG_MAXAPERTURE,            "MaxApertureValue", FMT_URATIONAL, 1},
254   { TAG_SUBJECT_DISTANCE,       "SubjectDistance", FMT_URATIONAL, 1},
255   { TAG_METERING_MODE,          "MeteringMode", FMT_USHORT, 1},
256   { TAG_LIGHT_SOURCE,           "LightSource", FMT_USHORT, 1},
257   { TAG_FLASH,                  "Flash", FMT_USHORT, 1},
258   { TAG_FOCALLENGTH,            "FocalLength", FMT_URATIONAL, 1},
259   { TAG_MAKER_NOTE,             "MakerNote", FMT_STRING, -1},
260   { TAG_USERCOMMENT,            "UserComment", FMT_STRING, -1},
261   { TAG_SUBSEC_TIME,            "SubSecTime", FMT_STRING, -1},
262   { TAG_SUBSEC_TIME_ORIG,       "SubSecTimeOriginal", FMT_STRING, -1},
263   { TAG_SUBSEC_TIME_DIG,        "SubSecTimeDigitized", FMT_STRING, -1},
264   { TAG_WINXP_TITLE,            "Windows-XP Title", 0, 0},
265   { TAG_WINXP_COMMENT,          "Windows-XP comment", 0, 0},
266   { TAG_WINXP_AUTHOR,           "Windows-XP author", 0, 0},
267   { TAG_WINXP_KEYWORDS,         "Windows-XP keywords", 0, 0},
268   { TAG_WINXP_SUBJECT,          "Windows-XP subject", 0, 0},
269   { TAG_FLASH_PIX_VERSION,      "FlashPixVersion", FMT_BYTE, 4},
270   { TAG_COLOR_SPACE,            "ColorSpace", FMT_USHORT, 1},
271   { TAG_EXIF_IMAGEWIDTH,        "ExifImageWidth", 0, 0},
272   { TAG_EXIF_IMAGELENGTH,       "ExifImageLength", 0, 0},
273   { TAG_RELATED_AUDIO_FILE,     "RelatedAudioFile", 0, 0},
274   { TAG_INTEROP_OFFSET,         "InteroperabilityOffset", 0, 0},
275   { TAG_FLASH_ENERGY,           "FlashEnergy", FMT_URATIONAL, 1},
276   { TAG_SPATIAL_FREQ_RESP,      "SpatialFrequencyResponse", FMT_STRING, -1},
277   { TAG_FOCAL_PLANE_XRES,       "FocalPlaneXResolution", FMT_URATIONAL, 1},
278   { TAG_FOCAL_PLANE_YRES,       "FocalPlaneYResolution", FMT_URATIONAL, 1},
279   { TAG_FOCAL_PLANE_UNITS,      "FocalPlaneResolutionUnit", FMT_USHORT, 1},
280   { TAG_SUBJECT_LOCATION,       "SubjectLocation", FMT_USHORT, 2},
281   { TAG_EXPOSURE_INDEX,         "ExposureIndex", FMT_URATIONAL, 1},
282   { TAG_SENSING_METHOD,         "SensingMethod", FMT_USHORT, 1},
283   { TAG_FILE_SOURCE,            "FileSource", 0, 1},
284   { TAG_SCENE_TYPE,             "SceneType", 0, 1},
285   { TAG_CFA_PATTERN,            "CFA Pattern", 0, -1},
286   { TAG_CUSTOM_RENDERED,        "CustomRendered", FMT_USHORT, 1},
287   { TAG_EXPOSURE_MODE,          "ExposureMode", FMT_USHORT, 1},
288   { TAG_WHITEBALANCE,           "WhiteBalance", FMT_USHORT, 1},
289   { TAG_DIGITALZOOMRATIO,       "DigitalZoomRatio", FMT_URATIONAL, 1},
290   { TAG_FOCALLENGTH_35MM,       "FocalLengthIn35mmFilm", FMT_USHORT, 1},
291   { TAG_SCENE_CAPTURE_TYPE,     "SceneCaptureType", FMT_USHORT, 1},
292   { TAG_GAIN_CONTROL,           "GainControl", FMT_URATIONAL, 1},
293   { TAG_CONTRAST,               "Contrast", FMT_USHORT, 1},
294   { TAG_SATURATION,             "Saturation", FMT_USHORT, 1},
295   { TAG_SHARPNESS,              "Sharpness", FMT_USHORT, 1},
296   { TAG_DISTANCE_RANGE,         "SubjectDistanceRange", FMT_USHORT, 1},
297 } ;
298 
299 #define TAG_TABLE_SIZE  (sizeof(TagTable) / sizeof(TagTable_t))
300 
TagNameToValue(const char * tagName)301 int TagNameToValue(const char* tagName)
302 {
303     unsigned int i;
304     for (i = 0; i < TAG_TABLE_SIZE; i++) {
305         if (strcmp(TagTable[i].Desc, tagName) == 0) {
306             printf("found tag %s val %d", TagTable[i].Desc, TagTable[i].Tag);
307             return TagTable[i].Tag;
308         }
309     }
310     printf("tag %s NOT FOUND", tagName);
311     return -1;
312 }
313 
IsDateTimeTag(unsigned short tag)314 int IsDateTimeTag(unsigned short tag)
315 {
316     return ((tag == TAG_DATETIME)? TRUE: FALSE);
317 }
318 
319 //--------------------------------------------------------------------------
320 // Convert a 16 bit unsigned value to file's native byte order
321 //--------------------------------------------------------------------------
Put16u(void * Short,unsigned short PutValue)322 static void Put16u(void * Short, unsigned short PutValue)
323 {
324     if (MotorolaOrder){
325         ((uchar *)Short)[0] = (uchar)(PutValue>>8);
326         ((uchar *)Short)[1] = (uchar)PutValue;
327     }else{
328         ((uchar *)Short)[0] = (uchar)PutValue;
329         ((uchar *)Short)[1] = (uchar)(PutValue>>8);
330     }
331 }
332 
333 //--------------------------------------------------------------------------
334 // Convert a 16 bit unsigned value from file's native byte order
335 //--------------------------------------------------------------------------
Get16u(void * Short)336 int Get16u(void * Short)
337 {
338     if (MotorolaOrder){
339         return (((uchar *)Short)[0] << 8) | ((uchar *)Short)[1];
340     }else{
341         return (((uchar *)Short)[1] << 8) | ((uchar *)Short)[0];
342     }
343 }
344 
345 //--------------------------------------------------------------------------
346 // Convert a 32 bit signed value from file's native byte order
347 //--------------------------------------------------------------------------
Get32s(void * Long)348 int Get32s(void * Long)
349 {
350     if (MotorolaOrder){
351         return  ((( char *)Long)[0] << 24) | (((uchar *)Long)[1] << 16)
352               | (((uchar *)Long)[2] << 8 ) | (((uchar *)Long)[3] << 0 );
353     }else{
354         return  ((( char *)Long)[3] << 24) | (((uchar *)Long)[2] << 16)
355               | (((uchar *)Long)[1] << 8 ) | (((uchar *)Long)[0] << 0 );
356     }
357 }
358 
359 //--------------------------------------------------------------------------
360 // Convert a 32 bit unsigned value to file's native byte order
361 //--------------------------------------------------------------------------
Put32u(void * Value,unsigned PutValue)362 void Put32u(void * Value, unsigned PutValue)
363 {
364     if (MotorolaOrder){
365         ((uchar *)Value)[0] = (uchar)(PutValue>>24);
366         ((uchar *)Value)[1] = (uchar)(PutValue>>16);
367         ((uchar *)Value)[2] = (uchar)(PutValue>>8);
368         ((uchar *)Value)[3] = (uchar)PutValue;
369     }else{
370         ((uchar *)Value)[0] = (uchar)PutValue;
371         ((uchar *)Value)[1] = (uchar)(PutValue>>8);
372         ((uchar *)Value)[2] = (uchar)(PutValue>>16);
373         ((uchar *)Value)[3] = (uchar)(PutValue>>24);
374     }
375 }
376 
377 //--------------------------------------------------------------------------
378 // Convert a 32 bit unsigned value from file's native byte order
379 //--------------------------------------------------------------------------
Get32u(void * Long)380 unsigned Get32u(void * Long)
381 {
382     return (unsigned)Get32s(Long) & 0xffffffff;
383 }
384 
385 //--------------------------------------------------------------------------
386 // Display a number as one of its many formats
387 //--------------------------------------------------------------------------
PrintFormatNumber(void * ValuePtr,int Format,int ByteCount)388 void PrintFormatNumber(void * ValuePtr, int Format, int ByteCount)
389 {
390     int s,n;
391 
392     for(n=0;n<16;n++){
393         switch(Format){
394             case FMT_SBYTE:
395             case FMT_BYTE:      printf("%02x",*(uchar *)ValuePtr); s=1;  break;
396             case FMT_USHORT:    printf("%d",Get16u(ValuePtr)); s=2;      break;
397             case FMT_ULONG:
398             case FMT_SLONG:     printf("%d",Get32s(ValuePtr)); s=4;      break;
399             case FMT_SSHORT:    printf("%hd",(signed short)Get16u(ValuePtr)); s=2; break;
400             case FMT_URATIONAL:
401             case FMT_SRATIONAL:
402                printf("%d/%d",Get32s(ValuePtr), Get32s(4+(char *)ValuePtr));
403                s = 8;
404                break;
405 
406             case FMT_SINGLE:    printf("%f",(double)*(float *)ValuePtr); s=8; break;
407             case FMT_DOUBLE:    printf("%f",*(double *)ValuePtr);        s=8; break;
408             default:
409                 printf("Unknown format %d:", Format);
410                 return;
411         }
412         ByteCount -= s;
413         if (ByteCount <= 0) break;
414         printf(", ");
415         ValuePtr = (void *)((char *)ValuePtr + s);
416 
417     }
418     if (n >= 16) printf("...");
419 }
420 
421 
422 //--------------------------------------------------------------------------
423 // Evaluate number, be it int, rational, or float from directory.
424 //--------------------------------------------------------------------------
ConvertAnyFormat(void * ValuePtr,int Format)425 double ConvertAnyFormat(void * ValuePtr, int Format)
426 {
427     double Value;
428     Value = 0;
429 
430     switch(Format){
431         case FMT_SBYTE:     Value = *(signed char *)ValuePtr;  break;
432         case FMT_BYTE:      Value = *(uchar *)ValuePtr;        break;
433 
434         case FMT_USHORT:    Value = Get16u(ValuePtr);          break;
435         case FMT_ULONG:     Value = Get32u(ValuePtr);          break;
436 
437         case FMT_URATIONAL:
438         case FMT_SRATIONAL:
439             {
440                 int Num,Den;
441                 Num = Get32s(ValuePtr);
442                 Den = Get32s(4+(char *)ValuePtr);
443                 if (Den == 0){
444                     Value = 0;
445                 }else{
446                     Value = (double)Num/Den;
447                 }
448                 break;
449             }
450 
451         case FMT_SSHORT:    Value = (signed short)Get16u(ValuePtr);  break;
452         case FMT_SLONG:     Value = Get32s(ValuePtr);                break;
453 
454         // Not sure if this is correct (never seen float used in Exif format)
455         case FMT_SINGLE:    Value = (double)*(float *)ValuePtr;      break;
456         case FMT_DOUBLE:    Value = *(double *)ValuePtr;             break;
457 
458         default:
459             ErrNonfatal("Illegal format code %d",Format,0);
460     }
461     return Value;
462 }
463 
464 //--------------------------------------------------------------------------
465 // Convert a double value into a signed or unsigned rational number.
466 //--------------------------------------------------------------------------
float2urat(double value,unsigned int max,unsigned int * numerator,unsigned int * denominator)467 static void float2urat(double value, unsigned int max, unsigned int *numerator,
468                        unsigned int *denominator) {
469     if (value <= 0) {
470         *numerator = 0;
471         *denominator = 1;
472         return;
473     }
474 
475     if (value > max) {
476         *numerator = max;
477         *denominator = 1;
478         return;
479     }
480 
481     // For values less than 1e-9, scale as much as possible
482     if (value < 1e-9) {
483         unsigned int n = (unsigned int)(value * max);
484         if (n == 0) {
485             *numerator = 0;
486             *denominator = 1;
487         } else {
488             *numerator = n;
489             *denominator = max;
490         }
491         return;
492     }
493 
494     // Try to use a denominator of 1e9, 1e8, ..., until the numerator fits
495     unsigned int d;
496     for (d = 1000000000; d >= 1; d /= 10) {
497         double s = value * d;
498         if (s <= max) {
499             // Remove the trailing zeros from both.
500             unsigned int n = (unsigned int)s;
501             while (n % 10 == 0 && d >= 10) {
502                 n /= 10;
503                 d /= 10;
504             }
505             *numerator = n;
506             *denominator = d;
507             return;
508         }
509     }
510 
511     // Shouldn't reach here because the denominator 1 should work
512     // above. But just in case.
513     *numerator = 0;
514     *denominator = 1;
515 }
516 
ConvertDoubleToURational(double value,unsigned int * numerator,unsigned int * denominator)517 static void ConvertDoubleToURational(double value, unsigned int *numerator,
518                                      unsigned int *denominator) {
519     float2urat(value, 0xFFFFFFFFU, numerator, denominator);
520 }
521 
ConvertDoubleToSRational(double value,int * numerator,int * denominator)522 static void ConvertDoubleToSRational(double value, int *numerator,
523                                      int *denominator) {
524     int negative = 0;
525 
526     if (value < 0) {
527         value = -value;
528         negative = 1;
529     }
530 
531     unsigned int n, d;
532     float2urat(value, 0x7FFFFFFFU, &n, &d);
533     *numerator = (int)n;
534     *denominator = (int)d;
535     if (negative) {
536         *numerator = -*numerator;
537     }
538 }
539 
540 //--------------------------------------------------------------------------
541 // Process one of the nested EXIF directories.
542 //--------------------------------------------------------------------------
ProcessExifDir(unsigned char * DirStart,unsigned char * OffsetBase,unsigned ExifLength,int NestingLevel)543 static void ProcessExifDir(unsigned char * DirStart, unsigned char * OffsetBase,
544         unsigned ExifLength, int NestingLevel)
545 {
546     int de;
547     int a;
548     int NumDirEntries;
549     unsigned ThumbnailOffset = 0;
550     unsigned ThumbnailSize = 0;
551     char IndentString[25];
552 
553     printf("ProcessExifDir");
554     if (NestingLevel > 4){
555         ErrNonfatal("Maximum directory nesting exceeded (corrupt exif header)", 0,0);
556         return;
557     }
558 
559     memset(IndentString, ' ', 25);
560     IndentString[NestingLevel * 4] = '\0';
561 
562 
563     NumDirEntries = Get16u(DirStart);
564     #define DIR_ENTRY_ADDR(Start, Entry) (Start+2+12*(Entry))
565 
566     {
567         unsigned char * DirEnd;
568         DirEnd = DIR_ENTRY_ADDR(DirStart, NumDirEntries);
569         if (DirEnd+4 > (OffsetBase+ExifLength)){
570             if (DirEnd+2 == OffsetBase+ExifLength || DirEnd == OffsetBase+ExifLength){
571                 // Version 1.3 of jhead would truncate a bit too much.
572                 // This also caught later on as well.
573             }else{
574                 ErrNonfatal("Illegally sized exif subdirectory (%d entries)",NumDirEntries,0);
575                 return;
576             }
577         }
578         if (DumpExifMap){
579             printf("Map: %05d-%05d: Directory\n",(int)(DirStart-OffsetBase), (int)(DirEnd+4-OffsetBase));
580         }
581 
582 
583     }
584 
585     if (ShowTags){
586         printf("(dir has %d entries)\n",NumDirEntries);
587     }
588 
589     for (de=0;de<NumDirEntries;de++){
590         int Tag, Format, Components;
591         unsigned char * ValuePtr;
592         int ByteCount;
593         unsigned char * DirEntry;
594         DirEntry = DIR_ENTRY_ADDR(DirStart, de);
595 
596         Tag = Get16u(DirEntry);
597         Format = Get16u(DirEntry+2);
598         Components = Get32u(DirEntry+4);
599 
600         if ((Format-1) >= NUM_FORMATS) {
601             // (-1) catches illegal zero case as unsigned underflows to positive large.
602             ErrNonfatal("Illegal number format %d for tag %04x", Format, Tag);
603             continue;
604         }
605 
606         if ((unsigned)Components > 0x10000){
607             ErrNonfatal("Illegal number of components %d for tag %04x", Components, Tag);
608             continue;
609         }
610 
611         ByteCount = Components * BytesPerFormat[Format];
612 
613         if (ByteCount > 4){
614             unsigned OffsetVal;
615             OffsetVal = Get32u(DirEntry+8);
616             // If its bigger than 4 bytes, the dir entry contains an offset.
617             if (OffsetVal+ByteCount > ExifLength){
618                 // Bogus pointer offset and / or bytecount value
619                 ErrNonfatal("Illegal value pointer for tag %04x", Tag,0);
620                 continue;
621             }
622             ValuePtr = OffsetBase+OffsetVal;
623 
624             if (OffsetVal > ImageInfo.LargestExifOffset){
625                 ImageInfo.LargestExifOffset = OffsetVal;
626             }
627 
628             if (DumpExifMap){
629                 printf("Map: %05d-%05d:   Data for tag %04x\n",OffsetVal, OffsetVal+ByteCount, Tag);
630             }
631         }else{
632             // 4 bytes or less and value is in the dir entry itself
633             ValuePtr = DirEntry+8;
634         }
635 
636         if (Tag == TAG_MAKER_NOTE){
637             if (ShowTags){
638                 printf("%s    Maker note: ",IndentString);
639             }
640             ProcessMakerNote(ValuePtr, ByteCount, OffsetBase, ExifLength);
641             continue;
642         }
643 
644         if (ShowTags){
645             // Show tag name
646             for (a=0;;a++){
647                 if (a >= (int)TAG_TABLE_SIZE){
648                     printf("%s", IndentString);
649                     printf("    Unknown Tag %04x Value = ", Tag);
650                     break;
651                 }
652                 if (TagTable[a].Tag == Tag){
653                     printf("%s", IndentString);
654                     printf("    %s = ",TagTable[a].Desc);
655                     break;
656                 }
657             }
658 
659             // Show tag value.
660             switch(Format){
661                 case FMT_BYTE:
662                     if(ByteCount>1){
663                         printf("%.*ls\n", ByteCount/2, (wchar_t *)ValuePtr);
664                     }else{
665                         PrintFormatNumber(ValuePtr, Format, ByteCount);
666                         printf("\n");
667                     }
668                     break;
669 
670                 case FMT_UNDEFINED:
671                     // Undefined is typically an ascii string.
672 
673                 case FMT_STRING:
674                     // String arrays printed without function call (different from int arrays)
675                     {
676                           printf("\"%s\"", ValuePtr);
677 //                        int NoPrint = 0;
678 //                        printf("\"");
679 //                        for (a=0;a<ByteCount;a++){
680 //                            if (ValuePtr[a] >= 32){
681 //                                putchar(ValuePtr[a]);
682 //                                NoPrint = 0;
683 //                            }else{
684 //                                // Avoiding indicating too many unprintable characters of proprietary
685 //                                // bits of binary information this program may not know how to parse.
686 //                                if (!NoPrint && a != ByteCount-1){
687 //                                    putchar('?');
688 //                                    NoPrint = 1;
689 //                                }
690 //                            }
691 //                        }
692 //                        printf("\"\n");
693                     }
694                     break;
695 
696                 default:
697                     // Handle arrays of numbers later (will there ever be?)
698                     PrintFormatNumber(ValuePtr, Format, ByteCount);
699                     printf("\n");
700             }
701         }
702 
703         // Extract useful components of tag
704         switch(Tag){
705 
706             case TAG_MAKE:
707                 strncpy(ImageInfo.CameraMake, (char *)ValuePtr, ByteCount < 31 ? ByteCount : 31);
708                 break;
709 
710             case TAG_MODEL:
711                 strncpy(ImageInfo.CameraModel, (char *)ValuePtr, ByteCount < 39 ? ByteCount : 39);
712                 break;
713 
714             case TAG_SUBSEC_TIME:
715                 strlcpy(ImageInfo.SubSecTime, (char *)ValuePtr, sizeof(ImageInfo.SubSecTime));
716                 break;
717 
718             case TAG_SUBSEC_TIME_ORIG:
719                 strlcpy(ImageInfo.SubSecTimeOrig, (char *)ValuePtr,
720                         sizeof(ImageInfo.SubSecTimeOrig));
721                 break;
722 
723             case TAG_SUBSEC_TIME_DIG:
724                 strlcpy(ImageInfo.SubSecTimeDig, (char *)ValuePtr,
725                         sizeof(ImageInfo.SubSecTimeDig));
726                 break;
727 
728             case TAG_DATETIME_DIGITIZED:
729                 strlcpy(ImageInfo.DigitizedTime, (char *)ValuePtr,
730                         sizeof(ImageInfo.DigitizedTime));
731 
732                 if (ImageInfo.numDateTimeTags >= MAX_DATE_COPIES){
733                     ErrNonfatal("More than %d date fields!  This is nuts", MAX_DATE_COPIES, 0);
734                     break;
735                 }
736                 ImageInfo.DateTimeOffsets[ImageInfo.numDateTimeTags++] =
737                     (char *)ValuePtr - (char *)OffsetBase;
738                 break;
739 
740             case TAG_DATETIME_ORIGINAL:
741                 // If we get a DATETIME_ORIGINAL, we use that one.
742                 strncpy(ImageInfo.DateTime, (char *)ValuePtr, 19);
743                 // Fallthru...
744 
745             case TAG_DATETIME:
746                 if (!isdigit(ImageInfo.DateTime[0])){
747                     // If we don't already have a DATETIME_ORIGINAL, use whatever
748                     // time fields we may have.
749                     strncpy(ImageInfo.DateTime, (char *)ValuePtr, 19);
750                 }
751 
752                 if (ImageInfo.numDateTimeTags >= MAX_DATE_COPIES){
753                     ErrNonfatal("More than %d date fields!  This is nuts", MAX_DATE_COPIES, 0);
754                     break;
755                 }
756                 ImageInfo.DateTimeOffsets[ImageInfo.numDateTimeTags++] =
757                     (char *)ValuePtr - (char *)OffsetBase;
758                 break;
759 
760             case TAG_WINXP_COMMENT:
761                 if (ImageInfo.Comments[0]){ // We already have a jpeg comment.
762                     // Already have a comment (probably windows comment), skip this one.
763                     if (ShowTags) printf("Windows XP commend and other comment in header\n");
764                     break; // Already have a windows comment, skip this one.
765                 }
766 
767                 if (ByteCount > 1){
768                     if (ByteCount > MAX_COMMENT_SIZE) ByteCount = MAX_COMMENT_SIZE;
769                     memcpy(ImageInfo.Comments, ValuePtr, ByteCount);
770                     ImageInfo.CommentWidchars = ByteCount/2;
771                 }
772                 break;
773 
774             case TAG_USERCOMMENT:
775                 if (ImageInfo.Comments[0]){ // We already have a jpeg comment.
776                     // Already have a comment (probably windows comment), skip this one.
777                     if (ShowTags) printf("Multiple comments in exif header\n");
778                     break; // Already have a windows comment, skip this one.
779                 }
780 
781                 // Comment is often padded with trailing spaces.  Remove these first.
782                 for (a=ByteCount;;){
783                     a--;
784                     if ((ValuePtr)[a] == ' '){
785                         (ValuePtr)[a] = '\0';
786                     }else{
787                         break;
788                     }
789                     if (a == 0) break;
790                 }
791 
792                 // Copy the comment
793                 {
794                     // We want to set copied comment length (msize) to be the
795                     // minimum of:
796                     // (1) The space still available in Exif
797                     // (2) The given comment length (ByteCount)
798                     // (3) MAX_COMMENT_SIZE - 1
799                     int msiz = ExifLength - (ValuePtr-OffsetBase);
800                     if (msiz > ByteCount) msiz = ByteCount;
801                     if (msiz > MAX_COMMENT_SIZE - 1) msiz = MAX_COMMENT_SIZE - 1;
802                     if (msiz > 5 && memcmp(ValuePtr, "ASCII", 5) == 0) {
803                         for (a = 5; a < 10 && a < msiz; a++) {
804                             int c = (ValuePtr)[a];
805                             if (c != '\0' && c != ' ') {
806                                 strncpy(ImageInfo.Comments,
807                                         (char *)ValuePtr + a, msiz - a);
808                                 break;
809                             }
810                         }
811                     } else {
812                         strncpy(ImageInfo.Comments, (char *)ValuePtr, msiz);
813                     }
814                 }
815                 break;
816 
817             case TAG_FNUMBER:
818                 // Simplest way of expressing aperture, so I trust it the most.
819                 // (overwrite previously computd value if there is one)
820                 ImageInfo.ApertureFNumber = (float)ConvertAnyFormat(ValuePtr, Format);
821                 break;
822 
823             case TAG_APERTURE:
824             case TAG_MAXAPERTURE:
825                 // More relevant info always comes earlier, so only use this field if we don't
826                 // have appropriate aperture information yet.
827                 if (ImageInfo.ApertureFNumber == 0){
828                     ImageInfo.ApertureFNumber
829                         = (float)exp(ConvertAnyFormat(ValuePtr, Format)*log(2)*0.5);
830                 }
831                 break;
832 
833             case TAG_FOCALLENGTH:
834                 // Nice digital cameras actually save the focal length as a function
835                 // of how farthey are zoomed in.
836                 ImageInfo.FocalLength.num = Get32u(ValuePtr);
837                 ImageInfo.FocalLength.denom = Get32u(4+(char *)ValuePtr);
838                 break;
839 
840             case TAG_SUBJECT_DISTANCE:
841                 // Inidcates the distacne the autofocus camera is focused to.
842                 // Tends to be less accurate as distance increases.
843                 ImageInfo.Distance = (float)ConvertAnyFormat(ValuePtr, Format);
844                 break;
845 
846             case TAG_EXPOSURETIME:
847                 // Simplest way of expressing exposure time, so I trust it most.
848                 // (overwrite previously computd value if there is one)
849                 ImageInfo.ExposureTime = (float)ConvertAnyFormat(ValuePtr, Format);
850                 break;
851 
852             case TAG_SHUTTERSPEED:
853                 // More complicated way of expressing exposure time, so only use
854                 // this value if we don't already have it from somewhere else.
855                 if (ImageInfo.ExposureTime == 0){
856                     ImageInfo.ExposureTime
857                         = (float)(1/exp(ConvertAnyFormat(ValuePtr, Format)*log(2)));
858                 }
859                 break;
860 
861 
862             case TAG_FLASH:
863                 ImageInfo.FlashUsed=(int)ConvertAnyFormat(ValuePtr, Format);
864                 break;
865 
866             case TAG_ORIENTATION:
867                 if (NumOrientations >= 2){
868                     // Can have another orientation tag for the thumbnail, but if there's
869                     // a third one, things are stringae.
870                     ErrNonfatal("More than two orientation tags!",0,0);
871                     break;
872                 }
873                 OrientationPtr[NumOrientations] = ValuePtr;
874                 OrientationNumFormat[NumOrientations] = Format;
875                 if (NumOrientations == 0){
876                     ImageInfo.Orientation = (int)ConvertAnyFormat(ValuePtr, Format);
877                 }
878                 if (ImageInfo.Orientation < 0 || ImageInfo.Orientation > 8){
879                     ErrNonfatal("Undefined rotation value %d", ImageInfo.Orientation, 0);
880                     ImageInfo.Orientation = 0;
881                 }
882                 NumOrientations += 1;
883                 break;
884 
885             case TAG_EXIF_IMAGELENGTH:
886             case TAG_EXIF_IMAGEWIDTH:
887                 // Use largest of height and width to deal with images that have been
888                 // rotated to portrait format.
889                 a = (int)ConvertAnyFormat(ValuePtr, Format);
890                 if (ExifImageWidth < a) ExifImageWidth = a;
891                 break;
892 
893             case TAG_FOCAL_PLANE_XRES:
894                 FocalplaneXRes = ConvertAnyFormat(ValuePtr, Format);
895                 break;
896 
897             case TAG_FOCAL_PLANE_UNITS:
898                 switch((int)ConvertAnyFormat(ValuePtr, Format)){
899                     case 1: FocalplaneUnits = 25.4; break; // inch
900                     case 2:
901                         // According to the information I was using, 2 means meters.
902                         // But looking at the Cannon powershot's files, inches is the only
903                         // sensible value.
904                         FocalplaneUnits = 25.4;
905                         break;
906 
907                     case 3: FocalplaneUnits = 10;   break;  // centimeter
908                     case 4: FocalplaneUnits = 1;    break;  // millimeter
909                     case 5: FocalplaneUnits = .001; break;  // micrometer
910                 }
911                 break;
912 
913             case TAG_EXPOSURE_BIAS:
914                 ImageInfo.ExposureBias = (float)ConvertAnyFormat(ValuePtr, Format);
915                 break;
916 
917             case TAG_WHITEBALANCE:
918                 ImageInfo.Whitebalance = (int)ConvertAnyFormat(ValuePtr, Format);
919                 break;
920 
921             case TAG_LIGHT_SOURCE:
922                 ImageInfo.LightSource = (int)ConvertAnyFormat(ValuePtr, Format);
923                 break;
924 
925             case TAG_METERING_MODE:
926                 ImageInfo.MeteringMode = (int)ConvertAnyFormat(ValuePtr, Format);
927                 break;
928 
929             case TAG_EXPOSURE_PROGRAM:
930                 ImageInfo.ExposureProgram = (int)ConvertAnyFormat(ValuePtr, Format);
931                 break;
932 
933             case TAG_EXPOSURE_INDEX:
934                 if (ImageInfo.ISOequivalent == 0){
935                     // Exposure index and ISO equivalent are often used interchangeably,
936                     // so we will do the same in jhead.
937                     // http://photography.about.com/library/glossary/bldef_ei.htm
938                     ImageInfo.ISOequivalent = (int)ConvertAnyFormat(ValuePtr, Format);
939                 }
940                 break;
941 
942             case TAG_EXPOSURE_MODE:
943                 ImageInfo.ExposureMode = (int)ConvertAnyFormat(ValuePtr, Format);
944                 break;
945 
946             case TAG_ISO_EQUIVALENT:
947                 ImageInfo.ISOequivalent = (int)ConvertAnyFormat(ValuePtr, Format);
948                 break;
949 
950             case TAG_DIGITALZOOMRATIO:
951                 ImageInfo.DigitalZoomRatio = (float)ConvertAnyFormat(ValuePtr, Format);
952                 break;
953 
954             case TAG_THUMBNAIL_OFFSET:
955                 ThumbnailOffset = (unsigned)ConvertAnyFormat(ValuePtr, Format);
956                 DirWithThumbnailPtrs = DirStart;
957                 break;
958 
959             case TAG_THUMBNAIL_LENGTH:
960                 ThumbnailSize = (unsigned)ConvertAnyFormat(ValuePtr, Format);
961                 ImageInfo.ThumbnailSizeOffset = ValuePtr-OffsetBase;
962                 break;
963 
964             case TAG_EXIF_OFFSET:
965                 if (ShowTags) printf("%s    Exif Dir:",IndentString);
966 
967             case TAG_INTEROP_OFFSET:
968                 if (Tag == TAG_INTEROP_OFFSET && ShowTags) printf("%s    Interop Dir:",IndentString);
969                 {
970                     unsigned char * SubdirStart;
971                     SubdirStart = OffsetBase + Get32u(ValuePtr);
972                     if (SubdirStart < OffsetBase || SubdirStart > OffsetBase+ExifLength){
973                         ErrNonfatal("Illegal exif or interop ofset directory link",0,0);
974                     }else{
975                         ProcessExifDir(SubdirStart, OffsetBase, ExifLength, NestingLevel+1);
976                     }
977                     continue;
978                 }
979                 break;
980 
981             case TAG_GPSINFO:
982                 if (ShowTags) printf("%s    GPS info dir:",IndentString);
983                 {
984                     unsigned char * SubdirStart;
985                     SubdirStart = OffsetBase + Get32u(ValuePtr);
986                     if (SubdirStart < OffsetBase || SubdirStart > OffsetBase+ExifLength){
987                         ErrNonfatal("Illegal GPS directory link",0,0);
988                     }else{
989                         ProcessGpsInfo(SubdirStart, ByteCount, OffsetBase, ExifLength);
990                     }
991                     continue;
992                 }
993                 break;
994 
995             case TAG_FOCALLENGTH_35MM:
996                 // The focal length equivalent 35 mm is a 2.2 tag (defined as of April 2002)
997                 // if its present, use it to compute equivalent focal length instead of
998                 // computing it from sensor geometry and actual focal length.
999                 ImageInfo.FocalLength35mmEquiv = (unsigned)ConvertAnyFormat(ValuePtr, Format);
1000                 break;
1001 
1002             case TAG_DISTANCE_RANGE:
1003                 // Three possible standard values:
1004                 //   1 = macro, 2 = close, 3 = distant
1005                 ImageInfo.DistanceRange = (int)ConvertAnyFormat(ValuePtr, Format);
1006                 break;
1007         }
1008     }
1009 
1010 
1011     {
1012         // In addition to linking to subdirectories via exif tags,
1013         // there's also a potential link to another directory at the end of each
1014         // directory.  this has got to be the result of a committee!
1015         unsigned char * SubdirStart;
1016         unsigned Offset;
1017 
1018         if (DIR_ENTRY_ADDR(DirStart, NumDirEntries) + 4 <= OffsetBase+ExifLength){
1019             printf("DirStart %p offset from dirstart %d", DirStart, 2+12*NumDirEntries);
1020             Offset = Get32u(DirStart+2+12*NumDirEntries);
1021             if (Offset){
1022                 SubdirStart = OffsetBase + Offset;
1023                 if (SubdirStart > OffsetBase+ExifLength || SubdirStart < OffsetBase){
1024                     printf("SubdirStart %p OffsetBase %p ExifLength %d Offset %d",
1025                         SubdirStart, OffsetBase, ExifLength, Offset);
1026                     if (SubdirStart > OffsetBase && SubdirStart < OffsetBase+ExifLength+20){
1027                         // Jhead 1.3 or earlier would crop the whole directory!
1028                         // As Jhead produces this form of format incorrectness,
1029                         // I'll just let it pass silently
1030                         if (ShowTags) printf("Thumbnail removed with Jhead 1.3 or earlier\n");
1031                     }else{
1032                         ErrNonfatal("Illegal subdirectory link",0,0);
1033                     }
1034                 }else{
1035                     if (SubdirStart <= OffsetBase+ExifLength){
1036                         if (ShowTags) printf("%s    Continued directory ",IndentString);
1037                         ProcessExifDir(SubdirStart, OffsetBase, ExifLength, NestingLevel+1);
1038                     }
1039                 }
1040                 if (Offset > ImageInfo.LargestExifOffset){
1041                     ImageInfo.LargestExifOffset = Offset;
1042                 }
1043             }
1044         }else{
1045             // The exif header ends before the last next directory pointer.
1046         }
1047     }
1048 
1049     if (ThumbnailOffset){
1050         ImageInfo.ThumbnailAtEnd = FALSE;
1051 
1052         if (DumpExifMap){
1053             printf("Map: %05d-%05d: Thumbnail\n",ThumbnailOffset, ThumbnailOffset+ThumbnailSize);
1054         }
1055 
1056         if (ThumbnailOffset <= ExifLength){
1057             if (ThumbnailSize > ExifLength-ThumbnailOffset){
1058                 // If thumbnail extends past exif header, only save the part that
1059                 // actually exists.  Canon's EOS viewer utility will do this - the
1060                 // thumbnail extracts ok with this hack.
1061                 ThumbnailSize = ExifLength-ThumbnailOffset;
1062                 if (ShowTags) printf("Thumbnail incorrectly placed in header\n");
1063 
1064             }
1065             // The thumbnail pointer appears to be valid.  Store it.
1066             ImageInfo.ThumbnailOffset = ThumbnailOffset;
1067             ImageInfo.ThumbnailSize = ThumbnailSize;
1068 
1069             if (ShowTags){
1070                 printf("Thumbnail size: %d bytes\n",ThumbnailSize);
1071             }
1072         }
1073     }
1074     printf("returning from ProcessExifDir");
1075 }
1076 
1077 
1078 //--------------------------------------------------------------------------
1079 // Process a EXIF marker
1080 // Describes all the drivel that most digital cameras include...
1081 //--------------------------------------------------------------------------
process_EXIF(unsigned char * ExifSection,unsigned int length)1082 void process_EXIF (unsigned char * ExifSection, unsigned int length)
1083 {
1084     int FirstOffset;
1085 
1086     FocalplaneXRes = 0;
1087     FocalplaneUnits = 0;
1088     ExifImageWidth = 0;
1089     NumOrientations = 0;
1090 
1091     if (ShowTags){
1092         printf("Exif header %d bytes long\n",length);
1093     }
1094 
1095     {   // Check the EXIF header component
1096         static uchar ExifHeader[] = "Exif\0\0";
1097         if (memcmp(ExifSection+2, ExifHeader,6)){
1098             ErrNonfatal("Incorrect Exif header",0,0);
1099             return;
1100         }
1101     }
1102 
1103     if (memcmp(ExifSection+8,"II",2) == 0){
1104         if (ShowTags) printf("Exif section in Intel order\n");
1105         MotorolaOrder = 0;
1106     }else{
1107         if (memcmp(ExifSection+8,"MM",2) == 0){
1108             if (ShowTags) printf("Exif section in Motorola order\n");
1109             MotorolaOrder = 1;
1110         }else{
1111             ErrNonfatal("Invalid Exif alignment marker.",0,0);
1112             return;
1113         }
1114     }
1115 
1116     // Check the next value for correctness.
1117     if (Get16u(ExifSection+10) != 0x2a){
1118         ErrNonfatal("Invalid Exif start (1)",0,0);
1119         return;
1120     }
1121 
1122     FirstOffset = Get32u(ExifSection+12);
1123     if (FirstOffset < 8 || FirstOffset > 16){
1124         // Usually set to 8, but other values valid too.
1125         ErrNonfatal("Suspicious offset of first IFD value",0,0);
1126         return;
1127     }
1128 
1129     DirWithThumbnailPtrs = NULL;
1130 
1131 
1132     // First directory starts 16 bytes in.  All offset are relative to 8 bytes in.
1133     ProcessExifDir(ExifSection+8+FirstOffset, ExifSection+8, length-8, 0);
1134 
1135     ImageInfo.ThumbnailAtEnd = ImageInfo.ThumbnailOffset >= ImageInfo.LargestExifOffset ? TRUE : FALSE;
1136 #ifdef SUPERDEBUG
1137     printf("Thumbnail %s end", (ImageInfo.ThumbnailAtEnd ? "at" : "NOT at"));
1138 #endif
1139     if (DumpExifMap){
1140         unsigned a,b;
1141         printf("Map: %05d- End of exif\n",length-8);
1142 //        for (a=0;a<length-8;a+= 10){
1143 //            printf("Map: %05d ",a);
1144 //            for (b=0;b<10;b++) printf(" %02x",*(ExifSection+8+a+b));
1145 //            printf("\n");
1146 //        }
1147         for (a = 0; a < length - 8; ++a) {
1148             unsigned char c = *(ExifSection+8+a);
1149             unsigned pc = isprint(c) ? c : ' ';
1150             printf("Map: %4d %02x %c", a, c, pc);
1151         }
1152     }
1153 
1154 
1155     // Compute the CCD width, in millimeters.
1156     if (FocalplaneXRes != 0){
1157         // Note: With some cameras, its not possible to compute this correctly because
1158         // they don't adjust the indicated focal plane resolution units when using less
1159         // than maximum resolution, so the CCDWidth value comes out too small.  Nothing
1160         // that Jhad can do about it - its a camera problem.
1161         ImageInfo.CCDWidth = (float)(ExifImageWidth * FocalplaneUnits / FocalplaneXRes);
1162 
1163         if (ImageInfo.FocalLength.num != 0 && ImageInfo.FocalLength.denom != 0
1164             && ImageInfo.FocalLength35mmEquiv == 0){
1165             // Compute 35 mm equivalent focal length based on sensor geometry if we haven't
1166             // already got it explicitly from a tag.
1167             ImageInfo.FocalLength35mmEquiv = (int)(
1168                 (double)ImageInfo.FocalLength.num / ImageInfo.FocalLength.denom
1169                 / ImageInfo.CCDWidth * 36 + 0.5);
1170         }
1171     }
1172 }
1173 
TagToTagTableEntry(unsigned short tag)1174 static const TagTable_t* TagToTagTableEntry(unsigned short tag)
1175 {
1176     unsigned int i;
1177     for (i = 0; i < TAG_TABLE_SIZE; i++) {
1178         if (TagTable[i].Tag == tag) {
1179             printf("found tag %d", tag);
1180             int format = TagTable[i].Format;
1181             if (format == 0) {
1182                 printf("tag %s format not defined ***** YOU MUST ADD THE FORMAT TO THE TagTable in exif.c!!!!", TagTable[i].Desc);
1183                 return NULL;
1184             }
1185             return &TagTable[i];
1186         }
1187     }
1188     printf("tag %d NOT FOUND", tag);
1189     return NULL;
1190 }
1191 
writeExifTagAndData(int tag,int format,long components,long value,int valueInString,char * Buffer,int * DirIndex,int * DataWriteIndex)1192 static void writeExifTagAndData(int tag,
1193                                 int format,
1194                                 long components,
1195                                 long value,
1196                                 int valueInString,
1197                                 char* Buffer,
1198                                 int* DirIndex,
1199                                 int* DataWriteIndex) {
1200     void* componentsPosition = NULL; // for saving component position
1201 
1202     Put16u(Buffer+ (*DirIndex), tag);                    // Tag
1203     Put16u(Buffer+(*DirIndex) + 2, format);              // Format
1204     if (format == FMT_STRING && components == -1) {
1205         components = strlen((char*)value) + 1;                 // account for null terminator
1206         if (components & 1) ++components;               // no odd lengths
1207     } else if (format == FMT_SSHORT && components == -1) {
1208         // jhead only supports reading one SSHORT anyway
1209         components = 1;
1210     }
1211     if (format == FMT_UNDEFINED && components == -1) {
1212         // check if this UNDEFINED format is actually ASCII (as it usually is)
1213         // if so, we can calculate the size
1214         if(memcmp((char*)value, ExifAsciiPrefix, sizeof(ExifAsciiPrefix)) == 0) {
1215             components = sizeof(ExifAsciiPrefix) +
1216                          strlen((char*)value + sizeof(ExifAsciiPrefix)) + 1;
1217             if (components & 1) ++components;               // no odd lengths
1218         }
1219     }
1220     Put32u(Buffer+(*DirIndex) + 4, components);         // Components
1221     componentsPosition = Buffer+(*DirIndex) + 4; // components # can change for lists
1222     printf("# components: %ld", components);
1223     if (format == FMT_STRING) {
1224         // short strings can fit right in the long, otherwise have to
1225         // go in the data area
1226         if (components <= 4) {
1227             strcpy(Buffer+(*DirIndex) + 8, (char*)value);
1228         } else {
1229             Put32u(Buffer+(*DirIndex) + 8, (*DataWriteIndex)-8);   // Pointer
1230             printf("copying value %s to %d", (char*)value, (*DataWriteIndex));
1231             strncpy(Buffer+(*DataWriteIndex), (char*)value, components);
1232             (*DataWriteIndex) += components;
1233         }
1234     } else if ((format == FMT_UNDEFINED) &&
1235                (memcmp((char*)value, ExifAsciiPrefix, sizeof(ExifAsciiPrefix)) == 0)) {
1236         // short strings can fit right in the long, otherwise have to
1237         // go in the data area
1238         if (components <= 4) {
1239             memcpy(Buffer+(*DirIndex) + 8, (char*)value, components);
1240         } else {
1241             Put32u(Buffer+(*DirIndex) + 8, (*DataWriteIndex)-8);   // Pointer
1242             printf("copying %s to %d", (char*)value + sizeof(ExifAsciiPrefix), (*DataWriteIndex));
1243             memcpy(Buffer+(*DataWriteIndex), (char*)value, components);
1244             (*DataWriteIndex) += components;
1245         }
1246     } else if (!valueInString) {
1247         Put32u(Buffer+(*DirIndex) + 8, value);   // Value
1248     } else {
1249         Put32u(Buffer+(*DirIndex) + 8, (*DataWriteIndex)-8);   // Pointer
1250         // Usually the separator is ',', but sometimes ':' is used, like
1251         // TAG_GPS_TIMESTAMP.
1252         char* curElement = strtok((char*)value, ",:");
1253         int i;
1254 
1255         // (components == -1) Need to handle lists with unknown length too
1256         for (i = 0; ((i < components) || (components == -1)) && curElement != NULL; i++) {
1257 #ifdef SUPERDEBUG
1258             printf("processing component %s format %s", curElement, formatStr(format));
1259 #endif
1260             // elements are separated by commas
1261             if (format == FMT_URATIONAL) {
1262                 unsigned int numerator;
1263                 unsigned int denominator;
1264                 char* separator = strchr(curElement, '/');
1265                 if (separator) {
1266                     numerator = atoi(curElement);
1267                     denominator = atoi(separator + 1);
1268                 } else {
1269                     double value = atof(curElement);
1270                     ConvertDoubleToURational(value, &numerator, &denominator);
1271                 }
1272                 Put32u(Buffer+(*DataWriteIndex), numerator);
1273                 Put32u(Buffer+(*DataWriteIndex) + 4, denominator);
1274                 (*DataWriteIndex) += 8;
1275             } else if (format == FMT_SRATIONAL) {
1276                 int numerator;
1277                 int denominator;
1278                 char* separator = strchr(curElement, '/');
1279                 if (separator) {
1280                     numerator = atoi(curElement);
1281                     denominator = atoi(separator + 1);
1282                 } else {
1283                     double value = atof(curElement);
1284                     ConvertDoubleToSRational(value, &numerator, &denominator);
1285                 }
1286                 Put32u(Buffer+(*DataWriteIndex), numerator);
1287                 Put32u(Buffer+(*DataWriteIndex) + 4, denominator);
1288                 (*DataWriteIndex) += 8;
1289             } else if ((components == -1) && ((format == FMT_USHORT) || (format == FMT_SSHORT))) {
1290                 // variable components need to go into data write area
1291                 value = atoi(curElement);
1292                 Put16u(Buffer+(*DataWriteIndex), value);
1293                 (*DataWriteIndex) += 4;
1294             } else {
1295                 // TODO: doesn't handle multiple components yet -- if more than one, have to put in data write area.
1296                 value = atoi(curElement);
1297                 Put32u(Buffer+(*DirIndex) + 8, value);   // Value
1298             }
1299             curElement = strtok(NULL, ",:");
1300         }
1301         if (components == -1) Put32u(componentsPosition, i); // update component # for unknowns
1302     }
1303     (*DirIndex) += 12;
1304 }
1305 
1306 #ifdef SUPERDEBUG
formatStr(int format)1307 char* formatStr(int format) {
1308     switch (format) {
1309         case FMT_BYTE: return "FMT_BYTE"; break;
1310         case FMT_STRING: return "FMT_STRING"; break;
1311         case FMT_USHORT: return "FMT_USHORT"; break;
1312         case FMT_ULONG: return "FMT_ULONG"; break;
1313         case FMT_URATIONAL: return "FMT_URATIONAL"; break;
1314         case FMT_SBYTE: return "FMT_SBYTE"; break;
1315         case FMT_UNDEFINED: return "FMT_UNDEFINED"; break;
1316         case FMT_SSHORT: return "FMT_SSHORT"; break;
1317         case FMT_SLONG: return "FMT_SLONG"; break;
1318         case FMT_SRATIONAL: return "FMT_SRATIONAL"; break;
1319         case FMT_SINGLE: return "FMT_SINGLE"; break;
1320         case FMT_DOUBLE: return "FMT_SINGLE"; break;
1321         default: return "UNKNOWN";
1322     }
1323 }
1324 #endif
1325 
1326 //--------------------------------------------------------------------------
1327 // Create minimal exif header - just date and thumbnail pointers,
1328 // so that date and thumbnail may be filled later.
1329 //--------------------------------------------------------------------------
create_EXIF_internal(ExifElement_t * elements,int exifTagCount,int gpsTagCount,int hasDateTimeTag,char * Buffer)1330 static void create_EXIF_internal(ExifElement_t* elements, int exifTagCount, int gpsTagCount, int hasDateTimeTag, char* Buffer)
1331 {
1332     unsigned short NumEntries;
1333     int DataWriteIndex;
1334     int DirIndex;
1335     int DirExifLink = 0;
1336 
1337 #ifdef SUPERDEBUG
1338     ALOGE("create_EXIF %d exif elements, %d gps elements", exifTagCount, gpsTagCount);
1339 #endif
1340 
1341     MotorolaOrder = 0;
1342 
1343     memcpy(Buffer+2, "Exif\0\0II",8);
1344     Put16u(Buffer+10, 0x2a);
1345 
1346     DataWriteIndex = 16;
1347     Put32u(Buffer+12, DataWriteIndex-8); // first IFD offset.  Means start 16 bytes in.
1348 
1349     {
1350         DirIndex = DataWriteIndex;
1351         NumEntries = 1 + exifTagCount;  // the extra is the thumbnail
1352         if (gpsTagCount) {
1353             ++NumEntries;       // allow for the GPS info tag
1354         }
1355         if (!hasDateTimeTag) {
1356             // We have to write extra date time tag. The entry number should be
1357             // adjusted.
1358             ++NumEntries;
1359         }
1360         DataWriteIndex += 2 + NumEntries*12 + 4;
1361 
1362         Put16u(Buffer+DirIndex, NumEntries); // Number of entries
1363         DirIndex += 2;
1364 
1365         // Entries go here...
1366         if (!hasDateTimeTag) {
1367             // Date/time entry
1368             char* dateTime = NULL;
1369             char dateBuf[20];
1370             if (ImageInfo.numDateTimeTags) {
1371                 // If we had a pre-existing exif header, use time from that.
1372                 dateTime = ImageInfo.DateTime;
1373             } else {
1374                 // Oterwise, use the file's timestamp.
1375                 FileTimeAsString(dateBuf);
1376                 dateTime = dateBuf;
1377             }
1378             writeExifTagAndData(TAG_DATETIME,
1379                                 FMT_STRING,
1380                                 20,
1381                                 (long)(char*)dateBuf,
1382                                 FALSE,
1383                                 Buffer,
1384                                 &DirIndex,
1385                                 &DataWriteIndex);
1386 
1387         }
1388         if (exifTagCount > 0) {
1389             int i;
1390             for (i = 0; i < exifTagCount + gpsTagCount; i++) {
1391                 if (elements[i].GpsTag) {
1392                     continue;
1393                 }
1394                 const TagTable_t* entry = TagToTagTableEntry(elements[i].Tag);
1395                 if (entry == NULL) {
1396                     continue;
1397                 }
1398 #ifdef SUPERDEBUG
1399                 ALOGE("create_EXIF saving tag %x value \"%s\"",elements[i].Tag, elements[i].Value);
1400 #endif
1401                 writeExifTagAndData(elements[i].Tag,
1402                                     entry->Format,
1403                                     entry->DataLength,
1404                                     (long)elements[i].Value,
1405                                     TRUE,
1406                                     Buffer,
1407                                     &DirIndex,
1408                                     &DataWriteIndex);
1409             }
1410 
1411             if (gpsTagCount) {
1412                 // Link to gps dir entry
1413                 writeExifTagAndData(TAG_GPSINFO,
1414                                     FMT_ULONG,
1415                                     1,
1416                                     DataWriteIndex-8,
1417                                     FALSE,
1418                                     Buffer,
1419                                     &DirIndex,
1420                                     &DataWriteIndex);
1421             }
1422 
1423             // Link to exif dir entry
1424             int exifDirPtr = DataWriteIndex-8;
1425             if (gpsTagCount) {
1426                 exifDirPtr += 2 + gpsTagCount*12 + 4;
1427             }
1428             DirExifLink = DirIndex;
1429             writeExifTagAndData(TAG_EXIF_OFFSET,
1430                                 FMT_ULONG,
1431                                 1,
1432                                 exifDirPtr,
1433                                 FALSE,
1434                                 Buffer,
1435                                 &DirIndex,
1436                                 &DataWriteIndex);
1437         }
1438 
1439         // End of directory - contains optional link to continued directory.
1440         Put32u(Buffer+DirIndex, 0);
1441         printf("Ending Exif section DirIndex = %d DataWriteIndex %d", DirIndex, DataWriteIndex);
1442     }
1443 
1444 
1445     // GPS Section
1446     if (gpsTagCount) {
1447         DirIndex = DataWriteIndex;
1448         printf("Starting GPS section DirIndex = %d", DirIndex);
1449         NumEntries = gpsTagCount;
1450         DataWriteIndex += 2 + NumEntries*12 + 4;
1451 
1452         Put16u(Buffer+DirIndex, NumEntries); // Number of entries
1453         DirIndex += 2;
1454         {
1455             int i;
1456             for (i = 0; i < exifTagCount + gpsTagCount; i++) {
1457                 if (!elements[i].GpsTag) {
1458                     continue;
1459                 }
1460                 const TagTable_t* entry = GpsTagToTagTableEntry(elements[i].Tag);
1461                 if (entry == NULL) {
1462                     continue;
1463                 }
1464 #ifdef SUPERDEBUG
1465                 ALOGE("create_EXIF saving GPS tag %x value \"%s\"",elements[i].Tag, elements[i].Value);
1466 #endif
1467                 writeExifTagAndData(elements[i].Tag,
1468                                     entry->Format,
1469                                     entry->DataLength,
1470                                     (long)elements[i].Value,
1471                                     TRUE,
1472                                     Buffer,
1473                                     &DirIndex,
1474                                     &DataWriteIndex);
1475             }
1476         }
1477 
1478         // End of directory - contains optional link to continued directory.
1479         Put32u(Buffer+DirIndex, 0);
1480         printf("Ending GPS section DirIndex = %d DataWriteIndex %d", DirIndex, DataWriteIndex);
1481     }
1482 
1483     {
1484         // Overwriting TAG_EXIF_OFFSET which links to this directory
1485         Put32u(Buffer+DirExifLink+8, DataWriteIndex-8);
1486 
1487         printf("Starting Thumbnail section DirIndex = %d", DirIndex);
1488         DirIndex = DataWriteIndex;
1489         NumEntries = 2;
1490         DataWriteIndex += 2 + NumEntries*12 + 4;
1491 
1492         Put16u(Buffer+DirIndex, NumEntries); // Number of entries
1493         DirIndex += 2;
1494         {
1495             // Link to exif dir entry
1496             writeExifTagAndData(TAG_THUMBNAIL_OFFSET,
1497                                 FMT_ULONG,
1498                                 1,
1499                                 DataWriteIndex-8,
1500                                 FALSE,
1501                                 Buffer,
1502                                 &DirIndex,
1503                                 &DataWriteIndex);
1504         }
1505 
1506         {
1507             // Link to exif dir entry
1508             writeExifTagAndData(TAG_THUMBNAIL_LENGTH,
1509                                 FMT_ULONG,
1510                                 1,
1511                                 0,
1512                                 FALSE,
1513                                 Buffer,
1514                                 &DirIndex,
1515                                 &DataWriteIndex);
1516         }
1517 
1518         // End of directory - contains optional link to continued directory.
1519         Put32u(Buffer+DirIndex, 0);
1520         printf("Ending Thumbnail section DirIndex = %d DataWriteIndex %d", DirIndex, DataWriteIndex);
1521     }
1522 
1523 
1524     Buffer[0] = (unsigned char)(DataWriteIndex >> 8);
1525     Buffer[1] = (unsigned char)DataWriteIndex;
1526 
1527     // Remove old exif section, if there was one.
1528     RemoveSectionType(M_EXIF);
1529 
1530     {
1531         // Sections need malloced buffers, so do that now, especially because
1532         // we now know how big it needs to be allocated.
1533         unsigned char * NewBuf = malloc(DataWriteIndex);
1534         if (NewBuf == NULL){
1535             ErrFatal("Could not allocate memory");
1536         }
1537         memcpy(NewBuf, Buffer, DataWriteIndex);
1538 
1539         CreateSection(M_EXIF, NewBuf, DataWriteIndex);
1540 
1541         // Re-parse new exif section, now that its in place
1542         // otherwise, we risk touching data that has already been freed.
1543         process_EXIF(NewBuf, DataWriteIndex);
1544     }
1545 }
1546 
create_EXIF(ExifElement_t * elements,int exifTagCount,int gpsTagCount,int hasDateTimeTag)1547 void create_EXIF(ExifElement_t* elements, int exifTagCount, int gpsTagCount, int hasDateTimeTag)
1548 {
1549     // It is hard to calculate exact necessary size for editing the exif
1550     // header dynamically, so we are using the maximum size of EXIF, 64K
1551     const int EXIF_MAX_SIZE = 1024*64;
1552     char* Buffer = malloc(EXIF_MAX_SIZE);
1553 
1554     if (Buffer != NULL) {
1555         create_EXIF_internal(elements, exifTagCount, gpsTagCount, hasDateTimeTag, Buffer);
1556         free(Buffer);
1557     } else {
1558         ErrFatal("Could not allocate memory");
1559     }
1560 }
1561 
1562 //--------------------------------------------------------------------------
1563 // Cler the rotation tag in the exif header to 1.
1564 //--------------------------------------------------------------------------
ClearOrientation(void)1565 const char * ClearOrientation(void)
1566 {
1567     int a;
1568     if (NumOrientations == 0) return NULL;
1569 
1570     for (a=0;a<NumOrientations;a++){
1571         switch(OrientationNumFormat[a]){
1572             case FMT_SBYTE:
1573             case FMT_BYTE:
1574                 *(uchar *)(OrientationPtr[a]) = 1;
1575                 break;
1576 
1577             case FMT_USHORT:
1578                 Put16u(OrientationPtr[a], 1);
1579                 break;
1580 
1581             case FMT_ULONG:
1582             case FMT_SLONG:
1583                 memset(OrientationPtr, 0, 4);
1584                 // Can't be bothered to write  generic Put32 if I only use it once.
1585                 if (MotorolaOrder){
1586                     ((uchar *)OrientationPtr[a])[3] = 1;
1587                 }else{
1588                     ((uchar *)OrientationPtr[a])[0] = 1;
1589                 }
1590                 break;
1591 
1592             default:
1593                 return NULL;
1594         }
1595     }
1596 
1597     return OrientTab[ImageInfo.Orientation];
1598 }
1599 
1600 
1601 
1602 //--------------------------------------------------------------------------
1603 // Remove thumbnail out of the exif image.
1604 //--------------------------------------------------------------------------
RemoveThumbnail(unsigned char * ExifSection)1605 int RemoveThumbnail(unsigned char * ExifSection)
1606 {
1607     if (!DirWithThumbnailPtrs ||
1608         ImageInfo.ThumbnailOffset == 0 ||
1609         ImageInfo.ThumbnailSize == 0){
1610         // No thumbnail, or already deleted it.
1611         return 0;
1612     }
1613     if (ImageInfo.ThumbnailAtEnd == FALSE){
1614         ErrNonfatal("Thumbnail is not at end of header, can't chop it off", 0, 0);
1615         return 0;
1616     }
1617 
1618     {
1619         int de;
1620         int NumDirEntries;
1621         NumDirEntries = Get16u(DirWithThumbnailPtrs);
1622 
1623         for (de=0;de<NumDirEntries;de++){
1624             int Tag;
1625             unsigned char * DirEntry;
1626             DirEntry = DIR_ENTRY_ADDR(DirWithThumbnailPtrs, de);
1627             Tag = Get16u(DirEntry);
1628             if (Tag == TAG_THUMBNAIL_LENGTH){
1629                 // Set length to zero.
1630                 if (Get16u(DirEntry+2) != FMT_ULONG){
1631                     // non standard format encoding.  Can't do it.
1632                     ErrNonfatal("Can't remove thumbnail", 0, 0);
1633                     return 0;
1634                 }
1635                 Put32u(DirEntry+8, 0);
1636             }
1637         }
1638     }
1639 
1640     // This is how far the non thumbnail data went.
1641     return ImageInfo.ThumbnailOffset+8;
1642 
1643 }
1644 
1645 
1646 //--------------------------------------------------------------------------
1647 // Convert exif time to Unix time structure
1648 //--------------------------------------------------------------------------
Exif2tm(struct tm * timeptr,char * ExifTime)1649 int Exif2tm(struct tm * timeptr, char * ExifTime)
1650 {
1651     int a;
1652 
1653     timeptr->tm_wday = -1;
1654 
1655     // Check for format: YYYY:MM:DD HH:MM:SS format.
1656     // Date and time normally separated by a space, but also seen a ':' there, so
1657     // skip the middle space with '%*c' so it can be any character.
1658     a = sscanf(ExifTime, "%d%*c%d%*c%d%*c%d:%d:%d",
1659             &timeptr->tm_year, &timeptr->tm_mon, &timeptr->tm_mday,
1660             &timeptr->tm_hour, &timeptr->tm_min, &timeptr->tm_sec);
1661 
1662 
1663     if (a == 6){
1664         timeptr->tm_isdst = -1;
1665         timeptr->tm_mon -= 1;      // Adjust for unix zero-based months
1666         timeptr->tm_year -= 1900;  // Adjust for year starting at 1900
1667         return TRUE; // worked.
1668     }
1669 
1670     return FALSE; // Wasn't in Exif date format.
1671 }
1672 
1673 
1674 //--------------------------------------------------------------------------
1675 // Show the collected image info, displaying camera F-stop and shutter speed
1676 // in a consistent and legible fashion.
1677 //--------------------------------------------------------------------------
ShowImageInfo(int ShowFileInfo)1678 void ShowImageInfo(int ShowFileInfo)
1679 {
1680     if (ShowFileInfo){
1681         printf("File name    : %s\n",ImageInfo.FileName);
1682         printf("File size    : %d bytes\n",ImageInfo.FileSize);
1683 
1684         {
1685             char Temp[20];
1686             FileTimeAsString(Temp);
1687             printf("File date    : %s\n",Temp);
1688         }
1689     }
1690 
1691     if (ImageInfo.CameraMake[0]){
1692         printf("Camera make  : %s\n",ImageInfo.CameraMake);
1693         printf("Camera model : %s\n",ImageInfo.CameraModel);
1694     }
1695     if (ImageInfo.DateTime[0]){
1696         printf("Date/Time    : %s\n",ImageInfo.DateTime);
1697     }
1698     printf("Resolution   : %d x %d\n",ImageInfo.Width, ImageInfo.Height);
1699 
1700     if (ImageInfo.Orientation > 1){
1701         // Only print orientation if one was supplied, and if its not 1 (normal orientation)
1702         printf("Orientation  : %s\n", OrientTab[ImageInfo.Orientation]);
1703     }
1704 
1705     if (ImageInfo.IsColor == 0){
1706         printf("Color/bw     : Black and white\n");
1707     }
1708 
1709     if (ImageInfo.FlashUsed >= 0){
1710         if (ImageInfo.FlashUsed & 1){
1711             printf("Flash used   : Yes");
1712             switch (ImageInfo.FlashUsed){
1713 	            case 0x5: printf(" (Strobe light not detected)"); break;
1714 	            case 0x7: printf(" (Strobe light detected) "); break;
1715 	            case 0x9: printf(" (manual)"); break;
1716 	            case 0xd: printf(" (manual, return light not detected)"); break;
1717 	            case 0xf: printf(" (manual, return light  detected)"); break;
1718 	            case 0x19:printf(" (auto)"); break;
1719 	            case 0x1d:printf(" (auto, return light not detected)"); break;
1720 	            case 0x1f:printf(" (auto, return light detected)"); break;
1721 	            case 0x41:printf(" (red eye reduction mode)"); break;
1722 	            case 0x45:printf(" (red eye reduction mode return light not detected)"); break;
1723 	            case 0x47:printf(" (red eye reduction mode return light  detected)"); break;
1724 	            case 0x49:printf(" (manual, red eye reduction mode)"); break;
1725 	            case 0x4d:printf(" (manual, red eye reduction mode, return light not detected)"); break;
1726 	            case 0x4f:printf(" (red eye reduction mode, return light detected)"); break;
1727 	            case 0x59:printf(" (auto, red eye reduction mode)"); break;
1728 	            case 0x5d:printf(" (auto, red eye reduction mode, return light not detected)"); break;
1729 	            case 0x5f:printf(" (auto, red eye reduction mode, return light detected)"); break;
1730             }
1731         }else{
1732             printf("Flash used   : No");
1733             switch (ImageInfo.FlashUsed){
1734 	            case 0x18:printf(" (auto)"); break;
1735             }
1736         }
1737         printf("\n");
1738     }
1739 
1740 
1741     if (ImageInfo.FocalLength.num != 0 && ImageInfo.FocalLength.denom != 0) {
1742         printf("Focal length : %4.1fmm",(double)ImageInfo.FocalLength.num / ImageInfo.FocalLength.denom);
1743         if (ImageInfo.FocalLength35mmEquiv){
1744             printf("  (35mm equivalent: %dmm)", ImageInfo.FocalLength35mmEquiv);
1745         }
1746         printf("\n");
1747     }
1748 
1749     if (ImageInfo.DigitalZoomRatio > 1){
1750         // Digital zoom used.  Shame on you!
1751         printf("Digital Zoom : %1.3fx\n", (double)ImageInfo.DigitalZoomRatio);
1752     }
1753 
1754     if (ImageInfo.CCDWidth){
1755         printf("CCD width    : %4.2fmm\n",(double)ImageInfo.CCDWidth);
1756     }
1757 
1758     if (ImageInfo.ExposureTime){
1759         if (ImageInfo.ExposureTime < 0.010){
1760             printf("Exposure time: %6.4f s ",(double)ImageInfo.ExposureTime);
1761         }else{
1762             printf("Exposure time: %5.3f s ",(double)ImageInfo.ExposureTime);
1763         }
1764         if (ImageInfo.ExposureTime <= 0.5){
1765             printf(" (1/%d)",(int)(0.5 + 1/ImageInfo.ExposureTime));
1766         }
1767         printf("\n");
1768     }
1769     if (ImageInfo.ApertureFNumber){
1770         printf("Aperture     : f/%3.3f\n",(double)ImageInfo.ApertureFNumber);
1771     }
1772     if (ImageInfo.Distance){
1773         if (ImageInfo.Distance < 0){
1774             printf("Focus dist.  : Infinite\n");
1775         }else{
1776             printf("Focus dist.  : %4.2fm\n",(double)ImageInfo.Distance);
1777         }
1778     }
1779 
1780     if (ImageInfo.ISOequivalent){
1781         printf("ISO equiv.   : %2d\n",(int)ImageInfo.ISOequivalent);
1782     }
1783 
1784     if (ImageInfo.ExposureBias){
1785         // If exposure bias was specified, but set to zero, presumably its no bias at all,
1786         // so only show it if its nonzero.
1787         printf("Exposure bias: %4.2f\n",(double)ImageInfo.ExposureBias);
1788     }
1789 
1790     switch(ImageInfo.Whitebalance) {
1791         case 1:
1792             printf("Whitebalance : Manual\n");
1793             break;
1794         case 0:
1795             printf("Whitebalance : Auto\n");
1796             break;
1797     }
1798 
1799     //Quercus: 17-1-2004 Added LightSource, some cams return this, whitebalance or both
1800     switch(ImageInfo.LightSource) {
1801         case 1:
1802             printf("Light Source : Daylight\n");
1803             break;
1804         case 2:
1805             printf("Light Source : Fluorescent\n");
1806             break;
1807         case 3:
1808             printf("Light Source : Incandescent\n");
1809             break;
1810         case 4:
1811             printf("Light Source : Flash\n");
1812             break;
1813         case 9:
1814             printf("Light Source : Fine weather\n");
1815             break;
1816         case 11:
1817             printf("Light Source : Shade\n");
1818             break;
1819         default:; //Quercus: 17-1-2004 There are many more modes for this, check Exif2.2 specs
1820             // If it just says 'unknown' or we don't know it, then
1821             // don't bother showing it - it doesn't add any useful information.
1822     }
1823 
1824     if (ImageInfo.MeteringMode){ // 05-jan-2001 vcs
1825         switch(ImageInfo.MeteringMode) {
1826         case 2:
1827             printf("Metering Mode: center weight\n");
1828             break;
1829         case 3:
1830             printf("Metering Mode: spot\n");
1831             break;
1832         case 5:
1833             printf("Metering Mode: matrix\n");
1834             break;
1835         }
1836     }
1837 
1838     if (ImageInfo.ExposureProgram){ // 05-jan-2001 vcs
1839         switch(ImageInfo.ExposureProgram) {
1840         case 1:
1841             printf("Exposure     : Manual\n");
1842             break;
1843         case 2:
1844             printf("Exposure     : program (auto)\n");
1845             break;
1846         case 3:
1847             printf("Exposure     : aperture priority (semi-auto)\n");
1848             break;
1849         case 4:
1850             printf("Exposure     : shutter priority (semi-auto)\n");
1851             break;
1852         case 5:
1853             printf("Exposure     : Creative Program (based towards depth of field)\n");
1854             break;
1855         case 6:
1856             printf("Exposure     : Action program (based towards fast shutter speed)\n");
1857             break;
1858         case 7:
1859             printf("Exposure     : Portrait Mode\n");
1860             break;
1861         case 8:
1862             printf("Exposure     : LandscapeMode \n");
1863             break;
1864         default:
1865             break;
1866         }
1867     }
1868     switch(ImageInfo.ExposureMode){
1869         case 0: // Automatic (not worth cluttering up output for)
1870             break;
1871         case 1: printf("Exposure Mode: Manual\n");
1872             break;
1873         case 2: printf("Exposure Mode: Auto bracketing\n");
1874             break;
1875     }
1876 
1877     if (ImageInfo.DistanceRange) {
1878         printf("Focus range  : ");
1879         switch(ImageInfo.DistanceRange) {
1880             case 1:
1881                 printf("macro");
1882                 break;
1883             case 2:
1884                 printf("close");
1885                 break;
1886             case 3:
1887                 printf("distant");
1888                 break;
1889         }
1890         printf("\n");
1891     }
1892 
1893 
1894 
1895     if (ImageInfo.Process != M_SOF0){
1896         // don't show it if its the plain old boring 'baseline' process, but do
1897         // show it if its something else, like 'progressive' (used on web sometimes)
1898         int a;
1899         for (a=0;;a++){
1900             if (a >= (int)PROCESS_TABLE_SIZE){
1901                 // ran off the end of the table.
1902                 printf("Jpeg process : Unknown\n");
1903                 break;
1904             }
1905             if (ProcessTable[a].Tag == ImageInfo.Process){
1906                 printf("Jpeg process : %s\n",ProcessTable[a].Desc);
1907                 break;
1908             }
1909         }
1910     }
1911 
1912     if (ImageInfo.GpsInfoPresent){
1913         printf("GPS Latitude : %s\n",ImageInfo.GpsLat);
1914         printf("GPS Longitude: %s\n",ImageInfo.GpsLong);
1915         if (ImageInfo.GpsAlt[0]) printf("GPS Altitude : %s\n",ImageInfo.GpsAlt);
1916     }
1917 
1918     // Print the comment. Print 'Comment:' for each new line of comment.
1919     if (ImageInfo.Comments[0]){
1920         int a,c;
1921         printf("Comment      : ");
1922         if (!ImageInfo.CommentWidchars){
1923             for (a=0;a<MAX_COMMENT_SIZE;a++){
1924                 c = ImageInfo.Comments[a];
1925                 if (c == '\0') break;
1926                 if (c == '\n'){
1927                     // Do not start a new line if the string ends with a carriage return.
1928                     if (ImageInfo.Comments[a+1] != '\0'){
1929                         printf("\nComment      : ");
1930                     }else{
1931                         printf("\n");
1932                     }
1933                 }else{
1934                     putchar(c);
1935                 }
1936             }
1937             printf("\n");
1938         }else{
1939             printf("%.*ls\n", ImageInfo.CommentWidchars, (wchar_t *)ImageInfo.Comments);
1940         }
1941     }
1942     if (ImageInfo.ThumbnailOffset){
1943         printf("Map: %05d-%05d: Thumbnail\n",ImageInfo.ThumbnailOffset, ImageInfo.ThumbnailOffset+ImageInfo.ThumbnailSize);
1944     } else {
1945         printf("NO thumbnail");
1946     }
1947 }
1948 
1949 
1950 //--------------------------------------------------------------------------
1951 // Summarize highlights of image info on one line (suitable for grep-ing)
1952 //--------------------------------------------------------------------------
ShowConciseImageInfo(void)1953 void ShowConciseImageInfo(void)
1954 {
1955     printf("\"%s\"",ImageInfo.FileName);
1956 
1957     printf(" %dx%d",ImageInfo.Width, ImageInfo.Height);
1958 
1959     if (ImageInfo.ExposureTime){
1960         if (ImageInfo.ExposureTime <= 0.5){
1961             printf(" (1/%d)",(int)(0.5 + 1/ImageInfo.ExposureTime));
1962         }else{
1963             printf(" (%1.1f)",ImageInfo.ExposureTime);
1964         }
1965     }
1966 
1967     if (ImageInfo.ApertureFNumber){
1968         printf(" f/%3.1f",(double)ImageInfo.ApertureFNumber);
1969     }
1970 
1971     if (ImageInfo.FocalLength35mmEquiv){
1972         printf(" f(35)=%dmm",ImageInfo.FocalLength35mmEquiv);
1973     }
1974 
1975     if (ImageInfo.FlashUsed >= 0 && ImageInfo.FlashUsed & 1){
1976         printf(" (flash)");
1977     }
1978 
1979     if (ImageInfo.IsColor == 0){
1980         printf(" (bw)");
1981     }
1982 
1983     printf("\n");
1984 }
1985