úÎ!Û$ј¢      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~€‚ƒ„…†‡ˆ‰Š‹Œ‘’“”•–—˜™š›œŸ ¡^Function transformers that can be used to adapt the base runtime into other useful interfaces.(c) Nike, Inc., 2018BSD33nathan.fairhurst@nike.com, fernando.freire@nike.comstableNone/45678:@AMX_`fgPFhal!Upgrades a handler that uses the ¢ monad with an £% inside into a base runtime handler.%In the example below, we reconstruct ! without actually using it. The # expects a handler in the form of (event -> ReaderT LambdaContext IO result0 (ignoring constraints). By composing it with ? we get a new runtime which expects a function in the form of #LambdaContext -> event -> IO result which matches that of  myHandler. ÿ* {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Runtime (readerTRuntime) import AWS.Lambda.Combinators (withIOInterface) import Data.Aeson (FromJSON) import System.Environment (getEnv) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: Named -> IO String myHandler (Named { name }) = do greeting <- getEnv "GREETING" return $ greeting ++ name main :: IO () main = (readerTRuntime . withIOInterface) myHandler hal Upgrades a handler that accepts  + and an event to return a value inside an £$ inside into a base runtime handler.%In the example below, we reconstruct  " without actually using it. The # expects a handler in the form of (event -> ReaderT LambdaContext IO result/ (ignoring constraints). By composing it with ? we get a new runtime which expects a function in the form of .LambdaContext -> event -> Either String result which matches that of  myHandler. ÿ¿ {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Runtime (readerTRuntime) import AWS.Lambda.Combinators (withFallibleInterface) import Data.Aeson (FromJSON) import System.Environment (getEnv) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: LambdaContext -> Named -> Either String String myHandler (LambdaContext { functionName }) (Named { name }) = if name == "World" then Right "Hello, World from " ++ unpack functionName ++ "!" else Left "Can only greet the world." main :: IO () main = (readerTRuntime . withFallibleInterface) myHandler hal@This combinator takes a handler that accepts both an event and  R and converts it into a handler that is compatible with the base monadic runtime.%In the example below, we reconstruct  " without actually using it. The # expects a handler in the form of (event -> ReaderT LambdaContext IO result/ (ignoring constraints). By composing it with ? we get a new runtime which expects a function in the form of  LambdaContext -> event -> result which matches that of  myHandler. ÿ1 {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Runtime (readerTRuntime) import AWS.Lambda.Combinators (withPureInterface) import Data.Aeson (FromJSON) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: LambdaContext -> Named -> String myHandler (LambdaContext { functionName }) (Named { name }) = "Hello, " ++ name ++ " from " ++ unpack functionName ++ "!" main :: IO () main = (readerTRuntime . withPureInterface) myHandler hal An alias of ¤0, this upgrades a handler that does not accept  0 as its first curried argument to one that does.kThis allows us to use other combinators to construct a lambda runtime that accepts a handler that ignores  .%In the example below, we reconstruct  ! without actually using it. The # expects a handler in the form of (event -> ReaderT LambdaContext IO result/ (ignoring constraints). By composing it with ? we get a new runtime which expects a function in the form of  LambdaContext -> event -> result$, And then finally we also compose  so it accepts the signature event -> result which matches that of  myHandler. ÿö {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Runtime (readerTRuntime) import AWS.Lambda.Combinators (withPureInterface, withoutContext) import Data.Aeson (FromJSON) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: Named -> String myHandler (Named { name }) = "Hello, " ++ name main :: IO () main = (readerTRuntime . withPureInterface . withoutContext) myHandler /AWS Lambda Context classes and related methods.(c) Nike, Inc., 2018BSD33nathan.fairhurst@nike.com, fernando.freire@nike.comstableNone$/45678:@AMX_`fgT|$halKHelper for using arbitrary monads with only the LambdaContext in its Reader!   !"#$! !"  #$&Data types for working with S3 events.(c) Nike, Inc., 2019BSD33nathan.fairhurst@nike.com, fernando.freire@nike.comstableNone"/45678:@AMX_`dfgZÔ5hal7S3 object representations based on event type received.4Currently only Put/Delete events can trigger Lambdas<hal/Event data sent by S3 when triggering a Lambda.*567;:89<=E>?@ABCDFGHIJKLMNORPQSTUWVXYZ[\]^*YZ[\]^GHIJKLMTUWVXNORPQS<=E>?@ABCDF567;:89Internal hal helper methods.(c) Nike, Inc., 2018BSD33nathan.fairhurst@nike.com, fernando.freire@nike.comunstableNone/45678:@AMX_`fg^¬}~‚€ƒ„…†‡ˆ‰Š‹Œ…†‡ˆ‰Š‹}~‚€ƒ„ŒNHTTP related machinery for talking to the AWS Lambda Custom Runtime interface.(c) Nike, Inc., 2018BSD33nathan.fairhurst@nike.com, fernando.freire@nike.comstableNone/45678:@AMX_`fgc>¥hal-Lambda runtime error that we pass back to AWS’“”•–’“”•–\Runtime methods useful when constructing Haskell handlers for the AWS Lambda Custom Runtime.(c) Nike, Inc., 2018BSD33nathan.fairhurst@nike.com, fernando.freire@nike.comstableNone/45678:>@AMX_`fgĞešhalFor any monad that supports IOcatchReader LambdaContext.Use this if you need caching behavours or are comfortable manipulating monad transformers and want full control over your monadic interface. ÿŒ {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Context (LambdaContext(..)) import AWS.Lambda.Runtime (mRuntimeWithContext) import Control.Monad.Reader (ReaderT, ask) import Control.Monad.State.Lazy (StateT, runStateT, get, put) import Data.Aeson (FromJSON) import Data.Text (unpack) import System.Environment (getEnv) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: Named -> StateT Int (ReaderT LambdaContext IO String) myHandler Named { name } = do LambdaContext { functionName } <- ask greeting <- getEnv "GREETING" greetingCount <- get put $ greetingCount + 1 return $ greeting ++ name ++ " (" ++ show greetingCount ++ ") from " ++ unpack functionName ++ "!" main :: IO () main = runStateT (mRuntimeWithContext myHandler) 0 ›halPFor functions that can read the lambda context and use IO within the same monad.ÿUse this for handlers that need any form of side-effect such as reading environment variables or making network requests, and prefer to access the AWS Lambda Context in the same monad. However, do not use this runtime if you need stateful (caching) behaviors. ÿË {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Context (LambdaContext(..)) import AWS.Lambda.Runtime (readerTRuntime) import Control.Monad.Reader (ReaderT, ask) import Data.Aeson (FromJSON) import Data.Text (unpack) import System.Environment (getEnv) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: Named -> ReaderT LambdaContext IO String myHandler Named { name } = do LambdaContext { functionName } <- ask greeting <- getEnv "GREETING" return $ greeting ++ name ++ " from " ++ unpack functionName ++ "!" main :: IO () main = readerTRuntime myHandler œhalAFor functions with IO that can fail in a pure way (or via throw).öUse this for handlers that need any form of side-effect such as reading environment variables or making network requests, and also need the AWS Lambda Context as input. However, do not use this runtime if you need stateful (caching) behaviors. ÿš {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Context (LambdaContext(..)) import AWS.Lambda.Runtime (ioRuntimeWithContext) import Data.Aeson (FromJSON) import Data.Text (unpack) import System.Environment (getEnv) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: LambdaContext -> Named -> IO String myHandler (LambdaContext { functionName }) (Named { name }) = do greeting <- getEnv "GREETING" return $ greeting ++ name ++ " from " ++ unpack functionName ++ "!" main :: IO () main = ioRuntimeWithContext myHandler halAFor functions with IO that can fail in a pure way (or via throw).ÆUse this for handlers that need any form of side-effect such as reading environment variables or making network requests. However, do not use this runtime if you need stateful (caching) behaviors. ÿØ {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Runtime (ioRuntime) import Data.Aeson (FromJSON) import System.Environment (getEnv) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: Named -> IO String myHandler (Named { name }) = do greeting <- getEnv "GREETING" return $ greeting ++ name main :: IO () main = ioRuntime myHandler hal'For pure functions that can still fail.Use this for simple handlers that just translate input to output without side-effects, but can fail and need the AWS Lambda Context as input. ÿ¬ {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Context (LambdaContext(..)) import AWS.Lambda.Runtime (fallibleRuntimeWithContext) import Data.Aeson (FromJSON) import Data.Text (unpack) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: LambdaContext -> Named -> Either String String myHandler (LambdaContext { functionName }) (Named { name }) = if name == "World" then Right "Hello, World from " ++ unpack functionName ++ "!" else Left "Can only greet the world." main :: IO () main = fallibleRuntimeWithContext myHandler Ÿhal'For pure functions that can still fail.eUse this for simple handlers that just translate input to output without side-effects, but can fail. ÿñ {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Runtime (fallibleRuntime) import Data.Aeson (FromJSON) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: Named -> Either String String myHandler (Named { name }) = if name == "World" then Right "Hello, World!" else Left "Can only greet the world." main :: IO () main = fallibleRuntime myHandler  halLFor pure functions that can never fail that also need access to the context.†Use this for simple handlers that just translate input to output without side-effects, but that need the AWS Lambda Context as input. ÿE {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Context (LambdaContext(..)) import AWS.Lambda.Runtime (pureRuntimeWithContext) import Data.Aeson (FromJSON) import Data.Text (unpack) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: LambdaContext -> Named -> String myHandler (LambdaContext { functionName }) (Named { name }) = "Hello, " ++ name ++ " from " ++ unpack functionName ++ "!" main :: IO () main = pureRuntimeWithContext myHandler ¡hal'For pure functions that can never fail.VUse this for simple handlers that just translate input to output without side-effects. ÿ‚ {-# LANGUAGE NamedFieldPuns, DeriveGeneric #-} module Main where import AWS.Lambda.Runtime (pureRuntime) import Data.Aeson (FromJSON) data Named = { name :: String } deriving Generic instance FromJSON Named myHandler :: Named -> String myHandler Named { name } = "Hello, " ++ name ++ "!" main :: IO () main = pureRuntime myHandler š›œŸ ¡¡ Ÿœ›š None/45678:@AMX_`fgÑs¦§¨©ª«¬­®   !""#$%%&'())*+,-./0123456789:;<=>?@ABCDEFGGHIJKLMNOPQQRSSTUVVWXYZ[[\]^__`aabcdefghijklmnopqrstuvwxyz{|}~€ !‚‚ƒ„…†‡ˆ‰Š‹Œ‘’ “  ”•–—˜™—š›œ Ÿ   ¡ ¢ £ ¤¥ hal-0.3.0-3leDggqs3R65uj8RCQnSEFAWS.Lambda.ContextAWS.Lambda.CombinatorsAWS.Lambda.Events.S3AWS.Lambda.InternalAWS.Lambda.RuntimeClientAWS.Lambda.RuntimeioRuntimeWithContextreaderTRuntime LambdaContextfallibleRuntimeWithContextpureRuntimeWithContext pureRuntime Paths_hal#envy-1.5.1.0-GMMVq6zDLtyHxAxq0LHiJy System.Envy defConfigwithIOInterfacewithFallibleInterfacewithPureInterfacewithoutContextHasLambdaContext withContext functionNamefunctionVersionfunctionMemorySize logGroupName logStreamName awsRequestIdinvokedFunctionArn xRayTraceIddeadline clientContextidentityCognitoIdentity identityIdidentityPoolId ClientContextclientcustom environmentClientApplicationappTitleappVersionNameappVersionCodeappPackageNamegetRemainingTimerunReaderTLambdaContext$fFromJSONClientApplication$fToJSONClientApplication$fFromJSONClientContext$fToJSONClientContext$fFromJSONCognitoIdentity$fToJSONCognitoIdentity$fDefConfigLambdaContext$fHasLambdaContextLambdaContext$fShowClientApplication$fGenericClientApplication$fShowClientContext$fGenericClientContext$fShowCognitoIdentity$fGenericCognitoIdentity$fShowLambdaContext$fGenericLambdaContextS3Object PutObject DeleteObject$sel:eTag:PutObject$sel:sequencer:PutObject$sel:key:PutObject$sel:size:PutObjectS3Event$sel:awsRegion:S3Event$sel:eventName:S3Event$sel:eventSource:S3Event$sel:eventTime:S3Event$sel:eventVersion:S3Event$sel:requestParameters:S3Event$sel:responseElements:S3Event$sel:s3:S3Event$sel:userIdentity:S3EventRequestParameters&$sel:sourceIPAddress:RequestParametersResponseElements$sel:amazonId:ResponseElements%$sel:amazonRequestId:ResponseElementsS3Config$sel:bucket:S3Config$sel:configurationId:S3Config$sel:object:S3Config$sel:s3SchemaVersion:S3ConfigS3Bucket$sel:arn:S3Bucket$sel:name:S3Bucket$sel:ownerIdentity:S3BucketPrincipalIdentity"$sel:principalId:PrincipalIdentityRecords$sel:records:Records$fFromJSONPrincipalIdentity$fFromJSONS3Bucket$fFromJSONResponseElements$fFromJSONRequestParameters$fFromJSONS3Object$fFromJSONS3Config$fFromJSONS3Event$fFromJSONRecords$fShowPrincipalIdentity$fEqPrincipalIdentity$fGenericPrincipalIdentity$fShowS3Bucket $fEqS3Bucket$fGenericS3Bucket$fShowResponseElements$fEqResponseElements$fShowRequestParameters$fEqRequestParameters$fGenericRequestParameters$fShowS3Object $fEqS3Object$fGenericS3Object$fShowS3Config $fEqS3Config$fGenericS3Config $fShowS3Event $fEqS3Event$fGenericS3Event $fShowRecords $fEqRecordsDynamicContext StaticContext mkContext$fFromEnvStaticContext$fDefConfigStaticContext$fShowStaticContext$fGenericStaticContext$fShowDynamicContextgetBaseRuntimeRequest getNextEventsendEventSuccesssendEventError sendInitError$fToJSONLambdaError$fShowLambdaError$fGenericLambdaErrormRuntimeWithContext ioRuntimefallibleRuntimeghc-prim GHC.TypesIObase Data.EitherEitherGHC.Baseconst LambdaErrorversion getBinDir getLibDir getDynLibDir getDataDir getLibexecDir getSysconfDirgetDataFileName