Safe Haskell	Safe-Inferred
Language	Haskell2010

Codec.Ktx

Contents

Header
Images
Utils

Synopsis

fromByteStringLazy :: ByteString -> Either (ByteOffset, String) Ktx
fromByteString :: ByteString -> Either (ByteOffset, String) Ktx
fromFile :: FilePath -> IO (Either (ByteOffset, String) Ktx)
toBuilder :: Ktx -> Builder
toFile :: FilePath -> Ktx -> IO ()
data Ktx = Ktx {
- header :: Header
- kvs :: KeyValueData
- images :: MipLevels
}
data Header = Header {
- identifier :: ByteString
- endianness :: Word32
- glType :: Word32
- glTypeSize :: Word32
- glFormat :: Word32
- glInternalFormat :: Word32
- glBaseInternalFormat :: Word32
- pixelWidth :: Word32
- pixelHeight :: Word32
- pixelDepth :: Word32
- numberOfArrayElements :: Word32
- numberOfFaces :: Word32
- numberOfMipmapLevels :: Word32
- bytesOfKeyValueData :: Word32
}
endiannessLE :: Word32
canonicalIdentifier :: ByteString
type MipLevels = Vector MipLevel
data MipLevel = MipLevel {
- imageSize :: Word32
- arrayElements :: Vector ArrayElement
}
newtype ArrayElement = ArrayElement {
- faces :: Vector Face
}
newtype Face = Face {
- zSlices :: Vector ZSlice
}
newtype ZSlice = ZSlice {
- block :: ByteString
}
getImages :: Header -> Get MipLevels
putImages :: (Word32 -> Put) -> MipLevels -> Put
mkGetWord32 :: Word32 -> Get Word32
mkPutWord32 :: Word32 -> Word32 -> Put

Documentation

fromByteStringLazy :: ByteString -> Either (ByteOffset, String) Ktx Source #

fromByteString :: ByteString -> Either (ByteOffset, String) Ktx Source #

fromFile :: FilePath -> IO (Either (ByteOffset, String) Ktx) Source #

toBuilder :: Ktx -> Builder Source #

toFile :: FilePath -> Ktx -> IO () Source #

data Ktx Source #

Constructors

Ktx
Fields header :: Header kvs :: KeyValueData images :: MipLevels

Instances

Instances details

Generic Ktx Source #
Instance details Defined in Codec.Ktx Associated Types type Rep Ktx :: Type -> Type # Methods from :: Ktx -> Rep Ktx x # to :: Rep Ktx x -> Ktx #
Show Ktx Source #
Instance details Defined in Codec.Ktx Methods showsPrec :: Int -> Ktx -> ShowS # show :: Ktx -> String # showList :: [Ktx] -> ShowS #
Binary Ktx Source #
Instance details Defined in Codec.Ktx Methods put :: Ktx -> Put # get :: Get Ktx # putList :: [Ktx] -> Put #
type Rep Ktx Source #
Instance details Defined in Codec.Ktx type Rep Ktx = D1 ('MetaData "Ktx" "Codec.Ktx" "ktx-codec-0.0.2.0-84DzqCckuCeLP6J4LSYncI" 'False) (C1 ('MetaCons "Ktx" 'PrefixI 'True) (S1 ('MetaSel ('Just "header") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Header) :: (S1 ('MetaSel ('Just "kvs") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 KeyValueData) :: S1 ('MetaSel ('Just "images") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 MipLevels))))

Header

data Header Source #

Constructors

Header
Fields identifier :: ByteString endianness :: Word32 glType :: Word32 glTypeSize :: Word32 glFormat :: Word32 glInternalFormat :: Word32 glBaseInternalFormat :: Word32 pixelWidth :: Word32 pixelHeight :: Word32 pixelDepth :: Word32 numberOfArrayElements :: Word32 numberOfFaces :: Word32 numberOfMipmapLevels :: Word32 bytesOfKeyValueData :: Word32

Instances

endiannessLE :: Word32 Source #

canonicalIdentifier :: ByteString Source #

Images

type MipLevels = Vector MipLevel Source #

data MipLevel Source #

Constructors

MipLevel
Fields imageSize :: Word32 arrayElements :: Vector ArrayElement

Instances

Instances details

Generic MipLevel Source #
Instance details Defined in Codec.Ktx Associated Types type Rep MipLevel :: Type -> Type # Methods from :: MipLevel -> Rep MipLevel x # to :: Rep MipLevel x -> MipLevel #
Show MipLevel Source #
Instance details Defined in Codec.Ktx Methods showsPrec :: Int -> MipLevel -> ShowS # show :: MipLevel -> String # showList :: [MipLevel] -> ShowS #
type Rep MipLevel Source #
Instance details Defined in Codec.Ktx type Rep MipLevel = D1 ('MetaData "MipLevel" "Codec.Ktx" "ktx-codec-0.0.2.0-84DzqCckuCeLP6J4LSYncI" 'False) (C1 ('MetaCons "MipLevel" 'PrefixI 'True) (S1 ('MetaSel ('Just "imageSize") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32) :*: S1 ('MetaSel ('Just "arrayElements") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Vector ArrayElement))))

newtype ArrayElement Source #

Constructors

ArrayElement
Fields faces :: Vector Face

Instances

Instances details

Generic ArrayElement Source #
Instance details Defined in Codec.Ktx Associated Types type Rep ArrayElement :: Type -> Type # Methods from :: ArrayElement -> Rep ArrayElement x # to :: Rep ArrayElement x -> ArrayElement #
Show ArrayElement Source #
Instance details Defined in Codec.Ktx Methods showsPrec :: Int -> ArrayElement -> ShowS # show :: ArrayElement -> String # showList :: [ArrayElement] -> ShowS #
type Rep ArrayElement Source #
Instance details Defined in Codec.Ktx type Rep ArrayElement = D1 ('MetaData "ArrayElement" "Codec.Ktx" "ktx-codec-0.0.2.0-84DzqCckuCeLP6J4LSYncI" 'True) (C1 ('MetaCons "ArrayElement" 'PrefixI 'True) (S1 ('MetaSel ('Just "faces") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Vector Face))))

newtype Face Source #

Constructors

Face
Fields zSlices :: Vector ZSlice

Instances

Instances details

Generic Face Source #
Instance details Defined in Codec.Ktx Associated Types type Rep Face :: Type -> Type # Methods from :: Face -> Rep Face x # to :: Rep Face x -> Face #
Show Face Source #
Instance details Defined in Codec.Ktx Methods showsPrec :: Int -> Face -> ShowS # show :: Face -> String # showList :: [Face] -> ShowS #
type Rep Face Source #
Instance details Defined in Codec.Ktx type Rep Face = D1 ('MetaData "Face" "Codec.Ktx" "ktx-codec-0.0.2.0-84DzqCckuCeLP6J4LSYncI" 'True) (C1 ('MetaCons "Face" 'PrefixI 'True) (S1 ('MetaSel ('Just "zSlices") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Vector ZSlice))))

newtype ZSlice Source #

Constructors

ZSlice
Fields block :: ByteString

Instances

Instances details

Generic ZSlice Source #
Instance details Defined in Codec.Ktx Associated Types type Rep ZSlice :: Type -> Type # Methods from :: ZSlice -> Rep ZSlice x # to :: Rep ZSlice x -> ZSlice #
Show ZSlice Source #
Instance details Defined in Codec.Ktx Methods showsPrec :: Int -> ZSlice -> ShowS # show :: ZSlice -> String # showList :: [ZSlice] -> ShowS #
type Rep ZSlice Source #
Instance details Defined in Codec.Ktx type Rep ZSlice = D1 ('MetaData "ZSlice" "Codec.Ktx" "ktx-codec-0.0.2.0-84DzqCckuCeLP6J4LSYncI" 'True) (C1 ('MetaCons "ZSlice" 'PrefixI 'True) (S1 ('MetaSel ('Just "block") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ByteString)))

getImages :: Header -> Get MipLevels Source #

putImages :: (Word32 -> Put) -> MipLevels -> Put Source #

Utils

mkGetWord32 :: Word32 -> Get Word32 Source #

mkPutWord32 :: Word32 -> Word32 -> Put Source #

Generic Header Source #
Instance details Defined in Codec.Ktx Associated Types type Rep Header :: Type -> Type # Methods from :: Header -> Rep Header x # to :: Rep Header x -> Header #
Show Header Source #
Instance details Defined in Codec.Ktx Methods showsPrec :: Int -> Header -> ShowS # show :: Header -> String # showList :: [Header] -> ShowS #
Binary Header Source #
Instance details Defined in Codec.Ktx Methods put :: Header -> Put # get :: Get Header # putList :: [Header] -> Put #
type Rep Header Source #
Instance details Defined in Codec.Ktx type Rep Header = D1 ('MetaData "Header" "Codec.Ktx" "ktx-codec-0.0.2.0-84DzqCckuCeLP6J4LSYncI" 'False) (C1 ('MetaCons "Header" 'PrefixI 'True) (((S1 ('MetaSel ('Just "identifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 ByteString) :: (S1 ('MetaSel ('Just "endianness") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32) :: S1 ('MetaSel ('Just "glType") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32))) :: ((S1 ('MetaSel ('Just "glTypeSize") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32) :: S1 ('MetaSel ('Just "glFormat") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32)) :: (S1 ('MetaSel ('Just "glInternalFormat") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32) :: S1 ('MetaSel ('Just "glBaseInternalFormat") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32)))) :: ((S1 ('MetaSel ('Just "pixelWidth") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32) :: (S1 ('MetaSel ('Just "pixelHeight") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32) :: S1 ('MetaSel ('Just "pixelDepth") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32))) :: ((S1 ('MetaSel ('Just "numberOfArrayElements") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32) :: S1 ('MetaSel ('Just "numberOfFaces") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32)) :: (S1 ('MetaSel ('Just "numberOfMipmapLevels") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32) :*: S1 ('MetaSel ('Just "bytesOfKeyValueData") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word32))))))