Safe Haskell | None |
---|---|
Language | Haskell2010 |
Synopsis
- data MessageAttribute = MessageAttribute {}
- maValue :: Lens' MessageAttribute Text
- maType :: Lens' MessageAttribute Text
- data SNSMessage message = SNSMessage {
- _smMessage :: !(TextValue message)
- _smMessageAttributes :: !(HashMap Text MessageAttribute)
- _smMessageId :: !Text
- _smSignature :: !Text
- _smSignatureVersion :: !Text
- _smSigningCertUrl :: !Text
- _smSubject :: !Text
- _smTimestamp :: !UTCTime
- _smTopicArn :: !Text
- _smType :: !Text
- _smUnsubscribeUrl :: !Text
- smUnsubscribeUrl :: forall message. Lens' (SNSMessage message) Text
- smType :: forall message. Lens' (SNSMessage message) Text
- smTopicArn :: forall message. Lens' (SNSMessage message) Text
- smTimestamp :: forall message. Lens' (SNSMessage message) UTCTime
- smSubject :: forall message. Lens' (SNSMessage message) Text
- smSigningCertUrl :: forall message. Lens' (SNSMessage message) Text
- smSignatureVersion :: forall message. Lens' (SNSMessage message) Text
- smSignature :: forall message. Lens' (SNSMessage message) Text
- smMessageId :: forall message. Lens' (SNSMessage message) Text
- smMessageAttributes :: forall message. Lens' (SNSMessage message) (HashMap Text MessageAttribute)
- smMessage :: forall message message. Lens (SNSMessage message) (SNSMessage message) (TextValue message) (TextValue message)
- data SNSRecord message = SNSRecord {
- _srEventVersion :: !Text
- _srEventSubscriptionArn :: !Text
- _srEventSource :: !Text
- _srSns :: !(SNSMessage message)
- srSns :: forall message message. Lens (SNSRecord message) (SNSRecord message) (SNSMessage message) (SNSMessage message)
- srEventVersion :: forall message. Lens' (SNSRecord message) Text
- srEventSubscriptionArn :: forall message. Lens' (SNSRecord message) Text
- srEventSource :: forall message. Lens' (SNSRecord message) Text
- type SNSEvent message = RecordsEvent (SNSRecord message)
- messages :: Traversal (SNSEvent message) (SNSEvent message') message message'
- embedded :: Traversal (SNSEvent (Embedded v)) (SNSEvent (Embedded v')) v v'
- binary :: Traversal' (SNSEvent Base64) ByteString
Documentation
data MessageAttribute Source #
Instances
Eq MessageAttribute Source # | |
Defined in AWSLambda.Events.SNSEvent (==) :: MessageAttribute -> MessageAttribute -> Bool # (/=) :: MessageAttribute -> MessageAttribute -> Bool # | |
Show MessageAttribute Source # | |
Defined in AWSLambda.Events.SNSEvent showsPrec :: Int -> MessageAttribute -> ShowS # show :: MessageAttribute -> String # showList :: [MessageAttribute] -> ShowS # | |
FromJSON MessageAttribute Source # | |
Defined in AWSLambda.Events.SNSEvent parseJSON :: Value -> Parser MessageAttribute # parseJSONList :: Value -> Parser [MessageAttribute] # |
data SNSMessage message Source #
SNSMessage | |
|
Instances
smUnsubscribeUrl :: forall message. Lens' (SNSMessage message) Text Source #
smTopicArn :: forall message. Lens' (SNSMessage message) Text Source #
smTimestamp :: forall message. Lens' (SNSMessage message) UTCTime Source #
smSigningCertUrl :: forall message. Lens' (SNSMessage message) Text Source #
smSignatureVersion :: forall message. Lens' (SNSMessage message) Text Source #
smSignature :: forall message. Lens' (SNSMessage message) Text Source #
smMessageId :: forall message. Lens' (SNSMessage message) Text Source #
smMessageAttributes :: forall message. Lens' (SNSMessage message) (HashMap Text MessageAttribute) Source #
smMessage :: forall message message. Lens (SNSMessage message) (SNSMessage message) (TextValue message) (TextValue message) Source #
data SNSRecord message Source #
SNSRecord | |
|
Instances
Eq message => Eq (SNSRecord message) Source # | |
Show message => Show (SNSRecord message) Source # | |
Generic (SNSRecord message) Source # | |
FromText message => FromJSON (SNSRecord message) Source # | |
type Rep (SNSRecord message) Source # | |
Defined in AWSLambda.Events.SNSEvent type Rep (SNSRecord message) = D1 (MetaData "SNSRecord" "AWSLambda.Events.SNSEvent" "serverless-haskell-0.6.5-81PV0LnhvcL7IO4R7HQQuS" False) (C1 (MetaCons "SNSRecord" PrefixI True) ((S1 (MetaSel (Just "_srEventVersion") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 Text) :*: S1 (MetaSel (Just "_srEventSubscriptionArn") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 Text)) :*: (S1 (MetaSel (Just "_srEventSource") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 Text) :*: S1 (MetaSel (Just "_srSns") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 (SNSMessage message))))) |
srSns :: forall message message. Lens (SNSRecord message) (SNSRecord message) (SNSMessage message) (SNSMessage message) Source #
type SNSEvent message = RecordsEvent (SNSRecord message) Source #
SNSEvent.
The message
type is parameterised. To treat it as a text value
use SNSEvent Text
.
To extract an embedded event object use the Embedded
type.
E.g. SNSEvent (Embedded S3Event)
will treat the message
as an embedded S3Event.
To extract embedded Base64 encoded binary use
SNSEvent Base64
messages :: Traversal (SNSEvent message) (SNSEvent message') message message' Source #
A Traversal to get messages from an SNSEvent