{-# 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.SecurityHub.Types.AwsCodeBuildProjectDetails where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import Amazonka.SecurityHub.Types.AwsCodeBuildProjectArtifactsDetails
import Amazonka.SecurityHub.Types.AwsCodeBuildProjectEnvironment
import Amazonka.SecurityHub.Types.AwsCodeBuildProjectLogsConfigDetails
import Amazonka.SecurityHub.Types.AwsCodeBuildProjectSource
import Amazonka.SecurityHub.Types.AwsCodeBuildProjectVpcConfig
data AwsCodeBuildProjectDetails = AwsCodeBuildProjectDetails'
{
AwsCodeBuildProjectDetails
-> Maybe [AwsCodeBuildProjectArtifactsDetails]
artifacts :: Prelude.Maybe [AwsCodeBuildProjectArtifactsDetails],
AwsCodeBuildProjectDetails -> Maybe AwsCodeBuildProjectEnvironment
environment :: Prelude.Maybe AwsCodeBuildProjectEnvironment,
AwsCodeBuildProjectDetails -> Maybe AwsCodeBuildProjectVpcConfig
vpcConfig :: Prelude.Maybe AwsCodeBuildProjectVpcConfig,
AwsCodeBuildProjectDetails -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
AwsCodeBuildProjectDetails -> Maybe AwsCodeBuildProjectSource
source :: Prelude.Maybe AwsCodeBuildProjectSource,
AwsCodeBuildProjectDetails
-> Maybe AwsCodeBuildProjectLogsConfigDetails
logsConfig :: Prelude.Maybe AwsCodeBuildProjectLogsConfigDetails,
AwsCodeBuildProjectDetails -> Maybe Text
encryptionKey :: Prelude.Maybe Prelude.Text,
AwsCodeBuildProjectDetails -> Maybe Text
serviceRole :: Prelude.Maybe Prelude.Text
}
deriving (AwsCodeBuildProjectDetails -> AwsCodeBuildProjectDetails -> Bool
(AwsCodeBuildProjectDetails -> AwsCodeBuildProjectDetails -> Bool)
-> (AwsCodeBuildProjectDetails
-> AwsCodeBuildProjectDetails -> Bool)
-> Eq AwsCodeBuildProjectDetails
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: AwsCodeBuildProjectDetails -> AwsCodeBuildProjectDetails -> Bool
$c/= :: AwsCodeBuildProjectDetails -> AwsCodeBuildProjectDetails -> Bool
== :: AwsCodeBuildProjectDetails -> AwsCodeBuildProjectDetails -> Bool
$c== :: AwsCodeBuildProjectDetails -> AwsCodeBuildProjectDetails -> Bool
Prelude.Eq, ReadPrec [AwsCodeBuildProjectDetails]
ReadPrec AwsCodeBuildProjectDetails
Int -> ReadS AwsCodeBuildProjectDetails
ReadS [AwsCodeBuildProjectDetails]
(Int -> ReadS AwsCodeBuildProjectDetails)
-> ReadS [AwsCodeBuildProjectDetails]
-> ReadPrec AwsCodeBuildProjectDetails
-> ReadPrec [AwsCodeBuildProjectDetails]
-> Read AwsCodeBuildProjectDetails
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [AwsCodeBuildProjectDetails]
$creadListPrec :: ReadPrec [AwsCodeBuildProjectDetails]
readPrec :: ReadPrec AwsCodeBuildProjectDetails
$creadPrec :: ReadPrec AwsCodeBuildProjectDetails
readList :: ReadS [AwsCodeBuildProjectDetails]
$creadList :: ReadS [AwsCodeBuildProjectDetails]
readsPrec :: Int -> ReadS AwsCodeBuildProjectDetails
$creadsPrec :: Int -> ReadS AwsCodeBuildProjectDetails
Prelude.Read, Int -> AwsCodeBuildProjectDetails -> ShowS
[AwsCodeBuildProjectDetails] -> ShowS
AwsCodeBuildProjectDetails -> String
(Int -> AwsCodeBuildProjectDetails -> ShowS)
-> (AwsCodeBuildProjectDetails -> String)
-> ([AwsCodeBuildProjectDetails] -> ShowS)
-> Show AwsCodeBuildProjectDetails
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [AwsCodeBuildProjectDetails] -> ShowS
$cshowList :: [AwsCodeBuildProjectDetails] -> ShowS
show :: AwsCodeBuildProjectDetails -> String
$cshow :: AwsCodeBuildProjectDetails -> String
showsPrec :: Int -> AwsCodeBuildProjectDetails -> ShowS
$cshowsPrec :: Int -> AwsCodeBuildProjectDetails -> ShowS
Prelude.Show, (forall x.
AwsCodeBuildProjectDetails -> Rep AwsCodeBuildProjectDetails x)
-> (forall x.
Rep AwsCodeBuildProjectDetails x -> AwsCodeBuildProjectDetails)
-> Generic AwsCodeBuildProjectDetails
forall x.
Rep AwsCodeBuildProjectDetails x -> AwsCodeBuildProjectDetails
forall x.
AwsCodeBuildProjectDetails -> Rep AwsCodeBuildProjectDetails x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep AwsCodeBuildProjectDetails x -> AwsCodeBuildProjectDetails
$cfrom :: forall x.
AwsCodeBuildProjectDetails -> Rep AwsCodeBuildProjectDetails x
Prelude.Generic)
newAwsCodeBuildProjectDetails ::
AwsCodeBuildProjectDetails
newAwsCodeBuildProjectDetails :: AwsCodeBuildProjectDetails
newAwsCodeBuildProjectDetails =
AwsCodeBuildProjectDetails' :: Maybe [AwsCodeBuildProjectArtifactsDetails]
-> Maybe AwsCodeBuildProjectEnvironment
-> Maybe AwsCodeBuildProjectVpcConfig
-> Maybe Text
-> Maybe AwsCodeBuildProjectSource
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text
-> Maybe Text
-> AwsCodeBuildProjectDetails
AwsCodeBuildProjectDetails'
{ $sel:artifacts:AwsCodeBuildProjectDetails' :: Maybe [AwsCodeBuildProjectArtifactsDetails]
artifacts =
Maybe [AwsCodeBuildProjectArtifactsDetails]
forall a. Maybe a
Prelude.Nothing,
$sel:environment:AwsCodeBuildProjectDetails' :: Maybe AwsCodeBuildProjectEnvironment
environment = Maybe AwsCodeBuildProjectEnvironment
forall a. Maybe a
Prelude.Nothing,
$sel:vpcConfig:AwsCodeBuildProjectDetails' :: Maybe AwsCodeBuildProjectVpcConfig
vpcConfig = Maybe AwsCodeBuildProjectVpcConfig
forall a. Maybe a
Prelude.Nothing,
$sel:name:AwsCodeBuildProjectDetails' :: Maybe Text
name = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:source:AwsCodeBuildProjectDetails' :: Maybe AwsCodeBuildProjectSource
source = Maybe AwsCodeBuildProjectSource
forall a. Maybe a
Prelude.Nothing,
$sel:logsConfig:AwsCodeBuildProjectDetails' :: Maybe AwsCodeBuildProjectLogsConfigDetails
logsConfig = Maybe AwsCodeBuildProjectLogsConfigDetails
forall a. Maybe a
Prelude.Nothing,
$sel:encryptionKey:AwsCodeBuildProjectDetails' :: Maybe Text
encryptionKey = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:serviceRole:AwsCodeBuildProjectDetails' :: Maybe Text
serviceRole = Maybe Text
forall a. Maybe a
Prelude.Nothing
}
awsCodeBuildProjectDetails_artifacts :: Lens.Lens' AwsCodeBuildProjectDetails (Prelude.Maybe [AwsCodeBuildProjectArtifactsDetails])
awsCodeBuildProjectDetails_artifacts :: (Maybe [AwsCodeBuildProjectArtifactsDetails]
-> f (Maybe [AwsCodeBuildProjectArtifactsDetails]))
-> AwsCodeBuildProjectDetails -> f AwsCodeBuildProjectDetails
awsCodeBuildProjectDetails_artifacts = (AwsCodeBuildProjectDetails
-> Maybe [AwsCodeBuildProjectArtifactsDetails])
-> (AwsCodeBuildProjectDetails
-> Maybe [AwsCodeBuildProjectArtifactsDetails]
-> AwsCodeBuildProjectDetails)
-> Lens
AwsCodeBuildProjectDetails
AwsCodeBuildProjectDetails
(Maybe [AwsCodeBuildProjectArtifactsDetails])
(Maybe [AwsCodeBuildProjectArtifactsDetails])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AwsCodeBuildProjectDetails' {Maybe [AwsCodeBuildProjectArtifactsDetails]
artifacts :: Maybe [AwsCodeBuildProjectArtifactsDetails]
$sel:artifacts:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails
-> Maybe [AwsCodeBuildProjectArtifactsDetails]
artifacts} -> Maybe [AwsCodeBuildProjectArtifactsDetails]
artifacts) (\s :: AwsCodeBuildProjectDetails
s@AwsCodeBuildProjectDetails' {} Maybe [AwsCodeBuildProjectArtifactsDetails]
a -> AwsCodeBuildProjectDetails
s {$sel:artifacts:AwsCodeBuildProjectDetails' :: Maybe [AwsCodeBuildProjectArtifactsDetails]
artifacts = Maybe [AwsCodeBuildProjectArtifactsDetails]
a} :: AwsCodeBuildProjectDetails) ((Maybe [AwsCodeBuildProjectArtifactsDetails]
-> f (Maybe [AwsCodeBuildProjectArtifactsDetails]))
-> AwsCodeBuildProjectDetails -> f AwsCodeBuildProjectDetails)
-> ((Maybe [AwsCodeBuildProjectArtifactsDetails]
-> f (Maybe [AwsCodeBuildProjectArtifactsDetails]))
-> Maybe [AwsCodeBuildProjectArtifactsDetails]
-> f (Maybe [AwsCodeBuildProjectArtifactsDetails]))
-> (Maybe [AwsCodeBuildProjectArtifactsDetails]
-> f (Maybe [AwsCodeBuildProjectArtifactsDetails]))
-> AwsCodeBuildProjectDetails
-> f AwsCodeBuildProjectDetails
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
[AwsCodeBuildProjectArtifactsDetails]
[AwsCodeBuildProjectArtifactsDetails]
[AwsCodeBuildProjectArtifactsDetails]
[AwsCodeBuildProjectArtifactsDetails]
-> Iso
(Maybe [AwsCodeBuildProjectArtifactsDetails])
(Maybe [AwsCodeBuildProjectArtifactsDetails])
(Maybe [AwsCodeBuildProjectArtifactsDetails])
(Maybe [AwsCodeBuildProjectArtifactsDetails])
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 AnIso
[AwsCodeBuildProjectArtifactsDetails]
[AwsCodeBuildProjectArtifactsDetails]
[AwsCodeBuildProjectArtifactsDetails]
[AwsCodeBuildProjectArtifactsDetails]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
awsCodeBuildProjectDetails_environment :: Lens.Lens' AwsCodeBuildProjectDetails (Prelude.Maybe AwsCodeBuildProjectEnvironment)
awsCodeBuildProjectDetails_environment :: (Maybe AwsCodeBuildProjectEnvironment
-> f (Maybe AwsCodeBuildProjectEnvironment))
-> AwsCodeBuildProjectDetails -> f AwsCodeBuildProjectDetails
awsCodeBuildProjectDetails_environment = (AwsCodeBuildProjectDetails
-> Maybe AwsCodeBuildProjectEnvironment)
-> (AwsCodeBuildProjectDetails
-> Maybe AwsCodeBuildProjectEnvironment
-> AwsCodeBuildProjectDetails)
-> Lens
AwsCodeBuildProjectDetails
AwsCodeBuildProjectDetails
(Maybe AwsCodeBuildProjectEnvironment)
(Maybe AwsCodeBuildProjectEnvironment)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AwsCodeBuildProjectDetails' {Maybe AwsCodeBuildProjectEnvironment
environment :: Maybe AwsCodeBuildProjectEnvironment
$sel:environment:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe AwsCodeBuildProjectEnvironment
environment} -> Maybe AwsCodeBuildProjectEnvironment
environment) (\s :: AwsCodeBuildProjectDetails
s@AwsCodeBuildProjectDetails' {} Maybe AwsCodeBuildProjectEnvironment
a -> AwsCodeBuildProjectDetails
s {$sel:environment:AwsCodeBuildProjectDetails' :: Maybe AwsCodeBuildProjectEnvironment
environment = Maybe AwsCodeBuildProjectEnvironment
a} :: AwsCodeBuildProjectDetails)
awsCodeBuildProjectDetails_vpcConfig :: Lens.Lens' AwsCodeBuildProjectDetails (Prelude.Maybe AwsCodeBuildProjectVpcConfig)
awsCodeBuildProjectDetails_vpcConfig :: (Maybe AwsCodeBuildProjectVpcConfig
-> f (Maybe AwsCodeBuildProjectVpcConfig))
-> AwsCodeBuildProjectDetails -> f AwsCodeBuildProjectDetails
awsCodeBuildProjectDetails_vpcConfig = (AwsCodeBuildProjectDetails -> Maybe AwsCodeBuildProjectVpcConfig)
-> (AwsCodeBuildProjectDetails
-> Maybe AwsCodeBuildProjectVpcConfig
-> AwsCodeBuildProjectDetails)
-> Lens
AwsCodeBuildProjectDetails
AwsCodeBuildProjectDetails
(Maybe AwsCodeBuildProjectVpcConfig)
(Maybe AwsCodeBuildProjectVpcConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AwsCodeBuildProjectDetails' {Maybe AwsCodeBuildProjectVpcConfig
vpcConfig :: Maybe AwsCodeBuildProjectVpcConfig
$sel:vpcConfig:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe AwsCodeBuildProjectVpcConfig
vpcConfig} -> Maybe AwsCodeBuildProjectVpcConfig
vpcConfig) (\s :: AwsCodeBuildProjectDetails
s@AwsCodeBuildProjectDetails' {} Maybe AwsCodeBuildProjectVpcConfig
a -> AwsCodeBuildProjectDetails
s {$sel:vpcConfig:AwsCodeBuildProjectDetails' :: Maybe AwsCodeBuildProjectVpcConfig
vpcConfig = Maybe AwsCodeBuildProjectVpcConfig
a} :: AwsCodeBuildProjectDetails)
awsCodeBuildProjectDetails_name :: Lens.Lens' AwsCodeBuildProjectDetails (Prelude.Maybe Prelude.Text)
awsCodeBuildProjectDetails_name :: (Maybe Text -> f (Maybe Text))
-> AwsCodeBuildProjectDetails -> f AwsCodeBuildProjectDetails
awsCodeBuildProjectDetails_name = (AwsCodeBuildProjectDetails -> Maybe Text)
-> (AwsCodeBuildProjectDetails
-> Maybe Text -> AwsCodeBuildProjectDetails)
-> Lens
AwsCodeBuildProjectDetails
AwsCodeBuildProjectDetails
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AwsCodeBuildProjectDetails' {Maybe Text
name :: Maybe Text
$sel:name:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe Text
name} -> Maybe Text
name) (\s :: AwsCodeBuildProjectDetails
s@AwsCodeBuildProjectDetails' {} Maybe Text
a -> AwsCodeBuildProjectDetails
s {$sel:name:AwsCodeBuildProjectDetails' :: Maybe Text
name = Maybe Text
a} :: AwsCodeBuildProjectDetails)
awsCodeBuildProjectDetails_source :: Lens.Lens' AwsCodeBuildProjectDetails (Prelude.Maybe AwsCodeBuildProjectSource)
awsCodeBuildProjectDetails_source :: (Maybe AwsCodeBuildProjectSource
-> f (Maybe AwsCodeBuildProjectSource))
-> AwsCodeBuildProjectDetails -> f AwsCodeBuildProjectDetails
awsCodeBuildProjectDetails_source = (AwsCodeBuildProjectDetails -> Maybe AwsCodeBuildProjectSource)
-> (AwsCodeBuildProjectDetails
-> Maybe AwsCodeBuildProjectSource -> AwsCodeBuildProjectDetails)
-> Lens
AwsCodeBuildProjectDetails
AwsCodeBuildProjectDetails
(Maybe AwsCodeBuildProjectSource)
(Maybe AwsCodeBuildProjectSource)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AwsCodeBuildProjectDetails' {Maybe AwsCodeBuildProjectSource
source :: Maybe AwsCodeBuildProjectSource
$sel:source:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe AwsCodeBuildProjectSource
source} -> Maybe AwsCodeBuildProjectSource
source) (\s :: AwsCodeBuildProjectDetails
s@AwsCodeBuildProjectDetails' {} Maybe AwsCodeBuildProjectSource
a -> AwsCodeBuildProjectDetails
s {$sel:source:AwsCodeBuildProjectDetails' :: Maybe AwsCodeBuildProjectSource
source = Maybe AwsCodeBuildProjectSource
a} :: AwsCodeBuildProjectDetails)
awsCodeBuildProjectDetails_logsConfig :: Lens.Lens' AwsCodeBuildProjectDetails (Prelude.Maybe AwsCodeBuildProjectLogsConfigDetails)
awsCodeBuildProjectDetails_logsConfig :: (Maybe AwsCodeBuildProjectLogsConfigDetails
-> f (Maybe AwsCodeBuildProjectLogsConfigDetails))
-> AwsCodeBuildProjectDetails -> f AwsCodeBuildProjectDetails
awsCodeBuildProjectDetails_logsConfig = (AwsCodeBuildProjectDetails
-> Maybe AwsCodeBuildProjectLogsConfigDetails)
-> (AwsCodeBuildProjectDetails
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> AwsCodeBuildProjectDetails)
-> Lens
AwsCodeBuildProjectDetails
AwsCodeBuildProjectDetails
(Maybe AwsCodeBuildProjectLogsConfigDetails)
(Maybe AwsCodeBuildProjectLogsConfigDetails)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AwsCodeBuildProjectDetails' {Maybe AwsCodeBuildProjectLogsConfigDetails
logsConfig :: Maybe AwsCodeBuildProjectLogsConfigDetails
$sel:logsConfig:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails
-> Maybe AwsCodeBuildProjectLogsConfigDetails
logsConfig} -> Maybe AwsCodeBuildProjectLogsConfigDetails
logsConfig) (\s :: AwsCodeBuildProjectDetails
s@AwsCodeBuildProjectDetails' {} Maybe AwsCodeBuildProjectLogsConfigDetails
a -> AwsCodeBuildProjectDetails
s {$sel:logsConfig:AwsCodeBuildProjectDetails' :: Maybe AwsCodeBuildProjectLogsConfigDetails
logsConfig = Maybe AwsCodeBuildProjectLogsConfigDetails
a} :: AwsCodeBuildProjectDetails)
awsCodeBuildProjectDetails_encryptionKey :: Lens.Lens' AwsCodeBuildProjectDetails (Prelude.Maybe Prelude.Text)
awsCodeBuildProjectDetails_encryptionKey :: (Maybe Text -> f (Maybe Text))
-> AwsCodeBuildProjectDetails -> f AwsCodeBuildProjectDetails
awsCodeBuildProjectDetails_encryptionKey = (AwsCodeBuildProjectDetails -> Maybe Text)
-> (AwsCodeBuildProjectDetails
-> Maybe Text -> AwsCodeBuildProjectDetails)
-> Lens
AwsCodeBuildProjectDetails
AwsCodeBuildProjectDetails
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AwsCodeBuildProjectDetails' {Maybe Text
encryptionKey :: Maybe Text
$sel:encryptionKey:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe Text
encryptionKey} -> Maybe Text
encryptionKey) (\s :: AwsCodeBuildProjectDetails
s@AwsCodeBuildProjectDetails' {} Maybe Text
a -> AwsCodeBuildProjectDetails
s {$sel:encryptionKey:AwsCodeBuildProjectDetails' :: Maybe Text
encryptionKey = Maybe Text
a} :: AwsCodeBuildProjectDetails)
awsCodeBuildProjectDetails_serviceRole :: Lens.Lens' AwsCodeBuildProjectDetails (Prelude.Maybe Prelude.Text)
awsCodeBuildProjectDetails_serviceRole :: (Maybe Text -> f (Maybe Text))
-> AwsCodeBuildProjectDetails -> f AwsCodeBuildProjectDetails
awsCodeBuildProjectDetails_serviceRole = (AwsCodeBuildProjectDetails -> Maybe Text)
-> (AwsCodeBuildProjectDetails
-> Maybe Text -> AwsCodeBuildProjectDetails)
-> Lens
AwsCodeBuildProjectDetails
AwsCodeBuildProjectDetails
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AwsCodeBuildProjectDetails' {Maybe Text
serviceRole :: Maybe Text
$sel:serviceRole:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe Text
serviceRole} -> Maybe Text
serviceRole) (\s :: AwsCodeBuildProjectDetails
s@AwsCodeBuildProjectDetails' {} Maybe Text
a -> AwsCodeBuildProjectDetails
s {$sel:serviceRole:AwsCodeBuildProjectDetails' :: Maybe Text
serviceRole = Maybe Text
a} :: AwsCodeBuildProjectDetails)
instance Core.FromJSON AwsCodeBuildProjectDetails where
parseJSON :: Value -> Parser AwsCodeBuildProjectDetails
parseJSON =
String
-> (Object -> Parser AwsCodeBuildProjectDetails)
-> Value
-> Parser AwsCodeBuildProjectDetails
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"AwsCodeBuildProjectDetails"
( \Object
x ->
Maybe [AwsCodeBuildProjectArtifactsDetails]
-> Maybe AwsCodeBuildProjectEnvironment
-> Maybe AwsCodeBuildProjectVpcConfig
-> Maybe Text
-> Maybe AwsCodeBuildProjectSource
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text
-> Maybe Text
-> AwsCodeBuildProjectDetails
AwsCodeBuildProjectDetails'
(Maybe [AwsCodeBuildProjectArtifactsDetails]
-> Maybe AwsCodeBuildProjectEnvironment
-> Maybe AwsCodeBuildProjectVpcConfig
-> Maybe Text
-> Maybe AwsCodeBuildProjectSource
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text
-> Maybe Text
-> AwsCodeBuildProjectDetails)
-> Parser (Maybe [AwsCodeBuildProjectArtifactsDetails])
-> Parser
(Maybe AwsCodeBuildProjectEnvironment
-> Maybe AwsCodeBuildProjectVpcConfig
-> Maybe Text
-> Maybe AwsCodeBuildProjectSource
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text
-> Maybe Text
-> AwsCodeBuildProjectDetails)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object
-> Text
-> Parser (Maybe (Maybe [AwsCodeBuildProjectArtifactsDetails]))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Artifacts" Parser (Maybe (Maybe [AwsCodeBuildProjectArtifactsDetails]))
-> Maybe [AwsCodeBuildProjectArtifactsDetails]
-> Parser (Maybe [AwsCodeBuildProjectArtifactsDetails])
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe [AwsCodeBuildProjectArtifactsDetails]
forall a. Monoid a => a
Prelude.mempty)
Parser
(Maybe AwsCodeBuildProjectEnvironment
-> Maybe AwsCodeBuildProjectVpcConfig
-> Maybe Text
-> Maybe AwsCodeBuildProjectSource
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text
-> Maybe Text
-> AwsCodeBuildProjectDetails)
-> Parser (Maybe AwsCodeBuildProjectEnvironment)
-> Parser
(Maybe AwsCodeBuildProjectVpcConfig
-> Maybe Text
-> Maybe AwsCodeBuildProjectSource
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text
-> Maybe Text
-> AwsCodeBuildProjectDetails)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe AwsCodeBuildProjectEnvironment)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Environment")
Parser
(Maybe AwsCodeBuildProjectVpcConfig
-> Maybe Text
-> Maybe AwsCodeBuildProjectSource
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text
-> Maybe Text
-> AwsCodeBuildProjectDetails)
-> Parser (Maybe AwsCodeBuildProjectVpcConfig)
-> Parser
(Maybe Text
-> Maybe AwsCodeBuildProjectSource
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text
-> Maybe Text
-> AwsCodeBuildProjectDetails)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe AwsCodeBuildProjectVpcConfig)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"VpcConfig")
Parser
(Maybe Text
-> Maybe AwsCodeBuildProjectSource
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text
-> Maybe Text
-> AwsCodeBuildProjectDetails)
-> Parser (Maybe Text)
-> Parser
(Maybe AwsCodeBuildProjectSource
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text
-> Maybe Text
-> AwsCodeBuildProjectDetails)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Name")
Parser
(Maybe AwsCodeBuildProjectSource
-> Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text
-> Maybe Text
-> AwsCodeBuildProjectDetails)
-> Parser (Maybe AwsCodeBuildProjectSource)
-> Parser
(Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text -> Maybe Text -> AwsCodeBuildProjectDetails)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe AwsCodeBuildProjectSource)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Source")
Parser
(Maybe AwsCodeBuildProjectLogsConfigDetails
-> Maybe Text -> Maybe Text -> AwsCodeBuildProjectDetails)
-> Parser (Maybe AwsCodeBuildProjectLogsConfigDetails)
-> Parser (Maybe Text -> Maybe Text -> AwsCodeBuildProjectDetails)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object
-> Text -> Parser (Maybe AwsCodeBuildProjectLogsConfigDetails)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"LogsConfig")
Parser (Maybe Text -> Maybe Text -> AwsCodeBuildProjectDetails)
-> Parser (Maybe Text)
-> Parser (Maybe Text -> AwsCodeBuildProjectDetails)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"EncryptionKey")
Parser (Maybe Text -> AwsCodeBuildProjectDetails)
-> Parser (Maybe Text) -> Parser AwsCodeBuildProjectDetails
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"ServiceRole")
)
instance Prelude.Hashable AwsCodeBuildProjectDetails
instance Prelude.NFData AwsCodeBuildProjectDetails
instance Core.ToJSON AwsCodeBuildProjectDetails where
toJSON :: AwsCodeBuildProjectDetails -> Value
toJSON AwsCodeBuildProjectDetails' {Maybe [AwsCodeBuildProjectArtifactsDetails]
Maybe Text
Maybe AwsCodeBuildProjectEnvironment
Maybe AwsCodeBuildProjectLogsConfigDetails
Maybe AwsCodeBuildProjectSource
Maybe AwsCodeBuildProjectVpcConfig
serviceRole :: Maybe Text
encryptionKey :: Maybe Text
logsConfig :: Maybe AwsCodeBuildProjectLogsConfigDetails
source :: Maybe AwsCodeBuildProjectSource
name :: Maybe Text
vpcConfig :: Maybe AwsCodeBuildProjectVpcConfig
environment :: Maybe AwsCodeBuildProjectEnvironment
artifacts :: Maybe [AwsCodeBuildProjectArtifactsDetails]
$sel:serviceRole:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe Text
$sel:encryptionKey:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe Text
$sel:logsConfig:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails
-> Maybe AwsCodeBuildProjectLogsConfigDetails
$sel:source:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe AwsCodeBuildProjectSource
$sel:name:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe Text
$sel:vpcConfig:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe AwsCodeBuildProjectVpcConfig
$sel:environment:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails -> Maybe AwsCodeBuildProjectEnvironment
$sel:artifacts:AwsCodeBuildProjectDetails' :: AwsCodeBuildProjectDetails
-> Maybe [AwsCodeBuildProjectArtifactsDetails]
..} =
[Pair] -> Value
Core.object
( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Text
"Artifacts" Text -> [AwsCodeBuildProjectArtifactsDetails] -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) ([AwsCodeBuildProjectArtifactsDetails] -> Pair)
-> Maybe [AwsCodeBuildProjectArtifactsDetails] -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [AwsCodeBuildProjectArtifactsDetails]
artifacts,
(Text
"Environment" Text -> AwsCodeBuildProjectEnvironment -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (AwsCodeBuildProjectEnvironment -> Pair)
-> Maybe AwsCodeBuildProjectEnvironment -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AwsCodeBuildProjectEnvironment
environment,
(Text
"VpcConfig" Text -> AwsCodeBuildProjectVpcConfig -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (AwsCodeBuildProjectVpcConfig -> Pair)
-> Maybe AwsCodeBuildProjectVpcConfig -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AwsCodeBuildProjectVpcConfig
vpcConfig,
(Text
"Name" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
name,
(Text
"Source" Text -> AwsCodeBuildProjectSource -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (AwsCodeBuildProjectSource -> Pair)
-> Maybe AwsCodeBuildProjectSource -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AwsCodeBuildProjectSource
source,
(Text
"LogsConfig" Text -> AwsCodeBuildProjectLogsConfigDetails -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (AwsCodeBuildProjectLogsConfigDetails -> Pair)
-> Maybe AwsCodeBuildProjectLogsConfigDetails -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AwsCodeBuildProjectLogsConfigDetails
logsConfig,
(Text
"EncryptionKey" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
encryptionKey,
(Text
"ServiceRole" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
serviceRole
]
)