Rainbow.Translate

This module contains functions that convert a Chunk into ByteStrings. Ordinarily everything you need from this module is exported from Rainbow.

Documentation

single :: Char -> [ByteString] -> [ByteString]

escape :: [ByteString] -> [ByteString]

csi :: [ByteString] -> [ByteString]

sgr :: ([ByteString] -> [ByteString]) -> [ByteString] -> [ByteString]

params :: Show a => [a] -> [ByteString] -> [ByteString]

sgrSingle :: Word -> [ByteString] -> [ByteString]

sgrDouble :: Word -> Word -> [ByteString] -> [ByteString]

normalDefault :: [ByteString] -> [ByteString]

bold :: [ByteString] -> [ByteString]

faint :: [ByteString] -> [ByteString]

italic :: [ByteString] -> [ByteString]

underline :: [ByteString] -> [ByteString]

blink :: [ByteString] -> [ByteString]

inverse :: [ByteString] -> [ByteString]

invisible :: [ByteString] -> [ByteString]

strikeout :: [ByteString] -> [ByteString]

foreBlack :: [ByteString] -> [ByteString]

foreRed :: [ByteString] -> [ByteString]

foreGreen :: [ByteString] -> [ByteString]

foreYellow :: [ByteString] -> [ByteString]

foreBlue :: [ByteString] -> [ByteString]

foreMagenta :: [ByteString] -> [ByteString]

foreCyan :: [ByteString] -> [ByteString]

foreWhite :: [ByteString] -> [ByteString]

foreDefault :: [ByteString] -> [ByteString]

backBlack :: [ByteString] -> [ByteString]

backRed :: [ByteString] -> [ByteString]

backGreen :: [ByteString] -> [ByteString]

backYellow :: [ByteString] -> [ByteString]

backBlue :: [ByteString] -> [ByteString]

backMagenta :: [ByteString] -> [ByteString]

backCyan :: [ByteString] -> [ByteString]

backWhite :: [ByteString] -> [ByteString]

backDefault :: [ByteString] -> [ByteString]

fore256 :: Word8 -> [ByteString] -> [ByteString]

back256 :: Word8 -> [ByteString] -> [ByteString]

foreColor8 :: Enum8 -> [ByteString] -> [ByteString]

backColor8 :: Enum8 -> [ByteString] -> [ByteString]

renderFormat :: Format -> [ByteString] -> [ByteString]

renderStyle8 :: Style Enum8 -> [ByteString] -> [ByteString]

renderStyle256 :: Style Word8 -> [ByteString] -> [ByteString]

render :: Text -> [ByteString] -> [ByteString]

toByteStringsColors0 :: Chunk -> [ByteString] -> [ByteString]

toByteStringsColors8 :: Chunk -> [ByteString] -> [ByteString]

toByteStringsColors256 :: Chunk -> [ByteString] -> [ByteString]

byteStringMakerFromEnvironment :: IO (Chunk -> [ByteString] -> [ByteString])

Spawns a subprocess to read the output of tput colors. If this says there are at least 256 colors are available, returns toByteStringsColors256. Otherwise, if there are at least 8 colors available, returns toByteStringsColors8. Otherwise, returns toByteStringsColors0.

If any IO exceptions arise during this process, they are discarded and toByteStringsColors0 is returned.

byteStringMakerFromHandle :: Handle -> IO (Chunk -> [ByteString] -> [ByteString])

Like byteStringMakerFromEnvironment but also consults a provided Handle. If the Handle is not a terminal, toByteStringsColors0 is returned. Otherwise, the value of byteStringMakerFromEnvironment is returned.

chunksToByteStrings

Arguments

:: (Chunk -> [ByteString] -> [ByteString])

Function that converts Chunk to ByteString. This function, when applied to a Chunk, returns a difference list.

-> [Chunk]

-> [ByteString]

Convert a list of Chunk to a list of ByteString. The length of the returned list may be longer than the length of the input list.

So, for example, to print a bunch of chunks to standard output using 256 colors:

module PrintMyChunks where

import qualified Data.ByteString as BS
import Rainbow

myChunks :: [Chunk String]
myChunks = [ chunk "Roses" & fore red, chunk "\n",
             chunk "Violets" & fore blue, chunk "\n" ]

myPrintedChunks :: IO ()
myPrintedChunks = mapM_ BS.putStr
                . chunksToByteStrings toByteStringsColors256
                $ myChunks

To use the highest number of colors that this terminal supports:

myPrintedChunks' :: IO ()
myPrintedChunks' = do
  printer <- byteStringMakerFromEnvironment
  mapM_ BS.putStr
    . chunksToByteStrings printer
    $ myChunks

hPutChunks :: Handle -> [Chunk] -> IO ()

Writes a list of chunks to the given Handle.

First uses byteStringMakerFromEnvironment to determine how many colors to use. Then creates a list of ByteString using chunksToByteStrings and then writes them to the given Handle.

putChunks :: [Chunk] -> IO ()

Writes a list of chunks to standard output.

First uses byteStringMakerFromEnvironment to determine how many colors to use. Then creates a list of ByteString using chunksToByteStrings and then writes them to standard output.

putChunk :: Chunk -> IO ()

Writes a Chunk to standard output. Spawns a child process to read the output of tput colors to determine how many colors to use, for every single chunk. Therefore, this is not going to win any speed awards. You are better off using chunksToByteStrings and the functions in Data.ByteString to print your Chunks if you are printing a lot of them.

putChunkLn :: Chunk -> IO ()

Writes a Chunk to standard output, and appends a newline. Spawns a child process to read the output of tput colors to determine how many colors to use, for every single chunk. Therefore, this is not going to win any speed awards. You are better off using chunksToByteStrings and the functions in Data.ByteString to print your Chunks if you are printing a lot of them.