{-# 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.Signer.Types.SigningStatus
-- 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.Signer.Types.SigningStatus
  ( SigningStatus
      ( ..,
        SigningStatus_Failed,
        SigningStatus_InProgress,
        SigningStatus_Succeeded
      ),
  )
where

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

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

pattern SigningStatus_Failed :: SigningStatus
pattern $bSigningStatus_Failed :: SigningStatus
$mSigningStatus_Failed :: forall r. SigningStatus -> (Void# -> r) -> (Void# -> r) -> r
SigningStatus_Failed = SigningStatus' "Failed"

pattern SigningStatus_InProgress :: SigningStatus
pattern $bSigningStatus_InProgress :: SigningStatus
$mSigningStatus_InProgress :: forall r. SigningStatus -> (Void# -> r) -> (Void# -> r) -> r
SigningStatus_InProgress = SigningStatus' "InProgress"

pattern SigningStatus_Succeeded :: SigningStatus
pattern $bSigningStatus_Succeeded :: SigningStatus
$mSigningStatus_Succeeded :: forall r. SigningStatus -> (Void# -> r) -> (Void# -> r) -> r
SigningStatus_Succeeded = SigningStatus' "Succeeded"

{-# COMPLETE
  SigningStatus_Failed,
  SigningStatus_InProgress,
  SigningStatus_Succeeded,
  SigningStatus'
  #-}