{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.SES.Types.EventType
-- Copyright   : (c) 2013-2021 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.SES.Types.EventType
  ( EventType
      ( ..,
        EventType_Bounce,
        EventType_Click,
        EventType_Complaint,
        EventType_Delivery,
        EventType_Open,
        EventType_Reject,
        EventType_RenderingFailure,
        EventType_Send
      ),
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Prelude as Prelude

newtype EventType = EventType'
  { EventType -> Text
fromEventType ::
      Core.Text
  }
  deriving stock
    ( Int -> EventType -> ShowS
[EventType] -> ShowS
EventType -> String
(Int -> EventType -> ShowS)
-> (EventType -> String)
-> ([EventType] -> ShowS)
-> Show EventType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [EventType] -> ShowS
$cshowList :: [EventType] -> ShowS
show :: EventType -> String
$cshow :: EventType -> String
showsPrec :: Int -> EventType -> ShowS
$cshowsPrec :: Int -> EventType -> ShowS
Prelude.Show,
      ReadPrec [EventType]
ReadPrec EventType
Int -> ReadS EventType
ReadS [EventType]
(Int -> ReadS EventType)
-> ReadS [EventType]
-> ReadPrec EventType
-> ReadPrec [EventType]
-> Read EventType
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [EventType]
$creadListPrec :: ReadPrec [EventType]
readPrec :: ReadPrec EventType
$creadPrec :: ReadPrec EventType
readList :: ReadS [EventType]
$creadList :: ReadS [EventType]
readsPrec :: Int -> ReadS EventType
$creadsPrec :: Int -> ReadS EventType
Prelude.Read,
      EventType -> EventType -> Bool
(EventType -> EventType -> Bool)
-> (EventType -> EventType -> Bool) -> Eq EventType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: EventType -> EventType -> Bool
$c/= :: EventType -> EventType -> Bool
== :: EventType -> EventType -> Bool
$c== :: EventType -> EventType -> Bool
Prelude.Eq,
      Eq EventType
Eq EventType
-> (EventType -> EventType -> Ordering)
-> (EventType -> EventType -> Bool)
-> (EventType -> EventType -> Bool)
-> (EventType -> EventType -> Bool)
-> (EventType -> EventType -> Bool)
-> (EventType -> EventType -> EventType)
-> (EventType -> EventType -> EventType)
-> Ord EventType
EventType -> EventType -> Bool
EventType -> EventType -> Ordering
EventType -> EventType -> EventType
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: EventType -> EventType -> EventType
$cmin :: EventType -> EventType -> EventType
max :: EventType -> EventType -> EventType
$cmax :: EventType -> EventType -> EventType
>= :: EventType -> EventType -> Bool
$c>= :: EventType -> EventType -> Bool
> :: EventType -> EventType -> Bool
$c> :: EventType -> EventType -> Bool
<= :: EventType -> EventType -> Bool
$c<= :: EventType -> EventType -> Bool
< :: EventType -> EventType -> Bool
$c< :: EventType -> EventType -> Bool
compare :: EventType -> EventType -> Ordering
$ccompare :: EventType -> EventType -> Ordering
$cp1Ord :: Eq EventType
Prelude.Ord,
      (forall x. EventType -> Rep EventType x)
-> (forall x. Rep EventType x -> EventType) -> Generic EventType
forall x. Rep EventType x -> EventType
forall x. EventType -> Rep EventType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep EventType x -> EventType
$cfrom :: forall x. EventType -> Rep EventType x
Prelude.Generic
    )
  deriving newtype
    ( Int -> EventType -> Int
EventType -> Int
(Int -> EventType -> Int)
-> (EventType -> Int) -> Hashable EventType
forall a. (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: EventType -> Int
$chash :: EventType -> Int
hashWithSalt :: Int -> EventType -> Int
$chashWithSalt :: Int -> EventType -> Int
Prelude.Hashable,
      EventType -> ()
(EventType -> ()) -> NFData EventType
forall a. (a -> ()) -> NFData a
rnf :: EventType -> ()
$crnf :: EventType -> ()
Prelude.NFData,
      Text -> Either String EventType
(Text -> Either String EventType) -> FromText EventType
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String EventType
$cfromText :: Text -> Either String EventType
Core.FromText,
      EventType -> Text
(EventType -> Text) -> ToText EventType
forall a. (a -> Text) -> ToText a
toText :: EventType -> Text
$ctoText :: EventType -> Text
Core.ToText,
      EventType -> ByteString
(EventType -> ByteString) -> ToByteString EventType
forall a. (a -> ByteString) -> ToByteString a
toBS :: EventType -> ByteString
$ctoBS :: EventType -> ByteString
Core.ToByteString,
      EventType -> ByteStringBuilder
(EventType -> ByteStringBuilder) -> ToLog EventType
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: EventType -> ByteStringBuilder
$cbuild :: EventType -> ByteStringBuilder
Core.ToLog,
      HeaderName -> EventType -> [Header]
(HeaderName -> EventType -> [Header]) -> ToHeader EventType
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> EventType -> [Header]
$ctoHeader :: HeaderName -> EventType -> [Header]
Core.ToHeader,
      EventType -> QueryString
(EventType -> QueryString) -> ToQuery EventType
forall a. (a -> QueryString) -> ToQuery a
toQuery :: EventType -> QueryString
$ctoQuery :: EventType -> QueryString
Core.ToQuery,
      Value -> Parser [EventType]
Value -> Parser EventType
(Value -> Parser EventType)
-> (Value -> Parser [EventType]) -> FromJSON EventType
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [EventType]
$cparseJSONList :: Value -> Parser [EventType]
parseJSON :: Value -> Parser EventType
$cparseJSON :: Value -> Parser EventType
Core.FromJSON,
      FromJSONKeyFunction [EventType]
FromJSONKeyFunction EventType
FromJSONKeyFunction EventType
-> FromJSONKeyFunction [EventType] -> FromJSONKey EventType
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [EventType]
$cfromJSONKeyList :: FromJSONKeyFunction [EventType]
fromJSONKey :: FromJSONKeyFunction EventType
$cfromJSONKey :: FromJSONKeyFunction EventType
Core.FromJSONKey,
      [EventType] -> Encoding
[EventType] -> Value
EventType -> Encoding
EventType -> Value
(EventType -> Value)
-> (EventType -> Encoding)
-> ([EventType] -> Value)
-> ([EventType] -> Encoding)
-> ToJSON EventType
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [EventType] -> Encoding
$ctoEncodingList :: [EventType] -> Encoding
toJSONList :: [EventType] -> Value
$ctoJSONList :: [EventType] -> Value
toEncoding :: EventType -> Encoding
$ctoEncoding :: EventType -> Encoding
toJSON :: EventType -> Value
$ctoJSON :: EventType -> Value
Core.ToJSON,
      ToJSONKeyFunction [EventType]
ToJSONKeyFunction EventType
ToJSONKeyFunction EventType
-> ToJSONKeyFunction [EventType] -> ToJSONKey EventType
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [EventType]
$ctoJSONKeyList :: ToJSONKeyFunction [EventType]
toJSONKey :: ToJSONKeyFunction EventType
$ctoJSONKey :: ToJSONKeyFunction EventType
Core.ToJSONKey,
      [Node] -> Either String EventType
([Node] -> Either String EventType) -> FromXML EventType
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String EventType
$cparseXML :: [Node] -> Either String EventType
Core.FromXML,
      EventType -> XML
(EventType -> XML) -> ToXML EventType
forall a. (a -> XML) -> ToXML a
toXML :: EventType -> XML
$ctoXML :: EventType -> XML
Core.ToXML
    )

pattern EventType_Bounce :: EventType
pattern $bEventType_Bounce :: EventType
$mEventType_Bounce :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_Bounce = EventType' "bounce"

pattern EventType_Click :: EventType
pattern $bEventType_Click :: EventType
$mEventType_Click :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_Click = EventType' "click"

pattern EventType_Complaint :: EventType
pattern $bEventType_Complaint :: EventType
$mEventType_Complaint :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_Complaint = EventType' "complaint"

pattern EventType_Delivery :: EventType
pattern $bEventType_Delivery :: EventType
$mEventType_Delivery :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_Delivery = EventType' "delivery"

pattern EventType_Open :: EventType
pattern $bEventType_Open :: EventType
$mEventType_Open :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_Open = EventType' "open"

pattern EventType_Reject :: EventType
pattern $bEventType_Reject :: EventType
$mEventType_Reject :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_Reject = EventType' "reject"

pattern EventType_RenderingFailure :: EventType
pattern $bEventType_RenderingFailure :: EventType
$mEventType_RenderingFailure :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_RenderingFailure = EventType' "renderingFailure"

pattern EventType_Send :: EventType
pattern $bEventType_Send :: EventType
$mEventType_Send :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_Send = EventType' "send"

{-# COMPLETE
  EventType_Bounce,
  EventType_Click,
  EventType_Complaint,
  EventType_Delivery,
  EventType_Open,
  EventType_Reject,
  EventType_RenderingFailure,
  EventType_Send,
  EventType'
  #-}