Z.Data.CBytes

This module provides CBytes with some useful instances / tools for retrieving, storing or processing short byte sequences, such as file path, environment variables, etc.

The CBytes type

data CBytes where

A efficient wrapper for short immutable null-terminated byte sequences which can be automatically freed by ghc garbage collector.

The main use case of this type is to ease the bridging of C FFI APIs, since most of the unix APIs use null-terminated string. On windows you're encouraged to use a compatibility layer like 'WideCharToMultiByte/MultiByteToWideChar' and keep the same interface, e.g. libuv do this when deal with file paths.

CBytes don't support O(1) slicing, it's not suitable to use it to store large byte chunk, If you need advance editing, convert CBytes to/from Bytes with CB pattern or toBytes / fromBytes, then use vector combinators.

When textual represatation is needed e.g. converting to String, Text, Show instance, etc., we assume CBytes using UTF-8 encodings, CBytes can be used with OverloadedString, literal encoding is UTF-8 with some modifications: \NUL is encoded to 'C0 80', and \xD800 ~ \xDFFF is encoded as a three bytes normal utf-8 codepoint.

Note most of the unix API is not unicode awared though, you may find a scandir call return a filename which is not proper encoded in any unicode encoding at all. But still, UTF-8 is recommanded to be used when text represatation is needed.

Bundled Patterns

pattern CB :: Bytes -> CBytes

Use this pattern to match or construct CBytes, result will be trimmed down to first \NUL byte if there's any.

Instances

Eq CBytes

Defined in Z.Data.CBytes

Methods

(==) :: CBytes -> CBytes -> Bool

(/=) :: CBytes -> CBytes -> Bool

Ord CBytes

Defined in Z.Data.CBytes

Methods

compare :: CBytes -> CBytes -> Ordering

(<) :: CBytes -> CBytes -> Bool

(<=) :: CBytes -> CBytes -> Bool

(>) :: CBytes -> CBytes -> Bool

(>=) :: CBytes -> CBytes -> Bool

max :: CBytes -> CBytes -> CBytes

min :: CBytes -> CBytes -> CBytes

Read CBytes

Defined in Z.Data.CBytes

Methods

readsPrec :: Int -> ReadS CBytes

readList :: ReadS [CBytes]

readPrec :: ReadPrec CBytes

readListPrec :: ReadPrec [CBytes]

Show CBytes

Defined in Z.Data.CBytes

Methods

showsPrec :: Int -> CBytes -> ShowS

show :: CBytes -> String

showList :: [CBytes] -> ShowS

IsString CBytes

Defined in Z.Data.CBytes

Methods

fromString :: String -> CBytes

Semigroup CBytes

Defined in Z.Data.CBytes

Methods

(<>) :: CBytes -> CBytes -> CBytes

sconcat :: NonEmpty CBytes -> CBytes

stimes :: Integral b => b -> CBytes -> CBytes

Monoid CBytes

Defined in Z.Data.CBytes

Methods

mempty :: CBytes

mappend :: CBytes -> CBytes -> CBytes

mconcat :: [CBytes] -> CBytes

Arbitrary CBytes

Defined in Z.Data.CBytes

Methods

arbitrary :: Gen CBytes

shrink :: CBytes -> [CBytes]

CoArbitrary CBytes

Defined in Z.Data.CBytes

Methods

coarbitrary :: CBytes -> Gen b -> Gen b

NFData CBytes

Defined in Z.Data.CBytes

Methods

rnf :: CBytes -> ()

Hashable CBytes

Defined in Z.Data.CBytes

Methods

hashWithSalt :: Int -> CBytes -> Int

hash :: CBytes -> Int

Print CBytes

This instance provide UTF8 guarantee, illegal codepoints will be written as replacementChars.

Escaping rule is same with String.

Defined in Z.Data.CBytes

Methods

toUTF8BuilderP :: Int -> CBytes -> Builder ()

JSON CBytes

JSON instances check if CBytes is properly UTF8 encoded, if it is, decode/encode it as Text, otherwise as an object with a base64 field.

> encodeText ("hello" :: CBytes)
""hello""
> encodeText ("hello\NUL" :: CBytes)     -- \NUL is encoded as C0 80, which is illegal UTF8
"{"base64":"aGVsbG/AgA=="}"

Defined in Z.Data.CBytes

Methods

fromValue :: Value -> Converter CBytes

toValue :: CBytes -> Value

encodeJSON :: CBytes -> Builder ()

rawPrimArray :: CBytes -> PrimArray Word8

Convert to a \NUL terminated PrimArray,

There's an invariance that this array never contains extra \NUL except terminator.

fromPrimArray :: PrimArray Word8 -> CBytes

Construct a CBytes from arbitrary array, result will be trimmed down to first \NUL byte if there's any.

fromMutablePrimArray :: PrimMonad m => MutablePrimArray (PrimState m) Word8 -> m CBytes

Construct a CBytes from a MutablePrimArray.

Result will be shrinked to first \NUL byte without copy. If there is no \NUL found in the array, We will resize the origin MutablePrimArray, so, to avoid undefined behaviour, the original MutablePrimArray shall not be accessed anymore. Moreover, no reference to the old one should be kept in order to allow garbage collection of the original MutablePrimArray in case a new MutablePrimArray had to be allocated.

toBytes :: CBytes -> Bytes

O(1), convert to Bytes, which can be processed by vector combinators.

toBytes' :: CBytes -> Bytes

O(1), convert to Bytes with its NULL terminator.

fromBytes :: Bytes -> CBytes

O(n), convert from Bytes

Result will be trimmed down to first \NUL byte if there's any.

toText :: HasCallStack => CBytes -> Text

O(n), convert to Text using UTF8 encoding assumption.

Throw InvalidUTF8Exception in case of invalid codepoint.

toTextMaybe :: CBytes -> Maybe Text

O(n), convert to Text using UTF8 encoding assumption.

Return Nothing in case of invalid codepoint.

fromText :: Text -> CBytes

O(n), convert from Text,

Result will be trimmed down to first \NUL byte if there's any.

toBuilder :: CBytes -> Builder ()

Write CBytes 's byte sequence to buffer.

This function is different from Print instance in that it directly write byte sequence without checking if it's UTF8 encoded.

toBuilder' :: CBytes -> Builder ()

Write CBytes 's byte sequence to buffer, with its NULL terminator.

buildCBytes :: Builder a -> CBytes

Build a CBytes with builder, will automatically be trimmed down to first \NUL byte if there's any, or append with one if there's none.

pack :: String -> CBytes

Pack a String into CBytes.

\NUL is encoded as two bytes C0 80 , \xD800 ~ \xDFFF is encoded as a three bytes normal UTF-8 codepoint.

unpack :: CBytes -> String

O(n) Convert cbytes to a char list using UTF8 encoding assumption.

This function is much tolerant than toText, it simply decoding codepoints using UTF8 decodeChar without checking errors such as overlong or invalid range.

Unpacking is done lazily. i.e. we will retain reference to the array until all element are consumed.

This function is a good producer in the sense of build/foldr fusion.

null :: CBytes -> Bool

Return True if CBytes is empty.

length :: CBytes -> Int

O(1), Return the BTYE length of CBytes without NULL terminator.

empty :: CBytes

Empty CBytes

singleton :: Word8 -> CBytes

Singleton CBytes.

append :: CBytes -> CBytes -> CBytes

Concatenate two CBytes.

concat :: [CBytes] -> CBytes

O(n) Concatenate a list of CBytes.

intercalate :: CBytes -> [CBytes] -> CBytes

O(n) The intercalate function takes a CBytes and a list of CBytes s and concatenates the list after interspersing the first argument between each element of the list.

Note: intercalate will force the entire CBytes list.

intercalateElem :: Word8 -> [CBytes] -> CBytes

O(n) An efficient way to join CByte s with a byte.

Intercalate bytes list with \NUL will effectively leave the first bytes in the list.

fromCString :: CString -> IO CBytes

Copy a CString type into a CBytes, return empty if the pointer is NULL.

After copying you're free to free the CString 's memory.

fromCStringN :: CString -> Int -> IO CBytes

Same with fromCString, but only take at most N bytes.

Result will be trimmed down to first \NUL byte if there's any.

fromStdString :: IO (Ptr StdString) -> IO CBytes

Run FFI in bracket and marshall std::string* result into CBytes, memory pointed by std::string* will be delete ed.

withCBytesUnsafe :: CBytes -> (BA# Word8 -> IO a) -> IO a

Pass CBytes to foreign function as a const char*.

USE THIS FUNCTION WITH UNSAFE FFI CALL ONLY.

withCBytes :: CBytes -> (Ptr Word8 -> IO a) -> IO a

Pass CBytes to foreign function as a const char*.

Don't pass a forever loop to this function, see #14346.

allocCBytesUnsafe

Arguments

:: HasCallStack

=> Int

capacity n(including the \NUL terminator)

-> (MBA# Word8 -> IO a)

initialization function,

-> IO (CBytes, a)

Create a CBytes with IO action.

If (<=0) capacity is provided, a pointer pointing to \NUL is passed to initialize function and empty will be returned. This behavior is different from allocCBytes, which may cause trouble for some FFI functions.

USE THIS FUNCTION WITH UNSAFE FFI CALL ONLY.

allocCBytes

Arguments

:: HasCallStack

=> Int

capacity n(including the \NUL terminator)

-> (CString -> IO a)

initialization function,

-> IO (CBytes, a)

Create a CBytes with IO action.

If (<=0) capacity is provided, a nullPtr is passed to initialize function and empty will be returned. Other than that, User have to make sure a \NUL ternimated string will be written.

withCBytesListUnsafe :: [CBytes] -> (BAArray# Word8 -> Int -> IO a) -> IO a

Pass CBytes list to foreign function as a StgArrBytes**.

Enable UnliftedFFITypes extension in your haskell code, use StgArrBytes**(>=8.10) or StgMutArrPtrs*(<8.10) pointer type and HsInt to marshall BAArray# and Int arguments on C side, check the example with BAArray#.

USE THIS FUNCTION WITH UNSAFE FFI CALL ONLY.

withCBytesList :: [CBytes] -> (Ptr (Ptr Word8) -> Int -> IO a) -> IO a

Pass CBytes list to foreign function as a const char**.

Check Z.Foreign module for more detail on how to marshall params in C side.

pokeMBACBytes :: MBA# Word8 -> Int -> CBytes -> IO ()

Poke CBytes with \NUL terminator.

peekMBACBytes :: MBA# Word8 -> Int -> IO CBytes

Poke CBytes until a \NUL terminator(or to the end of the array if there's none).

indexBACBytes :: BA# Word8 -> Int -> CBytes

re-export

type CString = Ptr CChar

A C string is a reference to an array of C characters terminated by NUL.