ModuleJuicyPixels-3.3.8Haskell2010

Codec.Picture.Metadata.Exif

This module provide a totally partial and incomplete maping of Exif values. Used for Tiff parsing and reused for Exif extraction.

2 types
3 values

PackageJuicyPixels-3.3.8
Exports5
LanguageHaskell2010
LicenceBSD-3-Clause
SourceExif.hs

datadata ExifTag

Tag values used for exif fields. Completly incomplete

Constructors

TagPhotometricInterpretation
TagCompression
Short type
TagImageWidth
Short or long type
TagImageLength
Short or long type
TagXResolution
Rational type
TagYResolution
Rational type
TagResolutionUnit
TagRowPerStrip
Short or long type
TagStripByteCounts
Short or long
TagStripOffsets
Short or long
TagBitsPerSample
TagColorMap
Short
TagTileWidth
TagTileLength
TagTileOffset
TagTileByteCount
TagSamplesPerPixel
Short
TagArtist
TagDocumentName
TagSoftware
TagPlanarConfiguration
Short
TagOrientation
TagSampleFormat
Short
TagInkSet
TagSubfileType
TagFillOrder
TagYCbCrCoeff
TagYCbCrSubsampling
TagYCbCrPositioning
TagReferenceBlackWhite
TagXPosition
TagYPosition
TagExtraSample
TagImageDescription
TagPredictor
TagCopyright
TagMake
TagModel
TagDateTime
TagGPSInfo
TagLightSource
Short
TagFlash
Short
TagJpegProc
TagJPEGInterchangeFormat
TagJPEGInterchangeFormatLength
TagJPEGRestartInterval
TagJPEGLosslessPredictors
TagJPEGPointTransforms
TagJPEGQTables
TagJPEGDCTables
TagJPEGACTables
TagExifOffset
TagUnknown !Word16

Instances7Eq, Ord, Show, Generic, NFData, BinaryParam, …

Eq ExifTagDefined in JuicyPixels-3.3.8 · Codec.Picture.Metadata.Exif
Ord ExifTagDefined in JuicyPixels-3.3.8 · Codec.Picture.Metadata.Exif
Show ExifTagDefined in JuicyPixels-3.3.8 · Codec.Picture.Metadata.Exif
Generic ExifTagDefined in JuicyPixels-3.3.8 · Codec.Picture.Metadata.Exif
NFData ExifTagDefined in JuicyPixels-3.3.8 · Codec.Picture.Metadata.Exif
BinaryParam Endianness ExifTagDefined in JuicyPixels-3.3.8 · Codec.Picture.Tiff.Internal.Types
type Rep ExifTag = D1 ('MetaData "ExifTag" "Codec.Picture.Metadata.Exif" "JuicyPixels-3.3.8-4npCgW0M0fP84GCCAKWwog" 'False) (((((C1 ('MetaCons "TagPhotometricInterpretation" 'PrefixI 'False) U1 :+: (C1 ('MetaCons "TagCompression" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagImageWidth" 'PrefixI 'False) U1)) :+: (C1 ('MetaCons "TagImageLength" 'PrefixI 'False) U1 :+: (C1 ('MetaCons "TagXResolution" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagYResolution" 'PrefixI 'False) U1))) :+: ((C1 ('MetaCons "TagResolutionUnit" 'PrefixI 'False) U1 :+: (C1 ('MetaCons "TagRowPerStrip" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagStripByteCounts" 'PrefixI 'False) U1)) :+: ((C1 ('MetaCons "TagStripOffsets" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagBitsPerSample" 'PrefixI 'False) U1) :+: (C1 ('MetaCons "TagColorMap" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagTileWidth" 'PrefixI 'False) U1)))) :+: (((C1 ('MetaCons "TagTileLength" 'PrefixI 'False) U1 :+: (C1 ('MetaCons "TagTileOffset" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagTileByteCount" 'PrefixI 'False) U1)) :+: (C1 ('MetaCons "TagSamplesPerPixel" 'PrefixI 'False) U1 :+: (C1 ('MetaCons "TagArtist" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagDocumentName" 'PrefixI 'False) U1))) :+: ((C1 ('MetaCons "TagSoftware" 'PrefixI 'False) U1 :+: (C1 ('MetaCons "TagPlanarConfiguration" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagOrientation" 'PrefixI 'False) U1)) :+: ((C1 ('MetaCons "TagSampleFormat" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagInkSet" 'PrefixI 'False) U1) :+: (C1 ('MetaCons "TagSubfileType" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagFillOrder" 'PrefixI 'False) U1))))) :+: ((((C1 ('MetaCons "TagYCbCrCoeff" 'PrefixI 'False) U1 :+: (C1 ('MetaCons "TagYCbCrSubsampling" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagYCbCrPositioning" 'PrefixI 'False) U1)) :+: (C1 ('MetaCons "TagReferenceBlackWhite" 'PrefixI 'False) U1 :+: (C1 ('MetaCons "TagXPosition" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagYPosition" 'PrefixI 'False) U1))) :+: ((C1 ('MetaCons "TagExtraSample" 'PrefixI 'False) U1 :+: (C1 ('MetaCons "TagImageDescription" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagPredictor" 'PrefixI 'False) U1)) :+: ((C1 ('MetaCons "TagCopyright" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagMake" 'PrefixI 'False) U1) :+: (C1 ('MetaCons "TagModel" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagDateTime" 'PrefixI 'False) U1)))) :+: (((C1 ('MetaCons "TagGPSInfo" 'PrefixI 'False) U1 :+: (C1 ('MetaCons "TagLightSource" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagFlash" 'PrefixI 'False) U1)) :+: ((C1 ('MetaCons "TagJpegProc" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagJPEGInterchangeFormat" 'PrefixI 'False) U1) :+: (C1 ('MetaCons "TagJPEGInterchangeFormatLength" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagJPEGRestartInterval" 'PrefixI 'False) U1))) :+: ((C1 ('MetaCons "TagJPEGLosslessPredictors" 'PrefixI 'False) U1 :+: (C1 ('MetaCons "TagJPEGPointTransforms" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagJPEGQTables" 'PrefixI 'False) U1)) :+: ((C1 ('MetaCons "TagJPEGDCTables" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagJPEGACTables" 'PrefixI 'False) U1) :+: (C1 ('MetaCons "TagExifOffset" 'PrefixI 'False) U1 :+: C1 ('MetaCons "TagUnknown" 'PrefixI 'False) (S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word16))))))))Defined in JuicyPixels-3.3.8 · Codec.Picture.Metadata.Exif

datadata ExifData

Possible data held by an Exif tag

Constructors

ExifNone
ExifLong !Word32
ExifShort !Word16
ExifString !ByteString
ExifUndefined !ByteString
ExifShorts !(Vector Word16)
ExifLongs !(Vector Word32)
ExifRational !Word32 !Word32
ExifSignedRational !Int32 !Int32
ExifIFD ![(ExifTag, ExifData)]

Instances6Eq, Show, Generic, NFData, BinaryParam, Rep

Eq ExifDataDefined in JuicyPixels-3.3.8 · Codec.Picture.Metadata.Exif
Show ExifDataDefined in JuicyPixels-3.3.8 · Codec.Picture.Metadata.Exif
Generic ExifDataDefined in JuicyPixels-3.3.8 · Codec.Picture.Metadata.Exif
NFData ExifDataDefined in JuicyPixels-3.3.8 · Codec.Picture.Metadata.Exif
BinaryParam (Endianness, Int, ImageFileDirectory) ExifDataDefined in JuicyPixels-3.3.8 · Codec.Picture.Tiff.Internal.Types
type Rep ExifData = D1 ('MetaData "ExifData" "Codec.Picture.Metadata.Exif" "JuicyPixels-3.3.8-4npCgW0M0fP84GCCAKWwog" 'False) (((C1 ('MetaCons "ExifNone" 'PrefixI 'False) U1 :+: C1 ('MetaCons "ExifLong" 'PrefixI 'False) (S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word32))) :+: (C1 ('MetaCons "ExifShort" 'PrefixI 'False) (S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word16)) :+: (C1 ('MetaCons "ExifString" 'PrefixI 'False) (S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 ByteString)) :+: C1 ('MetaCons "ExifUndefined" 'PrefixI 'False) (S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 ByteString))))) :+: ((C1 ('MetaCons "ExifShorts" 'PrefixI 'False) (S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Vector Word16))) :+: C1 ('MetaCons "ExifLongs" 'PrefixI 'False) (S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Vector Word32)))) :+: (C1 ('MetaCons "ExifRational" 'PrefixI 'False) (S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word32) :*: S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word32)) :+: (C1 ('MetaCons "ExifSignedRational" 'PrefixI 'False) (S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Int32) :*: S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Int32)) :+: C1 ('MetaCons "ExifIFD" 'PrefixI 'False) (S1 ('MetaSel 'Nothing 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 [(ExifTag, ExifData)]))))))Defined in JuicyPixels-3.3.8 · Codec.Picture.Metadata.Exif

valuetagOfWord16 :: Word16 -> ExifTag

Convert a value to it's corresponding Exif tag. Will often be written as TagUnknown

valueword16OfTag :: ExifTag -> Word16

Convert a tag to it's corresponding value.

valueisInIFD0 :: ExifTag -> Bool