Image-ExifTool

 view release on metacpan or  search on metacpan

lib/Image/ExifTool/Jpeg2000.pm  view on Meta::CPAN

# Inputs: 0) ExifTool object ref, 1) Output file or scalar ref
# Returns: 1 on success
sub CreateColorSpec($$)
{
    my ($et, $outfile) = @_;
    my $meth   = $et->GetNewValue('Jpeg2000:ColorSpecMethod');
    my $prec   = $et->GetNewValue('Jpeg2000:ColorSpecPrecedence') || 0;
    my $approx = $et->GetNewValue('Jpeg2000:ColorSpecApproximation') || 0;
    my $icc    = $et->GetNewValue('ICC_Profile');
    my $space  = $et->GetNewValue('Jpeg2000:ColorSpace');
    my $cdata  = $et->GetNewValue('Jpeg2000:ColorSpecData');
    unless ($meth) {
        if ($icc) {
            $meth = 2;
        } elsif (defined $space) {
            $meth = 1;
        } elsif (defined $cdata) {
            $meth = 4;
        } else {
            $et->Warn('Color space not defined'), return 0;
        }
    }
    if ($meth eq '1') {
        defined $space or $et->Warn('Must specify ColorSpace'), return 0;
        $cdata = pack('N', $space);
    } elsif ($meth eq '2' or $meth eq '3') {
        defined $icc or $et->Warn('Must specify ICC_Profile'), return 0;
        $cdata = $icc;
    } elsif ($meth eq '4') {
        defined $cdata or $et->Warn('Must specify ColorSpecData'), return 0;
    } else {
        $et->Warn('Unknown ColorSpecMethod'), return 0;
    }
    my $boxhdr = pack('N', length($cdata) + 11) . 'colr';
    Write($outfile, $boxhdr, pack('CCC',$meth,$prec,$approx), $cdata) or return 0;
    ++$$et{CHANGED};
    $et->VPrint(1, "    + Jpeg2000:ColorSpec\n");
    return 1;
}

#------------------------------------------------------------------------------
# Process JPEG 2000 box
# Inputs: 0) ExifTool object reference, 1) dirInfo reference, 2) Pointer to tag table
# Returns: 1 on success when reading, or -1 on write error
#          (or JP2 box or undef when writing from buffer)

lib/Image/ExifTool/TagLookup.pm  view on Meta::CPAN

	'colornoisereductionsmoothness' => { 528 => 'ColorNoiseReductionSmoothness', 530 => 'ColorNoiseReductionSmoothness' },
	'colorplanes' => { 129 => 0x2 },
	'colorprofile' => { 188 => 0x33 },
	'colorprofilesettings' => { 334 => 0x539 },
	'colorrepresentation' => { 140 => 0x3c },
	'colorsaturationadj' => { 109 => 0x20305 },
	'colorsequence' => { 140 => 0x41 },
	'colorspace' => { 55 => 0x3, 69 => 0xb4, 103 => 0x10b4, 125 => 0xa001, 142 => 0x3, 169 => 'ColorSpace', 189 => 0x2f, 190 => 0x25, 191 => 0x17, 246 => 0x1e, 334 => 0x507, 395 => 0x37, 436 => 0xa011, 439 => 0xb, 449 => 0x1b, 450 => 0x83, 451 => 0xe, 4...
	'colorspace2' => { 68 => 0x9 },
	'colorspecapproximation' => { 142 => 0x2 },
	'colorspecdata' => { 142 => 0x3 },
	'colorspecmethod' => { 142 => 0x0 },
	'colorspecprecedence' => { 142 => 0x1 },
	'colortempasshot' => { 41 => 0x4, 42 => 0x7, 43 => 0x1d, 44 => 0x59, 45 => 0x6d, 46 => 0x6d, 47 => 0x26, 48 => 0x43, 51 => 0x43, 52 => 0x43, 53 => 0x43, 54 => 0x4b },
	'colortempauto' => { 41 => 0x9, 42 => 0xf, 43 => 0x22, 44 => 0x5e, 45 => 0x72, 47 => 0x1c, 48 => 0x48, 51 => 0x48, 52 => 0x48, 53 => 0x48, 54 => 0x50 },
	'colortempcloudy' => { 41 => 0x22, 42 => 0x37, 43 => 0x31, 44 => 0xa4, 45 => 0xdb, 46 => 0x7c, 47 => 0x35, 48 => 0x5c, 51 => 0x75, 52 => 0x8e, 53 => 0x93, 54 => 0x96, 395 => 0x55 },
	'colortempcustom' => { 48 => 0x84 },
	'colortempcustom1' => { 43 => 0x45 },
	'colortempcustom2' => { 43 => 0x4a },
	'colortempdaylight' => { 41 => 0x18, 42 => 0x27, 43 => 0x27, 44 => 0x9a, 45 => 0xd1, 46 => 0x72, 47 => 0x2b, 48 => 0x52, 51 => 0x6b, 52 => 0x84, 53 => 0x89, 54 => 0x8c, 395 => 0x53 },
	'colortemperature' => { 1 => 0x2d, 7 => 0x73, 8 => [0x48,0x4e], 9 => 0xc0, 10 => 0x37, 11 => 0x62, 12 => 0x37, 13 => 0x7c, 14 => 0x73, 15 => 0x73, 16 => 0x77, 17 => 0x73, 18 => 0x7c, 19 => 0x58, 20 => 0x73, 21 => 0xc0, 22 => 0x7f, 23 => 0x7d, 24 => ...

lib/Image/ExifTool/TagLookup.pm  view on Meta::CPAN

	'inversemonitormatrix' => 1,
	'inverserimnonlinearity' => 1,
	'inversesbalog12transform' => 1,
	'inversesbalogtransform' => 1,
	'invnifnonlinearity' => 1,
	'involvedpeople' => 1,
	'ipmpcontrol' => 1,
	'iptc_profile' => 1,
	'iptcapplication' => 1,
	'iptccore' => 1,
	'iptcdata' => 1,
	'iptcenvelope' => 1,
	'iptcext' => 1,
	'iptcfotostation' => 1,
	'iptcnewsphoto' => 1,
	'iptcobjectdata' => 1,
	'iptcpostobjectdata' => 1,
	'iptcpreobjectdata' => 1,
	'irwindowtemperature' => 1,
	'irwindowtransmission' => 1,
	'is_protected' => 1,

lib/Image/ExifTool/TagLookup.pm  view on Meta::CPAN

	'maxjpegtableindex' => 1,
	'maxpacketsize' => 1,
	'maxpagenormal' => 1,
	'maxpdusize' => 1,
	'maxpicaveragelightlevel' => 1,
	'maxsubfilesize' => 1,
	'maxtransmissiontime' => 1,
	'maxval' => 1,
	'maxwidth' => 1,
	'mc' => 1,
	'mccdata' => 1,
	'mcdi' => 1,
	'md5signature' => 1,
	'md5sum' => 1,
	'mdcolortable' => 1,
	'mdfiletag' => 1,
	'mdfileunits' => 1,
	'mditemaccounthandles' => 1,
	'mditemaccountidentifier' => 1,
	'mditemacquisitionmake' => 1,
	'mditemacquisitionmodel' => 1,