{-# 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.EMR.Types.ClusterStateChangeReasonCode
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.EMR.Types.ClusterStateChangeReasonCode
  ( ClusterStateChangeReasonCode
      ( ..,
        ClusterStateChangeReasonCode_ALL_STEPS_COMPLETED,
        ClusterStateChangeReasonCode_BOOTSTRAP_FAILURE,
        ClusterStateChangeReasonCode_INSTANCE_FAILURE,
        ClusterStateChangeReasonCode_INSTANCE_FLEET_TIMEOUT,
        ClusterStateChangeReasonCode_INTERNAL_ERROR,
        ClusterStateChangeReasonCode_STEP_FAILURE,
        ClusterStateChangeReasonCode_USER_REQUEST,
        ClusterStateChangeReasonCode_VALIDATION_ERROR
      ),
  )
where

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

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

pattern ClusterStateChangeReasonCode_ALL_STEPS_COMPLETED :: ClusterStateChangeReasonCode
pattern $bClusterStateChangeReasonCode_ALL_STEPS_COMPLETED :: ClusterStateChangeReasonCode
$mClusterStateChangeReasonCode_ALL_STEPS_COMPLETED :: forall {r}.
ClusterStateChangeReasonCode -> ((# #) -> r) -> ((# #) -> r) -> r
ClusterStateChangeReasonCode_ALL_STEPS_COMPLETED = ClusterStateChangeReasonCode' "ALL_STEPS_COMPLETED"

pattern ClusterStateChangeReasonCode_BOOTSTRAP_FAILURE :: ClusterStateChangeReasonCode
pattern $bClusterStateChangeReasonCode_BOOTSTRAP_FAILURE :: ClusterStateChangeReasonCode
$mClusterStateChangeReasonCode_BOOTSTRAP_FAILURE :: forall {r}.
ClusterStateChangeReasonCode -> ((# #) -> r) -> ((# #) -> r) -> r
ClusterStateChangeReasonCode_BOOTSTRAP_FAILURE = ClusterStateChangeReasonCode' "BOOTSTRAP_FAILURE"

pattern ClusterStateChangeReasonCode_INSTANCE_FAILURE :: ClusterStateChangeReasonCode
pattern $bClusterStateChangeReasonCode_INSTANCE_FAILURE :: ClusterStateChangeReasonCode
$mClusterStateChangeReasonCode_INSTANCE_FAILURE :: forall {r}.
ClusterStateChangeReasonCode -> ((# #) -> r) -> ((# #) -> r) -> r
ClusterStateChangeReasonCode_INSTANCE_FAILURE = ClusterStateChangeReasonCode' "INSTANCE_FAILURE"

pattern ClusterStateChangeReasonCode_INSTANCE_FLEET_TIMEOUT :: ClusterStateChangeReasonCode
pattern $bClusterStateChangeReasonCode_INSTANCE_FLEET_TIMEOUT :: ClusterStateChangeReasonCode
$mClusterStateChangeReasonCode_INSTANCE_FLEET_TIMEOUT :: forall {r}.
ClusterStateChangeReasonCode -> ((# #) -> r) -> ((# #) -> r) -> r
ClusterStateChangeReasonCode_INSTANCE_FLEET_TIMEOUT = ClusterStateChangeReasonCode' "INSTANCE_FLEET_TIMEOUT"

pattern ClusterStateChangeReasonCode_INTERNAL_ERROR :: ClusterStateChangeReasonCode
pattern $bClusterStateChangeReasonCode_INTERNAL_ERROR :: ClusterStateChangeReasonCode
$mClusterStateChangeReasonCode_INTERNAL_ERROR :: forall {r}.
ClusterStateChangeReasonCode -> ((# #) -> r) -> ((# #) -> r) -> r
ClusterStateChangeReasonCode_INTERNAL_ERROR = ClusterStateChangeReasonCode' "INTERNAL_ERROR"

pattern ClusterStateChangeReasonCode_STEP_FAILURE :: ClusterStateChangeReasonCode
pattern $bClusterStateChangeReasonCode_STEP_FAILURE :: ClusterStateChangeReasonCode
$mClusterStateChangeReasonCode_STEP_FAILURE :: forall {r}.
ClusterStateChangeReasonCode -> ((# #) -> r) -> ((# #) -> r) -> r
ClusterStateChangeReasonCode_STEP_FAILURE = ClusterStateChangeReasonCode' "STEP_FAILURE"

pattern ClusterStateChangeReasonCode_USER_REQUEST :: ClusterStateChangeReasonCode
pattern $bClusterStateChangeReasonCode_USER_REQUEST :: ClusterStateChangeReasonCode
$mClusterStateChangeReasonCode_USER_REQUEST :: forall {r}.
ClusterStateChangeReasonCode -> ((# #) -> r) -> ((# #) -> r) -> r
ClusterStateChangeReasonCode_USER_REQUEST = ClusterStateChangeReasonCode' "USER_REQUEST"

pattern ClusterStateChangeReasonCode_VALIDATION_ERROR :: ClusterStateChangeReasonCode
pattern $bClusterStateChangeReasonCode_VALIDATION_ERROR :: ClusterStateChangeReasonCode
$mClusterStateChangeReasonCode_VALIDATION_ERROR :: forall {r}.
ClusterStateChangeReasonCode -> ((# #) -> r) -> ((# #) -> r) -> r
ClusterStateChangeReasonCode_VALIDATION_ERROR = ClusterStateChangeReasonCode' "VALIDATION_ERROR"

{-# COMPLETE
  ClusterStateChangeReasonCode_ALL_STEPS_COMPLETED,
  ClusterStateChangeReasonCode_BOOTSTRAP_FAILURE,
  ClusterStateChangeReasonCode_INSTANCE_FAILURE,
  ClusterStateChangeReasonCode_INSTANCE_FLEET_TIMEOUT,
  ClusterStateChangeReasonCode_INTERNAL_ERROR,
  ClusterStateChangeReasonCode_STEP_FAILURE,
  ClusterStateChangeReasonCode_USER_REQUEST,
  ClusterStateChangeReasonCode_VALIDATION_ERROR,
  ClusterStateChangeReasonCode'
  #-}