module Aws.Lambda.Runtime.API.Endpoints
( response
, invocationError
, runtimeInitError
, nextInvocation
, Endpoint(..)
) where
import qualified Aws.Lambda.Runtime.API.Version as Version
newtype Endpoint =
Endpoint String
deriving (Show)
nextInvocation :: String -> Endpoint
nextInvocation lambdaApi =
Endpoint $ concat
[ "http://"
, lambdaApi
, "/"
, Version.value
, "/runtime/invocation/next"
]
response :: String -> String -> Endpoint
response lambdaApi requestId =
Endpoint $ concat
[ "http://"
, lambdaApi
, "/"
, Version.value
, "/runtime/invocation/"
, requestId
, "/response"
]
invocationError :: String -> String -> Endpoint
invocationError lambdaApi requestId =
Endpoint $ concat
[ "http://"
, lambdaApi
, "/"
, Version.value
, "/runtime/invocation/"
, requestId
, "/error"
]
runtimeInitError :: String -> Endpoint
runtimeInitError lambdaApi =
Endpoint $ concat
[ "http://"
, lambdaApi
, "/"
, Version.value
, "/runtime/init/error"
]