exiftool_vendored 11.49.0 → 11.50.0

data/bin/lib/Image/ExifTool/TagNames.pod

@@ -12,7 +12,7 @@ meta information extracted from or written to a file.
 =head1 TAG TABLES
 
 The tables listed below give the names of all tags recognized by ExifTool.
-They contain a total of 22566 tags, with 15012 unique tag names.
+They contain a total of 22568 tags, with 15014 unique tag names.
 
 B<Tag ID>, B<Index#> or B<Sequence> is given in the first column of each
 table.  A B<Tag ID> is the computer-readable equivalent of a tag name, and
@@ -68,7 +68,7 @@ listed as the computer-readable and human-readable values on the left and
 right hand side of an equals sign (C<=>) respectively.  The human-readable
 values are used by default when reading and writing, but the
 computer-readable values may be accessed by disabling the value conversion
-with the -n option on the command line, by setting the ValueConv option to 0
+with the -n option on the command line, by setting the PrintConv option to 0
 in the API, or or on a per-tag basis by adding a hash (C<#>) after the tag
 name.
 
@@ -18812,7 +18812,7 @@ L<http://www.scalado.com/>.)
 Tags extracted from the GPMF box of GoPro MP4 videos, the APP6 "GoPro" segment
 of JPEG files, and from the "gpmd" timed metadata if the ExtractEmbedded option
 is enabled.  Many more tags exist, but are currently unknown and extracted only
-with the -u option. Please let me know if you discover the meaning of any of
+with the Unknown (-u) option. Please let me know if you discover the meaning of any of
 these unknown tags. See L<https://github.com/gopro/gpmf-parser> for details
 about this format.
 
@@ -24020,14 +24020,18 @@ QuickTime-based files; it extracts other track-specific and timed
 metadata, but can not yet edit tags in these locations (with the
 exception of track-level date/time tags).
 
-Alternate language tags may be accessed for ItemList and Keys tags by adding
+Alternate language tags may be accessed for
+L<ItemList|Image::ExifTool::TagNames/QuickTime ItemList Tags> and
+L<Keys|Image::ExifTool::TagNames/QuickTime Keys Tags> tags by adding
 a 3-character ISO 639-2 language code and an optional ISO 3166-1 alpha 2
 country code to the tag name (eg. "ItemList:Artist-deu" or
-"ItemList::Artist-deu-DE").  Most UserData tags support a language code, but
-without a country code.  If no language code is specified when writing,
-alternate languages for the tag are deleted.  Use the "und" language code to
-write the default language without deleting alternate languages.  Note that
-"eng" is treated as a default language when reading, but not when writing.
+"ItemList::Artist-deu-DE").  Most
+L<UserData|Image::ExifTool::TagNames/QuickTime UserData Tags> tags support a
+language code, but without a country code.  If no language code is specified
+when writing, alternate languages for the tag are deleted.  Use the "und"
+language code to write the default language without deleting alternate
+languages.  Note that "eng" is treated as a default language when reading,
+but not when writing.
 
 According to the specification, many QuickTime date/time tags should be
 stored as UTC.  Unfortunately, digital cameras often store local time values
@@ -24258,10 +24262,11 @@ specification.
 =head3 QuickTime Keys Tags
 
 This directory contains a list of key names which are used to decode tags
-written by the "mdta" handler.  The prefix of "com.apple.quicktime." has
-been removed from all TagID's below.  These tags support alternate languages
-in the same way as the
-L<ItemList Tags|Image::ExifTool::TagNames/QuickTime ItemList Tags>.  Note
+written by the "mdta" handler.  Also in this table are a few tags found in
+timed metadata that are not yet writable by ExifTool.  The prefix of
+"com.apple.quicktime." has been removed from the TagID's below.  These tags
+support alternate languages in the same way as the
+L<ItemList|Image::ExifTool::TagNames/QuickTime ItemList Tags> tags.  Note
 that by default,
 L<ItemList|Image::ExifTool::TagNames/QuickTime ItemList Tags> and
 L<UserData|Image::ExifTool::TagNames/QuickTime UserData Tags> tags are
@@ -24281,17 +24286,19 @@ changed via the config file.
                           FrameReadoutTime      string
   'camera.identifier'     CameraIdentifier      string
   'collection.user'       UserCollection        string
+  'com.android.version'   AndroidVersion        string
+  'com.apple.photos.captureMode' CaptureMode    string
   'comment'               Comment               string
   'copyright'             Copyright             string
   'creationdate'          CreationDate          string
   'description'           Description           string
   'detected-face'         FaceInfo              QuickTime FaceInfo
-  'detected-face.bounds'  DetectedFaceBounds    string
-  'detected-face.face-id' DetectedFaceID        string
+  'detected-face.bounds'  DetectedFaceBounds    no
+  'detected-face.face-id' DetectedFaceID        no
   'detected-face.roll-angle'
-                          DetectedFaceRollAngle string
+                          DetectedFaceRollAngle no
   'detected-face.yaw-angle'
-                          DetectedFaceYawAngle  string
+                          DetectedFaceYawAngle  no
   'direction.facing'      CameraDirection       string
   'direction.motion'      CameraMotion          string
   'director'              Director              string
@@ -24323,10 +24330,10 @@ changed via the config file.
   'publisher'             Publisher             string
   'rating.user'           UserRating            string
   'software'              Software              string
-  'still-image-time'      StillImageTime        string
+  'still-image-time'      StillImageTime        no
   'title'                 Title                 string
   'version'               Version               string
-  'video-orientation'     VideoOrientation      string
+  'video-orientation'     VideoOrientation      no
   'year'                  Year                  string
 
 =head3 QuickTime FaceInfo Tags
@@ -24437,7 +24444,10 @@ This is the preferred location for creating new QuickTime tags.  Tags in
 this table support alternate languages which are accessed by adding a
 3-character ISO 639-2 language code and an optional ISO 3166-1 alpha 2
 country code to the tag name (eg. "ItemList:Title-fra" or
-"ItemList::Title-fra-FR").
+"ItemList::Title-fra-FR").  When creating a new Meta box to contain the
+ItemList directory, by default ExifTool does not specify a
+L<Handler|Image::ExifTool::TagNames/QuickTime Handler Tags>, but the
+API QuickTimeHandler option may be used to include an 'mdir' Handler box.
 
   Tag ID       Tag Name                         Writable
   ------       --------                         --------
@@ -25042,7 +25052,7 @@ text.  Alternate language tags are accessed by adding a dash followed by a
 3-character ISO 639-2 language code to the tag name.  ExifTool will extract
 any multi-language user data tags found, even if they aren't in this table.
 Note when creating new tags,
-L<ItemList Tags|Image::ExifTool::TagNames/QuickTime ItemList Tags> are
+L<ItemList|Image::ExifTool::TagNames/QuickTime ItemList Tags> tags are
 preferred over these, so to create the tag when a same-named ItemList tag
 exists, either "UserData" must be specified (eg. C<-UserData:Artist=Monet>
 on the command line), or the PREFERRED level must be changed via the config

data/bin/lib/Image/ExifTool/VCard.pm

@@ -323,7 +323,7 @@ sub ProcessVCard($$)
         } else {
             delete $$et{SET_GROUP1};
         }
-        my ($name, %param, $p, @val);
+        my ($name, %param, $p);
         # vCard tag ID's are case-insensitive, so normalize to lowercase with
         # an uppercase first letter for use as a tag name
         $name = ucfirst $tag if $tag =~ /[a-z]/;    # preserve mixed case in name if it exists

data/bin/lib/Image/ExifTool/Validate.pm

@@ -253,7 +253,7 @@ my %validateInfo = (
     Groups => { 0 => 'ExifTool', 1 => 'ExifTool', 2 => 'ExifTool' },
     Notes => q{
         generated only if specifically requested.  Requesting this tag automatically
-        enables the L<API Validate option|../ExifTool.html#Validate>, imposing
+        enables the API L<Validate|../ExifTool.html#Validate> option, imposing
         additional validation checks when extracting metadata.  Returns the number
         of errors, warnings and minor warnings encountered.  Note that the Validate
         feature focuses mainly on validation of TIFF/EXIF metadata
@@ -540,7 +540,7 @@ sub FinishValidate($$)
                     } elsif ($result eq '') {
                         $pre = defined $val ? 'Invalid value for' : "Missing required $fileType";
                     } else {
-                        next if $result == '1';
+                        next if $result eq '1';
                         $pre = $result;
                     }
                 } else {

data/bin/lib/Image/ExifTool/WriteIPTC.pl

@@ -105,7 +105,7 @@ sub CheckIPTC($$$)
     my $format = $$tagInfo{Format} || $$tagInfo{Table}{FORMAT} || '';
     if ($format =~ /^int(\d+)/) {
         my $bytes = int(($1 || 0) / 8);
-        if ($bytes ne 1 and $bytes ne 2 and $bytes ne 4) {
+        if ($bytes != 1 and $bytes != 2 and $bytes != 4) {
             return "Can't write $bytes-byte integer";
         }
         my $val = $$valPtr;

data/bin/lib/Image/ExifTool/WriteQuickTime.pl

@@ -409,7 +409,7 @@ sub WriteKeys($$$)
         next unless $$nvHash{IsCreating} and $et->IsOverwriting($nvHash) and
             defined $et->GetNewValue($nvHash);
         # add new entry to 'keys' data
-        my $val = "com.apple.quicktime.$id";
+        my $val = $id =~ /^com\./ ? $id : "com.apple.quicktime.$id";
         $newData .= Set32u(8 + length($val)) . 'mdta' . $val;
         $et->VPrint(1, "$$et{INDENT}\[adding Keys entry $newIndex '${id}']\n");
         $add{$newIndex++} = $tagInfo;

data/bin/lib/Image/ExifTool/Writer.pl

@@ -2917,7 +2917,7 @@ sub InsertTagValues($$$;$$$)
     local $_;
     my ($self, $foundTags, $line, $opt, $docGrp, $cache) = @_;
     my $rtnStr = '';
-    my $docNum;
+    my ($docNum, $tag);
     if ($docGrp) {
         $docNum = $docGrp =~ /(\d+)$/ ? $1 : 0;
     } else {
@@ -2970,8 +2970,9 @@ sub InsertTagValues($$$;$$$)
 
         for (;;) {
             # temporarily reset ListJoin option if evaluating list values separately
-            my $oldListJoin = $self->Options(ListJoin => undef) if $asList;
-            my $tag = shift @tags;
+            my $oldListJoin;
+            $oldListJoin = $self->Options(ListJoin => undef) if $asList;
+            $tag = shift @tags;
             my $lcTag = lc $tag;
             if ($cache and $lcTag !~ /(^|:)all$/) {
                 # remove group from tag name (but not lower-case version)
@@ -2998,7 +2999,10 @@ sub InsertTagValues($$$;$$$)
                     }
                 }
                 my $doc = $lcTag =~ /\b(main|doc(\d+)):/ ? ($2 || 0) : $docNum;
-                $val = $self->GetValue($$cacheTag[$doc], $type) if $$cacheTag[$doc];
+                if ($$cacheTag[$doc]) {
+                    $tag = $$cacheTag[$doc];
+                    $val = $self->GetValue($tag, $type);
+                }
             } else {
                 # add document number to tag if specified and it doesn't already exist
                 if ($docGrp and $lcTag !~ /\b(main|doc\d+):/) {
@@ -5352,7 +5356,7 @@ sub WriteJPEG($$)
     }
     unless ($marker and $marker == 0xda) {
         $isEXV or $self->Error('Corrupted JPEG image'), return 1;
-        $marker and $marker ne 0xd9 and $self->Error('Corrupted EXV file'), return 1;
+        $marker and $marker != 0xd9 and $self->Error('Corrupted EXV file'), return 1;
     }
     $raf->Seek($pos, 0) or $self->Error('Seek error'), return 1;
 #
@@ -6675,7 +6679,6 @@ sub WriteBinaryData($$$)
             next unless $writeInfo and $writeInfo eq $tagInfo;
         }
         # add offsets for variable-sized tags if necessary
-        my $varFmt;
         while (@varInfo and $varInfo[0][0] < $tagID) {
             $varSize = $varInfo[0][1];  # get accumulated variable size
             shift @varInfo;
@@ -6707,6 +6710,8 @@ sub WriteBinaryData($$$)
         next unless $self->IsOverwriting($nvHash, $val);
         my $newVal = $self->GetNewValue($nvHash);
         next unless defined $newVal;    # can't delete from a binary table
+        # update DataMember with new value if necessary
+        $$self{$$tagInfo{DataMember}} = $newVal if $$tagInfo{DataMember};
         # only write masked bits if specified
         my $mask = $$tagInfo{Mask};
         $newVal = (($newVal << $$tagInfo{BitShift}) & $mask) | ($val & ~$mask) if $mask;

data/bin/lib/Image/ExifTool/XMP.pm

@@ -2229,7 +2229,7 @@ my %sPantryItem = (
     # (used to set EXIF GPS position from XMP tags)
     GPSLatitudeRef => {
         Require => 'XMP:GPSLatitude',
-        Inhibit => 'GPSLatitudeRef',
+        # Note: Do not Inihibit based on EXIF:GPSLatitudeRef (see forum10192)
         ValueConv => q{
             IsFloat($val[0]) and return $val[0] < 0 ? "S" : "N";
             $val[0] =~ /^.*([NS])/;
@@ -2239,7 +2239,6 @@ my %sPantryItem = (
     },
     GPSLongitudeRef => {
         Require => 'XMP:GPSLongitude',
-        Inhibit => 'GPSLongitudeRef',
         ValueConv => q{
             IsFloat($val[0]) and return $val[0] < 0 ? "W" : "E";
             $val[0] =~ /^.*([EW])/;
@@ -2249,7 +2248,6 @@ my %sPantryItem = (
     },
     GPSDestLatitudeRef => {
         Require => 'XMP:GPSDestLatitude',
-        Inhibit => 'GPSDestLatitudeRef',
         ValueConv => q{
             IsFloat($val[0]) and return $val[0] < 0 ? "S" : "N";
             $val[0] =~ /^.*([NS])/;
@@ -2259,7 +2257,6 @@ my %sPantryItem = (
     },
     GPSDestLongitudeRef => {
         Require => 'XMP:GPSDestLongitude',
-        Inhibit => 'GPSDestLongitudeRef',
         ValueConv => q{
             IsFloat($val[0]) and return $val[0] < 0 ? "W" : "E";
             $val[0] =~ /^.*([EW])/;
@@ -2304,11 +2301,11 @@ my %sPantryItem = (
                 my $i = 0;
                 $val[$i++] = $val[5]{$_} foreach qw(Fired Return Mode Function RedEyeMode);
             }
-            return (($val[0] and lc($val[0]) eq 'true') ? 0x01 : 0) |
+            return((($val[0] and lc($val[0]) eq 'true') ? 0x01 : 0) |
                    (($val[1] || 0) << 1) |
                    (($val[2] || 0) << 3) |
                    (($val[3] and lc($val[3]) eq 'true') ? 0x20 : 0) |
-                   (($val[4] and lc($val[4]) eq 'true') ? 0x40 : 0);
+                   (($val[4] and lc($val[4]) eq 'true') ? 0x40 : 0));
         },
         PrintConv => \%Image::ExifTool::Exif::flash,
         WriteAlso => {
@@ -3282,7 +3279,6 @@ sub ParseXMPElement($$$;$$$$)
         # (empty elements end with '/', eg. <a:b/>)
         if ($attrs !~ s/\/$//) {
             my $nesting = 1;
-            my $tok;
             for (;;) {
 # this match fails with perl 5.6.2 (perl bug!), but it works without
 # the '(.*?)', so we must do it differently...

data/bin/lib/Image/ExifTool/XMPStruct.pl

@@ -107,7 +107,8 @@ sub InflateStruct($;$)
         $val = '';
         $delim = $delim ? "\\$delim|,|\\||\$" : ',|\\||$';
         for (;;) {
-            $$obj =~ s/^(.*?)($delim)//s and $val .= $1;
+            $$obj =~ s/^(.*?)($delim)//s or last;
+            $val .= $1;
             last unless $2;
             $2 eq '|' or $$obj = $2 . $$obj, last;
             $$obj =~ s/^(.)//s and $val .= $1;  # add escaped character

data/bin/lib/Image/ExifTool/ZIP.pm

@@ -448,7 +448,7 @@ sub ProcessZIP($$)
 
         # check for an Office Open file (DOCX, etc)
         # --> read '[Content_Types].xml' to determine the file type
-        my ($mime, @members, $epub);
+        my ($mime, @members);
         my $cType = $zip->memberNamed('[Content_Types].xml');
         if ($cType) {
             ($buff, $status) = $zip->contents($cType);

data/bin/lib/Image/ExifTool/iWork.pm

@@ -70,7 +70,7 @@ sub GetTagID($)
 {
     my $props = shift;
     return 0 if $$props[-1] =~ /^\w+:ID$/;  # ignore ID tags
-    return ($$props[0] =~ /^.*?:(.*)/) ? $1 : $$props[0];
+    return $$props[0] =~ /^.*?:(.*)/ ? $1 : $$props[0];
 }
 
 #------------------------------------------------------------------------------

data/bin/perl-Image-ExifTool.spec

@@ -1,6 +1,6 @@
 Summary: perl module for image data extraction
 Name: perl-Image-ExifTool
-Version: 11.49
+Version: 11.50
 Release: 1
 License: Artistic/GPL
 Group: Development/Libraries/Perl
@@ -49,8 +49,8 @@ supported by ExifTool (r = read, w = write, c = create):
   CRM   r/w   | GZ    r     | MOI   r     | PMP   r     | WAV   r
   CRW   r/w   | HDP   r/w   | MOS   r/w   | PNG   r/w   | WDP   r/w
   CS1   r/w   | HDR   r     | MOV   r/w   | PPM   r/w   | WEBP  r
-  DCM   r     | HEIC  r     | MP3   r     | PPT   r     | WEBM  r
-  DCP   r/w   | HEIF  r     | MP4   r/w   | PPTX  r     | WMA   r
+  DCM   r     | HEIC  r/w   | MP3   r     | PPT   r     | WEBM  r
+  DCP   r/w   | HEIF  r/w   | MP4   r/w   | PPTX  r     | WMA   r
   DCR   r     | HTML  r     | MPC   r     | PS    r/w   | WMV   r
   DFONT r     | ICC   r/w/c | MPG   r     | PSB   r/w   | WTV   r
   DIVX  r     | ICS   r     | MPO   r/w   | PSD   r/w   | WV    r

data/lib/exiftool_vendored/version.rb

@@ -1,5 +1,5 @@
 # frozen_string_literal: true
 
 module ExiftoolVendored
-  VERSION = Gem::Version.new('11.49.0')
+  VERSION = Gem::Version.new('11.50.0')
 end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: exiftool_vendored
 version: !ruby/object:Gem::Version
-  version: 11.49.0
+  version: 11.50.0
 platform: ruby
 authors:
 - Matthew McEachen
@@ -9,7 +9,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2019-06-06 00:00:00.000000000 Z
+date: 2019-06-11 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: exiftool
@@ -201,6 +201,8 @@ files:
 - bin/config_files/nksc.config
 - bin/config_files/photoshop_paths.config
 - bin/config_files/picasa_faces.config
+- bin/config_files/rotate_regions.config
+- bin/config_files/tiff_version.config
 - bin/config_files/time_zone.config
 - bin/exiftool
 - bin/fmt_files/gpx.fmt