#------------------------------------------------------------------------------ # File: Shortcuts.pm # # Description: ExifTool shortcut tags # # Revisions: 02/07/2004 - PH Moved out of Exif.pm # 09/15/2004 - PH Added D70Boring from Greg Troxel # 01/11/2005 - PH Added Canon20D from Christian Koller # 03/03/2005 - PH Added user defined shortcuts # 03/26/2005 - PH Added Nikon from Tom Christiansen # 02/28/2007 - PH Removed model-dependent shortcuts # --> this is what UserDefined::Shortcuts is for # 02/25/2009 - PH Added Unsafe # 07/03/2010 - PH Added CommonIFD0 #------------------------------------------------------------------------------ package Image::ExifTool::Shortcuts; use strict; use vars qw($VERSION); $VERSION = '1.60'; # this is a special table used to define command-line shortcuts # (documentation Notes may be added for these via %shortcutNotes in BuildTagLookup.pm) %Image::ExifTool::Shortcuts::Main = ( # this shortcut allows the three common date/time tags to be shifted at once AllDates => [ 'DateTimeOriginal', 'CreateDate', 'ModifyDate', ], # This is a shortcut to some common information which is useful in most images Common => [ 'FileName', 'FileSize', 'Model', 'DateTimeOriginal', 'ImageSize', 'Quality', 'FocalLength', 'ShutterSpeed', 'Aperture', 'ISO', 'WhiteBalance', 'Flash', ], # This shortcut provides the same information as the Canon utilities Canon => [ 'FileName', 'Model', 'DateTimeOriginal', 'ShootingMode', 'ShutterSpeed', 'Aperture', 'MeteringMode', 'ExposureCompensation', 'ISO', 'Lens', 'FocalLength', 'ImageSize', 'Quality', 'Flash', 'FlashType', 'ConditionalFEC', 'RedEyeReduction', 'ShutterCurtainHack', 'WhiteBalance', 'FocusMode', 'Contrast', 'Sharpness', 'Saturation', 'ColorTone', 'ColorSpace', 'LongExposureNoiseReduction', 'FileSize', 'FileNumber', 'DriveMode', 'OwnerName', 'SerialNumber', ], Nikon => [ 'Model', 'SubSecDateTimeOriginal', 'ShutterCount', 'LensSpec', 'FocalLength', 'ImageSize', 'ShutterSpeed', 'Aperture', 'ISO', 'NoiseReduction', 'ExposureProgram', 'ExposureCompensation', 'WhiteBalance', 'WhiteBalanceFineTune', 'ShootingMode', 'Quality', 'MeteringMode', 'FocusMode', 'ImageOptimization', 'ToneComp', 'ColorHue', 'ColorSpace', 'HueAdjustment', 'Saturation', 'Sharpness', 'Flash', 'FlashMode', 'FlashExposureComp', ], # This shortcut may be useful when copying tags between files to either # copy the maker notes as a block or prevent it from being copied MakerNotes => [ 'MakerNotes', # (for RIFF MakerNotes) 'MakerNoteApple', 'MakerNoteCanon', 'MakerNoteCasio', 'MakerNoteCasio2', 'MakerNoteDJI', 'MakerNoteFLIR', 'MakerNoteFujiFilm', 'MakerNoteGE', 'MakerNoteGE2', 'MakerNoteHasselblad', 'MakerNoteHP', 'MakerNoteHP2', 'MakerNoteHP4', 'MakerNoteHP6', 'MakerNoteISL', 'MakerNoteJVC', 'MakerNoteJVCText', 'MakerNoteKodak1a', 'MakerNoteKodak1b', 'MakerNoteKodak2', 'MakerNoteKodak3', 'MakerNoteKodak4', 'MakerNoteKodak5', 'MakerNoteKodak6a', 'MakerNoteKodak6b', 'MakerNoteKodak7', 'MakerNoteKodak8a', 'MakerNoteKodak8b', 'MakerNoteKodak8c', 'MakerNoteKodak9', 'MakerNoteKodak10', 'MakerNoteKodak11', 'MakerNoteKodak12', 'MakerNoteKodakUnknown', 'MakerNoteKyocera', 'MakerNoteMinolta', 'MakerNoteMinolta2', 'MakerNoteMinolta3', 'MakerNoteMotorola', 'MakerNoteNikon', 'MakerNoteNikon2', 'MakerNoteNikon3', 'MakerNoteNintendo', 'MakerNoteOlympus', 'MakerNoteOlympus2', 'MakerNoteLeica', 'MakerNoteLeica2', 'MakerNoteLeica3', 'MakerNoteLeica4', 'MakerNoteLeica5', 'MakerNoteLeica6', 'MakerNoteLeica7', 'MakerNoteLeica8', 'MakerNoteLeica9', 'MakerNotePanasonic', 'MakerNotePanasonic2', 'MakerNotePanasonic3', 'MakerNotePentax', 'MakerNotePentax2', 'MakerNotePentax3', 'MakerNotePentax4', 'MakerNotePentax5', 'MakerNotePentax6', 'MakerNotePhaseOne', 'MakerNoteReconyx', 'MakerNoteReconyx2', 'MakerNoteRicoh', 'MakerNoteRicoh2', 'MakerNoteRicohText', 'MakerNoteSamsung1a', 'MakerNoteSamsung1b', 'MakerNoteSamsung2', 'MakerNoteSanyo', 'MakerNoteSanyoC4', 'MakerNoteSanyoPatch', 'MakerNoteSigma', 'MakerNoteSony', 'MakerNoteSony2', 'MakerNoteSony3', 'MakerNoteSony4', 'MakerNoteSony5', 'MakerNoteSonyEricsson', 'MakerNoteSonySRF', 'MakerNoteUnknownText', 'MakerNoteUnknownBinary', 'MakerNoteUnknown', ], # "unsafe" tags we normally don't copy in JPEG images, defined # as a shortcut to use when rebuilding JPEG EXIF from scratch Unsafe => [ 'IFD0:YCbCrPositioning', 'IFD0:YCbCrCoefficients', 'IFD0:TransferFunction', 'ExifIFD:ComponentsConfiguration', 'ExifIFD:CompressedBitsPerPixel', 'InteropIFD:InteropIndex', 'InteropIFD:InteropVersion', 'InteropIFD:RelatedImageWidth', 'InteropIFD:RelatedImageHeight', ], # standard tags used to define the color space of an image # (useful to preserve color space when deleting all meta information) ColorSpaceTags => [ 'ExifIFD:ColorSpace', 'ExifIFD:Gamma', 'InteropIFD:InteropIndex', 'ICC_Profile', ], # common metadata tags found in IFD0 of TIFF images CommonIFD0 => [ # standard EXIF 'IFD0:ImageDescription', 'IFD0:Make', 'IFD0:Model', 'IFD0:Software', 'IFD0:ModifyDate', 'IFD0:Artist', 'IFD0:Copyright', # other TIFF tags 'IFD0:Rating', 'IFD0:RatingPercent', 'IFD0:DNGLensInfo', 'IFD0:PanasonicTitle', 'IFD0:PanasonicTitle2', 'IFD0:XPTitle', 'IFD0:XPComment', 'IFD0:XPAuthor', 'IFD0:XPKeywords', 'IFD0:XPSubject', ], # large binary data tags which won't be loaded if excluded when extracting LargeTags => [ 'CanonVRD', 'DLOData', 'EXIF', 'ICC_Profile', 'IDCPreviewImage', 'ImageData', 'IPTC', 'JpgFromRaw', 'OriginalRawImage', 'OtherImage', 'PreviewImage', 'ThumbnailImage', 'TIFFPreview', 'XML', 'XMP', 'ZoomedPreviewImage', ], ); #------------------------------------------------------------------------------ # load user-defined shortcuts if available # Inputs: reference to user-defined shortcut hash sub LoadShortcuts($) { my $shortcuts = shift; my $shortcut; foreach $shortcut (keys %$shortcuts) { my $val = $$shortcuts{$shortcut}; # also allow simple aliases $val = [ $val ] unless ref $val eq 'ARRAY'; # save the user-defined shortcut or alias $Image::ExifTool::Shortcuts::Main{$shortcut} = $val; } } # (for backward compatibility, renamed in ExifTool 7.75) if (%Image::ExifTool::Shortcuts::UserDefined) { LoadShortcuts(\%Image::ExifTool::Shortcuts::UserDefined); } if (%Image::ExifTool::UserDefined::Shortcuts) { LoadShortcuts(\%Image::ExifTool::UserDefined::Shortcuts); } 1; # end __END__ =head1 NAME Image::ExifTool::Shortcuts - ExifTool shortcut tags =head1 SYNOPSIS This module is required by Image::ExifTool. =head1 DESCRIPTION This module contains definitions for tag name shortcuts used by Image::ExifTool. You can customize this file to add your own shortcuts. Individual users may also add their own shortcuts to the .ExifTool_config file in their home directory (or the directory specified by the EXIFTOOL_HOME environment variable). The shortcuts are defined in a hash called %Image::ExifTool::UserDefined::Shortcuts. The keys of the hash are the shortcut names, and the elements are either tag names or references to lists of tag names. An example shortcut definition in .ExifTool_config: %Image::ExifTool::UserDefined::Shortcuts = ( MyShortcut => ['createdate','exif:exposuretime','aperture'], MyAlias => 'FocalLengthIn35mmFormat', ); In this example, MyShortcut is a shortcut for the CreateDate, EXIF:ExposureTime and Aperture tags, and MyAlias is a shortcut for FocalLengthIn35mmFormat. The target tag names may contain an optional group name prefix. A group name applied to the shortcut will be ignored for any target tag with a group name prefix. =head1 AUTHOR Copyright 2003-2018, 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 =cut