exiftool_vendored 11.89.0 → 11.90.0
Sign up to get free protection for your applications and to get access to all the features.
Potentially problematic release.
This version of exiftool_vendored might be problematic. Click here for more details.
- checksums.yaml +4 -4
- data/bin/Changes +16 -3
- data/bin/META.json +1 -1
- data/bin/META.yml +1 -1
- data/bin/README +2 -2
- data/bin/exiftool +14 -13
- data/bin/lib/Image/ExifTool/Canon.pm +6 -2
- data/bin/lib/Image/ExifTool/CanonCustom.pm +3 -3
- data/bin/lib/Image/ExifTool/Exif.pm +3 -2
- data/bin/lib/Image/ExifTool/Font.pm +1 -1
- data/bin/lib/Image/ExifTool/FujiFilm.pm +4 -1
- data/bin/lib/Image/ExifTool/GIMP.pm +1 -1
- data/bin/lib/Image/ExifTool/Nikon.pm +49 -11
- data/bin/lib/Image/ExifTool/Olympus.pm +3 -1
- data/bin/lib/Image/ExifTool/PNG.pm +1 -1
- data/bin/lib/Image/ExifTool/Pentax.pm +3 -3
- data/bin/lib/Image/ExifTool/QuickTime.pm +355 -56
- data/bin/lib/Image/ExifTool/QuickTimeStream.pl +4 -0
- data/bin/lib/Image/ExifTool/Sigma.pm +0 -1
- data/bin/lib/Image/ExifTool/Sony.pm +2 -1
- data/bin/lib/Image/ExifTool/TagNames.pod +1 -1
- data/bin/lib/Image/ExifTool/Text.pm +1 -1
- data/bin/lib/Image/ExifTool/VCard.pm +1 -1
- data/bin/lib/Image/ExifTool/WriteQuickTime.pl +4 -4
- data/bin/lib/Image/ExifTool.pm +2 -2
- data/bin/lib/Image/ExifTool.pod +3 -3
- data/bin/perl-Image-ExifTool.spec +1 -1
- data/lib/exiftool_vendored/version.rb +1 -1
- metadata +2 -2
checksums.yaml
CHANGED
@@ -1,7 +1,7 @@
|
|
1
1
|
---
|
2
2
|
SHA1:
|
3
|
-
metadata.gz:
|
4
|
-
data.tar.gz:
|
3
|
+
metadata.gz: 5677eed13951b747ce733d83056cd3ae7955318d
|
4
|
+
data.tar.gz: '0387be38d3952cedb4a7c641370bc6b131ad79e4'
|
5
5
|
SHA512:
|
6
|
-
metadata.gz:
|
7
|
-
data.tar.gz:
|
6
|
+
metadata.gz: 0d54ba249ad0f882b0d647160227a456d97ae11ee56a2f39770bc85dfd1b355b98b7f587fc5eaed17d7056dd4a220c761ce8942449d893acdb65a63c476db927
|
7
|
+
data.tar.gz: ae57fea277abb94cacd789c4b36c077bdb76e4bf3c30dd8bc72d445eab9a3e6651fabd0c1a758364a085cd1a533dfa724618db3adf58adc7f4ab635b77e00f80
|
data/bin/Changes
CHANGED
@@ -7,13 +7,26 @@ RSS feed: https://exiftool.org/rss.xml
|
|
7
7
|
Note: The most recent production release is Version 11.85. (Other versions are
|
8
8
|
considered development releases, and are not uploaded to CPAN.)
|
9
9
|
|
10
|
+
Mar. 3, 2020 - Version 11.90
|
11
|
+
|
12
|
+
- Added a new Sony LensType (thanks LibRaw and Jos Roost)
|
13
|
+
- Aded two new Olypus LensType values
|
14
|
+
- Added a new Canon LensType
|
15
|
+
- Added some new Canon RecordMode values
|
16
|
+
- Added some new QuickTime GeneralProfileIDC values
|
17
|
+
- Added new values for a couple of FujiFilm tags
|
18
|
+
- Added a number of new QuickTime GenreID values
|
19
|
+
- Decode Nikon Z6/Z7 phase-detect AF points (thanks Andy Dragon)
|
20
|
+
- Patched to avoid possible "Undefined subroutine" error in MacOS 10.15
|
21
|
+
- Fixed incorrect offsets in -htmlDump output for some file types
|
22
|
+
|
10
23
|
Feb. 25, 2020 - Version 11.89
|
11
24
|
|
12
25
|
- Added support for Exif 2.32 for XMP
|
13
26
|
- Recognize the HIF file extension
|
14
27
|
- Improved verbose output for QuickTime iref items
|
15
|
-
- Patched to
|
16
|
-
|
28
|
+
- Patched to create new GPS metadata in Canon CR3 images using a default byte
|
29
|
+
order that is the same as existing EXIF boxes
|
17
30
|
- Patched to add missing newline that could occur in XMP with the API Compact
|
18
31
|
Shorthand option
|
19
32
|
|
@@ -8944,7 +8957,7 @@ Apr. 6, 2004 - Version 3.37
|
|
8944
8957
|
Apr. 6, 2004 - Version 3.36
|
8945
8958
|
|
8946
8959
|
- Added support for Sanyo and Minolta maker notes
|
8947
|
-
- Added skeleton for
|
8960
|
+
- Added skeleton for interpreting Sony maker notes
|
8948
8961
|
- Interpret Pentax PrintIM
|
8949
8962
|
|
8950
8963
|
Apr. 6, 2004 - Version 3.35
|
data/bin/META.json
CHANGED
data/bin/META.yml
CHANGED
data/bin/README
CHANGED
@@ -105,8 +105,8 @@ your home directory, then you would type the following commands in a
|
|
105
105
|
terminal window to extract and run ExifTool:
|
106
106
|
|
107
107
|
cd ~/Desktop
|
108
|
-
gzip -dc Image-ExifTool-11.
|
109
|
-
cd Image-ExifTool-11.
|
108
|
+
gzip -dc Image-ExifTool-11.90.tar.gz | tar -xf -
|
109
|
+
cd Image-ExifTool-11.90
|
110
110
|
./exiftool t/images/ExifTool.jpg
|
111
111
|
|
112
112
|
Note: These commands extract meta information from one of the test images.
|
data/bin/exiftool
CHANGED
@@ -10,7 +10,7 @@
|
|
10
10
|
use strict;
|
11
11
|
require 5.004;
|
12
12
|
|
13
|
-
my $version = '11.
|
13
|
+
my $version = '11.90';
|
14
14
|
|
15
15
|
# add our 'lib' directory to the include list BEFORE 'use Image::ExifTool'
|
16
16
|
my $exeDir;
|
@@ -4369,7 +4369,7 @@ interpreted as tag names (for this reason, multiple single-character options
|
|
4369
4369
|
may NOT be combined into one argument). Contrary to standard practice,
|
4370
4370
|
options may appear after source file names on the exiftool command line.
|
4371
4371
|
|
4372
|
-
=head2 Option
|
4372
|
+
=head2 Option Overview
|
4373
4373
|
|
4374
4374
|
L<Tag operations|/Tag operations>
|
4375
4375
|
|
@@ -5173,10 +5173,11 @@ when writing. For example, the following commands all have the same effect:
|
|
5173
5173
|
Print output in the format specified by the given file or string. The
|
5174
5174
|
argument is interpreted as a string unless a file of that name exists, in
|
5175
5175
|
which case the string is loaded from the contents of the file. Tag names in
|
5176
|
-
the format file or string begin with a C<$> symbol and may contain
|
5177
|
-
group names and/or a trailing C
|
5178
|
-
may be used around the tag name to separate
|
5179
|
-
C<$$> to represent a C<$> symbol, and C<$/>
|
5176
|
+
the format file or string begin with a C<$> symbol and may contain leading
|
5177
|
+
group names and/or a trailing C<#> (to disable print conversion). Case is
|
5178
|
+
not significant. Braces C<{}> may be used around the tag name to separate
|
5179
|
+
it from subsequent text. Use C<$$> to represent a C<$> symbol, and C<$/>
|
5180
|
+
for a newline.
|
5180
5181
|
|
5181
5182
|
Multiple B<-p> options may be used, each contributing a line (or more) of
|
5182
5183
|
text to the output. Lines beginning with C<#[HEAD]> and C<#[TAIL]> are
|
@@ -5202,7 +5203,7 @@ with this command:
|
|
5202
5203
|
|
5203
5204
|
produces output like this:
|
5204
5205
|
|
5205
|
-
-- Generated by ExifTool 11.
|
5206
|
+
-- Generated by ExifTool 11.90 --
|
5206
5207
|
File: a.jpg - 2003:10:31 15:44:19
|
5207
5208
|
(f/5.6, 1/60s, ISO 100)
|
5208
5209
|
File: b.jpg - 2006:05:23 11:57:38
|
@@ -5787,12 +5788,12 @@ option when also writing the FileName and/or Directory tags.
|
|
5787
5788
|
|
5788
5789
|
Preserve the filesystem modification date/time (C<FileModifyDate>) of the
|
5789
5790
|
original file when writing. Note that some filesystems store a creation
|
5790
|
-
date (
|
5791
|
-
|
5792
|
-
|
5793
|
-
|
5794
|
-
|
5795
|
-
|
5791
|
+
date (ie. C<FileCreateDate> on Windows and Mac systems) which is not
|
5792
|
+
affected by this option. This creation date is preserved on Windows systems
|
5793
|
+
where Win32API::File and Win32::API are available regardless of this
|
5794
|
+
setting. For other systems, the B<-overwrite_original_in_place> option may
|
5795
|
+
be used if necessary to preserve the creation date. The B<-P> option is
|
5796
|
+
superseded by any value written to the FileModifyDate tag.
|
5796
5797
|
|
5797
5798
|
=item B<-password> I<PASSWD>
|
5798
5799
|
|
@@ -88,7 +88,7 @@ sub ProcessCTMD($$$);
|
|
88
88
|
sub ProcessExifInfo($$$);
|
89
89
|
sub SwapWords($);
|
90
90
|
|
91
|
-
$VERSION = '4.
|
91
|
+
$VERSION = '4.35';
|
92
92
|
|
93
93
|
# Note: Removed 'USM' from 'L' lenses since it is redundant - PH
|
94
94
|
# (or is it? Ref 32 shows 5 non-USM L-type lenses)
|
@@ -524,6 +524,7 @@ $VERSION = '4.34';
|
|
524
524
|
749 => 'Tamron 100-400mm f/4.5-6.3 Di VC USD A035E + 2x', #IB
|
525
525
|
750 => 'Canon EF 35mm f/1.4L II USM or Tamron Lens', #42
|
526
526
|
750.1 => 'Tamron SP 85mm f/1.8 Di VC USD (F016)', #Exiv2#1072
|
527
|
+
750.2 => 'Tamron SP 45mm f/1.8 Di VC USD (F013)', #PH
|
527
528
|
751 => 'Canon EF 16-35mm f/2.8L III USM', #42
|
528
529
|
752 => 'Canon EF 24-105mm f/4L IS II USM', #42
|
529
530
|
753 => 'Canon EF 85mm f/1.4L IS USM', #42
|
@@ -1796,6 +1797,7 @@ my %offOn = ( 0 => 'Off', 1 => 'On' );
|
|
1796
1797
|
PrintConv => {
|
1797
1798
|
1 => 'sRGB',
|
1798
1799
|
2 => 'Adobe RGB',
|
1800
|
+
65535 => 'n/a',
|
1799
1801
|
},
|
1800
1802
|
},
|
1801
1803
|
0xb6 => {
|
@@ -2059,7 +2061,7 @@ my %offOn = ( 0 => 'Off', 1 => 'On' );
|
|
2059
2061
|
4 => {
|
2060
2062
|
Name => 'CanonFlashMode',
|
2061
2063
|
PrintConv => {
|
2062
|
-
-1 =>
|
2064
|
+
-1 => 'n/a', # (PH, EOS M MOV video)
|
2063
2065
|
0 => 'Off',
|
2064
2066
|
1 => 'Auto',
|
2065
2067
|
2 => 'On',
|
@@ -2120,6 +2122,8 @@ my %offOn = ( 0 => 'Off', 1 => 'On' );
|
|
2120
2122
|
11 => 'CRM', #PH (C200 CRM)
|
2121
2123
|
12 => 'CR3', #PH (EOS R)
|
2122
2124
|
13 => 'CR3+JPEG', #PH (EOS R)
|
2125
|
+
14 => 'HIF', #PH (NC)
|
2126
|
+
15 => 'CR3+HIF', #PH (1DXmkIII)
|
2123
2127
|
},
|
2124
2128
|
},
|
2125
2129
|
10 => {
|
@@ -1328,7 +1328,7 @@ my %convPFn = ( PrintConv => \&ConvertPfn, PrintConvInv => \&ConvertPfnInv );
|
|
1328
1328
|
},
|
1329
1329
|
0x0109 => {
|
1330
1330
|
Name => 'UsableShootingModes',
|
1331
|
-
Count => 2,
|
1331
|
+
Count => 2, # (Count is 1 for 1DXmkIII -- need to decode this)
|
1332
1332
|
PrintConv => [
|
1333
1333
|
\%disableEnable,
|
1334
1334
|
'sprintf("Flags 0x%x",$val)', # (M, Tv, Av, P, Bulb)
|
@@ -1340,7 +1340,7 @@ my %convPFn = ( PrintConv => \&ConvertPfn, PrintConvInv => \&ConvertPfnInv );
|
|
1340
1340
|
},
|
1341
1341
|
0x010a => {
|
1342
1342
|
Name => 'UsableMeteringModes',
|
1343
|
-
Count => 2,
|
1343
|
+
Count => 2, # (Count is 1 for 1DXmkIII -- need to decode this)
|
1344
1344
|
PrintConv => [
|
1345
1345
|
\%disableEnable,
|
1346
1346
|
'sprintf("Flags 0x%x",$val)', # (evaluative,partial,spot,center-weighted average)
|
@@ -2094,7 +2094,7 @@ my %convPFn = ( PrintConv => \&ConvertPfn, PrintConvInv => \&ConvertPfnInv );
|
|
2094
2094
|
},
|
2095
2095
|
0x0612 => { # (1DX)
|
2096
2096
|
Name => 'RestrictDriveModes',
|
2097
|
-
Count => 2,
|
2097
|
+
Count => 2, # (Count is 1 for 1DXmkIII -- need to decode this)
|
2098
2098
|
PrintConv => [
|
2099
2099
|
\%disableEnable,
|
2100
2100
|
'sprintf("Flags 0x%x",$val)', # (Single,Cont Hi,Cont Lo,Timer 10,Timer 2,Silent,Super Hi)
|
@@ -6152,7 +6152,8 @@ sub ProcessExif($$$)
|
|
6152
6152
|
"Format: $fstr\nSize: $size bytes\n";
|
6153
6153
|
if ($size > 4) {
|
6154
6154
|
my $offPt = Get32u($dataPt,$entry+8);
|
6155
|
-
|
6155
|
+
# (test this with ../pics/{CanonEOS-1DXMarkIII.hif,PanasonicDC-G9.rw2})
|
6156
|
+
my $actPt = $valuePtr + $valueDataPos + $base + $$et{BASE};
|
6156
6157
|
$tip .= sprintf("Value offset: 0x%.4x\n", $offPt);
|
6157
6158
|
# highlight tag name (red for bad size)
|
6158
6159
|
my $style = ($bad or not defined $tval) ? 'V' : 'H';
|
@@ -6180,7 +6181,7 @@ sub ProcessExif($$$)
|
|
6180
6181
|
} elsif ($tagInfo and Image::ExifTool::IsInt($tval)) {
|
6181
6182
|
if ($$tagInfo{IsOffset} or $$tagInfo{SubIFD}) {
|
6182
6183
|
$tval = sprintf('0x%.4x', $tval);
|
6183
|
-
my $actPt = $val + $base
|
6184
|
+
my $actPt = $val + $base + $$et{BASE};
|
6184
6185
|
if ($actPt != $val) {
|
6185
6186
|
$tval .= sprintf("\nActual offset: 0x%.4x", $actPt);
|
6186
6187
|
my $sign = $actPt < $val ? '-' : '';
|
@@ -117,7 +117,7 @@ my %ttCharset = (
|
|
117
117
|
# 0x048c - no ISO equivalent
|
118
118
|
# 0x081a/0x83c - sr-SP
|
119
119
|
# 0x0c0a - modern?
|
120
|
-
# 0x2409 -
|
120
|
+
# 0x2409 - Caribbean country code not found in ISO 3166-1
|
121
121
|
Windows => {
|
122
122
|
0x0401 => 'ar-SA', 0x0438 => 'fo', 0x0481 => 'mi', 0x1409 => 'en-NZ',
|
123
123
|
0x0402 => 'bg', 0x0439 => 'hi', 0x0482 => 'oc', 0x140a => 'es-CR',
|
@@ -31,7 +31,7 @@ use vars qw($VERSION);
|
|
31
31
|
use Image::ExifTool qw(:DataAccess :Utils);
|
32
32
|
use Image::ExifTool::Exif;
|
33
33
|
|
34
|
-
$VERSION = '1.
|
34
|
+
$VERSION = '1.78';
|
35
35
|
|
36
36
|
sub ProcessFujiDir($$$);
|
37
37
|
sub ProcessFaceRec($$$);
|
@@ -145,6 +145,8 @@ my %faceCategories = (
|
|
145
145
|
Writable => 'int16u',
|
146
146
|
PrintConv => {
|
147
147
|
0x0 => 'Auto',
|
148
|
+
0x1 => 'Auto (white priority)', #forum10890
|
149
|
+
0x2 => 'Auto (ambiance priority)', #forum10890
|
148
150
|
0x100 => 'Daylight',
|
149
151
|
0x200 => 'Cloudy',
|
150
152
|
0x300 => 'Daylight Fluorescent',
|
@@ -620,6 +622,7 @@ my %faceCategories = (
|
|
620
622
|
0x600 => 'Classic Chrome', #forum6109
|
621
623
|
0x700 => 'Eterna', #12
|
622
624
|
0x800 => 'Classic Negative', #forum10536
|
625
|
+
0x900 => 'Bleach Bypass', #forum10890
|
623
626
|
},
|
624
627
|
},
|
625
628
|
0x1402 => { #2
|
@@ -48,6 +48,7 @@
|
|
48
48
|
# 35) David Puschel private communication
|
49
49
|
# 36) Hayo Baann (forum10207)
|
50
50
|
# 37) Tom Lachecki, private communication
|
51
|
+
# 38) https://github.com/exiftool/exiftool/pull/40 (and forum10893)
|
51
52
|
# IB) Iliah Borg private communication (LibRaw)
|
52
53
|
# JD) Jens Duttke private communication
|
53
54
|
# NJ) Niels Kristian Bech Jensen private communication
|
@@ -61,7 +62,7 @@ use Image::ExifTool qw(:DataAccess :Utils);
|
|
61
62
|
use Image::ExifTool::Exif;
|
62
63
|
use Image::ExifTool::GPS;
|
63
64
|
|
64
|
-
$VERSION = '3.
|
65
|
+
$VERSION = '3.79';
|
65
66
|
|
66
67
|
sub LensIDConv($$$);
|
67
68
|
sub ProcessNikonAVI($$$);
|
@@ -944,6 +945,43 @@ my %afPoints153 = (
|
|
944
945
|
31 => 'B8', 62 => 'H13', 93 => 'C17', 124 => 'G4',
|
945
946
|
);
|
946
947
|
|
948
|
+
# AF point indices for models with 81 focus points, eg. Z6/Z7/Z50 (ref 38)
|
949
|
+
# - 9 rows (A-I) with 9 columns (1-9), center is E5
|
950
|
+
# NOTE: the AF points start 2 bytes into the data, so the map starts
|
951
|
+
# at 17 instead of 1
|
952
|
+
#
|
953
|
+
# 7 6 5 4 3 2 1 0
|
954
|
+
# 00 : [H5][G5][F5][A5][B5][C5][D5][E5]
|
955
|
+
# 01 : [G6][F6][A6][B6][C6][D6][E6][I5]
|
956
|
+
# 02 : [F4][A4][B4][C4][D4][E4][I6][H6]
|
957
|
+
# 03 : [A7][B7][C7][D7][E7][I4][H4][G4]
|
958
|
+
# 04 : [B3][C3][D3][E3][I7][H7][G7][F7]
|
959
|
+
# 05 : [C8][D8][E8][I3][H3][G3][F3][A3]
|
960
|
+
# 06 : [D2][E2][I8][H8][G8][F8][A8][B8]
|
961
|
+
# 07 : [E9][I2][H2][G2][F2][A2][B2][C2]
|
962
|
+
# 08 : [I9][H9][G9][F9][A9][B9][C9][D9]
|
963
|
+
# 09 : [H1][G1][F1][A1][B1][C1][D1][E1]
|
964
|
+
# 0a : [ ][ ][ ][ ][ ][ ][ ][I1]
|
965
|
+
my %afPoints81 = (
|
966
|
+
17 => 'E5', 34 => 'I6', 51 => 'H7', 68 => 'G8', 85 => 'F9',
|
967
|
+
18 => 'D5', 35 => 'E4', 52 => 'I7', 69 => 'H8', 86 => 'G9',
|
968
|
+
19 => 'C5', 36 => 'D4', 53 => 'E3', 70 => 'I8', 87 => 'H9',
|
969
|
+
20 => 'B5', 37 => 'C4', 54 => 'D3', 71 => 'E2', 88 => 'I9',
|
970
|
+
21 => 'A5', 38 => 'B4', 55 => 'C3', 72 => 'D2', 89 => 'E1',
|
971
|
+
22 => 'F5', 39 => 'A4', 56 => 'B3', 73 => 'C2', 90 => 'D1',
|
972
|
+
23 => 'G5', 40 => 'F4', 57 => 'A3', 74 => 'B2', 91 => 'C1',
|
973
|
+
24 => 'H5', 41 => 'G4', 58 => 'F3', 75 => 'A2', 92 => 'B1',
|
974
|
+
25 => 'I5', 42 => 'H4', 59 => 'G3', 76 => 'F2', 93 => 'A1',
|
975
|
+
26 => 'E6', 43 => 'I4', 60 => 'H3', 77 => 'G2', 94 => 'F1',
|
976
|
+
27 => 'D6', 44 => 'E7', 61 => 'I3', 78 => 'H2', 95 => 'G1',
|
977
|
+
28 => 'C6', 45 => 'D7', 62 => 'E8', 79 => 'I2', 96 => 'H1',
|
978
|
+
29 => 'B6', 46 => 'C7', 63 => 'D8', 80 => 'E9', 97 => 'I1',
|
979
|
+
30 => 'A6', 47 => 'B7', 64 => 'C8', 81 => 'D9',
|
980
|
+
31 => 'F6', 48 => 'A7', 65 => 'B8', 82 => 'C9',
|
981
|
+
32 => 'G6', 49 => 'F7', 66 => 'A8', 83 => 'B9',
|
982
|
+
33 => 'H6', 50 => 'G7', 67 => 'F8', 84 => 'A9',
|
983
|
+
);
|
984
|
+
|
947
985
|
my %cropHiSpeed = ( #IB
|
948
986
|
0 => 'Off',
|
949
987
|
1 => '1.3x Crop', # (1.3x Crop, Large)
|
@@ -3314,7 +3352,7 @@ my %binaryDataAttrs = (
|
|
3314
3352
|
5 => 'On (5)', #PH (1S2[128/129], 1J4/1V3[129])
|
3315
3353
|
6 => 'On (105-point)', #PH (1J4/1V3[128/130])
|
3316
3354
|
7 => 'On (153-point)', #PH (D5/D500/D850)
|
3317
|
-
8 => 'On (
|
3355
|
+
8 => 'On (81-point)', #38
|
3318
3356
|
},
|
3319
3357
|
},
|
3320
3358
|
7 => [
|
@@ -3559,18 +3597,18 @@ my %binaryDataAttrs = (
|
|
3559
3597
|
PrintConv => sub { PrintAFPoints(shift, \%afPoints153); },
|
3560
3598
|
PrintConvInv => sub { PrintAFPointsInv(shift, \%afPoints153); },
|
3561
3599
|
},
|
3562
|
-
{ #
|
3600
|
+
{ #38 (Z6/Z7/Z50)
|
3563
3601
|
Name => 'AFPointsUsed',
|
3564
|
-
Condition => '$$self{PhaseDetectAF} == 8',
|
3602
|
+
Condition => '$$self{PhaseDetectAF} == 8 and $$self{Model} =~ /^NIKON Z/',
|
3565
3603
|
Notes => q{
|
3566
|
-
models with
|
3567
|
-
point is
|
3604
|
+
models with 81-selectable point AF -- 9 rows (A-I) and 9 columns (1-9) for
|
3605
|
+
phase detect AF points. Center point is E5
|
3568
3606
|
},
|
3569
|
-
Format => 'undef[
|
3570
|
-
ValueConv => 'join(" ", unpack("H2"
|
3607
|
+
Format => 'undef[13]',
|
3608
|
+
ValueConv => 'join(" ", unpack("H2"x13, $val))',
|
3571
3609
|
ValueConvInv => '$val=~tr/ //d; pack("H*",$val)',
|
3572
|
-
PrintConv => sub {
|
3573
|
-
PrintConvInv => sub {
|
3610
|
+
PrintConv => sub { PrintAFPoints(shift, \%afPoints81); },
|
3611
|
+
PrintConvInv => sub { PrintAFPointsInv(shift, \%afPoints81); },
|
3574
3612
|
},
|
3575
3613
|
{ #PH
|
3576
3614
|
Name => 'AFPointsUsed',
|
@@ -4659,7 +4697,7 @@ my %nikonFocalConversions = (
|
|
4659
4697
|
Priority => 0,
|
4660
4698
|
},
|
4661
4699
|
# note: DecryptLen currently set to 0x251
|
4662
|
-
|
4700
|
+
|
4663
4701
|
# 0x55c - int16u[2400] TiffMeteringImage2: 60x40 image (ShotInfoVersion 0800, ref JR)
|
4664
4702
|
# 0x181c - int16u[1200] TiffMeteringImage?: 60x20 image for some NEF's (ShotInfoVersion 0800, ref JR)
|
4665
4703
|
# 0x217c - int16u[2400] TiffMeteringImage3: 60x40 image (ShotInfoVersion 0800, ref JR)
|
@@ -39,7 +39,7 @@ use Image::ExifTool qw(:DataAccess :Utils);
|
|
39
39
|
use Image::ExifTool::Exif;
|
40
40
|
use Image::ExifTool::APP12;
|
41
41
|
|
42
|
-
$VERSION = '2.
|
42
|
+
$VERSION = '2.65';
|
43
43
|
|
44
44
|
sub PrintLensInfo($$$);
|
45
45
|
|
@@ -172,7 +172,9 @@ my %olympusLensTypes = (
|
|
172
172
|
'2 28 10' => 'Lumix G Vario 12-60mm F3.5-5.6 Asph. Power OIS', #NJ
|
173
173
|
'2 29 10' => 'Leica DG Summilux 12mm F1.4 Asph.', #IB
|
174
174
|
'2 30 10' => 'Leica DG Vario-Elmarit 12-60mm F2.8-4 Asph. Power OIS', #IB
|
175
|
+
'2 32 10' => 'Lumix G Vario 100-300mm F4.0-5.6 II', #PH
|
175
176
|
'2 33 10' => 'Lumix G X Vario 12-35mm F2.8 II Asph. Power OIS', #IB
|
177
|
+
'2 34 10' => 'Lumix G Vario 35-100mm F2.8 II', #forum3833
|
176
178
|
'2 35 10' => 'Leica DG Vario-Elmarit 8-18mm F2.8-4 Asph.', #IB
|
177
179
|
'2 36 10' => 'Leica DG Elmarit 200mm F2.8 Power OIS', #IB
|
178
180
|
'2 37 10' => 'Leica DG Vario-Elmarit 50-200mm F2.8-4 Asph. Power OIS', #IB
|
@@ -92,7 +92,7 @@ my %isDatChunk = ( IDAT => 1, JDAT => 1, JDAA => 1 );
|
|
92
92
|
my %isTxtChunk = ( tEXt => 1, zTXt => 1, iTXt => 1 );
|
93
93
|
|
94
94
|
# chunks that we shouldn't move other chunks across (ref 3)
|
95
|
-
my %noLeapFrog = ( SAVE => 1, SEEK => 1, IHDR => 1, JHDR => 1, IEND => 1, MEND => 1,
|
95
|
+
my %noLeapFrog = ( SAVE => 1, SEEK => 1, IHDR => 1, JHDR => 1, IEND => 1, MEND => 1,
|
96
96
|
DHDR => 1, BASI => 1, CLON => 1, PAST => 1, SHOW => 1, MAGN => 1 );
|
97
97
|
|
98
98
|
# PNG chunks
|
@@ -4309,15 +4309,15 @@ my %binaryDataAttrs = (
|
|
4309
4309
|
Name => 'LC3',
|
4310
4310
|
%lensCode,
|
4311
4311
|
},
|
4312
|
-
5 => { # LC4 =
|
4312
|
+
5 => { # LC4 = aberration correction, near distance data
|
4313
4313
|
Name => 'LC4',
|
4314
4314
|
%lensCode,
|
4315
4315
|
},
|
4316
|
-
6 => { # LC5 = light color
|
4316
|
+
6 => { # LC5 = light color aberration correction data
|
4317
4317
|
Name => 'LC5',
|
4318
4318
|
%lensCode,
|
4319
4319
|
},
|
4320
|
-
7 => { # LC6 = open
|
4320
|
+
7 => { # LC6 = open aberration data
|
4321
4321
|
Name => 'LC6',
|
4322
4322
|
%lensCode,
|
4323
4323
|
},
|