Data.ByteString.Mp4.Boxes.DecoderConfigDescriptor

Documentation

data DecoderConfigDescriptor ot st :: [IsA (DecoderSpecificInfo ot st)] -> [IsA (Descriptor ProfileLevelIndicationIndexDescr)] -> IsA (Descriptor DecoderConfigDescr)

Information about what decoder is required for the an elementary stream. The stream type indicates the general category of the stream and.

Instances

type Eval (Descriptor 4 DecoderConfigDescr) (DecoderConfigDescriptor ot st di ps)

type Eval (Descriptor 4 DecoderConfigDescr) (DecoderConfigDescriptor ot st di ps) = MkDescriptor 4 DecoderConfigDescr (DecoderConfigDescriptorBody ot st di ps)

type family DecoderConfigDescriptorBody ot st (di :: [IsA (DecoderSpecificInfo ot st)]) (ps :: [IsA (Descriptor ProfileLevelIndicationIndexDescr)]) :: BitRecord where ...

Equations

DecoderConfigDescriptorBody ot st di ps = ((BitRecordOfEnum (SetEnum "objectTypeIndication" ObjectTypeIndicationEnum ot) :+: BitRecordOfEnum (SetEnum "objectTypeIndication" StreamTypeEnum st)) :+: (("upstream" @: Flag) .+: ((("reserved" @: Field 1) := 1) .+: (("bufferSizeDB" @: Field 24) .+: (("maxBitrate" @: FieldU32) .+: (("avgBitrate" @: FieldU32) .+: Eval (BitRecordOfList (DescriptorOfDecoderSpecificInfo :^>>>: BitRecordOfDescriptor) (di ?:: LengthIn 0 1)))))))) :+: Eval (BitRecordOfList (Extract :>>>: BitRecordOfDescriptor) (ps ?:: LengthIn 0 255))

ProfileLevelIndicationIndexDescriptor

data ProfileLevelIndicationIndexDescriptor :: IsA (FieldValue "profileLevelIndicationIndex" Nat) -> IsA (Descriptor ProfileLevelIndicationIndexDescr)

Instances

type Eval (Descriptor 20 ProfileLevelIndicationIndexDescr) (ProfileLevelIndicationIndexDescriptor val)

type Eval (Descriptor 20 ProfileLevelIndicationIndexDescr) (ProfileLevelIndicationIndexDescriptor val) = MkDescriptor 20 ProfileLevelIndicationIndexDescr (BitRecordMember Word8 * Nat 8 MkFieldU8 ((:~) "profileLevelIndicationIndex" Word8 * Nat 8 MkFieldU8 FieldU8 val))