Safe Haskell | None |
---|---|
Language | Haskell2010 |
- data MessageAttribute = MessageAttribute {}
- maValue :: Lens' MessageAttribute Text
- maType :: Lens' MessageAttribute Text
- data SNSMessage message = SNSMessage {
- _smMessage :: !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) message 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)
Documentation
data SNSMessage message Source #
SNSMessage | |
|
Eq message => Eq (SNSMessage message) Source # | |
Show message => Show (SNSMessage message) Source # | |
FromJSON message => FromJSON (SNSMessage message) Source # | |
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) message message Source #
data SNSRecord message Source #
SNSRecord | |
|
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.