exiftool_vendored 9.78.0 → 9.99.0

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

@@ -0,0 +1,223 @@
+#------------------------------------------------------------------------------
+# File:         iWork.pm
+#
+# Description:  Read Apple iWork '09 XML+ZIP files
+#
+# Revisions:    2009/11/11 - P. Harvey Created
+#------------------------------------------------------------------------------
+
+package Image::ExifTool::iWork;
+
+use strict;
+use vars qw($VERSION);
+use Image::ExifTool qw(:DataAccess :Utils);
+use Image::ExifTool::XMP;
+use Image::ExifTool::ZIP;
+
+$VERSION = '1.04';
+
+# test for recognized iWork document extensions and outer XML elements
+my %iWorkType = (
+    # file extensions
+    NUMBERS => 'NUMBERS',
+    PAGES   => 'PAGES',
+    KEY     => 'KEY',
+    KTH     => 'KTH',
+    NMBTEMPLATE => 'NMBTEMPLATE',
+    # we don't support double extensions --
+    # "PAGES.TEMPLATE" => 'Apple Pages Template',
+    # outer XML elements
+    'ls:document' => 'NUMBERS',
+    'sl:document' => 'PAGES',
+    'key:presentation' => 'KEY',
+);
+
+# MIME types for iWork files (Apple has not registered these yet, but these
+# are my best guess after doing some googling.  I'm not 100% sure what "sff"
+# indicates, but I think it refers to the new "flattened" package format)
+my %mimeType = (
+    'NUMBERS'       => 'application/x-iwork-numbers-sffnumbers',
+    'PAGES'         => 'application/x-iwork-pages-sffpages',
+    'KEY'           => 'application/x-iWork-keynote-sffkey',
+    'NMBTEMPLATE'   => 'application/x-iwork-numbers-sfftemplate',
+    'PAGES.TEMPLATE'=> 'application/x-iwork-pages-sfftemplate',
+    'KTH'           => 'application/x-iWork-keynote-sffkth',
+);
+
+# iWork tags
+%Image::ExifTool::iWork::Main = (
+    GROUPS => { 0 => 'XML', 1 => 'XML', 2 => 'Document' },
+    PROCESS_PROC => \&Image::ExifTool::XMP::ProcessXMP,
+    VARS => { NO_ID => 1 },
+    NOTES => q{
+        The Apple iWork '09 file format is a ZIP archive containing XML files
+        similar to the Office Open XML (OOXML) format.  Metadata tags in iWork
+        files are extracted even if they don't appear below.
+    },
+    authors   => { Name => 'Author', Groups => { 2 => 'Author' } },
+    comment   => { },
+    copyright => { Groups => { 2 => 'Author' } },
+    keywords  => { },
+    projects  => { List => 1 },
+    title     => { },
+);
+
+#------------------------------------------------------------------------------
+# Generate a tag ID for this XML tag
+# Inputs: 0) tag property name list ref
+# Returns: tagID
+sub GetTagID($)
+{
+    my $props = shift;
+    return 0 if $$props[-1] =~ /^\w+:ID$/;  # ignore ID tags
+    return ($$props[0] =~ /^.*?:(.*)/) ? $1 : $$props[0];
+}
+
+#------------------------------------------------------------------------------
+# We found an XMP property name/value
+# Inputs: 0) ExifTool object ref, 1) tag table ref
+#         2) reference to array of XMP property names (last is current property)
+#         3) property value, 4) attribute hash ref (not used here)
+# Returns: 1 if valid tag was found
+sub FoundTag($$$$;$)
+{
+    my ($et, $tagTablePtr, $props, $val, $attrs) = @_;
+    return 0 unless @$props;
+    my $verbose = $et->Options('Verbose');
+
+    $et->VPrint(0, "  | - Tag '", join('/',@$props), "'\n") if $verbose > 1;
+
+    # un-escape XML character entities
+    $val = Image::ExifTool::XMP::UnescapeXML($val);
+    # convert from UTF8 to ExifTool Charset
+    $val = $et->Decode($val, 'UTF8');
+    my $tag = GetTagID($props) or return 0;
+
+    # add any unknown tags to table
+    unless ($$tagTablePtr{$tag}) {
+        $et->VPrint(0, "  [adding $tag]\n") if $verbose;
+        AddTagToTable($tagTablePtr, $tag, { Name => ucfirst $tag });
+    }
+    # save the tag
+    $et->HandleTag($tagTablePtr, $tag, $val);
+
+    return 1;
+}
+
+#------------------------------------------------------------------------------
+# Extract information from an iWork file
+# Inputs: 0) ExifTool object reference, 1) dirInfo reference
+# Returns: 1
+# Notes: Upon entry to this routine, the file type has already been verified
+# as ZIP and the dirInfo hash contains a 'ZIP' Archive::Zip object reference
+sub Process_iWork($$)
+{
+    my ($et, $dirInfo) = @_;
+    my $zip = $$dirInfo{ZIP};
+    my ($type, $index, $indexFile, $status);
+
+    # try to determine the file type
+    local $SIG{'__WARN__'} = \&Image::ExifTool::ZIP::WarnProc;
+    # trust type given by file extension if available
+    $type = $iWorkType{$$et{FILE_EXT}} if $$et{FILE_EXT};
+    unless ($type) {
+        # read the index file
+        my @members = $zip->membersMatching('^index\.(xml|apxl)$');
+        if (@members) {
+            ($index, $status) = $zip->contents($members[0]);
+            unless ($status) {
+                $indexFile = $members[0]->fileName();
+                if ($index =~ /^\s*<\?xml version=[^<]+<(\w+:\w+)/s) {
+                    $type = $iWorkType{$1} if $iWorkType{$1};
+                }
+            }
+        }
+        $type or $type = 'ZIP';     # assume ZIP by default
+    }
+    $et->SetFileType($type, $mimeType{$type});
+
+    my @members = $zip->members();
+    my $docNum = 0;
+    my $member;
+    foreach $member (@members) {
+        # get filename of this ZIP member
+        my $file = $member->fileName();
+        next unless defined $file;
+        $et->VPrint(0, "File: $file\n");
+        # set the document number and extract ZIP tags
+        $$et{DOC_NUM} = ++$docNum;
+        Image::ExifTool::ZIP::HandleMember($et, $member);
+
+        # process only the index XML and JPEG thumbnail files
+        next unless $file =~ m{^(index\.(xml|apxl)|QuickLook/Thumbnail\.jpg)$}i;
+        # get the file contents if necessary
+        # (CAREFUL! $buff MUST be local since we hand off a value ref to PreviewImage)
+        my ($buff, $buffPt);
+        if ($indexFile and $indexFile eq $file) {
+            # use the index file we already loaded
+            $buffPt = \$index;
+        } else {
+            ($buff, $status) = $zip->contents($member);
+            $status and $et->Warn("Error extracting $file"), next;
+            $buffPt = \$buff;
+        }
+        # extract JPEG as PreviewImage (should only be QuickLook/Thumbnail.jpg)
+        if ($file =~ /\.jpg$/) {
+            $et->FoundTag('PreviewImage', $buffPt);
+            next;
+        }
+        # process "metadata" section of XML index file
+        next unless $$buffPt =~ /<(\w+):metadata>/g;
+        my $ns = $1;
+        my $p1 = pos $$buffPt;
+        next unless $$buffPt =~ m{</${ns}:metadata>}g;
+        # construct XML data from "metadata" section only
+        $$buffPt = '<?xml version="1.0"?>' . substr($$buffPt, $p1, pos($$buffPt)-$p1);
+        my %dirInfo = (
+            DataPt => $buffPt,
+            DirLen => length $$buffPt,
+            DataLen => length $$buffPt,
+            XMPParseOpts => {
+                FoundProc => \&FoundTag,
+            },
+        );
+        my $tagTablePtr = GetTagTable('Image::ExifTool::iWork::Main');
+        $et->ProcessDirectory(\%dirInfo, $tagTablePtr);
+        undef $$buffPt; # (free memory now)
+    }
+    delete $$et{DOC_NUM};
+    return 1;
+}
+
+1;  # end
+
+__END__
+
+=head1 NAME
+
+Image::ExifTool::iWork - Read Apple iWork '09 XML+ZIP files
+
+=head1 SYNOPSIS
+
+This module is used by Image::ExifTool
+
+=head1 DESCRIPTION
+
+This module contains definitions required by Image::ExifTool to extract meta
+information from Apple iWork '09 XML+ZIP files.
+
+=head1 AUTHOR
+
+Copyright 2003-2015, Phil Harvey (phil at owl.phy.queensu.ca)
+
+This library is free software; you can redistribute it and/or modify it
+under the same terms as Perl itself.
+
+=head1 SEE ALSO
+
+L<Image::ExifTool::TagNames/iWork Tags>,
+L<Image::ExifTool::TagNames/OOXML Tags>,
+L<Image::ExifTool(3pm)|Image::ExifTool>
+
+=cut
+

data/bin/Image-ExifTool-9.99/perl-Image-ExifTool.spec

@@ -0,0 +1,112 @@
+Summary: perl module for image data extraction
+Name: perl-Image-ExifTool
+Version: 9.99
+Release: 1
+License: Artistic/GPL
+Group: Development/Libraries/Perl
+URL: http://owl.phy.queensu.ca/~phil/exiftool/
+Source0: Image-ExifTool-%{version}.tar.gz
+BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root
+
+%description
+ExifTool is a customizable set of Perl modules plus a full-featured
+application for reading and writing meta information in a wide variety of
+files, including the maker note information of many digital cameras by
+various manufacturers such as Canon, Casio, FLIR, FujiFilm, GE, HP,
+JVC/Victor, Kodak, Leaf, Minolta/Konica-Minolta, Nikon, Olympus/Epson,
+Panasonic/Leica, Pentax/Asahi, Phase One, Reconyx, Ricoh, Samsung, Sanyo,
+Sigma/Foveon and Sony.
+
+Below is a list of file types and meta information formats currently
+supported by ExifTool (r = read, w = write, c = create):
+
+  File Types
+  ------------+-------------+-------------+-------------+------------
+  3FR   r     | DVB   r/w   | KEY   r     | ORF   r/w   | RWL   r/w
+  3G2   r/w   | DYLIB r     | LA    r     | OTF   r     | RWZ   r
+  3GP   r/w   | EIP   r     | LFP   r     | PAC   r     | RM    r
+  AA    r     | EPS   r/w   | LNK   r     | PAGES r     | SEQ   r
+  AAX   r/w   | EPUB  r     | M2TS  r     | PBM   r/w   | SO    r
+  ACR   r     | ERF   r/w   | M4A/V r/w   | PCD   r     | SR2   r/w
+  AFM   r     | EXE   r     | MEF   r/w   | PDB   r     | SRF   r
+  AI    r/w   | EXIF  r/w/c | MIE   r/w/c | PDF   r/w   | SRW   r/w
+  AIFF  r     | EXR   r     | MIFF  r     | PEF   r/w   | SVG   r
+  APE   r     | EXV   r/w/c | MKA   r     | PFA   r     | SWF   r
+  ARW   r/w   | F4A/V r/w   | MKS   r     | PFB   r     | THM   r/w
+  ASF   r     | FFF   r/w   | MKV   r     | PFM   r     | TIFF  r/w
+  AVI   r     | FLA   r     | MNG   r/w   | PGF   r     | TORRENT r
+  AZW   r     | FLAC  r     | MOBI  r     | PGM   r/w   | TTC   r
+  BMP   r     | FLV   r     | MODD  r     | PLIST r     | TTF   r
+  BTF   r     | FPF   r     | MOI   r     | PICT  r     | VCF   r
+  CHM   r     | FPX   r     | MOS   r/w   | PMP   r     | VRD   r/w/c
+  COS   r     | GIF   r/w   | MOV   r/w   | PNG   r/w   | VSD   r
+  CR2   r/w   | GZ    r     | MP3   r     | PPM   r/w   | WAV   r
+  CRW   r/w   | HDP   r/w   | MP4   r/w   | PPT   r     | WDP   r/w
+  CS1   r/w   | HDR   r     | MPC   r     | PPTX  r     | WEBP  r
+  DCM   r     | HTML  r     | MPG   r     | PS    r/w   | WEBM  r
+  DCP   r/w   | ICC   r/w/c | MPO   r/w   | PSB   r/w   | WMA   r
+  DCR   r     | ICS   r     | MQV   r/w   | PSD   r/w   | WMV   r
+  DFONT r     | IDML  r     | MRW   r/w   | PSP   r     | WV    r
+  DIVX  r     | IIQ   r/w   | MXF   r     | QTIF  r/w   | X3F   r/w
+  DJVU  r     | IND   r/w   | NEF   r/w   | RA    r     | XCF   r
+  DLL   r     | INX   r     | NRW   r/w   | RAF   r/w   | XLS   r
+  DNG   r/w   | ITC   r     | NUMBERS r   | RAM   r     | XLSX  r
+  DOC   r     | J2C   r     | ODP   r     | RAR   r     | XMP   r/w/c
+  DOCX  r     | JNG   r/w   | ODS   r     | RAW   r/w   | ZIP   r
+  DPX   r     | JP2   r/w   | ODT   r     | RIFF  r     |
+  DR4   r/w/c | JPEG  r/w   | OFR   r     | RSRC  r     |
+  DSS   r     | K25   r     | OGG   r     | RTF   r     |
+  DV    r     | KDC   r     | OGV   r     | RW2   r/w   |
+
+  Meta Information
+  ----------------------+----------------------+---------------------
+  EXIF           r/w/c  |  CIFF           r/w  |  Ricoh RMETA    r
+  GPS            r/w/c  |  AFCP           r/w  |  Picture Info   r
+  IPTC           r/w/c  |  Kodak Meta     r/w  |  Adobe APP14    r
+  XMP            r/w/c  |  FotoStation    r/w  |  MPF            r
+  MakerNotes     r/w/c  |  PhotoMechanic  r/w  |  Stim           r
+  Photoshop IRB  r/w/c  |  JPEG 2000      r    |  DPX            r
+  ICC Profile    r/w/c  |  DICOM          r    |  APE            r
+  MIE            r/w/c  |  Flash          r    |  Vorbis         r
+  JFIF           r/w/c  |  FlashPix       r    |  SPIFF          r
+  Ducky APP12    r/w/c  |  QuickTime      r    |  DjVu           r
+  PDF            r/w/c  |  Matroska       r    |  M2TS           r
+  PNG            r/w/c  |  MXF            r    |  PE/COFF        r
+  Canon VRD      r/w/c  |  PrintIM        r    |  AVCHD          r
+  Nikon Capture  r/w/c  |  FLAC           r    |  ZIP            r
+  GeoTIFF        r/w/c  |  ID3            r    |  (and more)
+
+See html/index.html for more details about ExifTool features.
+
+%prep
+%setup -n Image-ExifTool-%{version}
+
+%build
+perl Makefile.PL INSTALLDIRS=vendor
+
+%install
+rm -rf $RPM_BUILD_ROOT
+%makeinstall DESTDIR=%{?buildroot:%{buildroot}}
+find $RPM_BUILD_ROOT -name perllocal.pod | xargs rm
+
+%clean
+rm -rf $RPM_BUILD_ROOT
+
+%files
+%defattr(-,root,root,-)
+%doc Changes html
+%{_libdir}/perl5/*
+/usr/share/*/*
+%{_mandir}/*/*
+%{_bindir}/*
+
+%changelog
+* Tue May 06 2014 - Norbert de Rooy <nsrderooy@gmail.com>
+- Spec file fixed for Redhat 6
+* Tue May 09 2006 - Niels Kristian Bech Jensen <nkbj@mail.tele.dk>
+- Spec file fixed for Mandriva Linux 2006.
+* Mon May 08 2006 - Volker Kuhlmann <VolkerKuhlmann@gmx.de>
+- Spec file fixed for SUSE.
+- Package available from: http://volker.dnsalias.net/soft/
+* Sat Jun 19 2004 Kayvan Sylvan <kayvan@sylvan.com> - Image-ExifTool
+- Initial build.

data/bin/Image-ExifTool-9.99/t/AFCP_2.out

@@ -0,0 +1,39 @@
+[ExifTool, ExifTool, ExifTool] ExifToolVersion - ExifTool Version Number: 9.93
+[File, System, Image] FileName - File Name: AFCP.jpg
+[File, System, Image] Directory - Directory: t/images
+[File, System, Image] FileSize - File Size: 1110 bytes
+[File, System, Time] FileModifyDate - File Modification Date/Time: 2006:01:04 14:02:27-05:00
+[File, System, Time] FileAccessDate - File Access Date/Time: 2015:04:18 07:17:05-04:00
+[File, System, Time] FileInodeChangeDate - File Inode Change Date/Time: 2015:03:07 15:31:02-05:00
+[File, System, Image] FilePermissions - File Permissions: rw-r--r--
+[File, File, Image] FileType - File Type: JPEG
+[File, File, Image] FileTypeExtension - File Type Extension: jpg
+[File, File, Image] MIMEType - MIME Type: image/jpeg
+[File, File, Image] ImageWidth - Image Width: 8
+[File, File, Image] ImageHeight - Image Height: 8
+[File, File, Image] EncodingProcess - Encoding Process: Baseline DCT, Huffman coding
+[File, File, Image] BitsPerSample - Bits Per Sample: 8
+[File, File, Image] ColorComponents - Color Components: 3
+[File, File, Image] YCbCrSubSampling - Y Cb Cr Sub Sampling: YCbCr4:2:0 (2 2)
+[IPTC, IPTC2, Other] 0 - Application Record Version: 2
+[IPTC, IPTC2, Other] 15 - Category: p
+[IPTC, IPTC2, Time] 55 - Date Created: 2005:12:23
+[IPTC, IPTC2, Other] 5 - Object Name: object name
+[IPTC, IPTC2, Other] 10 - Urgency: 2
+[IPTC, IPTC2, Other] 20 - Supplemental Categories: supp cat
+[IPTC, IPTC2, Other] 25 - Keywords: keyword
+[IPTC, IPTC2, Other] 40 - Special Instructions: special instructions
+[IPTC, IPTC2, Author] 80 - By-line: byline
+[IPTC, IPTC2, Author] 85 - By-line Title: byline title
+[IPTC, IPTC2, Location] 90 - City: city
+[IPTC, IPTC2, Location] 101 - Country-Primary Location Name: country name
+[IPTC, IPTC2, Other] 103 - Original Transmission Reference: otr
+[IPTC, IPTC2, Other] 105 - Headline: headline
+[IPTC, IPTC2, Author] 110 - Credit: credit
+[IPTC, IPTC2, Author] 115 - Source: source
+[IPTC, IPTC2, Author] 116 - Copyright Notice: copy freely
+[IPTC, IPTC2, Other] 120 - Caption-Abstract: ExifTool AFCP test
+[IPTC, IPTC2, Author] 122 - Writer-Editor: caption writer
+[IPTC, IPTC2, Location] 95 - Province-State: state
+[Composite, Composite, Image] ImageSize - Image Size: 8x8
+[Composite, Composite, Image] Megapixels - Megapixels: 0.000064

data/bin/Image-ExifTool-9.99/t/AIFF_2.out

@@ -0,0 +1,33 @@
+[ExifTool, ExifTool, ExifTool] ExifToolVersion - ExifTool Version Number: 9.93
+[File, System, Image] FileName - File Name: AIFF.aif
+[File, System, Image] Directory - Directory: t/images
+[File, System, Image] FileSize - File Size: 290 bytes
+[File, System, Time] FileModifyDate - File Modification Date/Time: 2006:01:06 15:05:23-05:00
+[File, System, Time] FileAccessDate - File Access Date/Time: 2015:04:18 07:17:35-04:00
+[File, System, Time] FileInodeChangeDate - File Inode Change Date/Time: 2015:03:07 15:31:02-05:00
+[File, System, Image] FilePermissions - File Permissions: rw-r--r--
+[File, File, Image] FileType - File Type: AIFF
+[File, File, Image] FileTypeExtension - File Type Extension: aiff
+[File, File, Image] MIMEType - MIME Type: audio/x-aiff
+[File, File, Image] ID3Size - ID3 Size: 172
+[AIFF, AIFF, Time] 0 - Comment Time: 2004:03:08 05:28:46
+[AIFF, AIFF, Audio] 2 - Comment: ding.wav
+[AIFF, AIFF, Audio] 0 - Num Channels: 1
+[AIFF, AIFF, Audio] 1 - Num Sample Frames: 11554
+[AIFF, AIFF, Audio] 3 - Sample Size: 8
+[AIFF, AIFF, Audio] 4 - Sample Rate: 22050
+[AIFF, AIFF, Audio] NAME - Name: ExifTool test AIFF
+[AIFF, AIFF, Author] AUTH - Author: Phil Harvey
+[ID3, ID3v2_2, Audio] ULT - Lyrics: my lyrics
+[ID3, ID3v2_2, Audio] TCM - Composer: Composer
+[ID3, ID3v2_2, Audio] COM - Comment: comments
+[ID3, ID3v2_2, Author] TP1 - Artist: the artist
+[ID3, ID3v2_2, Audio] TAL - Album: the album
+[ID3, ID3v2_2, Audio] TT1 - Grouping: grouping
+[ID3, ID3v2_2, Audio] TRK - Track: 1
+[ID3, ID3v2_2, Audio] TPA - Part Of Set: 1/1
+[ID3, ID3v2_2, Time] TYE - Year: 2006
+[ID3, ID3v2_2, Audio] TCO - Genre: Techno
+[ID3, ID3v2_2, Audio] TCP - Compilation: Yes
+[Composite, Composite, Time] DateTimeOriginal - Date/Time Original: 2006
+[Composite, Composite, Other] Duration - Duration: 0.52 s

data/bin/Image-ExifTool-9.99/t/APE_2.out

@@ -0,0 +1,29 @@
+[ExifTool, ExifTool, ExifTool] ExifToolVersion - ExifTool Version Number: 9.94
+[File, System, Image] FileName - File Name: APE.ape
+[File, System, Image] Directory - Directory: t/images
+[File, System, Image] FileSize - File Size: 2.1 kB
+[File, System, Time] FileModifyDate - File Modification Date/Time: 2006:11:14 11:04:22-05:00
+[File, System, Time] FileAccessDate - File Access Date/Time: 2015:04:29 20:10:38-04:00
+[File, System, Time] FileInodeChangeDate - File Inode Change Date/Time: 2015:04:25 10:57:00-04:00
+[File, System, Image] FilePermissions - File Permissions: rw-r--r--
+[File, File, Image] FileType - File Type: APE
+[File, File, Image] FileTypeExtension - File Type Extension: ape
+[File, File, Image] MIMEType - MIME Type: audio/x-monkeys-audio
+[APE, MAC, Audio] 0 - Compression Level: 3000
+[APE, MAC, Audio] 2 - Blocks Per Frame: 73728
+[APE, MAC, Audio] 4 - Final Frame Blocks: 42662
+[APE, MAC, Audio] 6 - Total Frames: 2
+[APE, MAC, Audio] 8 - Bits Per Sample: 16
+[APE, MAC, Audio] 9 - Channels: 2
+[APE, MAC, Audio] 10 - Sample Rate: 44100
+[APE, APE, Audio] Track - Track: 4
+[APE, APE, Audio] Year - Year: 2005
+[APE, APE, Audio] Genre - Genre: Electronic
+[APE, APE, Audio] Artist - Artist: Kraftwerk
+[APE, APE, Audio] Album - Album: Cover Art Test
+[APE, APE, Audio] Tool Version - Tool Version: 11.1.102
+[APE, APE, Audio] Tool Name - Tool Name: Media Center
+[APE, APE, Audio] Title - Title: Men Machine Live
+[APE, APE, Audio] Media Jukebox: Date - Media Jukebox Date: 38353
+[APE, APE, Audio] Cover Art (front) Desc - Cover Art Front Desc: X:\_kuvat\Kraftwerk - Cover Art Test.jpg
+[APE, APE, Preview] Cover Art (front) - Cover Art Front: (Binary data 1761 bytes)