- Timestamp:
- 2021-02-26T19:39:51+13:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/cpan/Image/ExifTool/Sanyo.pm
r24107 r34921 15 15 use Image::ExifTool::Exif; 16 16 17 $VERSION = '1.1 4';17 $VERSION = '1.16'; 18 18 19 19 my %offOn = ( … … 34 34 0x0100 => { 35 35 Name => 'SanyoThumbnail', 36 Groups => { 2 => 'Preview' }, 36 37 Writable => 'undef', 37 38 WriteCheck => '$self->CheckImage(\$val)', … … 351 352 }, 352 353 }, 353 0xf d=> {354 Name => 'Thumbnail Length',354 0xf1 => { 355 Name => 'Thumbnail', 355 356 Condition => '$$self{SanyoSledder0xd1}', 356 Format => 'int32u', 357 }, 358 0xfe => { 359 Name => 'ThumbnailLength', 357 SubDirectory => { 358 TagTable => 'Image::ExifTool::Sanyo::Thumbnail', 359 Base => '$start', 360 }, 361 }, 362 0xf2 => { 363 Name => 'Thumbnail', 360 364 Condition => '$$self{SanyoSledder0xd2}', 361 Format => 'int32u', 362 }, 363 0x101 => { 364 Name => 'ThumbnailOffset', 365 Condition => '$$self{SanyoSledder0xd1}', 366 IsOffset => 1, 367 Format => 'int32u', 368 RawConv => '$val + 0xf1', 369 }, 370 0x102 => { 371 Name => 'ThumbnailOffset', 372 Condition => '$$self{SanyoSledder0xd2}', 373 IsOffset => 1, 374 Format => 'int32u', 375 RawConv => '$val + 0xf2', 376 }, 377 ); 365 SubDirectory => { 366 TagTable => 'Image::ExifTool::Sanyo::Thumbnail', 367 Base => '$start', 368 }, 369 }, 370 ); 371 372 # thumbnail image information found in MP4 videos (similar in Olympus,Samsung,Sanyo) 373 %Image::ExifTool::Sanyo::Thumbnail = ( 374 PROCESS_PROC => \&Image::ExifTool::ProcessBinaryData, 375 GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' }, 376 FIRST_ENTRY => 0, 377 FORMAT => 'int32u', 378 1 => 'ThumbnailWidth', 379 2 => 'ThumbnailHeight', 380 3 => 'ThumbnailLength', 381 4 => { Name => 'ThumbnailOffset', IsOffset => 1 }, 382 ); 383 378 384 379 385 #------------------------------------------------------------------------------ … … 414 420 =head1 AUTHOR 415 421 416 Copyright 2003-20 11, Phil Harvey (phil at owl.phy.queensu.ca)422 Copyright 2003-2021, Phil Harvey (philharvey66 at gmail.com) 417 423 418 424 This library is free software; you can redistribute it and/or modify it
Note:
See TracChangeset
for help on using the changeset viewer.