{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}

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

-- |
-- Module      : Amazonka.Config.Types.OrganizationConfigRuleStatus
-- 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.Config.Types.OrganizationConfigRuleStatus where

import Amazonka.Config.Types.OrganizationRuleStatus
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude

-- | Returns the status for an organization Config rule in an organization.
--
-- /See:/ 'newOrganizationConfigRuleStatus' smart constructor.
data OrganizationConfigRuleStatus = OrganizationConfigRuleStatus'
  { -- | An error code that is returned when organization Config rule creation or
    -- deletion has failed.
    OrganizationConfigRuleStatus -> Maybe Text
errorCode :: Prelude.Maybe Prelude.Text,
    -- | An error message indicating that organization Config rule creation or
    -- deletion failed due to an error.
    OrganizationConfigRuleStatus -> Maybe Text
errorMessage :: Prelude.Maybe Prelude.Text,
    -- | The timestamp of the last update.
    OrganizationConfigRuleStatus -> Maybe POSIX
lastUpdateTime :: Prelude.Maybe Data.POSIX,
    -- | The name that you assign to organization Config rule.
    OrganizationConfigRuleStatus -> Text
organizationConfigRuleName :: Prelude.Text,
    -- | Indicates deployment status of an organization Config rule. When
    -- management account calls PutOrganizationConfigRule action for the first
    -- time, Config rule status is created in all the member accounts. When
    -- management account calls PutOrganizationConfigRule action for the second
    -- time, Config rule status is updated in all the member accounts.
    -- Additionally, Config rule status is updated when one or more member
    -- accounts join or leave an organization. Config rule status is deleted
    -- when the management account deletes OrganizationConfigRule in all the
    -- member accounts and disables service access for
    -- @config-multiaccountsetup.amazonaws.com@.
    --
    -- Config sets the state of the rule to:
    --
    -- -   @CREATE_SUCCESSFUL@ when an organization Config rule has been
    --     successfully created in all the member accounts.
    --
    -- -   @CREATE_IN_PROGRESS@ when an organization Config rule creation is in
    --     progress.
    --
    -- -   @CREATE_FAILED@ when an organization Config rule creation failed in
    --     one or more member accounts within that organization.
    --
    -- -   @DELETE_FAILED@ when an organization Config rule deletion failed in
    --     one or more member accounts within that organization.
    --
    -- -   @DELETE_IN_PROGRESS@ when an organization Config rule deletion is in
    --     progress.
    --
    -- -   @DELETE_SUCCESSFUL@ when an organization Config rule has been
    --     successfully deleted from all the member accounts.
    --
    -- -   @UPDATE_SUCCESSFUL@ when an organization Config rule has been
    --     successfully updated in all the member accounts.
    --
    -- -   @UPDATE_IN_PROGRESS@ when an organization Config rule update is in
    --     progress.
    --
    -- -   @UPDATE_FAILED@ when an organization Config rule update failed in
    --     one or more member accounts within that organization.
    OrganizationConfigRuleStatus -> OrganizationRuleStatus
organizationRuleStatus :: OrganizationRuleStatus
  }
  deriving (OrganizationConfigRuleStatus
-> OrganizationConfigRuleStatus -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OrganizationConfigRuleStatus
-> OrganizationConfigRuleStatus -> Bool
$c/= :: OrganizationConfigRuleStatus
-> OrganizationConfigRuleStatus -> Bool
== :: OrganizationConfigRuleStatus
-> OrganizationConfigRuleStatus -> Bool
$c== :: OrganizationConfigRuleStatus
-> OrganizationConfigRuleStatus -> Bool
Prelude.Eq, ReadPrec [OrganizationConfigRuleStatus]
ReadPrec OrganizationConfigRuleStatus
Int -> ReadS OrganizationConfigRuleStatus
ReadS [OrganizationConfigRuleStatus]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [OrganizationConfigRuleStatus]
$creadListPrec :: ReadPrec [OrganizationConfigRuleStatus]
readPrec :: ReadPrec OrganizationConfigRuleStatus
$creadPrec :: ReadPrec OrganizationConfigRuleStatus
readList :: ReadS [OrganizationConfigRuleStatus]
$creadList :: ReadS [OrganizationConfigRuleStatus]
readsPrec :: Int -> ReadS OrganizationConfigRuleStatus
$creadsPrec :: Int -> ReadS OrganizationConfigRuleStatus
Prelude.Read, Int -> OrganizationConfigRuleStatus -> ShowS
[OrganizationConfigRuleStatus] -> ShowS
OrganizationConfigRuleStatus -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OrganizationConfigRuleStatus] -> ShowS
$cshowList :: [OrganizationConfigRuleStatus] -> ShowS
show :: OrganizationConfigRuleStatus -> String
$cshow :: OrganizationConfigRuleStatus -> String
showsPrec :: Int -> OrganizationConfigRuleStatus -> ShowS
$cshowsPrec :: Int -> OrganizationConfigRuleStatus -> ShowS
Prelude.Show, forall x.
Rep OrganizationConfigRuleStatus x -> OrganizationConfigRuleStatus
forall x.
OrganizationConfigRuleStatus -> Rep OrganizationConfigRuleStatus x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep OrganizationConfigRuleStatus x -> OrganizationConfigRuleStatus
$cfrom :: forall x.
OrganizationConfigRuleStatus -> Rep OrganizationConfigRuleStatus x
Prelude.Generic)

-- |
-- Create a value of 'OrganizationConfigRuleStatus' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'errorCode', 'organizationConfigRuleStatus_errorCode' - An error code that is returned when organization Config rule creation or
-- deletion has failed.
--
-- 'errorMessage', 'organizationConfigRuleStatus_errorMessage' - An error message indicating that organization Config rule creation or
-- deletion failed due to an error.
--
-- 'lastUpdateTime', 'organizationConfigRuleStatus_lastUpdateTime' - The timestamp of the last update.
--
-- 'organizationConfigRuleName', 'organizationConfigRuleStatus_organizationConfigRuleName' - The name that you assign to organization Config rule.
--
-- 'organizationRuleStatus', 'organizationConfigRuleStatus_organizationRuleStatus' - Indicates deployment status of an organization Config rule. When
-- management account calls PutOrganizationConfigRule action for the first
-- time, Config rule status is created in all the member accounts. When
-- management account calls PutOrganizationConfigRule action for the second
-- time, Config rule status is updated in all the member accounts.
-- Additionally, Config rule status is updated when one or more member
-- accounts join or leave an organization. Config rule status is deleted
-- when the management account deletes OrganizationConfigRule in all the
-- member accounts and disables service access for
-- @config-multiaccountsetup.amazonaws.com@.
--
-- Config sets the state of the rule to:
--
-- -   @CREATE_SUCCESSFUL@ when an organization Config rule has been
--     successfully created in all the member accounts.
--
-- -   @CREATE_IN_PROGRESS@ when an organization Config rule creation is in
--     progress.
--
-- -   @CREATE_FAILED@ when an organization Config rule creation failed in
--     one or more member accounts within that organization.
--
-- -   @DELETE_FAILED@ when an organization Config rule deletion failed in
--     one or more member accounts within that organization.
--
-- -   @DELETE_IN_PROGRESS@ when an organization Config rule deletion is in
--     progress.
--
-- -   @DELETE_SUCCESSFUL@ when an organization Config rule has been
--     successfully deleted from all the member accounts.
--
-- -   @UPDATE_SUCCESSFUL@ when an organization Config rule has been
--     successfully updated in all the member accounts.
--
-- -   @UPDATE_IN_PROGRESS@ when an organization Config rule update is in
--     progress.
--
-- -   @UPDATE_FAILED@ when an organization Config rule update failed in
--     one or more member accounts within that organization.
newOrganizationConfigRuleStatus ::
  -- | 'organizationConfigRuleName'
  Prelude.Text ->
  -- | 'organizationRuleStatus'
  OrganizationRuleStatus ->
  OrganizationConfigRuleStatus
newOrganizationConfigRuleStatus :: Text -> OrganizationRuleStatus -> OrganizationConfigRuleStatus
newOrganizationConfigRuleStatus
  Text
pOrganizationConfigRuleName_
  OrganizationRuleStatus
pOrganizationRuleStatus_ =
    OrganizationConfigRuleStatus'
      { $sel:errorCode:OrganizationConfigRuleStatus' :: Maybe Text
errorCode =
          forall a. Maybe a
Prelude.Nothing,
        $sel:errorMessage:OrganizationConfigRuleStatus' :: Maybe Text
errorMessage = forall a. Maybe a
Prelude.Nothing,
        $sel:lastUpdateTime:OrganizationConfigRuleStatus' :: Maybe POSIX
lastUpdateTime = forall a. Maybe a
Prelude.Nothing,
        $sel:organizationConfigRuleName:OrganizationConfigRuleStatus' :: Text
organizationConfigRuleName =
          Text
pOrganizationConfigRuleName_,
        $sel:organizationRuleStatus:OrganizationConfigRuleStatus' :: OrganizationRuleStatus
organizationRuleStatus =
          OrganizationRuleStatus
pOrganizationRuleStatus_
      }

-- | An error code that is returned when organization Config rule creation or
-- deletion has failed.
organizationConfigRuleStatus_errorCode :: Lens.Lens' OrganizationConfigRuleStatus (Prelude.Maybe Prelude.Text)
organizationConfigRuleStatus_errorCode :: Lens' OrganizationConfigRuleStatus (Maybe Text)
organizationConfigRuleStatus_errorCode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OrganizationConfigRuleStatus' {Maybe Text
errorCode :: Maybe Text
$sel:errorCode:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Maybe Text
errorCode} -> Maybe Text
errorCode) (\s :: OrganizationConfigRuleStatus
s@OrganizationConfigRuleStatus' {} Maybe Text
a -> OrganizationConfigRuleStatus
s {$sel:errorCode:OrganizationConfigRuleStatus' :: Maybe Text
errorCode = Maybe Text
a} :: OrganizationConfigRuleStatus)

-- | An error message indicating that organization Config rule creation or
-- deletion failed due to an error.
organizationConfigRuleStatus_errorMessage :: Lens.Lens' OrganizationConfigRuleStatus (Prelude.Maybe Prelude.Text)
organizationConfigRuleStatus_errorMessage :: Lens' OrganizationConfigRuleStatus (Maybe Text)
organizationConfigRuleStatus_errorMessage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OrganizationConfigRuleStatus' {Maybe Text
errorMessage :: Maybe Text
$sel:errorMessage:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Maybe Text
errorMessage} -> Maybe Text
errorMessage) (\s :: OrganizationConfigRuleStatus
s@OrganizationConfigRuleStatus' {} Maybe Text
a -> OrganizationConfigRuleStatus
s {$sel:errorMessage:OrganizationConfigRuleStatus' :: Maybe Text
errorMessage = Maybe Text
a} :: OrganizationConfigRuleStatus)

-- | The timestamp of the last update.
organizationConfigRuleStatus_lastUpdateTime :: Lens.Lens' OrganizationConfigRuleStatus (Prelude.Maybe Prelude.UTCTime)
organizationConfigRuleStatus_lastUpdateTime :: Lens' OrganizationConfigRuleStatus (Maybe UTCTime)
organizationConfigRuleStatus_lastUpdateTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OrganizationConfigRuleStatus' {Maybe POSIX
lastUpdateTime :: Maybe POSIX
$sel:lastUpdateTime:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Maybe POSIX
lastUpdateTime} -> Maybe POSIX
lastUpdateTime) (\s :: OrganizationConfigRuleStatus
s@OrganizationConfigRuleStatus' {} Maybe POSIX
a -> OrganizationConfigRuleStatus
s {$sel:lastUpdateTime:OrganizationConfigRuleStatus' :: Maybe POSIX
lastUpdateTime = Maybe POSIX
a} :: OrganizationConfigRuleStatus) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall (a :: Format). Iso' (Time a) UTCTime
Data._Time

-- | The name that you assign to organization Config rule.
organizationConfigRuleStatus_organizationConfigRuleName :: Lens.Lens' OrganizationConfigRuleStatus Prelude.Text
organizationConfigRuleStatus_organizationConfigRuleName :: Lens' OrganizationConfigRuleStatus Text
organizationConfigRuleStatus_organizationConfigRuleName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OrganizationConfigRuleStatus' {Text
organizationConfigRuleName :: Text
$sel:organizationConfigRuleName:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Text
organizationConfigRuleName} -> Text
organizationConfigRuleName) (\s :: OrganizationConfigRuleStatus
s@OrganizationConfigRuleStatus' {} Text
a -> OrganizationConfigRuleStatus
s {$sel:organizationConfigRuleName:OrganizationConfigRuleStatus' :: Text
organizationConfigRuleName = Text
a} :: OrganizationConfigRuleStatus)

-- | Indicates deployment status of an organization Config rule. When
-- management account calls PutOrganizationConfigRule action for the first
-- time, Config rule status is created in all the member accounts. When
-- management account calls PutOrganizationConfigRule action for the second
-- time, Config rule status is updated in all the member accounts.
-- Additionally, Config rule status is updated when one or more member
-- accounts join or leave an organization. Config rule status is deleted
-- when the management account deletes OrganizationConfigRule in all the
-- member accounts and disables service access for
-- @config-multiaccountsetup.amazonaws.com@.
--
-- Config sets the state of the rule to:
--
-- -   @CREATE_SUCCESSFUL@ when an organization Config rule has been
--     successfully created in all the member accounts.
--
-- -   @CREATE_IN_PROGRESS@ when an organization Config rule creation is in
--     progress.
--
-- -   @CREATE_FAILED@ when an organization Config rule creation failed in
--     one or more member accounts within that organization.
--
-- -   @DELETE_FAILED@ when an organization Config rule deletion failed in
--     one or more member accounts within that organization.
--
-- -   @DELETE_IN_PROGRESS@ when an organization Config rule deletion is in
--     progress.
--
-- -   @DELETE_SUCCESSFUL@ when an organization Config rule has been
--     successfully deleted from all the member accounts.
--
-- -   @UPDATE_SUCCESSFUL@ when an organization Config rule has been
--     successfully updated in all the member accounts.
--
-- -   @UPDATE_IN_PROGRESS@ when an organization Config rule update is in
--     progress.
--
-- -   @UPDATE_FAILED@ when an organization Config rule update failed in
--     one or more member accounts within that organization.
organizationConfigRuleStatus_organizationRuleStatus :: Lens.Lens' OrganizationConfigRuleStatus OrganizationRuleStatus
organizationConfigRuleStatus_organizationRuleStatus :: Lens' OrganizationConfigRuleStatus OrganizationRuleStatus
organizationConfigRuleStatus_organizationRuleStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OrganizationConfigRuleStatus' {OrganizationRuleStatus
organizationRuleStatus :: OrganizationRuleStatus
$sel:organizationRuleStatus:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> OrganizationRuleStatus
organizationRuleStatus} -> OrganizationRuleStatus
organizationRuleStatus) (\s :: OrganizationConfigRuleStatus
s@OrganizationConfigRuleStatus' {} OrganizationRuleStatus
a -> OrganizationConfigRuleStatus
s {$sel:organizationRuleStatus:OrganizationConfigRuleStatus' :: OrganizationRuleStatus
organizationRuleStatus = OrganizationRuleStatus
a} :: OrganizationConfigRuleStatus)

instance Data.FromJSON OrganizationConfigRuleStatus where
  parseJSON :: Value -> Parser OrganizationConfigRuleStatus
parseJSON =
    forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
      String
"OrganizationConfigRuleStatus"
      ( \Object
x ->
          Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Text
-> OrganizationRuleStatus
-> OrganizationConfigRuleStatus
OrganizationConfigRuleStatus'
            forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ErrorCode")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ErrorMessage")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"LastUpdateTime")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"OrganizationConfigRuleName")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"OrganizationRuleStatus")
      )

instance
  Prelude.Hashable
    OrganizationConfigRuleStatus
  where
  hashWithSalt :: Int -> OrganizationConfigRuleStatus -> Int
hashWithSalt Int
_salt OrganizationConfigRuleStatus' {Maybe Text
Maybe POSIX
Text
OrganizationRuleStatus
organizationRuleStatus :: OrganizationRuleStatus
organizationConfigRuleName :: Text
lastUpdateTime :: Maybe POSIX
errorMessage :: Maybe Text
errorCode :: Maybe Text
$sel:organizationRuleStatus:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> OrganizationRuleStatus
$sel:organizationConfigRuleName:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Text
$sel:lastUpdateTime:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Maybe POSIX
$sel:errorMessage:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Maybe Text
$sel:errorCode:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Maybe Text
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
errorCode
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
errorMessage
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
lastUpdateTime
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
organizationConfigRuleName
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` OrganizationRuleStatus
organizationRuleStatus

instance Prelude.NFData OrganizationConfigRuleStatus where
  rnf :: OrganizationConfigRuleStatus -> ()
rnf OrganizationConfigRuleStatus' {Maybe Text
Maybe POSIX
Text
OrganizationRuleStatus
organizationRuleStatus :: OrganizationRuleStatus
organizationConfigRuleName :: Text
lastUpdateTime :: Maybe POSIX
errorMessage :: Maybe Text
errorCode :: Maybe Text
$sel:organizationRuleStatus:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> OrganizationRuleStatus
$sel:organizationConfigRuleName:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Text
$sel:lastUpdateTime:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Maybe POSIX
$sel:errorMessage:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Maybe Text
$sel:errorCode:OrganizationConfigRuleStatus' :: OrganizationConfigRuleStatus -> Maybe Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
errorCode
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
errorMessage
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
lastUpdateTime
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
organizationConfigRuleName
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf OrganizationRuleStatus
organizationRuleStatus