PageRenderTime 10515ms CodeModel.GetById 34ms RepoModel.GetById 1ms app.codeStats 1ms

/Image-ExifTool-8.90/lib/Image/ExifTool/Canon.pm

#
Perl | 7148 lines | 6468 code | 115 blank | 565 comment | 145 complexity | 5bdb43d01f1630302f42e83d1fb1995e MD5 | raw file
    

  1. #------------------------------------------------------------------------------
    2. 

  2. # File:         Canon.pm
    3. 

  3. #
    4. 

  4. # Description:  Canon EXIF maker notes tags
    5. 

  5. #
    6. 

  6. # Revisions:    11/25/2003 - P. Harvey Created
    7. 

  7. #               12/03/2003 - P. Harvey Decode lots more tags and add CanonAFInfo
    8. 

  8. #               02/17/2004 - Michael Rommel Added IxusAFPoint
    9. 

  9. #               01/27/2005 - P. Harvey Disable validation of CanonAFInfo
    10. 

  10. #               01/30/2005 - P. Harvey Added a few more tags (ref 4)
    11. 

  11. #               02/10/2006 - P. Harvey Decode a lot of new tags (ref 12)
    12. 

  12. #               [ongoing]  - P. Harvey Constantly decoding new information
    13. 

  13. #
    14. 

  14. # Notes:        Must check FocalPlaneX/YResolution values for each new model!
    15. 

  15. #
    16. 

  16. # References:   1) http://park2.wakwak.com/~tsuruzoh/Computer/Digicams/exif-e.html
    17. 

  17. #               2) Michael Rommel private communication (Digital Ixus)
    18. 

  18. #               3) Daniel Pittman private communication (PowerShot S70)
    19. 

  19. #               4) http://www.wonderland.org/crw/
    20. 

  20. #               5) Juha Eskelinen private communication (20D)
    21. 

  21. #               6) Richard S. Smith private communication (20D)
    22. 

  22. #               7) Denny Priebe private communication (1DmkII)
    23. 

  23. #               8) Irwin Poche private communication
    24. 

  24. #               9) Michael Tiemann private communication (1DmkII)
    25. 

  25. #              10) Volker Gering private communication (1DmkII)
    26. 

  26. #              11) "cip" private communication
    27. 

  27. #              12) Rainer Honle private communication (5D)
    28. 

  28. #              13) http://www.cybercom.net/~dcoffin/dcraw/
    29. 

  29. #              14) (bozi) http://www.cpanforum.com/threads/2476 and /2563
    30. 

  30. #              15) http://homepage3.nifty.com/kamisaka/makernote/makernote_canon.htm (2007/11/19)
    31. 

  31. #                + http://homepage3.nifty.com/kamisaka/makernote/CanonLens.htm (2007/11/19)
    32. 

  32. #              16) Emil Sit private communication (30D)
    33. 

  33. #              17) http://www.asahi-net.or.jp/~xp8t-ymzk/s10exif.htm
    34. 

  34. #              18) Samson Tai private communication (G7)
    35. 

  35. #              19) Warren Stockton private communication
    36. 

  36. #              20) Bogdan private communication
    37. 

  37. #              21) Heiko Hinrichs private communication
    38. 

  38. #              22) Dave Nicholson private communication (PowerShot S30)
    39. 

  39. #              23) Magne Nilsen private communication (400D)
    40. 

  40. #              24) Wolfgang Hoffmann private communication (40D)
    41. 

  41. #              26) Steve Balcombe private communication
    42. 

  42. #              27) Chris Huebsch private communication (40D)
    43. 

  43. #              28) Hal Williamson private communication (XTi)
    44. 

  44. #              29) Ger Vermeulen private communication
    45. 

  45. #              30) David Pitcher private communication (1DmkIII)
    46. 

  46. #              31) Darryl Zurn private communication (A590IS)
    47. 

  47. #              32) Rich Taylor private communication (5D)
    48. 

  48. #              33) D.J. Cristi private communication
    49. 

  49. #              34) Andreas Huggel and Pascal de Bruijn private communication
    50. 

  50. #              35) Jan Boelsma private communication
    51. 

  51. #              36) Karl-Heinz Klotz private communication (http://www.dslr-forum.de/showthread.php?t=430900)
    52. 

  52. #              37) Vesa Kivisto private communication (30D)
    53. 

  53. #              38) Kurt Garloff private communication (5DmkII)
    54. 

  54. #              39) Irwin Poche private communication (5DmkII)
    55. 

  55. #              40) Jose Oliver-Didier private communication
    56. 

  56. #              41) http://www.cpanforum.com/threads/10730
    57. 

  57. #              42) Norbert Wasser private communication
    58. 

  58. #              43) Karsten Sote private communication
    59. 

  59. #              44) Hugh Griffiths private communication (5DmkII)
    60. 

  60. #              45) Mark Berger private communication (5DmkII)
    61. 

  61. #              46) Dieter Steiner private communication (7D)
    62. 

  62. #              47) http://www.exiv2.org/
    63. 

  63. #              48) Tomasz A. Kawecki private communication (550D, firmware 1.0.6, 1.0.8)
    64. 

  64. #              49) http://www.listware.net/201101/digikam-users/49795-digikam-users-re-lens-recognition.html
    65. 

  65. #              50) http://u88.n24.queensu.ca/exiftool/forum/index.php/topic,3833.0.html
    66. 

  66. #              JD) Jens Duttke private communication
    67. 

  67. #------------------------------------------------------------------------------
    68. 

  68. 

  69. package Image::ExifTool::Canon;
    70. 

  70. 

  71. use strict;
    72. 

  72. use vars qw($VERSION %canonModelID %canonLensTypes);
    73. 

  73. use Image::ExifTool qw(:DataAccess :Utils);
    74. 

  74. use Image::ExifTool::Exif;
    75. 

  75. 

  76. sub WriteCanon($$$);
    77. 

  77. sub ProcessSerialData($$$);
    78. 

  78. sub ProcessFilters($$$);
    79. 

  79. sub SwapWords($);
    80. 

  80. 

  81. $VERSION = '2.91';
    82. 

  82. 

  83. # Note: Removed 'USM' from 'L' lenses since it is redundant - PH
    84. 

  84. # (or is it?  Ref 32 shows 5 non-USM L-type lenses)
    85. 

  85. # --> have relaxed this for new lenses because Canon has been
    86. 

  86. #     consistent about keeping "USM" in the model name
    87. 

  87. %canonLensTypes = ( #4
    88. 

  88.      Notes => q{
    89. 

  89.         Decimal values differentiate lenses which would otherwise have the same
    90. 

  90.         LensType, and are used by the Composite LensID tag when attempting to
    91. 

  91.         identify the specific lens model.
    92. 

  92.      },
    93. 

  93.      1 => 'Canon EF 50mm f/1.8',
    94. 

  94.      2 => 'Canon EF 28mm f/2.8',
    95. 

  95.      # (3 removed in current Kamisaka list)
    96. 

  96.      3 => 'Canon EF 135mm f/2.8 Soft', #15/32
    97. 

  97.      4 => 'Canon EF 35-105mm f/3.5-4.5 or Sigma Lens', #28
    98. 

  98.      4.1 => 'Sigma UC Zoom 35-135mm f/4-5.6',
    99. 

  99.      5 => 'Canon EF 35-70mm f/3.5-4.5', #32
    100. 

  100.      6 => 'Canon EF 28-70mm f/3.5-4.5 or Sigma or Tokina Lens', #32
    101. 

  101.      6.1 => 'Sigma 18-50mm f/3.5-5.6 DC', #23
    102. 

  102.      6.2 => 'Sigma 18-125mm f/3.5-5.6 DC IF ASP',
    103. 

  103.      6.3 => 'Tokina AF193-2 19-35mm f/3.5-4.5',
    104. 

  104.      6.4 => 'Sigma 28-80mm f/3.5-5.6 II Macro', #47
    105. 

  105.      7 => 'Canon EF 100-300mm f/5.6L', #15
    106. 

  106.      8 => 'Canon EF 100-300mm f/5.6 or Sigma or Tokina Lens', #32
    107. 

  107.      8.1 => 'Sigma 70-300mm f/4-5.6 [APO] DG Macro', #15 (both APO and non-APO, ref http://u88.n24.queensu.ca/exiftool/forum/index.php/topic,2947.0.html)
    108. 

  108.      8.2 => 'Tokina AT-X242AF 24-200mm f/3.5-5.6', #15
    109. 

  109.      9 => 'Canon EF 70-210mm f/4', #32
    110. 

  110.      9.1 => 'Sigma 55-200mm f/4-5.6 DC', #34
    111. 

  111.     10 => 'Canon EF 50mm f/2.5 Macro or Sigma Lens', #10 (+ LSC Life Size Converter --> 70mm - PH)
    112. 

  112.     10.1 => 'Sigma 50mm f/2.8 EX', #4
    113. 

  113.     10.2 => 'Sigma 28mm f/1.8',
    114. 

  114.     10.3 => 'Sigma 105mm f/2.8 Macro EX', #15
    115. 

  115.     10.4 => 'Sigma 70mm f/2.8 EX DG Macro EF', #Jean-Michel Dubois
    116. 

  116.     11 => 'Canon EF 35mm f/2', #9
    117. 

  117.     13 => 'Canon EF 15mm f/2.8 Fisheye', #9
    118. 

  118.     14 => 'Canon EF 50-200mm f/3.5-4.5L', #32
    119. 

  119.     15 => 'Canon EF 50-200mm f/3.5-4.5', #32
    120. 

  120.     16 => 'Canon EF 35-135mm f/3.5-4.5', #32
    121. 

  121.     17 => 'Canon EF 35-70mm f/3.5-4.5A', #32
    122. 

  122.     18 => 'Canon EF 28-70mm f/3.5-4.5', #32
    123. 

  123.     20 => 'Canon EF 100-200mm f/4.5A', #32
    124. 

  124.     21 => 'Canon EF 80-200mm f/2.8L',
    125. 

  125.     22 => 'Canon EF 20-35mm f/2.8L or Tokina Lens', #32
    126. 

  126.     22.1 => 'Tokina AT-X280AF PRO 28-80mm f/2.8 Aspherical', #15
    127. 

  127.     23 => 'Canon EF 35-105mm f/3.5-4.5', #32
    128. 

  128.     24 => 'Canon EF 35-80mm f/4-5.6 Power Zoom', #32
    129. 

  129.     25 => 'Canon EF 35-80mm f/4-5.6 Power Zoom', #32
    130. 

  130.     26 => 'Canon EF 100mm f/2.8 Macro or Other Lens',
    131. 

  131.     26.1 => 'Cosina 100mm f/3.5 Macro AF',
    132. 

  132.     26.2 => 'Tamron SP AF 90mm f/2.8 Di Macro', #15
    133. 

  133.     26.3 => 'Tamron SP AF 180mm f/3.5 Di Macro', #15
    134. 

  134.     26.4 => 'Carl Zeiss Planar T* 50mm f/1.4', #PH
    135. 

  135.     27 => 'Canon EF 35-80mm f/4-5.6', #32
    136. 

  136.     # 27 => 'Carl Zeiss Distagon T* 28mm f/2 ZF', #PH (must be with an adapter, because the ZF version is a Nikon mount)
    137. 

  137.     # 27 => 'EMF adapter for Canon EOS digital cameras', #50 (reports LongFocal of 65535)
    138. 

  138.     28 => 'Canon EF 80-200mm f/4.5-5.6 or Tamron Lens', #32
    139. 

  139.     28.1 => 'Tamron SP AF 28-105mm f/2.8 LD Aspherical IF', #15
    140. 

  140.     28.2 => 'Tamron SP AF 28-75mm f/2.8 XR Di LD Aspherical [IF] Macro', #4
    141. 

  141.     28.3 => 'Tamron AF 70-300mm f/4.5-5.6 Di LD 1:2 Macro Zoom', #11
    142. 

  142.     28.4 => 'Tamron AF Aspherical 28-200mm f/3.8-5.6', #14
    143. 

  143.     29 => 'Canon EF 50mm f/1.8 II',
    144. 

  144.     30 => 'Canon EF 35-105mm f/4.5-5.6', #32
    145. 

  145.     31 => 'Canon EF 75-300mm f/4-5.6 or Tamron Lens', #32
    146. 

  146.     31.1 => 'Tamron SP AF 300mm f/2.8 LD IF', #15
    147. 

  147.     32 => 'Canon EF 24mm f/2.8 or Sigma Lens', #10
    148. 

  148.     32.1 => 'Sigma 15mm f/2.8 EX Fisheye', #11
    149. 

  149.     33 => 'Voigtlander or Carl Zeiss Lens',
    150. 

  150.     33.1 => 'Voigtlander Ultron 40mm f/2 SLII Aspherical', #45
    151. 

  151.     33.2 => 'Carl Zeiss Distagon T* 15mm f/2.8 ZE', #PH
    152. 

  152.     33.3 => 'Carl Zeiss Distagon T* 18mm f/3.5 ZE', #PH
    153. 

  153.     33.4 => 'Carl Zeiss Distagon T* 21mm f/2.8 ZE', #PH
    154. 

  154.     33.5 => 'Carl Zeiss Distagon T* 28mm f/2 ZE', #PH
    155. 

  155.     33.6 => 'Carl Zeiss Distagon T* 35mm f/2 ZE', #PH
    156. 

  156.     35 => 'Canon EF 35-80mm f/4-5.6', #32
    157. 

  157.     36 => 'Canon EF 38-76mm f/4.5-5.6', #32
    158. 

  158.     37 => 'Canon EF 35-80mm f/4-5.6 or Tamron Lens', #32
    159. 

  159.     37.1 => 'Tamron 70-200mm f/2.8 Di LD IF Macro', #PH
    160. 

  160.     37.2 => 'Tamron AF 28-300mm f/3.5-6.3 XR Di VC LD Aspherical [IF] Macro Model A20', #38
    161. 

  161.     37.3 => 'Tamron SP AF 17-50mm f/2.8 XR Di II VC LD Aspherical [IF]', #34
    162. 

  162.     37.4 => 'Tamron AF 18-270mm f/3.5-6.3 Di II VC LD Aspherical [IF] Macro', #http://u88.n24.queensu.ca/exiftool/forum/index.php/topic,2937.0.html
    163. 

  163.     38 => 'Canon EF 80-200mm f/4.5-5.6', #32
    164. 

  164.     39 => 'Canon EF 75-300mm f/4-5.6',
    165. 

  165.     40 => 'Canon EF 28-80mm f/3.5-5.6',
    166. 

  166.     41 => 'Canon EF 28-90mm f/4-5.6', #32
    167. 

  167.     42 => 'Canon EF 28-200mm f/3.5-5.6 or Tamron Lens', #32
    168. 

  168.     42.1 => 'Tamron AF 28-300mm f/3.5-6.3 XR Di VC LD Aspherical [IF] Macro Model A20', #15
    169. 

  169.     43 => 'Canon EF 28-105mm f/4-5.6', #10
    170. 

  170.     44 => 'Canon EF 90-300mm f/4.5-5.6', #32
    171. 

  171.     45 => 'Canon EF-S 18-55mm f/3.5-5.6 [II]', #PH (same ID for version II, ref 20)
    172. 

  172.     46 => 'Canon EF 28-90mm f/4-5.6', #32
    173. 

  173.     48 => 'Canon EF-S 18-55mm f/3.5-5.6 IS', #20
    174. 

  174.     49 => 'Canon EF-S 55-250mm f/4-5.6 IS', #23
    175. 

  175.     50 => 'Canon EF-S 18-200mm f/3.5-5.6 IS',
    176. 

  176.     51 => 'Canon EF-S 18-135mm f/3.5-5.6 IS', #PH
    177. 

  177.     52 => 'Canon EF-S 18-55mm f/3.5-5.6 IS II', #PH
    178. 

  178.     53 => 'Canon EF-S 18-55mm f/3.5-5.6 III', #Jon Charnas
    179. 

  179.     94 => 'Canon TS-E 17mm f/4L', #42
    180. 

  180.     95 => 'Canon TS-E 24.0mm f/3.5 L II', #43
    181. 

  181.     124 => 'Canon MP-E 65mm f/2.8 1-5x Macro Photo', #9
    182. 

  182.     125 => 'Canon TS-E 24mm f/3.5L',
    183. 

  183.     126 => 'Canon TS-E 45mm f/2.8', #15
    184. 

  184.     127 => 'Canon TS-E 90mm f/2.8', #15
    185. 

  185.     129 => 'Canon EF 300mm f/2.8L', #32
    186. 

  186.     130 => 'Canon EF 50mm f/1.0L', #10/15
    187. 

  187.     131 => 'Canon EF 28-80mm f/2.8-4L or Sigma Lens', #32
    188. 

  188.     131.1 => 'Sigma 8mm f/3.5 EX DG Circular Fisheye', #15
    189. 

  189.     131.2 => 'Sigma 17-35mm f/2.8-4 EX DG Aspherical HSM', #15
    190. 

  190.     131.3 => 'Sigma 17-70mm f/2.8-4.5 DC Macro', #PH (NC)
    191. 

  191.     131.4 => 'Sigma APO 50-150mm f/2.8 [II] EX DC HSM', #15 ([II] ref PH)
    192. 

  192.     131.5 => 'Sigma APO 120-300mm f/2.8 EX DG HSM', #15
    193. 

  193.            # 'Sigma APO 120-300mm f/2.8 EX DG HSM + 1.4x', #15
    194. 

  194.            # 'Sigma APO 120-300mm f/2.8 EX DG HSM + 2x', #15
    195. 

  195.     131.6 => 'Sigma 4.5mm F2.8 EX DC HSM Circular Fisheye', #PH
    196. 

  196.     132 => 'Canon EF 1200mm f/5.6L', #32
    197. 

  197.     134 => 'Canon EF 600mm f/4L IS', #15
    198. 

  198.     135 => 'Canon EF 200mm f/1.8L',
    199. 

  199.     136 => 'Canon EF 300mm f/2.8L',
    200. 

  200.     137 => 'Canon EF 85mm f/1.2L or Sigma or Tamron Lens', #10
    201. 

  201.     137.1 => 'Sigma 18-50mm f/2.8-4.5 DC OS HSM', #PH
    202. 

  202.     137.2 => 'Sigma 50-200mm f/4-5.6 DC OS HSM', #PH
    203. 

  203.     137.3 => 'Sigma 18-250mm f/3.5-6.3 DC OS HSM', #PH
    204. 

  204.     137.4 => 'Sigma 24-70mm f/2.8 IF EX DG HSM', #PH
    205. 

  205.     137.5 => 'Sigma 18-125mm f/3.8-5.6 DC OS HSM', #PH
    206. 

  206.     137.6 => 'Sigma 17-70mm f/2.8-4 DC Macro OS HSM', #http://u88.n24.queensu.ca/exiftool/forum/index.php/topic,2819.0.html
    207. 

  207.     137.7 => 'Sigma 17-50mm f/2.8 OS HSM', #PH (from Exiv2)
    208. 

  208.     137.8 => 'Sigma 18-200mm f/3.5-6.3 II DC OS HSM', #PH
    209. 

  209.     137.9 => 'Tamron AF 18-270mm f/3.5-6.3 Di II VC PZD', #(model B008)http://u88.n24.queensu.ca/exiftool/forum/index.php/topic,3090.0.html
    210. 

  210.    '137.10' => 'Sigma 8-16mm f/4.5-5.6 DC HSM', #50-Zwielicht
    211. 

  211.    '137.11' => 'Tamron SP 17-50mm f/2.8 XR Di II VC', #50 (model B005)
    212. 

  212.    '137.12' => 'Tamron SP 60mm f/2 Macro Di II', #50 (model G005)
    213. 

  213.    '137.13' => 'Sigma 10-20mm f/3.5 EX DC HSM', #Gerald Erdmann
    214. 

  214.     138 => 'Canon EF 28-80mm f/2.8-4L', #32
    215. 

  215.     139 => 'Canon EF 400mm f/2.8L',
    216. 

  216.     140 => 'Canon EF 500mm f/4.5L', #32
    217. 

  217.     141 => 'Canon EF 500mm f/4.5L',
    218. 

  218.     142 => 'Canon EF 300mm f/2.8L IS', #15
    219. 

  219.     143 => 'Canon EF 500mm f/4L IS', #15
    220. 

  220.     144 => 'Canon EF 35-135mm f/4-5.6 USM', #26
    221. 

  221.     145 => 'Canon EF 100-300mm f/4.5-5.6 USM', #32
    222. 

  222.     146 => 'Canon EF 70-210mm f/3.5-4.5 USM', #32
    223. 

  223.     147 => 'Canon EF 35-135mm f/4-5.6 USM', #32
    224. 

  224.     148 => 'Canon EF 28-80mm f/3.5-5.6 USM', #32
    225. 

  225.     149 => 'Canon EF 100mm f/2 USM', #9
    226. 

  226.     150 => 'Canon EF 14mm f/2.8L or Sigma Lens', #10
    227. 

  227.     150.1 => 'Sigma 20mm EX f/1.8', #4
    228. 

  228.     150.2 => 'Sigma 30mm f/1.4 DC HSM', #15
    229. 

  229.     150.3 => 'Sigma 24mm f/1.8 DG Macro EX', #15
    230. 

  230.     151 => 'Canon EF 200mm f/2.8L',
    231. 

  231.     152 => 'Canon EF 300mm f/4L IS or Sigma Lens', #15
    232. 

  232.     152.1 => 'Sigma 12-24mm f/4.5-5.6 EX DG ASPHERICAL HSM', #15
    233. 

  233.     152.2 => 'Sigma 14mm f/2.8 EX Aspherical HSM', #15
    234. 

  234.     152.3 => 'Sigma 10-20mm f/4-5.6', #14
    235. 

  235.     152.4 => 'Sigma 100-300mm f/4', # (ref Bozi)
    236. 

  236.     153 => 'Canon EF 35-350mm f/3.5-5.6L or Sigma or Tamron Lens', #PH
    237. 

  237.     153.1 => 'Sigma 50-500mm f/4-6.3 APO HSM EX', #15
    238. 

  238.     153.2 => 'Tamron AF 28-300mm f/3.5-6.3 XR LD Aspherical [IF] Macro',
    239. 

  239.     153.3 => 'Tamron AF 18-200mm f/3.5-6.3 XR Di II LD Aspherical [IF] Macro Model A14', #15
    240. 

  240.     153.4 => 'Tamron 18-250mm f/3.5-6.3 Di II LD Aspherical [IF] Macro', #PH
    241. 

  241.     154 => 'Canon EF 20mm f/2.8 USM', #15
    242. 

  242.     155 => 'Canon EF 85mm f/1.8 USM',
    243. 

  243.     156 => 'Canon EF 28-105mm f/3.5-4.5 USM or Tamron Lens',
    244. 

  244.     156.1 => 'Tamron SP 70-300mm f/4.0-5.6 Di VC USD', #PH (model A005)
    245. 

  245.     160 => 'Canon EF 20-35mm f/3.5-4.5 USM or Tamron or Tokina Lens',
    246. 

  246.     160.1 => 'Tamron AF 19-35mm f/3.5-4.5', #44
    247. 

  247.     160.2 => 'Tokina AT-X 124 AF 12-24mm f/4 DX', #49 (not sure about specific model - PH)
    248. 

  248.     160.3 => 'Tokina AT-X 107 AF DX 10-17mm f/3.5-4.5 Fisheye', #PH (http://osdir.com/ml/digikam-devel/2011-04/msg00275.html)
    249. 

  249.     160.4 => 'Tokina AF 11-16mm f/2.8 AT-X Pro DX', #http://u88.n24.queensu.ca/exiftool/forum/index.php/topic,3967.0.html
    250. 

  250.     161 => 'Canon EF 28-70mm f/2.8L or Sigma or Tamron Lens',
    251. 

  251.     161.1 => 'Sigma 24-70mm f/2.8 EX',
    252. 

  252.     161.2 => 'Sigma 28-70mm f/2.8 EX', #PH (http://www.breezesys.com/forum/showthread.php?t=3718)
    253. 

  253.     161.3 => 'Tamron AF 17-50mm f/2.8 Di-II LD Aspherical', #40
    254. 

  254.     161.4 => 'Tamron 90mm f/2.8',
    255. 

  255.     162 => 'Canon EF 200mm f/2.8L', #32
    256. 

  256.     163 => 'Canon EF 300mm f/4L', #32
    257. 

  257.     164 => 'Canon EF 400mm f/5.6L', #32
    258. 

  258.     165 => 'Canon EF 70-200mm f/2.8 L',
    259. 

  259.     166 => 'Canon EF 70-200mm f/2.8 L + 1.4x',
    260. 

  260.     167 => 'Canon EF 70-200mm f/2.8 L + 2x',
    261. 

  261.     168 => 'Canon EF 28mm f/1.8 USM', #15
    262. 

  262.     169 => 'Canon EF 17-35mm f/2.8L or Sigma Lens', #15
    263. 

  263.     169.1 => 'Sigma 18-200mm f/3.5-6.3 DC OS', #23
    264. 

  264.     169.2 => 'Sigma 15-30mm f/3.5-4.5 EX DG Aspherical', #4
    265. 

  265.     169.3 => 'Sigma 18-50mm f/2.8 Macro', #26
    266. 

  266.     169.4 => 'Sigma 50mm f/1.4 EX DG HSM', #PH
    267. 

  267.     169.5 => 'Sigma 85mm f/1.4 EX DG HSM', #Rolando Ruzic
    268. 

  268.     169.6 => 'Sigma 30mm f/1.4 EX DC HSM', #Rodolfo Borges
    269. 

  269.     170 => 'Canon EF 200mm f/2.8L II', #9
    270. 

  270.     171 => 'Canon EF 300mm f/4L', #15
    271. 

  271.     172 => 'Canon EF 400mm f/5.6L', #32
    272. 

  272.     173 => 'Canon EF 180mm Macro f/3.5L or Sigma Lens', #9
    273. 

  273.     173.1 => 'Sigma 180mm EX HSM Macro f/3.5', #14
    274. 

  274.     173.2 => 'Sigma APO Macro 150mm f/2.8 EX DG HSM', #14
    275. 

  275.     174 => 'Canon EF 135mm f/2L or Sigma Lens', #9
    276. 

  276.     174.1 => 'Sigma 70-200mm f/2.8 EX DG APO OS HSM', #PH (probably version II of this lens)
    277. 

  277.     174.2 => 'Sigma 50-500mm f/4.5-6.3 APO DG OS HSM', #http://u88.n24.queensu.ca/exiftool/forum/index.php/topic,4031.0.html
    278. 

  278.     175 => 'Canon EF 400mm f/2.8L', #32
    279. 

  279.     176 => 'Canon EF 24-85mm f/3.5-4.5 USM',
    280. 

  280.     177 => 'Canon EF 300mm f/4L IS', #9
    281. 

  281.     178 => 'Canon EF 28-135mm f/3.5-5.6 IS',
    282. 

  282.     179 => 'Canon EF 24mm f/1.4L', #20
    283. 

  283.     180 => 'Canon EF 35mm f/1.4L', #9
    284. 

  284.     181 => 'Canon EF 100-400mm f/4.5-5.6L IS + 1.4x', #15
    285. 

  285.     182 => 'Canon EF 100-400mm f/4.5-5.6L IS + 2x',
    286. 

  286.     183 => 'Canon EF 100-400mm f/4.5-5.6L IS or Sigma Lens',
    287. 

  287.     183.1 => 'Sigma 150mm f/2.8 EX DG OS HSM APO Macro', #50
    288. 

  288.     184 => 'Canon EF 400mm f/2.8L + 2x', #15
    289. 

  289.     185 => 'Canon EF 600mm f/4L IS', #32
    290. 

  290.     186 => 'Canon EF 70-200mm f/4L', #9
    291. 

  291.     187 => 'Canon EF 70-200mm f/4L + 1.4x', #26
    292. 

  292.     188 => 'Canon EF 70-200mm f/4L + 2x', #PH
    293. 

  293.     189 => 'Canon EF 70-200mm f/4L + 2.8x', #32
    294. 

  294.     190 => 'Canon EF 100mm f/2.8 Macro',
    295. 

  295.     191 => 'Canon EF 400mm f/4 DO IS', #9
    296. 

  296.     193 => 'Canon EF 35-80mm f/4-5.6 USM', #32
    297. 

  297.     194 => 'Canon EF 80-200mm f/4.5-5.6 USM', #32
    298. 

  298.     195 => 'Canon EF 35-105mm f/4.5-5.6 USM', #32
    299. 

  299.     196 => 'Canon EF 75-300mm f/4-5.6 USM', #15/32
    300. 

  300.     197 => 'Canon EF 75-300mm f/4-5.6 IS USM',
    301. 

  301.     198 => 'Canon EF 50mm f/1.4 USM', #9
    302. 

  302.     199 => 'Canon EF 28-80mm f/3.5-5.6 USM', #32
    303. 

  303.     200 => 'Canon EF 75-300mm f/4-5.6 USM', #32
    304. 

  304.     201 => 'Canon EF 28-80mm f/3.5-5.6 USM', #32
    305. 

  305.     202 => 'Canon EF 28-80mm f/3.5-5.6 USM IV',
    306. 

  306.     208 => 'Canon EF 22-55mm f/4-5.6 USM', #32
    307. 

  307.     209 => 'Canon EF 55-200mm f/4.5-5.6', #32
    308. 

  308.     210 => 'Canon EF 28-90mm f/4-5.6 USM', #32
    309. 

  309.     211 => 'Canon EF 28-200mm f/3.5-5.6 USM', #15
    310. 

  310.     212 => 'Canon EF 28-105mm f/4-5.6 USM', #15
    311. 

  311.     213 => 'Canon EF 90-300mm f/4.5-5.6 USM',
    312. 

  312.     214 => 'Canon EF-S 18-55mm f/3.5-5.6 USM', #PH/34
    313. 

  313.     215 => 'Canon EF 55-200mm f/4.5-5.6 II USM',
    314. 

  314.     224 => 'Canon EF 70-200mm f/2.8L IS', #11
    315. 

  315.     225 => 'Canon EF 70-200mm f/2.8L IS + 1.4x', #11
    316. 

  316.     226 => 'Canon EF 70-200mm f/2.8L IS + 2x', #14
    317. 

  317.     227 => 'Canon EF 70-200mm f/2.8L IS + 2.8x', #32
    318. 

  318.     228 => 'Canon EF 28-105mm f/3.5-4.5 USM', #32
    319. 

  319.     229 => 'Canon EF 16-35mm f/2.8L', #PH
    320. 

  320.     230 => 'Canon EF 24-70mm f/2.8L', #9
    321. 

  321.     231 => 'Canon EF 17-40mm f/4L',
    322. 

  322.     232 => 'Canon EF 70-300mm f/4.5-5.6 DO IS USM', #15
    323. 

  323.     233 => 'Canon EF 28-300mm f/3.5-5.6L IS', #PH
    324. 

  324.     234 => 'Canon EF-S 17-85mm f4-5.6 IS USM', #19
    325. 

  325.     235 => 'Canon EF-S 10-22mm f/3.5-4.5 USM', #15
    326. 

  326.     236 => 'Canon EF-S 60mm f/2.8 Macro USM', #15
    327. 

  327.     237 => 'Canon EF 24-105mm f/4L IS', #15
    328. 

  328.     238 => 'Canon EF 70-300mm f/4-5.6 IS USM', #15
    329. 

  329.     239 => 'Canon EF 85mm f/1.2L II', #15
    330. 

  330.     240 => 'Canon EF-S 17-55mm f/2.8 IS USM', #15
    331. 

  331.     241 => 'Canon EF 50mm f/1.2L', #15
    332. 

  332.     242 => 'Canon EF 70-200mm f/4L IS', #PH
    333. 

  333.     243 => 'Canon EF 70-200mm f/4L IS + 1.4x', #15
    334. 

  334.     244 => 'Canon EF 70-200mm f/4L IS + 2x', #PH
    335. 

  335.     245 => 'Canon EF 70-200mm f/4L IS + 2.8x', #32
    336. 

  336.     246 => 'Canon EF 16-35mm f/2.8L II', #PH
    337. 

  337.     247 => 'Canon EF 14mm f/2.8L II USM', #32
    338. 

  338.     248 => 'Canon EF 200mm f/2L IS', #42
    339. 

  339.     249 => 'Canon EF 800mm f/5.6L IS', #35
    340. 

  340.     250 => 'Canon EF 24 f/1.4L II', #41
    341. 

  341.     251 => 'Canon EF 70-200mm f/2.8L IS II USM',
    342. 

  342.     252 => 'Canon EF 70-200mm f/2.8L IS II USM + 1.4x', #50 (1.4x Mk II)
    343. 

  343.     253 => 'Canon EF 70-200mm f/2.8L IS II USM + 2x', #PH (NC)
    344. 

  344.     254 => 'Canon EF 100mm f/2.8L Macro IS USM', #42
    345. 

  345.     # Note: LensType 488 (0x1e8) is reported as 232 (0xe8) in 7D CameraSettings
    346. 

  346.     488 => 'Canon EF-S 15-85mm f/3.5-5.6 IS USM', #PH
    347. 

  347.     489 => 'Canon EF 70-300mm f/4-5.6L IS USM', #Gerald Kapounek
    348. 

  348.     490 => 'Canon EF 8-15mm f/4L USM', #Klaus Reinfeld
    349. 

  349.     491 => 'Canon EF 300mm f/2.8L IS II USM', #42
    350. 

  350. );
    351. 

  351. 

  352. # Canon model ID numbers (PH)
    353. 

  353. %canonModelID = (
    354. 

  354.     0x1010000 => 'PowerShot A30',
    355. 

  355.     0x1040000 => 'PowerShot S300 / Digital IXUS 300 / IXY Digital 300',
    356. 

  356.     0x1060000 => 'PowerShot A20',
    357. 

  357.     0x1080000 => 'PowerShot A10',
    358. 

  358.     0x1090000 => 'PowerShot S110 / Digital IXUS v / IXY Digital 200',
    359. 

  359.     0x1100000 => 'PowerShot G2',
    360. 

  360.     0x1110000 => 'PowerShot S40',
    361. 

  361.     0x1120000 => 'PowerShot S30',
    362. 

  362.     0x1130000 => 'PowerShot A40',
    363. 

  363.     0x1140000 => 'EOS D30',
    364. 

  364.     0x1150000 => 'PowerShot A100',
    365. 

  365.     0x1160000 => 'PowerShot S200 / Digital IXUS v2 / IXY Digital 200a',
    366. 

  366.     0x1170000 => 'PowerShot A200',
    367. 

  367.     0x1180000 => 'PowerShot S330 / Digital IXUS 330 / IXY Digital 300a',
    368. 

  368.     0x1190000 => 'PowerShot G3',
    369. 

  369.     0x1210000 => 'PowerShot S45',
    370. 

  370.     0x1230000 => 'PowerShot SD100 / Digital IXUS II / IXY Digital 30',
    371. 

  371.     0x1240000 => 'PowerShot S230 / Digital IXUS v3 / IXY Digital 320',
    372. 

  372.     0x1250000 => 'PowerShot A70',
    373. 

  373.     0x1260000 => 'PowerShot A60',
    374. 

  374.     0x1270000 => 'PowerShot S400 / Digital IXUS 400 / IXY Digital 400',
    375. 

  375.     0x1290000 => 'PowerShot G5',
    376. 

  376.     0x1300000 => 'PowerShot A300',
    377. 

  377.     0x1310000 => 'PowerShot S50',
    378. 

  378.     0x1340000 => 'PowerShot A80',
    379. 

  379.     0x1350000 => 'PowerShot SD10 / Digital IXUS i / IXY Digital L',
    380. 

  380.     0x1360000 => 'PowerShot S1 IS',
    381. 

  381.     0x1370000 => 'PowerShot Pro1',
    382. 

  382.     0x1380000 => 'PowerShot S70',
    383. 

  383.     0x1390000 => 'PowerShot S60',
    384. 

  384.     0x1400000 => 'PowerShot G6',
    385. 

  385.     0x1410000 => 'PowerShot S500 / Digital IXUS 500 / IXY Digital 500',
    386. 

  386.     0x1420000 => 'PowerShot A75',
    387. 

  387.     0x1440000 => 'PowerShot SD110 / Digital IXUS IIs / IXY Digital 30a',
    388. 

  388.     0x1450000 => 'PowerShot A400',
    389. 

  389.     0x1470000 => 'PowerShot A310',
    390. 

  390.     0x1490000 => 'PowerShot A85',
    391. 

  391.     0x1520000 => 'PowerShot S410 / Digital IXUS 430 / IXY Digital 450',
    392. 

  392.     0x1530000 => 'PowerShot A95',
    393. 

  393.     0x1540000 => 'PowerShot SD300 / Digital IXUS 40 / IXY Digital 50',
    394. 

  394.     0x1550000 => 'PowerShot SD200 / Digital IXUS 30 / IXY Digital 40',
    395. 

  395.     0x1560000 => 'PowerShot A520',
    396. 

  396.     0x1570000 => 'PowerShot A510',
    397. 

  397.     0x1590000 => 'PowerShot SD20 / Digital IXUS i5 / IXY Digital L2',
    398. 

  398.     0x1640000 => 'PowerShot S2 IS',
    399. 

  399.     0x1650000 => 'PowerShot SD430 / Digital IXUS Wireless / IXY Digital Wireless',
    400. 

  400.     0x1660000 => 'PowerShot SD500 / Digital IXUS 700 / IXY Digital 600',
    401. 

  401.     0x1668000 => 'EOS D60',
    402. 

  402.     0x1700000 => 'PowerShot SD30 / Digital IXUS i Zoom / IXY Digital L3',
    403. 

  403.     0x1740000 => 'PowerShot A430',
    404. 

  404.     0x1750000 => 'PowerShot A410',
    405. 

  405.     0x1760000 => 'PowerShot S80',
    406. 

  406.     0x1780000 => 'PowerShot A620',
    407. 

  407.     0x1790000 => 'PowerShot A610',
    408. 

  408.     0x1800000 => 'PowerShot SD630 / Digital IXUS 65 / IXY Digital 80',
    409. 

  409.     0x1810000 => 'PowerShot SD450 / Digital IXUS 55 / IXY Digital 60',
    410. 

  410.     0x1820000 => 'PowerShot TX1',
    411. 

  411.     0x1870000 => 'PowerShot SD400 / Digital IXUS 50 / IXY Digital 55',
    412. 

  412.     0x1880000 => 'PowerShot A420',
    413. 

  413.     0x1890000 => 'PowerShot SD900 / Digital IXUS 900 Ti / IXY Digital 1000',
    414. 

  414.     0x1900000 => 'PowerShot SD550 / Digital IXUS 750 / IXY Digital 700',
    415. 

  415.     0x1920000 => 'PowerShot A700',
    416. 

  416.     0x1940000 => 'PowerShot SD700 IS / Digital IXUS 800 IS / IXY Digital 800 IS',
    417. 

  417.     0x1950000 => 'PowerShot S3 IS',
    418. 

  418.     0x1960000 => 'PowerShot A540',
    419. 

  419.     0x1970000 => 'PowerShot SD600 / Digital IXUS 60 / IXY Digital 70',
    420. 

  420.     0x1980000 => 'PowerShot G7',
    421. 

  421.     0x1990000 => 'PowerShot A530',
    422. 

  422.     0x2000000 => 'PowerShot SD800 IS / Digital IXUS 850 IS / IXY Digital 900 IS',
    423. 

  423.     0x2010000 => 'PowerShot SD40 / Digital IXUS i7 / IXY Digital L4',
    424. 

  424.     0x2020000 => 'PowerShot A710 IS',
    425. 

  425.     0x2030000 => 'PowerShot A640',
    426. 

  426.     0x2040000 => 'PowerShot A630',
    427. 

  427.     0x2090000 => 'PowerShot S5 IS',
    428. 

  428.     0x2100000 => 'PowerShot A460',
    429. 

  429.     0x2120000 => 'PowerShot SD850 IS / Digital IXUS 950 IS / IXY Digital 810 IS',
    430. 

  430.     0x2130000 => 'PowerShot A570 IS',
    431. 

  431.     0x2140000 => 'PowerShot A560',
    432. 

  432.     0x2150000 => 'PowerShot SD750 / Digital IXUS 75 / IXY Digital 90',
    433. 

  433.     0x2160000 => 'PowerShot SD1000 / Digital IXUS 70 / IXY Digital 10',
    434. 

  434.     0x2180000 => 'PowerShot A550',
    435. 

  435.     0x2190000 => 'PowerShot A450',
    436. 

  436.     0x2230000 => 'PowerShot G9',
    437. 

  437.     0x2240000 => 'PowerShot A650 IS',
    438. 

  438.     0x2260000 => 'PowerShot A720 IS',
    439. 

  439.     0x2290000 => 'PowerShot SX100 IS',
    440. 

  440.     0x2300000 => 'PowerShot SD950 IS / Digital IXUS 960 IS / IXY Digital 2000 IS',
    441. 

  441.     0x2310000 => 'PowerShot SD870 IS / Digital IXUS 860 IS / IXY Digital 910 IS',
    442. 

  442.     0x2320000 => 'PowerShot SD890 IS / Digital IXUS 970 IS / IXY Digital 820 IS',
    443. 

  443.     0x2360000 => 'PowerShot SD790 IS / Digital IXUS 90 IS / IXY Digital 95 IS',
    444. 

  444.     0x2370000 => 'PowerShot SD770 IS / Digital IXUS 85 IS / IXY Digital 25 IS',
    445. 

  445.     0x2380000 => 'PowerShot A590 IS',
    446. 

  446.     0x2390000 => 'PowerShot A580',
    447. 

  447.     0x2420000 => 'PowerShot A470',
    448. 

  448.     0x2430000 => 'PowerShot SD1100 IS / Digital IXUS 80 IS / IXY Digital 20 IS',
    449. 

  449.     0x2460000 => 'PowerShot SX1 IS',
    450. 

  450.     0x2470000 => 'PowerShot SX10 IS',
    451. 

  451.     0x2480000 => 'PowerShot A1000 IS',
    452. 

  452.     0x2490000 => 'PowerShot G10',
    453. 

  453.     0x2510000 => 'PowerShot A2000 IS',
    454. 

  454.     0x2520000 => 'PowerShot SX110 IS',
    455. 

  455.     0x2530000 => 'PowerShot SD990 IS / Digital IXUS 980 IS / IXY Digital 3000 IS',
    456. 

  456.     0x2540000 => 'PowerShot SD880 IS / Digital IXUS 870 IS / IXY Digital 920 IS',
    457. 

  457.     0x2550000 => 'PowerShot E1',
    458. 

  458.     0x2560000 => 'PowerShot D10',
    459. 

  459.     0x2570000 => 'PowerShot SD960 IS / Digital IXUS 110 IS / IXY Digital 510 IS',
    460. 

  460.     0x2580000 => 'PowerShot A2100 IS',
    461. 

  461.     0x2590000 => 'PowerShot A480',
    462. 

  462.     0x2600000 => 'PowerShot SX200 IS',
    463. 

  463.     0x2610000 => 'PowerShot SD970 IS / Digital IXUS 990 IS / IXY Digital 830 IS',
    464. 

  464.     0x2620000 => 'PowerShot SD780 IS / Digital IXUS 100 IS / IXY Digital 210 IS',
    465. 

  465.     0x2630000 => 'PowerShot A1100 IS',
    466. 

  466.     0x2640000 => 'PowerShot SD1200 IS / Digital IXUS 95 IS / IXY Digital 110 IS',
    467. 

  467.     0x2700000 => 'PowerShot G11',
    468. 

  468.     0x2710000 => 'PowerShot SX120 IS',
    469. 

  469.     0x2720000 => 'PowerShot S90',
    470. 

  470.     0x2750000 => 'PowerShot SX20 IS',
    471. 

  471.     0x2760000 => 'PowerShot SD980 IS / Digital IXUS 200 IS / IXY Digital 930 IS',
    472. 

  472.     0x2770000 => 'PowerShot SD940 IS / Digital IXUS 120 IS / IXY Digital 220 IS',
    473. 

  473.     0x2800000 => 'PowerShot A495',
    474. 

  474.     0x2810000 => 'PowerShot A490',
    475. 

  475.     0x2820000 => 'PowerShot A3100 IS / A3150 IS', # (different cameras, same ID)
    476. 

  476.     0x2830000 => 'PowerShot A3000 IS',
    477. 

  477.     0x2840000 => 'PowerShot SD1400 IS / IXUS 130 / IXY 400F',
    478. 

  478.     0x2850000 => 'PowerShot SD1300 IS / IXUS 105 / IXY 200F',
    479. 

  479.     0x2860000 => 'PowerShot SD3500 IS / IXUS 210 / IXY 10S',
    480. 

  480.     0x2870000 => 'PowerShot SX210 IS',
    481. 

  481.     0x2880000 => 'PowerShot SD4000 IS / IXUS 300 HS / IXY 30S',
    482. 

  482.     0x2890000 => 'PowerShot SD4500 IS / IXUS 1000 HS / IXY 50S',
    483. 

  483.     0x2920000 => 'PowerShot G12',
    484. 

  484.     0x2930000 => 'PowerShot SX30 IS',
    485. 

  485.     0x2940000 => 'PowerShot SX130 IS',
    486. 

  486.     0x2950000 => 'PowerShot S95',
    487. 

  487.     0x2980000 => 'PowerShot A3300 IS',
    488. 

  488.     0x2990000 => 'PowerShot A3200 IS',
    489. 

  489.     0x3000000 => 'PowerShot ELPH 500 HS / IXUS 310 HS / IXY 31S',
    490. 

  490.     0x3010000 => 'PowerShot Pro90 IS',
    491. 

  491.     0x3010001 => 'PowerShot A800',
    492. 

  492.     0x3020000 => 'PowerShot ELPH 100 HS / IXUS 115 HS / IXY 210F',
    493. 

  493.     0x3030000 => 'PowerShot SX230 HS',
    494. 

  494.     0x3040000 => 'PowerShot ELPH 300 HS / IXUS 220 HS / IXY 410F',
    495. 

  495.     0x3050000 => 'PowerShot A2200',
    496. 

  496.     0x3060000 => 'PowerShot A1200',
    497. 

  497.     0x3070000 => 'PowerShot SX220 HS',
    498. 

  498.     0x3080000 => 'PowerShot G1 X', 
    499. 

  499.     0x3090000 => 'PowerShot SX150 IS',
    500. 

  500.     0x3100000 => 'PowerShot ELPH 510 HS / IXUS 1100 HS / IXY 51S',
    501. 

  501.     0x3110000 => 'PowerShot S100 (new)',
    502. 

  502.     0x3130000 => 'PowerShot SX40 HS',
    503. 

  503.     0x3120000 => 'PowerShot ELPH 310 HS / IXUS 230 HS / IXY 600F',
    504. 

  504.     0x3140000 => 'PowerShot ELPH 500 HS / IXUS 320 HS / IXY 32S', # (duplicate PowerShot model???)
    505. 

  505.     0x3160000 => 'PowerShot A1300',
    506. 

  506.     0x3180000 => 'PowerShot ELPH 320 HS / IXUS 240 HS / IXY 420F',
    507. 

  507.     0x3190000 => 'PowerShot ELPH 110 HS / IXUS 125 HS / IXY 220F',
    508. 

  508.     0x3200000 => 'PowerShot D20',
    509. 

  509.     0x3210000 => 'PowerShot A4000 IS',
    510. 

  510.     0x3220000 => 'PowerShot SX260 HS',
    511. 

  511.     0x3240000 => 'PowerShot ELPH 530 HS / IXUS 510 HS / IXY 1',
    512. 

  512.     0x3250000 => 'PowerShot ELPH 520 HS / IXUS 500 HS / IXY 3',
    513. 

  513.     0x3260000 => 'PowerShot A3400 IS',
    514. 

  514.     0x3270000 => 'PowerShot A2400 IS',
    515. 

  515.     0x3280000 => 'PowerShot A2300',
    516. 

  516.     0x4040000 => 'PowerShot G1',
    517. 

  517.     0x6040000 => 'PowerShot S100 / Digital IXUS / IXY Digital',
    518. 

  518. 

  519.     0x4007d673 => 'DC19/DC21/DC22',
    520. 

  520.     0x4007d674 => 'XH A1',
    521. 

  521.     0x4007d675 => 'HV10',
    522. 

  522.     0x4007d676 => 'MD130/MD140/MD150/MD160/ZR850',
    523. 

  523.     0x4007d777 => 'DC50', # (iVIS)
    524. 

  524.     0x4007d778 => 'HV20', # (iVIS)
    525. 

  525.     0x4007d779 => 'DC211', #29
    526. 

  526.     0x4007d77a => 'HG10',
    527. 

  527.     0x4007d77b => 'HR10', #29 (iVIS)
    528. 

  528.     0x4007d77d => 'MD255/ZR950',
    529. 

  529.     0x4007d81c => 'HF11',
    530. 

  530.     0x4007d878 => 'HV30',
    531. 

  531.     0x4007d87c => 'XH A1S',
    532. 

  532.     0x4007d87e => 'DC301/DC310/DC311/DC320/DC330',
    533. 

  533.     0x4007d87f => 'FS100',
    534. 

  534.     0x4007d880 => 'HF10', #29 (iVIS/VIXIA)
    535. 

  535.     0x4007d882 => 'HG20/HG21', # (VIXIA)
    536. 

  536.     0x4007d925 => 'HF21', # (LEGRIA)
    537. 

  537.     0x4007d926 => 'HF S11', # (LEGRIA)
    538. 

  538.     0x4007d978 => 'HV40', # (LEGRIA)
    539. 

  539.     0x4007d987 => 'DC410/DC411/DC420',
    540. 

  540.     0x4007d988 => 'FS19/FS20/FS21/FS22/FS200', # (LEGRIA)
    541. 

  541.     0x4007d989 => 'HF20/HF200', # (LEGRIA)
    542. 

  542.     0x4007d98a => 'HF S10/S100', # (LEGRIA/VIXIA)
    543. 

  543.     0x4007da8e => 'HF R10/R16/R17/R18/R100/R106', # (LEGRIA/VIXIA)
    544. 

  544.     0x4007da8f => 'HF M30/M31/M36/M300/M306', # (LEGRIA/VIXIA)
    545. 

  545.     0x4007da90 => 'HF S20/S21/S200', # (LEGRIA/VIXIA)
    546. 

  546.     0x4007da92 => 'FS31/FS36/FS37/FS300/FS305/FS306/FS307',
    547. 

  547. 

  548.     # NOTE: some pre-production models may have a model name of
    549. 

  549.     # "Canon EOS Kxxx", where "xxx" is the last 3 digits of the model ID below.
    550. 

  550.     # This has been observed for the 1DSmkIII/K215 and 400D/K236.
    551. 

  551.     0x80000001 => 'EOS-1D',
    552. 

  552.     0x80000167 => 'EOS-1DS',
    553. 

  553.     0x80000168 => 'EOS 10D',
    554. 

  554.     0x80000169 => 'EOS-1D Mark III',
    555. 

  555.     0x80000170 => 'EOS Digital Rebel / 300D / Kiss Digital',
    556. 

  556.     0x80000174 => 'EOS-1D Mark II',
    557. 

  557.     0x80000175 => 'EOS 20D',
    558. 

  558.     0x80000176 => 'EOS Digital Rebel XSi / 450D / Kiss X2',
    559. 

  559.     0x80000188 => 'EOS-1Ds Mark II',
    560. 

  560.     0x80000189 => 'EOS Digital Rebel XT / 350D / Kiss Digital N',
    561. 

  561.     0x80000190 => 'EOS 40D',
    562. 

  562.     0x80000213 => 'EOS 5D',
    563. 

  563.     0x80000215 => 'EOS-1Ds Mark III',
    564. 

  564.     0x80000218 => 'EOS 5D Mark II',
    565. 

  565.     0x80000219 => 'WFT-E1',
    566. 

  566.     0x80000232 => 'EOS-1D Mark II N',
    567. 

  567.     0x80000234 => 'EOS 30D',
    568. 

  568.     0x80000236 => 'EOS Digital Rebel XTi / 400D / Kiss Digital X',
    569. 

  569.     0x80000241 => 'WFT-E2',
    570. 

  570.     0x80000246 => 'WFT-E3',
    571. 

  571.     0x80000250 => 'EOS 7D',
    572. 

  572.     0x80000252 => 'EOS Rebel T1i / 500D / Kiss X3',
    573. 

  573.     0x80000254 => 'EOS Rebel XS / 1000D / Kiss F',
    574. 

  574.     0x80000261 => 'EOS 50D',
    575. 

  575.     0x80000269 => 'EOS-1D X',
    576. 

  576.     0x80000270 => 'EOS Rebel T2i / 550D / Kiss X4',
    577. 

  577.     0x80000271 => 'WFT-E4',
    578. 

  578.     0x80000273 => 'WFT-E5',
    579. 

  579.     0x80000281 => 'EOS-1D Mark IV',
    580. 

  580.     0x80000285 => 'EOS 5D Mark III',
    581. 

  581.     0x80000286 => 'EOS Rebel T3i / 600D / Kiss X5',
    582. 

  582.     0x80000287 => 'EOS 60D',
    583. 

  583.     0x80000288 => 'EOS Rebel T3 / 1100D / Kiss X50',
    584. 

  584.     0x80000297 => 'WFT-E2 II',
    585. 

  585.     0x80000298 => 'WFT-E4 II',
    586. 

  586. );
    587. 

  587. 

  588. my %canonQuality = (
    589. 

  589.     1 => 'Economy',
    590. 

  590.     2 => 'Normal',
    591. 

  591.     3 => 'Fine',
    592. 

  592.     4 => 'RAW',
    593. 

  593.     5 => 'Superfine',
    594. 

  594.     130 => 'Normal Movie', #22
    595. 

  595. );
    596. 

  596. my %canonImageSize = (
    597. 

  597.     0 => 'Large',
    598. 

  598.     1 => 'Medium',
    599. 

  599.     2 => 'Small',
    600. 

  600.     5 => 'Medium 1', #PH
    601. 

  601.     6 => 'Medium 2', #PH
    602. 

  602.     7 => 'Medium 3', #PH
    603. 

  603.     8 => 'Postcard', #PH (SD200 1600x1200 with DateStamp option)
    604. 

  604.     9 => 'Widescreen', #PH (SD900 3648x2048), 22 (HFS200 3264x1840)
    605. 

  605.     10 => 'Medium Widescreen', #22 (HFS200 1920x1080)
    606. 

  606.     14 => 'Small 1', #PH
    607. 

  607.     15 => 'Small 2', #PH
    608. 

  608.     16 => 'Small 3', #PH
    609. 

  609.     128 => '640x480 Movie', #PH (7D 60fps)
    610. 

  610.     129 => 'Medium Movie', #22
    611. 

  611.     130 => 'Small Movie', #22
    612. 

  612.     137 => '1280x720 Movie', #PH (S95 24fps; D60 50fps)
    613. 

  613.     142 => '1920x1080 Movie', #PH (D60 25fps)
    614. 

  614. );
    615. 

  615. my %canonWhiteBalance = (
    616. 

  616.     # -1='Click", -2='Pasted' ?? - PH
    617. 

  617.     0 => 'Auto',
    618. 

  618.     1 => 'Daylight',
    619. 

  619.     2 => 'Cloudy',
    620. 

  620.     3 => 'Tungsten',
    621. 

  621.     4 => 'Fluorescent',
    622. 

  622.     5 => 'Flash',
    623. 

  623.     6 => 'Custom',
    624. 

  624.     7 => 'Black & White',
    625. 

  625.     8 => 'Shade',
    626. 

  626.     9 => 'Manual Temperature (Kelvin)',
    627. 

  627.     10 => 'PC Set1', #PH
    628. 

  628.     11 => 'PC Set2', #PH
    629. 

  629.     12 => 'PC Set3', #PH
    630. 

  630.     14 => 'Daylight Fluorescent', #3
    631. 

  631.     15 => 'Custom 1', #PH
    632. 

  632.     16 => 'Custom 2', #PH
    633. 

  633.     17 => 'Underwater', #3
    634. 

  634.     18 => 'Custom 3', #PH
    635. 

  635.     19 => 'Custom 4', #PH
    636. 

  636.     20 => 'PC Set4', #PH
    637. 

  637.     21 => 'PC Set5', #PH
    638. 

  638.     # 22 - Custom 2?
    639. 

  639.     # 23 - Custom 3?
    640. 

  640.     # 30 - Click White Balance?
    641. 

  641.     # 31 - Shot Settings?
    642. 

  642.     # 137 - Tungsten?
    643. 

  643.     # 138 - White Fluorescent?
    644. 

  644.     # 139 - Fluorescent H?
    645. 

  645.     # 140 - Manual?
    646. 

  646. );
    647. 

  647. 

  648. # picture styles used by the 5D
    649. 

  649. # (styles 0x4X may be downloaded from Canon)
    650. 

  650. # (called "ColorMatrix" in 1D owner manual)
    651. 

  651. my %pictureStyles = ( #12
    652. 

  652.     0x00 => 'None', #PH
    653. 

  653.     0x01 => 'Standard', #15
    654. 

  654.     0x02 => 'Portrait', #15
    655. 

  655.     0x03 => 'High Saturation', #15
    656. 

  656.     0x04 => 'Adobe RGB', #15
    657. 

  657.     0x05 => 'Low Saturation', #15
    658. 

  658.     0x06 => 'CM Set 1', #PH
    659. 

  659.     0x07 => 'CM Set 2', #PH
    660. 

  660.     # "ColorMatrix" values end here
    661. 

  661.     0x21 => 'User Def. 1',
    662. 

  662.     0x22 => 'User Def. 2',
    663. 

  663.     0x23 => 'User Def. 3',
    664. 

  664.     # "External" styles currently available from Canon are Nostalgia, Clear,
    665. 

  665.     # Twilight and Emerald.  The "User Def" styles change to these "External"
    666. 

  666.     # codes when these styles are installed in the camera
    667. 

  667.     0x41 => 'PC 1', #PH
    668. 

  668.     0x42 => 'PC 2', #PH
    669. 

  669.     0x43 => 'PC 3', #PH
    670. 

  670.     0x81 => 'Standard',
    671. 

  671.     0x82 => 'Portrait',
    672. 

  672.     0x83 => 'Landscape',
    673. 

  673.     0x84 => 'Neutral',
    674. 

  674.     0x85 => 'Faithful',
    675. 

  675.     0x86 => 'Monochrome',
    676. 

  676.     0x87 => 'Auto', #PH
    677. 

  677. );
    678. 

  678. my %userDefStyles = ( #12/48
    679. 

  679.     Notes => q{
    680. 

  680.         Base style for user-defined picture styles.  PC values represent external
    681. 

  681.         picture styles which may be downloaded from Canon and installed in the
    682. 

  682.         camera.
    683. 

  683.     },
    684. 

  684.     0x41 => 'PC 1',
    685. 

  685.     0x42 => 'PC 2',
    686. 

  686.     0x43 => 'PC 3',
    687. 

  687.     0x81 => 'Standard',
    688. 

  688.     0x82 => 'Portrait',
    689. 

  689.     0x83 => 'Landscape',
    690. 

  690.     0x84 => 'Neutral',
    691. 

  691.     0x85 => 'Faithful',
    692. 

  692.     0x86 => 'Monochrome',
    693. 

  693.     0x87 => 'Auto', #PH
    694. 

  694. );
    695. 

  695. 

  696. # picture style tag information for CameraInfo550D
    697. 

  697. my %psConv = (
    698. 

  698.     -559038737 => 'n/a', # = 0xdeadbeef ! LOL
    699. 

  699.     OTHER => sub { return shift },
    700. 

  700. );
    701. 

  701. my %psInfo = (
    702. 

  702.     Format => 'int32s',
    703. 

  703.     PrintHex => 1,
    704. 

  704.     PrintConv => \%psConv,
    705. 

  705. );
    706. 

  706. 

  707. # ValueConv that makes long values binary type
    708. 

  708. my %longBin = (
    709. 

  709.     ValueConv => 'length($val) > 64 ? \$val : $val',
    710. 

  710.     ValueConvInv => '$val',
    711. 

  711. );
    712. 

  712. 

  713. # conversions, etc for CameraColorCalibration tags
    714. 

  714. my %cameraColorCalibration = (
    715. 

  715.     Format => 'int16s[4]',
    716. 

  716.     Unknown => 1,
    717. 

  717.     PrintConv => 'sprintf("%4d %4d %4d (%dK)", split(" ",$val))',
    718. 

  718.     PrintConvInv => '$val=~s/\s+/ /g; $val=~tr/()K//d; $val',
    719. 

  719. );
    720. 

  720. 

  721. # conversions, etc for PowerShot CameraColorCalibration tags
    722. 

  722. my %cameraColorCalibration2 = (
    723. 

  723.     Format => 'int16s[5]',
    724. 

  724.     Unknown => 1,
    725. 

  725.     PrintConv => 'sprintf("%4d %4d %4d %4d (%dK)", split(" ",$val))',
    726. 

  726.     PrintConvInv => '$val=~s/\s+/ /g; $val=~tr/()K//d; $val',
    727. 

  727. );
    728. 

  728. # conversions, etc for byte-swapped FocusDistance tags
    729. 

  729. my %focusDistanceByteSwap = (
    730. 

  730.     # this is very odd (little-endian number on odd boundary),
    731. 

  731.     # but it does seem to work better with my sample images - PH
    732. 

  732.     Format => 'int16uRev',
    733. 

  733.     ValueConv => '$val / 100',
    734. 

  734.     ValueConvInv => '$val * 100',
    735. 

  735.     PrintConv => '$val > 655.345 ? "inf" : "$val m"',
    736. 

  736.     PrintConvInv => '$val =~ s/ ?m$//; IsFloat($val) ? $val : 655.35',
    737. 

  737. );
    738. 

  738. 

  739. # common attributes for writable BinaryData directories
    740. 

  740. my %binaryDataAttrs = (
    741. 

  741.     PROCESS_PROC => \&Image::ExifTool::ProcessBinaryData,
    742. 

  742.     WRITE_PROC => \&Image::ExifTool::WriteBinaryData,
    743. 

  743.     CHECK_PROC => \&Image::ExifTool::CheckBinaryData,
    744. 

  744.     WRITABLE => 1,
    745. 

  745. );
    746. 

  746. 

  747. #------------------------------------------------------------------------------
    748. 

  748. # Canon EXIF Maker Notes
    749. 

  749. %Image::ExifTool::Canon::Main = (
    750. 

  750.     WRITE_PROC => \&WriteCanon,
    751. 

  751.     CHECK_PROC => \&Image::ExifTool::Exif::CheckExif,
    752. 

  752.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    753. 

  753.     0x1 => {
    754. 

  754.         Name => 'CanonCameraSettings',
    755. 

  755.         SubDirectory => {
    756. 

  756.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    757. 

  757.             TagTable => 'Image::ExifTool::Canon::CameraSettings',
    758. 

  758.         },
    759. 

  759.     },
    760. 

  760.     0x2 => {
    761. 

  761.         Name => 'CanonFocalLength',
    762. 

  762.         SubDirectory => {
    763. 

  763.             TagTable => 'Image::ExifTool::Canon::FocalLength',
    764. 

  764.         },
    765. 

  765.     },
    766. 

  766.     0x3 => {
    767. 

  767.         Name => 'CanonFlashInfo',
    768. 

  768.         Unknown => 1,
    769. 

  769.     },
    770. 

  770.     0x4 => {
    771. 

  771.         Name => 'CanonShotInfo',
    772. 

  772.         SubDirectory => {
    773. 

  773.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    774. 

  774.             TagTable => 'Image::ExifTool::Canon::ShotInfo',
    775. 

  775.         },
    776. 

  776.     },
    777. 

  777.     0x5 => {
    778. 

  778.         Name => 'CanonPanorama',
    779. 

  779.         SubDirectory => {
    780. 

  780.             TagTable => 'Image::ExifTool::Canon::Panorama',
    781. 

  781.         },
    782. 

  782.     },
    783. 

  783.     0x6 => {
    784. 

  784.         Name => 'CanonImageType',
    785. 

  785.         Writable => 'string',
    786. 

  786.         Groups => { 2 => 'Image' },
    787. 

  787.     },
    788. 

  788.     0x7 => {
    789. 

  789.         Name => 'CanonFirmwareVersion',
    790. 

  790.         Writable => 'string',
    791. 

  791.     },
    792. 

  792.     0x8 => {
    793. 

  793.         Name => 'FileNumber',
    794. 

  794.         Writable => 'int32u',
    795. 

  795.         Groups => { 2 => 'Image' },
    796. 

  796.         PrintConv => '$_=$val,s/(\d+)(\d{4})/$1-$2/,$_',
    797. 

  797.         PrintConvInv => '$val=~s/-//g;$val',
    798. 

  798.     },
    799. 

  799.     0x9 => {
    800. 

  800.         Name => 'OwnerName',
    801. 

  801.         Writable => 'string',
    802. 

  802.         # pad to 32 bytes (including null terminator which will be added)
    803. 

  803.         # to avoid bug which crashes DPP if length is 4 bytes
    804. 

  804.         ValueConvInv => '$val .= "\0" x (31 - length $val) if length $val < 31; $val',
    805. 

  805.     },
    806. 

  806.     0xa => {
    807. 

  807.         Name => 'UnknownD30',
    808. 

  808.         SubDirectory => {
    809. 

  809.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    810. 

  810.             TagTable => 'Image::ExifTool::Canon::UnknownD30',
    811. 

  811.         },
    812. 

  812.     },
    813. 

  813.     0xc => [   # square brackets for a conditional list
    814. 

  814.         {
    815. 

  815.             # D30
    816. 

  816.             Name => 'SerialNumber',
    817. 

  817.             Condition => '$$self{Model} =~ /EOS D30\b/',
    818. 

  818.             Writable => 'int32u',
    819. 

  819.             PrintConv => 'sprintf("%.4x%.5d",$val>>16,$val&0xffff)',
    820. 

  820.             PrintConvInv => '$val=~/(.*)-?(\d{5})$/ ? (hex($1)<<16)+$2 : undef',
    821. 

  821.         },
    822. 

  822.         {
    823. 

  823.             # serial number of 1D/1Ds/1D Mark II/1Ds Mark II is usually
    824. 

  824.             # displayed w/o leeding zeros (ref 7) (1D uses 6 digits - PH)
    825. 

  825.             Name => 'SerialNumber',
    826. 

  826.             Condition => '$$self{Model} =~ /EOS-1D/',
    827. 

  827.             Writable => 'int32u',
    828. 

  828.             PrintConv => 'sprintf("%.6u",$val)',
    829. 

  829.             PrintConvInv => '$val',
    830. 

  830.         },
    831. 

  831.         {
    832. 

  832.             # all other models (D60,300D,350D,REBEL,10D,20D,etc)
    833. 

  833.             Name => 'SerialNumber',
    834. 

  834.             Writable => 'int32u',
    835. 

  835.             PrintConv => 'sprintf("%.10u",$val)',
    836. 

  836.             PrintConvInv => '$val',
    837. 

  837.         },
    838. 

  838.     ],
    839. 

  839.     0xd => [
    840. 

  840.         {
    841. 

  841.             Name => 'CanonCameraInfo1D',
    842. 

  842.             # (save size of this record as "CameraInfoCount" for later tests)
    843. 

  843.             Condition => '($$self{CameraInfoCount} = $count) and $$self{Model} =~ /\b1DS?$/',
    844. 

  844.             SubDirectory => {
    845. 

  845.                 TagTable => 'Image::ExifTool::Canon::CameraInfo1D',
    846. 

  846.             },
    847. 

  847.         },
    848. 

  848.         {
    849. 

  849.             Name => 'CanonCameraInfo1DmkII',
    850. 

  850.             Condition => '$$self{Model} =~ /\b1Ds? Mark II$/',
    851. 

  851.             SubDirectory => {
    852. 

  852.                 TagTable => 'Image::ExifTool::Canon::CameraInfo1DmkII',
    853. 

  853.             },
    854. 

  854.         },
    855. 

  855.         {
    856. 

  856.             Name => 'CanonCameraInfo1DmkIIN',
    857. 

  857.             Condition => '$$self{Model} =~ /\b1Ds? Mark II N$/',
    858. 

  858.             SubDirectory => {
    859. 

  859.                 TagTable => 'Image::ExifTool::Canon::CameraInfo1DmkIIN',
    860. 

  860.             },
    861. 

  861.         },
    862. 

  862.         {
    863. 

  863.             Name => 'CanonCameraInfo1DmkIII',
    864. 

  864.             Condition => '$$self{Model} =~ /\b1Ds? Mark III$/',
    865. 

  865.             SubDirectory => {
    866. 

  866.                 TagTable => 'Image::ExifTool::Canon::CameraInfo1DmkIII',
    867. 

  867.             },
    868. 

  868.         },
    869. 

  869.         {
    870. 

  870.             Name => 'CanonCameraInfo1DmkIV',
    871. 

  871.             Condition => '$$self{Model} =~ /\b1D Mark IV$/',
    872. 

  872.             SubDirectory => {
    873. 

  873.                 TagTable => 'Image::ExifTool::Canon::CameraInfo1DmkIV',
    874. 

  874.             },
    875. 

  875.         },
    876. 

  876.         {
    877. 

  877.             Name => 'CanonCameraInfo5D',
    878. 

  878.             Condition => '$$self{Model} =~ /EOS 5D$/',
    879. 

  879.             SubDirectory => {
    880. 

  880.                 TagTable => 'Image::ExifTool::Canon::CameraInfo5D',
    881. 

  881.             },
    882. 

  882.         },
    883. 

  883.         {
    884. 

  884.             Name => 'CanonCameraInfo5DmkII',
    885. 

  885.             Condition => '$$self{Model} =~ /EOS 5D Mark II$/',
    886. 

  886.             SubDirectory => {
    887. 

  887.                 TagTable => 'Image::ExifTool::Canon::CameraInfo5DmkII',
    888. 

  888.             },
    889. 

  889.         },
    890. 

  890.         {
    891. 

  891.             Name => 'CanonCameraInfo7D',
    892. 

  892.             Condition => '$$self{Model} =~ /EOS 7D$/',
    893. 

  893.             SubDirectory => {
    894. 

  894.                 TagTable => 'Image::ExifTool::Canon::CameraInfo7D',
    895. 

  895.             },
    896. 

  896.         },
    897. 

  897.         {
    898. 

  898.             Name => 'CanonCameraInfo40D',
    899. 

  899.             Condition => '$$self{Model} =~ /EOS 40D$/',
    900. 

  900.             SubDirectory => {
    901. 

  901.                 TagTable => 'Image::ExifTool::Canon::CameraInfo40D',
    902. 

  902.             },
    903. 

  903.         },
    904. 

  904.         {
    905. 

  905.             Name => 'CanonCameraInfo50D',
    906. 

  906.             Condition => '$$self{Model} =~ /EOS 50D$/',
    907. 

  907.             SubDirectory => {
    908. 

  908.                 TagTable => 'Image::ExifTool::Canon::CameraInfo50D',
    909. 

  909.             },
    910. 

  910.         },
    911. 

  911.         {
    912. 

  912.             Name => 'CanonCameraInfo60D',
    913. 

  913.             Condition => '$$self{Model} =~ /EOS 60D$/',
    914. 

  914.             SubDirectory => {
    915. 

  915.                 TagTable => 'Image::ExifTool::Canon::CameraInfo60D',
    916. 

  916.             },
    917. 

  917.         },
    918. 

  918.         {
    919. 

  919.             Name => 'CanonCameraInfo450D',
    920. 

  920.             Condition => '$$self{Model} =~ /\b(450D|REBEL XSi|Kiss X2)\b/',
    921. 

  921.             SubDirectory => {
    922. 

  922.                 TagTable => 'Image::ExifTool::Canon::CameraInfo450D',
    923. 

  923.             },
    924. 

  924.         },
    925. 

  925.         {
    926. 

  926.             Name => 'CanonCameraInfo500D',
    927. 

  927.             Condition => '$$self{Model} =~ /\b(500D|REBEL T1i|Kiss X3)\b/',
    928. 

  928.             SubDirectory => {
    929. 

  929.                 TagTable => 'Image::ExifTool::Canon::CameraInfo500D',
    930. 

  930.             },
    931. 

  931.         },
    932. 

  932.         {
    933. 

  933.             Name => 'CanonCameraInfo550D',
    934. 

  934.             Condition => '$$self{Model} =~ /\b(550D|REBEL T2i|Kiss X4)\b/',
    935. 

  935.             SubDirectory => {
    936. 

  936.                 TagTable => 'Image::ExifTool::Canon::CameraInfo550D',
    937. 

  937.             },
    938. 

  938.         },
    939. 

  939.         {
    940. 

  940.             Name => 'CanonCameraInfo600D',
    941. 

  941.             Condition => '$$self{Model} =~ /\b(600D|REBEL T3i|Kiss X5)\b/',
    942. 

  942.             SubDirectory => {
    943. 

  943.                 TagTable => 'Image::ExifTool::Canon::CameraInfo600D',
    944. 

  944.             },
    945. 

  945.         },
    946. 

  946.         {
    947. 

  947.             Name => 'CanonCameraInfo1000D',
    948. 

  948.             Condition => '$$self{Model} =~ /\b(1000D|REBEL XS|Kiss F)\b/',
    949. 

  949.             SubDirectory => {
    950. 

  950.                 TagTable => 'Image::ExifTool::Canon::CameraInfo1000D',
    951. 

  951.             },
    952. 

  952.         },
    953. 

  953.         {
    954. 

  954.             Name => 'CanonCameraInfo1100D',
    955. 

  955.             Condition => '$$self{Model} =~ /\b(1100D|REBEL T3|Kiss X50)\b/',
    956. 

  956.             SubDirectory => {
    957. 

  957.                 TagTable => 'Image::ExifTool::Canon::CameraInfo600D',
    958. 

  958.             },
    959. 

  959.         },
    960. 

  960.         {
    961. 

  961.             Name => 'CanonCameraInfoPowerShot',
    962. 

  962.             # valid if format is int32u[138] or int32u[148]
    963. 

  963.             Condition => '$format eq "int32u" and ($count == 138 or $count == 148)',
    964. 

  964.             SubDirectory => {
    965. 

  965.                 TagTable => 'Image::ExifTool::Canon::CameraInfoPowerShot',
    966. 

  966.             },
    967. 

  967.         },
    968. 

  968.         {
    969. 

  969.             Name => 'CanonCameraInfoPowerShot2',
    970. 

  970.             # valid if format is int32u[162], int32u[167], int32u[171] or int32u[264]
    971. 

  971.             Condition => q{
    972. 

  972.                 $format eq "int32u" and ($count == 156 or $count == 162 or
    973. 

  973.                 $count == 167 or $count == 171 or $count == 264)
    974. 

  974.             },
    975. 

  975.             SubDirectory => {
    976. 

  976.                 TagTable => 'Image::ExifTool::Canon::CameraInfoPowerShot2',
    977. 

  977.             },
    978. 

  978.         },
    979. 

  979.         {
    980. 

  980.             Name => 'CanonCameraInfoUnknown32',
    981. 

  981.             Condition => '$format =~ /^int32/',
    982. 

  982.             # (counts of 72, 85, 86, 93, 94, 96, 104) - PH
    983. 

  983.             SubDirectory => {
    984. 

  984.                 TagTable => 'Image::ExifTool::Canon::CameraInfoUnknown32',
    985. 

  985.             },
    986. 

  986.         },
    987. 

  987.         {
    988. 

  988.             Name => 'CanonCameraInfoUnknown16',
    989. 

  989.             Condition => '$format =~ /^int16/',
    990. 

  990.             SubDirectory => {
    991. 

  991.                 TagTable => 'Image::ExifTool::Canon::CameraInfoUnknown16',
    992. 

  992.             },
    993. 

  993.         },
    994. 

  994.         {
    995. 

  995.             Name => 'CanonCameraInfoUnknown',
    996. 

  996.             SubDirectory => {
    997. 

  997.                 TagTable => 'Image::ExifTool::Canon::CameraInfoUnknown',
    998. 

  998.             },
    999. 

  999.         },
    1000. 

  1000.     ],
    1001. 

  1001.     0xe => {
    1002. 

  1002.         Name => 'CanonFileLength',
    1003. 

  1003.         Writable => 'int32u',
    1004. 

  1004.         Groups => { 2 => 'Image' },
    1005. 

  1005.     },
    1006. 

  1006.     0xf => [
    1007. 

  1007.         {   # used by 1DmkII, 1DSmkII and 1DmkIIN
    1008. 

  1008.             Name => 'CustomFunctions1D',
    1009. 

  1009.             Condition => '$$self{Model} =~ /EOS-1D/',
    1010. 

  1010.             SubDirectory => {
    1011. 

  1011.                 Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1012. 

  1012.                 TagTable => 'Image::ExifTool::CanonCustom::Functions1D',
    1013. 

  1013.             },
    1014. 

  1014.         },
    1015. 

  1015.         {
    1016. 

  1016.             Name => 'CustomFunctions5D',
    1017. 

  1017.             Condition => '$$self{Model} =~ /EOS 5D/',
    1018. 

  1018.             SubDirectory => {
    1019. 

  1019.                 Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1020. 

  1020.                 TagTable => 'Image::ExifTool::CanonCustom::Functions5D',
    1021. 

  1021.             },
    1022. 

  1022.         },
    1023. 

  1023.         {
    1024. 

  1024.             Name => 'CustomFunctions10D',
    1025. 

  1025.             Condition => '$$self{Model} =~ /EOS 10D/',
    1026. 

  1026.             SubDirectory => {
    1027. 

  1027.                 Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1028. 

  1028.                 TagTable => 'Image::ExifTool::CanonCustom::Functions10D',
    1029. 

  1029.             },
    1030. 

  1030.         },
    1031. 

  1031.         {
    1032. 

  1032.             Name => 'CustomFunctions20D',
    1033. 

  1033.             Condition => '$$self{Model} =~ /EOS 20D/',
    1034. 

  1034.             SubDirectory => {
    1035. 

  1035.                 Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1036. 

  1036.                 TagTable => 'Image::ExifTool::CanonCustom::Functions20D',
    1037. 

  1037.             },
    1038. 

  1038.         },
    1039. 

  1039.         {
    1040. 

  1040.             Name => 'CustomFunctions30D',
    1041. 

  1041.             Condition => '$$self{Model} =~ /EOS 30D/',
    1042. 

  1042.             SubDirectory => {
    1043. 

  1043.                 Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1044. 

  1044.                 TagTable => 'Image::ExifTool::CanonCustom::Functions30D',
    1045. 

  1045.             },
    1046. 

  1046.         },
    1047. 

  1047.         {
    1048. 

  1048.             Name => 'CustomFunctions350D',
    1049. 

  1049.             Condition => '$$self{Model} =~ /\b(350D|REBEL XT|Kiss Digital N)\b/',
    1050. 

  1050.             SubDirectory => {
    1051. 

  1051.                 Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1052. 

  1052.                 TagTable => 'Image::ExifTool::CanonCustom::Functions350D',
    1053. 

  1053.             },
    1054. 

  1054.         },
    1055. 

  1055.         {
    1056. 

  1056.             Name => 'CustomFunctions400D',
    1057. 

  1057.             Condition => '$$self{Model} =~ /\b(400D|REBEL XTi|Kiss Digital X|K236)\b/',
    1058. 

  1058.             SubDirectory => {
    1059. 

  1059.                 Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1060. 

  1060.                 TagTable => 'Image::ExifTool::CanonCustom::Functions400D',
    1061. 

  1061.             },
    1062. 

  1062.         },
    1063. 

  1063.         {
    1064. 

  1064.             Name => 'CustomFunctionsD30',
    1065. 

  1065.             Condition => '$$self{Model} =~ /EOS D30\b/',
    1066. 

  1066.             SubDirectory => {
    1067. 

  1067.                 Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1068. 

  1068.                 TagTable => 'Image::ExifTool::CanonCustom::FunctionsD30',
    1069. 

  1069.             },
    1070. 

  1070.         },
    1071. 

  1071.         {
    1072. 

  1072.             Name => 'CustomFunctionsD60',
    1073. 

  1073.             Condition => '$$self{Model} =~ /EOS D60\b/',
    1074. 

  1074.             SubDirectory => {
    1075. 

  1075.                 # the stored size in the D60 apparently doesn't include the size word:
    1076. 

  1076.                 Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size-2,$size)',
    1077. 

  1077.                 # (D60 custom functions are basically the same as D30)
    1078. 

  1078.                 TagTable => 'Image::ExifTool::CanonCustom::FunctionsD30',
    1079. 

  1079.             },
    1080. 

  1080.         },
    1081. 

  1081.         {
    1082. 

  1082.             Name => 'CustomFunctionsUnknown',
    1083. 

  1083.             SubDirectory => {
    1084. 

  1084.                 Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1085. 

  1085.                 TagTable => 'Image::ExifTool::CanonCustom::FuncsUnknown',
    1086. 

  1086.             },
    1087. 

  1087.         },
    1088. 

  1088.     ],
    1089. 

  1089.     0x10 => { #PH
    1090. 

  1090.         Name => 'CanonModelID',
    1091. 

  1091.         Writable => 'int32u',
    1092. 

  1092.         PrintHex => 1,
    1093. 

  1093.         SeparateTable => 1,
    1094. 

  1094.         PrintConv => \%canonModelID,
    1095. 

  1095.     },
    1096. 

  1096.     0x11 => { #PH
    1097. 

  1097.         Name => 'MovieInfo',
    1098. 

  1098.         SubDirectory => {
    1099. 

  1099.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1100. 

  1100.             TagTable => 'Image::ExifTool::Canon::MovieInfo',
    1101. 

  1101.         },
    1102. 

  1102.     },
    1103. 

  1103.     0x12 => {
    1104. 

  1104.         Name => 'CanonAFInfo',
    1105. 

  1105.         # not really a condition -- just need to store the count for later
    1106. 

  1106.         Condition => '$$self{AFInfoCount} = $count',
    1107. 

  1107.         SubDirectory => {
    1108. 

  1108.             # this record does not begin with a length word, so it
    1109. 

  1109.             # has to be validated differently
    1110. 

  1110.             Validate => 'Image::ExifTool::Canon::ValidateAFInfo($dirData,$subdirStart,$size)',
    1111. 

  1111.             TagTable => 'Image::ExifTool::Canon::AFInfo',
    1112. 

  1112.         },
    1113. 

  1113.     },
    1114. 

  1114.     0x13 => { #PH
    1115. 

  1115.         Name => 'ThumbnailImageValidArea',
    1116. 

  1116.         # left,right,top,bottom edges of image in thumbnail, or all zeros for full frame
    1117. 

  1117.         Notes => 'all zeros for full frame',
    1118. 

  1118.         Writable => 'int16u',
    1119. 

  1119.         Count => 4,
    1120. 

  1120.     },
    1121. 

  1121.     0x15 => { #PH
    1122. 

  1122.         # display format for serial number
    1123. 

  1123.         Name => 'SerialNumberFormat',
    1124. 

  1124.         Writable => 'int32u',
    1125. 

  1125.         PrintHex => 1,
    1126. 

  1126.         PrintConv => {
    1127. 

  1127.             0x90000000 => 'Format 1',
    1128. 

  1128.             0xa0000000 => 'Format 2',
    1129. 

  1129.         },
    1130. 

  1130.     },
    1131. 

  1131.     0x1a => { #15
    1132. 

  1132.         Name => 'SuperMacro',
    1133. 

  1133.         Writable => 'int16u',
    1134. 

  1134.         PrintConv => {
    1135. 

  1135.             0 => 'Off',
    1136. 

  1136.             1 => 'On (1)',
    1137. 

  1137.             2 => 'On (2)',
    1138. 

  1138.         },
    1139. 

  1139.     },
    1140. 

  1140.     0x1c => { #PH (A570IS)
    1141. 

  1141.         Name => 'DateStampMode',
    1142. 

  1142.         Writable => 'int16u',
    1143. 

  1143.         Notes => 'used only in postcard mode',
    1144. 

  1144.         PrintConv => {
    1145. 

  1145.             0 => 'Off',
    1146. 

  1146.             1 => 'Date',
    1147. 

  1147.             2 => 'Date & Time',
    1148. 

  1148.         },
    1149. 

  1149.     },
    1150. 

  1150.     0x1d => { #PH
    1151. 

  1151.         Name => 'MyColors',
    1152. 

  1152.         SubDirectory => {
    1153. 

  1153.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1154. 

  1154.             TagTable => 'Image::ExifTool::Canon::MyColors',
    1155. 

  1155.         },
    1156. 

  1156.     },
    1157. 

  1157.     0x1e => { #PH
    1158. 

  1158.         Name => 'FirmwareRevision',
    1159. 

  1159.         Writable => 'int32u',
    1160. 

  1160.         # as a hex number: 0xAVVVRR00, where (a bit of guessing here...)
    1161. 

  1161.         #  A = 'a' for alpha, 'b' for beta?
    1162. 

  1162.         #  V = version? (100,101 for normal releases, 100,110,120,130,170 for alpha/beta)
    1163. 

  1163.         #  R = revision? (01-07, except 00 for alpha/beta releases)
    1164. 

  1164.         PrintConv => q{
    1165. 

  1165.             my $rev = sprintf("%.8x", $val);
    1166. 

  1166.             my ($rel, $v1, $v2, $r1, $r2) = ($rev =~ /^(.)(.)(..)0?(.+)(..)$/);
    1167. 

  1167.             my %r = ( a => 'Alpha ', b => 'Beta ', '0' => '' );
    1168. 

  1168.             $rel = defined $r{$rel} ? $r{$rel} : "Unknown($rel) ";
    1169. 

  1169.             return "$rel$v1.$v2 rev $r1.$r2",
    1170. 

  1170.         },
    1171. 

  1171.         PrintConvInv => q{
    1172. 

  1172.             $_=$val; s/Alpha ?/a/i; s/Beta ?/b/i;
    1173. 

  1173.             s/Unknown ?\((.)\)/$1/i; s/ ?rev ?(.)\./0$1/; s/ ?rev ?//;
    1174. 

  1174.             tr/a-fA-F0-9//dc; return hex $_;
    1175. 

  1175.         },
    1176. 

  1176.     },
    1177. 

  1177.     # 0x1f - used for red-eye-corrected images - PH (A570IS)
    1178. 

  1178.     # 0x22 - values 1 and 2 are 2 and 1 for flash pics, 0 otherwise - PH (A570IS)
    1179. 

  1179.     0x23 => { #31
    1180. 

  1180.         Name => 'Categories',
    1181. 

  1181.         Writable => 'int32u',
    1182. 

  1182.         Format => 'int32u', # (necessary to perform conversion for Condition)
    1183. 

  1183.         Notes => '2 values: 1. always 8, 2. Categories',
    1184. 

  1184.         Count => '2',
    1185. 

  1185.         Condition => '$$valPt =~ /^\x08\0\0\0/',
    1186. 

  1186.         ValueConv => '$val =~ s/^8 //; $val',
    1187. 

  1187.         ValueConvInv => '"8 $val"',
    1188. 

  1188.         PrintConvColumns => 2,
    1189. 

  1189.         PrintConv => { BITMASK => {
    1190. 

  1190.             0 => 'People',
    1191. 

  1191.             1 => 'Scenery',
    1192. 

  1192.             2 => 'Events',
    1193. 

  1193.             3 => 'User 1',
    1194. 

  1194.             4 => 'User 2',
    1195. 

  1195.             5 => 'User 3',
    1196. 

  1196.             6 => 'To Do',
    1197. 

  1197.         } },
    1198. 

  1198.     },
    1199. 

  1199.     0x24 => { #PH
    1200. 

  1200.         Name => 'FaceDetect1',
    1201. 

  1201.         SubDirectory => {
    1202. 

  1202.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1203. 

  1203.             TagTable => 'Image::ExifTool::Canon::FaceDetect1',
    1204. 

  1204.         },
    1205. 

  1205.     },
    1206. 

  1206.     0x25 => { #PH
    1207. 

  1207.         Name => 'FaceDetect2',
    1208. 

  1208.         SubDirectory => {
    1209. 

  1209.             TagTable => 'Image::ExifTool::Canon::FaceDetect2',
    1210. 

  1210.         },
    1211. 

  1211.     },
    1212. 

  1212.     0x26 => { #PH (A570IS,1DmkIII)
    1213. 

  1213.         Name => 'CanonAFInfo2',
    1214. 

  1214.         Condition => '$$valPt !~ /^\0\0\0\0/', # (data may be all zeros in thumbnail of 60D MOV video)
    1215. 

  1215.         SubDirectory => {
    1216. 

  1216.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1217. 

  1217.             TagTable => 'Image::ExifTool::Canon::AFInfo2',
    1218. 

  1218.         },
    1219. 

  1219.     },
    1220. 

  1220.     # 0x27 - value 1 is 1 for high ISO pictures, 0 otherwise
    1221. 

  1221.     #        value 4 is 9 for Flexizone and FaceDetect AF, 1 for Centre AF, 0 otherwise (SX10IS)
    1222. 

  1222.     0x28 => { #JD
    1223. 

  1223.         # bytes 0-1=sequence number (encrypted), 2-5=date/time (encrypted) (ref JD)
    1224. 

  1224.         Name => 'ImageUniqueID',
    1225. 

  1225.         Format => 'undef',
    1226. 

  1226.         Writable => 'int8u',
    1227. 

  1227.         Groups => { 2 => 'Image' },
    1228. 

  1228.         RawConv => '$val eq "\0" x 16 ? undef : $val',
    1229. 

  1229.         ValueConv => 'unpack("H*", $val)',
    1230. 

  1230.         ValueConvInv => 'pack("H*", $val)',
    1231. 

  1231.     },
    1232. 

  1232.     # 0x2d - changes with categories (ref 31)
    1233. 

  1233.     # 0x44 - ShootInfo
    1234. 

  1234.     # 0x62 - UserSetting
    1235. 

  1235.     0x81 => { #13
    1236. 

  1236.         Name => 'RawDataOffset',
    1237. 

  1237.         # (can't yet write 1D raw files)
    1238. 

  1238.         # Writable => 'int32u',
    1239. 

  1239.         # Protected => 2,
    1240. 

  1240.     },
    1241. 

  1241.     0x83 => { #PH
    1242. 

  1242.         Name => 'OriginalDecisionDataOffset',
    1243. 

  1243.         Writable => 'int32u',
    1244. 

  1244.         OffsetPair => 1, # (just used as a flag, since this tag has no pair)
    1245. 

  1245.         # this is an offset to the original decision data block
    1246. 

  1246.         # (offset relative to start of file in JPEG images, but NOT DNG images!)
    1247. 

  1247.         IsOffset => '$val and $$exifTool{FILE_TYPE} ne "JPEG"',
    1248. 

  1248.         Protected => 2,
    1249. 

  1249.         DataTag => 'OriginalDecisionData',
    1250. 

  1250.     },
    1251. 

  1251.     0x90 => {   # used by 1D and 1Ds
    1252. 

  1252.         Name => 'CustomFunctions1D',
    1253. 

  1253.         SubDirectory => {
    1254. 

  1254.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1255. 

  1255.             TagTable => 'Image::ExifTool::CanonCustom::Functions1D',
    1256. 

  1256.         },
    1257. 

  1257.     },
    1258. 

  1258.     0x91 => { #PH
    1259. 

  1259.         Name => 'PersonalFunctions',
    1260. 

  1260.         SubDirectory => {
    1261. 

  1261.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1262. 

  1262.             TagTable => 'Image::ExifTool::CanonCustom::PersonalFuncs',
    1263. 

  1263.         },
    1264. 

  1264.     },
    1265. 

  1265.     0x92 => { #PH
    1266. 

  1266.         Name => 'PersonalFunctionValues',
    1267. 

  1267.         SubDirectory => {
    1268. 

  1268.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1269. 

  1269.             TagTable => 'Image::ExifTool::CanonCustom::PersonalFuncValues',
    1270. 

  1270.         },
    1271. 

  1271.     },
    1272. 

  1272.     0x93 => {
    1273. 

  1273.         Name => 'CanonFileInfo', # (ShootInfoEx)
    1274. 

  1274.         SubDirectory => {
    1275. 

  1275.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1276. 

  1276.             TagTable => 'Image::ExifTool::Canon::FileInfo',
    1277. 

  1277.         },
    1278. 

  1278.     },
    1279. 

  1279.     0x94 => { #PH
    1280. 

  1280.         # AF points for 1D (45 points in 5 rows)
    1281. 

  1281.         Name => 'AFPointsInFocus1D',
    1282. 

  1282.         Notes => 'EOS 1D -- 5 rows: A1-7, B1-10, C1-11, D1-10, E1-7, center point is C6',
    1283. 

  1283.         PrintConv => 'Image::ExifTool::Canon::PrintAFPoints1D($val)',
    1284. 

  1284.     },
    1285. 

  1285.     0x95 => { #PH (observed in 5D sample image)
    1286. 

  1286.         Name => 'LensModel',
    1287. 

  1287.         Writable => 'string',
    1288. 

  1288.     },
    1289. 

  1289.     0x96 => [ #PH
    1290. 

  1290.         {
    1291. 

  1291.             Name => 'SerialInfo',
    1292. 

  1292.             Condition => '$$self{Model} =~ /EOS 5D/',
    1293. 

  1293.             SubDirectory => { TagTable => 'Image::ExifTool::Canon::SerialInfo' },
    1294. 

  1294.         },
    1295. 

  1295.         {
    1296. 

  1296.             Name => 'InternalSerialNumber',
    1297. 

  1297.             Writable => 'string',
    1298. 

  1298.             # remove trailing 0xff's if they exist (Kiss X3)
    1299. 

  1299.             ValueConv => '$val=~s/\xff+$//; $val',
    1300. 

  1300.             ValueConvInv => '$val',
    1301. 

  1301.         },
    1302. 

  1302.     ],
    1303. 

  1303.     0x97 => { #PH
    1304. 

  1304.         Name => 'DustRemovalData',
    1305. 

  1305.         Writable => 'undef',
    1306. 

  1306.         Flags => [ 'Binary', 'Protected' ],
    1307. 

  1307.         # some interesting stuff is stored in here (maybe also InternalSerialNumber)...
    1308. 

  1308.         # 0x00: Version
    1309. 

  1309.         # 0x01: LensInfo
    1310. 

  1310.         # 0x02: AVValue
    1311. 

  1311.         # 0x03: POValue
    1312. 

  1312.         # 0x04: DustCount
    1313. 

  1313.         # 0x06: FocalLength
    1314. 

  1314.         # 0x08: LensID
    1315. 

  1315.         # 0x0a: Width
    1316. 

  1316.         # 0x0c: Height
    1317. 

  1317.         # 0x0e: RAW_Width
    1318. 

  1318.         # 0x10: RAW_Height
    1319. 

  1319.         # 0x12: PixelPitch [um]
    1320. 

  1320.         # 0x14: LpfDistance [mm]
    1321. 

  1321.         # 0x16: TopOffset
    1322. 

  1322.         # 0x17: BottomOffset
    1323. 

  1323.         # 0x18: LeftOffset
    1324. 

  1324.         # 0x19: RightOffset
    1325. 

  1325.         # 0x1a: Year
    1326. 

  1326.         # 0x1b: Month
    1327. 

  1327.         # 0x1c: Day
    1328. 

  1328.         # 0x1d: Hour
    1329. 

  1329.         # 0x1e: Minutes
    1330. 

  1330.         # 0x1f: BrightDiff
    1331. 

  1331.     },
    1332. 

  1332.     0x98 => { #PH
    1333. 

  1333.         Name => 'CropInfo',
    1334. 

  1334.         SubDirectory => {
    1335. 

  1335.             TagTable => 'Image::ExifTool::Canon::CropInfo',
    1336. 

  1336.         },
    1337. 

  1337.     },
    1338. 

  1338.     0x99 => { #PH (EOS 1D Mark III, 40D, etc)
    1339. 

  1339.         Name => 'CustomFunctions2',
    1340. 

  1340.         SubDirectory => {
    1341. 

  1341.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1342. 

  1342.             TagTable => 'Image::ExifTool::CanonCustom::Functions2',
    1343. 

  1343.         },
    1344. 

  1344.     },
    1345. 

  1345.     0x9a => { #PH
    1346. 

  1346.         Name => 'AspectInfo',
    1347. 

  1347.         SubDirectory => {
    1348. 

  1348.             TagTable => 'Image::ExifTool::Canon::AspectInfo',
    1349. 

  1349.         },
    1350. 

  1350.     },
    1351. 

  1351.     0xa0 => {
    1352. 

  1352.         Name => 'ProcessingInfo',
    1353. 

  1353.         SubDirectory => {
    1354. 

  1354.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1355. 

  1355.             TagTable => 'Image::ExifTool::Canon::Processing',
    1356. 

  1356.         },
    1357. 

  1357.     },
    1358. 

  1358.     0xa1 => { Name => 'ToneCurveTable', %longBin }, #PH
    1359. 

  1359.     0xa2 => { Name => 'SharpnessTable', %longBin }, #PH
    1360. 

  1360.     0xa3 => { Name => 'SharpnessFreqTable', %longBin }, #PH
    1361. 

  1361.     0xa4 => { Name => 'WhiteBalanceTable', %longBin }, #PH
    1362. 

  1362.     0xa9 => {
    1363. 

  1363.         Name => 'ColorBalance',
    1364. 

  1364.         SubDirectory => {
    1365. 

  1365.             # this offset is necessary because the table is interpreted as short rationals
    1366. 

  1366.             # (4 bytes long) but the first entry is 2 bytes into the table.
    1367. 

  1367.             Start => '$valuePtr + 2',
    1368. 

  1368.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart-2,$size+2)',
    1369. 

  1369.             TagTable => 'Image::ExifTool::Canon::ColorBalance',
    1370. 

  1370.         },
    1371. 

  1371.     },
    1372. 

  1372.     0xaa => {
    1373. 

  1373.         Name => 'MeasuredColor',
    1374. 

  1374.         SubDirectory => {
    1375. 

  1375.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1376. 

  1376.             TagTable => 'Image::ExifTool::Canon::MeasuredColor',
    1377. 

  1377.         },
    1378. 

  1378.     },
    1379. 

  1379.     0xae => {
    1380. 

  1380.         Name => 'ColorTemperature',
    1381. 

  1381.         Writable => 'int16u',
    1382. 

  1382.     },
    1383. 

  1383.     0xb0 => { #PH
    1384. 

  1384.         Name => 'CanonFlags',
    1385. 

  1385.         SubDirectory => {
    1386. 

  1386.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1387. 

  1387.             TagTable => 'Image::ExifTool::Canon::Flags',
    1388. 

  1388.         },
    1389. 

  1389.     },
    1390. 

  1390.     0xb1 => { #PH
    1391. 

  1391.         Name => 'ModifiedInfo',
    1392. 

  1392.         SubDirectory => {
    1393. 

  1393.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1394. 

  1394.             TagTable => 'Image::ExifTool::Canon::ModifiedInfo',
    1395. 

  1395.         },
    1396. 

  1396.     },
    1397. 

  1397.     0xb2 => { Name => 'ToneCurveMatching', %longBin }, #PH
    1398. 

  1398.     0xb3 => { Name => 'WhiteBalanceMatching', %longBin }, #PH
    1399. 

  1399.     0xb4 => { #PH
    1400. 

  1400.         Name => 'ColorSpace',
    1401. 

  1401.         Writable => 'int16u',
    1402. 

  1402.         PrintConv => {
    1403. 

  1403.             1 => 'sRGB',
    1404. 

  1404.             2 => 'Adobe RGB',
    1405. 

  1405.         },
    1406. 

  1406.     },
    1407. 

  1407.     0xb6 => {
    1408. 

  1408.         Name => 'PreviewImageInfo',
    1409. 

  1409.         SubDirectory => {
    1410. 

  1410.             # Note: the first word of this block gives the correct block size in bytes, but
    1411. 

  1411.             # the size is wrong by a factor of 2 in the IFD, so we must account for this
    1412. 

  1412.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size/2)',
    1413. 

  1413.             TagTable => 'Image::ExifTool::Canon::PreviewImageInfo',
    1414. 

  1414.         },
    1415. 

  1415.     },
    1416. 

  1416.     0xd0 => { #PH
    1417. 

  1417.         Name => 'VRDOffset',
    1418. 

  1418.         Writable => 'int32u',
    1419. 

  1419.         OffsetPair => 1, # (just used as a flag, since this tag has no pair)
    1420. 

  1420.         Protected => 2,
    1421. 

  1421.         DataTag => 'CanonVRD',
    1422. 

  1422.         Notes => 'offset of VRD "recipe data" if it exists',
    1423. 

  1423.     },
    1424. 

  1424.     0xe0 => { #12
    1425. 

  1425.         Name => 'SensorInfo',
    1426. 

  1426.         SubDirectory => {
    1427. 

  1427.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1428. 

  1428.             TagTable => 'Image::ExifTool::Canon::SensorInfo',
    1429. 

  1429.         },
    1430. 

  1430.     },
    1431. 

  1431.     0x4001 => [ #13
    1432. 

  1432.         {   # (int16u[582]) - 20D and 350D
    1433. 

  1433.             Condition => '$count == 582',
    1434. 

  1434.             Name => 'ColorData1', # (Canon: WBPacket)
    1435. 

  1435.             SubDirectory => {
    1436. 

  1436.                 TagTable => 'Image::ExifTool::Canon::ColorData1',
    1437. 

  1437.             },
    1438. 

  1438.         },
    1439. 

  1439.         {   # (int16u[653]) - 1DmkII and 1DSmkII
    1440. 

  1440.             Condition => '$count == 653',
    1441. 

  1441.             Name => 'ColorData2',
    1442. 

  1442.             SubDirectory => {
    1443. 

  1443.                 TagTable => 'Image::ExifTool::Canon::ColorData2',
    1444. 

  1444.             },
    1445. 

  1445.         },
    1446. 

  1446.         {   # (int16u[796]) - 1DmkIIN, 5D, 30D, 400D
    1447. 

  1447.             Condition => '$count == 796',
    1448. 

  1448.             Name => 'ColorData3',
    1449. 

  1449.             SubDirectory => {
    1450. 

  1450.                 TagTable => 'Image::ExifTool::Canon::ColorData3',
    1451. 

  1451.             },
    1452. 

  1452.         },
    1453. 

  1453.         {   # (int16u[692|674|702|1227|1250|1251|1337])
    1454. 

  1454.             # 40D (692), 1DmkIII (674), 1DSmkIII (702), 450D/1000D (1227)
    1455. 

  1455.             # 50D/5DmkII (1250), 500D/7D_pre-prod/1DmkIV_pre-prod (1251),
    1456. 

  1456.             # 1DmkIV/7D/550D_pre-prod (1337), 550D (1338), 1100D (1346)
    1457. 

  1457.             Condition => q{
    1458. 

  1458.                 $count == 692  or $count == 674  or $count == 702 or
    1459. 

  1459.                 $count == 1227 or $count == 1250 or $count == 1251 or
    1460. 

  1460.                 $count == 1337 or $count == 1338 or $count == 1346
    1461. 

  1461.             },
    1462. 

  1462.             Name => 'ColorData4',
    1463. 

  1463.             SubDirectory => {
    1464. 

  1464.                 TagTable => 'Image::ExifTool::Canon::ColorData4',
    1465. 

  1465.             },
    1466. 

  1466.         },
    1467. 

  1467.         {   # (int16u[5120]) - G10
    1468. 

  1468.             Condition => '$count == 5120',
    1469. 

  1469.             Name => 'ColorData5',
    1470. 

  1470.             SubDirectory => {
    1471. 

  1471.                 TagTable => 'Image::ExifTool::Canon::ColorData5',
    1472. 

  1472.             },
    1473. 

  1473.         },
    1474. 

  1474.         {   # (int16u[1273]) - 600D
    1475. 

  1475.             Condition => '$count == 1273',
    1476. 

  1476.             Name => 'ColorData6',
    1477. 

  1477.             SubDirectory => {
    1478. 

  1478.                 TagTable => 'Image::ExifTool::Canon::ColorData6',
    1479. 

  1479.             },
    1480. 

  1480.         },
    1481. 

  1481.         {
    1482. 

  1482.             Name => 'ColorDataUnknown',
    1483. 

  1483.             SubDirectory => {
    1484. 

  1484.                 TagTable => 'Image::ExifTool::Canon::ColorDataUnknown',
    1485. 

  1485.             },
    1486. 

  1486.         },
    1487. 

  1487.     ],
    1488. 

  1488.     0x4002 => { #PH
    1489. 

  1489.         # unknown data block in some JPEG and CR2 images
    1490. 

  1490.         # (5kB for most models, but 22kb for 5D and 30D)
    1491. 

  1491.         Name => 'CRWParam',
    1492. 

  1492.         Format => 'undef',
    1493. 

  1493.         Flags => [ 'Unknown', 'Binary' ],
    1494. 

  1494.     },
    1495. 

  1495.     0x4003 => { #PH
    1496. 

  1496.         Name => 'ColorInfo',
    1497. 

  1497.         SubDirectory => {
    1498. 

  1498.             TagTable => 'Image::ExifTool::Canon::ColorInfo',
    1499. 

  1499.         },
    1500. 

  1500.     },
    1501. 

  1501.     0x4005 => { #PH
    1502. 

  1502.         Name => 'Flavor',
    1503. 

  1503.         Notes => 'unknown 49kB block, not copied to JPEG images',
    1504. 

  1504.         # 'Drop' because not found in JPEG images (too large for APP1 anyway)
    1505. 

  1505.         Flags => [ 'Unknown', 'Binary', 'Drop' ],
    1506. 

  1506.     },
    1507. 

  1507.     0x4008 => { #PH guess (1DmkIII)
    1508. 

  1508.         Name => 'BlackLevel', # (Canon: BasePictStyleOfUser)
    1509. 

  1509.         Unknown => 1,
    1510. 

  1510.     },
    1511. 

  1511.     0x4010 => { #http://u88.n24.queensu.ca/exiftool/forum/index.php/topic,2933.0.html
    1512. 

  1512.         Name => 'CustomPictureStyleFileName', # (Canon: PictStyleCaption)
    1513. 

  1513.         Writable => 'string',
    1514. 

  1514.     },
    1515. 

  1515.     0x4013 => { #PH
    1516. 

  1516.         Name => 'AFMicroAdj',
    1517. 

  1517.         SubDirectory => {
    1518. 

  1518.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1519. 

  1519.             TagTable => 'Image::ExifTool::Canon::AFMicroAdj',
    1520. 

  1520.         },
    1521. 

  1521.     },
    1522. 

  1522.     # 0x4014 (similar to 0x83?)
    1523. 

  1523.     0x4015 => {
    1524. 

  1524.         Name => 'VignettingCorr', # (Canon: LensPacket)
    1525. 

  1525.         Condition => '$$valPt !~ /^\0\0\0\0/', # (data may be all zeros for 60D)
    1526. 

  1526.         SubDirectory => {
    1527. 

  1527.             # (the size word is at byte 2 in this structure)
    1528. 

  1528.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart+2,$size)',
    1529. 

  1529.             TagTable => 'Image::ExifTool::Canon::VignettingCorr',
    1530. 

  1530.         },
    1531. 

  1531.     },
    1532. 

  1532.     0x4016 => {
    1533. 

  1533.         Name => 'VignettingCorr2', # (Canon: ImageCorrectActual)
    1534. 

  1534.         SubDirectory => {
    1535. 

  1535.             # (the size word is actually 4 bytes, but it doesn't matter if little-endian)
    1536. 

  1536.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1537. 

  1537.             TagTable => 'Image::ExifTool::Canon::VignettingCorr2',
    1538. 

  1538.         },
    1539. 

  1539.     },
    1540. 

  1540.     0x4018 => { #PH
    1541. 

  1541.         Name => 'LightingOpt', # (Canon: ImageCorrect)
    1542. 

  1542.         SubDirectory => {
    1543. 

  1543.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1544. 

  1544.             TagTable => 'Image::ExifTool::Canon::LightingOpt',
    1545. 

  1545.         }
    1546. 

  1546.     },
    1547. 

  1547.     0x4019 => { #20
    1548. 

  1548.         Name => 'LensInfo',
    1549. 

  1549.         SubDirectory => {
    1550. 

  1550.             TagTable => 'Image::ExifTool::Canon::LensInfo',
    1551. 

  1551.         }
    1552. 

  1552.     },
    1553. 

  1553.     0x4020 => { #PH
    1554. 

  1554.         Name => 'AmbienceInfo',
    1555. 

  1555.         Condition => '$$valPt !~ /^\0\0\0\0/', # (data may be all zeros for 60D)
    1556. 

  1556.         SubDirectory => {
    1557. 

  1557.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1558. 

  1558.             TagTable => 'Image::ExifTool::Canon::Ambience',
    1559. 

  1559.         }
    1560. 

  1560.     },
    1561. 

  1561.     0x4024 => { #PH
    1562. 

  1562.         Name => 'FilterInfo',
    1563. 

  1563.         SubDirectory => {
    1564. 

  1564.             Validate => 'Image::ExifTool::Canon::Validate($dirData,$subdirStart,$size)',
    1565. 

  1565.             TagTable => 'Image::ExifTool::Canon::FilterInfo',
    1566. 

  1566.         }
    1567. 

  1567.     },
    1568. 

  1568. );
    1569. 

  1569. 

  1570. #..............................................................................
    1571. 

  1571. # Canon camera settings (MakerNotes tag 0x01)
    1572. 

  1572. # BinaryData (keys are indices into the int16s array)
    1573. 

  1573. %Image::ExifTool::Canon::CameraSettings = (
    1574. 

  1574.     %binaryDataAttrs,
    1575. 

  1575.     FORMAT => 'int16s',
    1576. 

  1576.     FIRST_ENTRY => 1,
    1577. 

  1577.     DATAMEMBER => [ 22, 25 ],   # necessary for writing
    1578. 

  1578.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    1579. 

  1579.     1 => {
    1580. 

  1580.         Name => 'MacroMode',
    1581. 

  1581.         PrintConv => {
    1582. 

  1582.             1 => 'Macro',
    1583. 

  1583.             2 => 'Normal',
    1584. 

  1584.         },
    1585. 

  1585.     },
    1586. 

  1586.     2 => {
    1587. 

  1587.         Name => 'SelfTimer',
    1588. 

  1588.         # Custom timer mode if bit 0x4000 is set - PH (A570IS)
    1589. 

  1589.         PrintConv => q{
    1590. 

  1590.             return 'Off' unless $val;
    1591. 

  1591.             return (($val&0xfff) / 10) . ' s' . ($val & 0x4000 ? ', Custom' : '');
    1592. 

  1592.         },
    1593. 

  1593.         PrintConvInv => q{
    1594. 

  1594.             return 0 if $val =~ /^Off/i;
    1595. 

  1595.             $val =~ s/\s*s(ec)?\b//i;
    1596. 

  1596.             $val =~ s/,?\s*Custom$//i ? ($val*10) | 0x4000 : $val*10;
    1597. 

  1597.         },
    1598. 

  1598.     },
    1599. 

  1599.     3 => {
    1600. 

  1600.         Name => 'Quality',
    1601. 

  1601.         PrintConv => \%canonQuality,
    1602. 

  1602.     },
    1603. 

  1603.     4 => {
    1604. 

  1604.         Name => 'CanonFlashMode',
    1605. 

  1605.         PrintConv => {
    1606. 

  1606.             0 => 'Off',
    1607. 

  1607.             1 => 'Auto',
    1608. 

  1608.             2 => 'On',
    1609. 

  1609.             3 => 'Red-eye reduction',
    1610. 

  1610.             4 => 'Slow-sync',
    1611. 

  1611.             5 => 'Red-eye reduction (Auto)',
    1612. 

  1612.             6 => 'Red-eye reduction (On)',
    1613. 

  1613.             16 => 'External flash', # not set in D30 or 300D
    1614. 

  1614.         },
    1615. 

  1615.     },
    1616. 

  1616.     5 => {
    1617. 

  1617.         Name => 'ContinuousDrive',
    1618. 

  1618.         PrintConv => {
    1619. 

  1619.             0 => 'Single',
    1620. 

  1620.             1 => 'Continuous',
    1621. 

  1621.             2 => 'Movie', #PH
    1622. 

  1622.             3 => 'Continuous, Speed Priority', #PH
    1623. 

  1623.             4 => 'Continuous, Low', #PH
    1624. 

  1624.             5 => 'Continuous, High', #PH
    1625. 

  1625.             6 => 'Silent Single', #PH
    1626. 

  1626.             # 11 - seen for SX260
    1627. 

  1627.             # 32-34 - Self-timer?
    1628. 

  1628.         },
    1629. 

  1629.     },
    1630. 

  1630.     7 => {
    1631. 

  1631.         Name => 'FocusMode',
    1632. 

  1632.         PrintConv => {
    1633. 

  1633.             0 => 'One-shot AF',
    1634. 

  1634.             1 => 'AI Servo AF',
    1635. 

  1635.             2 => 'AI Focus AF',
    1636. 

  1636.             3 => 'Manual Focus (3)',
    1637. 

  1637.             4 => 'Single',
    1638. 

  1638.             5 => 'Continuous',
    1639. 

  1639.             6 => 'Manual Focus (6)',
    1640. 

  1640.            16 => 'Pan Focus', #PH
    1641. 

  1641.            # 137 - Single?
    1642. 

  1642.         },
    1643. 

  1643.     },
    1644. 

  1644.     9 => { #PH
    1645. 

  1645.         Name => 'RecordMode',
    1646. 

  1646.         RawConv => '$val==-1 ? undef : $val', #22
    1647. 

  1647.         PrintConv => {
    1648. 

  1648.             1 => 'JPEG',
    1649. 

  1649.             2 => 'CRW+THM', # (300D,etc)
    1650. 

  1650.             3 => 'AVI+THM', # (30D)
    1651. 

  1651.             4 => 'TIF', # +THM? (1Ds) (unconfirmed)
    1652. 

  1652.             5 => 'TIF+JPEG', # (1D) (unconfirmed)
    1653. 

  1653.             6 => 'CR2', # +THM? (1D,30D,350D)
    1654. 

  1654.             7 => 'CR2+JPEG', # (S30)
    1655. 

  1655.             9 => 'Video', # (S95 MOV)
    1656. 

  1656.         },
    1657. 

  1657.     },
    1658. 

  1658.     10 => {
    1659. 

  1659.         Name => 'CanonImageSize',
    1660. 

  1660.         PrintConvColumns => 2,
    1661. 

  1661.         PrintConv => \%canonImageSize,
    1662. 

  1662.     },
    1663. 

  1663.     11 => {
    1664. 

  1664.         Name => 'EasyMode',
    1665. 

  1665.         PrintConvColumns => 3,
    1666. 

  1666.         PrintConv => {
    1667. 

  1667.             0 => 'Full auto',
    1668. 

  1668.             1 => 'Manual',
    1669. 

  1669.             2 => 'Landscape',
    1670. 

  1670.             3 => 'Fast shutter',
    1671. 

  1671.             4 => 'Slow shutter',
    1672. 

  1672.             5 => 'Night',
    1673. 

  1673.             6 => 'Gray Scale', #PH
    1674. 

  1674.             7 => 'Sepia',
    1675. 

  1675.             8 => 'Portrait',
    1676. 

  1676.             9 => 'Sports',
    1677. 

  1677.             10 => 'Macro',
    1678. 

  1678.             11 => 'Black & White', #PH
    1679. 

  1679.             12 => 'Pan focus',
    1680. 

  1680.             13 => 'Vivid', #PH
    1681. 

  1681.             14 => 'Neutral', #PH
    1682. 

  1682.             15 => 'Flash Off',  #8
    1683. 

  1683.             16 => 'Long Shutter', #PH
    1684. 

  1684.             17 => 'Super Macro', #PH
    1685. 

  1685.             18 => 'Foliage', #PH
    1686. 

  1686.             19 => 'Indoor', #PH
    1687. 

  1687.             20 => 'Fireworks', #PH
    1688. 

  1688.             21 => 'Beach', #PH
    1689. 

  1689.             22 => 'Underwater', #PH
    1690. 

  1690.             23 => 'Snow', #PH
    1691. 

  1691.             24 => 'Kids & Pets', #PH
    1692. 

  1692.             25 => 'Night Snapshot', #PH
    1693. 

  1693.             26 => 'Digital Macro', #PH
    1694. 

  1694.             27 => 'My Colors', #PH
    1695. 

  1695.             28 => 'Movie Snap', #PH
    1696. 

  1696.             29 => 'Super Macro 2', #PH
    1697. 

  1697.             30 => 'Color Accent', #18
    1698. 

  1698.             31 => 'Color Swap', #18
    1699. 

  1699.             32 => 'Aquarium', #18
    1700. 

  1700.             33 => 'ISO 3200', #18
    1701. 

  1701.             34 => 'ISO 6400', #PH
    1702. 

  1702.             35 => 'Creative Light Effect', #PH
    1703. 

  1703.             36 => 'Easy', #PH
    1704. 

  1704.             37 => 'Quick Shot', #PH
    1705. 

  1705.             38 => 'Creative Auto', #39
    1706. 

  1706.             39 => 'Zoom Blur', #PH
    1707. 

  1707.             40 => 'Low Light', #PH
    1708. 

  1708.             41 => 'Nostalgic', #PH
    1709. 

  1709.             42 => 'Super Vivid', #PH (SD4500)
    1710. 

  1710.             43 => 'Poster Effect', #PH (SD4500)
    1711. 

  1711.             44 => 'Face Self-timer', #PH
    1712. 

  1712.             45 => 'Smile', #PH
    1713. 

  1713.             46 => 'Wink Self-timer', #PH
    1714. 

  1714.             47 => 'Fisheye Effect', #PH (SX30IS)
    1715. 

  1715.             48 => 'Miniature Effect', #PH (SD4500)
    1716. 

  1716.             49 => 'High-speed Burst', #PH
    1717. 

  1717.             50 => 'Best Image Selection', #PH
    1718. 

  1718.             51 => 'High Dynamic Range', #PH (S95)
    1719. 

  1719.             52 => 'Handheld Night Scene', #PH
    1720. 

  1720.             53 => 'Movie Digest', #PH
    1721. 

  1721.             54 => 'Live View Control', #PH
    1722. 

  1722.             55 => 'Discreet', #PH
    1723. 

  1723.             56 => 'Blur Reduction', #PH
    1724. 

  1724.             57 => 'Monochrome', #PH (SX260 B&W,Sepia,Blue tone)
    1725. 

  1725.             58 => 'Fisheye', #PH (IXUS240)
    1726. 

  1726.             59 => 'Scene Intelligent Auto', #PH (T3i)
    1727. 

  1727.             60 => 'High Speed Burst HQ', #PH
    1728. 

  1728.             62 => 'Soft Focus', #PH (SX260)
    1729. 

  1729.             257 => 'Spotlight', #PH
    1730. 

  1730.             258 => 'Night 2', #PH
    1731. 

  1731.             259 => 'Night+',
    1732. 

  1732.             260 => 'Super Night', #PH
    1733. 

  1733.             261 => 'Sunset', #PH (SX10IS)
    1734. 

  1734.             263 => 'Night Scene', #PH
    1735. 

  1735.             264 => 'Surface', #PH
    1736. 

  1736.             265 => 'Low Light 2', #PH
    1737. 

  1737.         },
    1738. 

  1738.     },
    1739. 

  1739.     12 => {
    1740. 

  1740.         Name => 'DigitalZoom',
    1741. 

  1741.         PrintConv => {
    1742. 

  1742.             0 => 'None',
    1743. 

  1743.             1 => '2x',
    1744. 

  1744.             2 => '4x',
    1745. 

  1745.             3 => 'Other',  # value obtained from 2*$val[37]/$val[36]
    1746. 

  1746.         },
    1747. 

  1747.     },
    1748. 

  1748.     13 => {
    1749. 

  1749.         Name => 'Contrast',
    1750. 

  1750.         RawConv => '$val == 0x7fff ? undef : $val',
    1751. 

  1751.         %Image::ExifTool::Exif::printParameter,
    1752. 

  1752.     },
    1753. 

  1753.     14 => {
    1754. 

  1754.         Name => 'Saturation',
    1755. 

  1755.         RawConv => '$val == 0x7fff ? undef : $val',
    1756. 

  1756.         %Image::ExifTool::Exif::printParameter,
    1757. 

  1757.     },
    1758. 

  1758.     15 => {
    1759. 

  1759.         Name => 'Sharpness',
    1760. 

  1760.         RawConv => '$val == 0x7fff ? undef : $val',
    1761. 

  1761.         Notes => q{
    1762. 

  1762.             some models use a range of -2 to +2 where 0 is normal sharpening, and
    1763. 

  1763.             others use a range of 0 to 7 where 0 is no sharpening
    1764. 

  1764.         },
    1765. 

  1765.         PrintConv => '$val > 0 ? "+$val" : $val',
    1766. 

  1766.         PrintConvInv => '$val',
    1767. 

  1767.     },
    1768. 

  1768.     16 => {
    1769. 

  1769.         Name => 'CameraISO',
    1770. 

  1770.         RawConv => '$val == 0x7fff ? undef : $val',
    1771. 

  1771.         ValueConv => 'Image::ExifTool::Canon::CameraISO($val)',
    1772. 

  1772.         ValueConvInv => 'Image::ExifTool::Canon::CameraISO($val,1)',
    1773. 

  1773.     },
    1774. 

  1774.     17 => {
    1775. 

  1775.         Name => 'MeteringMode',
    1776. 

  1776.         PrintConv => {
    1777. 

  1777.             0 => 'Default', # older Ixus
    1778. 

  1778.             1 => 'Spot',
    1779. 

  1779.             2 => 'Average', #PH
    1780. 

  1780.             3 => 'Evaluative',
    1781. 

  1781.             4 => 'Partial',
    1782. 

  1782.             5 => 'Center-weighted average',
    1783. 

  1783.         },
    1784. 

  1784.     },
    1785. 

  1785.     18 => {
    1786. 

  1786.         # this is always 2 for the 300D - PH
    1787. 

  1787.         Name => 'FocusRange',
    1788. 

  1788.         PrintConv => {
    1789. 

  1789.             0 => 'Manual',
    1790. 

  1790.             1 => 'Auto',
    1791. 

  1791.             2 => 'Not Known',
    1792. 

  1792.             3 => 'Macro',
    1793. 

  1793.             4 => 'Very Close', #PH
    1794. 

  1794.             5 => 'Close', #PH
    1795. 

  1795.             6 => 'Middle Range', #PH
    1796. 

  1796.             7 => 'Far Range',
    1797. 

  1797.             8 => 'Pan Focus',
    1798. 

  1798.             9 => 'Super Macro', #PH
    1799. 

  1799.             10=> 'Infinity', #PH
    1800. 

  1800.         },
    1801. 

  1801.     },
    1802. 

  1802.     19 => {
    1803. 

  1803.         Name => 'AFPoint',
    1804. 

  1804.         Flags => 'PrintHex',
    1805. 

  1805.         RawConv => '$val==0 ? undef : $val',
    1806. 

  1806.         PrintConv => {
    1807. 

  1807.             0x2005 => 'Manual AF point selection',
    1808. 

  1808.             0x3000 => 'None (MF)',
    1809. 

  1809.             0x3001 => 'Auto AF point selection',
    1810. 

  1810.             0x3002 => 'Right',
    1811. 

  1811.             0x3003 => 'Center',
    1812. 

  1812.             0x3004 => 'Left',
    1813. 

  1813.             0x4001 => 'Auto AF point selection',
    1814. 

  1814.             0x4006 => 'Face Detect', #PH (A570IS)
    1815. 

  1815.         },
    1816. 

  1816.     },
    1817. 

  1817.     20 => {
    1818. 

  1818.         Name => 'CanonExposureMode',
    1819. 

  1819.         PrintConv => {
    1820. 

  1820.             0 => 'Easy',
    1821. 

  1821.             1 => 'Program AE',
    1822. 

  1822.             2 => 'Shutter speed priority AE',
    1823. 

  1823.             3 => 'Aperture-priority AE',
    1824. 

  1824.             4 => 'Manual',
    1825. 

  1825.             5 => 'Depth-of-field AE',
    1826. 

  1826.             6 => 'M-Dep', #PH
    1827. 

  1827.             7 => 'Bulb', #30
    1828. 

  1828.         },
    1829. 

  1829.     },
    1830. 

  1830.     22 => { #4
    1831. 

  1831.         Name => 'LensType',
    1832. 

  1832.         RawConv => '$val ? $$self{LensType}=$val : undef', # don't use if value is zero
    1833. 

  1833.         Notes => 'this value is incorrect for EOS 7D images with lenses of type 256 or greater',
    1834. 

  1834.         SeparateTable => 1,
    1835. 

  1835.         DataMember => 'LensType',
    1836. 

  1836.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    1837. 

  1837.         PrintConv => \%canonLensTypes,
    1838. 

  1838.     },
    1839. 

  1839.     23 => {
    1840. 

  1840.         Name => 'LongFocal',
    1841. 

  1841.         Format => 'int16u',
    1842. 

  1842.         # this is a bit tricky, but we need the FocalUnits to convert this to mm
    1843. 

  1843.         RawConvInv => '$val * ($$self{FocalUnits} || 1)',
    1844. 

  1844.         ValueConv => '$val / ($$self{FocalUnits} || 1)',
    1845. 

  1845.         ValueConvInv => '$val',
    1846. 

  1846.         PrintConv => '"$val mm"',
    1847. 

  1847.         PrintConvInv => '$val=~s/\s*mm//;$val',
    1848. 

  1848.     },
    1849. 

  1849.     24 => {
    1850. 

  1850.         Name => 'ShortFocal',
    1851. 

  1851.         Format => 'int16u',
    1852. 

  1852.         RawConvInv => '$val * ($$self{FocalUnits} || 1)',
    1853. 

  1853.         ValueConv => '$val / ($$self{FocalUnits} || 1)',
    1854. 

  1854.         ValueConvInv => '$val',
    1855. 

  1855.         PrintConv => '"$val mm"',
    1856. 

  1856.         PrintConvInv => '$val=~s/\s*mm//;$val',
    1857. 

  1857.     },
    1858. 

  1858.     25 => {
    1859. 

  1859.         Name => 'FocalUnits',
    1860. 

  1860.         # conversion from raw focal length values to mm
    1861. 

  1861.         DataMember => 'FocalUnits',
    1862. 

  1862.         RawConv => '$$self{FocalUnits} = $val',
    1863. 

  1863.         PrintConv => '"$val/mm"',
    1864. 

  1864.         PrintConvInv => '$val=~s/\s*\/?\s*mm//;$val',
    1865. 

  1865.     },
    1866. 

  1866.     26 => { #9
    1867. 

  1867.         Name => 'MaxAperture',
    1868. 

  1868.         RawConv => '$val > 0 ? $val : undef',
    1869. 

  1869.         ValueConv => 'exp(Image::ExifTool::Canon::CanonEv($val)*log(2)/2)',
    1870. 

  1870.         ValueConvInv => 'Image::ExifTool::Canon::CanonEvInv(log($val)*2/log(2))',
    1871. 

  1871.         PrintConv => 'sprintf("%.2g",$val)',
    1872. 

  1872.         PrintConvInv => '$val',
    1873. 

  1873.     },
    1874. 

  1874.     27 => { #PH
    1875. 

  1875.         Name => 'MinAperture',
    1876. 

  1876.         RawConv => '$val > 0 ? $val : undef',
    1877. 

  1877.         ValueConv => 'exp(Image::ExifTool::Canon::CanonEv($val)*log(2)/2)',
    1878. 

  1878.         ValueConvInv => 'Image::ExifTool::Canon::CanonEvInv(log($val)*2/log(2))',
    1879. 

  1879.         PrintConv => 'sprintf("%.2g",$val)',
    1880. 

  1880.         PrintConvInv => '$val',
    1881. 

  1881.     },
    1882. 

  1882.     28 => {
    1883. 

  1883.         Name => 'FlashActivity',
    1884. 

  1884.         RawConv => '$val==-1 ? undef : $val',
    1885. 

  1885.     },
    1886. 

  1886.     29 => {
    1887. 

  1887.         Name => 'FlashBits',
    1888. 

  1888.         PrintConvColumns => 2,
    1889. 

  1889.         PrintConv => { BITMASK => {
    1890. 

  1890.             0 => 'Manual', #PH
    1891. 

  1891.             1 => 'TTL', #PH
    1892. 

  1892.             2 => 'A-TTL', #PH
    1893. 

  1893.             3 => 'E-TTL', #PH
    1894. 

  1894.             4 => 'FP sync enabled',
    1895. 

  1895.             7 => '2nd-curtain sync used',
    1896. 

  1896.             11 => 'FP sync used',
    1897. 

  1897.             13 => 'Built-in',
    1898. 

  1898.             14 => 'External', #(may not be set in manual mode - ref 37)
    1899. 

  1899.         } },
    1900. 

  1900.     },
    1901. 

  1901.     32 => {
    1902. 

  1902.         Name => 'FocusContinuous',
    1903. 

  1903.         RawConv => '$val==-1 ? undef : $val',
    1904. 

  1904.         PrintConv => {
    1905. 

  1905.             0 => 'Single',
    1906. 

  1906.             1 => 'Continuous',
    1907. 

  1907.             8 => 'Manual', #22
    1908. 

  1908.         },
    1909. 

  1909.     },
    1910. 

  1910.     33 => { #PH
    1911. 

  1911.         Name => 'AESetting',
    1912. 

  1912.         RawConv => '$val==-1 ? undef : $val',
    1913. 

  1913.         PrintConv => {
    1914. 

  1914.             0 => 'Normal AE',
    1915. 

  1915.             1 => 'Exposure Compensation',
    1916. 

  1916.             2 => 'AE Lock',
    1917. 

  1917.             3 => 'AE Lock + Exposure Comp.',
    1918. 

  1918.             4 => 'No AE',
    1919. 

  1919.         },
    1920. 

  1920.     },
    1921. 

  1921.     34 => { #PH
    1922. 

  1922.         Name => 'ImageStabilization',
    1923. 

  1923.         RawConv => '$val==-1 ? undef : $val',
    1924. 

  1924.         PrintConv => {
    1925. 

  1925.             0 => 'Off',
    1926. 

  1926.             1 => 'On',
    1927. 

  1927.             2 => 'Shoot Only', #15
    1928. 

  1928.             3 => 'Panning', # (A570IS)
    1929. 

  1929.             4 => 'Dynamic', # (SX30IS) (was 'On, Video')
    1930. 

  1930.             # (don't know what bit 0x100 indicates)
    1931. 

  1931.             256 => 'Off (2)',
    1932. 

  1932.             257 => 'On (2)',
    1933. 

  1933.             258 => 'Shoot Only (2)',
    1934. 

  1934.             259 => 'Panning (2)',
    1935. 

  1935.             260 => 'Dynamic (2)',
    1936. 

  1936.         },
    1937. 

  1937.     },
    1938. 

  1938.     35 => { #PH
    1939. 

  1939.         Name => 'DisplayAperture',
    1940. 

  1940.         RawConv => '$val ? $val : undef',
    1941. 

  1941.         ValueConv => '$val / 10',
    1942. 

  1942.         ValueConvInv => '$val * 10',
    1943. 

  1943.     },
    1944. 

  1944.     36 => 'ZoomSourceWidth', #PH
    1945. 

  1945.     37 => 'ZoomTargetWidth', #PH
    1946. 

  1946.     39 => { #22
    1947. 

  1947.         Name => 'SpotMeteringMode',
    1948. 

  1948.         RawConv => '$val==-1 ? undef : $val',
    1949. 

  1949.         PrintConv => {
    1950. 

  1950.             0 => 'Center',
    1951. 

  1951.             1 => 'AF Point',
    1952. 

  1952.         },
    1953. 

  1953.     },
    1954. 

  1954.     40 => { #PH
    1955. 

  1955.         Name => 'PhotoEffect',
    1956. 

  1956.         RawConv => '$val==-1 ? undef : $val',
    1957. 

  1957.         PrintConvColumns => 2,
    1958. 

  1958.         PrintConv => {
    1959. 

  1959.             0 => 'Off',
    1960. 

  1960.             1 => 'Vivid',
    1961. 

  1961.             2 => 'Neutral',
    1962. 

  1962.             3 => 'Smooth',
    1963. 

  1963.             4 => 'Sepia',
    1964. 

  1964.             5 => 'B&W',
    1965. 

  1965.             6 => 'Custom',
    1966. 

  1966.             100 => 'My Color Data',
    1967. 

  1967.         },
    1968. 

  1968.     },
    1969. 

  1969.     41 => { #PH (A570IS)
    1970. 

  1970.         Name => 'ManualFlashOutput',
    1971. 

  1971.         PrintHex => 1,
    1972. 

  1972.         PrintConv => {
    1973. 

  1973.             0 => 'n/a',
    1974. 

  1974.             0x500 => 'Full',
    1975. 

  1975.             0x502 => 'Medium',
    1976. 

  1976.             0x504 => 'Low',
    1977. 

  1977.             0x7fff => 'n/a', # (EOS models)
    1978. 

  1978.         },
    1979. 

  1979.     },
    1980. 

  1980.     # 41 => non-zero for manual flash intensity - PH (A570IS)
    1981. 

  1981.     42 => {
    1982. 

  1982.         Name => 'ColorTone',
    1983. 

  1983.         RawConv => '$val == 0x7fff ? undef : $val',
    1984. 

  1984.         %Image::ExifTool::Exif::printParameter,
    1985. 

  1985.     },
    1986. 

  1986.     46 => { #PH
    1987. 

  1987.         Name => 'SRAWQuality',
    1988. 

  1988.         RawConv => '$val==-1 ? undef : $val',
    1989. 

  1989.         PrintConv => {
    1990. 

  1990.             0 => 'n/a',
    1991. 

  1991.             1 => 'sRAW1 (mRAW)',
    1992. 

  1992.             2 => 'sRAW2 (sRAW)',
    1993. 

  1993.         },
    1994. 

  1994.     },
    1995. 

  1995. );
    1996. 

  1996. 

  1997. # focal length information (MakerNotes tag 0x02)
    1998. 

  1998. %Image::ExifTool::Canon::FocalLength = (
    1999. 

  1999.     %binaryDataAttrs,
    2000. 

  2000.     FORMAT => 'int16u',
    2001. 

  2001.     FIRST_ENTRY => 0,
    2002. 

  2002.     GROUPS => { 0 => 'MakerNotes', 2 => 'Image' },
    2003. 

  2003.     0 => { #9
    2004. 

  2004.         Name => 'FocalType',
    2005. 

  2005.         RawConv => '$val ? $val : undef', # don't use if value is zero
    2006. 

  2006.         PrintConv => {
    2007. 

  2007.             1 => 'Fixed',
    2008. 

  2008.             2 => 'Zoom',
    2009. 

  2009.         },
    2010. 

  2010.     },
    2011. 

  2011.     1 => {
    2012. 

  2012.         Name => 'FocalLength',
    2013. 

  2013.         # the EXIF FocalLength is more reliable, so set this priority to zero
    2014. 

  2014.         Priority => 0,
    2015. 

  2015.         RawConv => '$val ? $val : undef', # don't use if value is zero
    2016. 

  2016.         RawConvInv => q{
    2017. 

  2017.             my $focalUnits = $$self{FocalUnits};
    2018. 

  2018.             unless ($focalUnits) {
    2019. 

  2019.                 $focalUnits = 1;
    2020. 

  2020.                 # (this happens when writing FocalLength to CRW images)
    2021. 

  2021.                 $self->Warn("FocalUnits not available for FocalLength conversion (1 assumed)");
    2022. 

  2022.             }
    2023. 

  2023.             return $val * $focalUnits;
    2024. 

  2024.         },
    2025. 

  2025.         ValueConv => '$val / ($$self{FocalUnits} || 1)',
    2026. 

  2026.         ValueConvInv => '$val',
    2027. 

  2027.         PrintConv => '"$val mm"',
    2028. 

  2028.         PrintConvInv => '$val=~s/\s*mm//;$val',
    2029. 

  2029.     },
    2030. 

  2030.     2 => [ #4
    2031. 

  2031.         {
    2032. 

  2032.             Name => 'FocalPlaneXSize',
    2033. 

  2033.             Notes => q{
    2034. 

  2034.                 these focal plane sizes are only valid for some models, and are affected by
    2035. 

  2035.                 digital zoom if applied
    2036. 

  2036.             },
    2037. 

  2037.             # this conversion is valid only for PowerShot models and these EOS models:
    2038. 

  2038.             # D30, D60, 1D, 1DS, 5D, 10D, 20D, 30D, 300D, 350D, and 400D
    2039. 

  2039.             Condition => q{
    2040. 

  2040.                 $$self{Model} !~ /EOS/ or
    2041. 

  2041.                 $$self{Model} =~ /\b(1DS?|5D|D30|D60|10D|20D|30D|K236)$/ or
    2042. 

  2042.                 $$self{Model} =~ /\b((300D|350D|400D) DIGITAL|REBEL( XTi?)?|Kiss Digital( [NX])?)$/
    2043. 

  2043.             },
    2044. 

  2044.             # focal plane image dimensions in 1/1000 inch -- convert to mm
    2045. 

  2045.             RawConv => '$val < 40 ? undef : $val',  # must be reasonable
    2046. 

  2046.             ValueConv => '$val * 25.4 / 1000',
    2047. 

  2047.             ValueConvInv => 'int($val * 1000 / 25.4 + 0.5)',
    2048. 

  2048.             PrintConv => 'sprintf("%.2f mm",$val)',
    2049. 

  2049.             PrintConvInv => '$val=~s/\s*mm$//;$val',
    2050. 

  2050.         },{
    2051. 

  2051.             Name => 'FocalPlaneXUnknown',
    2052. 

  2052.             Unknown => 1,
    2053. 

  2053.         },
    2054. 

  2054.     ],
    2055. 

  2055.     3 => [ #4
    2056. 

  2056.         {
    2057. 

  2057.             Name => 'FocalPlaneYSize',
    2058. 

  2058.             Condition => q{
    2059. 

  2059.                 $$self{Model} !~ /EOS/ or
    2060. 

  2060.                 $$self{Model} =~ /\b(1DS?|5D|D30|D60|10D|20D|30D|K236)$/ or
    2061. 

  2061.                 $$self{Model} =~ /\b((300D|350D|400D) DIGITAL|REBEL( XTi?)?|Kiss Digital( [NX])?)$/
    2062. 

  2062.             },
    2063. 

  2063.             RawConv => '$val < 40 ? undef : $val',  # must be reasonable
    2064. 

  2064.             ValueConv => '$val * 25.4 / 1000',
    2065. 

  2065.             ValueConvInv => 'int($val * 1000 / 25.4 + 0.5)',
    2066. 

  2066.             PrintConv => 'sprintf("%.2f mm",$val)',
    2067. 

  2067.             PrintConvInv => '$val=~s/\s*mm$//;$val',
    2068. 

  2068.         },{
    2069. 

  2069.             Name => 'FocalPlaneYUnknown',
    2070. 

  2070.             Unknown => 1,
    2071. 

  2071.         },
    2072. 

  2072.     ],
    2073. 

  2073. );
    2074. 

  2074. 

  2075. # Canon shot information (MakerNotes tag 0x04)
    2076. 

  2076. # BinaryData (keys are indices into the int16s array)
    2077. 

  2077. %Image::ExifTool::Canon::ShotInfo = (
    2078. 

  2078.     %binaryDataAttrs,
    2079. 

  2079.     FORMAT => 'int16s',
    2080. 

  2080.     FIRST_ENTRY => 1,
    2081. 

  2081.     DATAMEMBER => [ 19 ],
    2082. 

  2082.     GROUPS => { 0 => 'MakerNotes', 2 => 'Image' },
    2083. 

  2083.     1 => { #PH
    2084. 

  2084.         Name => 'AutoISO',
    2085. 

  2085.         Notes => 'actual ISO used = BaseISO * AutoISO / 100',
    2086. 

  2086.         ValueConv => 'exp($val/32*log(2))*100',
    2087. 

  2087.         ValueConvInv => '32*log($val/100)/log(2)',
    2088. 

  2088.         PrintConv => 'sprintf("%.0f",$val)',
    2089. 

  2089.         PrintConvInv => '$val',
    2090. 

  2090.     },
    2091. 

  2091.     2 => {
    2092. 

  2092.         Name => 'BaseISO',
    2093. 

  2093.         Priority => 0,
    2094. 

  2094.         RawConv => '$val ? $val : undef',
    2095. 

  2095.         ValueConv => 'exp($val/32*log(2))*100/32',
    2096. 

  2096.         ValueConvInv => '32*log($val*32/100)/log(2)',
    2097. 

  2097.         PrintConv => 'sprintf("%.0f",$val)',
    2098. 

  2098.         PrintConvInv => '$val',
    2099. 

  2099.     },
    2100. 

  2100.     3 => { #9/PH
    2101. 

  2101.         Name => 'MeasuredEV',
    2102. 

  2102.         Notes => q{
    2103. 

  2103.             this is the Canon name for what could better be called MeasuredLV, and
    2104. 

  2104.             should be close to the calculated LightValue for a proper exposure with most
    2105. 

  2105.             models
    2106. 

  2106.         },
    2107. 

  2107.         # empirical offset of +5 seems to be good for EOS models, but maybe
    2108. 

  2108.         # the offset should be less by up to 1 EV for some PowerShot models
    2109. 

  2109.         ValueConv => '$val / 32 + 5',
    2110. 

  2110.         ValueConvInv => '($val - 5) * 32',
    2111. 

  2111.         PrintConv => 'sprintf("%.2f",$val)',
    2112. 

  2112.         PrintConvInv => '$val',
    2113. 

  2113.     },
    2114. 

  2114.     4 => { #2, 9
    2115. 

  2115.         Name => 'TargetAperture',
    2116. 

  2116.         RawConv => '$val > 0 ? $val : undef',
    2117. 

  2117.         ValueConv => 'exp(Image::ExifTool::Canon::CanonEv($val)*log(2)/2)',
    2118. 

  2118.         ValueConvInv => 'Image::ExifTool::Canon::CanonEvInv(log($val)*2/log(2))',
    2119. 

  2119.         PrintConv => 'sprintf("%.2g",$val)',
    2120. 

  2120.         PrintConvInv => '$val',
    2121. 

  2121.     },
    2122. 

  2122.     5 => { #2
    2123. 

  2123.         Name => 'TargetExposureTime',
    2124. 

  2124.         # ignore obviously bad values (also, -32768 may be used for n/a)
    2125. 

  2125.         # (note that a few models always write 0: DC211, and video models)
    2126. 

  2126.         RawConv => '($val > -1000 and ($val or $$self{Model}=~/(EOS|PowerShot|IXUS|IXY)/))? $val : undef',
    2127. 

  2127.         ValueConv => 'exp(-Image::ExifTool::Canon::CanonEv($val)*log(2))',
    2128. 

  2128.         ValueConvInv => 'Image::ExifTool::Canon::CanonEvInv(-log($val)/log(2))',
    2129. 

  2129.         PrintConv => 'Image::ExifTool::Exif::PrintExposureTime($val)',
    2130. 

  2130.         PrintConvInv => 'Image::ExifTool::Exif::ConvertFraction($val)',
    2131. 

  2131.     },
    2132. 

  2132.     6 => {
    2133. 

  2133.         Name => 'ExposureCompensation',
    2134. 

  2134.         ValueConv => 'Image::ExifTool::Canon::CanonEv($val)',
    2135. 

  2135.         ValueConvInv => 'Image::ExifTool::Canon::CanonEvInv($val)',
    2136. 

  2136.         PrintConv => 'Image::ExifTool::Exif::PrintFraction($val)',
    2137. 

  2137.         PrintConvInv => 'Image::ExifTool::Exif::ConvertFraction($val)',
    2138. 

  2138.     },
    2139. 

  2139.     7 => {
    2140. 

  2140.         Name => 'WhiteBalance',
    2141. 

  2141.         PrintConv => \%canonWhiteBalance,
    2142. 

  2142.         SeparateTable => 1,
    2143. 

  2143.     },
    2144. 

  2144.     8 => { #PH
    2145. 

  2145.         Name => 'SlowShutter',
    2146. 

  2146.         PrintConv => {
    2147. 

  2147.             -1 => 'n/a',
    2148. 

  2148.             0 => 'Off',
    2149. 

  2149.             1 => 'Night Scene',
    2150. 

  2150.             2 => 'On',
    2151. 

  2151.             3 => 'None',
    2152. 

  2152.         },
    2153. 

  2153.     },
    2154. 

  2154.     9 => {
    2155. 

  2155.         Name => 'SequenceNumber',
    2156. 

  2156.         Description => 'Shot Number In Continuous Burst',
    2157. 

  2157.     },
    2158. 

  2158.     10 => { #PH/17
    2159. 

  2159.         Name => 'OpticalZoomCode',
    2160. 

  2160.         Groups => { 2 => 'Camera' },
    2161. 

  2161.         Notes => 'for many PowerShot models, a this is 0-6 for wide-tele zoom',
    2162. 

  2162.         # (for many models, 0-6 represent 0-100% zoom, but it is always 8 for
    2163. 

  2163.         #  EOS models, and I have seen values of 16,20,28,32 and 39 too...)
    2164. 

  2164.         # - set to 8 for "n/a" by Canon software (ref 22)
    2165. 

  2165.         PrintConv => '$val == 8 ? "n/a" : $val',
    2166. 

  2166.         PrintConvInv => '$val =~ /[a-z]/i ? 8 : $val',
    2167. 

  2167.     },
    2168. 

  2168.     # 11 - (8 for all EOS samples, [0,8] for other models - PH)
    2169. 

  2169.     12 => { #37
    2170. 

  2170.         Name => 'CameraTemperature',
    2171. 

  2171.         Condition => '$$self{Model} =~ /EOS/ and $$self{Model} !~ /EOS-1DS?$/',
    2172. 

  2172.         Groups => { 2 => 'Camera' },
    2173. 

  2173.         Notes => 'newer EOS models only',
    2174. 

  2174.         # usually zero if not valid for an EOS model (exceptions: 1D, 1DS)
    2175. 

  2175.         RawConv => '$val ? $val : undef',
    2176. 

  2176.         ValueConv => '$val - 128',
    2177. 

  2177.         ValueConvInv => '$val + 128',
    2178. 

  2178.         PrintConv => '"$val C"',
    2179. 

  2179.         PrintConvInv => '$val=~s/ ?C//; $val',
    2180. 

  2180.     },
    2181. 

  2181.     13 => { #PH
    2182. 

  2182.         Name => 'FlashGuideNumber',
    2183. 

  2183.         RawConv => '$val==-1 ? undef : $val',
    2184. 

  2184.         ValueConv => '$val / 32',
    2185. 

  2185.         ValueConvInv => '$val * 32',
    2186. 

  2186.     },
    2187. 

  2187.     # AF points for Ixus and IxusV cameras - 02/17/04 M. Rommel (also D30/D60 - PH)
    2188. 

  2188.     14 => { #2
    2189. 

  2189.         Name => 'AFPointsInFocus',
    2190. 

  2190.         Notes => 'used by D30, D60 and some PowerShot/Ixus models',
    2191. 

  2191.         Groups => { 2 => 'Camera' },
    2192. 

  2192.         Flags => 'PrintHex',
    2193. 

  2193.         RawConv => '$val==0 ? undef : $val',
    2194. 

  2194.         PrintConvColumns => 2,
    2195. 

  2195.         PrintConv => {
    2196. 

  2196.             0x3000 => 'None (MF)',
    2197. 

  2197.             0x3001 => 'Right',
    2198. 

  2198.             0x3002 => 'Center',
    2199. 

  2199.             0x3003 => 'Center+Right',
    2200. 

  2200.             0x3004 => 'Left',
    2201. 

  2201.             0x3005 => 'Left+Right',
    2202. 

  2202.             0x3006 => 'Left+Center',
    2203. 

  2203.             0x3007 => 'All',
    2204. 

  2204.         },
    2205. 

  2205.     },
    2206. 

  2206.     15 => {
    2207. 

  2207.         Name => 'FlashExposureComp',
    2208. 

  2208.         Description => 'Flash Exposure Compensation',
    2209. 

  2209.         ValueConv => 'Image::ExifTool::Canon::CanonEv($val)',
    2210. 

  2210.         ValueConvInv => 'Image::ExifTool::Canon::CanonEvInv($val)',
    2211. 

  2211.         PrintConv => 'Image::ExifTool::Exif::PrintFraction($val)',
    2212. 

  2212.         PrintConvInv => 'Image::ExifTool::Exif::ConvertFraction($val)',
    2213. 

  2213.     },
    2214. 

  2214.     16 => {
    2215. 

  2215.         Name => 'AutoExposureBracketing',
    2216. 

  2216.         PrintConv => {
    2217. 

  2217.             -1 => 'On',
    2218. 

  2218.             0 => 'Off',
    2219. 

  2219.             1 => 'On (shot 1)',
    2220. 

  2220.             2 => 'On (shot 2)',
    2221. 

  2221.             3 => 'On (shot 3)',
    2222. 

  2222.         },
    2223. 

  2223.     },
    2224. 

  2224.     17 => {
    2225. 

  2225.         Name => 'AEBBracketValue',
    2226. 

  2226.         ValueConv => 'Image::ExifTool::Canon::CanonEv($val)',
    2227. 

  2227.         ValueConvInv => 'Image::ExifTool::Canon::CanonEvInv($val)',
    2228. 

  2228.         PrintConv => 'Image::ExifTool::Exif::PrintFraction($val)',
    2229. 

  2229.         PrintConvInv => 'Image::ExifTool::Exif::ConvertFraction($val)',
    2230. 

  2230.     },
    2231. 

  2231.     18 => { #22
    2232. 

  2232.         Name => 'ControlMode',
    2233. 

  2233.         PrintConv => {
    2234. 

  2234.             0 => 'n/a',
    2235. 

  2235.             1 => 'Camera Local Control',
    2236. 

  2236.             3 => 'Computer Remote Control',
    2237. 

  2237.         },
    2238. 

  2238.     },
    2239. 

  2239.     19 => {
    2240. 

  2240.         Name => 'FocusDistanceUpper',
    2241. 

  2241.         DataMember => 'FocusDistanceUpper',
    2242. 

  2242.         Format => 'int16u',
    2243. 

  2243.         Notes => 'FocusDistance tags are only extracted if FocusDistanceUpper is non-zero',
    2244. 

  2244.         RawConv => '($$self{FocusDistanceUpper} = $val) || undef',
    2245. 

  2245.         ValueConv => '$val / 100',
    2246. 

  2246.         ValueConvInv => '$val * 100',
    2247. 

  2247.         PrintConv => '$val > 655.345 ? "inf" : "$val m"',
    2248. 

  2248.         PrintConvInv => '$val =~ s/ ?m$//; IsFloat($val) ? $val : 655.35',
    2249. 

  2249.     },
    2250. 

  2250.     20 => {
    2251. 

  2251.         Name => 'FocusDistanceLower', # (seems to be the upper distance for the 400D)
    2252. 

  2252.         Condition => '$$self{FocusDistanceUpper}',
    2253. 

  2253.         Format => 'int16u',
    2254. 

  2254.         ValueConv => '$val / 100',
    2255. 

  2255.         ValueConvInv => '$val * 100',
    2256. 

  2256.         PrintConv => '$val > 655.345 ? "inf" : "$val m"',
    2257. 

  2257.         PrintConvInv => '$val =~ s/ ?m$//; IsFloat($val) ? $val : 655.35',
    2258. 

  2258.     },
    2259. 

  2259.     21 => {
    2260. 

  2260.         Name => 'FNumber',
    2261. 

  2261.         Priority => 0,
    2262. 

  2262.         RawConv => '$val ? $val : undef',
    2263. 

  2263.         # approximate big translation table by simple calculation - PH
    2264. 

  2264.         ValueConv => 'exp(Image::ExifTool::Canon::CanonEv($val)*log(2)/2)',
    2265. 

  2265.         ValueConvInv => 'Image::ExifTool::Canon::CanonEvInv(log($val)*2/log(2))',
    2266. 

  2266.         PrintConv => 'sprintf("%.2g",$val)',
    2267. 

  2267.         PrintConvInv => '$val',
    2268. 

  2268.     },
    2269. 

  2269.     22 => [
    2270. 

  2270.         {
    2271. 

  2271.             Name => 'ExposureTime',
    2272. 

  2272.             # encoding is different for 20D and 350D (darn!)
    2273. 

  2273.             # (but note that encoding is the same for TargetExposureTime - PH)
    2274. 

  2274.             Condition => '$$self{Model} =~ /\b(20D|350D|REBEL XT|Kiss Digital N)\b/',
    2275. 

  2275.             Priority => 0,
    2276. 

  2276.             # many models write 0 here in JPEG images (even though 0 is the
    2277. 

  2277.             # value for an exposure time of 1 sec), but apparently a value of 0
    2278. 

  2278.             # is valid in a CRW image (=1s, D60 sample)
    2279. 

  2279.             RawConv => '($val or $$self{FILE_TYPE} eq "CRW") ? $val : undef',
    2280. 

  2280.             # approximate big translation table by simple calculation - PH
    2281. 

  2281.             ValueConv => 'exp(-Image::ExifTool::Canon::CanonEv($val)*log(2))*1000/32',
    2282. 

  2282.             ValueConvInv => 'Image::ExifTool::Canon::CanonEvInv(-log($val*32/1000)/log(2))',
    2283. 

  2283.             PrintConv => 'Image::ExifTool::Exif::PrintExposureTime($val)',
    2284. 

  2284.             PrintConvInv => 'Image::ExifTool::Exif::ConvertFraction($val)',
    2285. 

  2285.         },
    2286. 

  2286.         {
    2287. 

  2287.             Name => 'ExposureTime',
    2288. 

  2288.             Priority => 0,
    2289. 

  2289.             # many models write 0 here in JPEG images (even though 0 is the
    2290. 

  2290.             # value for an exposure time of 1 sec), but apparently a value of 0
    2291. 

  2291.             # is valid in a CRW image (=1s, D60 sample)
    2292. 

  2292.             RawConv => '($val or $$self{FILE_TYPE} eq "CRW") ? $val : undef',
    2293. 

  2293.             # approximate big translation table by simple calculation - PH
    2294. 

  2294.             ValueConv => 'exp(-Image::ExifTool::Canon::CanonEv($val)*log(2))',
    2295. 

  2295.             ValueConvInv => 'Image::ExifTool::Canon::CanonEvInv(-log($val)/log(2))',
    2296. 

  2296.             PrintConv => 'Image::ExifTool::Exif::PrintExposureTime($val)',
    2297. 

  2297.             PrintConvInv => 'Image::ExifTool::Exif::ConvertFraction($val)',
    2298. 

  2298.         },
    2299. 

  2299.     ],
    2300. 

  2300.     23 => { #37
    2301. 

  2301.         Name => 'MeasuredEV2',
    2302. 

  2302.         Description => 'Measured EV 2',
    2303. 

  2303.         RawConv => '$val ? $val : undef',
    2304. 

  2304.         ValueConv => '$val / 8 - 6',
    2305. 

  2305.         ValueConvInv => 'int(($val + 6) * 8 + 0.5)',
    2306. 

  2306.     },
    2307. 

  2307.     24 => {
    2308. 

  2308.         Name => 'BulbDuration',
    2309. 

  2309.         ValueConv => '$val / 10',
    2310. 

  2310.         ValueConvInv => '$val * 10',
    2311. 

  2311.     },
    2312. 

  2312.     # 25 - (usually 0, but 1 for 2s timer?, 19 for small AVI, 14 for large
    2313. 

  2313.     #       AVI, and -6 and -10 for shots 1 and 2 with stitch assist - PH)
    2314. 

  2314.     26 => { #15
    2315. 

  2315.         Name => 'CameraType',
    2316. 

  2316.         Groups => { 2 => 'Camera' },
    2317. 

  2317.         PrintConv => {
    2318. 

  2318.             0 => 'n/a',
    2319. 

  2319.             248 => 'EOS High-end',
    2320. 

  2320.             250 => 'Compact',
    2321. 

  2321.             252 => 'EOS Mid-range',
    2322. 

  2322.             255 => 'DV Camera', #PH
    2323. 

  2323.         },
    2324. 

  2324.     },
    2325. 

  2325.     27 => {
    2326. 

  2326.         Name => 'AutoRotate',
    2327. 

  2327.         RawConv => '$val >= 0 ? $val : undef',
    2328. 

  2328.         PrintConv => {
    2329. 

  2329.            -1 => 'n/a', # (set to -1 when rotated by Canon software)
    2330. 

  2330.             0 => 'None',
    2331. 

  2331.             1 => 'Rotate 90 CW',
    2332. 

  2332.             2 => 'Rotate 180',
    2333. 

  2333.             3 => 'Rotate 270 CW',
    2334. 

  2334.         },
    2335. 

  2335.     },
    2336. 

  2336.     28 => { #15
    2337. 

  2337.         Name => 'NDFilter',
    2338. 

  2338.         PrintConv => { -1 => 'n/a', 0 => 'Off', 1 => 'On' },
    2339. 

  2339.     },
    2340. 

  2340.     29 => {
    2341. 

  2341.         Name => 'SelfTimer2',
    2342. 

  2342.         RawConv => '$val >= 0 ? $val : undef',
    2343. 

  2343.         ValueConv => '$val / 10',
    2344. 

  2344.         ValueConvInv => '$val * 10',
    2345. 

  2345.     },
    2346. 

  2346.     33 => { #PH (A570IS)
    2347. 

  2347.         Name => 'FlashOutput',
    2348. 

  2348.         RawConv => '($$self{Model}=~/(PowerShot|IXUS|IXY)/ or $val) ? $val : undef',
    2349. 

  2349.         Notes => q{
    2350. 

  2350.             used only for PowerShot models, this has a maximum value of 500 for models
    2351. 

  2351.             like the A570IS
    2352. 

  2352.         },
    2353. 

  2353.     },
    2354. 

  2354. );
    2355. 

  2355. 

  2356. # Canon panorama information (MakerNotes tag 0x05)
    2357. 

  2357. %Image::ExifTool::Canon::Panorama = (
    2358. 

  2358.     %binaryDataAttrs,
    2359. 

  2359.     FORMAT => 'int16s',
    2360. 

  2360.     FIRST_ENTRY => 0,
    2361. 

  2361.     GROUPS => { 0 => 'MakerNotes', 2 => 'Image' },
    2362. 

  2362.     # 0 - values: always 1
    2363. 

  2363.     # 1 - values: 0,256,512(3 sequential L->R images); 0,-256(2 R->L images)
    2364. 

  2364.     2 => 'PanoramaFrameNumber', #(some models this is always 0)
    2365. 

  2365.     # 3 - values: 160(SX10IS,A570IS); 871(S30)
    2366. 

  2366.     # 4 - values: always 0
    2367. 

  2367.     5 => {
    2368. 

  2368.         Name => 'PanoramaDirection',
    2369. 

  2369.         PrintConv => {
    2370. 

  2370.             0 => 'Left to Right',
    2371. 

  2371.             1 => 'Right to Left',
    2372. 

  2372.             2 => 'Bottom to Top',
    2373. 

  2373.             3 => 'Top to Bottom',
    2374. 

  2374.             4 => '2x2 Matrix (Clockwise)',
    2375. 

  2375.         },
    2376. 

  2376.      },
    2377. 

  2377. );
    2378. 

  2378. 

  2379. # D30 color information (MakerNotes tag 0x0a)
    2380. 

  2380. %Image::ExifTool::Canon::UnknownD30 = (
    2381. 

  2381.     %binaryDataAttrs,
    2382. 

  2382.     FORMAT => 'int16s',
    2383. 

  2383.     FIRST_ENTRY => 1,
    2384. 

  2384.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    2385. 

  2385. );
    2386. 

  2386. 

  2387. #..............................................................................
    2388. 

  2388. # common CameraInfo tag definitions
    2389. 

  2389. my %ciFNumber = (
    2390. 

  2390.     Name => 'FNumber',
    2391. 

  2391.     Format => 'int8u',
    2392. 

  2392.     Groups => { 2 => 'Image' },
    2393. 

  2393.     RawConv => '$val ? $val : undef',
    2394. 

  2394.     ValueConv => 'exp(($val-8)/16*log(2))',
    2395. 

  2395.     ValueConvInv => 'log($val)*16/log(2)+8',
    2396. 

  2396.     PrintConv => 'sprintf("%.2g",$val)',
    2397. 

  2397.     PrintConvInv => '$val',
    2398. 

  2398. );
    2399. 

  2399. my %ciExposureTime = (
    2400. 

  2400.     Name => 'ExposureTime',
    2401. 

  2401.     Format => 'int8u',
    2402. 

  2402.     Groups => { 2 => 'Image' },
    2403. 

  2403.     RawConv => '$val ? $val : undef',
    2404. 

  2404.     ValueConv => 'exp(4*log(2)*(1-Image::ExifTool::Canon::CanonEv($val-24)))',
    2405. 

  2405.     ValueConvInv => 'Image::ExifTool::Canon::CanonEvInv(1-log($val)/(4*log(2)))+24',
    2406. 

  2406.     PrintConv => 'Image::ExifTool::Exif::PrintExposureTime($val)',
    2407. 

  2407.     PrintConvInv => 'Image::ExifTool::Exif::ConvertFraction($val)',
    2408. 

  2408. );
    2409. 

  2409. my %ciISO = (
    2410. 

  2410.     Name => 'ISO',
    2411. 

  2411.     Format => 'int8u',
    2412. 

  2412.     Groups => { 2 => 'Image' },
    2413. 

  2413.     ValueConv => '100*exp(($val/8-9)*log(2))',
    2414. 

  2414.     ValueConvInv => '(log($val/100)/log(2)+9)*8',
    2415. 

  2415.     PrintConv => 'sprintf("%.0f",$val)',
    2416. 

  2416.     PrintConvInv => '$val',
    2417. 

  2417. );
    2418. 

  2418. my %ciCameraTemperature = (
    2419. 

  2419.     Name => 'CameraTemperature',
    2420. 

  2420.     Format => 'int8u',
    2421. 

  2421.     ValueConv => '$val - 128',
    2422. 

  2422.     ValueConvInv => '$val + 128',
    2423. 

  2423.     PrintConv => '"$val C"',
    2424. 

  2424.     PrintConvInv => '$val=~s/ ?C//; $val',
    2425. 

  2425. );
    2426. 

  2426. my %ciMacroMagnification = (
    2427. 

  2427.     Name => 'MacroMagnification',
    2428. 

  2428.     Notes => 'currently decoded only for the MP-E 65mm f/2.8 1-5x Macro Photo',
    2429. 

  2429.     Condition => '$$self{LensType} and $$self{LensType} == 124',
    2430. 

  2430.     # 75=1x, 44=5x, log relationship
    2431. 

  2431.     ValueConv => 'exp((75-$val) * log(2) * 3 / 40)',
    2432. 

  2432.     ValueConvInv => '$val > 0 ? 75 - log($val) / log(2) * 40 / 3 : undef',
    2433. 

  2433.     PrintConv => 'sprintf("%.1fx",$val)',
    2434. 

  2434.     PrintConvInv => '$val=~s/\s*x//; $val',
    2435. 

  2435. );
    2436. 

  2436. my %ciFocalLength = (
    2437. 

  2437.     Name => 'FocalLength',
    2438. 

  2438.     Format => 'int16uRev', # (just to make things confusing, the focal lengths are big-endian)
    2439. 

  2439.     # ignore if zero
    2440. 

  2440.     RawConv => '$val ? $val : undef',
    2441. 

  2441.     PrintConv => '"$val mm"',
    2442. 

  2442.     PrintConvInv => '$val=~s/\s*mm//;$val',
    2443. 

  2443. );
    2444. 

  2444. my %ciShortFocal = (
    2445. 

  2445.     Name => 'ShortFocal',
    2446. 

  2446.     Format => 'int16uRev', # byte order is big-endian
    2447. 

  2447.     PrintConv => '"$val mm"',
    2448. 

  2448.     PrintConvInv => '$val=~s/\s*mm//;$val',
    2449. 

  2449. );
    2450. 

  2450. my %ciLongFocal = (
    2451. 

  2451.     Name => 'LongFocal',
    2452. 

  2452.     Format => 'int16uRev', # byte order is big-endian
    2453. 

  2453.     PrintConv => '"$val mm"',
    2454. 

  2454.     PrintConvInv => '$val=~s/\s*mm//;$val',
    2455. 

  2455. );
    2456. 

  2456. 

  2457. #..............................................................................
    2458. 

  2458. # Camera information for 1D and 1DS (MakerNotes tag 0x0d)
    2459. 

  2459. # (ref 15 unless otherwise noted)
    2460. 

  2460. %Image::ExifTool::Canon::CameraInfo1D = (
    2461. 

  2461.     %binaryDataAttrs,
    2462. 

  2462.     FORMAT => 'int8u',
    2463. 

  2463.     FIRST_ENTRY => 0,
    2464. 

  2464.     PRIORITY => 0,  # these tags are not reliable since they change with firmware version
    2465. 

  2465.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    2466. 

  2466.     NOTES => q{
    2467. 

  2467.         Information in the "CameraInfo" records is tricky to decode because the
    2468. 

  2468.         encodings are very different than in other Canon records (even sometimes
    2469. 

  2469.         switching endianness between values within a single camera), plus there is
    2470. 

  2470.         considerable variation in format from model to model. The first table below
    2471. 

  2471.         lists CameraInfo tags for the 1D and 1DS.
    2472. 

  2472.     },
    2473. 

  2473.     0x04 => { %ciExposureTime }, #9
    2474. 

  2474.     0x0a => {
    2475. 

  2475.         Name => 'FocalLength',
    2476. 

  2476.         Format => 'int16u',
    2477. 

  2477.         # ignore if zero
    2478. 

  2478.         RawConv => '$val ? $val : undef',
    2479. 

  2479.         PrintConv => '"$val mm"',
    2480. 

  2480.         PrintConvInv => '$val=~s/\s*mm//;$val',
    2481. 

  2481.     },
    2482. 

  2482.     0x0d => { #9
    2483. 

  2483.         Name => 'LensType',
    2484. 

  2484.         Format => 'int16uRev', # value is little-endian
    2485. 

  2485.         SeparateTable => 1,
    2486. 

  2486.         RawConv => '$val ? $val : undef', # don't use if value is zero
    2487. 

  2487.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    2488. 

  2488.         PrintConv => \%canonLensTypes,
    2489. 

  2489.     },
    2490. 

  2490.     0x0e => {
    2491. 

  2491.         Name => 'ShortFocal',
    2492. 

  2492.         Format => 'int16u',
    2493. 

  2493.         PrintConv => '"$val mm"',
    2494. 

  2494.         PrintConvInv => '$val=~s/\s*mm//;$val',
    2495. 

  2495.     },
    2496. 

  2496.     0x10 => {
    2497. 

  2497.         Name => 'LongFocal',
    2498. 

  2498.         Format => 'int16u',
    2499. 

  2499.         PrintConv => '"$val mm"',
    2500. 

  2500.         PrintConvInv => '$val=~s/\s*mm//;$val',
    2501. 

  2501.     },
    2502. 

  2502.     0x41 => {
    2503. 

  2503.         Name => 'SharpnessFrequency', # PatternSharpness?
    2504. 

  2504.         Condition => '$$self{Model} =~ /\b1D$/',
    2505. 

  2505.         Notes => '1D only',
    2506. 

  2506.         PrintConvColumns => 2,
    2507. 

  2507.         PrintConv => {
    2508. 

  2508.             0 => 'n/a',
    2509. 

  2509.             1 => 'Lowest',
    2510. 

  2510.             2 => 'Low',
    2511. 

  2511.             3 => 'Standard',
    2512. 

  2512.             4 => 'High',
    2513. 

  2513.             5 => 'Highest',
    2514. 

  2514.         },
    2515. 

  2515.     },
    2516. 

  2516.     0x42 => {
    2517. 

  2517.         Name => 'Sharpness',
    2518. 

  2518.         Format => 'int8s',
    2519. 

  2519.         Condition => '$$self{Model} =~ /\b1D$/',
    2520. 

  2520.         Notes => '1D only',
    2521. 

  2521.     },
    2522. 

  2522.     0x44 => {
    2523. 

  2523.         Name => 'WhiteBalance',
    2524. 

  2524.         Condition => '$$self{Model} =~ /\b1D$/',
    2525. 

  2525.         Notes => '1D only',
    2526. 

  2526.         SeparateTable => 1,
    2527. 

  2527.         PrintConv => \%canonWhiteBalance,
    2528. 

  2528.     },
    2529. 

  2529.     0x47 => {
    2530. 

  2530.         Name => 'SharpnessFrequency', # PatternSharpness?
    2531. 

  2531.         Condition => '$$self{Model} =~ /\b1DS$/',
    2532. 

  2532.         Notes => '1DS only',
    2533. 

  2533.         PrintConvColumns => 2,
    2534. 

  2534.         PrintConv => {
    2535. 

  2535.             0 => 'n/a',
    2536. 

  2536.             1 => 'Lowest',
    2537. 

  2537.             2 => 'Low',
    2538. 

  2538.             3 => 'Standard',
    2539. 

  2539.             4 => 'High',
    2540. 

  2540.             5 => 'Highest',
    2541. 

  2541.         },
    2542. 

  2542.     },
    2543. 

  2543.     0x48 => [
    2544. 

  2544.         {
    2545. 

  2545.             Name => 'ColorTemperature',
    2546. 

  2546.             Format => 'int16u',
    2547. 

  2547.             Condition => '$$self{Model} =~ /\b1D$/',
    2548. 

  2548.             Notes => '1D only',
    2549. 

  2549.         },
    2550. 

  2550.         {
    2551. 

  2551.             Name => 'Sharpness',
    2552. 

  2552.             Format => 'int8s',
    2553. 

  2553.             Condition => '$$self{Model} =~ /\b1DS$/',
    2554. 

  2554.             Notes => '1DS only',
    2555. 

  2555.         },
    2556. 

  2556.     ],
    2557. 

  2557.     0x4a => {
    2558. 

  2558.         Name => 'WhiteBalance',
    2559. 

  2559.         Condition => '$$self{Model} =~ /\b1DS$/',
    2560. 

  2560.         Notes => '1DS only',
    2561. 

  2561.         SeparateTable => 1,
    2562. 

  2562.         PrintConv => \%canonWhiteBalance,
    2563. 

  2563.     },
    2564. 

  2564.     0x4b => {
    2565. 

  2565.         Name => 'PictureStyle',
    2566. 

  2566.         Condition => '$$self{Model} =~ /\b1D$/',
    2567. 

  2567.         Notes => "1D only, called 'Color Matrix' in owner's manual",
    2568. 

  2568.         Flags => ['PrintHex','SeparateTable'],
    2569. 

  2569.         PrintConv => \%pictureStyles,
    2570. 

  2570.     },
    2571. 

  2571.     0x4e => {
    2572. 

  2572.         Name => 'ColorTemperature',
    2573. 

  2573.         Format => 'int16u',
    2574. 

  2574.         Condition => '$$self{Model} =~ /\b1DS$/',
    2575. 

  2575.         Notes => '1DS only',
    2576. 

  2576.     },
    2577. 

  2577.     0x51 => {
    2578. 

  2578.         Name => 'PictureStyle',
    2579. 

  2579.         Condition => '$$self{Model} =~ /\b1DS$/',
    2580. 

  2580.         Notes => '1DS only',
    2581. 

  2581.         Flags => ['PrintHex','SeparateTable'],
    2582. 

  2582.         PrintConv => \%pictureStyles,
    2583. 

  2583.     },
    2584. 

  2584. );
    2585. 

  2585. 

  2586. # Camera information for 1DmkII and 1DSmkII (MakerNotes tag 0x0d)
    2587. 

  2587. # (ref 15 unless otherwise noted)
    2588. 

  2588. %Image::ExifTool::Canon::CameraInfo1DmkII = (
    2589. 

  2589.     %binaryDataAttrs,
    2590. 

  2590.     FORMAT => 'int8u',
    2591. 

  2591.     FIRST_ENTRY => 0,
    2592. 

  2592.     PRIORITY => 0,
    2593. 

  2593.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    2594. 

  2594.     NOTES => 'CameraInfo tags for the 1DmkII and 1DSmkII.',
    2595. 

  2595.     0x04 => { %ciExposureTime }, #9
    2596. 

  2596.     0x09 => { %ciFocalLength }, #9
    2597. 

  2597.     0x0c => { #9
    2598. 

  2598.         Name => 'LensType',
    2599. 

  2599.         Format => 'int16uRev', # value is big-endian
    2600. 

  2600.         SeparateTable => 1,
    2601. 

  2601.         RawConv => '$val ? $val : undef', # don't use if value is zero
    2602. 

  2602.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    2603. 

  2603.         PrintConv => \%canonLensTypes,
    2604. 

  2604.     },
    2605. 

  2605.     0x11 => { %ciShortFocal }, #9
    2606. 

  2606.     0x13 => { %ciLongFocal }, #9
    2607. 

  2607.     0x2d => { #9
    2608. 

  2608.         Name => 'FocalType',
    2609. 

  2609.         PrintConv => {
    2610. 

  2610.            0 => 'Fixed',
    2611. 

  2611.            2 => 'Zoom',
    2612. 

  2612.         },
    2613. 

  2613.     },
    2614. 

  2614.     0x36 => {
    2615. 

  2615.         Name => 'WhiteBalance',
    2616. 

  2616.         SeparateTable => 1,
    2617. 

  2617.         PrintConv => \%canonWhiteBalance,
    2618. 

  2618.     },
    2619. 

  2619.     0x37 => {
    2620. 

  2620.         Name => 'ColorTemperature',
    2621. 

  2621.         Format => 'int16uRev',
    2622. 

  2622.     },
    2623. 

  2623.     0x39 => {
    2624. 

  2624.         Name => 'CanonImageSize',
    2625. 

  2625.         Format => 'int16u',
    2626. 

  2626.         PrintConvColumns => 2,
    2627. 

  2627.         PrintConv => \%canonImageSize,
    2628. 

  2628.     },
    2629. 

  2629.     0x66 => {
    2630. 

  2630.         Name => 'JPEGQuality',
    2631. 

  2631.         Notes => 'a number from 1 to 10',
    2632. 

  2632.     },
    2633. 

  2633.     0x6c => { #12
    2634. 

  2634.         Name => 'PictureStyle',
    2635. 

  2635.         Flags => ['PrintHex','SeparateTable'],
    2636. 

  2636.         PrintConv => \%pictureStyles,
    2637. 

  2637.     },
    2638. 

  2638.     0x6e => {
    2639. 

  2639.         Name => 'Saturation',
    2640. 

  2640.         Format => 'int8s',
    2641. 

  2641.         %Image::ExifTool::Exif::printParameter,
    2642. 

  2642.     },
    2643. 

  2643.     0x6f => {
    2644. 

  2644.         Name => 'ColorTone',
    2645. 

  2645.         Format => 'int8s',
    2646. 

  2646.         %Image::ExifTool::Exif::printParameter,
    2647. 

  2647.     },
    2648. 

  2648.     0x72 => {
    2649. 

  2649.         Name => 'Sharpness',
    2650. 

  2650.         Format => 'int8s',
    2651. 

  2651.     },
    2652. 

  2652.     0x73 => {
    2653. 

  2653.         Name => 'Contrast',
    2654. 

  2654.         Format => 'int8s',
    2655. 

  2655.         %Image::ExifTool::Exif::printParameter,
    2656. 

  2656.     },
    2657. 

  2657.     0x75 => {
    2658. 

  2658.         Name => 'ISO',
    2659. 

  2659.         Format => 'string[5]',
    2660. 

  2660.     },
    2661. 

  2661. );
    2662. 

  2662. 

  2663. # Camera information for the 1DmkIIN (MakerNotes tag 0x0d)
    2664. 

  2664. # (ref 9 unless otherwise noted)
    2665. 

  2665. %Image::ExifTool::Canon::CameraInfo1DmkIIN = (
    2666. 

  2666.     %binaryDataAttrs,
    2667. 

  2667.     FORMAT => 'int8u',
    2668. 

  2668.     FIRST_ENTRY => 0,
    2669. 

  2669.     PRIORITY => 0,
    2670. 

  2670.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    2671. 

  2671.     NOTES => 'CameraInfo tags for the 1DmkIIN.',
    2672. 

  2672.     0x04 => { %ciExposureTime },
    2673. 

  2673.     0x09 => { %ciFocalLength },
    2674. 

  2674.     0x0c => {
    2675. 

  2675.         Name => 'LensType',
    2676. 

  2676.         Format => 'int16uRev', # value is big-endian
    2677. 

  2677.         SeparateTable => 1,
    2678. 

  2678.         RawConv => '$val ? $val : undef', # don't use if value is zero
    2679. 

  2679.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    2680. 

  2680.         PrintConv => \%canonLensTypes,
    2681. 

  2681.     },
    2682. 

  2682.     0x11 => { %ciShortFocal },
    2683. 

  2683.     0x13 => { %ciLongFocal },
    2684. 

  2684.     0x36 => { #15
    2685. 

  2685.         Name => 'WhiteBalance',
    2686. 

  2686.         SeparateTable => 1,
    2687. 

  2687.         PrintConv => \%canonWhiteBalance,
    2688. 

  2688.     },
    2689. 

  2689.     0x37 => { #15
    2690. 

  2690.         Name => 'ColorTemperature',
    2691. 

  2691.         Format => 'int16uRev',
    2692. 

  2692.     },
    2693. 

  2693.     0x73 => { #15
    2694. 

  2694.         Name => 'PictureStyle',
    2695. 

  2695.         Flags => ['PrintHex','SeparateTable'],
    2696. 

  2696.         PrintConv => \%pictureStyles,
    2697. 

  2697.     },
    2698. 

  2698.     0x74 => { #15
    2699. 

  2699.         Name => 'Sharpness',
    2700. 

  2700.         Format => 'int8s',
    2701. 

  2701.     },
    2702. 

  2702.     0x75 => { #15
    2703. 

  2703.         Name => 'Contrast',
    2704. 

  2704.         Format => 'int8s',
    2705. 

  2705.         %Image::ExifTool::Exif::printParameter,
    2706. 

  2706.     },
    2707. 

  2707.     0x76 => { #15
    2708. 

  2708.         Name => 'Saturation',
    2709. 

  2709.         Format => 'int8s',
    2710. 

  2710.         %Image::ExifTool::Exif::printParameter,
    2711. 

  2711.     },
    2712. 

  2712.     0x77 => { #15
    2713. 

  2713.         Name => 'ColorTone',
    2714. 

  2714.         Format => 'int8s',
    2715. 

  2715.         %Image::ExifTool::Exif::printParameter,
    2716. 

  2716.     },
    2717. 

  2717.     0x79 => { #15
    2718. 

  2718.         Name => 'ISO',
    2719. 

  2719.         Format => 'string[5]',
    2720. 

  2720.     },
    2721. 

  2721. );
    2722. 

  2722. 

  2723. # Canon camera information for 1DmkIII and 1DSmkIII (MakerNotes tag 0x0d)
    2724. 

  2724. # (ref PH unless otherwise noted)
    2725. 

  2725. %Image::ExifTool::Canon::CameraInfo1DmkIII = (
    2726. 

  2726.     %binaryDataAttrs,
    2727. 

  2727.     FORMAT => 'int8u',
    2728. 

  2728.     FIRST_ENTRY => 0,
    2729. 

  2729.     PRIORITY => 0,
    2730. 

  2730.     IS_SUBDIR => [ 0x2aa ],
    2731. 

  2731.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    2732. 

  2732.     NOTES => 'CameraInfo tags for the 1DmkIII and 1DSmkIII.',
    2733. 

  2733.     0x03 => { %ciFNumber },
    2734. 

  2734.     0x04 => { %ciExposureTime }, #9
    2735. 

  2735.     0x06 => { %ciISO },
    2736. 

  2736.     0x18 => { %ciCameraTemperature }, #36
    2737. 

  2737.     0x1b => { %ciMacroMagnification }, #(NC)
    2738. 

  2738.     0x1d => { %ciFocalLength },
    2739. 

  2739.     0x30 => {
    2740. 

  2740.         Name => 'CameraOrientation', # <-- (always 9th byte after 0xbbbb for all models - Dave Coffin)
    2741. 

  2741.         PrintConv => {
    2742. 

  2742.             0 => 'Horizontal (normal)',
    2743. 

  2743.             1 => 'Rotate 90 CW',
    2744. 

  2744.             2 => 'Rotate 270 CW',
    2745. 

  2745.         },
    2746. 

  2746.     },
    2747. 

  2747.     0x43 => { #21/24
    2748. 

  2748.         Name => 'FocusDistanceUpper',
    2749. 

  2749.         # (it looks like the focus distances are also odd-byte big-endian)
    2750. 

  2750.         %focusDistanceByteSwap,
    2751. 

  2751.     },
    2752. 

  2752.     0x45 => { #21/24
    2753. 

  2753.         Name => 'FocusDistanceLower',
    2754. 

  2754.         %focusDistanceByteSwap,
    2755. 

  2755.     },
    2756. 

  2756.     0x5e => { #15
    2757. 

  2757.         Name => 'WhiteBalance',
    2758. 

  2758.         Format => 'int16u',
    2759. 

  2759.         PrintConv => \%canonWhiteBalance,
    2760. 

  2760.         SeparateTable => 1,
    2761. 

  2761.     },
    2762. 

  2762.     0x62 => { #15
    2763. 

  2763.         Name => 'ColorTemperature',
    2764. 

  2764.         Format => 'int16u',
    2765. 

  2765.     },
    2766. 

  2766.     0x86 => {
    2767. 

  2767.         Name => 'PictureStyle',
    2768. 

  2768.         Flags => ['PrintHex','SeparateTable'],
    2769. 

  2769.         PrintConv => \%pictureStyles,
    2770. 

  2770.     },
    2771. 

  2771.     0x111 => { #15
    2772. 

  2772.         Name => 'LensType',
    2773. 

  2773.         Format => 'int16uRev', # value is big-endian
    2774. 

  2774.         SeparateTable => 1,
    2775. 

  2775.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    2776. 

  2776.         PrintConv => \%canonLensTypes,
    2777. 

  2777.     },
    2778. 

  2778.     0x113 => { %ciShortFocal },
    2779. 

  2779.     0x115 => { %ciLongFocal },
    2780. 

  2780.     0x136 => { #15
    2781. 

  2781.         Name => 'FirmwareVersion',
    2782. 

  2782.         Format => 'string[6]',
    2783. 

  2783.     },
    2784. 

  2784.     0x172 => {
    2785. 

  2785.         Name => 'FileIndex',
    2786. 

  2786.         Groups => { 2 => 'Image' },
    2787. 

  2787.         Format => 'int32u',
    2788. 

  2788.         ValueConv => '$val + 1',
    2789. 

  2789.         ValueConvInv => '$val - 1',
    2790. 

  2790.     },
    2791. 

  2791.     0x176 => {
    2792. 

  2792.         Name => 'ShutterCount',
    2793. 

  2793.         Notes => 'may be valid only for some 1DmkIII copies, even running the same firmware',
    2794. 

  2794.         Format => 'int32u',
    2795. 

  2795.         ValueConv => '$val + 1',
    2796. 

  2796.         ValueConvInv => '$val - 1',
    2797. 

  2797.     },
    2798. 

  2798.     0x17e => { #(NC)
    2799. 

  2799.         Name => 'DirectoryIndex',
    2800. 

  2800.         Groups => { 2 => 'Image' },
    2801. 

  2801.         Format => 'int32u',
    2802. 

  2802.         ValueConv => '$val - 1',
    2803. 

  2803.         ValueConvInv => '$val + 1',
    2804. 

  2804.     },
    2805. 

  2805.     0x2aa => { #48
    2806. 

  2806.         Name => 'PictureStyleInfo',
    2807. 

  2807.         SubDirectory => {
    2808. 

  2808.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    2809. 

  2809.         },
    2810. 

  2810.     },
    2811. 

  2811.     0x45a => { #29
    2812. 

  2812.         Name => 'TimeStamp1',
    2813. 

  2813.         Condition => '$$self{Model} =~ /\b1D Mark III$/',
    2814. 

  2814.         Format => 'int32u',
    2815. 

  2815.         Groups => { 2 => 'Time' },
    2816. 

  2816.         # observed in 1DmkIII firmware 5.3.1 (pre-production), 1.0.3, 1.0.8
    2817. 

  2817.         Notes => 'only valid for some versions of the 1DmkIII firmware',
    2818. 

  2818.         Shift => 'Time',
    2819. 

  2819.         RawConv => '$val ? $val : undef',
    2820. 

  2820.         ValueConv => 'ConvertUnixTime($val)',
    2821. 

  2821.         ValueConvInv => 'GetUnixTime($val)',
    2822. 

  2822.         PrintConv => '$self->ConvertDateTime($val)',
    2823. 

  2823.         PrintConvInv => '$self->InverseDateTime($val)',
    2824. 

  2824.     },
    2825. 

  2825.     0x45e => {
    2826. 

  2826.         Name => 'TimeStamp',
    2827. 

  2827.         Format => 'int32u',
    2828. 

  2828.         Groups => { 2 => 'Time' },
    2829. 

  2829.         # observed in 1DmkIII firmware 1.1.0, 1.1.3 and
    2830. 

  2830.         # 1DSmkIII firmware 1.0.0, 1.0.4, 2.1.2, 2.7.1
    2831. 

  2831.         Notes => 'valid for the 1DSmkIII and some versions of the 1DmkIII firmware',
    2832. 

  2832.         Shift => 'Time',
    2833. 

  2833.         RawConv => '$val ? $val : undef',
    2834. 

  2834.         ValueConv => 'ConvertUnixTime($val)',
    2835. 

  2835.         ValueConvInv => 'GetUnixTime($val)',
    2836. 

  2836.         PrintConv => '$self->ConvertDateTime($val)',
    2837. 

  2837.         PrintConvInv => '$self->InverseDateTime($val)',
    2838. 

  2838.     },
    2839. 

  2839. );
    2840. 

  2840. 

  2841. # Canon camera information for 1DmkIV (MakerNotes tag 0x0d) (ref PH)
    2842. 

  2842. %Image::ExifTool::Canon::CameraInfo1DmkIV = (
    2843. 

  2843.     %binaryDataAttrs,
    2844. 

  2844.     FIRST_ENTRY => 0,
    2845. 

  2845.     PRIORITY => 0,
    2846. 

  2846.     DATAMEMBER => [ 0x57 ],
    2847. 

  2847.     IS_SUBDIR => [ 0x363, 0x368 ],
    2848. 

  2848.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    2849. 

  2849.     NOTES => 'CameraInfo tags for the 1DmkIV.',
    2850. 

  2850.     0x03 => { %ciFNumber },
    2851. 

  2851.     0x04 => { %ciExposureTime },
    2852. 

  2852.     0x06 => { %ciISO },
    2853. 

  2853.     0x07 => {
    2854. 

  2854.         Name => 'HighlightTonePriority',
    2855. 

  2855.         PrintConv => { 0 => 'Off', 1 => 'On' },
    2856. 

  2856.     },
    2857. 

  2857.     0x08 => {
    2858. 

  2858.         Name => 'MeasuredEV2',
    2859. 

  2859.         Description => 'Measured EV 2',
    2860. 

  2860.         RawConv => '$val ? $val : undef',
    2861. 

  2861.         ValueConv => '$val / 8 - 6',
    2862. 

  2862.         ValueConvInv => 'int(($val + 6) * 8 + 0.5)',
    2863. 

  2863.     },
    2864. 

  2864.     0x09 => {
    2865. 

  2865.         Name => 'MeasuredEV3',
    2866. 

  2866.         Description => 'Measured EV 3',
    2867. 

  2867.         RawConv => '$val ? $val : undef',
    2868. 

  2868.         ValueConv => '$val / 8 - 6',
    2869. 

  2869.         ValueConvInv => 'int(($val + 6) * 8 + 0.5)',
    2870. 

  2870.     },
    2871. 

  2871.     0x15 => {
    2872. 

  2872.         Name => 'FlashMeteringMode',
    2873. 

  2873.         PrintConv => {
    2874. 

  2874.             0 => 'E-TTL',
    2875. 

  2875.             3 => 'TTL',
    2876. 

  2876.             4 => 'External Auto',
    2877. 

  2877.             5 => 'External Manual',
    2878. 

  2878.             6 => 'Off',
    2879. 

  2879.         },
    2880. 

  2880.     },
    2881. 

  2881.     0x19 => { %ciCameraTemperature },
    2882. 

  2882.     0x1e => { %ciFocalLength },
    2883. 

  2883.     0x35 => {
    2884. 

  2884.         Name => 'CameraOrientation',
    2885. 

  2885.         PrintConv => {
    2886. 

  2886.             0 => 'Horizontal (normal)',
    2887. 

  2887.             1 => 'Rotate 90 CW',
    2888. 

  2888.             2 => 'Rotate 270 CW',
    2889. 

  2889.         },
    2890. 

  2890.     },
    2891. 

  2891.     0x54 => {
    2892. 

  2892.         Name => 'FocusDistanceUpper',
    2893. 

  2893.         %focusDistanceByteSwap,
    2894. 

  2894.     },
    2895. 

  2895.     0x56 => {
    2896. 

  2896.         Name => 'FocusDistanceLower',
    2897. 

  2897.         %focusDistanceByteSwap,
    2898. 

  2898.     },
    2899. 

  2899.     0x57 => {
    2900. 

  2900.         Name => 'FirmwareVersionLookAhead',
    2901. 

  2901.         Hidden => 1,
    2902. 

  2902.         # must look ahead to check location of FirmwareVersion string
    2903. 

  2903.         Format => 'undef[0x1a6]',
    2904. 

  2904.         RawConv => q{
    2905. 

  2905.             my $t = substr($val, 0x1e8 - 0x57, 6);
    2906. 

  2906.             $t =~ /^\d+\.\d+\.\d+/ and $$self{CanonFirmA} = 1;
    2907. 

  2907.             $t = substr($val, 0x1ed - 0x57, 6);
    2908. 

  2908.             $t =~ /^\d+\.\d+\.\d+/ and $$self{CanonFirmB} = 1;
    2909. 

  2909.             return undef;   # not a real tag
    2910. 

  2910.         },
    2911. 

  2911.     },
    2912. 

  2912.     0x77 => {
    2913. 

  2913.         Name => 'WhiteBalance',
    2914. 

  2914.         Condition => '$$self{CanonFirmA}',
    2915. 

  2915.         Notes => 'firmware 4.2.1',
    2916. 

  2916.         Format => 'int16u',
    2917. 

  2917.         SeparateTable => 1,
    2918. 

  2918.         PrintConv => \%canonWhiteBalance,
    2919. 

  2919.     },
    2920. 

  2920.     0x78 => {
    2921. 

  2921.         Name => 'WhiteBalance',
    2922. 

  2922.         Condition => '$$self{CanonFirmB}',
    2923. 

  2923.         Notes => 'firmware 1.0.4',
    2924. 

  2924.         Format => 'int16u',
    2925. 

  2925.         SeparateTable => 1,
    2926. 

  2926.         PrintConv => \%canonWhiteBalance,
    2927. 

  2927.     },
    2928. 

  2928.     0x7b => {
    2929. 

  2929.         Name => 'ColorTemperature',
    2930. 

  2930.         Condition => '$$self{CanonFirmA}',
    2931. 

  2931.         Format => 'int16u',
    2932. 

  2932.     },
    2933. 

  2933.     0x7c => {
    2934. 

  2934.         Name => 'ColorTemperature',
    2935. 

  2935.         Condition => '$$self{CanonFirmB}',
    2936. 

  2936.         Format => 'int16u',
    2937. 

  2937.     },
    2938. 

  2938.     0x14e => {
    2939. 

  2939.         Name => 'LensType',
    2940. 

  2940.         Condition => '$$self{CanonFirmA}',
    2941. 

  2941.         Format => 'int16uRev', # value is big-endian
    2942. 

  2942.         SeparateTable => 1,
    2943. 

  2943.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    2944. 

  2944.         PrintConv => \%canonLensTypes,
    2945. 

  2945.     },
    2946. 

  2946.     0x14f => {
    2947. 

  2947.         Name => 'LensType',
    2948. 

  2948.         Condition => '$$self{CanonFirmB}',
    2949. 

  2949.         Format => 'int16uRev', # value is big-endian
    2950. 

  2950.         SeparateTable => 1,
    2951. 

  2951.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    2952. 

  2952.         PrintConv => \%canonLensTypes,
    2953. 

  2953.     },
    2954. 

  2954.     0x150 => {
    2955. 

  2955.         %ciShortFocal,
    2956. 

  2956.         Condition => '$$self{CanonFirmA}',
    2957. 

  2957.     },
    2958. 

  2958.     0x151 => {
    2959. 

  2959.         %ciShortFocal,
    2960. 

  2960.         Condition => '$$self{CanonFirmB}',
    2961. 

  2961.     },
    2962. 

  2962.     0x152 => {
    2963. 

  2963.         %ciLongFocal,
    2964. 

  2964.         Condition => '$$self{CanonFirmA}',
    2965. 

  2965.     },
    2966. 

  2966.     0x153 => {
    2967. 

  2967.         %ciLongFocal,
    2968. 

  2968.         Condition => '$$self{CanonFirmB}',
    2969. 

  2969.     },
    2970. 

  2970.     0x1e8 => { # firmware 4.2.1 (pre-production)
    2971. 

  2971.         Name => 'FirmwareVersion',
    2972. 

  2972.         Condition => '$$self{CanonFirmA}',
    2973. 

  2973.         Format => 'string[6]',
    2974. 

  2974.         Writable => 0,
    2975. 

  2975.     },
    2976. 

  2976.     0x1ed => { # firmware 1.0.4
    2977. 

  2977.         Name => 'FirmwareVersion',
    2978. 

  2978.         Condition => '$$self{CanonFirmB}',
    2979. 

  2979.         Format => 'string[6]',
    2980. 

  2980.         Writable => 0,
    2981. 

  2981.     },
    2982. 

  2982.     0x227 => { #(NC)
    2983. 

  2983.         Name => 'FileIndex',
    2984. 

  2984.         Condition => '$$self{CanonFirmA}',
    2985. 

  2985.         Groups => { 2 => 'Image' },
    2986. 

  2986.         Format => 'int32u',
    2987. 

  2987.         ValueConv => '$val + 1',
    2988. 

  2988.         ValueConvInv => '$val - 1',
    2989. 

  2989.     },
    2990. 

  2990.     0x22c => { #(NC)
    2991. 

  2991.         Name => 'FileIndex',
    2992. 

  2992.         Condition => '$$self{CanonFirmB}',
    2993. 

  2993.         Groups => { 2 => 'Image' },
    2994. 

  2994.         Format => 'int32u',
    2995. 

  2995.         ValueConv => '$val + 1',
    2996. 

  2996.         ValueConvInv => '$val - 1',
    2997. 

  2997.     },
    2998. 

  2998.     0x233 => { #(NC)
    2999. 

  2999.         Name => 'DirectoryIndex',
    3000. 

  3000.         Condition => '$$self{CanonFirmA}',
    3001. 

  3001.         Groups => { 2 => 'Image' },
    3002. 

  3002.         Format => 'int32u',
    3003. 

  3003.         ValueConv => '$val - 1',
    3004. 

  3004.         ValueConvInv => '$val + 1',
    3005. 

  3005.     },
    3006. 

  3006.     0x238 => { #(NC)
    3007. 

  3007.         Name => 'DirectoryIndex',
    3008. 

  3008.         Condition => '$$self{CanonFirmB}',
    3009. 

  3009.         Groups => { 2 => 'Image' },
    3010. 

  3010.         Format => 'int32u',
    3011. 

  3011.         ValueConv => '$val - 1',
    3012. 

  3012.         ValueConvInv => '$val + 1',
    3013. 

  3013.     },
    3014. 

  3014.     0x363 => {
    3015. 

  3015.         Name => 'PictureStyleInfo',
    3016. 

  3016.         Condition => '$$self{CanonFirmA}',
    3017. 

  3017.         SubDirectory => {
    3018. 

  3018.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    3019. 

  3019.         },
    3020. 

  3020.     },
    3021. 

  3021.     0x368 => {
    3022. 

  3022.         Name => 'PictureStyleInfo',
    3023. 

  3023.         Condition => '$$self{CanonFirmB}',
    3024. 

  3024.         SubDirectory => {
    3025. 

  3025.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    3026. 

  3026.         },
    3027. 

  3027.     },
    3028. 

  3028. );
    3029. 

  3029. 

  3030. # Camera information for 5D (MakerNotes tag 0x0d)
    3031. 

  3031. # (ref 12 unless otherwise noted)
    3032. 

  3032. %Image::ExifTool::Canon::CameraInfo5D = (
    3033. 

  3033.     %binaryDataAttrs,
    3034. 

  3034.     FORMAT => 'int8s',
    3035. 

  3035.     FIRST_ENTRY => 0,
    3036. 

  3036.     PRIORITY => 0,
    3037. 

  3037.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    3038. 

  3038.     NOTES => 'CameraInfo tags for the EOS 5D.',
    3039. 

  3039.     0x03 => { %ciFNumber }, #PH
    3040. 

  3040.     0x04 => { %ciExposureTime }, #9
    3041. 

  3041.     0x06 => { %ciISO }, #PH
    3042. 

  3042.     0x0c => { #9
    3043. 

  3043.         Name => 'LensType',
    3044. 

  3044.         Format => 'int16uRev', # value is big-endian
    3045. 

  3045.         SeparateTable => 1,
    3046. 

  3046.         RawConv => '$val ? $val : undef', # don't use if value is zero
    3047. 

  3047.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    3048. 

  3048.         PrintConv => \%canonLensTypes,
    3049. 

  3049.     },
    3050. 

  3050.     0x17 => { %ciCameraTemperature }, #PH
    3051. 

  3051.     0x1b => { %ciMacroMagnification }, #PH
    3052. 

  3052.     0x27 => { #PH
    3053. 

  3053.         Name => 'CameraOrientation',
    3054. 

  3054.         PrintConv => {
    3055. 

  3055.             0 => 'Horizontal (normal)',
    3056. 

  3056.             1 => 'Rotate 90 CW',
    3057. 

  3057.             2 => 'Rotate 270 CW',
    3058. 

  3058.         },
    3059. 

  3059.     },
    3060. 

  3060.     0x28 => { %ciFocalLength }, #15
    3061. 

  3061.     0x38 => {
    3062. 

  3062.         Name => 'AFPointsInFocus5D',
    3063. 

  3063.         Format => 'int16uRev',
    3064. 

  3064.         PrintConvColumns => 2,
    3065. 

  3065.         PrintConv => { BITMASK => {
    3066. 

  3066.             0 => 'Center',
    3067. 

  3067.             1 => 'Top',
    3068. 

  3068.             2 => 'Bottom',
    3069. 

  3069.             3 => 'Upper-left',
    3070. 

  3070.             4 => 'Upper-right',
    3071. 

  3071.             5 => 'Lower-left',
    3072. 

  3072.             6 => 'Lower-right',
    3073. 

  3073.             7 => 'Left',
    3074. 

  3074.             8 => 'Right',
    3075. 

  3075.             9 => 'AI Servo1',
    3076. 

  3076.            10 => 'AI Servo2',
    3077. 

  3077.            11 => 'AI Servo3',
    3078. 

  3078.            12 => 'AI Servo4',
    3079. 

  3079.            13 => 'AI Servo5',
    3080. 

  3080.            14 => 'AI Servo6',
    3081. 

  3081.         } },
    3082. 

  3082.     },
    3083. 

  3083.     0x54 => { #15
    3084. 

  3084.         Name => 'WhiteBalance',
    3085. 

  3085.         Format => 'int16u',
    3086. 

  3086.         SeparateTable => 1,
    3087. 

  3087.         PrintConv => \%canonWhiteBalance,
    3088. 

  3088.     },
    3089. 

  3089.     0x58 => { #15
    3090. 

  3090.         Name => 'ColorTemperature',
    3091. 

  3091.         Format => 'int16u',
    3092. 

  3092.     },
    3093. 

  3093.     0x6c => {
    3094. 

  3094.         Name => 'PictureStyle',
    3095. 

  3095.         Format => 'int8u',
    3096. 

  3096.         Flags => ['PrintHex','SeparateTable'],
    3097. 

  3097.         PrintConv => \%pictureStyles,
    3098. 

  3098.     },
    3099. 

  3099.     0x93 => { %ciShortFocal }, #15
    3100. 

  3100.     0x95 => { %ciLongFocal }, #15
    3101. 

  3101.     0x97 => { #15
    3102. 

  3102.         Name => 'LensType',
    3103. 

  3103.         Format => 'int16uRev', # value is big-endian
    3104. 

  3104.         SeparateTable => 1,
    3105. 

  3105.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    3106. 

  3106.         PrintConv => \%canonLensTypes,
    3107. 

  3107.     },
    3108. 

  3108.     0xa4 => { #PH
    3109. 

  3109.         Name => 'FirmwareRevision',
    3110. 

  3110.         Format => 'string[8]',
    3111. 

  3111.     },
    3112. 

  3112.     0xac => { #PH
    3113. 

  3113.         Name => 'ShortOwnerName',
    3114. 

  3114.         Format => 'string[16]',
    3115. 

  3115.     },
    3116. 

  3116.     0xcc => { #PH (NC)
    3117. 

  3117.         Name => 'DirectoryIndex',
    3118. 

  3118.         Groups => { 2 => 'Image' },
    3119. 

  3119.         Format => 'int32u',
    3120. 

  3120.     },
    3121. 

  3121.     0xd0 => {
    3122. 

  3122.         Name => 'FileIndex',
    3123. 

  3123.         Format => 'int16u',
    3124. 

  3124.         Groups => { 2 => 'Image' },
    3125. 

  3125.         ValueConv => '$val + 1',
    3126. 

  3126.         ValueConvInv => '$val - 1',
    3127. 

  3127.     },
    3128. 

  3128.     0xe8 => 'ContrastStandard',
    3129. 

  3129.     0xe9 => 'ContrastPortrait',
    3130. 

  3130.     0xea => 'ContrastLandscape',
    3131. 

  3131.     0xeb => 'ContrastNeutral',
    3132. 

  3132.     0xec => 'ContrastFaithful',
    3133. 

  3133.     0xed => 'ContrastMonochrome',
    3134. 

  3134.     0xee => 'ContrastUserDef1',
    3135. 

  3135.     0xef => 'ContrastUserDef2',
    3136. 

  3136.     0xf0 => 'ContrastUserDef3',
    3137. 

  3137.     # sharpness values are 0-7
    3138. 

  3138.     0xf1 => 'SharpnessStandard',
    3139. 

  3139.     0xf2 => 'SharpnessPortrait',
    3140. 

  3140.     0xf3 => 'SharpnessLandscape',
    3141. 

  3141.     0xf4 => 'SharpnessNeutral',
    3142. 

  3142.     0xf5 => 'SharpnessFaithful',
    3143. 

  3143.     0xf6 => 'SharpnessMonochrome',
    3144. 

  3144.     0xf7 => 'SharpnessUserDef1',
    3145. 

  3145.     0xf8 => 'SharpnessUserDef2',
    3146. 

  3146.     0xf9 => 'SharpnessUserDef3',
    3147. 

  3147.     0xfa => 'SaturationStandard',
    3148. 

  3148.     0xfb => 'SaturationPortrait',
    3149. 

  3149.     0xfc => 'SaturationLandscape',
    3150. 

  3150.     0xfd => 'SaturationNeutral',
    3151. 

  3151.     0xfe => 'SaturationFaithful',
    3152. 

  3152.     0xff => {
    3153. 

  3153.         Name => 'FilterEffectMonochrome',
    3154. 

  3154.         PrintConv => {
    3155. 

  3155.             0 => 'None',
    3156. 

  3156.             1 => 'Yellow',
    3157. 

  3157.             2 => 'Orange',
    3158. 

  3158.             3 => 'Red',
    3159. 

  3159.             4 => 'Green',
    3160. 

  3160.             -559038737 => 'n/a', # (0xdeadbeef)
    3161. 

  3161.         },
    3162. 

  3162.     },
    3163. 

  3163.     0x100 => 'SaturationUserDef1',
    3164. 

  3164.     0x101 => 'SaturationUserDef2',
    3165. 

  3165.     0x102 => 'SaturationUserDef3',
    3166. 

  3166.     0x103 => 'ColorToneStandard',
    3167. 

  3167.     0x104 => 'ColorTonePortrait',
    3168. 

  3168.     0x105 => 'ColorToneLandscape',
    3169. 

  3169.     0x106 => 'ColorToneNeutral',
    3170. 

  3170.     0x107 => 'ColorToneFaithful',
    3171. 

  3171.     0x108 => {
    3172. 

  3172.         Name => 'ToningEffectMonochrome',
    3173. 

  3173.         PrintConv => {
    3174. 

  3174.             0 => 'None',
    3175. 

  3175.             1 => 'Sepia',
    3176. 

  3176.             2 => 'Blue',
    3177. 

  3177.             3 => 'Purple',
    3178. 

  3178.             4 => 'Green',
    3179. 

  3179.             -559038737 => 'n/a', # (0xdeadbeef)
    3180. 

  3180.         },
    3181. 

  3181.     },
    3182. 

  3182.     0x109 => 'ColorToneUserDef1',
    3183. 

  3183.     0x10a => 'ColorToneUserDef2',
    3184. 

  3184.     0x10b => 'ColorToneUserDef3',
    3185. 

  3185.     0x10c => {
    3186. 

  3186.         Name => 'UserDef1PictureStyle',
    3187. 

  3187.         Format => 'int16u',
    3188. 

  3188.         PrintHex => 1, # (only needed for one tag)
    3189. 

  3189.         SeparateTable => 'UserDefStyle',
    3190. 

  3190.         PrintConv => \%userDefStyles,
    3191. 

  3191.     },
    3192. 

  3192.     0x10e => {
    3193. 

  3193.         Name => 'UserDef2PictureStyle',
    3194. 

  3194.         Format => 'int16u',
    3195. 

  3195.         SeparateTable => 'UserDefStyle',
    3196. 

  3196.         PrintConv => \%userDefStyles,
    3197. 

  3197.     },
    3198. 

  3198.     0x110 => {
    3199. 

  3199.         Name => 'UserDef3PictureStyle',
    3200. 

  3200.         Format => 'int16u',
    3201. 

  3201.         SeparateTable => 'UserDefStyle',
    3202. 

  3202.         PrintConv => \%userDefStyles,
    3203. 

  3203.     },
    3204. 

  3204.     0x11c => {
    3205. 

  3205.         Name => 'TimeStamp',
    3206. 

  3206.         Format => 'int32u',
    3207. 

  3207.         Groups => { 2 => 'Time' },
    3208. 

  3208.         Shift => 'Time',
    3209. 

  3209.         RawConv => '$val ? $val : undef',
    3210. 

  3210.         ValueConv => 'ConvertUnixTime($val)',
    3211. 

  3211.         ValueConvInv => 'GetUnixTime($val)',
    3212. 

  3212.         PrintConv => '$self->ConvertDateTime($val)',
    3213. 

  3213.         PrintConvInv => '$self->InverseDateTime($val)',
    3214. 

  3214.     },
    3215. 

  3215. );
    3216. 

  3216. 

  3217. # Camera information for 5D Mark II (MakerNotes tag 0x0d)
    3218. 

  3218. # (ref PH unless otherwise noted)
    3219. 

  3219. %Image::ExifTool::Canon::CameraInfo5DmkII = (
    3220. 

  3220.     %binaryDataAttrs,
    3221. 

  3221.     FORMAT => 'int8u',
    3222. 

  3222.     FIRST_ENTRY => 0,
    3223. 

  3223.     PRIORITY => 0,
    3224. 

  3224.     IS_SUBDIR => [ 0x15a, 0x17e ],
    3225. 

  3225.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    3226. 

  3226.     NOTES => 'CameraInfo tags for the EOS 5D Mark II.',
    3227. 

  3227.     0x03 => { %ciFNumber },
    3228. 

  3228.     0x04 => { %ciExposureTime },
    3229. 

  3229.     0x06 => { %ciISO },
    3230. 

  3230.     0x07 => {
    3231. 

  3231.         Name => 'HighlightTonePriority',
    3232. 

  3232.         PrintConv => { 0 => 'Off', 1 => 'On' },
    3233. 

  3233.     },
    3234. 

  3234.     0x1b => { %ciMacroMagnification }, #PH
    3235. 

  3235.     0x15 => { #PH (580 EX II)
    3236. 

  3236.         Name => 'FlashMeteringMode',
    3237. 

  3237.         PrintConv => {
    3238. 

  3238.             0 => 'E-TTL',
    3239. 

  3239.             3 => 'TTL',
    3240. 

  3240.             4 => 'External Auto',
    3241. 

  3241.             5 => 'External Manual',
    3242. 

  3242.             6 => 'Off',
    3243. 

  3243.         },
    3244. 

  3244.     },
    3245. 

  3245.     0x19 => { %ciCameraTemperature }, #36
    3246. 

  3246.     # 0x1b, 0x1c, 0x1d - same as FileInfo 0x10 - PH
    3247. 

  3247.     0x1e => { %ciFocalLength },
    3248. 

  3248.     0x31 => {
    3249. 

  3249.         Name => 'CameraOrientation',
    3250. 

  3250.         PrintConv => {
    3251. 

  3251.             0 => 'Horizontal (normal)',
    3252. 

  3252.             1 => 'Rotate 90 CW',
    3253. 

  3253.             2 => 'Rotate 270 CW',
    3254. 

  3254.         },
    3255. 

  3255.     },
    3256. 

  3256.     0x50 => {
    3257. 

  3257.         Name => 'FocusDistanceUpper',
    3258. 

  3258.         %focusDistanceByteSwap,
    3259. 

  3259.     },
    3260. 

  3260.     0x52 => {
    3261. 

  3261.         Name => 'FocusDistanceLower',
    3262. 

  3262.         %focusDistanceByteSwap,
    3263. 

  3263.     },
    3264. 

  3264.     0x6f => {
    3265. 

  3265.         Name => 'WhiteBalance',
    3266. 

  3266.         Format => 'int16u',
    3267. 

  3267.         SeparateTable => 1,
    3268. 

  3268.         PrintConv => \%canonWhiteBalance,
    3269. 

  3269.     },
    3270. 

  3270.     0x73 => {
    3271. 

  3271.         Name => 'ColorTemperature',
    3272. 

  3272.         Format => 'int16u',
    3273. 

  3273.     },
    3274. 

  3274.     0xa7 => {
    3275. 

  3275.         Name => 'PictureStyle',
    3276. 

  3276.         Format => 'int8u',
    3277. 

  3277.         Flags => ['PrintHex','SeparateTable'],
    3278. 

  3278.         PrintConv => \%pictureStyles,
    3279. 

  3279.     },
    3280. 

  3280.     0xbd => {
    3281. 

  3281.         Name => 'HighISONoiseReduction',
    3282. 

  3282.         PrintConv => {
    3283. 

  3283.             0 => 'Standard',
    3284. 

  3284.             1 => 'Low',
    3285. 

  3285.             2 => 'Strong',
    3286. 

  3286.             3 => 'Off',
    3287. 

  3287.         },
    3288. 

  3288.     },
    3289. 

  3289.     0xbf => {
    3290. 

  3290.         Name => 'AutoLightingOptimizer',
    3291. 

  3291.         PrintConv => {
    3292. 

  3292.             0 => 'Standard',
    3293. 

  3293.             1 => 'Low',
    3294. 

  3294.             2 => 'Strong',
    3295. 

  3295.             3 => 'Off',
    3296. 

  3296.         },
    3297. 

  3297.     },
    3298. 

  3298.     0xe6 => {
    3299. 

  3299.         Name => 'LensType',
    3300. 

  3300.         Format => 'int16uRev', # value is big-endian
    3301. 

  3301.         SeparateTable => 1,
    3302. 

  3302.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    3303. 

  3303.         PrintConv => \%canonLensTypes,
    3304. 

  3304.     },
    3305. 

  3305.     0xe8 => { %ciShortFocal },
    3306. 

  3306.     0xea => { %ciLongFocal },
    3307. 

  3307.     0x15a => {
    3308. 

  3308.         Name => 'CameraInfo5DmkII_2a',
    3309. 

  3309.         Condition => '$$valPt =~ /^\d+\.\d+\.\d+[\s\0]/',
    3310. 

  3310.         Notes => 'at this location for firmware 3.4.6 and 3.6.1',
    3311. 

  3311.         SubDirectory => {
    3312. 

  3312.             TagTable => 'Image::ExifTool::Canon::CameraInfo5DmkII_2',
    3313. 

  3313.         },
    3314. 

  3314.     },
    3315. 

  3315.     0x17e => {
    3316. 

  3316.         Name => 'CameraInfo5DmkII_2b',
    3317. 

  3317.         Condition => '$$valPt =~ /^\d+\.\d+\.\d+[\s\0]/',
    3318. 

  3318.         Notes => 'at this location for firmware 1.0.6 and 4.1.1',
    3319. 

  3319.         SubDirectory => {
    3320. 

  3320.             TagTable => 'Image::ExifTool::Canon::CameraInfo5DmkII_2',
    3321. 

  3321.         },
    3322. 

  3322.     },
    3323. 

  3323. );
    3324. 

  3324. 

  3325. # variable-position Camera information for 5DmkII (ref PH)
    3326. 

  3326. %Image::ExifTool::Canon::CameraInfo5DmkII_2 = (
    3327. 

  3327.     %binaryDataAttrs,
    3328. 

  3328.     FIRST_ENTRY => 0,
    3329. 

  3329.     PRIORITY => 0,
    3330. 

  3330.     IS_SUBDIR => [ 0x179 ],
    3331. 

  3331.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    3332. 

  3332.     NOTES => 'More CameraInfo tags for the EOS 5D Mark II.',
    3333. 

  3333.     0 => {
    3334. 

  3334.         Name => 'FirmwareVersion',
    3335. 

  3335.         Format => 'string[6]',
    3336. 

  3336.         Writable => 0, # not writable for logic reasons
    3337. 

  3337.         # some firmwares have a null instead of a space after the version number
    3338. 

  3338.         RawConv => '$val=~/^\d+\.\d+\.\d+\s*$/ ? $val : undef',
    3339. 

  3339.     },
    3340. 

  3340.     0x3d => {
    3341. 

  3341.         Name => 'FileIndex',
    3342. 

  3342.         Groups => { 2 => 'Image' },
    3343. 

  3343.         Format => 'int32u',
    3344. 

  3344.         ValueConv => '$val + 1',
    3345. 

  3345.         ValueConvInv => '$val - 1',
    3346. 

  3346.     },
    3347. 

  3347.     0x49 => { #(NC)
    3348. 

  3348.         Name => 'DirectoryIndex',
    3349. 

  3349.         Groups => { 2 => 'Image' },
    3350. 

  3350.         Format => 'int32u',
    3351. 

  3351.         ValueConv => '$val - 1',
    3352. 

  3352.         ValueConvInv => '$val + 1',
    3353. 

  3353.     },
    3354. 

  3354.     0x179 => { #48
    3355. 

  3355.         Name => 'PictureStyleInfo',
    3356. 

  3356.         SubDirectory => {
    3357. 

  3357.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    3358. 

  3358.         },
    3359. 

  3359.     },
    3360. 

  3360. );
    3361. 

  3361. 

  3362. # Camera information for 7D (MakerNotes tag 0x0d) (ref PH)
    3363. 

  3363. %Image::ExifTool::Canon::CameraInfo7D = (
    3364. 

  3364.     %binaryDataAttrs,
    3365. 

  3365.     FORMAT => 'int8u',
    3366. 

  3366.     FIRST_ENTRY => 0,
    3367. 

  3367.     PRIORITY => 0,
    3368. 

  3368.     IS_SUBDIR => [ 0x20, 0x24 ],
    3369. 

  3369.     DATAMEMBER => [ 0x1f ],
    3370. 

  3370.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    3371. 

  3371.     NOTES => 'CameraInfo tags for the EOS 7D.',
    3372. 

  3372.     0x03 => { %ciFNumber },
    3373. 

  3373.     0x04 => { %ciExposureTime },
    3374. 

  3374.     0x06 => { %ciISO },
    3375. 

  3375.     0x07 => {
    3376. 

  3376.         Name => 'HighlightTonePriority',
    3377. 

  3377.         PrintConv => { 0 => 'Off', 1 => 'On' },
    3378. 

  3378.     },
    3379. 

  3379.     0x08 => { #37
    3380. 

  3380.         Name => 'MeasuredEV2',
    3381. 

  3381.         Description => 'Measured EV 2',
    3382. 

  3382.         RawConv => '$val ? $val : undef',
    3383. 

  3383.         ValueConv => '$val / 8 - 6',
    3384. 

  3384.         ValueConvInv => 'int(($val + 6) * 8 + 0.5)',
    3385. 

  3385.     },
    3386. 

  3386.     0x09 => { #37
    3387. 

  3387.         Name => 'MeasuredEV',
    3388. 

  3388.         Description => 'Measured EV',
    3389. 

  3389.         RawConv => '$val ? $val : undef',
    3390. 

  3390.         ValueConv => '$val / 8 - 6',
    3391. 

  3391.         ValueConvInv => 'int(($val + 6) * 8 + 0.5)',
    3392. 

  3392.     },
    3393. 

  3393.     0x15 => { #PH (580 EX II)
    3394. 

  3394.         Name => 'FlashMeteringMode',
    3395. 

  3395.         PrintConv => {
    3396. 

  3396.             0 => 'E-TTL',
    3397. 

  3397.             3 => 'TTL',
    3398. 

  3398.             4 => 'External Auto',
    3399. 

  3399.             5 => 'External Manual',
    3400. 

  3400.             6 => 'Off',
    3401. 

  3401.         },
    3402. 

  3402.     },
    3403. 

  3403.     0x19 => { %ciCameraTemperature },
    3404. 

  3404.     0x1e => { %ciFocalLength },
    3405. 

  3405.     0x1f => {
    3406. 

  3406.         Name => 'FirmwareVersionLookAhead',
    3407. 

  3407.         Hidden => 1,
    3408. 

  3408.         # must look ahead to check location of FirmwareVersion string
    3409. 

  3409.         Format => 'undef[0x1a0]',
    3410. 

  3410.         RawConv => q{
    3411. 

  3411.             my $t = substr($val, 0x1a8 - 0x1f, 6);
    3412. 

  3412.             $t =~ /^\d+\.\d+\.\d+/ and $$self{CanonFirmA} = 1;
    3413. 

  3413.             $t = substr($val, 0x1ac - 0x1f, 6);
    3414. 

  3414.             $t =~ /^\d+\.\d+\.\d+/ and $$self{CanonFirmB} = 1;
    3415. 

  3415.             return undef;   # not a real tag
    3416. 

  3416.         },
    3417. 

  3417.     },
    3418. 

  3418.     0x20 => {
    3419. 

  3419.         Name => 'CameraInfo7D_2a',
    3420. 

  3420.         Condition => '$$self{CanonFirmA}',
    3421. 

  3421.         Notes => 'at this location for pre-production firmware version 3.7.5',
    3422. 

  3422.         SubDirectory => {
    3423. 

  3423.             TagTable => 'Image::ExifTool::Canon::CameraInfo7D_2',
    3424. 

  3424.         },
    3425. 

  3425.     },
    3426. 

  3426.     0x24 => {
    3427. 

  3427.         Name => 'CameraInfo7D_2b',
    3428. 

  3428.         Condition => '$$self{CanonFirmB}',
    3429. 

  3429.         Notes => 'at this location for firmware 1.0.7, 1.0.8, 1.1.0, 1.2.1 and 1.2.2',
    3430. 

  3430.         SubDirectory => {
    3431. 

  3431.             TagTable => 'Image::ExifTool::Canon::CameraInfo7D_2',
    3432. 

  3432.         },
    3433. 

  3433.     },
    3434. 

  3434. );
    3435. 

  3435. 

  3436. # variable-position Camera information for 7D (ref PH)
    3437. 

  3437. %Image::ExifTool::Canon::CameraInfo7D_2 = (
    3438. 

  3438.     %binaryDataAttrs,
    3439. 

  3439.     FORMAT => 'int8u',
    3440. 

  3440.     FIRST_ENTRY => 0,
    3441. 

  3441.     PRIORITY => 0,
    3442. 

  3442.     IS_SUBDIR => [ 0x303 ],
    3443. 

  3443.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    3444. 

  3444.     NOTES => 'More CameraInfo tags for the EOS 7D.',
    3445. 

  3445.     0x11 => {
    3446. 

  3446.         Name => 'CameraOrientation',
    3447. 

  3447.         PrintConv => {
    3448. 

  3448.             0 => 'Horizontal (normal)',
    3449. 

  3449.             1 => 'Rotate 90 CW',
    3450. 

  3450.             2 => 'Rotate 270 CW',
    3451. 

  3451.         },
    3452. 

  3452.     },
    3453. 

  3453.     0x30 => {
    3454. 

  3454.         Name => 'FocusDistanceUpper',
    3455. 

  3455.         %focusDistanceByteSwap,
    3456. 

  3456.     },
    3457. 

  3457.     0x32 => {
    3458. 

  3458.         Name => 'FocusDistanceLower',
    3459. 

  3459.         %focusDistanceByteSwap,
    3460. 

  3460.     },
    3461. 

  3461.     0x53 => {
    3462. 

  3462.         Name => 'WhiteBalance',
    3463. 

  3463.         Format => 'int16u',
    3464. 

  3464.         SeparateTable => 1,
    3465. 

  3465.         PrintConv => \%canonWhiteBalance,
    3466. 

  3466.     },
    3467. 

  3467.     0x57 => {
    3468. 

  3468.         Name => 'ColorTemperature',
    3469. 

  3469.         Format => 'int16u',
    3470. 

  3470.     },
    3471. 

  3471.     0xa5 => {
    3472. 

  3472.         Name => 'HighISONoiseReduction',
    3473. 

  3473.         PrintConv => {
    3474. 

  3474.             0 => 'Standard',
    3475. 

  3475.             1 => 'Low',
    3476. 

  3476.             2 => 'Strong',
    3477. 

  3477.             3 => 'Off',
    3478. 

  3478.         },
    3479. 

  3479.     },
    3480. 

  3480.     0xee => {
    3481. 

  3481.         Name => 'LensType',
    3482. 

  3482.         Format => 'int16uRev', # value is big-endian
    3483. 

  3483.         SeparateTable => 1,
    3484. 

  3484.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    3485. 

  3485.         PrintConv => \%canonLensTypes,
    3486. 

  3486.     },
    3487. 

  3487.     0xf0 => { %ciShortFocal },
    3488. 

  3488.     0xf2 => { %ciLongFocal },
    3489. 

  3489.     0x188 => {
    3490. 

  3490.         Name => 'FirmwareVersion',
    3491. 

  3491.         Format => 'string[6]',
    3492. 

  3492.         Writable => 0, # not writable for logic reasons
    3493. 

  3493.         # some firmwares have a null instead of a space after the version number
    3494. 

  3494.         RawConv => '$val=~/^\d+\.\d+\.\d+\s*$/ ? $val : undef',
    3495. 

  3495.     },
    3496. 

  3496.     0x1c7 => {
    3497. 

  3497.         Name => 'FileIndex',
    3498. 

  3498.         Groups => { 2 => 'Image' },
    3499. 

  3499.         Format => 'int32u',
    3500. 

  3500.         ValueConv => '$val + 1',
    3501. 

  3501.         ValueConvInv => '$val - 1',
    3502. 

  3502.     },
    3503. 

  3503.     0x1d3 => { #(NC)
    3504. 

  3504.         Name => 'DirectoryIndex',
    3505. 

  3505.         Groups => { 2 => 'Image' },
    3506. 

  3506.         Format => 'int32u',
    3507. 

  3507.         ValueConv => '$val - 1',
    3508. 

  3508.         ValueConvInv => '$val + 1',
    3509. 

  3509.     },
    3510. 

  3510.     0x303 => { #48
    3511. 

  3511.         Name => 'PictureStyleInfo',
    3512. 

  3512.         SubDirectory => {
    3513. 

  3513.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    3514. 

  3514.         },
    3515. 

  3515.     },
    3516. 

  3516. );
    3517. 

  3517. 

  3518. # Canon camera information for 40D (MakerNotes tag 0x0d) (ref PH)
    3519. 

  3519. %Image::ExifTool::Canon::CameraInfo40D = (
    3520. 

  3520.     %binaryDataAttrs,
    3521. 

  3521.     FORMAT => 'int8u',
    3522. 

  3522.     FIRST_ENTRY => 0,
    3523. 

  3523.     PRIORITY => 0,
    3524. 

  3524.     IS_SUBDIR => [ 0x25b ],
    3525. 

  3525.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    3526. 

  3526.     NOTES => 'CameraInfo tags for the EOS 40D.',
    3527. 

  3527.     0x03 => { %ciFNumber }, #PH
    3528. 

  3528.     0x04 => { %ciExposureTime }, #PH
    3529. 

  3529.     0x06 => { %ciISO }, #PH
    3530. 

  3530.     0x15 => { #PH (580 EX II)
    3531. 

  3531.         Name => 'FlashMeteringMode',
    3532. 

  3532.         PrintConv => {
    3533. 

  3533.             0 => 'E-TTL',
    3534. 

  3534.             3 => 'TTL',
    3535. 

  3535.             4 => 'External Auto',
    3536. 

  3536.             5 => 'External Manual',
    3537. 

  3537.             6 => 'Off',
    3538. 

  3538.         },
    3539. 

  3539.     },
    3540. 

  3540.     0x18 => { %ciCameraTemperature }, #36
    3541. 

  3541.     0x1b => { %ciMacroMagnification }, #PH
    3542. 

  3542.     0x1d => { %ciFocalLength }, #PH
    3543. 

  3543.     0x30 => { #20
    3544. 

  3544.         Name => 'CameraOrientation',
    3545. 

  3545.         PrintConv => {
    3546. 

  3546.             0 => 'Horizontal (normal)',
    3547. 

  3547.             1 => 'Rotate 90 CW',
    3548. 

  3548.             2 => 'Rotate 270 CW',
    3549. 

  3549.         },
    3550. 

  3550.     },
    3551. 

  3551.     0x43 => { #21/24
    3552. 

  3552.         Name => 'FocusDistanceUpper',
    3553. 

  3553.         # this is very odd (little-endian number on odd boundary),
    3554. 

  3554.         # but it does seem to work better with my sample images - PH
    3555. 

  3555.         %focusDistanceByteSwap,
    3556. 

  3556.     },
    3557. 

  3557.     0x45 => { #21/24
    3558. 

  3558.         Name => 'FocusDistanceLower',
    3559. 

  3559.         %focusDistanceByteSwap,
    3560. 

  3560.     },
    3561. 

  3561.     0x6f => { #15
    3562. 

  3562.         Name => 'WhiteBalance',
    3563. 

  3563.         Format => 'int16u',
    3564. 

  3564.         PrintConv => \%canonWhiteBalance,
    3565. 

  3565.         SeparateTable => 1,
    3566. 

  3566.     },
    3567. 

  3567.     0x73 => { #15
    3568. 

  3568.         Name => 'ColorTemperature',
    3569. 

  3569.         Format => 'int16u',
    3570. 

  3570.     },
    3571. 

  3571.     0xd6 => { #15
    3572. 

  3572.         Name => 'LensType',
    3573. 

  3573.         Format => 'int16uRev', # value is big-endian
    3574. 

  3574.         SeparateTable => 1,
    3575. 

  3575.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    3576. 

  3576.         PrintConv => \%canonLensTypes,
    3577. 

  3577.     },
    3578. 

  3578.     0xd8 => { %ciShortFocal }, #15
    3579. 

  3579.     0xda => { %ciLongFocal }, #15
    3580. 

  3580.     0xff => { #15
    3581. 

  3581.         Name => 'FirmwareVersion',
    3582. 

  3582.         Format => 'string[6]',
    3583. 

  3583.     },
    3584. 

  3584.     0x133 => { #27
    3585. 

  3585.         Name => 'FileIndex',
    3586. 

  3586.         Groups => { 2 => 'Image' },
    3587. 

  3587.         Format => 'int32u',
    3588. 

  3588.         Notes => 'combined with DirectoryIndex to give the Composite FileNumber tag',
    3589. 

  3589.         ValueConv => '$val + 1',
    3590. 

  3590.         ValueConvInv => '$val - 1',
    3591. 

  3591.     },
    3592. 

  3592.     0x13f => { #27
    3593. 

  3593.         Name => 'DirectoryIndex',
    3594. 

  3594.         Groups => { 2 => 'Image' },
    3595. 

  3595.         Format => 'int32u',
    3596. 

  3596.         ValueConv => '$val - 1', # yes, minus (opposite to FileIndex)
    3597. 

  3597.         ValueConvInv => '$val + 1',
    3598. 

  3598.     },
    3599. 

  3599.     0x25b => {
    3600. 

  3600.         Name => 'PictureStyleInfo',
    3601. 

  3601.         SubDirectory => {
    3602. 

  3602.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    3603. 

  3603.         },
    3604. 

  3604.     },
    3605. 

  3605.     0x92b => { #33
    3606. 

  3606.         Name => 'LensModel',
    3607. 

  3607.         Format => 'string[64]',
    3608. 

  3608.     },
    3609. 

  3609. );
    3610. 

  3610. 

  3611. # Canon camera information for 50D (MakerNotes tag 0x0d)
    3612. 

  3612. # (ref PH unless otherwise noted)
    3613. 

  3613. %Image::ExifTool::Canon::CameraInfo50D = (
    3614. 

  3614.     %binaryDataAttrs,
    3615. 

  3615.     FORMAT => 'int8u',
    3616. 

  3616.     FIRST_ENTRY => 0,
    3617. 

  3617.     PRIORITY => 0,
    3618. 

  3618.     DATAMEMBER => [ 0x15a, 0x15e ],
    3619. 

  3619.     IS_SUBDIR => [ 0x2d3, 0x2d7 ],
    3620. 

  3620.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    3621. 

  3621.     NOTES => 'CameraInfo tags for the EOS 50D.',
    3622. 

  3622.     0x03 => { %ciFNumber },
    3623. 

  3623.     0x04 => { %ciExposureTime },
    3624. 

  3624.     0x06 => { %ciISO },
    3625. 

  3625.     0x07 => {
    3626. 

  3626.         Name => 'HighlightTonePriority',
    3627. 

  3627.         PrintConv => { 0 => 'Off', 1 => 'On' },
    3628. 

  3628.     },
    3629. 

  3629.     0x15 => { #PH (580 EX II)
    3630. 

  3630.         Name => 'FlashMeteringMode',
    3631. 

  3631.         PrintConv => {
    3632. 

  3632.             0 => 'E-TTL',
    3633. 

  3633.             3 => 'TTL',
    3634. 

  3634.             4 => 'External Auto',
    3635. 

  3635.             5 => 'External Manual',
    3636. 

  3636.             6 => 'Off',
    3637. 

  3637.         },
    3638. 

  3638.     },
    3639. 

  3639.     0x19 => { %ciCameraTemperature }, #36
    3640. 

  3640.     0x1e => { %ciFocalLength },
    3641. 

  3641.     0x31 => {
    3642. 

  3642.         Name => 'CameraOrientation',
    3643. 

  3643.         PrintConv => {
    3644. 

  3644.             0 => 'Horizontal (normal)',
    3645. 

  3645.             1 => 'Rotate 90 CW',
    3646. 

  3646.             2 => 'Rotate 270 CW',
    3647. 

  3647.         },
    3648. 

  3648.     },
    3649. 

  3649.     0x50 => { #33
    3650. 

  3650.         Name => 'FocusDistanceUpper',
    3651. 

  3651.         %focusDistanceByteSwap,
    3652. 

  3652.     },
    3653. 

  3653.     0x52 => { #33
    3654. 

  3654.         Name => 'FocusDistanceLower',
    3655. 

  3655.         %focusDistanceByteSwap,
    3656. 

  3656.     },
    3657. 

  3657.     0x6f => {
    3658. 

  3658.         Name => 'WhiteBalance',
    3659. 

  3659.         Format => 'int16u',
    3660. 

  3660.         SeparateTable => 1,
    3661. 

  3661.         PrintConv => \%canonWhiteBalance,
    3662. 

  3662.     },
    3663. 

  3663.     0x73 => { #33
    3664. 

  3664.         Name => 'ColorTemperature',
    3665. 

  3665.         Format => 'int16u',
    3666. 

  3666.     },
    3667. 

  3667.     0xa7 => {
    3668. 

  3668.         Name => 'PictureStyle',
    3669. 

  3669.         Format => 'int8u',
    3670. 

  3670.         Flags => ['PrintHex','SeparateTable'],
    3671. 

  3671.         PrintConv => \%pictureStyles,
    3672. 

  3672.     },
    3673. 

  3673.     0xbd => {
    3674. 

  3674.         Name => 'HighISONoiseReduction',
    3675. 

  3675.         PrintConv => {
    3676. 

  3676.             0 => 'Standard',
    3677. 

  3677.             1 => 'Low',
    3678. 

  3678.             2 => 'Strong',
    3679. 

  3679.             3 => 'Off',
    3680. 

  3680.         },
    3681. 

  3681.     },
    3682. 

  3682.     0xbf => {
    3683. 

  3683.         Name => 'AutoLightingOptimizer',
    3684. 

  3684.         PrintConv => {
    3685. 

  3685.             0 => 'Standard',
    3686. 

  3686.             1 => 'Low',
    3687. 

  3687.             2 => 'Strong',
    3688. 

  3688.             3 => 'Off',
    3689. 

  3689.         },
    3690. 

  3690.     },
    3691. 

  3691.     0xea => { #33
    3692. 

  3692.         Name => 'LensType',
    3693. 

  3693.         Format => 'int16uRev', # value is big-endian
    3694. 

  3694.         SeparateTable => 1,
    3695. 

  3695.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    3696. 

  3696.         PrintConv => \%canonLensTypes,
    3697. 

  3697.     },
    3698. 

  3698.     0xec => { %ciShortFocal },
    3699. 

  3699.     0xee => { %ciLongFocal },
    3700. 

  3700.     0x15a => {
    3701. 

  3701.         Name => 'FirmwareVersion',
    3702. 

  3702.         Format => 'string[6]',
    3703. 

  3703.         Notes => 'at this location for firmware 2.6.1',
    3704. 

  3704.         Writable => 0,
    3705. 

  3705.         RawConv => '$val=~/^\d+\.\d+\.\d+\s*$/ ? $$self{CanonFirmA}=$val : undef',
    3706. 

  3706.     },
    3707. 

  3707.     0x15e => { #33
    3708. 

  3708.         Name => 'FirmwareVersion',
    3709. 

  3709.         Format => 'string[6]',
    3710. 

  3710.         Notes => 'at this location for firmware 1.0.2, 1.0.3, 2.9.1 and 3.1.1',
    3711. 

  3711.         Writable => 0,
    3712. 

  3712.         RawConv => '$val=~/^\d+\.\d+\.\d+\s*$/ ? $$self{CanonFirmB}=$val : undef',
    3713. 

  3713.     },
    3714. 

  3714.     0x197 => {
    3715. 

  3715.         Name => 'FileIndex',
    3716. 

  3716.         Condition => '$$self{CanonFirmA}',
    3717. 

  3717.         Groups => { 2 => 'Image' },
    3718. 

  3718.         Format => 'int32u',
    3719. 

  3719.         ValueConv => '$val + 1',
    3720. 

  3720.         ValueConvInv => '$val - 1',
    3721. 

  3721.     },
    3722. 

  3722.     0x19b => {
    3723. 

  3723.         Name => 'FileIndex',
    3724. 

  3724.         Condition => '$$self{CanonFirmB}',
    3725. 

  3725.         Groups => { 2 => 'Image' },
    3726. 

  3726.         Format => 'int32u',
    3727. 

  3727.         ValueConv => '$val + 1',
    3728. 

  3728.         ValueConvInv => '$val - 1',
    3729. 

  3729.     },
    3730. 

  3730.     0x1a3 => { #(NC)
    3731. 

  3731.         Name => 'DirectoryIndex',
    3732. 

  3732.         Condition => '$$self{CanonFirmA}',
    3733. 

  3733.         Groups => { 2 => 'Image' },
    3734. 

  3734.         Format => 'int32u',
    3735. 

  3735.         ValueConv => '$val - 1',
    3736. 

  3736.         ValueConvInv => '$val + 1',
    3737. 

  3737.     },
    3738. 

  3738.     0x1a7 => { #(NC)
    3739. 

  3739.         Name => 'DirectoryIndex',
    3740. 

  3740.         Condition => '$$self{CanonFirmB}',
    3741. 

  3741.         Groups => { 2 => 'Image' },
    3742. 

  3742.         Format => 'int32u',
    3743. 

  3743.         ValueConv => '$val - 1',
    3744. 

  3744.         ValueConvInv => '$val + 1',
    3745. 

  3745.     },
    3746. 

  3746.     0x2d3 => {
    3747. 

  3747.         Name => 'PictureStyleInfo',
    3748. 

  3748.         Condition => '$$self{CanonFirmA}',
    3749. 

  3749.         SubDirectory => {
    3750. 

  3750.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    3751. 

  3751.         },
    3752. 

  3752.     },
    3753. 

  3753.     0x2d7 => {
    3754. 

  3754.         Name => 'PictureStyleInfo',
    3755. 

  3755.         Condition => '$$self{CanonFirmB}',
    3756. 

  3756.         SubDirectory => {
    3757. 

  3757.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    3758. 

  3758.         },
    3759. 

  3759.     },
    3760. 

  3760. );
    3761. 

  3761. 

  3762. # Canon camera information for 60D (MakerNotes tag 0x0d)
    3763. 

  3763. # (ref PH unless otherwise noted)
    3764. 

  3764. # NOTE: Can probably borrow more 50D tags here, possibly with an offset
    3765. 

  3765. %Image::ExifTool::Canon::CameraInfo60D = (
    3766. 

  3766.     %binaryDataAttrs,
    3767. 

  3767.     FORMAT => 'int8u',
    3768. 

  3768.     FIRST_ENTRY => 0,
    3769. 

  3769.     PRIORITY => 0,
    3770. 

  3770.   #  DATAMEMBER => [ 0x199 ],
    3771. 

  3771.     IS_SUBDIR => [ 0x321 ],
    3772. 

  3772.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    3773. 

  3773.     NOTES => 'CameraInfo tags for the EOS 60D.',
    3774. 

  3774.     0x03 => { %ciFNumber },
    3775. 

  3775.     0x04 => { %ciExposureTime },
    3776. 

  3776.     0x06 => { %ciISO },
    3777. 

  3777.     0x19 => { %ciCameraTemperature },
    3778. 

  3778.     0x1e => { %ciFocalLength },
    3779. 

  3779.     0x36 => {
    3780. 

  3780.         Name => 'CameraOrientation',
    3781. 

  3781.         PrintConv => {
    3782. 

  3782.             0 => 'Horizontal (normal)',
    3783. 

  3783.             1 => 'Rotate 90 CW',
    3784. 

  3784.             2 => 'Rotate 270 CW',
    3785. 

  3785.         },
    3786. 

  3786.     },
    3787. 

  3787.     0x55 => {
    3788. 

  3788.         Name => 'FocusDistanceUpper',
    3789. 

  3789.         %focusDistanceByteSwap,
    3790. 

  3790.     },
    3791. 

  3791.     0x57 => {
    3792. 

  3792.         Name => 'FocusDistanceLower',
    3793. 

  3793.         %focusDistanceByteSwap,
    3794. 

  3794.     },
    3795. 

  3795.     0x7d => {
    3796. 

  3796.         Name => 'ColorTemperature',
    3797. 

  3797.         Format => 'int16u',
    3798. 

  3798.     },
    3799. 

  3799.     0xe8 => {
    3800. 

  3800.         Name => 'LensType',
    3801. 

  3801.         Format => 'int16uRev', # value is big-endian
    3802. 

  3802.         SeparateTable => 1,
    3803. 

  3803.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    3804. 

  3804.         PrintConv => \%canonLensTypes,
    3805. 

  3805.     },
    3806. 

  3806.     0xea => { %ciShortFocal },
    3807. 

  3807.     0xec => { %ciLongFocal },
    3808. 

  3808.     0x199 => {
    3809. 

  3809.         Name => 'FirmwareVersion',
    3810. 

  3810.         Format => 'string[6]',
    3811. 

  3811.   #      Notes => 'at this location for firmware 2.8.1 and 1.0.5',
    3812. 

  3812.         Writable => 0,
    3813. 

  3813.   #      RawConv => '$val=~/^\d+\.\d+\.\d+\s*$/ ? $$self{CanonFirmA}=$val : undef',
    3814. 

  3814.     },
    3815. 

  3815.     0x1d9 => {
    3816. 

  3816.         Name => 'FileIndex',
    3817. 

  3817.         Groups => { 2 => 'Image' },
    3818. 

  3818.         Format => 'int32u',
    3819. 

  3819.         ValueConv => '$val + 1',
    3820. 

  3820.         ValueConvInv => '$val - 1',
    3821. 

  3821.     },
    3822. 

  3822.     0x1e5 => { #(NC)
    3823. 

  3823.         Name => 'DirectoryIndex',
    3824. 

  3824.         Groups => { 2 => 'Image' },
    3825. 

  3825.         Format => 'int32u',
    3826. 

  3826.         ValueConv => '$val - 1',
    3827. 

  3827.         ValueConvInv => '$val + 1',
    3828. 

  3828.     },
    3829. 

  3829.     0x321 => {
    3830. 

  3830.         Name => 'PictureStyleInfo2',
    3831. 

  3831.         SubDirectory => {
    3832. 

  3832.             TagTable => 'Image::ExifTool::Canon::PSInfo2',
    3833. 

  3833.         },
    3834. 

  3834.     },
    3835. 

  3835. );
    3836. 

  3836. 

  3837. # Canon camera information for 450D (MakerNotes tag 0x0d) (ref PH)
    3838. 

  3838. %Image::ExifTool::Canon::CameraInfo450D = (
    3839. 

  3839.     %binaryDataAttrs,
    3840. 

  3840.     FORMAT => 'int8u',
    3841. 

  3841.     FIRST_ENTRY => 0,
    3842. 

  3842.     PRIORITY => 0,
    3843. 

  3843.     IS_SUBDIR => [ 0x263 ],
    3844. 

  3844.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    3845. 

  3845.     NOTES => 'CameraInfo tags for the EOS 450D.',
    3846. 

  3846.     0x03 => { %ciFNumber }, #PH
    3847. 

  3847.     0x04 => { %ciExposureTime }, #PH
    3848. 

  3848.     0x06 => { %ciISO }, #PH
    3849. 

  3849.     0x15 => { #PH (580 EX II)
    3850. 

  3850.         Name => 'FlashMeteringMode',
    3851. 

  3851.         PrintConv => {
    3852. 

  3852.             0 => 'E-TTL',
    3853. 

  3853.             3 => 'TTL',
    3854. 

  3854.             4 => 'External Auto',
    3855. 

  3855.             5 => 'External Manual',
    3856. 

  3856.             6 => 'Off',
    3857. 

  3857.         },
    3858. 

  3858.     },
    3859. 

  3859.     0x18 => { %ciCameraTemperature }, #36
    3860. 

  3860.     0x1b => { %ciMacroMagnification }, #PH
    3861. 

  3861.     0x1d => { %ciFocalLength }, #PH
    3862. 

  3862.     0x30 => { #20
    3863. 

  3863.         Name => 'CameraOrientation',
    3864. 

  3864.         PrintConv => {
    3865. 

  3865.             0 => 'Horizontal (normal)',
    3866. 

  3866.             1 => 'Rotate 90 CW',
    3867. 

  3867.             2 => 'Rotate 270 CW',
    3868. 

  3868.         },
    3869. 

  3869.     },
    3870. 

  3870.     0x43 => { #20
    3871. 

  3871.         Name => 'FocusDistanceUpper',
    3872. 

  3872.         # this is very odd (little-endian number on odd boundary),
    3873. 

  3873.         # but it does seem to work better with my sample images - PH
    3874. 

  3874.         %focusDistanceByteSwap,
    3875. 

  3875.     },
    3876. 

  3876.     0x45 => { #20
    3877. 

  3877.         Name => 'FocusDistanceLower',
    3878. 

  3878.         %focusDistanceByteSwap,
    3879. 

  3879.     },
    3880. 

  3880.     0x6f => { #PH
    3881. 

  3881.         Name => 'WhiteBalance',
    3882. 

  3882.         Format => 'int16u',
    3883. 

  3883.         PrintConv => \%canonWhiteBalance,
    3884. 

  3884.         SeparateTable => 1,
    3885. 

  3885.     },
    3886. 

  3886.     0x73 => { #PH
    3887. 

  3887.         Name => 'ColorTemperature',
    3888. 

  3888.         Format => 'int16u',
    3889. 

  3889.     },
    3890. 

  3890.     0xde => { #33
    3891. 

  3891.         Name => 'LensType',
    3892. 

  3892.         Format => 'int16uRev', # value is big-endian
    3893. 

  3893.         SeparateTable => 1,
    3894. 

  3894.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    3895. 

  3895.         PrintConv => \%canonLensTypes,
    3896. 

  3896.     },
    3897. 

  3897.     0x107 => { #PH
    3898. 

  3898.         Name => 'FirmwareVersion',
    3899. 

  3899.         Format => 'string[6]',
    3900. 

  3900.     },
    3901. 

  3901.     0x10f => { #20
    3902. 

  3902.         Name => 'OwnerName',
    3903. 

  3903.         Format => 'string[32]',
    3904. 

  3904.     },
    3905. 

  3905.     0x133 => { #20
    3906. 

  3906.         Name => 'DirectoryIndex',
    3907. 

  3907.         Groups => { 2 => 'Image' },
    3908. 

  3908.         Format => 'int32u',
    3909. 

  3909.     },
    3910. 

  3910.     0x13f => { #20
    3911. 

  3911.         Name => 'FileIndex',
    3912. 

  3912.         Groups => { 2 => 'Image' },
    3913. 

  3913.         Format => 'int32u',
    3914. 

  3914.         ValueConv => '$val + 1',
    3915. 

  3915.         ValueConvInv => '$val - 1',
    3916. 

  3916.     },
    3917. 

  3917.     0x263 => { #PH
    3918. 

  3918.         Name => 'PictureStyleInfo',
    3919. 

  3919.         SubDirectory => {
    3920. 

  3920.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    3921. 

  3921.         },
    3922. 

  3922.     },
    3923. 

  3923.     0x933 => { #33
    3924. 

  3924.         Name => 'LensModel',
    3925. 

  3925.         Format => 'string[64]',
    3926. 

  3926.     },
    3927. 

  3927. );
    3928. 

  3928. 

  3929. # Canon camera information for 500D (MakerNotes tag 0x0d) (ref PH)
    3930. 

  3930. %Image::ExifTool::Canon::CameraInfo500D = (
    3931. 

  3931.     %binaryDataAttrs,
    3932. 

  3932.     FORMAT => 'int8u',
    3933. 

  3933.     FIRST_ENTRY => 0,
    3934. 

  3934.     PRIORITY => 0,
    3935. 

  3935.     IS_SUBDIR => [ 0x30b ],
    3936. 

  3936.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    3937. 

  3937.     NOTES => 'CameraInfo tags for the EOS 500D.',
    3938. 

  3938.     0x03 => { %ciFNumber },
    3939. 

  3939.     0x04 => { %ciExposureTime },
    3940. 

  3940.     0x06 => { %ciISO },
    3941. 

  3941.     0x07 => {
    3942. 

  3942.         Name => 'HighlightTonePriority',
    3943. 

  3943.         PrintConv => { 0 => 'Off', 1 => 'On' },
    3944. 

  3944.     },
    3945. 

  3945.     0x15 => { #PH (580 EX II)
    3946. 

  3946.         Name => 'FlashMeteringMode',
    3947. 

  3947.         PrintConv => {
    3948. 

  3948.             0 => 'E-TTL',
    3949. 

  3949.             3 => 'TTL',
    3950. 

  3950.             4 => 'External Auto',
    3951. 

  3951.             5 => 'External Manual',
    3952. 

  3952.             6 => 'Off',
    3953. 

  3953.         },
    3954. 

  3954.     },
    3955. 

  3955.     0x19 => { %ciCameraTemperature },
    3956. 

  3956.     0x1e => { %ciFocalLength },
    3957. 

  3957.     0x31 => {
    3958. 

  3958.         Name => 'CameraOrientation',
    3959. 

  3959.         PrintConv => {
    3960. 

  3960.             0 => 'Horizontal (normal)',
    3961. 

  3961.             1 => 'Rotate 90 CW',
    3962. 

  3962.             2 => 'Rotate 270 CW',
    3963. 

  3963.         },
    3964. 

  3964.     },
    3965. 

  3965.     0x50 => {
    3966. 

  3966.         Name => 'FocusDistanceUpper',
    3967. 

  3967.         %focusDistanceByteSwap,
    3968. 

  3968.     },
    3969. 

  3969.     0x52 => {
    3970. 

  3970.         Name => 'FocusDistanceLower',
    3971. 

  3971.         %focusDistanceByteSwap,
    3972. 

  3972.     },
    3973. 

  3973.     0x73 => { # (50D + 4)
    3974. 

  3974.         Name => 'WhiteBalance',
    3975. 

  3975.         Format => 'int16u',
    3976. 

  3976.         SeparateTable => 1,
    3977. 

  3977.         PrintConv => \%canonWhiteBalance,
    3978. 

  3978.     },
    3979. 

  3979.     0x77 => { # (50D + 4)
    3980. 

  3980.         Name => 'ColorTemperature',
    3981. 

  3981.         Format => 'int16u',
    3982. 

  3982.     },
    3983. 

  3983.     0xab => { # (50D + 4)
    3984. 

  3984.         Name => 'PictureStyle',
    3985. 

  3985.         Format => 'int8u',
    3986. 

  3986.         Flags => ['PrintHex','SeparateTable'],
    3987. 

  3987.         PrintConv => \%pictureStyles,
    3988. 

  3988.     },
    3989. 

  3989.     0xbc => {
    3990. 

  3990.         Name => 'HighISONoiseReduction',
    3991. 

  3991.         PrintConv => {
    3992. 

  3992.             0 => 'Standard',
    3993. 

  3993.             1 => 'Low',
    3994. 

  3994.             2 => 'Strong',
    3995. 

  3995.             3 => 'Off',
    3996. 

  3996.         },
    3997. 

  3997.     },
    3998. 

  3998.     0xbe => {
    3999. 

  3999.         Name => 'AutoLightingOptimizer',
    4000. 

  4000.         PrintConv => {
    4001. 

  4001.             0 => 'Standard',
    4002. 

  4002.             1 => 'Low',
    4003. 

  4003.             2 => 'Strong',
    4004. 

  4004.             3 => 'Off',
    4005. 

  4005.         },
    4006. 

  4006.     },
    4007. 

  4007.     0xf6 => {
    4008. 

  4008.         Name => 'LensType',
    4009. 

  4009.         Format => 'int16uRev', # value is big-endian
    4010. 

  4010.         SeparateTable => 1,
    4011. 

  4011.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    4012. 

  4012.         PrintConv => \%canonLensTypes,
    4013. 

  4013.     },
    4014. 

  4014.     0xf8 => { %ciShortFocal },
    4015. 

  4015.     0xfa => { %ciLongFocal },
    4016. 

  4016.     0x190 => {
    4017. 

  4017.         Name => 'FirmwareVersion',
    4018. 

  4018.         Format => 'string[6]',
    4019. 

  4019.         Writable => 0,
    4020. 

  4020.         RawConv => '$val=~/^\d+\.\d+\.\d+\s*$/ ? $val : undef',
    4021. 

  4021.     },
    4022. 

  4022.     0x1d3 => {
    4023. 

  4023.         Name => 'FileIndex',
    4024. 

  4024.         Groups => { 2 => 'Image' },
    4025. 

  4025.         Format => 'int32u',
    4026. 

  4026.         ValueConv => '$val + 1',
    4027. 

  4027.         ValueConvInv => '$val - 1',
    4028. 

  4028.     },
    4029. 

  4029.     0x1df => { #(NC)
    4030. 

  4030.         Name => 'DirectoryIndex',
    4031. 

  4031.         Groups => { 2 => 'Image' },
    4032. 

  4032.         Format => 'int32u',
    4033. 

  4033.         ValueConv => '$val - 1',
    4034. 

  4034.         ValueConvInv => '$val + 1',
    4035. 

  4035.     },
    4036. 

  4036.     0x30b => {
    4037. 

  4037.         Name => 'PictureStyleInfo',
    4038. 

  4038.         SubDirectory => {
    4039. 

  4039.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    4040. 

  4040.         },
    4041. 

  4041.     },
    4042. 

  4042. );
    4043. 

  4043. 

  4044. # Canon camera information for 550D (MakerNotes tag 0x0d) (ref PH)
    4045. 

  4045. %Image::ExifTool::Canon::CameraInfo550D = (
    4046. 

  4046.     %binaryDataAttrs,
    4047. 

  4047.     FORMAT => 'int8u',
    4048. 

  4048.     FIRST_ENTRY => 0,
    4049. 

  4049.     PRIORITY => 0,
    4050. 

  4050.     IS_SUBDIR => [ 0x31c ],
    4051. 

  4051.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    4052. 

  4052.     NOTES => 'CameraInfo tags for the EOS 550D.',
    4053. 

  4053.     0x03 => { %ciFNumber },
    4054. 

  4054.     0x04 => { %ciExposureTime },
    4055. 

  4055.     0x06 => { %ciISO },
    4056. 

  4056.     0x07 => { #(NC)
    4057. 

  4057.         Name => 'HighlightTonePriority',
    4058. 

  4058.         PrintConv => { 0 => 'Off', 1 => 'On' },
    4059. 

  4059.     },
    4060. 

  4060.     0x15 => { #(NC)
    4061. 

  4061.         Name => 'FlashMeteringMode',
    4062. 

  4062.         PrintConv => {
    4063. 

  4063.             0 => 'E-TTL',
    4064. 

  4064.             3 => 'TTL',
    4065. 

  4065.             4 => 'External Auto',
    4066. 

  4066.             5 => 'External Manual',
    4067. 

  4067.             6 => 'Off',
    4068. 

  4068.         },
    4069. 

  4069.     },
    4070. 

  4070.     0x19 => { %ciCameraTemperature }, # (500D + 0)
    4071. 

  4071.     0x1e => { %ciFocalLength }, # (500D + 0)
    4072. 

  4072.     0x35 => { # (500D + 4)
    4073. 

  4073.         Name => 'CameraOrientation',
    4074. 

  4074.         PrintConv => {
    4075. 

  4075.             0 => 'Horizontal (normal)',
    4076. 

  4076.             1 => 'Rotate 90 CW',
    4077. 

  4077.             2 => 'Rotate 270 CW',
    4078. 

  4078.         },
    4079. 

  4079.     },
    4080. 

  4080.     0x54 => { # (500D + 4)
    4081. 

  4081.         Name => 'FocusDistanceUpper',
    4082. 

  4082.         %focusDistanceByteSwap,
    4083. 

  4083.     },
    4084. 

  4084.     0x56 => { # (500D + 4)
    4085. 

  4085.         Name => 'FocusDistanceLower',
    4086. 

  4086.         %focusDistanceByteSwap,
    4087. 

  4087.     },
    4088. 

  4088.     0x78 => { # (500D + 5) (NC)
    4089. 

  4089.         Name => 'WhiteBalance',
    4090. 

  4090.         Format => 'int16u',
    4091. 

  4091.         SeparateTable => 1,
    4092. 

  4092.         PrintConv => \%canonWhiteBalance,
    4093. 

  4093.     },
    4094. 

  4094.     0x7c => { # (500D + 5)
    4095. 

  4095.         Name => 'ColorTemperature',
    4096. 

  4096.         Format => 'int16u',
    4097. 

  4097.     },
    4098. 

  4098.     0xb0 => { # (500D + 5)
    4099. 

  4099.         Name => 'PictureStyle',
    4100. 

  4100.         Format => 'int8u',
    4101. 

  4101.         Flags => ['PrintHex','SeparateTable'],
    4102. 

  4102.         PrintConv => \%pictureStyles,
    4103. 

  4103.     },
    4104. 

  4104.     0xff => { # (500D + 9)
    4105. 

  4105.         Name => 'LensType',
    4106. 

  4106.         Format => 'int16uRev', # value is big-endian
    4107. 

  4107.         SeparateTable => 1,
    4108. 

  4108.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    4109. 

  4109.         PrintConv => \%canonLensTypes,
    4110. 

  4110.     },
    4111. 

  4111.     0x101 => { %ciShortFocal }, # (500D + 9)
    4112. 

  4112.     0x103 => { %ciLongFocal }, # (500D + 9)
    4113. 

  4113.     0x1a4 => { # (500D + 0x11)
    4114. 

  4114.         Name => 'FirmwareVersion',
    4115. 

  4115.         Format => 'string[6]',
    4116. 

  4116.         Writable => 0,
    4117. 

  4117.         RawConv => '$val=~/^\d+\.\d+\.\d+\s*$/ ? $val : undef',
    4118. 

  4118.     },
    4119. 

  4119.     0x1e4 => { # (500D + 0x11)
    4120. 

  4120.         Name => 'FileIndex',
    4121. 

  4121.         Groups => { 2 => 'Image' },
    4122. 

  4122.         Format => 'int32u',
    4123. 

  4123.         ValueConv => '$val + 1',
    4124. 

  4124.         ValueConvInv => '$val - 1',
    4125. 

  4125.     },
    4126. 

  4126.     0x1f0 => { # (500D + 0x11) (NC)
    4127. 

  4127.         Name => 'DirectoryIndex',
    4128. 

  4128.         Groups => { 2 => 'Image' },
    4129. 

  4129.         Format => 'int32u',
    4130. 

  4130.         ValueConv => '$val - 1',
    4131. 

  4131.         ValueConvInv => '$val + 1',
    4132. 

  4132.     },
    4133. 

  4133.     0x31c => { #48
    4134. 

  4134.         Name => 'PictureStyleInfo',
    4135. 

  4135.         SubDirectory => {
    4136. 

  4136.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    4137. 

  4137.         },
    4138. 

  4138.     },
    4139. 

  4139. );
    4140. 

  4140. 

  4141. # Canon camera information for 600D and 1100D (MakerNotes tag 0x0d) (ref PH)
    4142. 

  4142. %Image::ExifTool::Canon::CameraInfo600D = (
    4143. 

  4143.     %binaryDataAttrs,
    4144. 

  4144.     FORMAT => 'int8u',
    4145. 

  4145.     FIRST_ENTRY => 0,
    4146. 

  4146.     PRIORITY => 0,
    4147. 

  4147.     IS_SUBDIR => [ 0x2fb ],
    4148. 

  4148.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    4149. 

  4149.     NOTES => 'CameraInfo tags for the EOS 600D and 1100D.',
    4150. 

  4150.     0x03 => { %ciFNumber },
    4151. 

  4151.     0x04 => { %ciExposureTime },
    4152. 

  4152.     0x06 => { %ciISO },
    4153. 

  4153.     0x07 => { #(NC)
    4154. 

  4154.         Name => 'HighlightTonePriority',
    4155. 

  4155.         PrintConv => { 0 => 'Off', 1 => 'On' },
    4156. 

  4156.     },
    4157. 

  4157.     0x15 => { #(NC)
    4158. 

  4158.         Name => 'FlashMeteringMode',
    4159. 

  4159.         PrintConv => {
    4160. 

  4160.             0 => 'E-TTL',
    4161. 

  4161.             3 => 'TTL',
    4162. 

  4162.             4 => 'External Auto',
    4163. 

  4163.             5 => 'External Manual',
    4164. 

  4164.             6 => 'Off',
    4165. 

  4165.         },
    4166. 

  4166.     },
    4167. 

  4167.     0x19 => { %ciCameraTemperature }, # (60D + 0)
    4168. 

  4168.     0x1e => { %ciFocalLength }, # (60D + 0)
    4169. 

  4169.     0x38 => { # (60D + 2)
    4170. 

  4170.         Name => 'CameraOrientation',
    4171. 

  4171.         PrintConv => {
    4172. 

  4172.             0 => 'Horizontal (normal)',
    4173. 

  4173.             1 => 'Rotate 90 CW',
    4174. 

  4174.             2 => 'Rotate 270 CW',
    4175. 

  4175.         },
    4176. 

  4176.     },
    4177. 

  4177.     0x57 => { # (60D + 2, 550D + 3)
    4178. 

  4178.         Name => 'FocusDistanceUpper',
    4179. 

  4179.         %focusDistanceByteSwap,
    4180. 

  4180.     },
    4181. 

  4181.     0x59 => { # (60D + 2, 550D + 3)
    4182. 

  4182.         Name => 'FocusDistanceLower',
    4183. 

  4183.         %focusDistanceByteSwap,
    4184. 

  4184.     },
    4185. 

  4185.     0x7b => { # (550D + 3)
    4186. 

  4186.         Name => 'WhiteBalance',
    4187. 

  4187.         Format => 'int16u',
    4188. 

  4188.         SeparateTable => 1,
    4189. 

  4189.         PrintConv => \%canonWhiteBalance,
    4190. 

  4190.     },
    4191. 

  4191.     0x7f => { # (60D + 2, 550D + 3)
    4192. 

  4192.         Name => 'ColorTemperature',
    4193. 

  4193.         Format => 'int16u',
    4194. 

  4194.     },
    4195. 

  4195.     0xb3 => { # (550D + 3)
    4196. 

  4196.         Name => 'PictureStyle',
    4197. 

  4197.         Format => 'int8u',
    4198. 

  4198.         Flags => ['PrintHex','SeparateTable'],
    4199. 

  4199.         PrintConv => \%pictureStyles,
    4200. 

  4200.     },
    4201. 

  4201.     0xea => { # (60D + 2, 550D + 3)
    4202. 

  4202.         Name => 'LensType',
    4203. 

  4203.         Format => 'int16uRev', # value is big-endian
    4204. 

  4204.         SeparateTable => 1,
    4205. 

  4205.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    4206. 

  4206.         PrintConv => \%canonLensTypes,
    4207. 

  4207.     },
    4208. 

  4208.     0xec => { %ciShortFocal }, # (60D + 2)
    4209. 

  4209.     0xee => { %ciLongFocal }, # (60D + 2)
    4210. 

  4210.     0x19b => { # (60D + 2)
    4211. 

  4211.         Name => 'FirmwareVersion',
    4212. 

  4212.         Format => 'string[6]',
    4213. 

  4213.         Writable => 0,
    4214. 

  4214.         RawConv => '$val=~/^\d+\.\d+\.\d+\s*$/ ? $val : undef',
    4215. 

  4215.     },
    4216. 

  4216.     0x1db => { # (60D + 2) (NC)
    4217. 

  4217.         Name => 'FileIndex',
    4218. 

  4218.         Groups => { 2 => 'Image' },
    4219. 

  4219.         Format => 'int32u',
    4220. 

  4220.         ValueConv => '$val + 1',
    4221. 

  4221.         ValueConvInv => '$val - 1',
    4222. 

  4222.     },
    4223. 

  4223.     0x1e7 => { # (60D + 2) (NC)
    4224. 

  4224.         Name => 'DirectoryIndex',
    4225. 

  4225.         Groups => { 2 => 'Image' },
    4226. 

  4226.         Format => 'int32u',
    4227. 

  4227.         ValueConv => '$val - 1',
    4228. 

  4228.         ValueConvInv => '$val + 1',
    4229. 

  4229.     },
    4230. 

  4230.     0x2fb => {
    4231. 

  4231.         Name => 'PictureStyleInfo',
    4232. 

  4232.         SubDirectory => {
    4233. 

  4233.             TagTable => 'Image::ExifTool::Canon::PSInfo2',
    4234. 

  4234.         },
    4235. 

  4235.     },
    4236. 

  4236. );
    4237. 

  4237. 

  4238. # Canon camera information for 1000D (MakerNotes tag 0x0d) (ref PH)
    4239. 

  4239. %Image::ExifTool::Canon::CameraInfo1000D = (
    4240. 

  4240.     %binaryDataAttrs,
    4241. 

  4241.     FORMAT => 'int8u',
    4242. 

  4242.     FIRST_ENTRY => 0,
    4243. 

  4243.     PRIORITY => 0,
    4244. 

  4244.     IS_SUBDIR => [ 0x267 ],
    4245. 

  4245.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    4246. 

  4246.     NOTES => 'CameraInfo tags for the EOS 1000D.',
    4247. 

  4247.     0x03 => { %ciFNumber }, #PH
    4248. 

  4248.     0x04 => { %ciExposureTime }, #PH
    4249. 

  4249.     0x06 => { %ciISO }, #PH
    4250. 

  4250.     0x15 => { #PH (580 EX II)
    4251. 

  4251.         Name => 'FlashMeteringMode',
    4252. 

  4252.         PrintConv => {
    4253. 

  4253.             0 => 'E-TTL',
    4254. 

  4254.             3 => 'TTL',
    4255. 

  4255.             4 => 'External Auto',
    4256. 

  4256.             5 => 'External Manual',
    4257. 

  4257.             6 => 'Off',
    4258. 

  4258.         },
    4259. 

  4259.     },
    4260. 

  4260.     0x18 => { %ciCameraTemperature }, #36
    4261. 

  4261.     0x1b => { %ciMacroMagnification }, #PH (NC)
    4262. 

  4262.     0x1d => { %ciFocalLength }, #PH
    4263. 

  4263.     0x30 => { #20
    4264. 

  4264.         Name => 'CameraOrientation',
    4265. 

  4265.         PrintConv => {
    4266. 

  4266.             0 => 'Horizontal (normal)',
    4267. 

  4267.             1 => 'Rotate 90 CW',
    4268. 

  4268.             2 => 'Rotate 270 CW',
    4269. 

  4269.         },
    4270. 

  4270.     },
    4271. 

  4271.     0x43 => { #20
    4272. 

  4272.         Name => 'FocusDistanceUpper',
    4273. 

  4273.         %focusDistanceByteSwap,
    4274. 

  4274.     },
    4275. 

  4275.     0x45 => { #20
    4276. 

  4276.         Name => 'FocusDistanceLower',
    4277. 

  4277.         %focusDistanceByteSwap,
    4278. 

  4278.     },
    4279. 

  4279.     0x6f => { #PH
    4280. 

  4280.         Name => 'WhiteBalance',
    4281. 

  4281.         Format => 'int16u',
    4282. 

  4282.         PrintConv => \%canonWhiteBalance,
    4283. 

  4283.         SeparateTable => 1,
    4284. 

  4284.     },
    4285. 

  4285.     0x73 => { #PH
    4286. 

  4286.         Name => 'ColorTemperature',
    4287. 

  4287.         Format => 'int16u',
    4288. 

  4288.     },
    4289. 

  4289.     0xe2 => { #PH
    4290. 

  4290.         Name => 'LensType',
    4291. 

  4291.         Format => 'int16uRev', # value is big-endian
    4292. 

  4292.         SeparateTable => 1,
    4293. 

  4293.         ValueConvInv => 'int($val)', # (must truncate decimal part)
    4294. 

  4294.         PrintConv => \%canonLensTypes,
    4295. 

  4295.     },
    4296. 

  4296.     0xe4 => { %ciShortFocal }, #PH
    4297. 

  4297.     0xe6 => { %ciLongFocal }, #PH
    4298. 

  4298.     0x10b => { #PH
    4299. 

  4299.         Name => 'FirmwareVersion',
    4300. 

  4300.         Format => 'string[6]',
    4301. 

  4301.     },
    4302. 

  4302.     0x137 => { #PH (NC)
    4303. 

  4303.         Name => 'DirectoryIndex',
    4304. 

  4304.         Groups => { 2 => 'Image' },
    4305. 

  4305.         Format => 'int32u',
    4306. 

  4306.     },
    4307. 

  4307.     0x143 => { #PH
    4308. 

  4308.         Name => 'FileIndex',
    4309. 

  4309.         Groups => { 2 => 'Image' },
    4310. 

  4310.         Format => 'int32u',
    4311. 

  4311.         ValueConv => '$val + 1',
    4312. 

  4312.         ValueConvInv => '$val - 1',
    4313. 

  4313.     },
    4314. 

  4314.     0x267 => { #PH
    4315. 

  4315.         Name => 'PictureStyleInfo',
    4316. 

  4316.         SubDirectory => {
    4317. 

  4317.             TagTable => 'Image::ExifTool::Canon::PSInfo',
    4318. 

  4318.         },
    4319. 

  4319.     },
    4320. 

  4320.     0x937 => { #PH
    4321. 

  4321.         Name => 'LensModel',
    4322. 

  4322.         Format => 'string[64]',
    4323. 

  4323.     },
    4324. 

  4324. );
    4325. 

  4325. 

  4326. # Canon camera information for PowerShot models (MakerNotes tag 0x0d) - PH
    4327. 

  4327. %Image::ExifTool::Canon::CameraInfoPowerShot = (
    4328. 

  4328.     %binaryDataAttrs,
    4329. 

  4329.     FORMAT => 'int32s',
    4330. 

  4330.     FIRST_ENTRY => 0,
    4331. 

  4331.     PRIORITY => 0,
    4332. 

  4332.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    4333. 

  4333.     NOTES => q{
    4334. 

  4334.         CameraInfo tags for PowerShot models such as the A450, A460, A550, A560,
    4335. 

  4335.         A570, A630, A640, A650, A710, A720, G7, G9, S5, SD40, SD750, SD800, SD850,
    4336. 

  4336.         SD870, SD900, SD950, SD1000, SX100 and TX1.
    4337. 

  4337.     },
    4338. 

  4338.     0x00 => {
    4339. 

  4339.         Name => 'ISO',
    4340. 

  4340.         Groups => { 2 => 'Image' },
    4341. 

  4341.         ValueConv => '100*exp((($val-411)/96)*log(2))',
    4342. 

  4342.         ValueConvInv => 'log($val/100)/log(2)*96+411',
    4343. 

  4343.         PrintConv => 'sprintf("%.0f",$val)',
    4344. 

  4344.         PrintConvInv => '$val',
    4345. 

  4345.     },
    4346. 

  4346.     0x05 => {
    4347. 

  4347.         Name => 'FNumber',
    4348. 

  4348.         Groups => { 2 => 'Image' },
    4349. 

  4349.         ValueConv => 'exp($val/192*log(2))',
    4350. 

  4350.         ValueConvInv => 'log($val)*192/log(2)',
    4351. 

  4351.         PrintConv => 'sprintf("%.2g",$val)',
    4352. 

  4352.         PrintConvInv => '$val',
    4353. 

  4353.     },
    4354. 

  4354.     0x06 => {
    4355. 

  4355.         Name => 'ExposureTime',
    4356. 

  4356.         Groups => { 2 => 'Image' },
    4357. 

  4357.         ValueConv => 'exp(-$val/96*log(2))',
    4358. 

  4358.         ValueConvInv => '-log($val)*96/log(2)',
    4359. 

  4359.         PrintConv => 'Image::ExifTool::Exif::PrintExposureTime($val)',
    4360. 

  4360.         PrintConvInv => 'Image::ExifTool::Exif::ConvertFraction($val)',
    4361. 

  4361.     },
    4362. 

  4362.     0x17 => 'Rotation', # usually the same as Orientation (but not always! why?)
    4363. 

  4363.     # 0x25 - flash fired/not fired (ref 37)
    4364. 

  4364.     # 0x26 - related to flash mode? (ref 37)
    4365. 

  4365.     # 0x37 - related to flash strength (ref 37)
    4366. 

  4366.     # 0x38 - pre-flash fired/no fired or flash data collection (ref 37)
    4367. 

  4367.     135 => { # [-3] <-- index relative to CameraInfoCount
    4368. 

  4368.         Name => 'CameraTemperature',
    4369. 

  4369.         Condition => '$$self{CameraInfoCount} == 138',
    4370. 

  4370.         Notes => 'A450, A460, A550, A630, A640 and A710',
    4371. 

  4371.         PrintConv => '"$val C"',
    4372. 

  4372.         PrintConvInv => '$val=~s/ ?C//; $val',
    4373. 

  4373.     },
    4374. 

  4374.     145 => { #37 [-3]
    4375. 

  4375.         Name => 'CameraTemperature',
    4376. 

  4376.         Condition => '$$self{CameraInfoCount} == 148',
    4377. 

  4377.         Notes => q{
    4378. 

  4378.             A560, A570, A650, A720, G7, G9, S5, SD40, SD750, SD800, SD850, SD870, SD900,
    4379. 

  4379.             SD950, SD1000, SX100 and TX1
    4380. 

  4380.         },
    4381. 

  4381.         PrintConv => '"$val C"',
    4382. 

  4382.         PrintConvInv => '$val=~s/ ?C//; $val',
    4383. 

  4383.     },
    4384. 

  4384. );
    4385. 

  4385. 

  4386. # Canon camera information for some PowerShot models (MakerNotes tag 0x0d) - PH
    4387. 

  4387. %Image::ExifTool::Canon::CameraInfoPowerShot2 = (
    4388. 

  4388.     %binaryDataAttrs,
    4389. 

  4389.     FORMAT => 'int32s',
    4390. 

  4390.     FIRST_ENTRY => 0,
    4391. 

  4391.     PRIORITY => 0,
    4392. 

  4392.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    4393. 

  4393.     NOTES => q{
    4394. 

  4394.         CameraInfo tags for PowerShot models such as the A470, A480, A490, A495,
    4395. 

  4395.         A580, A590, A1000, A1100, A2000, A2100, A3000, A3100, D10, E1, G10, G11,
    4396. 

  4396.         S90, S95, SD770, SD780, SD790, SD880, SD890, SD940, SD960, SD970, SD980,
    4397. 

  4397.         SD990, SD1100, SD1200, SD1300, SD1400, SD3500, SD4000, SD4500, SX1, SX10,
    4398. 

  4398.         SX20, SX110, SX120, SX130, SX200 and SX210.
    4399. 

  4399.     },
    4400. 

  4400.     0x01 => {
    4401. 

  4401.         Name => 'ISO',
    4402. 

  4402.         Groups => { 2 => 'Image' },
    4403. 

  4403.         ValueConv => '100*exp((($val-411)/96)*log(2))',
    4404. 

  4404.         ValueConvInv => 'log($val/100)/log(2)*96+411',
    4405. 

  4405.         PrintConv => 'sprintf("%.0f",$val)',
    4406. 

  4406.         PrintConvInv => '$val',
    4407. 

  4407.     },
    4408. 

  4408.     0x06 => {
    4409. 

  4409.         Name => 'FNumber',
    4410. 

  4410.         Groups => { 2 => 'Image' },
    4411. 

  4411.         ValueConv => 'exp($val/192*log(2))',
    4412. 

  4412.         ValueConvInv => 'log($val)*192/log(2)',
    4413. 

  4413.         PrintConv => 'sprintf("%.2g",$val)',
    4414. 

  4414.         PrintConvInv => '$val',
    4415. 

  4415.     },
    4416. 

  4416.     0x07 => {
    4417. 

  4417.         Name => 'ExposureTime',
    4418. 

  4418.         Groups => { 2 => 'Image' },
    4419. 

  4419.         ValueConv => 'exp(-$val/96*log(2))',
    4420. 

  4420.         ValueConvInv => '-log($val)*96/log(2)',
    4421. 

  4421.         PrintConv => 'Image::ExifTool::Exif::PrintExposureTime($val)',
    4422. 

  4422.         PrintConvInv => 'Image::ExifTool::Exif::ConvertFraction($val)',
    4423. 

  4423.     },
    4424. 

  4424.     0x18 => 'Rotation',
    4425. 

  4425.     153 => { # [-3] <-- index relative to CameraInfoCount
    4426. 

  4426.         Name => 'CameraTemperature',
    4427. 

  4427.         Condition => '$$self{CameraInfoCount} == 156',
    4428. 

  4428.         Notes => 'A470, A580, A590, SD770, SD790, SD890 and SD1100',
    4429. 

  4429.         PrintConv => '"$val C"',
    4430. 

  4430.         PrintConvInv => '$val=~s/ ?C//; $val',
    4431. 

  4431.     },
    4432. 

  4432.     159 => { # [-3]
    4433. 

  4433.         Name => 'CameraTemperature',
    4434. 

  4434.         Condition => '$$self{CameraInfoCount} == 162',
    4435. 

  4435.         Notes => 'A1000, A2000, E1, G10, SD880, SD990, SX1, SX10 and SX110',
    4436. 

  4436.         PrintConv => '"$val C"',
    4437. 

  4437.         PrintConvInv => '$val=~s/ ?C//; $val',
    4438. 

  4438.     },
    4439. 

  4439.     164 => { # [-3]
    4440. 

  4440.         Name => 'CameraTemperature',
    4441. 

  4441.         Condition => '$$self{CameraInfoCount} == 167',
    4442. 

  4442.         Notes => 'A480, A1100, A2100, D10, SD780, SD960, SD970, SD1200 and SX200',
    4443. 

  4443.         PrintConv => '"$val C"',
    4444. 

  4444.         PrintConvInv => '$val=~s/ ?C//; $val',
    4445. 

  4445.     },
    4446. 

  4446.     168 => { # [-3]
    4447. 

  4447.         Name => 'CameraTemperature',
    4448. 

  4448.         Condition => '$$self{CameraInfoCount} == 171',
    4449. 

  4449.         Notes => q{
    4450. 

  4450.             A490, A495, A3000, A3100, G11, S90, SD940, SD980, SD1300, SD1400, SD3500,
    4451. 

  4451.             SD4000, SX20, SX120 and SX210
    4452. 

  4452.         },
    4453. 

  4453.         PrintConv => '"$val C"',
    4454. 

  4454.         PrintConvInv => '$val=~s/ ?C//; $val',
    4455. 

  4455.     },
    4456. 

  4456.     261 => { # [-3]
    4457. 

  4457.         Name => 'CameraTemperature',
    4458. 

  4458.         Condition => '$$self{CameraInfoCount} == 264',
    4459. 

  4459.         Notes => 'S95, SD4500 and SX130',
    4460. 

  4460.         PrintConv => '"$val C"',
    4461. 

  4461.         PrintConvInv => '$val=~s/ ?C//; $val',
    4462. 

  4462.     },
    4463. 

  4463. );
    4464. 

  4464. 

  4465. # unknown Canon camera information (MakerNotes tag 0x0d) - PH
    4466. 

  4466. %Image::ExifTool::Canon::CameraInfoUnknown32 = (
    4467. 

  4467.     %binaryDataAttrs,
    4468. 

  4468.     FORMAT => 'int32s',
    4469. 

  4469.     FIRST_ENTRY => 0,
    4470. 

  4470.     PRIORITY => 0,
    4471. 

  4471.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    4472. 

  4472.     NOTES => 'Unknown CameraInfo tags are divided into 3 tables based on format size.',
    4473. 

  4473.     # This tag may be uncommented, and is useful for generating
    4474. 

  4474.     # lists of models in the "Notes" below...
    4475. 

  4475.     # 0 => {
    4476. 

  4476.     #     Name => 'CameraInfoCount',
    4477. 

  4477.     #     ValueConv => '$$self{CameraInfoCount}',
    4478. 

  4478.     # },
    4479. 

  4479.     71 => { # [-1] <-- index relative to CameraInfoCount
    4480. 

  4480.         Name => 'CameraTemperature',
    4481. 

  4481.         Condition => '$$self{CameraInfoCount} == 72',
    4482. 

  4482.         Notes => 'S1',
    4483. 

  4483.         PrintConv => '"$val C"',
    4484. 

  4484.         PrintConvInv => '$val=~s/ ?C//; $val',
    4485. 

  4485.     },
    4486. 

  4486.     83 => { # [-2]
    4487. 

  4487.         Name => 'CameraTemperature',
    4488. 

  4488.         Condition => '$$self{CameraInfoCount} == 85',
    4489. 

  4489.         Notes => 'S2',
    4490. 

  4490.         PrintConv => '"$val C"',
    4491. 

  4491.         PrintConvInv => '$val=~s/ ?C//; $val',
    4492. 

  4492.     },
    4493. 

  4493.     91 => { # [-2 or -3]
    4494. 

  4494.         Name => 'CameraTemperature',
    4495. 

  4495.         Condition => '$$self{CameraInfoCount} == 93 or $$self{CameraInfoCount} == 94',
    4496. 

  4496.         Notes => 'A410, A610, A620, S80, SD30, SD400, SD430, SD450, SD500 and SD550',
    4497. 

  4497.         PrintConv => '"$val C"',
    4498. 

  4498.         PrintConvInv => '$val=~s/ ?C//; $val',
    4499. 

  4499.     },
    4500. 

  4500.     92 => { # [-4]
    4501. 

  4501.         Name => 'CameraTemperature',
    4502. 

  4502.         Condition => '$$self{CameraInfoCount} == 96',
    4503. 

  4503.         Notes => 'S3',
    4504. 

  4504.         PrintConv => '"$val C"',
    4505. 

  4505.         PrintConvInv => '$val=~s/ ?C//; $val',
    4506. 

  4506.     },
    4507. 

  4507.     100 => { # [-4]
    4508. 

  4508.         Name => 'CameraTemperature',
    4509. 

  4509.         Condition => '$$self{CameraInfoCount} == 104',
    4510. 

  4510.         Notes => 'A420, A430, A530, A540, A700, SD600, SD630 and SD700',
    4511. 

  4511.         PrintConv => '"$val C"',
    4512. 

  4512.         PrintConvInv => '$val=~s/ ?C//; $val',
    4513. 

  4513.     },
    4514. 

  4514.     466 => { # [-3]
    4515. 

  4515.         Name => 'CameraTemperature',
    4516. 

  4516.         Condition => '$$self{CameraInfoCount} == 469',
    4517. 

  4517.         Notes => '100HS, 300HS, 500HS, A1200, A2200, A3200 and A3300',
    4518. 

  4518.         PrintConv => '"$val C"',
    4519. 

  4519.         PrintConvInv => '$val=~s/ ?C//; $val',
    4520. 

  4520.     },
    4521. 

  4521.     503 => { # [-3]
    4522. 

  4522.         Name => 'CameraTemperature',
    4523. 

  4523.         Condition => '$$self{CameraInfoCount} == 506',
    4524. 

  4524.         Notes => 'A800',
    4525. 

  4525.         PrintConv => '"$val C"',
    4526. 

  4526.         PrintConvInv => '$val=~s/ ?C//; $val',
    4527. 

  4527.     },
    4528. 

  4528.     506 => { # [-3]
    4529. 

  4529.         Name => 'CameraTemperature',
    4530. 

  4530.         Condition => '$$self{CameraInfoCount} == 509',
    4531. 

  4531.         Notes => 'SX230HS',
    4532. 

  4532.         PrintConv => '"$val C"',
    4533. 

  4533.         PrintConvInv => '$val=~s/ ?C//; $val',
    4534. 

  4534.     },
    4535. 

  4535.     520 => { # [-3]
    4536. 

  4536.         Name => 'CameraTemperature',
    4537. 

  4537.         Condition => '$$self{CameraInfoCount} == 523',
    4538. 

  4538.         Notes => '310HS, 510HS, G1X, S100 (new), SX40HS and SX150',
    4539. 

  4539.         PrintConv => '"$val C"',
    4540. 

  4540.         PrintConvInv => '$val=~s/ ?C//; $val',
    4541. 

  4541.     },
    4542. 

  4542.     524 => { # [-3]
    4543. 

  4543.         Name => 'CameraTemperature',
    4544. 

  4544.         Condition => '$$self{CameraInfoCount} == 527',
    4545. 

  4545.         Notes => '110HS, 520HS, A2300, A2400, A3400, A4000, D20 and SX260HS',
    4546. 

  4546.         PrintConv => '"$val C"',
    4547. 

  4547.         PrintConvInv => '$val=~s/ ?C//; $val',
    4548. 

  4548.     },
    4549. 

  4549. );
    4550. 

  4550. 

  4551. # unknown Canon camera information (MakerNotes tag 0x0d) - PH
    4552. 

  4552. %Image::ExifTool::Canon::CameraInfoUnknown16 = (
    4553. 

  4553.     %binaryDataAttrs,
    4554. 

  4554.     FORMAT => 'int16s',
    4555. 

  4555.     FIRST_ENTRY => 0,
    4556. 

  4556.     PRIORITY => 0,
    4557. 

  4557.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    4558. 

  4558. );
    4559. 

  4559. 

  4560. # unknown Canon camera information (MakerNotes tag 0x0d) - PH
    4561. 

  4561. %Image::ExifTool::Canon::CameraInfoUnknown = (
    4562. 

  4562.     %binaryDataAttrs,
    4563. 

  4563.     FORMAT => 'int8s',
    4564. 

  4564.     FIRST_ENTRY => 0,
    4565. 

  4565.     PRIORITY => 0,
    4566. 

  4566.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    4567. 

  4567. );
    4568. 

  4568. 

  4569. # Picture Style information for various cameras (ref 48)
    4570. 

  4570. %Image::ExifTool::Canon::PSInfo = (
    4571. 

  4571.     %binaryDataAttrs,
    4572. 

  4572.     FIRST_ENTRY => 0,
    4573. 

  4573.     PRIORITY => 0,
    4574. 

  4574.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    4575. 

  4575.     NOTES => 'Custom picture style information for various models.',
    4576. 

  4576.     # (values expected to be "n/a" are flagged as Unknown)
    4577. 

  4577.     0x00 => { Name => 'ContrastStandard',      %psInfo },
    4578. 

  4578.     0x04 => { Name => 'SharpnessStandard',     %psInfo },
    4579. 

  4579.     0x08 => { Name => 'SaturationStandard',    %psInfo },
    4580. 

  4580.     0x0c => { Name => 'ColorToneStandard',     %psInfo },
    4581. 

  4581.     0x10 => { Name => 'FilterEffectStandard',  %psInfo, Unknown => 1 },
    4582. 

  4582.     0x14 => { Name => 'ToningEffectStandard',  %psInfo, Unknown => 1 },
    4583. 

  4583.     0x18 => { Name => 'ContrastPortrait',      %psInfo },
    4584. 

  4584.     0x1c => { Name => 'SharpnessPortrait',     %psInfo },
    4585. 

  4585.     0x20 => { Name => 'SaturationPortrait',    %psInfo },
    4586. 

  4586.     0x24 => { Name => 'ColorTonePortrait',     %psInfo },
    4587. 

  4587.     0x28 => { Name => 'FilterEffectPortrait',  %psInfo, Unknown => 1 },
    4588. 

  4588.     0x2c => { Name => 'ToningEffectPortrait',  %psInfo, Unknown => 1 },
    4589. 

  4589.     0x30 => { Name => 'ContrastLandscape',     %psInfo },
    4590. 

  4590.     0x34 => { Name => 'SharpnessLandscape',    %psInfo },
    4591. 

  4591.     0x38 => { Name => 'SaturationLandscape',   %psInfo },
    4592. 

  4592.     0x3c => { Name => 'ColorToneLandscape',    %psInfo },
    4593. 

  4593.     0x40 => { Name => 'FilterEffectLandscape', %psInfo, Unknown => 1 },
    4594. 

  4594.     0x44 => { Name => 'ToningEffectLandscape', %psInfo, Unknown => 1 },
    4595. 

  4595.     0x48 => { Name => 'ContrastNeutral',       %psInfo },
    4596. 

  4596.     0x4c => { Name => 'SharpnessNeutral',      %psInfo },
    4597. 

  4597.     0x50 => { Name => 'SaturationNeutral',     %psInfo },
    4598. 

  4598.     0x54 => { Name => 'ColorToneNeutral',      %psInfo },
    4599. 

  4599.     0x58 => { Name => 'FilterEffectNeutral',   %psInfo, Unknown => 1 },
    4600. 

  4600.     0x5c => { Name => 'ToningEffectNeutral',   %psInfo, Unknown => 1 },
    4601. 

  4601.     0x60 => { Name => 'ContrastFaithful',      %psInfo },
    4602. 

  4602.     0x64 => { Name => 'SharpnessFaithful',     %psInfo },
    4603. 

  4603.     0x68 => { Name => 'SaturationFaithful',    %psInfo },
    4604. 

  4604.     0x6c => { Name => 'ColorToneFaithful',     %psInfo },
    4605. 

  4605.     0x70 => { Name => 'FilterEffectFaithful',  %psInfo, Unknown => 1 },
    4606. 

  4606.     0x74 => { Name => 'ToningEffectFaithful',  %psInfo, Unknown => 1 },
    4607. 

  4607.     0x78 => { Name => 'ContrastMonochrome',    %psInfo },
    4608. 

  4608.     0x7c => { Name => 'SharpnessMonochrome',   %psInfo },
    4609. 

  4609.     0x80 => { Name => 'SaturationMonochrome',  %psInfo, Unknown => 1 },
    4610. 

  4610.     0x84 => { Name => 'ColorToneMonochrome',   %psInfo, Unknown => 1 },
    4611. 

  4611.     0x88 => { Name => 'FilterEffectMonochrome',%psInfo,
    4612. 

  4612.         PrintConv => {
    4613. 

  4613.             0 => 'None',
    4614. 

  4614.             1 => 'Yellow',
    4615. 

  4615.             2 => 'Orange',
    4616. 

  4616.             3 => 'Red',
    4617. 

  4617.             4 => 'Green',
    4618. 

  4618.             -559038737 => 'n/a', # (0xdeadbeef)
    4619. 

  4619.         },
    4620. 

  4620.     },
    4621. 

  4621.     0x8c => { Name => 'ToningEffectMonochrome',%psInfo,
    4622. 

  4622.         PrintConv => {
    4623. 

  4623.             0 => 'None',
    4624. 

  4624.             1 => 'Sepia',
    4625. 

  4625.             2 => 'Blue',
    4626. 

  4626.             3 => 'Purple',
    4627. 

  4627.             4 => 'Green',
    4628. 

  4628.             -559038737 => 'n/a', # (0xdeadbeef)
    4629. 

  4629.         },
    4630. 

  4630.     },
    4631. 

  4631.     0x90 => { Name => 'ContrastUserDef1',      %psInfo },
    4632. 

  4632.     0x94 => { Name => 'SharpnessUserDef1',     %psInfo },
    4633. 

  4633.     0x98 => { Name => 'SaturationUserDef1',    %psInfo },
    4634. 

  4634.     0x9c => { Name => 'ColorToneUserDef1',     %psInfo },
    4635. 

  4635.     0xa0 => { Name => 'FilterEffectUserDef1',  %psInfo,
    4636. 

  4636.         PrintConv => {
    4637. 

  4637.             0 => 'None',
    4638. 

  4638.             1 => 'Yellow',
    4639. 

  4639.             2 => 'Orange',
    4640. 

  4640.             3 => 'Red',
    4641. 

  4641.             4 => 'Green',
    4642. 

  4642.             -559038737 => 'n/a', # (0xdeadbeef)
    4643. 

  4643.         },
    4644. 

  4644.     },
    4645. 

  4645.     0xa4 => { Name => 'ToningEffectUserDef1',  %psInfo,
    4646. 

  4646.         PrintConv => {
    4647. 

  4647.             0 => 'None',
    4648. 

  4648.             1 => 'Sepia',
    4649. 

  4649.             2 => 'Blue',
    4650. 

  4650.             3 => 'Purple',
    4651. 

  4651.             4 => 'Green',
    4652. 

  4652.             -559038737 => 'n/a', # (0xdeadbeef)
    4653. 

  4653.         },
    4654. 

  4654.     },
    4655. 

  4655.     0xa8 => { Name => 'ContrastUserDef2',      %psInfo },
    4656. 

  4656.     0xac => { Name => 'SharpnessUserDef2',     %psInfo },
    4657. 

  4657.     0xb0 => { Name => 'SaturationUserDef2',    %psInfo },
    4658. 

  4658.     0xb4 => { Name => 'ColorToneUserDef2',     %psInfo },
    4659. 

  4659.     0xb8 => { Name => 'FilterEffectUserDef2',  %psInfo,
    4660. 

  4660.         PrintConv => {
    4661. 

  4661.             0 => 'None',
    4662. 

  4662.             1 => 'Yellow',
    4663. 

  4663.             2 => 'Orange',
    4664. 

  4664.             3 => 'Red',
    4665. 

  4665.             4 => 'Green',
    4666. 

  4666.             -559038737 => 'n/a', # (0xdeadbeef)
    4667. 

  4667.         },
    4668. 

  4668.     },
    4669. 

  4669.     0xbc => { Name => 'ToningEffectUserDef2',  %psInfo,
    4670. 

  4670.         PrintConv => {
    4671. 

  4671.             0 => 'None',
    4672. 

  4672.             1 => 'Sepia',
    4673. 

  4673.             2 => 'Blue',
    4674. 

  4674.             3 => 'Purple',
    4675. 

  4675.             4 => 'Green',
    4676. 

  4676.             -559038737 => 'n/a', # (0xdeadbeef)
    4677. 

  4677.         },
    4678. 

  4678.     },
    4679. 

  4679.     0xc0 => { Name => 'ContrastUserDef3',      %psInfo },
    4680. 

  4680.     0xc4 => { Name => 'SharpnessUserDef3',     %psInfo },
    4681. 

  4681.     0xc8 => { Name => 'SaturationUserDef3',    %psInfo },
    4682. 

  4682.     0xcc => { Name => 'ColorToneUserDef3',     %psInfo },
    4683. 

  4683.     0xd0 => { Name => 'FilterEffectUserDef3',  %psInfo,
    4684. 

  4684.         PrintConv => {
    4685. 

  4685.             0 => 'None',
    4686. 

  4686.             1 => 'Yellow',
    4687. 

  4687.             2 => 'Orange',
    4688. 

  4688.             3 => 'Red',
    4689. 

  4689.             4 => 'Green',
    4690. 

  4690.             -559038737 => 'n/a', # (0xdeadbeef)
    4691. 

  4691.         },
    4692. 

  4692.     },
    4693. 

  4693.     0xd4 => { Name => 'ToningEffectUserDef3',  %psInfo,
    4694. 

  4694.         PrintConv => {
    4695. 

  4695.             0 => 'None',
    4696. 

  4696.             1 => 'Sepia',
    4697. 

  4697.             2 => 'Blue',
    4698. 

  4698.             3 => 'Purple',
    4699. 

  4699.             4 => 'Green',
    4700. 

  4700.             -559038737 => 'n/a', # (0xdeadbeef)
    4701. 

  4701.         },
    4702. 

  4702.     },
    4703. 

  4703.     # base picture style names:
    4704. 

  4704.     0xd8 => {
    4705. 

  4705.         Name => 'UserDef1PictureStyle',
    4706. 

  4706.         Format => 'int16u',
    4707. 

  4707.         SeparateTable => 'UserDefStyle',
    4708. 

  4708.         PrintConv => \%userDefStyles,
    4709. 

  4709.     },
    4710. 

  4710.     0xda => {
    4711. 

  4711.         Name => 'UserDef2PictureStyle',
    4712. 

  4712.         Format => 'int16u',
    4713. 

  4713.         SeparateTable => 'UserDefStyle',
    4714. 

  4714.         PrintConv => \%userDefStyles,
    4715. 

  4715.     },
    4716. 

  4716.     0xdc => {
    4717. 

  4717.         Name => 'UserDef3PictureStyle',
    4718. 

  4718.         Format => 'int16u',
    4719. 

  4719.         SeparateTable => 'UserDefStyle',
    4720. 

  4720.         PrintConv => \%userDefStyles,
    4721. 

  4721.     },
    4722. 

  4722. );
    4723. 

  4723. 

  4724. # Picture Style information for the 60D (ref 48)
    4725. 

  4725. %Image::ExifTool::Canon::PSInfo2 = (
    4726. 

  4726.     %binaryDataAttrs,
    4727. 

  4727.     FIRST_ENTRY => 0,
    4728. 

  4728.     PRIORITY => 0,
    4729. 

  4729.     GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
    4730. 

  4730.     NOTES => 'Custom picture style information for the EOS 60D.',
    4731. 

  4731.     # (values expected to be "n/a" are flagged as Unknown)
    4732. 

  4732.     0x00 => { Name => 'ContrastStandard',      %psInfo },
    4733. 

  4733.     0x04 => { Name => 'SharpnessStandard',     %psInfo },
    4734. 

  4734.     0x08 => { Name => 'SaturationStandard',    %psInfo },
    4735. 

  4735.     0x0c => { Name => 'ColorToneStandard',     %psInfo },
    4736. 

  4736.     0x10 => { Name => 'FilterEffectStandard',  %psInfo, Unknown => 1 },
    4737. 

  4737.     0x14 => { Name => 'ToningEffectStandard',  %psInfo, Unknown => 1 },
    4738. 

  4738.     0x18 => { Name => 'ContrastPortrait',      %psInfo },
    4739. 

  4739.     0x1c => { Name => 'SharpnessPortrait',     %psInfo },
    4740. 

  4740.     0x20 => { Name => 'SaturationPortrait',    %psInfo },
    4741. 

  4741.     0x24 => { Name => 'ColorTonePortrait',     %psInfo },
    4742. 

  4742.     0x28 => { Name => 'FilterEffectPortrait',  %psInfo, Unknown => 1 },
    4743. 

  4743.     0x2c => { Name => 'ToningEffectPortrait',  %psInfo, Unknown => 1 },
    4744. 

  4744.     0x30 => { Name => 'ContrastLandscape',     %psInfo },
    4745. 

  4745.     0x34 => { Name => 'SharpnessLandscape',    %psInfo },
    4746. 

  4746.     0x38 => { Name => 'SaturationLandscape',   %psInfo },
    4747. 

  4747.     0x3c => { Name => 'ColorToneLandscape',    %psInfo },
    4748. 

  4748.     0x40 => { Name => 'FilterEffectLandscape', %psInfo, Unknown => 1 },
    4749. 

  4749.     0x44 => { Name => 'ToningEffectLandscape', %psInfo, Unknown => 1 },
    4750. 

  4750.     0x48 => { Name => 'ContrastNeutral',       %psInfo },
    4751. 

  4751.     0x4c => { Name => 'SharpnessNeutral',      %psInfo },
    4752. 

  4752.     0x50 => { Name => 'SaturationNeutral',     %psInfo },
    4753. 

  4753.     0x54 => { Name => 'ColorToneNeutral',      %psInfo },
    4754. 

  4754.     0x58 => { Name => 'FilterEffectNeutral',   %psInfo, Unknown => 1 },
    4755. 

  4755.     0x5c => { Name => 'ToningEffectNeutral',   %psInfo, Unknown => 1 },
    4756. 

  4756.     0x60 => { Name => 'ContrastFaithful',      %psInfo },
    4757. 

  4757.     0x64 => { Name => 'SharpnessFaithful',     %psInfo },
    4758. 

  4758.     0x68 => { Name => 'SaturationFaithful',    %psInfo },
    4759. 

  4759.     0x6c => { Name => 'ColorToneFaithful',     %psInfo },
    4760. 

  4760.     0x70 => { Name => 'FilterEffectFaithful',  %psInfo, Unknown => 1 },
    4761. 

  4761.     0x74 => { Name => 'ToningEffectFaithful',  %psInfo, Unknown => 1 },
    4762. 

  4762.     0x78 => { Name => 'ContrastMonochrome',    %psInfo },
    4763. 

  4763.     0x7c => { Name => 'SharpnessMonochrome',   %psInfo },
    4764. 

  4764.     0x80 => { Name => 'SaturationMonochrome',  %psInfo, Unknown => 1 },
    4765. 

  4765.     0x84 => { Name => 'ColorToneMonochrome',   %psInfo, Unknown => 1 },
    4766. 

  4766.     0x88 => { Name => 'FilterEffectMonochrome',%psInfo,
    4767. 

  4767.         PrintConv => {
    4768. 

  4768.             0 => 'None',
    4769. 

  4769.             1 => 'Yellow',
    4770. 

  4770.             2 => 'Orange',
    4771. 

  4771.             3 => 'Red',
    4772. 

  4772.             4 => 'Green',
    4773. 

  4773.             -559038737 => 'n/a', # (0xdeadbeef)
    4774. 

  4774.         },
    4775. 

  4775.     },
    4776. 

  4776.     0x8c => { Name => 'ToningEffectMonochrome',%psInfo,
    4777. 

  4777.         PrintConv => {
    4778. 

  4778.             0 => 'None',
    4779. 

  4779.             1 => 'Sepia',
    4780. 

  4780.             2 => 'Blue',
    4781. 

  4781.             3 => 'Purple',
    4782. 

  4782.             4 => 'Green',
    4783. 

  4783.             -559038737 => 'n/a', # (0xdeadbeef)
    4784. 

  4784.         },
    4785. 

  4785.     },
    4786. 

  4786.     0x90 => { Name => 'ContrastUnknown',        %psInfo, Unknown => 1 },
    4787. 

  4787.     0x94 => { Name => 'SharpnessUnknown',       %psInfo, Unknown => 1 },
    4788. 

  4788.     0x98 => { Name => 'SaturationUnknown',      %psInfo, Unknown => 1 },
    4789. 

  4789.     0x9c => { Name => 'ColorToneUnknown',       %psInfo, Unknown => 1 },
    4790. 

  4790.     0xa0 => { Name => 'FilterEffectUnknown',    %psInfo, Unknown => 1,
    4791. 

  4791.         PrintConv => {
    4792. 

  4792.             0 => 'None',
    4793. 

  4793.             1 => 'Yellow',
    4794. 

  4794.             2 => 'Orange',
    4795. 

  4795.             3 => 'Red',
    4796. 

  4796.             4 => 'Green',
    4797. 

  4797.             -559038737 => 'n/a', # (0xdeadbeef)
    4798. 

  4798.         },
    4799. 

  4799.     },
    4800. 

  4800.     0xa4 => { Name => 'ToningEffectUnknown',    %psInfo, Unknown => 1,
    4801. 

  4801.         PrintConv => {
    4802. 

  4802.             0 => 'None',
    4803. 

  4803.             1 => 'Sepia',
    4804. 

  4804.             2 => 'Blue',
    4805. 

  4805.             3 => 'Purple',
    4806. 

  4806.             4 => 'Green',
    4807. 

  4807.             -559038737 => 'n/a', # (0xdeadbeef)
    4808. 

  4808.         },
    4809. 

  4809.     },
    4810. 

  4810.     0xa8 => { Name => 'ContrastUserDef1',      %psInfo },
    4811. 

  4811.     0xac => { Name => 'SharpnessUserDef1',     %psInfo },
    4812. 

  4812.     0xb0 => { Name => 'SaturationUserDef1',    %psInfo },
    4813. 

  4813.     0xb4 => { Name => 'ColorToneUserDef1',     %psInfo },
    4814. 

  4814.     0xb8 => { Name => 'FilterEffectUserDef1',  %psInfo,
    4815. 

  4815.         PrintConv => {
    4816. 

  4816.             0 => 'None',
    4817. 

  4817.             1 => 'Yellow',
    4818. 

  4818.             2 => 'Orange',
    4819. 

  4819.             3 => 'Red',
    4820. 

  4820.             4 => 'Green',
    4821. 

  4821.             -559038737 => 'n/a', # (0xdeadbeef)
    4822. 

  4822.         },
    4823. 

  4823.     },
    4824. 

  4824.     0xbc => { Name => 'ToningEffectUserDef1',  %psInfo,
    4825. 

  4825.         PrintConv => {
    4826. 

  4826.             0 => 'None',
    4827. 

  4827.             1 => 'Sepia',
    4828. 

  4828.             2 => 'Blue',
    4829. 

  4829.             3 => 'Purple',
    4830. 

  4830.             4 => 'Green',
    4831. 

  4831.             -559038737 => 'n/a', # (0xdeadbeef)
    4832. 

  4832.         },
    4833. 

  4833.     },
    4834. 

  4834.     0xc0 => { Name => 'ContrastUserDef2',      %psInfo },
    4835. 

  4835.     0xc4 => { Name => 'SharpnessUserDef2',     %psInfo },
    4836. 

  4836.     0xc8 => { Name => 'SaturationUserDef2',    %psInfo },
    4837. 

  4837.     0xcc => { Name => 'ColorToneUserDef2',     %psInfo },
    4838. 

  4838.     0xd0 => { Name => 'FilterEffectUserDef2',  %psInfo,
    4839. 

  4839.         PrintConv => {
    4840. 

  4840.             0 => 'None',
    4841. 

  4841.             1 => 'Yellow',
    4842. 

  4842.             2 => 'Orange',
    4843. 

  4843.             3 => 'Red',
    4844. 

  4844.             4 => 'Green',
    4845. 

  4845.             -559038737 => 'n/a', # (0xdeadbeef)
    4846. 

  4846.         },
    4847. 

  4847.     },
    4848. 

  4848.     0xd4 => { Name => 'ToningEffectUserDef2',  %psInfo,
    4849. 

  4849.         PrintConv => {
    4850. 

  4850.             0 => 'None',
    4851. 

  4851.             1 => 'Sepia',
    4852. 

  4852.             2 => 'Blue',
    4853. 

  4853.             3 => 'Purple',
    4854. 

  4854.             4 => 'Green',
    4855. 

  4855.             -559038737 => 'n/a', # (0xdeadbeef)
    4856. 

  4856.         },
    4857. 

  4857.     },
    4858. 

  4858.     0xd8 => { Name => 'ContrastUserDef3',      %psInfo },
    4859. 

  4859.     0xdc => { Name => 'SharpnessUserDef3',     %psInfo },
    4860. 

  4860.     0xe0 => { Name => 'SaturationUserDef3',    %psInfo },
    4861. 

  4861.     0xe4 => { Name => 'ColorToneUserDef3',     %psInfo },
    4862. 

  4862.     0xe8 => { Name => 'FilterEffectUserDef3',  %psInfo,
    4863. 

  4863.         PrintConv => {
    4864. 

  4864.             0 => 'None',
    4865. 

  4865.             1 => 'Yellow',
    4866. 

  4866.             2 =&g