exiftool_vendored 11.61.0 → 11.62.0
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- checksums.yaml +4 -4
- data/bin/Changes +14 -3
- data/bin/META.json +1 -1
- data/bin/META.yml +1 -1
- data/bin/README +3 -3
- data/bin/exiftool +14 -3
- data/bin/lib/Image/ExifTool.pm +2 -1
- data/bin/lib/Image/ExifTool.pod +7 -4
- data/bin/lib/Image/ExifTool/Canon.pm +37 -5
- data/bin/lib/Image/ExifTool/Geotag.pm +2 -2
- data/bin/lib/Image/ExifTool/Minolta.pm +15 -11
- data/bin/lib/Image/ExifTool/Olympus.pm +2 -1
- data/bin/lib/Image/ExifTool/Panasonic.pm +6 -4
- data/bin/lib/Image/ExifTool/Pentax.pm +4 -2
- data/bin/lib/Image/ExifTool/Sigma.pm +3 -1
- data/bin/lib/Image/ExifTool/WriteXMP.pl +3 -1
- data/bin/lib/Image/ExifTool/Writer.pl +5 -0
- data/bin/lib/Image/ExifTool/XMP.pm +12 -5
- 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: fc94cfa90b14193e0341f4f89a55df3d76ce0d6e
|
|
4
|
+
data.tar.gz: 30ee5059a3860f00728a1b494a1e2c2214dbb53c
|
|
5
5
|
SHA512:
|
|
6
|
-
metadata.gz:
|
|
7
|
-
data.tar.gz:
|
|
6
|
+
metadata.gz: 7038421428a12c1241859e9b4618fb793b27402551223e6a75fa579fe8431176be2a50c55cfabcdffb1a2762f25bd3048966d708b93f8b58992b7778c2b90d56
|
|
7
|
+
data.tar.gz: b1a513de8056df7f840c39711a016558da24058a6d3cd5bc7c38839e02e717c10b6c28935d6d868d416f7071ae33f6d6f806ef2adb8794c2e162bceecd4b9298
|
data/bin/Changes
CHANGED
|
@@ -7,20 +7,31 @@ RSS feed: http://owl.phy.queensu.ca/~phil/exiftool/rss.xml
|
|
|
7
7
|
Note: The most recent production release is Version 11.50. (Other versions are
|
|
8
8
|
considered development releases, and are not uploaded to CPAN.)
|
|
9
9
|
|
|
10
|
+
Aug. 15, 2019 - Version 11.62
|
|
11
|
+
|
|
12
|
+
- Added a number of new Canon, Pentax, Sony and Sigma lenses (thanks LibRaw)
|
|
13
|
+
- Removed some extraneous verbose warnings when geotagging
|
|
14
|
+
- Removed Minolta LensType value for a non-existent lens (thanks LibRaw)
|
|
15
|
+
- Patched problem writing some simple qualified XMP values
|
|
16
|
+
- Patched to avoid writing files in Windows with Unicode surrogate characters
|
|
17
|
+
in their name unless the -overwrite_original_in_place option is used
|
|
18
|
+
- Fixed an incorrect Pentax LensType (thanks LibRaw)
|
|
19
|
+
- Fixed family 2 group names of some XMP-exifEX and XMP Composite tags
|
|
20
|
+
|
|
10
21
|
Aug. 7, 2019 - Version 11.61
|
|
11
22
|
|
|
12
23
|
- Added a new FujiFilm CropMode (thanks LibRaw)
|
|
13
|
-
- Added a
|
|
24
|
+
- Added a few new proprietary CustomRendered values (thanks Jeffrey Friedl)
|
|
14
25
|
- Added a new Nikon LensID and fixed a Canon LensType (thanks LibRaw)
|
|
15
26
|
- Added a new CanonModelID
|
|
16
27
|
- Decode more Sony DSC-RX100M7 tags (thanks Jos Roost)
|
|
17
28
|
- Write standard EXIF to PNG even if non-standard EXIF already exists
|
|
18
|
-
- Patched to avoid problems overriding new values when writing thumbnail and
|
|
19
|
-
preview images
|
|
20
29
|
- Changed a Minolta/Sony LensType (thanks LibRaw)
|
|
21
30
|
- Changed Composite GPS reference direction tags to be derived from only the
|
|
22
31
|
XMP-exif GPS coordinate tags (and not other XMP GPS coordinates)
|
|
23
32
|
- Reverted a PNG Validation check that was removed from 11.60
|
|
33
|
+
- Patched to avoid problems overriding new values when writing thumbnail and
|
|
34
|
+
preview images
|
|
24
35
|
|
|
25
36
|
July 30, 2019 - Version 11.60
|
|
26
37
|
|
data/bin/META.json
CHANGED
data/bin/META.yml
CHANGED
data/bin/README
CHANGED
|
@@ -76,7 +76,7 @@ See html/index.html for more details about ExifTool features.
|
|
|
76
76
|
|
|
77
77
|
ExifTool can be downloaded from
|
|
78
78
|
|
|
79
|
-
|
|
79
|
+
https://owl.phy.queensu.ca/~phil/exiftool/
|
|
80
80
|
|
|
81
81
|
RUNNING
|
|
82
82
|
|
|
@@ -104,8 +104,8 @@ your home directory, then you would type the following commands in a
|
|
|
104
104
|
terminal window to extract and run ExifTool:
|
|
105
105
|
|
|
106
106
|
cd ~/Desktop
|
|
107
|
-
gzip -dc Image-ExifTool-11.
|
|
108
|
-
cd Image-ExifTool-11.
|
|
107
|
+
gzip -dc Image-ExifTool-11.62.tar.gz | tar -xf -
|
|
108
|
+
cd Image-ExifTool-11.62
|
|
109
109
|
./exiftool t/images/ExifTool.jpg
|
|
110
110
|
|
|
111
111
|
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.62';
|
|
14
14
|
|
|
15
15
|
# add our 'lib' directory to the include list BEFORE 'use Image::ExifTool'
|
|
16
16
|
my $exeDir;
|
|
@@ -3500,7 +3500,7 @@ sub ScanDir($$;$)
|
|
|
3500
3500
|
{
|
|
3501
3501
|
local $_;
|
|
3502
3502
|
my ($et, $dir, $list) = @_;
|
|
3503
|
-
my (@fileList, $done, $file, $utf8Name);
|
|
3503
|
+
my (@fileList, $done, $file, $utf8Name, $winSurrogate);
|
|
3504
3504
|
my $enc = $et->Options('CharsetFileName');
|
|
3505
3505
|
# recode as UTF-8 if necessary
|
|
3506
3506
|
if ($enc) {
|
|
@@ -3529,6 +3529,7 @@ sub ScanDir($$;$)
|
|
|
3529
3529
|
chomp $evalWarning;
|
|
3530
3530
|
$evalWarning =~ s/ at .*//s;
|
|
3531
3531
|
Warn "Warning: [Win32::FindFile] $evalWarning - $dir\n";
|
|
3532
|
+
$winSurrogate = 1 if $evalWarning =~ /surrogate/;
|
|
3532
3533
|
} else {
|
|
3533
3534
|
$et->Options(CharsetFileName => 'UTF8'); # now using UTF8
|
|
3534
3535
|
$utf8Name = 1; # ReadDir returns UTF-8 file names
|
|
@@ -3568,6 +3569,16 @@ sub ScanDir($$;$)
|
|
|
3568
3569
|
ScanDir($et, $path, $list);
|
|
3569
3570
|
next;
|
|
3570
3571
|
}
|
|
3572
|
+
# Windows patch to avoid replacing filename containing Unicode surrogate with 8.3 name
|
|
3573
|
+
if ($winSurrogate and $isWriting and
|
|
3574
|
+
(not $overwriteOrig or $overwriteOrig != 2) and
|
|
3575
|
+
not $doSetFileName and $file =~ /~/) # (8.3 name will contain a tilde)
|
|
3576
|
+
{
|
|
3577
|
+
Warn("Not writing $path\n");
|
|
3578
|
+
WarnOnce("Use -overwrite_original_in_place to write files with Unicode surrogate characters\n");
|
|
3579
|
+
++$countBad;
|
|
3580
|
+
next;
|
|
3581
|
+
}
|
|
3571
3582
|
# apply rules from -ext options
|
|
3572
3583
|
my $accepted;
|
|
3573
3584
|
if ($filterFlag) {
|
|
@@ -5157,7 +5168,7 @@ with this command:
|
|
|
5157
5168
|
|
|
5158
5169
|
produces output like this:
|
|
5159
5170
|
|
|
5160
|
-
-- Generated by ExifTool 11.
|
|
5171
|
+
-- Generated by ExifTool 11.62 --
|
|
5161
5172
|
File: a.jpg - 2003:10:31 15:44:19
|
|
5162
5173
|
(f/5.6, 1/60s, ISO 100)
|
|
5163
5174
|
File: b.jpg - 2006:05:23 11:57:38
|
data/bin/lib/Image/ExifTool.pm
CHANGED
|
@@ -27,7 +27,7 @@ use vars qw($VERSION $RELEASE @ISA @EXPORT_OK %EXPORT_TAGS $AUTOLOAD @fileTypes
|
|
|
27
27
|
%mimeType $swapBytes $swapWords $currentByteOrder %unpackStd
|
|
28
28
|
%jpegMarker %specialTags %fileTypeLookup);
|
|
29
29
|
|
|
30
|
-
$VERSION = '11.
|
|
30
|
+
$VERSION = '11.62';
|
|
31
31
|
$RELEASE = '';
|
|
32
32
|
@ISA = qw(Exporter);
|
|
33
33
|
%EXPORT_TAGS = (
|
|
@@ -4638,6 +4638,7 @@ sub AddCompositeTags($;$)
|
|
|
4638
4638
|
}
|
|
4639
4639
|
}
|
|
4640
4640
|
# make sure new TagID is unique by adding index if necessary
|
|
4641
|
+
# (could only happen for UserDefined tags now that module name is added to tag ID)
|
|
4641
4642
|
my $n = 0;
|
|
4642
4643
|
while ($$compTable{$new}) {
|
|
4643
4644
|
$new =~ s/-\d+$// if $n++;
|
data/bin/lib/Image/ExifTool.pod
CHANGED
|
@@ -531,8 +531,11 @@ without recoding. Default is 0.
|
|
|
531
531
|
|
|
532
532
|
Comma-delimited list of settings for writing compact XMP. Below is a list
|
|
533
533
|
of available settings. Note that 'NoPadding' effects only embedded XMP
|
|
534
|
-
since padding is never written for stand-alone XMP files.
|
|
535
|
-
|
|
534
|
+
since padding is never written for stand-alone XMP files. Also note that
|
|
535
|
+
'OneDesc' is not recommended when writing XMP larger than 64 kB to a JPG
|
|
536
|
+
file because it interferes with ExifTool's technique of splitting off the
|
|
537
|
+
large description elements into the extended XMP. Case is not significant
|
|
538
|
+
for any of these options. Default is undef.
|
|
536
539
|
|
|
537
540
|
NoPadding - Avoid 2 kB of recommended padding at end of XMP
|
|
538
541
|
NoIndent - Avoid spaces to indent lines for readability
|
|
@@ -1512,8 +1515,8 @@ Flag to replace the previous new values for this tag (ie. replace the values
|
|
|
1512
1515
|
set in previous calls to L</SetNewValue>). This option is most commonly
|
|
1513
1516
|
used to replace previously-set new values for list-type tags. Valid values
|
|
1514
1517
|
are 0 (set new value normally -- adds to new values for list-type tags), 1
|
|
1515
|
-
(reset previous new values
|
|
1516
|
-
|
|
1518
|
+
(reset any previous new values before setting new value) or 2 (reset
|
|
1519
|
+
previous new values only; new value argument is ignored).
|
|
1517
1520
|
|
|
1518
1521
|
=item Shift
|
|
1519
1522
|
|
|
@@ -88,7 +88,7 @@ sub ProcessCTMD($$$);
|
|
|
88
88
|
sub ProcessExifInfo($$$);
|
|
89
89
|
sub SwapWords($);
|
|
90
90
|
|
|
91
|
-
$VERSION = '4.
|
|
91
|
+
$VERSION = '4.21';
|
|
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)
|
|
@@ -146,11 +146,13 @@ $VERSION = '4.20';
|
|
|
146
146
|
26.3 => 'Tamron SP AF 180mm f/3.5 Di Macro', #15
|
|
147
147
|
26.4 => 'Carl Zeiss Planar T* 50mm f/1.4', #PH
|
|
148
148
|
26.5 => 'Voigtlander APO Lanthar 125mm F2.5 SL Macro', #JR
|
|
149
|
+
26.6 => 'Carl Zeiss Planar T 85mm f/1.4 ZE', #IB
|
|
149
150
|
27 => 'Canon EF 35-80mm f/4-5.6', #32
|
|
150
151
|
# 27 => 'Carl Zeiss Distagon T* 28mm f/2 ZF', #PH (must be with an adapter, because the ZF version is a Nikon mount)
|
|
151
152
|
# 27 => 'EMF adapter for Canon EOS digital cameras', #50 (reports MaxFocalLength of 65535)
|
|
152
153
|
# 27 => optix adapter
|
|
153
154
|
# 27 => Venus Optics Laowa 12mm f2.8 Zero-D or 105mm f2 (T3.2) Smooth Trans Focus (ref IB)
|
|
155
|
+
# 27 => Venus Optics Laowa 105mm f2 STF (ref IB)
|
|
154
156
|
28 => 'Canon EF 80-200mm f/4.5-5.6 or Tamron Lens', #32
|
|
155
157
|
28.1 => 'Tamron SP AF 28-105mm f/2.8 LD Aspherical IF', #15
|
|
156
158
|
28.2 => 'Tamron SP AF 28-75mm f/2.8 XR Di LD Aspherical [IF] Macro', #4
|
|
@@ -197,6 +199,7 @@ $VERSION = '4.20';
|
|
|
197
199
|
46 => 'Canon EF 28-90mm f/4-5.6', #32
|
|
198
200
|
47 => 'Zeiss Milvus 35mm f/2 or 50mm f/2', #IB
|
|
199
201
|
47.1 => 'Zeiss Milvus 50mm f/2 Makro', #IB
|
|
202
|
+
47.2 => 'Zeiss Milvus 135mm f/2 ZE', #IB
|
|
200
203
|
48 => 'Canon EF-S 18-55mm f/3.5-5.6 IS', #20
|
|
201
204
|
49 => 'Canon EF-S 55-250mm f/4-5.6 IS', #23
|
|
202
205
|
50 => 'Canon EF-S 18-200mm f/3.5-5.6 IS',
|
|
@@ -214,6 +217,10 @@ $VERSION = '4.20';
|
|
|
214
217
|
103.1 => 'Rokinon SP 14mm f/2.4', #IB
|
|
215
218
|
103.2 => 'Rokinon AF 14mm f/2.8 EF', #IB
|
|
216
219
|
106 => 'Rokinon SP / Samyang XP 35mm f/1.2', #IB
|
|
220
|
+
112 => 'Sigma 28mm f/1.5 FF High-speed Prime or other Sigma Lens', #IB
|
|
221
|
+
112.1 => 'Sigma 40mm f/1.5 FF High-speed Prime', #IB
|
|
222
|
+
112.2 => 'Sigma 105mm f/1.5 FF High-speed Prime', #IB
|
|
223
|
+
117 => 'Tamron 35-150mm f/2.8-4.0 Di VC OSD', #IB (A043)
|
|
217
224
|
124 => 'Canon MP-E 65mm f/2.8 1-5x Macro Photo', #9
|
|
218
225
|
125 => 'Canon TS-E 24mm f/3.5L',
|
|
219
226
|
126 => 'Canon TS-E 45mm f/2.8', #15
|
|
@@ -230,6 +237,7 @@ $VERSION = '4.20';
|
|
|
230
237
|
# 'Sigma APO 120-300mm f/2.8 EX DG HSM + 2x', #15
|
|
231
238
|
131.6 => 'Sigma 4.5mm f/2.8 EX DC HSM Circular Fisheye', #PH
|
|
232
239
|
131.7 => 'Sigma 70-200mm f/2.8 APO EX HSM', #PH (http://www.lensrentals.com/blog/2012/08/canon-illumination-correction-and-third-party-lenses)
|
|
240
|
+
131.8 => 'Sigma 28-70mm f/2.8-4 DG', #IB
|
|
233
241
|
132 => 'Canon EF 1200mm f/5.6L USM', #32
|
|
234
242
|
134 => 'Canon EF 600mm f/4L IS USM', #15
|
|
235
243
|
135 => 'Canon EF 200mm f/1.8L USM',
|
|
@@ -251,6 +259,7 @@ $VERSION = '4.20';
|
|
|
251
259
|
'137.14' => 'Tamron SP 24-70mm f/2.8 Di VC USD', #PH
|
|
252
260
|
'137.15' => 'Sigma 18-35mm f/1.8 DC HSM', #David Monro
|
|
253
261
|
'137.16' => 'Sigma 12-24mm f/4.5-5.6 DG HSM II', #IB
|
|
262
|
+
'137.17' => 'Sigma 70-300mm f/4-5.6 DG OS', #IB
|
|
254
263
|
138 => 'Canon EF 28-80mm f/2.8-4L', #32
|
|
255
264
|
139 => 'Canon EF 400mm f/2.8L USM',
|
|
256
265
|
140 => 'Canon EF 500mm f/4.5L USM', #32
|
|
@@ -276,6 +285,7 @@ $VERSION = '4.20';
|
|
|
276
285
|
152.2 => 'Sigma 14mm f/2.8 EX Aspherical HSM', #15
|
|
277
286
|
152.3 => 'Sigma 10-20mm f/4-5.6', #14
|
|
278
287
|
152.4 => 'Sigma 100-300mm f/4', # (ref Bozi)
|
|
288
|
+
152.5 => 'Sigma 300-800mm f/5.6 APO EX DG HSM', #IB
|
|
279
289
|
153 => 'Canon EF 35-350mm f/3.5-5.6L USM or Sigma or Tamron Lens', #PH
|
|
280
290
|
153.1 => 'Sigma 50-500mm f/4-6.3 APO HSM EX', #15
|
|
281
291
|
153.2 => 'Tamron AF 28-300mm f/3.5-6.3 XR LD Aspherical [IF] Macro',
|
|
@@ -283,6 +293,8 @@ $VERSION = '4.20';
|
|
|
283
293
|
153.4 => 'Tamron 18-250mm f/3.5-6.3 Di II LD Aspherical [IF] Macro', #PH
|
|
284
294
|
154 => 'Canon EF 20mm f/2.8 USM or Zeiss Lens', #15
|
|
285
295
|
154.1 => 'Zeiss Milvus 21mm f/2.8', #IB
|
|
296
|
+
154.2 => 'Zeiss Milvus 15mm f/2.8 ZE', #IB
|
|
297
|
+
154.3 => 'Zeiss Milvus 18mm f/2.8 ZE', #IB
|
|
286
298
|
155 => 'Canon EF 85mm f/1.8 USM or Sigma Lens',
|
|
287
299
|
155.1 => 'Sigma 14mm f/1.8 DG HSM | A', #IB (A017)
|
|
288
300
|
156 => 'Canon EF 28-105mm f/3.5-4.5 USM or Tamron Lens',
|
|
@@ -320,18 +332,29 @@ $VERSION = '4.20';
|
|
|
320
332
|
169.6 => 'Sigma 30mm f/1.4 EX DC HSM', #Rodolfo Borges
|
|
321
333
|
169.7 => 'Sigma 35mm f/1.4 DG HSM', #PH (also "| A" version, ref 50)
|
|
322
334
|
169.8 => 'Sigma 35mm f/1.5 FF High-Speed Prime | 017', #IB
|
|
323
|
-
|
|
335
|
+
169.9 => 'Sigma 70mm f/2.8 Macro EX DG', #IB
|
|
336
|
+
170 => 'Canon EF 200mm f/2.8L II USM or Sigma Lens', #9
|
|
337
|
+
170.1 => 'Sigma 300mm f/2.8 APO EX DG HSM', #IB
|
|
338
|
+
170.2 => 'Sigma 800mm f/5.6 APO EX DG HSM', #IB
|
|
324
339
|
171 => 'Canon EF 300mm f/4L USM', #15
|
|
325
340
|
172 => 'Canon EF 400mm f/5.6L USM or Sigma Lens', #32
|
|
326
341
|
172.1 =>'Sigma 150-600mm f/5-6.3 DG OS HSM | S', #50
|
|
342
|
+
172.2 => 'Sigma 500mm f/4.5 APO EX DG HSM', #IB
|
|
327
343
|
173 => 'Canon EF 180mm Macro f/3.5L USM or Sigma Lens', #9
|
|
328
344
|
173.1 => 'Sigma 180mm EX HSM Macro f/3.5', #14
|
|
329
345
|
173.2 => 'Sigma APO Macro 150mm f/2.8 EX DG HSM', #14
|
|
346
|
+
173.3 => 'Sigma 10mm f/2.8 EX DC Fisheye', #IB
|
|
347
|
+
173.4 => 'Sigma 15mm f/2.8 EX DG Diagonal Fisheye', #IB
|
|
330
348
|
174 => 'Canon EF 135mm f/2L USM or Other Lens', #9
|
|
331
349
|
174.1 => 'Sigma 70-200mm f/2.8 EX DG APO OS HSM', #PH (probably version II of this lens)
|
|
332
350
|
174.2 => 'Sigma 50-500mm f/4.5-6.3 APO DG OS HSM', #forum4031
|
|
333
351
|
174.3 => 'Sigma 150-500mm f/5-6.3 APO DG OS HSM', #47
|
|
334
352
|
174.4 => 'Zeiss Milvus 100mm f/2 Makro', #IB
|
|
353
|
+
174.5 => 'Sigma APO 50-150mm f/2.8 EX DC OS HSM', #IB
|
|
354
|
+
174.6 => 'Sigma APO 120-300mm f/2.8 EX DG OS HSM', #IB
|
|
355
|
+
174.7 => 'Sigma 120-300mm f/2.8 DG OS HSM S013', #IB
|
|
356
|
+
174.8 => 'Sigma 120-400mm f/4.5-5.6 APO DG OS HSM', #IB
|
|
357
|
+
174.9 => 'Sigma 200-500mm f/2.8 APO EX DG', #IB
|
|
335
358
|
175 => 'Canon EF 400mm f/2.8L USM', #32
|
|
336
359
|
176 => 'Canon EF 24-85mm f/3.5-4.5 USM',
|
|
337
360
|
177 => 'Canon EF 300mm f/4L IS USM', #9
|
|
@@ -375,17 +398,19 @@ $VERSION = '4.20';
|
|
|
375
398
|
196 => 'Canon EF 75-300mm f/4-5.6 USM', #15/32
|
|
376
399
|
197 => 'Canon EF 75-300mm f/4-5.6 IS USM or Sigma Lens',
|
|
377
400
|
197.1 => 'Sigma 18-300mm f/3.5-6.3 DC Macro OS HS', #50
|
|
378
|
-
198 => 'Canon EF 50mm f/1.4 USM or
|
|
401
|
+
198 => 'Canon EF 50mm f/1.4 USM or Other Lens',
|
|
379
402
|
198.1 => 'Zeiss Otus 55mm f/1.4 ZE', #JR (seen only on Sony camera)
|
|
380
403
|
198.2 => 'Zeiss Otus 85mm f/1.4 ZE', #JR (NC)
|
|
381
404
|
198.3 => 'Zeiss Milvus 25mm f/1.4', #IB
|
|
382
405
|
198.4 => 'Zeiss Otus 100mm f/1.4', #IB
|
|
406
|
+
198.5 => 'Zeiss Milvus 35mm f/1.4 ZE', #IB
|
|
407
|
+
198.6 => 'Yongnuo YN 35mm f/2', #IB
|
|
383
408
|
199 => 'Canon EF 28-80mm f/3.5-5.6 USM', #32
|
|
384
409
|
200 => 'Canon EF 75-300mm f/4-5.6 USM', #32
|
|
385
410
|
201 => 'Canon EF 28-80mm f/3.5-5.6 USM', #32
|
|
386
411
|
202 => 'Canon EF 28-80mm f/3.5-5.6 USM IV',
|
|
387
412
|
208 => 'Canon EF 22-55mm f/4-5.6 USM', #32
|
|
388
|
-
209 => 'Canon EF 55-200mm f/4.5-5.6', #32
|
|
413
|
+
209 => 'Canon EF 55-200mm f/4.5-5.6', #32 (USM mk I version? ref IB)
|
|
389
414
|
210 => 'Canon EF 28-90mm f/4-5.6 USM', #32
|
|
390
415
|
211 => 'Canon EF 28-200mm f/3.5-5.6 USM', #15
|
|
391
416
|
212 => 'Canon EF 28-105mm f/4-5.6 USM', #15
|
|
@@ -397,6 +422,7 @@ $VERSION = '4.20';
|
|
|
397
422
|
214 => 'Canon EF-S 18-55mm f/3.5-5.6 USM', #PH/34
|
|
398
423
|
215 => 'Canon EF 55-200mm f/4.5-5.6 II USM',
|
|
399
424
|
217 => 'Tamron AF 18-270mm f/3.5-6.3 Di II VC PZD', #47
|
|
425
|
+
220 => 'Yongnuo YN 50mm f/1.8', #IB
|
|
400
426
|
224 => 'Canon EF 70-200mm f/2.8L IS USM', #11
|
|
401
427
|
225 => 'Canon EF 70-200mm f/2.8L IS USM + 1.4x', #11
|
|
402
428
|
226 => 'Canon EF 70-200mm f/2.8L IS USM + 2x', #14
|
|
@@ -404,7 +430,8 @@ $VERSION = '4.20';
|
|
|
404
430
|
228 => 'Canon EF 28-105mm f/3.5-4.5 USM', #32
|
|
405
431
|
229 => 'Canon EF 16-35mm f/2.8L USM', #PH
|
|
406
432
|
230 => 'Canon EF 24-70mm f/2.8L USM', #9
|
|
407
|
-
231 => 'Canon EF 17-40mm f/4L USM',
|
|
433
|
+
231 => 'Canon EF 17-40mm f/4L USM or Sigma Lens',
|
|
434
|
+
231.1 => 'Sigma 12-24mm f/4 DG HSM A016', #IB
|
|
408
435
|
232 => 'Canon EF 70-300mm f/4.5-5.6 DO IS USM', #15
|
|
409
436
|
233 => 'Canon EF 28-300mm f/3.5-5.6L IS USM', #PH
|
|
410
437
|
234 => 'Canon EF-S 17-85mm f/4-5.6 IS USM or Tokina Lens', #19
|
|
@@ -428,11 +455,13 @@ $VERSION = '4.20';
|
|
|
428
455
|
248.1 => 'Sigma 24-35mm f/2 DG HSM | A', #JR
|
|
429
456
|
248.2 => 'Sigma 135mm f/2 FF High-Speed Prime | 017', #IB
|
|
430
457
|
248.3 => 'Sigma 24-35mm f/2.2 FF Zoom | 017', #IB
|
|
458
|
+
248.4 => 'Sigma 135mm f/1.8 DG HSM A017', #IB
|
|
431
459
|
249 => 'Canon EF 800mm f/5.6L IS USM', #35
|
|
432
460
|
250 => 'Canon EF 24mm f/1.4L II USM or Sigma Lens', #41
|
|
433
461
|
250.1 => 'Sigma 20mm f/1.4 DG HSM | A', #IB
|
|
434
462
|
250.2 => 'Sigma 20mm f/1.5 FF High-Speed Prime | 017', #IB
|
|
435
463
|
250.3 => 'Tokina Opera 16-28mm f/2.8 FF', #IB
|
|
464
|
+
250.4 => 'Sigma 85mm f/1.4 DG HSM A016', #IB
|
|
436
465
|
251 => 'Canon EF 70-200mm f/2.8L IS II USM',
|
|
437
466
|
251.1 => 'Canon EF 70-200mm f/2.8L IS III USM', #IB
|
|
438
467
|
252 => 'Canon EF 70-200mm f/2.8L IS II USM + 1.4x', #50 (1.4x Mk II)
|
|
@@ -451,6 +480,9 @@ $VERSION = '4.20';
|
|
|
451
480
|
368.5 => 'Sigma 28mm f/1.4 DG HSM | A', #IB (A019)
|
|
452
481
|
368.6 => 'Sigma 150-600mm f/5-6.3 DG OS HSM | S', #50
|
|
453
482
|
368.7 => 'Sigma 85mm f/1.4 DG HSM | A', #IB (016)
|
|
483
|
+
368.8 => 'Sigma 105mm f/1.4 DG HSM', #IB (A018)
|
|
484
|
+
368.9 => 'Sigma 14-24mm f/2.8 DG HSM', #IB (A018)
|
|
485
|
+
'368.10' => 'Sigma 70mm f/2.8 DG Macro', #IB (A018)
|
|
454
486
|
# Note: LensType 488 (0x1e8) is reported as 232 (0xe8) in 7D CameraSettings
|
|
455
487
|
488 => 'Canon EF-S 15-85mm f/3.5-5.6 IS USM', #PH
|
|
456
488
|
489 => 'Canon EF 70-300mm f/4-5.6L IS USM', #Gerald Kapounek
|
|
@@ -25,7 +25,7 @@ use strict;
|
|
|
25
25
|
use vars qw($VERSION);
|
|
26
26
|
use Image::ExifTool qw(:Public);
|
|
27
27
|
|
|
28
|
-
$VERSION = '1.
|
|
28
|
+
$VERSION = '1.60';
|
|
29
29
|
|
|
30
30
|
sub JITTER() { return 2 } # maximum time jitter
|
|
31
31
|
|
|
@@ -1135,7 +1135,7 @@ Category: foreach $category (qw{pos track alt orient atemp}) {
|
|
|
1135
1135
|
@r = $et->SetNewValue(GPSDateTime => "$gpsDate $gpsTime", %opts);
|
|
1136
1136
|
}
|
|
1137
1137
|
} else {
|
|
1138
|
-
my %opts;
|
|
1138
|
+
my %opts = ( IgnorePermanent => 1 );
|
|
1139
1139
|
$opts{Replace} = 2 if defined $val; # remove existing new values
|
|
1140
1140
|
$opts{Group} = $writeGroup if $writeGroup;
|
|
1141
1141
|
|
|
@@ -49,7 +49,7 @@ use vars qw($VERSION %minoltaLensTypes %minoltaTeleconverters %minoltaColorMode
|
|
|
49
49
|
use Image::ExifTool qw(:DataAccess :Utils);
|
|
50
50
|
use Image::ExifTool::Exif;
|
|
51
51
|
|
|
52
|
-
$VERSION = '2.
|
|
52
|
+
$VERSION = '2.81';
|
|
53
53
|
|
|
54
54
|
# Full list of product codes for Sony-compatible Minolta lenses
|
|
55
55
|
# (ref http://www.kb.sony.com/selfservice/documentLink.do?externalId=C1000570)
|
|
@@ -251,6 +251,7 @@ $VERSION = '2.79';
|
|
|
251
251
|
25.5 => 'Sigma 24mm F1.8 EX DG ASP Macro', #Florian Knorn
|
|
252
252
|
# 25 - also seen for an "old Sigma 50mm Macro" (forum2833)
|
|
253
253
|
27 => 'Minolta AF 85mm F1.4 G (D)', # added (D) (ref 13)
|
|
254
|
+
# 27 => 'Venus Optics Laowa 105mm F2 STF', #IB (NC)
|
|
254
255
|
28 => 'Minolta/Sony AF 100mm F2.8 Macro (D) or Tamron Lens',
|
|
255
256
|
# 28 => 'Sony 100mm F2.8 Macro (SAL100M28)', (ref 18/JR)
|
|
256
257
|
28.1 => 'Tamron SP AF 90mm F2.8 Di Macro', #JD (Model 272E)
|
|
@@ -288,8 +289,9 @@ $VERSION = '2.79';
|
|
|
288
289
|
45 => 'Carl Zeiss Planar T* 85mm F1.4 ZA (SAL85F14Z)', #JR
|
|
289
290
|
46 => 'Carl Zeiss Vario-Sonnar T* DT 16-80mm F3.5-4.5 ZA (SAL1680Z)', #JR
|
|
290
291
|
47 => 'Carl Zeiss Sonnar T* 135mm F1.8 ZA (SAL135F18Z)', #JR
|
|
291
|
-
48 => 'Carl Zeiss Vario-Sonnar T* 24-70mm F2.8 ZA SSM (SAL2470Z) or
|
|
292
|
+
48 => 'Carl Zeiss Vario-Sonnar T* 24-70mm F2.8 ZA SSM (SAL2470Z) or Other Lens', #11/JR
|
|
292
293
|
48.1 => 'Carl Zeiss Vario-Sonnar T* 24-70mm F2.8 ZA SSM II (SAL2470Z2)', #JR
|
|
294
|
+
48.2 => 'Tamron SP 24-70mm F2.8 Di USD', #IB (A007)
|
|
293
295
|
49 => 'Sony DT 55-200mm F4-5.6 (SAL55200)', #JD/JR
|
|
294
296
|
50 => 'Sony DT 18-250mm F3.5-6.3 (SAL18250)', #11/JR
|
|
295
297
|
51 => 'Sony DT 16-105mm F3.5-5.6 (SAL16105)', #11/JR
|
|
@@ -325,15 +327,15 @@ $VERSION = '2.79';
|
|
|
325
327
|
# was 128.1 => 'Tamron 18-200mm F3.5-6.3',
|
|
326
328
|
128.2 => 'Tamron AF 28-300mm F3.5-6.3 XR Di LD Aspherical [IF] Macro', #JR (Model A061)
|
|
327
329
|
# was 128.2 => 'Tamron 28-300mm F3.5-6.3',
|
|
328
|
-
|
|
329
|
-
128.
|
|
330
|
+
# (removed -- probably never existed, ref IB) 'Tamron 80-300mm F3.5-6.3',
|
|
331
|
+
128.3 => 'Tamron AF 28-200mm F3.8-5.6 XR Di Aspherical [IF] Macro', #JD (Model A031)
|
|
330
332
|
# also Tamron AF 28-200mm F3.8-5.6 Aspherical', #IB (Model 71D)
|
|
331
333
|
# and 'Tamron AF 28-200mm F3.8-5.6 LD Aspherical [IF] Super', #IB (Model 171D)
|
|
332
|
-
128.
|
|
333
|
-
128.
|
|
334
|
-
128.
|
|
335
|
-
128.
|
|
336
|
-
128.
|
|
334
|
+
128.4 => 'Tamron SP AF 17-35mm F2.8-4 Di LD Aspherical IF', #JD (Model A05)
|
|
335
|
+
128.5 => 'Sigma AF 50-150mm F2.8 EX DC APO HSM II', #JD
|
|
336
|
+
128.6 => 'Sigma 10-20mm F3.5 EX DC HSM', #11 (Model 202-205)
|
|
337
|
+
128.7 => 'Sigma 70-200mm F2.8 II EX DG APO MACRO HSM', #24
|
|
338
|
+
128.8 => 'Sigma 10mm F2.8 EX DC HSM Fisheye', #Florian Knorn
|
|
337
339
|
# (yes, '128.10'. My condolences to typed languages that use this database - PH)
|
|
338
340
|
'128.10' => 'Sigma 50mm F1.4 EX DG HSM', #Florian Knorn (Model A014, ref IB)
|
|
339
341
|
'128.11' => 'Sigma 85mm F1.4 EX DG HSM', #27
|
|
@@ -412,10 +414,11 @@ $VERSION = '2.79';
|
|
|
412
414
|
25521.7 => 'Angenieux AF 28-70mm F2.6', #JD
|
|
413
415
|
25521.8 => 'Tokina AT-X 17 AF 17mm F3.5', #27
|
|
414
416
|
25521.9 => 'Tokina 20-35mm F3.5-4.5 II AF', #IB
|
|
415
|
-
25531 => 'Minolta AF 28-135mm F4-4.5 or
|
|
417
|
+
25531 => 'Minolta AF 28-135mm F4-4.5 or Other Lens',
|
|
416
418
|
25531.1 => 'Sigma ZOOM-alpha 35-135mm F3.5-4.5', #16
|
|
417
419
|
25531.2 => 'Sigma 28-105mm F2.8-4 Aspherical', #JD
|
|
418
420
|
25531.3 => 'Sigma 28-105mm F4-5.6 UC', #JR
|
|
421
|
+
25531.4 => 'Tokina AT-X 242 AF 24-200mm F3.5-5.6', #IB
|
|
419
422
|
25541 => 'Minolta AF 35-105mm F3.5-4.5', #13
|
|
420
423
|
25551 => 'Minolta AF 70-210mm F4 Macro or Sigma Lens',
|
|
421
424
|
25551.1 => 'Sigma 70-210mm F4-5.6 APO', #7
|
|
@@ -502,7 +505,7 @@ $VERSION = '2.79';
|
|
|
502
505
|
26241 => 'Minolta AF 35-80mm F4-5.6 Power Zoom',
|
|
503
506
|
26281 => 'Minolta AF 80-200mm F2.8 HS-APO G', #11 ("HS-APO" added, white, probably same as 1, non-HS is 25891 - ref JR)
|
|
504
507
|
26291 => 'Minolta AF 85mm F1.4 New',
|
|
505
|
-
26311 => 'Minolta/Sony AF 100-300mm F4.5-5.6 APO', #11
|
|
508
|
+
26311 => 'Minolta/Sony AF 100-300mm F4.5-5.6 APO', #11 (does not exist? https://www.dyxum.com/dforum/lens-data-requested_topic23435_page2.html)
|
|
506
509
|
26321 => 'Minolta AF 24-50mm F4 New',
|
|
507
510
|
26381 => 'Minolta AF 50mm F2.8 Macro New',
|
|
508
511
|
26391 => 'Minolta AF 100mm F2.8 Macro',
|
|
@@ -517,6 +520,7 @@ $VERSION = '2.79';
|
|
|
517
520
|
# - this is the base to which the Canon LensType is added
|
|
518
521
|
30464 => 'Metabones Canon EF Speed Booster', #Metabones (to this, add Canon LensType)
|
|
519
522
|
45671 => 'Tokina 70-210mm F4-5.6', #22
|
|
523
|
+
45681 => 'Tokina AF 35-200mm F4-5.6 Zoom SD', #IB (model 352)
|
|
520
524
|
45701 => 'Tamron AF 35-135mm F3.5-4.5', #IB (model 40d)
|
|
521
525
|
45711 => 'Vivitar 70-210mm F4.5-5.6', #IB
|
|
522
526
|
45741 => '2x Teleconverter or Tamron or Tokina Lens', #18
|
|
@@ -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.60';
|
|
43
43
|
|
|
44
44
|
sub PrintLensInfo($$$);
|
|
45
45
|
|
|
@@ -1066,6 +1066,7 @@ my %indexInfo = (
|
|
|
1066
1066
|
0x1035 => { #6
|
|
1067
1067
|
Name => 'PreviewImageValid',
|
|
1068
1068
|
Writable => 'int32u',
|
|
1069
|
+
DelValue => 0,
|
|
1069
1070
|
PrintConv => { 0 => 'No', 1 => 'Yes' },
|
|
1070
1071
|
},
|
|
1071
1072
|
0x1036 => { #6
|
|
@@ -36,7 +36,7 @@ use vars qw($VERSION %leicaLensTypes);
|
|
|
36
36
|
use Image::ExifTool qw(:DataAccess :Utils);
|
|
37
37
|
use Image::ExifTool::Exif;
|
|
38
38
|
|
|
39
|
-
$VERSION = '2.
|
|
39
|
+
$VERSION = '2.06';
|
|
40
40
|
|
|
41
41
|
sub ProcessLeicaLEIC($$$);
|
|
42
42
|
sub WhiteBalanceConv($;$$);
|
|
@@ -108,7 +108,8 @@ sub WhiteBalanceConv($;$$);
|
|
|
108
108
|
39 => 'Macro-Elmar-M 90mm f/4', # 11633/11634
|
|
109
109
|
'39 0' => 'Tele-Elmar-M 135mm f/4 (II)',# 11861
|
|
110
110
|
40 => 'Macro-Adapter M', # 14409
|
|
111
|
-
|
|
111
|
+
41 => 'Apo-Summicron-M 50mm f/2 ASPH.', #IB
|
|
112
|
+
'41 3' => 'Apo-Summicron-M 50mm f/2 ASPH.', #16
|
|
112
113
|
42 => 'Tri-Elmar-M 28-35-50mm f/4 ASPH.',# 11625
|
|
113
114
|
'42 1' => 'Tri-Elmar-M 28-35-50mm f/4 ASPH. (at 28mm)',
|
|
114
115
|
'42 2' => 'Tri-Elmar-M 28-35-50mm f/4 ASPH. (at 35mm)',
|
|
@@ -123,8 +124,9 @@ sub WhiteBalanceConv($;$$);
|
|
|
123
124
|
50 => 'Elmar-M 24mm f/3.8 ASPH.', # ? (ref 11)
|
|
124
125
|
51 => 'Super-Elmar-M 21mm f/3.4 Asph', # ? (ref 16, frameSelectorBits=1)
|
|
125
126
|
'51 2' => 'Super-Elmar-M 14mm f/3.8 Asph', # ? (ref 16)
|
|
126
|
-
52 => '
|
|
127
|
-
|
|
127
|
+
52 => 'Apo-Telyt-M 18mm f/3.8 ASPH.', # ? (ref PH/11)
|
|
128
|
+
53 => 'Apo-Telyt-M 135mm f/3.4', #IB
|
|
129
|
+
'53 2' => 'Apo-Telyt-M 135mm f/3.4', #16
|
|
128
130
|
'53 3' => 'Apo-Summicron-M 50mm f/2 (VI)', #LR
|
|
129
131
|
58 => 'Noctilux-M 75mm f/1.25 ASPH.', # ? (ref IB)
|
|
130
132
|
);
|
|
@@ -58,7 +58,7 @@ use Image::ExifTool::Exif;
|
|
|
58
58
|
use Image::ExifTool::GPS;
|
|
59
59
|
use Image::ExifTool::HP;
|
|
60
60
|
|
|
61
|
-
$VERSION = '3.
|
|
61
|
+
$VERSION = '3.29';
|
|
62
62
|
|
|
63
63
|
sub CryptShutterCount($$);
|
|
64
64
|
sub PrintFilter($$$);
|
|
@@ -146,7 +146,7 @@ sub DecodeAFPoints($$$$;$);
|
|
|
146
146
|
'3 44.3' => 'Sigma 17-70mm F2.8-4.5 DC Macro', #(Bart Hickman)
|
|
147
147
|
'3 44.4' => 'Sigma 18-50mm F3.5-5.6 DC', #4
|
|
148
148
|
'3 44.5' => 'Sigma 17-35mm F2.8-4 EX DG', #29
|
|
149
|
-
'3 44.6' => 'Tamron 35-90mm F4 AF', #12
|
|
149
|
+
'3 44.6' => 'Tamron 35-90mm F4-5.6 AF', #12 (added "-5.6", ref IB)
|
|
150
150
|
'3 44.7' => 'Sigma AF 18-35mm F3.5-4.5 Aspherical', #29
|
|
151
151
|
'3 46' => 'Sigma or Samsung Lens (3 46)',
|
|
152
152
|
'3 46.1' => 'Sigma APO 70-200mm F2.8 EX',
|
|
@@ -306,6 +306,7 @@ sub DecodeAFPoints($$$$;$);
|
|
|
306
306
|
'8 0' => 'Sigma 50-150mm F2.8 II APO EX DC HSM', #forum2997
|
|
307
307
|
'8 3' => 'Sigma 18-125mm F3.8-5.6 DC HSM', #forum10167
|
|
308
308
|
'8 4' => 'Sigma 50mm F1.4 EX DG HSM', #Artur private communication
|
|
309
|
+
'8 6' => 'Sigma 4.5mm F2.8 EX DC Fisheye', #IB
|
|
309
310
|
'8 7' => 'Sigma 24-70mm F2.8 IF EX DG HSM', #Exiv2
|
|
310
311
|
'8 8' => 'Sigma 18-250mm F3.5-6.3 DC OS HSM', #27
|
|
311
312
|
'8 11' => 'Sigma 10-20mm F3.5 EX DC HSM', #27
|
|
@@ -316,6 +317,7 @@ sub DecodeAFPoints($$$$;$);
|
|
|
316
317
|
'8 16' => 'Sigma 70-200mm F2.8 EX DG Macro HSM II', #26
|
|
317
318
|
'8 17' => 'Sigma 50-500mm F4.5-6.3 DG OS HSM', #(Heike Herrmann) (also APO, ref 26)
|
|
318
319
|
'8 18' => 'Sigma 8-16mm F4.5-5.6 DC HSM', #forum2998
|
|
320
|
+
'8 20' => 'Sigma 18-50mm F2.8-4.5 DC HSM', #IB
|
|
319
321
|
'8 21' => 'Sigma 17-50mm F2.8 EX DC OS HSM', #26
|
|
320
322
|
'8 22' => 'Sigma 85mm F1.4 EX DG HSM', #26
|
|
321
323
|
'8 23' => 'Sigma 70-200mm F2.8 APO EX DG OS HSM', #27
|
|
@@ -19,7 +19,7 @@ use strict;
|
|
|
19
19
|
use vars qw($VERSION %sigmaLensTypes);
|
|
20
20
|
use Image::ExifTool::Exif;
|
|
21
21
|
|
|
22
|
-
$VERSION = '1.
|
|
22
|
+
$VERSION = '1.27';
|
|
23
23
|
|
|
24
24
|
# sigma LensType lookup (ref IB)
|
|
25
25
|
%sigmaLensTypes = (
|
|
@@ -118,6 +118,8 @@ $VERSION = '1.26';
|
|
|
118
118
|
0x484 => 'Sigma 8mm F4 EX DG Circular Fisheye',
|
|
119
119
|
0x485 => 'Sigma 8mm F3.5 EX DG Circular Fisheye',
|
|
120
120
|
0x486 => 'Sigma 4.5mm F2.8 EX DC HSM Circular Fisheye',
|
|
121
|
+
0x504 => 'Sigma 70-300mm F4-5.6 Macro Super', #IB
|
|
122
|
+
0x505 => 'Sigma APO 70-300mm F4-5.6 Macro Super', #IB
|
|
121
123
|
0x506 => 'Sigma 70-300mm F4-5.6 APO Macro Super II',
|
|
122
124
|
0x507 => 'Sigma 70-300mm F4-5.6 DL Macro Super II',
|
|
123
125
|
0x508 => 'Sigma 70-300mm F4-5.6 DG APO Macro',
|
|
@@ -1203,7 +1203,9 @@ sub WriteXMP($$;$)
|
|
|
1203
1203
|
$et->Warn("$grp:$$tagInfo{Name} written as a literal because value is not a valid URI", 1);
|
|
1204
1204
|
# fall through to write as a string literal
|
|
1205
1205
|
}
|
|
1206
|
-
|
|
1206
|
+
# remove existing value and/or resource attribute if they exist
|
|
1207
|
+
delete $attrs{'rdf:value'};
|
|
1208
|
+
delete $attrs{'rdf:resource'};
|
|
1207
1209
|
$capture{$path} = [ $newValue, \%attrs ];
|
|
1208
1210
|
last;
|
|
1209
1211
|
}
|
|
@@ -270,6 +270,7 @@ my %ignorePrintConv = map { $_ => 1 } qw(OTHER BITMASK Notes);
|
|
|
270
270
|
# NoFlat => treat flattened tags as 'unsafe'
|
|
271
271
|
# NoShortcut => true to prevent looking up shortcut tags
|
|
272
272
|
# ProtectSaved => protect existing new values with a save count greater than this
|
|
273
|
+
# IgnorePermanent => ignore attempts to delete a permanent tag
|
|
273
274
|
# CreateGroups => [internal use] createGroups hash ref from related tags
|
|
274
275
|
# ListOnly => [internal use] set only list or non-list tags
|
|
275
276
|
# SetTags => [internal use] hash ref to return tagInfo refs of set tags
|
|
@@ -891,6 +892,7 @@ TAG: foreach $tagInfo (@matchingTags) {
|
|
|
891
892
|
next;
|
|
892
893
|
}
|
|
893
894
|
} elsif ($permanent) {
|
|
895
|
+
return 0 if $options{IgnorePermanent};
|
|
894
896
|
# can't delete permanent tags, so set them to DelValue or empty string instead
|
|
895
897
|
if (defined $$tagInfo{DelValue}) {
|
|
896
898
|
$val = $$tagInfo{DelValue};
|
|
@@ -1125,6 +1127,9 @@ WriteAlso:
|
|
|
1125
1127
|
undef $evalWarning;
|
|
1126
1128
|
#### eval WriteAlso ($val)
|
|
1127
1129
|
my $v = eval $$writeAlso{$wtag};
|
|
1130
|
+
# we wanted to do the eval in case there are side effect, but we
|
|
1131
|
+
# don't want to write a value for a tag that is being deleted:
|
|
1132
|
+
undef $v unless defined $val;
|
|
1128
1133
|
$@ and $evalWarning = $@;
|
|
1129
1134
|
unless ($evalWarning) {
|
|
1130
1135
|
($n,$evalWarning) = $self->SetNewValue($wgrp . $wtag, $v, %opts);
|
|
@@ -49,7 +49,7 @@ use Image::ExifTool::Exif;
|
|
|
49
49
|
use Image::ExifTool::GPS;
|
|
50
50
|
require Exporter;
|
|
51
51
|
|
|
52
|
-
$VERSION = '3.
|
|
52
|
+
$VERSION = '3.26';
|
|
53
53
|
@ISA = qw(Exporter);
|
|
54
54
|
@EXPORT_OK = qw(EscapeXML UnescapeXML);
|
|
55
55
|
|
|
@@ -2056,10 +2056,11 @@ my %sPantryItem = (
|
|
|
2056
2056
|
Writable => 'integer',
|
|
2057
2057
|
},
|
|
2058
2058
|
CameraOwnerName => { Name => 'OwnerName' },
|
|
2059
|
-
BodySerialNumber => { Name => 'SerialNumber' },
|
|
2059
|
+
BodySerialNumber => { Name => 'SerialNumber', Groups => { 2 => 'Camera' } },
|
|
2060
2060
|
LensSpecification => {
|
|
2061
2061
|
Name => 'LensInfo',
|
|
2062
2062
|
Writable => 'rational',
|
|
2063
|
+
Groups => { 2 => 'Camera' },
|
|
2063
2064
|
List => 'Seq',
|
|
2064
2065
|
RawJoin => 1, # join list into a string before ValueConv
|
|
2065
2066
|
ValueConv => \&ConvertRationalList,
|
|
@@ -2083,9 +2084,9 @@ my %sPantryItem = (
|
|
|
2083
2084
|
instead of using the existing XMP-aux:LensInfo
|
|
2084
2085
|
},
|
|
2085
2086
|
},
|
|
2086
|
-
LensMake => { },
|
|
2087
|
-
LensModel => { },
|
|
2088
|
-
LensSerialNumber => { },
|
|
2087
|
+
LensMake => { Groups => { 2 => 'Camera' } },
|
|
2088
|
+
LensModel => { Groups => { 2 => 'Camera' } },
|
|
2089
|
+
LensSerialNumber => { Groups => { 2 => 'Camera' } },
|
|
2089
2090
|
InteroperabilityIndex => {
|
|
2090
2091
|
Name => 'InteropIndex',
|
|
2091
2092
|
Description => 'Interoperability Index',
|
|
@@ -2237,6 +2238,7 @@ my %sPantryItem = (
|
|
|
2237
2238
|
# (used to set EXIF GPS position from XMP tags)
|
|
2238
2239
|
GPSLatitudeRef => {
|
|
2239
2240
|
Require => 'XMP-exif:GPSLatitude',
|
|
2241
|
+
Groups => { 2 => 'Location' },
|
|
2240
2242
|
# Note: Do not Inihibit based on EXIF:GPSLatitudeRef (see forum10192)
|
|
2241
2243
|
ValueConv => q{
|
|
2242
2244
|
IsFloat($val[0]) and return $val[0] < 0 ? "S" : "N";
|
|
@@ -2247,6 +2249,7 @@ my %sPantryItem = (
|
|
|
2247
2249
|
},
|
|
2248
2250
|
GPSLongitudeRef => {
|
|
2249
2251
|
Require => 'XMP-exif:GPSLongitude',
|
|
2252
|
+
Groups => { 2 => 'Location' },
|
|
2250
2253
|
ValueConv => q{
|
|
2251
2254
|
IsFloat($val[0]) and return $val[0] < 0 ? "W" : "E";
|
|
2252
2255
|
$val[0] =~ /^.*([EW])/;
|
|
@@ -2256,6 +2259,7 @@ my %sPantryItem = (
|
|
|
2256
2259
|
},
|
|
2257
2260
|
GPSDestLatitudeRef => {
|
|
2258
2261
|
Require => 'XMP-exif:GPSDestLatitude',
|
|
2262
|
+
Groups => { 2 => 'Location' },
|
|
2259
2263
|
ValueConv => q{
|
|
2260
2264
|
IsFloat($val[0]) and return $val[0] < 0 ? "S" : "N";
|
|
2261
2265
|
$val[0] =~ /^.*([NS])/;
|
|
@@ -2265,6 +2269,7 @@ my %sPantryItem = (
|
|
|
2265
2269
|
},
|
|
2266
2270
|
GPSDestLongitudeRef => {
|
|
2267
2271
|
Require => 'XMP-exif:GPSDestLongitude',
|
|
2272
|
+
Groups => { 2 => 'Location' },
|
|
2268
2273
|
ValueConv => q{
|
|
2269
2274
|
IsFloat($val[0]) and return $val[0] < 0 ? "W" : "E";
|
|
2270
2275
|
$val[0] =~ /^.*([EW])/;
|
|
@@ -2287,6 +2292,7 @@ my %sPantryItem = (
|
|
|
2287
2292
|
Inhibit => {
|
|
2288
2293
|
6 => 'Composite:LensID', # don't override existing Composite:LensID
|
|
2289
2294
|
},
|
|
2295
|
+
Groups => { 2 => 'Camera' },
|
|
2290
2296
|
ValueConv => '$val',
|
|
2291
2297
|
PrintConv => 'Image::ExifTool::XMP::PrintLensID($self, @val)',
|
|
2292
2298
|
},
|
|
@@ -2300,6 +2306,7 @@ my %sPantryItem = (
|
|
|
2300
2306
|
4 => 'XMP:FlashRedEyeMode',
|
|
2301
2307
|
5 => 'XMP:Flash', # handle structured flash information too
|
|
2302
2308
|
},
|
|
2309
|
+
Groups => { 2 => 'Camera' },
|
|
2303
2310
|
Writable => 1,
|
|
2304
2311
|
PrintHex => 1,
|
|
2305
2312
|
SeparateTable => 'EXIF Flash',
|
metadata
CHANGED
|
@@ -1,7 +1,7 @@
|
|
|
1
1
|
--- !ruby/object:Gem::Specification
|
|
2
2
|
name: exiftool_vendored
|
|
3
3
|
version: !ruby/object:Gem::Version
|
|
4
|
-
version: 11.
|
|
4
|
+
version: 11.62.0
|
|
5
5
|
platform: ruby
|
|
6
6
|
authors:
|
|
7
7
|
- Matthew McEachen
|
|
@@ -9,7 +9,7 @@ authors:
|
|
|
9
9
|
autorequire:
|
|
10
10
|
bindir: bin
|
|
11
11
|
cert_chain: []
|
|
12
|
-
date: 2019-08-
|
|
12
|
+
date: 2019-08-15 00:00:00.000000000 Z
|
|
13
13
|
dependencies:
|
|
14
14
|
- !ruby/object:Gem::Dependency
|
|
15
15
|
name: exiftool
|