{-# 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.IAM.Types.PolicyUsageType
-- 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.IAM.Types.PolicyUsageType
  ( PolicyUsageType
      ( ..,
        PolicyUsageType_PermissionsBoundary,
        PolicyUsageType_PermissionsPolicy
      ),
  )
where

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

-- | The policy usage type that indicates whether the policy is used as a
-- permissions policy or as the permissions boundary for an entity.
--
-- For more information about permissions boundaries, see
-- <https://docs.aws.amazon.com/IAM/latest/UserGuide/access_policies_boundaries.html Permissions boundaries for IAM identities>
-- in the /IAM User Guide/.
newtype PolicyUsageType = PolicyUsageType'
  { PolicyUsageType -> Text
fromPolicyUsageType ::
      Core.Text
  }
  deriving stock
    ( Int -> PolicyUsageType -> ShowS
[PolicyUsageType] -> ShowS
PolicyUsageType -> String
(Int -> PolicyUsageType -> ShowS)
-> (PolicyUsageType -> String)
-> ([PolicyUsageType] -> ShowS)
-> Show PolicyUsageType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PolicyUsageType] -> ShowS
$cshowList :: [PolicyUsageType] -> ShowS
show :: PolicyUsageType -> String
$cshow :: PolicyUsageType -> String
showsPrec :: Int -> PolicyUsageType -> ShowS
$cshowsPrec :: Int -> PolicyUsageType -> ShowS
Prelude.Show,
      ReadPrec [PolicyUsageType]
ReadPrec PolicyUsageType
Int -> ReadS PolicyUsageType
ReadS [PolicyUsageType]
(Int -> ReadS PolicyUsageType)
-> ReadS [PolicyUsageType]
-> ReadPrec PolicyUsageType
-> ReadPrec [PolicyUsageType]
-> Read PolicyUsageType
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [PolicyUsageType]
$creadListPrec :: ReadPrec [PolicyUsageType]
readPrec :: ReadPrec PolicyUsageType
$creadPrec :: ReadPrec PolicyUsageType
readList :: ReadS [PolicyUsageType]
$creadList :: ReadS [PolicyUsageType]
readsPrec :: Int -> ReadS PolicyUsageType
$creadsPrec :: Int -> ReadS PolicyUsageType
Prelude.Read,
      PolicyUsageType -> PolicyUsageType -> Bool
(PolicyUsageType -> PolicyUsageType -> Bool)
-> (PolicyUsageType -> PolicyUsageType -> Bool)
-> Eq PolicyUsageType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PolicyUsageType -> PolicyUsageType -> Bool
$c/= :: PolicyUsageType -> PolicyUsageType -> Bool
== :: PolicyUsageType -> PolicyUsageType -> Bool
$c== :: PolicyUsageType -> PolicyUsageType -> Bool
Prelude.Eq,
      Eq PolicyUsageType
Eq PolicyUsageType
-> (PolicyUsageType -> PolicyUsageType -> Ordering)
-> (PolicyUsageType -> PolicyUsageType -> Bool)
-> (PolicyUsageType -> PolicyUsageType -> Bool)
-> (PolicyUsageType -> PolicyUsageType -> Bool)
-> (PolicyUsageType -> PolicyUsageType -> Bool)
-> (PolicyUsageType -> PolicyUsageType -> PolicyUsageType)
-> (PolicyUsageType -> PolicyUsageType -> PolicyUsageType)
-> Ord PolicyUsageType
PolicyUsageType -> PolicyUsageType -> Bool
PolicyUsageType -> PolicyUsageType -> Ordering
PolicyUsageType -> PolicyUsageType -> PolicyUsageType
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 :: PolicyUsageType -> PolicyUsageType -> PolicyUsageType
$cmin :: PolicyUsageType -> PolicyUsageType -> PolicyUsageType
max :: PolicyUsageType -> PolicyUsageType -> PolicyUsageType
$cmax :: PolicyUsageType -> PolicyUsageType -> PolicyUsageType
>= :: PolicyUsageType -> PolicyUsageType -> Bool
$c>= :: PolicyUsageType -> PolicyUsageType -> Bool
> :: PolicyUsageType -> PolicyUsageType -> Bool
$c> :: PolicyUsageType -> PolicyUsageType -> Bool
<= :: PolicyUsageType -> PolicyUsageType -> Bool
$c<= :: PolicyUsageType -> PolicyUsageType -> Bool
< :: PolicyUsageType -> PolicyUsageType -> Bool
$c< :: PolicyUsageType -> PolicyUsageType -> Bool
compare :: PolicyUsageType -> PolicyUsageType -> Ordering
$ccompare :: PolicyUsageType -> PolicyUsageType -> Ordering
$cp1Ord :: Eq PolicyUsageType
Prelude.Ord,
      (forall x. PolicyUsageType -> Rep PolicyUsageType x)
-> (forall x. Rep PolicyUsageType x -> PolicyUsageType)
-> Generic PolicyUsageType
forall x. Rep PolicyUsageType x -> PolicyUsageType
forall x. PolicyUsageType -> Rep PolicyUsageType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PolicyUsageType x -> PolicyUsageType
$cfrom :: forall x. PolicyUsageType -> Rep PolicyUsageType x
Prelude.Generic
    )
  deriving newtype
    ( Int -> PolicyUsageType -> Int
PolicyUsageType -> Int
(Int -> PolicyUsageType -> Int)
-> (PolicyUsageType -> Int) -> Hashable PolicyUsageType
forall a. (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: PolicyUsageType -> Int
$chash :: PolicyUsageType -> Int
hashWithSalt :: Int -> PolicyUsageType -> Int
$chashWithSalt :: Int -> PolicyUsageType -> Int
Prelude.Hashable,
      PolicyUsageType -> ()
(PolicyUsageType -> ()) -> NFData PolicyUsageType
forall a. (a -> ()) -> NFData a
rnf :: PolicyUsageType -> ()
$crnf :: PolicyUsageType -> ()
Prelude.NFData,
      Text -> Either String PolicyUsageType
(Text -> Either String PolicyUsageType) -> FromText PolicyUsageType
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String PolicyUsageType
$cfromText :: Text -> Either String PolicyUsageType
Core.FromText,
      PolicyUsageType -> Text
(PolicyUsageType -> Text) -> ToText PolicyUsageType
forall a. (a -> Text) -> ToText a
toText :: PolicyUsageType -> Text
$ctoText :: PolicyUsageType -> Text
Core.ToText,
      PolicyUsageType -> ByteString
(PolicyUsageType -> ByteString) -> ToByteString PolicyUsageType
forall a. (a -> ByteString) -> ToByteString a
toBS :: PolicyUsageType -> ByteString
$ctoBS :: PolicyUsageType -> ByteString
Core.ToByteString,
      PolicyUsageType -> ByteStringBuilder
(PolicyUsageType -> ByteStringBuilder) -> ToLog PolicyUsageType
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: PolicyUsageType -> ByteStringBuilder
$cbuild :: PolicyUsageType -> ByteStringBuilder
Core.ToLog,
      HeaderName -> PolicyUsageType -> [Header]
(HeaderName -> PolicyUsageType -> [Header])
-> ToHeader PolicyUsageType
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> PolicyUsageType -> [Header]
$ctoHeader :: HeaderName -> PolicyUsageType -> [Header]
Core.ToHeader,
      PolicyUsageType -> QueryString
(PolicyUsageType -> QueryString) -> ToQuery PolicyUsageType
forall a. (a -> QueryString) -> ToQuery a
toQuery :: PolicyUsageType -> QueryString
$ctoQuery :: PolicyUsageType -> QueryString
Core.ToQuery,
      Value -> Parser [PolicyUsageType]
Value -> Parser PolicyUsageType
(Value -> Parser PolicyUsageType)
-> (Value -> Parser [PolicyUsageType]) -> FromJSON PolicyUsageType
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [PolicyUsageType]
$cparseJSONList :: Value -> Parser [PolicyUsageType]
parseJSON :: Value -> Parser PolicyUsageType
$cparseJSON :: Value -> Parser PolicyUsageType
Core.FromJSON,
      FromJSONKeyFunction [PolicyUsageType]
FromJSONKeyFunction PolicyUsageType
FromJSONKeyFunction PolicyUsageType
-> FromJSONKeyFunction [PolicyUsageType]
-> FromJSONKey PolicyUsageType
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [PolicyUsageType]
$cfromJSONKeyList :: FromJSONKeyFunction [PolicyUsageType]
fromJSONKey :: FromJSONKeyFunction PolicyUsageType
$cfromJSONKey :: FromJSONKeyFunction PolicyUsageType
Core.FromJSONKey,
      [PolicyUsageType] -> Encoding
[PolicyUsageType] -> Value
PolicyUsageType -> Encoding
PolicyUsageType -> Value
(PolicyUsageType -> Value)
-> (PolicyUsageType -> Encoding)
-> ([PolicyUsageType] -> Value)
-> ([PolicyUsageType] -> Encoding)
-> ToJSON PolicyUsageType
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [PolicyUsageType] -> Encoding
$ctoEncodingList :: [PolicyUsageType] -> Encoding
toJSONList :: [PolicyUsageType] -> Value
$ctoJSONList :: [PolicyUsageType] -> Value
toEncoding :: PolicyUsageType -> Encoding
$ctoEncoding :: PolicyUsageType -> Encoding
toJSON :: PolicyUsageType -> Value
$ctoJSON :: PolicyUsageType -> Value
Core.ToJSON,
      ToJSONKeyFunction [PolicyUsageType]
ToJSONKeyFunction PolicyUsageType
ToJSONKeyFunction PolicyUsageType
-> ToJSONKeyFunction [PolicyUsageType] -> ToJSONKey PolicyUsageType
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [PolicyUsageType]
$ctoJSONKeyList :: ToJSONKeyFunction [PolicyUsageType]
toJSONKey :: ToJSONKeyFunction PolicyUsageType
$ctoJSONKey :: ToJSONKeyFunction PolicyUsageType
Core.ToJSONKey,
      [Node] -> Either String PolicyUsageType
([Node] -> Either String PolicyUsageType)
-> FromXML PolicyUsageType
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String PolicyUsageType
$cparseXML :: [Node] -> Either String PolicyUsageType
Core.FromXML,
      PolicyUsageType -> XML
(PolicyUsageType -> XML) -> ToXML PolicyUsageType
forall a. (a -> XML) -> ToXML a
toXML :: PolicyUsageType -> XML
$ctoXML :: PolicyUsageType -> XML
Core.ToXML
    )

pattern PolicyUsageType_PermissionsBoundary :: PolicyUsageType
pattern $bPolicyUsageType_PermissionsBoundary :: PolicyUsageType
$mPolicyUsageType_PermissionsBoundary :: forall r. PolicyUsageType -> (Void# -> r) -> (Void# -> r) -> r
PolicyUsageType_PermissionsBoundary = PolicyUsageType' "PermissionsBoundary"

pattern PolicyUsageType_PermissionsPolicy :: PolicyUsageType
pattern $bPolicyUsageType_PermissionsPolicy :: PolicyUsageType
$mPolicyUsageType_PermissionsPolicy :: forall r. PolicyUsageType -> (Void# -> r) -> (Void# -> r) -> r
PolicyUsageType_PermissionsPolicy = PolicyUsageType' "PermissionsPolicy"

{-# COMPLETE
  PolicyUsageType_PermissionsBoundary,
  PolicyUsageType_PermissionsPolicy,
  PolicyUsageType'
  #-}