123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129 |
- #------------------------------------------------------------------------------
- # File: Apple.pm
- #
- # Description: Apple EXIF maker notes tags
- #
- # Revisions: 2013-09-13 - P. Harvey Created
- #------------------------------------------------------------------------------
- package Image::ExifTool::Apple;
- use strict;
- use vars qw($VERSION);
- use Image::ExifTool::Exif;
- use Image::ExifTool::PLIST;
- $VERSION = '1.02';
- %Image::ExifTool::Apple::Main = (
- WRITE_PROC => \&Image::ExifTool::Exif::WriteExif,
- CHECK_PROC => \&Image::ExifTool::Exif::CheckExif,
- WRITABLE => 1,
- GROUPS => { 0 => 'MakerNotes', 2 => 'Image' },
- NOTES => 'Tags extracted from maker notes of images from the iPhone 5 with iOS 7.',
- # 0x0001 - int32s: seen 0,1,2,3,4
- # 0x0002 - binary plist with a single data object of size 512 bytes (iPhone5s)
- 0x0003 => {
- Name => 'RunTime',
- SubDirectory => { TagTable => 'Image::ExifTool::Apple::RunTime' },
- },
- # 0x0004 - int32s: normally 1, but 0 for low-light images
- # 0x0005 - int32s: seen values 147-247, and 100 for blank images
- # 0x0006 - int32s: seen values 120-258, and 20 for blank images
- # 0x0007 - int32s: seen 1
- # 0x0008 - rational64s[3]: eg) "0.02683717579 -0.7210501641 -0.6948792783"
- # 0x0009 - int32s: seen 19,531
- 0x000a => {
- Name => 'HDRImageType',
- Writable => 'int32s',
- PrintConv => {
- 3 => 'HDR Image',
- 4 => 'Original Image',
- },
- },
- 0x000b => {
- Name => 'BurstUUID',
- Writable => 'string',
- Notes => 'unique ID for all images in a burst',
- },
- # 0x000c - rational64s[2]: eg) "0.1640625 0.19921875"
- # 0x000d - int32s: 0,1,6
- # 0x000e - int32s: 0,1,12
- # 0x000f - int32s: 2,3
- # 0x0010 - int32s: 1
- # 0x0011 - string[37]: some type of UID, eg. "FFCBAC24-E547-4BBC-AF47-38B1A3D845E3\0" (iPhone 6s, iOS 6.1)
- # 0x0014 - int32s: 1,2,3,5 (iPhone 6s, iOS 6.1)
- );
- # PLIST-format CMTime structure (ref PH)
- # (CMTime ref https://developer.apple.com/library/ios/documentation/CoreMedia/Reference/CMTime/Reference/reference.html)
- %Image::ExifTool::Apple::RunTime = (
- PROCESS_PROC => \&Image::ExifTool::PLIST::ProcessBinaryPLIST,
- GROUPS => { 0 => 'MakerNotes', 2 => 'Image' },
- NOTES => q{
- This PLIST-format information contains the elements of a CMTime structure
- representing the amount of time the phone has been running since the last
- boot, not including standby time.
- },
- timescale => { Name => 'RunTimeScale' }, # (seen 1000000000 --> ns)
- epoch => { Name => 'RunTimeEpoch' }, # (seen 0)
- value => { Name => 'RunTimeValue' }, # (should divide by RunTimeScale to get seconds)
- flags => {
- Name => 'RunTimeFlags',
- PrintConv => { BITMASK => {
- 0 => 'Valid',
- 1 => 'Has been rounded',
- 2 => 'Positive infinity',
- 3 => 'Negative infinity',
- 4 => 'Indefinite',
- }},
- },
- );
- # Apple composite tags
- %Image::ExifTool::Apple::Composite = (
- GROUPS => { 2 => 'Camera' },
- RunTimeSincePowerUp => {
- Require => {
- 0 => 'Apple:RunTimeValue',
- 1 => 'Apple:RunTimeScale',
- },
- ValueConv => '$val[1] ? $val[0] / $val[1] : undef',
- PrintConv => 'ConvertDuration($val)',
- },
- );
- # add our composite tags
- Image::ExifTool::AddCompositeTags('Image::ExifTool::Apple');
- 1; # end
- __END__
- =head1 NAME
- Image::ExifTool::Apple - Apple EXIF maker notes tags
- =head1 SYNOPSIS
- This module is loaded automatically by Image::ExifTool when required.
- =head1 DESCRIPTION
- This module contains definitions required by Image::ExifTool to interpret
- Apple maker notes in EXIF information.
- =head1 AUTHOR
- Copyright 2003-2016, 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/Apple Tags>,
- L<Image::ExifTool(3pm)|Image::ExifTool>
- =cut
|