Motorola.pm 1.6 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162
  1. #------------------------------------------------------------------------------
  2. # File: Motorola.pm
  3. #
  4. # Description: Read Motorola meta information
  5. #
  6. # Revisions: 2015/10/29 - P. Harvey Created
  7. #------------------------------------------------------------------------------
  8. package Image::ExifTool::Motorola;
  9. use strict;
  10. use vars qw($VERSION);
  11. use Image::ExifTool::Exif;
  12. $VERSION = '1.00';
  13. # Motorola makernotes tags (ref PH)
  14. %Image::ExifTool::Motorola::Main = (
  15. WRITE_PROC => \&Image::ExifTool::Exif::WriteExif,
  16. CHECK_PROC => \&Image::ExifTool::Exif::CheckExif,
  17. GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
  18. WRITABLE => 1,
  19. # 0x5570 - some sort of picture mode (auto,hdr)
  20. # 0x6400 - HDR? (OFF,ON)
  21. # 0x6410 - HDR? (NO,YES)
  22. # 0x6420 - only exists in HDR images
  23. 0x665e => { Name => 'Sensor', Writable => 'string' }, # (eg. "BACK,IMX230")
  24. # 0x6700 - serial number?
  25. 0x6705 => { Name => 'ManufactureDate', Writable => 'string' }, # (NC, eg. "03Jun2015")
  26. # 0x6706 - serial number?
  27. );
  28. 1; # end
  29. __END__
  30. =head1 NAME
  31. Image::ExifTool::Motorola - Read Motorola meta information
  32. =head1 SYNOPSIS
  33. This module is loaded automatically by Image::ExifTool when required.
  34. =head1 DESCRIPTION
  35. This module contains the definitions to read meta information from Motorola
  36. cell phone images.
  37. =head1 AUTHOR
  38. Copyright 2003-2016, Phil Harvey (phil at owl.phy.queensu.ca)
  39. This library is free software; you can redistribute it and/or modify it
  40. under the same terms as Perl itself.
  41. =head1 SEE ALSO
  42. L<Image::ExifTool::TagNames/Motorola Tags>,
  43. L<Image::ExifTool(3pm)|Image::ExifTool>
  44. =cut