Pantry.Internal

Exposed for testing, do not use!

Documentation

parseTree :: ByteString -> Maybe Tree

renderTree :: Tree -> ByteString

newtype Tree

Represents the contents of a tree, which is a mapping from relative file paths to TreeEntrys.

Since: 0.1.0.0

Constructors

TreeMap (Map SafeFilePath TreeEntry)

Instances

Eq Tree

Defined in Pantry.Types

Methods

(==) :: Tree -> Tree -> Bool

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

Show Tree

Defined in Pantry.Types

Methods

showsPrec :: Int -> Tree -> ShowS

show :: Tree -> String

showList :: [Tree] -> ShowS

data TreeEntry

Constructors

TreeEntry

Fields

• teBlob :: !BlobKey
• teType :: !FileType

Instances

Eq TreeEntry

Defined in Pantry.Types

Methods

(==) :: TreeEntry -> TreeEntry -> Bool

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

Show TreeEntry

Defined in Pantry.Types

Methods

showsPrec :: Int -> TreeEntry -> ShowS

show :: TreeEntry -> String

showList :: [TreeEntry] -> ShowS

data FileType

Constructors

FTNormal

FTExecutable

Instances

Bounded FileType

Defined in Pantry.Types

Methods

minBound :: FileType

maxBound :: FileType

Enum FileType

Defined in Pantry.Types

Methods

succ :: FileType -> FileType

pred :: FileType -> FileType

toEnum :: Int -> FileType

fromEnum :: FileType -> Int

enumFrom :: FileType -> [FileType]

enumFromThen :: FileType -> FileType -> [FileType]

enumFromTo :: FileType -> FileType -> [FileType]

enumFromThenTo :: FileType -> FileType -> FileType -> [FileType]

Eq FileType

Defined in Pantry.Types

Methods

(==) :: FileType -> FileType -> Bool

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

Show FileType

Defined in Pantry.Types

Methods

showsPrec :: Int -> FileType -> ShowS

show :: FileType -> String

showList :: [FileType] -> ShowS

PersistFieldSql FileType

Defined in Pantry.Types

Methods

sqlType :: Proxy FileType -> SqlType

PersistField FileType

Defined in Pantry.Types

Methods

toPersistValue :: FileType -> PersistValue

fromPersistValue :: PersistValue -> Either Text FileType

mkSafeFilePath :: Text -> Maybe SafeFilePath

pcHpackExecutable :: PantryConfig -> HpackExecutable

normalizeParents :: FilePath -> Either String FilePath

Like System.FilePath.normalise, however:

• Only works on relative paths, absolute paths fail
• Strips trailing slashes
• Only works on forward slashes, even on Windows
• Normalizes parent dirs foo.. get stripped
• Cannot begin with a parent directory (../)
• Spelled like an American, sorry

makeTarRelative

Arguments

:: FilePath

base file

-> FilePath

relative part

-> Either String FilePath

Following tar file rules (Unix file paths only), make the second file relative to the first file.

getGlobalHintsFile :: HasPantryConfig env => RIO env (Path Abs File)

Get the path to the global hints cache file

hpackVersion :: (HasPantryConfig env, HasLogFunc env, HasProcessContext env) => RIO env Version

data Storage

Represents a SQL database connection. This used to be a newtype wrapper around a connection pool. However, when investigating https://github.com/commercialhaskell/stack/issues/4471, it appeared that holding a pool resulted in overly long write locks being held on the database. As a result, we now abstract away whether a pool is used, and the default implementation in Pantry.Storage does not use a pool.

initStorage

Arguments

:: HasLogFunc env

=> Text

-> Migration

-> Path Abs File

storage file

-> (Storage -> RIO env a)

-> RIO env a

withStorage_ :: Storage -> forall env a. HasLogFunc env => ReaderT SqlBackend (RIO env) a -> RIO env a