Safe Haskell	None
Language	Haskell2010

Data.ByteString.IsoBaseFileFormat.Boxes.VisualSampleEntry

Contents

Clean Aperture sub box
Pixel aspect ratio sub box
Colour information sub box

Description

Detailed visual sample description.

Synopsis

Documentation

visualSampleEntry :: KnownSymbol (BoxTypeSymbol (SampleEntry VideoTrack (VideoCoding codec))) => VideoCoding codec -> U16 "data_reference_index" -> SampleEntry VideoTrack (VideoCoding codec) -> Box (SampleEntry VideoTrack (VideoCoding codec)) Source #

Construct a visual sample entry box

data family VideoCoding (c :: Symbol) Source #

A coproduct of video codec types

Instances

Default (SampleEntry * VideoTrack (VideoCoding c)) Source #
Methods def :: SampleEntry * VideoTrack (VideoCoding c) #
IsBoxContent (SampleEntry * VideoTrack (VideoCoding c)) Source #
Methods boxSize :: SampleEntry * VideoTrack (VideoCoding c) -> BoxSize Source # boxBuilder :: SampleEntry * VideoTrack (VideoCoding c) -> Builder Source #
data VideoCoding "mp4v" Source #	Simple default MPEG-4 video
data VideoCoding "mp4v" = Mpeg4Avc
data SampleEntry * VideoTrack (VideoCoding c) Source #	Fields if visual sample entries. A `depth` of 0x0018 means colour image with no alpha. The `horizresolution` and `vertresolution` of 0x00480000 means 72 dpi. The `frame_count` indicates the number of video frames per sample.
data SampleEntry * VideoTrack (VideoCoding c) = VideoSampleEntry ((:+) (U16 Symbol "pre_defined") ((:+) (Constant * Nat (U16 Symbol "reserved") 0) ((:+) (U16 Symbol "width") ((:+) (U16 Symbol "height") ((:+) (Template Nat (U32 Symbol "horizresolution") 4718592) ((:+) (Template Nat (U32 Symbol "vertresolution") 4718592) ((:+) (Constant * Nat (U32 Symbol "reserved") 0) ((:+) (Template Nat (U16 Symbol "frame_count") 1) ((:+) (FixSizeText 32 "compressorname") ((:+) (Template Nat (U16 Symbol "depth") 24) ((:+) (Template Nat (I16 Symbol "pre_defined") 65535) ((:+) (Maybe (Box CleanAperture)) ((:+) (Maybe (Box PixelAspectRatio)) [Box SomeColourInformation])))))))))))))
type BoxTypeSymbol * (VideoCoding c) Source #
type BoxTypeSymbol * (VideoCoding c) = c

Clean Aperture sub box

cleanAperture :: CleanAperture -> Box CleanAperture Source #

Construct a CleanAperture (sub-) Box

newtype CleanAperture where Source #

The clean aperture settings

Constructors

CleanAperture :: (U32 "cleanApertureWidthN" :+ (U32 "cleanApertureWidthD" :+ (U32 "cleanApertureHeightN" :+ (U32 "cleanApertureHeightD" :+ (U32 "horizOffN" :+ (U32 "horizOffD" :+ (U32 "vertOffN" :+ U32 "vertOffD"))))))) -> CleanAperture

Instances

Default CleanAperture Source #
Methods def :: CleanAperture #
IsBoxContent CleanAperture Source #
Methods boxSize :: CleanAperture -> BoxSize Source # boxBuilder :: CleanAperture -> Builder Source #
IsBox CleanAperture Source #
Associated Types type BoxContent CleanAperture :: * Source # Methods toBoxType :: proxy CleanAperture -> BoxType Source #
type BoxContent CleanAperture Source #
type BoxContent CleanAperture = CleanAperture
type BoxTypeSymbol * CleanAperture Source #
type BoxTypeSymbol * CleanAperture = "clap"

Pixel aspect ratio sub box

pixelAspectRatio :: PixelAspectRatio -> Box PixelAspectRatio Source #

Construct a PixelAspectRatio (sub-) Box

newtype PixelAspectRatio where Source #

The pixel aspect ratio.

Constructors

PixelAspectRatio :: (U32 "hSpacing" :+ U32 "vSpacing") -> PixelAspectRatio

Instances

Default PixelAspectRatio Source #
Methods def :: PixelAspectRatio #
IsBoxContent PixelAspectRatio Source #
Methods boxSize :: PixelAspectRatio -> BoxSize Source # boxBuilder :: PixelAspectRatio -> Builder Source #
IsBox PixelAspectRatio Source #
Associated Types type BoxContent PixelAspectRatio :: * Source # Methods toBoxType :: proxy PixelAspectRatio -> BoxType Source #
type BoxContent PixelAspectRatio Source #
type BoxContent PixelAspectRatio = PixelAspectRatio
type BoxTypeSymbol * PixelAspectRatio Source #
type BoxTypeSymbol * PixelAspectRatio = "pasp"

Colour information sub box

colourInformation :: ColourType p -> ColourInformation p Source #

Construct a ColourInformation (sub-) Box

onScreenColourInformation :: ColourType OnScreenColours -> ColourInformation OnScreenColours Source #

Construct a ColourInformation (sub-) Box from OnScreenColours

restrictedICCProfileColourInformation :: ColourType RestrictedICCProfile -> ColourInformation RestrictedICCProfile Source #

Construct a ColourInformation (sub-) Box from RestrictedICCProfile

unrestrictedICCProfileColourInformation :: ColourType UnrestrictedICCProfile -> ColourInformation UnrestrictedICCProfile Source #

Construct a ColourInformation (sub-) Box from UnrestrictedICCProfile

data SomeColourInformation where Source #

A wrapper that hides the concrete ColourTypeProfile of a ColourInformation.

Constructors

SomeColourInformation :: forall profile. IsBoxContent (ColourInformation profile) => ColourInformation profile -> SomeColourInformation

Instances

IsBoxContent SomeColourInformation Source #
Methods boxSize :: SomeColourInformation -> BoxSize Source # boxBuilder :: SomeColourInformation -> Builder Source #
IsBox SomeColourInformation Source #
Associated Types type BoxContent SomeColourInformation :: * Source # Methods toBoxType :: proxy SomeColourInformation -> BoxType Source #
IsBoxContent [Box SomeColourInformation] Source #
Methods boxSize :: [Box SomeColourInformation] -> BoxSize Source # boxBuilder :: [Box SomeColourInformation] -> Builder Source #
type BoxContent SomeColourInformation Source #
type BoxContent SomeColourInformation = SomeColourInformation
type BoxTypeSymbol * SomeColourInformation Source #
type BoxTypeSymbol * SomeColourInformation = "pasp"

newtype ColourInformation profile where Source #

Profile dependent colour information

Constructors

ColourInformation :: (Constant (U32Text "colour_type") (ColourTypeCode profile) :+ ColourType profile) -> ColourInformation profile

Instances

Default (ColourType profile) => Default (ColourInformation profile) Source #
Methods def :: ColourInformation profile #
(KnownSymbol (ColourTypeCode profile), IsBoxContent (ColourType profile)) => IsBoxContent (ColourInformation profile) Source #
Methods boxSize :: ColourInformation profile -> BoxSize Source # boxBuilder :: ColourInformation profile -> Builder Source #

data ColourTypeProfile Source #

Colour type profiles

Constructors

OnScreenColours	PTM_COLOR_INFO from A.7.2 of ISO/IEC 29199-2, mind the full range flag.
RestrictedICCProfile	A restricted ICC.1 (2010) profile
UnrestrictedICCProfile	An unrestricted IEC ISO-15076 part 1, ICC.1 (2010) profile

type family ColourType (p :: ColourTypeProfile) where ... Source #

Profile dependent colour information family

Equations

ColourType OnScreenColours = U16 "colour_primaries" :+ (U16 "transfer_characteristics" :+ (U16 "matrix_coefficients" :+ FullRangeFlag))
ColourType RestrictedICCProfile = Text
ColourType UnrestrictedICCProfile = Text

data FullRangeFlag Source #

The full range flag, note the different bit layout compared to PTM_COLOR_INFO in ISO 29199-2.

Constructors

IsFullRange
IsNotFullRange

Instances

Default FullRangeFlag Source #
Methods def :: FullRangeFlag #
IsBoxContent FullRangeFlag Source #
Methods boxSize :: FullRangeFlag -> BoxSize Source # boxBuilder :: FullRangeFlag -> Builder Source #

type family ColourTypeCode (p :: ColourTypeProfile) :: Symbol where ... Source #

Return the color type four letter code for a ColourTypeProfile.

Equations

ColourTypeCode OnScreenColours = "nclx"
ColourTypeCode RestrictedICCProfile = "rICC"
ColourTypeCode UnrestrictedICCProfile = "prof"