{-# 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 #-}
module Amazonka.SSM.Types.InstancePatchState where
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
import Amazonka.SSM.Types.PatchOperationType
import Amazonka.SSM.Types.RebootOption
data InstancePatchState = InstancePatchState'
{
InstancePatchState -> Maybe Int
criticalNonCompliantCount :: Prelude.Maybe Prelude.Int,
InstancePatchState -> Maybe Int
failedCount :: Prelude.Maybe Prelude.Int,
InstancePatchState -> Maybe Text
installOverrideList :: Prelude.Maybe Prelude.Text,
InstancePatchState -> Maybe Int
installedCount :: Prelude.Maybe Prelude.Int,
InstancePatchState -> Maybe Int
installedOtherCount :: Prelude.Maybe Prelude.Int,
InstancePatchState -> Maybe Int
installedPendingRebootCount :: Prelude.Maybe Prelude.Int,
InstancePatchState -> Maybe Int
installedRejectedCount :: Prelude.Maybe Prelude.Int,
InstancePatchState -> Maybe POSIX
lastNoRebootInstallOperationTime :: Prelude.Maybe Data.POSIX,
InstancePatchState -> Maybe Int
missingCount :: Prelude.Maybe Prelude.Int,
InstancePatchState -> Maybe Int
notApplicableCount :: Prelude.Maybe Prelude.Int,
InstancePatchState -> Maybe Int
otherNonCompliantCount :: Prelude.Maybe Prelude.Int,
InstancePatchState -> Maybe (Sensitive Text)
ownerInformation :: Prelude.Maybe (Data.Sensitive Prelude.Text),
InstancePatchState -> Maybe RebootOption
rebootOption :: Prelude.Maybe RebootOption,
InstancePatchState -> Maybe Int
securityNonCompliantCount :: Prelude.Maybe Prelude.Int,
InstancePatchState -> Maybe Text
snapshotId :: Prelude.Maybe Prelude.Text,
InstancePatchState -> Maybe Int
unreportedNotApplicableCount :: Prelude.Maybe Prelude.Int,
InstancePatchState -> Text
instanceId :: Prelude.Text,
InstancePatchState -> Text
patchGroup :: Prelude.Text,
InstancePatchState -> Text
baselineId :: Prelude.Text,
InstancePatchState -> POSIX
operationStartTime :: Data.POSIX,
InstancePatchState -> POSIX
operationEndTime :: Data.POSIX,
InstancePatchState -> PatchOperationType
operation :: PatchOperationType
}
deriving (InstancePatchState -> InstancePatchState -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InstancePatchState -> InstancePatchState -> Bool
$c/= :: InstancePatchState -> InstancePatchState -> Bool
== :: InstancePatchState -> InstancePatchState -> Bool
$c== :: InstancePatchState -> InstancePatchState -> Bool
Prelude.Eq, Int -> InstancePatchState -> ShowS
[InstancePatchState] -> ShowS
InstancePatchState -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InstancePatchState] -> ShowS
$cshowList :: [InstancePatchState] -> ShowS
show :: InstancePatchState -> String
$cshow :: InstancePatchState -> String
showsPrec :: Int -> InstancePatchState -> ShowS
$cshowsPrec :: Int -> InstancePatchState -> ShowS
Prelude.Show, forall x. Rep InstancePatchState x -> InstancePatchState
forall x. InstancePatchState -> Rep InstancePatchState x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep InstancePatchState x -> InstancePatchState
$cfrom :: forall x. InstancePatchState -> Rep InstancePatchState x
Prelude.Generic)
newInstancePatchState ::
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
Prelude.UTCTime ->
Prelude.UTCTime ->
PatchOperationType ->
InstancePatchState
newInstancePatchState :: Text
-> Text
-> Text
-> UTCTime
-> UTCTime
-> PatchOperationType
-> InstancePatchState
newInstancePatchState
Text
pInstanceId_
Text
pPatchGroup_
Text
pBaselineId_
UTCTime
pOperationStartTime_
UTCTime
pOperationEndTime_
PatchOperationType
pOperation_ =
InstancePatchState'
{ $sel:criticalNonCompliantCount:InstancePatchState' :: Maybe Int
criticalNonCompliantCount =
forall a. Maybe a
Prelude.Nothing,
$sel:failedCount:InstancePatchState' :: Maybe Int
failedCount = forall a. Maybe a
Prelude.Nothing,
$sel:installOverrideList:InstancePatchState' :: Maybe Text
installOverrideList = forall a. Maybe a
Prelude.Nothing,
$sel:installedCount:InstancePatchState' :: Maybe Int
installedCount = forall a. Maybe a
Prelude.Nothing,
$sel:installedOtherCount:InstancePatchState' :: Maybe Int
installedOtherCount = forall a. Maybe a
Prelude.Nothing,
$sel:installedPendingRebootCount:InstancePatchState' :: Maybe Int
installedPendingRebootCount = forall a. Maybe a
Prelude.Nothing,
$sel:installedRejectedCount:InstancePatchState' :: Maybe Int
installedRejectedCount = forall a. Maybe a
Prelude.Nothing,
$sel:lastNoRebootInstallOperationTime:InstancePatchState' :: Maybe POSIX
lastNoRebootInstallOperationTime = forall a. Maybe a
Prelude.Nothing,
$sel:missingCount:InstancePatchState' :: Maybe Int
missingCount = forall a. Maybe a
Prelude.Nothing,
$sel:notApplicableCount:InstancePatchState' :: Maybe Int
notApplicableCount = forall a. Maybe a
Prelude.Nothing,
$sel:otherNonCompliantCount:InstancePatchState' :: Maybe Int
otherNonCompliantCount = forall a. Maybe a
Prelude.Nothing,
$sel:ownerInformation:InstancePatchState' :: Maybe (Sensitive Text)
ownerInformation = forall a. Maybe a
Prelude.Nothing,
$sel:rebootOption:InstancePatchState' :: Maybe RebootOption
rebootOption = forall a. Maybe a
Prelude.Nothing,
$sel:securityNonCompliantCount:InstancePatchState' :: Maybe Int
securityNonCompliantCount = forall a. Maybe a
Prelude.Nothing,
$sel:snapshotId:InstancePatchState' :: Maybe Text
snapshotId = forall a. Maybe a
Prelude.Nothing,
$sel:unreportedNotApplicableCount:InstancePatchState' :: Maybe Int
unreportedNotApplicableCount = forall a. Maybe a
Prelude.Nothing,
$sel:instanceId:InstancePatchState' :: Text
instanceId = Text
pInstanceId_,
$sel:patchGroup:InstancePatchState' :: Text
patchGroup = Text
pPatchGroup_,
$sel:baselineId:InstancePatchState' :: Text
baselineId = Text
pBaselineId_,
$sel:operationStartTime:InstancePatchState' :: POSIX
operationStartTime =
forall (a :: Format). Iso' (Time a) UTCTime
Data._Time forall t b. AReview t b -> b -> t
Lens.# UTCTime
pOperationStartTime_,
$sel:operationEndTime:InstancePatchState' :: POSIX
operationEndTime =
forall (a :: Format). Iso' (Time a) UTCTime
Data._Time forall t b. AReview t b -> b -> t
Lens.# UTCTime
pOperationEndTime_,
$sel:operation:InstancePatchState' :: PatchOperationType
operation = PatchOperationType
pOperation_
}
instancePatchState_criticalNonCompliantCount :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Int)
instancePatchState_criticalNonCompliantCount :: Lens' InstancePatchState (Maybe Int)
instancePatchState_criticalNonCompliantCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Int
criticalNonCompliantCount :: Maybe Int
$sel:criticalNonCompliantCount:InstancePatchState' :: InstancePatchState -> Maybe Int
criticalNonCompliantCount} -> Maybe Int
criticalNonCompliantCount) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Int
a -> InstancePatchState
s {$sel:criticalNonCompliantCount:InstancePatchState' :: Maybe Int
criticalNonCompliantCount = Maybe Int
a} :: InstancePatchState)
instancePatchState_failedCount :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Int)
instancePatchState_failedCount :: Lens' InstancePatchState (Maybe Int)
instancePatchState_failedCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Int
failedCount :: Maybe Int
$sel:failedCount:InstancePatchState' :: InstancePatchState -> Maybe Int
failedCount} -> Maybe Int
failedCount) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Int
a -> InstancePatchState
s {$sel:failedCount:InstancePatchState' :: Maybe Int
failedCount = Maybe Int
a} :: InstancePatchState)
instancePatchState_installOverrideList :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Text)
instancePatchState_installOverrideList :: Lens' InstancePatchState (Maybe Text)
instancePatchState_installOverrideList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Text
installOverrideList :: Maybe Text
$sel:installOverrideList:InstancePatchState' :: InstancePatchState -> Maybe Text
installOverrideList} -> Maybe Text
installOverrideList) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Text
a -> InstancePatchState
s {$sel:installOverrideList:InstancePatchState' :: Maybe Text
installOverrideList = Maybe Text
a} :: InstancePatchState)
instancePatchState_installedCount :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Int)
instancePatchState_installedCount :: Lens' InstancePatchState (Maybe Int)
instancePatchState_installedCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Int
installedCount :: Maybe Int
$sel:installedCount:InstancePatchState' :: InstancePatchState -> Maybe Int
installedCount} -> Maybe Int
installedCount) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Int
a -> InstancePatchState
s {$sel:installedCount:InstancePatchState' :: Maybe Int
installedCount = Maybe Int
a} :: InstancePatchState)
instancePatchState_installedOtherCount :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Int)
instancePatchState_installedOtherCount :: Lens' InstancePatchState (Maybe Int)
instancePatchState_installedOtherCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Int
installedOtherCount :: Maybe Int
$sel:installedOtherCount:InstancePatchState' :: InstancePatchState -> Maybe Int
installedOtherCount} -> Maybe Int
installedOtherCount) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Int
a -> InstancePatchState
s {$sel:installedOtherCount:InstancePatchState' :: Maybe Int
installedOtherCount = Maybe Int
a} :: InstancePatchState)
instancePatchState_installedPendingRebootCount :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Int)
instancePatchState_installedPendingRebootCount :: Lens' InstancePatchState (Maybe Int)
instancePatchState_installedPendingRebootCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Int
installedPendingRebootCount :: Maybe Int
$sel:installedPendingRebootCount:InstancePatchState' :: InstancePatchState -> Maybe Int
installedPendingRebootCount} -> Maybe Int
installedPendingRebootCount) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Int
a -> InstancePatchState
s {$sel:installedPendingRebootCount:InstancePatchState' :: Maybe Int
installedPendingRebootCount = Maybe Int
a} :: InstancePatchState)
instancePatchState_installedRejectedCount :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Int)
instancePatchState_installedRejectedCount :: Lens' InstancePatchState (Maybe Int)
instancePatchState_installedRejectedCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Int
installedRejectedCount :: Maybe Int
$sel:installedRejectedCount:InstancePatchState' :: InstancePatchState -> Maybe Int
installedRejectedCount} -> Maybe Int
installedRejectedCount) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Int
a -> InstancePatchState
s {$sel:installedRejectedCount:InstancePatchState' :: Maybe Int
installedRejectedCount = Maybe Int
a} :: InstancePatchState)
instancePatchState_lastNoRebootInstallOperationTime :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.UTCTime)
instancePatchState_lastNoRebootInstallOperationTime :: Lens' InstancePatchState (Maybe UTCTime)
instancePatchState_lastNoRebootInstallOperationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe POSIX
lastNoRebootInstallOperationTime :: Maybe POSIX
$sel:lastNoRebootInstallOperationTime:InstancePatchState' :: InstancePatchState -> Maybe POSIX
lastNoRebootInstallOperationTime} -> Maybe POSIX
lastNoRebootInstallOperationTime) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe POSIX
a -> InstancePatchState
s {$sel:lastNoRebootInstallOperationTime:InstancePatchState' :: Maybe POSIX
lastNoRebootInstallOperationTime = Maybe POSIX
a} :: InstancePatchState) 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
instancePatchState_missingCount :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Int)
instancePatchState_missingCount :: Lens' InstancePatchState (Maybe Int)
instancePatchState_missingCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Int
missingCount :: Maybe Int
$sel:missingCount:InstancePatchState' :: InstancePatchState -> Maybe Int
missingCount} -> Maybe Int
missingCount) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Int
a -> InstancePatchState
s {$sel:missingCount:InstancePatchState' :: Maybe Int
missingCount = Maybe Int
a} :: InstancePatchState)
instancePatchState_notApplicableCount :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Int)
instancePatchState_notApplicableCount :: Lens' InstancePatchState (Maybe Int)
instancePatchState_notApplicableCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Int
notApplicableCount :: Maybe Int
$sel:notApplicableCount:InstancePatchState' :: InstancePatchState -> Maybe Int
notApplicableCount} -> Maybe Int
notApplicableCount) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Int
a -> InstancePatchState
s {$sel:notApplicableCount:InstancePatchState' :: Maybe Int
notApplicableCount = Maybe Int
a} :: InstancePatchState)
instancePatchState_otherNonCompliantCount :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Int)
instancePatchState_otherNonCompliantCount :: Lens' InstancePatchState (Maybe Int)
instancePatchState_otherNonCompliantCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Int
otherNonCompliantCount :: Maybe Int
$sel:otherNonCompliantCount:InstancePatchState' :: InstancePatchState -> Maybe Int
otherNonCompliantCount} -> Maybe Int
otherNonCompliantCount) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Int
a -> InstancePatchState
s {$sel:otherNonCompliantCount:InstancePatchState' :: Maybe Int
otherNonCompliantCount = Maybe Int
a} :: InstancePatchState)
instancePatchState_ownerInformation :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Text)
instancePatchState_ownerInformation :: Lens' InstancePatchState (Maybe Text)
instancePatchState_ownerInformation = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe (Sensitive Text)
ownerInformation :: Maybe (Sensitive Text)
$sel:ownerInformation:InstancePatchState' :: InstancePatchState -> Maybe (Sensitive Text)
ownerInformation} -> Maybe (Sensitive Text)
ownerInformation) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe (Sensitive Text)
a -> InstancePatchState
s {$sel:ownerInformation:InstancePatchState' :: Maybe (Sensitive Text)
ownerInformation = Maybe (Sensitive Text)
a} :: InstancePatchState) 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. Iso' (Sensitive a) a
Data._Sensitive
instancePatchState_rebootOption :: Lens.Lens' InstancePatchState (Prelude.Maybe RebootOption)
instancePatchState_rebootOption :: Lens' InstancePatchState (Maybe RebootOption)
instancePatchState_rebootOption = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe RebootOption
rebootOption :: Maybe RebootOption
$sel:rebootOption:InstancePatchState' :: InstancePatchState -> Maybe RebootOption
rebootOption} -> Maybe RebootOption
rebootOption) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe RebootOption
a -> InstancePatchState
s {$sel:rebootOption:InstancePatchState' :: Maybe RebootOption
rebootOption = Maybe RebootOption
a} :: InstancePatchState)
instancePatchState_securityNonCompliantCount :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Int)
instancePatchState_securityNonCompliantCount :: Lens' InstancePatchState (Maybe Int)
instancePatchState_securityNonCompliantCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Int
securityNonCompliantCount :: Maybe Int
$sel:securityNonCompliantCount:InstancePatchState' :: InstancePatchState -> Maybe Int
securityNonCompliantCount} -> Maybe Int
securityNonCompliantCount) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Int
a -> InstancePatchState
s {$sel:securityNonCompliantCount:InstancePatchState' :: Maybe Int
securityNonCompliantCount = Maybe Int
a} :: InstancePatchState)
instancePatchState_snapshotId :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Text)
instancePatchState_snapshotId :: Lens' InstancePatchState (Maybe Text)
instancePatchState_snapshotId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Text
snapshotId :: Maybe Text
$sel:snapshotId:InstancePatchState' :: InstancePatchState -> Maybe Text
snapshotId} -> Maybe Text
snapshotId) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Text
a -> InstancePatchState
s {$sel:snapshotId:InstancePatchState' :: Maybe Text
snapshotId = Maybe Text
a} :: InstancePatchState)
instancePatchState_unreportedNotApplicableCount :: Lens.Lens' InstancePatchState (Prelude.Maybe Prelude.Int)
instancePatchState_unreportedNotApplicableCount :: Lens' InstancePatchState (Maybe Int)
instancePatchState_unreportedNotApplicableCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Maybe Int
unreportedNotApplicableCount :: Maybe Int
$sel:unreportedNotApplicableCount:InstancePatchState' :: InstancePatchState -> Maybe Int
unreportedNotApplicableCount} -> Maybe Int
unreportedNotApplicableCount) (\s :: InstancePatchState
s@InstancePatchState' {} Maybe Int
a -> InstancePatchState
s {$sel:unreportedNotApplicableCount:InstancePatchState' :: Maybe Int
unreportedNotApplicableCount = Maybe Int
a} :: InstancePatchState)
instancePatchState_instanceId :: Lens.Lens' InstancePatchState Prelude.Text
instancePatchState_instanceId :: Lens' InstancePatchState Text
instancePatchState_instanceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Text
instanceId :: Text
$sel:instanceId:InstancePatchState' :: InstancePatchState -> Text
instanceId} -> Text
instanceId) (\s :: InstancePatchState
s@InstancePatchState' {} Text
a -> InstancePatchState
s {$sel:instanceId:InstancePatchState' :: Text
instanceId = Text
a} :: InstancePatchState)
instancePatchState_patchGroup :: Lens.Lens' InstancePatchState Prelude.Text
instancePatchState_patchGroup :: Lens' InstancePatchState Text
instancePatchState_patchGroup = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Text
patchGroup :: Text
$sel:patchGroup:InstancePatchState' :: InstancePatchState -> Text
patchGroup} -> Text
patchGroup) (\s :: InstancePatchState
s@InstancePatchState' {} Text
a -> InstancePatchState
s {$sel:patchGroup:InstancePatchState' :: Text
patchGroup = Text
a} :: InstancePatchState)
instancePatchState_baselineId :: Lens.Lens' InstancePatchState Prelude.Text
instancePatchState_baselineId :: Lens' InstancePatchState Text
instancePatchState_baselineId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {Text
baselineId :: Text
$sel:baselineId:InstancePatchState' :: InstancePatchState -> Text
baselineId} -> Text
baselineId) (\s :: InstancePatchState
s@InstancePatchState' {} Text
a -> InstancePatchState
s {$sel:baselineId:InstancePatchState' :: Text
baselineId = Text
a} :: InstancePatchState)
instancePatchState_operationStartTime :: Lens.Lens' InstancePatchState Prelude.UTCTime
instancePatchState_operationStartTime :: Lens' InstancePatchState UTCTime
instancePatchState_operationStartTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {POSIX
operationStartTime :: POSIX
$sel:operationStartTime:InstancePatchState' :: InstancePatchState -> POSIX
operationStartTime} -> POSIX
operationStartTime) (\s :: InstancePatchState
s@InstancePatchState' {} POSIX
a -> InstancePatchState
s {$sel:operationStartTime:InstancePatchState' :: POSIX
operationStartTime = POSIX
a} :: InstancePatchState) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
instancePatchState_operationEndTime :: Lens.Lens' InstancePatchState Prelude.UTCTime
instancePatchState_operationEndTime :: Lens' InstancePatchState UTCTime
instancePatchState_operationEndTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {POSIX
operationEndTime :: POSIX
$sel:operationEndTime:InstancePatchState' :: InstancePatchState -> POSIX
operationEndTime} -> POSIX
operationEndTime) (\s :: InstancePatchState
s@InstancePatchState' {} POSIX
a -> InstancePatchState
s {$sel:operationEndTime:InstancePatchState' :: POSIX
operationEndTime = POSIX
a} :: InstancePatchState) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
instancePatchState_operation :: Lens.Lens' InstancePatchState PatchOperationType
instancePatchState_operation :: Lens' InstancePatchState PatchOperationType
instancePatchState_operation = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancePatchState' {PatchOperationType
operation :: PatchOperationType
$sel:operation:InstancePatchState' :: InstancePatchState -> PatchOperationType
operation} -> PatchOperationType
operation) (\s :: InstancePatchState
s@InstancePatchState' {} PatchOperationType
a -> InstancePatchState
s {$sel:operation:InstancePatchState' :: PatchOperationType
operation = PatchOperationType
a} :: InstancePatchState)
instance Data.FromJSON InstancePatchState where
parseJSON :: Value -> Parser InstancePatchState
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"InstancePatchState"
( \Object
x ->
Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe POSIX
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe (Sensitive Text)
-> Maybe RebootOption
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Text
-> Text
-> Text
-> POSIX
-> POSIX
-> PatchOperationType
-> InstancePatchState
InstancePatchState'
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
"CriticalNonCompliantCount")
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
"FailedCount")
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
"InstallOverrideList")
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
"InstalledCount")
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
"InstalledOtherCount")
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
"InstalledPendingRebootCount")
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
"InstalledRejectedCount")
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
"LastNoRebootInstallOperationTime")
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
"MissingCount")
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
"NotApplicableCount")
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
"OtherNonCompliantCount")
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
"OwnerInformation")
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
"RebootOption")
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
"SecurityNonCompliantCount")
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
"SnapshotId")
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
"UnreportedNotApplicableCount")
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
"InstanceId")
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
"PatchGroup")
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
"BaselineId")
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
"OperationStartTime")
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
"OperationEndTime")
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
"Operation")
)
instance Prelude.Hashable InstancePatchState where
hashWithSalt :: Int -> InstancePatchState -> Int
hashWithSalt Int
_salt InstancePatchState' {Maybe Int
Maybe Text
Maybe (Sensitive Text)
Maybe POSIX
Maybe RebootOption
Text
POSIX
PatchOperationType
operation :: PatchOperationType
operationEndTime :: POSIX
operationStartTime :: POSIX
baselineId :: Text
patchGroup :: Text
instanceId :: Text
unreportedNotApplicableCount :: Maybe Int
snapshotId :: Maybe Text
securityNonCompliantCount :: Maybe Int
rebootOption :: Maybe RebootOption
ownerInformation :: Maybe (Sensitive Text)
otherNonCompliantCount :: Maybe Int
notApplicableCount :: Maybe Int
missingCount :: Maybe Int
lastNoRebootInstallOperationTime :: Maybe POSIX
installedRejectedCount :: Maybe Int
installedPendingRebootCount :: Maybe Int
installedOtherCount :: Maybe Int
installedCount :: Maybe Int
installOverrideList :: Maybe Text
failedCount :: Maybe Int
criticalNonCompliantCount :: Maybe Int
$sel:operation:InstancePatchState' :: InstancePatchState -> PatchOperationType
$sel:operationEndTime:InstancePatchState' :: InstancePatchState -> POSIX
$sel:operationStartTime:InstancePatchState' :: InstancePatchState -> POSIX
$sel:baselineId:InstancePatchState' :: InstancePatchState -> Text
$sel:patchGroup:InstancePatchState' :: InstancePatchState -> Text
$sel:instanceId:InstancePatchState' :: InstancePatchState -> Text
$sel:unreportedNotApplicableCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:snapshotId:InstancePatchState' :: InstancePatchState -> Maybe Text
$sel:securityNonCompliantCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:rebootOption:InstancePatchState' :: InstancePatchState -> Maybe RebootOption
$sel:ownerInformation:InstancePatchState' :: InstancePatchState -> Maybe (Sensitive Text)
$sel:otherNonCompliantCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:notApplicableCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:missingCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:lastNoRebootInstallOperationTime:InstancePatchState' :: InstancePatchState -> Maybe POSIX
$sel:installedRejectedCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:installedPendingRebootCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:installedOtherCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:installedCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:installOverrideList:InstancePatchState' :: InstancePatchState -> Maybe Text
$sel:failedCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:criticalNonCompliantCount:InstancePatchState' :: InstancePatchState -> Maybe Int
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
criticalNonCompliantCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
failedCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
installOverrideList
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
installedCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
installedOtherCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
installedPendingRebootCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
installedRejectedCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
lastNoRebootInstallOperationTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
missingCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
notApplicableCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
otherNonCompliantCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (Sensitive Text)
ownerInformation
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RebootOption
rebootOption
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
securityNonCompliantCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
snapshotId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
unreportedNotApplicableCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
instanceId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
patchGroup
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
baselineId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` POSIX
operationStartTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` POSIX
operationEndTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` PatchOperationType
operation
instance Prelude.NFData InstancePatchState where
rnf :: InstancePatchState -> ()
rnf InstancePatchState' {Maybe Int
Maybe Text
Maybe (Sensitive Text)
Maybe POSIX
Maybe RebootOption
Text
POSIX
PatchOperationType
operation :: PatchOperationType
operationEndTime :: POSIX
operationStartTime :: POSIX
baselineId :: Text
patchGroup :: Text
instanceId :: Text
unreportedNotApplicableCount :: Maybe Int
snapshotId :: Maybe Text
securityNonCompliantCount :: Maybe Int
rebootOption :: Maybe RebootOption
ownerInformation :: Maybe (Sensitive Text)
otherNonCompliantCount :: Maybe Int
notApplicableCount :: Maybe Int
missingCount :: Maybe Int
lastNoRebootInstallOperationTime :: Maybe POSIX
installedRejectedCount :: Maybe Int
installedPendingRebootCount :: Maybe Int
installedOtherCount :: Maybe Int
installedCount :: Maybe Int
installOverrideList :: Maybe Text
failedCount :: Maybe Int
criticalNonCompliantCount :: Maybe Int
$sel:operation:InstancePatchState' :: InstancePatchState -> PatchOperationType
$sel:operationEndTime:InstancePatchState' :: InstancePatchState -> POSIX
$sel:operationStartTime:InstancePatchState' :: InstancePatchState -> POSIX
$sel:baselineId:InstancePatchState' :: InstancePatchState -> Text
$sel:patchGroup:InstancePatchState' :: InstancePatchState -> Text
$sel:instanceId:InstancePatchState' :: InstancePatchState -> Text
$sel:unreportedNotApplicableCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:snapshotId:InstancePatchState' :: InstancePatchState -> Maybe Text
$sel:securityNonCompliantCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:rebootOption:InstancePatchState' :: InstancePatchState -> Maybe RebootOption
$sel:ownerInformation:InstancePatchState' :: InstancePatchState -> Maybe (Sensitive Text)
$sel:otherNonCompliantCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:notApplicableCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:missingCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:lastNoRebootInstallOperationTime:InstancePatchState' :: InstancePatchState -> Maybe POSIX
$sel:installedRejectedCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:installedPendingRebootCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:installedOtherCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:installedCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:installOverrideList:InstancePatchState' :: InstancePatchState -> Maybe Text
$sel:failedCount:InstancePatchState' :: InstancePatchState -> Maybe Int
$sel:criticalNonCompliantCount:InstancePatchState' :: InstancePatchState -> Maybe Int
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
criticalNonCompliantCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
failedCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
installOverrideList
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
installedCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
installedOtherCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
installedPendingRebootCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
installedRejectedCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
lastNoRebootInstallOperationTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
missingCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
notApplicableCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
otherNonCompliantCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
ownerInformation
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RebootOption
rebootOption
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
securityNonCompliantCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
snapshotId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Int
unreportedNotApplicableCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
instanceId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
patchGroup
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
baselineId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf POSIX
operationStartTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf POSIX
operationEndTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf PatchOperationType
operation