exiftool-vendored.pl 13.42.0 → 13.43.0

package/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 28932 tags, with 17990 unique tag names.
+They contain a total of 28936 tags, with 17993 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
@@ -7432,6 +7432,7 @@ boot, not including standby time.
            CanonCameraInfo1200D                 Canon CameraInfo60D
            CanonCameraInfoR6                    Canon CameraInfoR6
            CanonCameraInfoR6m2                  Canon CameraInfoR6m2
+           CanonCameraInfoR6m3                  Canon CameraInfoR6m3
            CanonCameraInfoG5XII                 Canon CameraInfoG5XII
            CanonCameraInfoPowerShot             Canon CameraInfoPowerShot
            CanonCameraInfoPowerShot2            Canon CameraInfoPowerShot2
@@ -8438,6 +8439,14 @@ CameraInfo tags for the EOS R6 Mark II.
   ------   --------                             --------
    3369    ShutterCount                         int32u
 
+=head3 Canon CameraInfoR6m3 Tags
+
+CameraInfo tags for the EOS R6 Mark II.
+
+  Index1   Tag Name                             Writable
+  ------   --------                             --------
+   2157    ShutterCount                         int32u
+
 =head3 Canon CameraInfoG5XII Tags
 
 CameraInfo tags for the PowerShot G5 X Mark II.
@@ -21934,6 +21943,7 @@ HEIC images from models such as the S10+.
   SurroundShotVideo                             no
   SurroundShotVideoName                         no
   TimeStamp                                     no
+  VideoEditedTimeZone                           no
 
 =head3 Samsung DualShotExtra Tags
 
@@ -31060,7 +31070,7 @@ specification.
 This directory contains a list of key names which are used to decode tags
 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
+"com.apple.quicktime." has been removed from most 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,
@@ -31144,6 +31154,7 @@ changed via the config file.
   'producer'    Producer                        yes
   'publisher'   Publisher                       yes
   'rating.user' UserRating                      yes
+  'samsung.android.utc_offset' AndroidTimeZone  yes
   'scene-illuminance' SceneIlluminance          no
   'software'    Software                        yes
   'still-image-time' StillImageTime             no
@@ -31563,6 +31574,7 @@ and are not currently writable.
   'colr'   ICC_Profile                          ICC_Profile
            ColorRepresentation                  QuickTime ColorRep
   'hvcC'   HEVCConfiguration                    QuickTime HEVCConfig
+  'imir'   Mirroring                            int8u!
   'irot'   Rotation                             int8u!
   'ispe'   ImageSpatialExtent                   no
   'pasp'   PixelAspectRatio                     int32u[2]!

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

@@ -95,6 +95,11 @@ my %emptyMeta = (
     hdlr => 'Handler', 'keys' => 'Keys', lang => 'Language', ctry => 'Country', free => 'Free',
 );
 
+# starting word for Keys tags which use a full tag ID
+my %fullKeysID = (
+    com => 1,   xiaomi => 1,    samsung => 1,
+);
+
 # lookup for CTBO ID number based on uuid for Canon CR3 files
 my %ctboID = (
     "\xbe\x7a\xcf\xcb\x97\xa9\x42\xe8\x9c\x71\x99\x94\x91\xe3\xaf\xac" => 1, # XMP
@@ -461,7 +466,10 @@ sub WriteKeys($$$)
         next unless $$nvHash{IsCreating} and $et->IsOverwriting($nvHash) and
             defined $et->GetNewValue($nvHash);
         # add new entry to 'keys' data
-        my $val = $id =~ /^com\./ ? $id : "com.apple.quicktime.$id";
+        my $val = $id;
+        unless ($val =~ /^(.*?)\./ and $fullKeysID{$1}) {
+            $val = "com.apple.quicktime.$val";
+        }
         $newData .= Set32u(8 + length($val)) . 'mdta' . $val;
         $et->VPrint(1, "$$et{INDENT}\[adding $keysGrp entry $newIndex '${id}']\n");
         $add{$newIndex++} = $tagInfo;

package/bin/lib/Image/ExifTool.pm

@@ -29,7 +29,7 @@ use vars qw($VERSION $RELEASE @ISA @EXPORT_OK %EXPORT_TAGS $AUTOLOAD @fileTypes
             %jpegMarker %specialTags %fileTypeLookup $testLen $exeDir
             %static_vars $advFmtSelf $configFile @configFiles $noConfig);
 
-$VERSION = '13.42';
+$VERSION = '13.43';
 $RELEASE = '';
 @ISA = qw(Exporter);
 %EXPORT_TAGS = (

package/bin/perl-Image-ExifTool.spec

@@ -1,6 +1,6 @@
 Summary: perl module for image data extraction
 Name: perl-Image-ExifTool
-Version: 13.42
+Version: 13.43
 Release: 1
 License: Artistic/GPL
 Group: Development/Libraries/Perl

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "exiftool-vendored.pl",
-  "version": "13.42.0",
+  "version": "13.43.0",
   "description": "Vendored perl ExifTool for Node.js",
   "main": "./index.js",
   "homepage": "https://github.com/photostructure/exiftool-vendored.pl#readme",