TestContainers.Tasty

Tasty Ingredient

ingredient :: Ingredient

Tasty Ingredient that adds useful options to control defaults within the TetContainers library.

main :: IO ()
main = defaultMainWithIngredients (ingredient : defaultIngredients) tests

Since: 0.3.0.0

Running containers for tests

withContainers :: forall a. (forall m. MonadDocker m => m a) -> (IO a -> TestTree) -> TestTree

Re-exports for convenience

(&) :: a -> (a -> b) -> b infixl 1

& is a reverse application operator. This provides notational convenience. Its precedence is one higher than that of the forward application operator $, which allows & to be nested in $.

>>> 5 & (+1) & show
"6"

Since: base-4.8.0.0

runResourceT :: MonadUnliftIO m => ResourceT m a -> m a

Unwrap a ResourceT transformer, and call all registered release actions.

Note that there is some reference counting involved due to resourceForkIO. If multiple threads are sharing the same collection of resources, only the last call to runResourceT will deallocate the resources.

NOTE Since version 1.2.0, this function will throw a ResourceCleanupException if any of the cleanup functions throw an exception.

Since: resourcet-0.3.0

type ResIO = ResourceT IO

Convenient alias for ResourceT IO.

type InspectOutput = Value

The parsed JSON output of docker inspect command.

Since: 0.1.0.0

data Container

Handle to a Docker container.

Since: 0.1.0.0

data Image

Handle to a Docker image.

Since: 0.1.0.0

Instances

Eq Image

Defined in TestContainers.Docker

Methods

(==) :: Image -> Image -> Bool

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

Show Image

Defined in TestContainers.Docker

Methods

showsPrec :: Int -> Image -> ShowS

show :: Image -> String

showList :: [Image] -> ShowS

data Pipe

A data type indicating which pipe to scan for a specific log line.

Since: 0.1.0.0

Constructors

Stdout

Refer to logs on STDOUT.

Stderr

Refer to logs on STDERR.

Instances

Eq Pipe

Defined in TestContainers.Docker

Methods

(==) :: Pipe -> Pipe -> Bool

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

Ord Pipe

Defined in TestContainers.Docker

Methods

compare :: Pipe -> Pipe -> Ordering

(<) :: Pipe -> Pipe -> Bool

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

(>) :: Pipe -> Pipe -> Bool

(>=) :: Pipe -> Pipe -> Bool

max :: Pipe -> Pipe -> Pipe

min :: Pipe -> Pipe -> Pipe

Show Pipe

Defined in TestContainers.Docker

Methods

showsPrec :: Int -> Pipe -> ShowS

show :: Pipe -> String

showList :: [Pipe] -> ShowS

newtype TimeoutException

The exception thrown by waitUntilTimeout.

Since: 0.1.0.0

Constructors

TimeoutException

Fields

• id :: ContainerId

  The id of the underlying container that was not ready in time.

Instances

Eq TimeoutException

Defined in TestContainers.Docker

Methods

(==) :: TimeoutException -> TimeoutException -> Bool

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

Show TimeoutException

Defined in TestContainers.Docker

Methods

showsPrec :: Int -> TimeoutException -> ShowS

show :: TimeoutException -> String

showList :: [TimeoutException] -> ShowS

Exception TimeoutException

Defined in TestContainers.Docker

Methods

toException :: TimeoutException -> SomeException

fromException :: SomeException -> Maybe TimeoutException

displayException :: TimeoutException -> String

newtype UnexpectedEndOfPipe

The exception thrown by waitForLine in case the expected log line wasn't found.

Since: 0.1.0.0

Constructors

UnexpectedEndOfPipe

Fields

• id :: ContainerId

  The id of the underlying container.

Instances

Eq UnexpectedEndOfPipe

Defined in TestContainers.Docker

Methods

(==) :: UnexpectedEndOfPipe -> UnexpectedEndOfPipe -> Bool

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

Show UnexpectedEndOfPipe

Defined in TestContainers.Docker

Methods

showsPrec :: Int -> UnexpectedEndOfPipe -> ShowS

show :: UnexpectedEndOfPipe -> String

showList :: [UnexpectedEndOfPipe] -> ShowS

Exception UnexpectedEndOfPipe

Defined in TestContainers.Docker

Methods

toException :: UnexpectedEndOfPipe -> SomeException

fromException :: SomeException -> Maybe UnexpectedEndOfPipe

displayException :: UnexpectedEndOfPipe -> String

data WaitUntilReady

A strategy that describes how to asses readiness of a Container. Allows Users to plug in their definition of readiness.

Since: 0.1.0.0

data ToImage

A description of how to build an Image.

Since: 0.1.0.0

type ImageTag = Text

A tag to a Docker image.

Since: 0.1.0.0

data ContainerRequest

Parameters for a running a Docker container.

Since: 0.1.0.0

type MonadDocker m = (MonadIO m, MonadMask m, MonadThrow m, MonadCatch m, MonadResource m, MonadReader Config m)

Docker related functionality is parameterized over this Monad.

Since: 0.1.0.0

data DockerException

Failing to interact with Docker results in this exception being thrown.

Since: 0.1.0.0

Constructors

DockerException

Fields

• exitCode :: ExitCode

  Exit code of the underlying Docker process.

• args :: [Text]

  Arguments that were passed to Docker.

• stderr :: Text

  Docker's STDERR output.

InspectUnknownContainerId

Fields

• id :: ContainerId

  Id of the Container that we tried to lookup the port mapping.

InspectOutputInvalidJSON

Fields

• id :: ContainerId

  Id of the Container that we tried to lookup the port mapping.

InspectOutputUnexpected

Fields

• id :: ContainerId

  Id of the Container that we tried to lookup the port mapping.

UnknownPortMapping

Fields

• id :: ContainerId

  Id of the Container that we tried to lookup the port mapping.

• port :: Text

  Textual representation of port mapping we were trying to look up.

Instances

Eq DockerException

Defined in TestContainers.Docker

Methods

(==) :: DockerException -> DockerException -> Bool

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

Show DockerException

Defined in TestContainers.Docker

Methods

showsPrec :: Int -> DockerException -> ShowS

show :: DockerException -> String

showList :: [DockerException] -> ShowS

Exception DockerException

Defined in TestContainers.Docker

Methods

toException :: DockerException -> SomeException

fromException :: SomeException -> Maybe DockerException

displayException :: DockerException -> String

data Config

Configuration for defaulting behavior.

Since: 0.2.0.0

Constructors

Config

Fields

• configDefaultWaitTimeout :: Maybe Int

  The number of seconds to maximally wait for a container to become ready. Default is `Just 60`.

  Nothing = waits indefinitely.

• configTracer :: Tracer

  Traces execution inside testcontainers library.

data Tracer

Traces execution within testcontainers library.

Instances

Semigroup Tracer

Defined in TestContainers.Docker

Methods

(<>) :: Tracer -> Tracer -> Tracer

sconcat :: NonEmpty Tracer -> Tracer

stimes :: Integral b => b -> Tracer -> Tracer

Monoid Tracer

Defined in TestContainers.Docker

Methods

mempty :: Tracer

mappend :: Tracer -> Tracer -> Tracer

mconcat :: [Tracer] -> Tracer

pattern TraceOpenSocket :: Text -> Int -> Maybe IOException -> Trace

Opening socket

pattern TraceWaitUntilReady :: Maybe Int -> Trace

Waiting for a container to become ready. Attached with the timeout to wait (in seconds).

pattern TraceDockerStderr :: Text -> Trace

Line written to STDERR by a Docker process.

pattern TraceDockerInvocation :: [Text] -> Text -> ExitCode -> Trace

The low-level invocation of docker command

  TraceDockerInvocation args stdin exitcode

pattern TraceDockerStdout :: Text -> Trace

Line written to STDOUT by a Docker process.

newTracer :: (Trace -> IO ()) -> Tracer

Construct a new Tracer from a tracing function.

defaultDockerConfig :: Config

Default configuration.

Since: 0.2.0.0

determineConfig :: IO Config

Autoselect the default configuration depending on wether you use Docker For Mac or not.

containerRequest :: ToImage -> ContainerRequest

Default ContainerRequest. Used as base for every Docker container.

Since: 0.1.0.0

setName :: Text -> ContainerRequest -> ContainerRequest

Set the name of a Docker container. This is equivalent to invoking docker run with the --name parameter.

Since: 0.1.0.0

setCmd :: [Text] -> ContainerRequest -> ContainerRequest

The command to execute inside the Docker container. This is the equivalent of passing the command on the docker run invocation.

Since: 0.1.0.0

setVolumeMounts :: [(Text, Text)] -> ContainerRequest -> ContainerRequest

The volume mounts to link to Docker container. This is the equivalent of passing the command on the docker run -v invocation.

setRm :: Bool -> ContainerRequest -> ContainerRequest

Wether to remove the container once exited. This is equivalent to passing --rm to docker run. (default is True).

Since: 0.1.0.0

setEnv :: [(Text, Text)] -> ContainerRequest -> ContainerRequest

Set the environment for the container. This is equivalent to passing --env key=value to docker run.

Since: 0.1.0.0

setLink :: [ContainerId] -> ContainerRequest -> ContainerRequest

Set link on the container. This is equivalent to passing --link other_container to docker run.

Since: 0.1.0.0

setExpose :: [Int] -> ContainerRequest -> ContainerRequest

Set exposed ports on the container. This is equivalent to setting --publish $PORT to docker run. Docker assigns a random port for the host port. You will have to use containerIp and containerPort to connect to the published port.

  container <- run $ containerRequest redis & setExpose [ 6379 ]
  let (redisHost, redisPort) = (containerIp container, containerPort container 6379)
  print (redisHost, redisPort)

Since: 0.1.0.0

setWaitingFor :: WaitUntilReady -> ContainerRequest -> ContainerRequest

Set the waiting strategy on the container. Depending on a Docker container it can take some time until the provided service is ready. You will want to use to setWaitingFor to block until the container is ready to use.

Since: 0.1.0.0

run :: MonadDocker m => ContainerRequest -> m Container

Runs a Docker container from an Image and ContainerRequest. A finalizer is registered so that the container is aways stopped when it goes out of scope. This function is essentially docker run.

Since: 0.1.0.0

kill :: MonadDocker m => Container -> m ()

Kills a Docker container. kill is essentially docker kill.

Since: 0.1.0.0

stop :: MonadDocker m => Container -> m ()

Stops a Docker container. stop is essentially docker stop.

Since: 0.1.0.0

rm :: MonadDocker m => Container -> m ()

Remove a Docker container. rm is essentially docker rm -f

Since: 0.1.0.0

withLogs :: forall m a. MonadDocker m => Container -> (Handle -> Handle -> m a) -> m a

Access STDOUT and STDERR of a running Docker container. This is essentially docker logs under the hood.

Since: 0.1.0.0

build :: MonadDocker m => ToImage -> m ToImage

Build the Image referred to by the argument. If the construction of the image is expensive (e.g. a call to fromBuildContext) we don't want to repeatedly build the image. Instead, build can be used to execute the underlying Docker build once and re-use the resulting Image.

Since: 0.1.0.0

fromTag :: ImageTag -> ToImage

Get an Image from a tag.

Since: 0.1.0.0

fromBuildContext :: FilePath -> Maybe FilePath -> ToImage

Build the image from a build path and an optional path to the Dockerfile (default is Dockerfile)

Since: 0.1.0.0

waitUntilTimeout :: Int -> WaitUntilReady -> WaitUntilReady

waitUntilTimeout n waitUntilReady waits n seconds for the container to be ready. If the container is not ready by then a TimeoutException will be thrown.

Since: 0.1.0.0

waitUntilMappedPortReachable :: Int -> WaitUntilReady

Waits until the port of a container is ready to accept connections. This combinator should always be used with waitUntilTimeout.

Since: 0.1.0.0

waitWithLogs :: (Container -> Handle -> Handle -> IO ()) -> WaitUntilReady

A low-level primitive that allows scanning the logs for specific log lines that indicate readiness of a container.

The Handles passed to the function argument represent stdout and stderr of the container.

Since: 0.1.0.0

waitForLogLine :: Pipe -> (Text -> Bool) -> WaitUntilReady

Waits for a specific line to occur in the logs. Throws a UnexpectedEndOfPipe exception in case the desired line can not be found on the logs.

Say you want to find "Ready to accept connections" in the logs on Stdout try:

waitForLogLine Stdout ("Ready to accept connections" `isInfixOf`)

Since: 0.1.0.0

imageTag :: Image -> ImageTag

The image tag assigned by Docker. Uniquely identifies an Image within Docker.

Since: 0.1.0.0

containerImage :: Container -> Image

Returns the underlying image of the container.

Since: 0.1.0.0

containerReleaseKey :: Container -> ReleaseKey

Returns the internal release key used for safely shutting down the container. Use this with care. This function is considered an internal detail.

Since: 0.1.0.0

containerIp :: Container -> Text

Looks up the ip address of the container.

Since: 0.1.0.0

containerPort :: Container -> Int -> Int

Looks up an exposed port on the host.

Since: 0.1.0.0

inspect :: MonadDocker m => Container -> m InspectOutput

Runs the `docker inspect` command. Memoizes the result.

Since: 0.1.0.0

dockerHostOs :: MonadDocker m => m Text

isDockerOnLinux :: MonadDocker m => m Bool

redis :: ToImage

Image for Redis database.

redis = fromTag "redis:5.0"

Since: 0.1.0.0

mongo :: ToImage

Image for Mongo database.

mongo = Tag "mongo:4.0.17"

Since: 0.1.0.0