{-# 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.AMP.Types.LoggingConfigurationMetadata where
import Amazonka.AMP.Types.LoggingConfigurationStatus
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
data LoggingConfigurationMetadata = LoggingConfigurationMetadata'
{
LoggingConfigurationMetadata -> POSIX
createdAt :: Data.POSIX,
LoggingConfigurationMetadata -> Text
logGroupArn :: Prelude.Text,
LoggingConfigurationMetadata -> POSIX
modifiedAt :: Data.POSIX,
LoggingConfigurationMetadata -> LoggingConfigurationStatus
status :: LoggingConfigurationStatus,
LoggingConfigurationMetadata -> Text
workspace :: Prelude.Text
}
deriving (LoggingConfigurationMetadata
-> LoggingConfigurationMetadata -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: LoggingConfigurationMetadata
-> LoggingConfigurationMetadata -> Bool
$c/= :: LoggingConfigurationMetadata
-> LoggingConfigurationMetadata -> Bool
== :: LoggingConfigurationMetadata
-> LoggingConfigurationMetadata -> Bool
$c== :: LoggingConfigurationMetadata
-> LoggingConfigurationMetadata -> Bool
Prelude.Eq, ReadPrec [LoggingConfigurationMetadata]
ReadPrec LoggingConfigurationMetadata
Int -> ReadS LoggingConfigurationMetadata
ReadS [LoggingConfigurationMetadata]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [LoggingConfigurationMetadata]
$creadListPrec :: ReadPrec [LoggingConfigurationMetadata]
readPrec :: ReadPrec LoggingConfigurationMetadata
$creadPrec :: ReadPrec LoggingConfigurationMetadata
readList :: ReadS [LoggingConfigurationMetadata]
$creadList :: ReadS [LoggingConfigurationMetadata]
readsPrec :: Int -> ReadS LoggingConfigurationMetadata
$creadsPrec :: Int -> ReadS LoggingConfigurationMetadata
Prelude.Read, Int -> LoggingConfigurationMetadata -> ShowS
[LoggingConfigurationMetadata] -> ShowS
LoggingConfigurationMetadata -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [LoggingConfigurationMetadata] -> ShowS
$cshowList :: [LoggingConfigurationMetadata] -> ShowS
show :: LoggingConfigurationMetadata -> String
$cshow :: LoggingConfigurationMetadata -> String
showsPrec :: Int -> LoggingConfigurationMetadata -> ShowS
$cshowsPrec :: Int -> LoggingConfigurationMetadata -> ShowS
Prelude.Show, forall x.
Rep LoggingConfigurationMetadata x -> LoggingConfigurationMetadata
forall x.
LoggingConfigurationMetadata -> Rep LoggingConfigurationMetadata x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep LoggingConfigurationMetadata x -> LoggingConfigurationMetadata
$cfrom :: forall x.
LoggingConfigurationMetadata -> Rep LoggingConfigurationMetadata x
Prelude.Generic)
newLoggingConfigurationMetadata ::
Prelude.UTCTime ->
Prelude.Text ->
Prelude.UTCTime ->
LoggingConfigurationStatus ->
Prelude.Text ->
LoggingConfigurationMetadata
newLoggingConfigurationMetadata :: UTCTime
-> Text
-> UTCTime
-> LoggingConfigurationStatus
-> Text
-> LoggingConfigurationMetadata
newLoggingConfigurationMetadata
UTCTime
pCreatedAt_
Text
pLogGroupArn_
UTCTime
pModifiedAt_
LoggingConfigurationStatus
pStatus_
Text
pWorkspace_ =
LoggingConfigurationMetadata'
{ $sel:createdAt:LoggingConfigurationMetadata' :: POSIX
createdAt =
forall (a :: Format). Iso' (Time a) UTCTime
Data._Time forall t b. AReview t b -> b -> t
Lens.# UTCTime
pCreatedAt_,
$sel:logGroupArn:LoggingConfigurationMetadata' :: Text
logGroupArn = Text
pLogGroupArn_,
$sel:modifiedAt:LoggingConfigurationMetadata' :: POSIX
modifiedAt = forall (a :: Format). Iso' (Time a) UTCTime
Data._Time forall t b. AReview t b -> b -> t
Lens.# UTCTime
pModifiedAt_,
$sel:status:LoggingConfigurationMetadata' :: LoggingConfigurationStatus
status = LoggingConfigurationStatus
pStatus_,
$sel:workspace:LoggingConfigurationMetadata' :: Text
workspace = Text
pWorkspace_
}
loggingConfigurationMetadata_createdAt :: Lens.Lens' LoggingConfigurationMetadata Prelude.UTCTime
loggingConfigurationMetadata_createdAt :: Lens' LoggingConfigurationMetadata UTCTime
loggingConfigurationMetadata_createdAt = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LoggingConfigurationMetadata' {POSIX
createdAt :: POSIX
$sel:createdAt:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> POSIX
createdAt} -> POSIX
createdAt) (\s :: LoggingConfigurationMetadata
s@LoggingConfigurationMetadata' {} POSIX
a -> LoggingConfigurationMetadata
s {$sel:createdAt:LoggingConfigurationMetadata' :: POSIX
createdAt = POSIX
a} :: LoggingConfigurationMetadata) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
loggingConfigurationMetadata_logGroupArn :: Lens.Lens' LoggingConfigurationMetadata Prelude.Text
loggingConfigurationMetadata_logGroupArn :: Lens' LoggingConfigurationMetadata Text
loggingConfigurationMetadata_logGroupArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LoggingConfigurationMetadata' {Text
logGroupArn :: Text
$sel:logGroupArn:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> Text
logGroupArn} -> Text
logGroupArn) (\s :: LoggingConfigurationMetadata
s@LoggingConfigurationMetadata' {} Text
a -> LoggingConfigurationMetadata
s {$sel:logGroupArn:LoggingConfigurationMetadata' :: Text
logGroupArn = Text
a} :: LoggingConfigurationMetadata)
loggingConfigurationMetadata_modifiedAt :: Lens.Lens' LoggingConfigurationMetadata Prelude.UTCTime
loggingConfigurationMetadata_modifiedAt :: Lens' LoggingConfigurationMetadata UTCTime
loggingConfigurationMetadata_modifiedAt = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LoggingConfigurationMetadata' {POSIX
modifiedAt :: POSIX
$sel:modifiedAt:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> POSIX
modifiedAt} -> POSIX
modifiedAt) (\s :: LoggingConfigurationMetadata
s@LoggingConfigurationMetadata' {} POSIX
a -> LoggingConfigurationMetadata
s {$sel:modifiedAt:LoggingConfigurationMetadata' :: POSIX
modifiedAt = POSIX
a} :: LoggingConfigurationMetadata) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
loggingConfigurationMetadata_status :: Lens.Lens' LoggingConfigurationMetadata LoggingConfigurationStatus
loggingConfigurationMetadata_status :: Lens' LoggingConfigurationMetadata LoggingConfigurationStatus
loggingConfigurationMetadata_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LoggingConfigurationMetadata' {LoggingConfigurationStatus
status :: LoggingConfigurationStatus
$sel:status:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> LoggingConfigurationStatus
status} -> LoggingConfigurationStatus
status) (\s :: LoggingConfigurationMetadata
s@LoggingConfigurationMetadata' {} LoggingConfigurationStatus
a -> LoggingConfigurationMetadata
s {$sel:status:LoggingConfigurationMetadata' :: LoggingConfigurationStatus
status = LoggingConfigurationStatus
a} :: LoggingConfigurationMetadata)
loggingConfigurationMetadata_workspace :: Lens.Lens' LoggingConfigurationMetadata Prelude.Text
loggingConfigurationMetadata_workspace :: Lens' LoggingConfigurationMetadata Text
loggingConfigurationMetadata_workspace = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LoggingConfigurationMetadata' {Text
workspace :: Text
$sel:workspace:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> Text
workspace} -> Text
workspace) (\s :: LoggingConfigurationMetadata
s@LoggingConfigurationMetadata' {} Text
a -> LoggingConfigurationMetadata
s {$sel:workspace:LoggingConfigurationMetadata' :: Text
workspace = Text
a} :: LoggingConfigurationMetadata)
instance Data.FromJSON LoggingConfigurationMetadata where
parseJSON :: Value -> Parser LoggingConfigurationMetadata
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"LoggingConfigurationMetadata"
( \Object
x ->
POSIX
-> Text
-> POSIX
-> LoggingConfigurationStatus
-> Text
-> LoggingConfigurationMetadata
LoggingConfigurationMetadata'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"createdAt")
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
"logGroupArn")
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
"modifiedAt")
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
"status")
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
"workspace")
)
instance
Prelude.Hashable
LoggingConfigurationMetadata
where
hashWithSalt :: Int -> LoggingConfigurationMetadata -> Int
hashWithSalt Int
_salt LoggingConfigurationMetadata' {Text
POSIX
LoggingConfigurationStatus
workspace :: Text
status :: LoggingConfigurationStatus
modifiedAt :: POSIX
logGroupArn :: Text
createdAt :: POSIX
$sel:workspace:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> Text
$sel:status:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> LoggingConfigurationStatus
$sel:modifiedAt:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> POSIX
$sel:logGroupArn:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> Text
$sel:createdAt:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> POSIX
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` POSIX
createdAt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
logGroupArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` POSIX
modifiedAt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` LoggingConfigurationStatus
status
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
workspace
instance Prelude.NFData LoggingConfigurationMetadata where
rnf :: LoggingConfigurationMetadata -> ()
rnf LoggingConfigurationMetadata' {Text
POSIX
LoggingConfigurationStatus
workspace :: Text
status :: LoggingConfigurationStatus
modifiedAt :: POSIX
logGroupArn :: Text
createdAt :: POSIX
$sel:workspace:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> Text
$sel:status:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> LoggingConfigurationStatus
$sel:modifiedAt:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> POSIX
$sel:logGroupArn:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> Text
$sel:createdAt:LoggingConfigurationMetadata' :: LoggingConfigurationMetadata -> POSIX
..} =
forall a. NFData a => a -> ()
Prelude.rnf POSIX
createdAt
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
logGroupArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf POSIX
modifiedAt
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf LoggingConfigurationStatus
status
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
workspace