{-# 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.ImageBuilder.Types.ImagePipeline where
import qualified Amazonka.Core as Core
import Amazonka.ImageBuilder.Types.ImageTestsConfiguration
import Amazonka.ImageBuilder.Types.PipelineStatus
import Amazonka.ImageBuilder.Types.Platform
import Amazonka.ImageBuilder.Types.Schedule
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data ImagePipeline = ImagePipeline'
{
ImagePipeline -> Maybe PipelineStatus
status :: Prelude.Maybe PipelineStatus,
ImagePipeline -> Maybe Text
dateLastRun :: Prelude.Maybe Prelude.Text,
ImagePipeline -> Maybe Platform
platform :: Prelude.Maybe Platform,
ImagePipeline -> Maybe Text
infrastructureConfigurationArn :: Prelude.Maybe Prelude.Text,
ImagePipeline -> Maybe Text
containerRecipeArn :: Prelude.Maybe Prelude.Text,
ImagePipeline -> Maybe ImageTestsConfiguration
imageTestsConfiguration :: Prelude.Maybe ImageTestsConfiguration,
ImagePipeline -> Maybe Text
dateNextRun :: Prelude.Maybe Prelude.Text,
ImagePipeline -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
ImagePipeline -> Maybe Schedule
schedule :: Prelude.Maybe Schedule,
ImagePipeline -> Maybe Bool
enhancedImageMetadataEnabled :: Prelude.Maybe Prelude.Bool,
ImagePipeline -> Maybe Text
dateUpdated :: Prelude.Maybe Prelude.Text,
ImagePipeline -> Maybe Text
dateCreated :: Prelude.Maybe Prelude.Text,
ImagePipeline -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
ImagePipeline -> Maybe Text
distributionConfigurationArn :: Prelude.Maybe Prelude.Text,
ImagePipeline -> Maybe Text
imageRecipeArn :: Prelude.Maybe Prelude.Text,
ImagePipeline -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
ImagePipeline -> Maybe (HashMap Text Text)
tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text)
}
deriving (ImagePipeline -> ImagePipeline -> Bool
(ImagePipeline -> ImagePipeline -> Bool)
-> (ImagePipeline -> ImagePipeline -> Bool) -> Eq ImagePipeline
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ImagePipeline -> ImagePipeline -> Bool
$c/= :: ImagePipeline -> ImagePipeline -> Bool
== :: ImagePipeline -> ImagePipeline -> Bool
$c== :: ImagePipeline -> ImagePipeline -> Bool
Prelude.Eq, ReadPrec [ImagePipeline]
ReadPrec ImagePipeline
Int -> ReadS ImagePipeline
ReadS [ImagePipeline]
(Int -> ReadS ImagePipeline)
-> ReadS [ImagePipeline]
-> ReadPrec ImagePipeline
-> ReadPrec [ImagePipeline]
-> Read ImagePipeline
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ImagePipeline]
$creadListPrec :: ReadPrec [ImagePipeline]
readPrec :: ReadPrec ImagePipeline
$creadPrec :: ReadPrec ImagePipeline
readList :: ReadS [ImagePipeline]
$creadList :: ReadS [ImagePipeline]
readsPrec :: Int -> ReadS ImagePipeline
$creadsPrec :: Int -> ReadS ImagePipeline
Prelude.Read, Int -> ImagePipeline -> ShowS
[ImagePipeline] -> ShowS
ImagePipeline -> String
(Int -> ImagePipeline -> ShowS)
-> (ImagePipeline -> String)
-> ([ImagePipeline] -> ShowS)
-> Show ImagePipeline
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ImagePipeline] -> ShowS
$cshowList :: [ImagePipeline] -> ShowS
show :: ImagePipeline -> String
$cshow :: ImagePipeline -> String
showsPrec :: Int -> ImagePipeline -> ShowS
$cshowsPrec :: Int -> ImagePipeline -> ShowS
Prelude.Show, (forall x. ImagePipeline -> Rep ImagePipeline x)
-> (forall x. Rep ImagePipeline x -> ImagePipeline)
-> Generic ImagePipeline
forall x. Rep ImagePipeline x -> ImagePipeline
forall x. ImagePipeline -> Rep ImagePipeline x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ImagePipeline x -> ImagePipeline
$cfrom :: forall x. ImagePipeline -> Rep ImagePipeline x
Prelude.Generic)
newImagePipeline ::
ImagePipeline
newImagePipeline :: ImagePipeline
newImagePipeline =
ImagePipeline' :: Maybe PipelineStatus
-> Maybe Text
-> Maybe Platform
-> Maybe Text
-> Maybe Text
-> Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline
ImagePipeline'
{ $sel:status:ImagePipeline' :: Maybe PipelineStatus
status = Maybe PipelineStatus
forall a. Maybe a
Prelude.Nothing,
$sel:dateLastRun:ImagePipeline' :: Maybe Text
dateLastRun = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:platform:ImagePipeline' :: Maybe Platform
platform = Maybe Platform
forall a. Maybe a
Prelude.Nothing,
$sel:infrastructureConfigurationArn:ImagePipeline' :: Maybe Text
infrastructureConfigurationArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:containerRecipeArn:ImagePipeline' :: Maybe Text
containerRecipeArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:imageTestsConfiguration:ImagePipeline' :: Maybe ImageTestsConfiguration
imageTestsConfiguration = Maybe ImageTestsConfiguration
forall a. Maybe a
Prelude.Nothing,
$sel:dateNextRun:ImagePipeline' :: Maybe Text
dateNextRun = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:arn:ImagePipeline' :: Maybe Text
arn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:schedule:ImagePipeline' :: Maybe Schedule
schedule = Maybe Schedule
forall a. Maybe a
Prelude.Nothing,
$sel:enhancedImageMetadataEnabled:ImagePipeline' :: Maybe Bool
enhancedImageMetadataEnabled = Maybe Bool
forall a. Maybe a
Prelude.Nothing,
$sel:dateUpdated:ImagePipeline' :: Maybe Text
dateUpdated = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:dateCreated:ImagePipeline' :: Maybe Text
dateCreated = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:name:ImagePipeline' :: Maybe Text
name = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:distributionConfigurationArn:ImagePipeline' :: Maybe Text
distributionConfigurationArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:imageRecipeArn:ImagePipeline' :: Maybe Text
imageRecipeArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:description:ImagePipeline' :: Maybe Text
description = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:tags:ImagePipeline' :: Maybe (HashMap Text Text)
tags = Maybe (HashMap Text Text)
forall a. Maybe a
Prelude.Nothing
}
imagePipeline_status :: Lens.Lens' ImagePipeline (Prelude.Maybe PipelineStatus)
imagePipeline_status :: (Maybe PipelineStatus -> f (Maybe PipelineStatus))
-> ImagePipeline -> f ImagePipeline
imagePipeline_status = (ImagePipeline -> Maybe PipelineStatus)
-> (ImagePipeline -> Maybe PipelineStatus -> ImagePipeline)
-> Lens
ImagePipeline
ImagePipeline
(Maybe PipelineStatus)
(Maybe PipelineStatus)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe PipelineStatus
status :: Maybe PipelineStatus
$sel:status:ImagePipeline' :: ImagePipeline -> Maybe PipelineStatus
status} -> Maybe PipelineStatus
status) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe PipelineStatus
a -> ImagePipeline
s {$sel:status:ImagePipeline' :: Maybe PipelineStatus
status = Maybe PipelineStatus
a} :: ImagePipeline)
imagePipeline_dateLastRun :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Text)
imagePipeline_dateLastRun :: (Maybe Text -> f (Maybe Text)) -> ImagePipeline -> f ImagePipeline
imagePipeline_dateLastRun = (ImagePipeline -> Maybe Text)
-> (ImagePipeline -> Maybe Text -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Text
dateLastRun :: Maybe Text
$sel:dateLastRun:ImagePipeline' :: ImagePipeline -> Maybe Text
dateLastRun} -> Maybe Text
dateLastRun) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Text
a -> ImagePipeline
s {$sel:dateLastRun:ImagePipeline' :: Maybe Text
dateLastRun = Maybe Text
a} :: ImagePipeline)
imagePipeline_platform :: Lens.Lens' ImagePipeline (Prelude.Maybe Platform)
imagePipeline_platform :: (Maybe Platform -> f (Maybe Platform))
-> ImagePipeline -> f ImagePipeline
imagePipeline_platform = (ImagePipeline -> Maybe Platform)
-> (ImagePipeline -> Maybe Platform -> ImagePipeline)
-> Lens
ImagePipeline ImagePipeline (Maybe Platform) (Maybe Platform)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Platform
platform :: Maybe Platform
$sel:platform:ImagePipeline' :: ImagePipeline -> Maybe Platform
platform} -> Maybe Platform
platform) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Platform
a -> ImagePipeline
s {$sel:platform:ImagePipeline' :: Maybe Platform
platform = Maybe Platform
a} :: ImagePipeline)
imagePipeline_infrastructureConfigurationArn :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Text)
imagePipeline_infrastructureConfigurationArn :: (Maybe Text -> f (Maybe Text)) -> ImagePipeline -> f ImagePipeline
imagePipeline_infrastructureConfigurationArn = (ImagePipeline -> Maybe Text)
-> (ImagePipeline -> Maybe Text -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Text
infrastructureConfigurationArn :: Maybe Text
$sel:infrastructureConfigurationArn:ImagePipeline' :: ImagePipeline -> Maybe Text
infrastructureConfigurationArn} -> Maybe Text
infrastructureConfigurationArn) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Text
a -> ImagePipeline
s {$sel:infrastructureConfigurationArn:ImagePipeline' :: Maybe Text
infrastructureConfigurationArn = Maybe Text
a} :: ImagePipeline)
imagePipeline_containerRecipeArn :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Text)
imagePipeline_containerRecipeArn :: (Maybe Text -> f (Maybe Text)) -> ImagePipeline -> f ImagePipeline
imagePipeline_containerRecipeArn = (ImagePipeline -> Maybe Text)
-> (ImagePipeline -> Maybe Text -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Text
containerRecipeArn :: Maybe Text
$sel:containerRecipeArn:ImagePipeline' :: ImagePipeline -> Maybe Text
containerRecipeArn} -> Maybe Text
containerRecipeArn) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Text
a -> ImagePipeline
s {$sel:containerRecipeArn:ImagePipeline' :: Maybe Text
containerRecipeArn = Maybe Text
a} :: ImagePipeline)
imagePipeline_imageTestsConfiguration :: Lens.Lens' ImagePipeline (Prelude.Maybe ImageTestsConfiguration)
imagePipeline_imageTestsConfiguration :: (Maybe ImageTestsConfiguration
-> f (Maybe ImageTestsConfiguration))
-> ImagePipeline -> f ImagePipeline
imagePipeline_imageTestsConfiguration = (ImagePipeline -> Maybe ImageTestsConfiguration)
-> (ImagePipeline
-> Maybe ImageTestsConfiguration -> ImagePipeline)
-> Lens
ImagePipeline
ImagePipeline
(Maybe ImageTestsConfiguration)
(Maybe ImageTestsConfiguration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe ImageTestsConfiguration
imageTestsConfiguration :: Maybe ImageTestsConfiguration
$sel:imageTestsConfiguration:ImagePipeline' :: ImagePipeline -> Maybe ImageTestsConfiguration
imageTestsConfiguration} -> Maybe ImageTestsConfiguration
imageTestsConfiguration) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe ImageTestsConfiguration
a -> ImagePipeline
s {$sel:imageTestsConfiguration:ImagePipeline' :: Maybe ImageTestsConfiguration
imageTestsConfiguration = Maybe ImageTestsConfiguration
a} :: ImagePipeline)
imagePipeline_dateNextRun :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Text)
imagePipeline_dateNextRun :: (Maybe Text -> f (Maybe Text)) -> ImagePipeline -> f ImagePipeline
imagePipeline_dateNextRun = (ImagePipeline -> Maybe Text)
-> (ImagePipeline -> Maybe Text -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Text
dateNextRun :: Maybe Text
$sel:dateNextRun:ImagePipeline' :: ImagePipeline -> Maybe Text
dateNextRun} -> Maybe Text
dateNextRun) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Text
a -> ImagePipeline
s {$sel:dateNextRun:ImagePipeline' :: Maybe Text
dateNextRun = Maybe Text
a} :: ImagePipeline)
imagePipeline_arn :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Text)
imagePipeline_arn :: (Maybe Text -> f (Maybe Text)) -> ImagePipeline -> f ImagePipeline
imagePipeline_arn = (ImagePipeline -> Maybe Text)
-> (ImagePipeline -> Maybe Text -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Text
arn :: Maybe Text
$sel:arn:ImagePipeline' :: ImagePipeline -> Maybe Text
arn} -> Maybe Text
arn) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Text
a -> ImagePipeline
s {$sel:arn:ImagePipeline' :: Maybe Text
arn = Maybe Text
a} :: ImagePipeline)
imagePipeline_schedule :: Lens.Lens' ImagePipeline (Prelude.Maybe Schedule)
imagePipeline_schedule :: (Maybe Schedule -> f (Maybe Schedule))
-> ImagePipeline -> f ImagePipeline
imagePipeline_schedule = (ImagePipeline -> Maybe Schedule)
-> (ImagePipeline -> Maybe Schedule -> ImagePipeline)
-> Lens
ImagePipeline ImagePipeline (Maybe Schedule) (Maybe Schedule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Schedule
schedule :: Maybe Schedule
$sel:schedule:ImagePipeline' :: ImagePipeline -> Maybe Schedule
schedule} -> Maybe Schedule
schedule) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Schedule
a -> ImagePipeline
s {$sel:schedule:ImagePipeline' :: Maybe Schedule
schedule = Maybe Schedule
a} :: ImagePipeline)
imagePipeline_enhancedImageMetadataEnabled :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Bool)
imagePipeline_enhancedImageMetadataEnabled :: (Maybe Bool -> f (Maybe Bool)) -> ImagePipeline -> f ImagePipeline
imagePipeline_enhancedImageMetadataEnabled = (ImagePipeline -> Maybe Bool)
-> (ImagePipeline -> Maybe Bool -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Bool) (Maybe Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Bool
enhancedImageMetadataEnabled :: Maybe Bool
$sel:enhancedImageMetadataEnabled:ImagePipeline' :: ImagePipeline -> Maybe Bool
enhancedImageMetadataEnabled} -> Maybe Bool
enhancedImageMetadataEnabled) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Bool
a -> ImagePipeline
s {$sel:enhancedImageMetadataEnabled:ImagePipeline' :: Maybe Bool
enhancedImageMetadataEnabled = Maybe Bool
a} :: ImagePipeline)
imagePipeline_dateUpdated :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Text)
imagePipeline_dateUpdated :: (Maybe Text -> f (Maybe Text)) -> ImagePipeline -> f ImagePipeline
imagePipeline_dateUpdated = (ImagePipeline -> Maybe Text)
-> (ImagePipeline -> Maybe Text -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Text
dateUpdated :: Maybe Text
$sel:dateUpdated:ImagePipeline' :: ImagePipeline -> Maybe Text
dateUpdated} -> Maybe Text
dateUpdated) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Text
a -> ImagePipeline
s {$sel:dateUpdated:ImagePipeline' :: Maybe Text
dateUpdated = Maybe Text
a} :: ImagePipeline)
imagePipeline_dateCreated :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Text)
imagePipeline_dateCreated :: (Maybe Text -> f (Maybe Text)) -> ImagePipeline -> f ImagePipeline
imagePipeline_dateCreated = (ImagePipeline -> Maybe Text)
-> (ImagePipeline -> Maybe Text -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Text
dateCreated :: Maybe Text
$sel:dateCreated:ImagePipeline' :: ImagePipeline -> Maybe Text
dateCreated} -> Maybe Text
dateCreated) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Text
a -> ImagePipeline
s {$sel:dateCreated:ImagePipeline' :: Maybe Text
dateCreated = Maybe Text
a} :: ImagePipeline)
imagePipeline_name :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Text)
imagePipeline_name :: (Maybe Text -> f (Maybe Text)) -> ImagePipeline -> f ImagePipeline
imagePipeline_name = (ImagePipeline -> Maybe Text)
-> (ImagePipeline -> Maybe Text -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Text
name :: Maybe Text
$sel:name:ImagePipeline' :: ImagePipeline -> Maybe Text
name} -> Maybe Text
name) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Text
a -> ImagePipeline
s {$sel:name:ImagePipeline' :: Maybe Text
name = Maybe Text
a} :: ImagePipeline)
imagePipeline_distributionConfigurationArn :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Text)
imagePipeline_distributionConfigurationArn :: (Maybe Text -> f (Maybe Text)) -> ImagePipeline -> f ImagePipeline
imagePipeline_distributionConfigurationArn = (ImagePipeline -> Maybe Text)
-> (ImagePipeline -> Maybe Text -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Text
distributionConfigurationArn :: Maybe Text
$sel:distributionConfigurationArn:ImagePipeline' :: ImagePipeline -> Maybe Text
distributionConfigurationArn} -> Maybe Text
distributionConfigurationArn) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Text
a -> ImagePipeline
s {$sel:distributionConfigurationArn:ImagePipeline' :: Maybe Text
distributionConfigurationArn = Maybe Text
a} :: ImagePipeline)
imagePipeline_imageRecipeArn :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Text)
imagePipeline_imageRecipeArn :: (Maybe Text -> f (Maybe Text)) -> ImagePipeline -> f ImagePipeline
imagePipeline_imageRecipeArn = (ImagePipeline -> Maybe Text)
-> (ImagePipeline -> Maybe Text -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Text
imageRecipeArn :: Maybe Text
$sel:imageRecipeArn:ImagePipeline' :: ImagePipeline -> Maybe Text
imageRecipeArn} -> Maybe Text
imageRecipeArn) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Text
a -> ImagePipeline
s {$sel:imageRecipeArn:ImagePipeline' :: Maybe Text
imageRecipeArn = Maybe Text
a} :: ImagePipeline)
imagePipeline_description :: Lens.Lens' ImagePipeline (Prelude.Maybe Prelude.Text)
imagePipeline_description :: (Maybe Text -> f (Maybe Text)) -> ImagePipeline -> f ImagePipeline
imagePipeline_description = (ImagePipeline -> Maybe Text)
-> (ImagePipeline -> Maybe Text -> ImagePipeline)
-> Lens ImagePipeline ImagePipeline (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe Text
description :: Maybe Text
$sel:description:ImagePipeline' :: ImagePipeline -> Maybe Text
description} -> Maybe Text
description) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe Text
a -> ImagePipeline
s {$sel:description:ImagePipeline' :: Maybe Text
description = Maybe Text
a} :: ImagePipeline)
imagePipeline_tags :: Lens.Lens' ImagePipeline (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
imagePipeline_tags :: (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> ImagePipeline -> f ImagePipeline
imagePipeline_tags = (ImagePipeline -> Maybe (HashMap Text Text))
-> (ImagePipeline -> Maybe (HashMap Text Text) -> ImagePipeline)
-> Lens
ImagePipeline
ImagePipeline
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImagePipeline' {Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
$sel:tags:ImagePipeline' :: ImagePipeline -> Maybe (HashMap Text Text)
tags} -> Maybe (HashMap Text Text)
tags) (\s :: ImagePipeline
s@ImagePipeline' {} Maybe (HashMap Text Text)
a -> ImagePipeline
s {$sel:tags:ImagePipeline' :: Maybe (HashMap Text Text)
tags = Maybe (HashMap Text Text)
a} :: ImagePipeline) ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> ImagePipeline -> f ImagePipeline)
-> ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> ImagePipeline
-> f ImagePipeline
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
-> Iso
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
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
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
instance Core.FromJSON ImagePipeline where
parseJSON :: Value -> Parser ImagePipeline
parseJSON =
String
-> (Object -> Parser ImagePipeline)
-> Value
-> Parser ImagePipeline
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"ImagePipeline"
( \Object
x ->
Maybe PipelineStatus
-> Maybe Text
-> Maybe Platform
-> Maybe Text
-> Maybe Text
-> Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline
ImagePipeline'
(Maybe PipelineStatus
-> Maybe Text
-> Maybe Platform
-> Maybe Text
-> Maybe Text
-> Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe PipelineStatus)
-> Parser
(Maybe Text
-> Maybe Platform
-> Maybe Text
-> Maybe Text
-> Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe PipelineStatus)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"status")
Parser
(Maybe Text
-> Maybe Platform
-> Maybe Text
-> Maybe Text
-> Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Text)
-> Parser
(Maybe Platform
-> Maybe Text
-> Maybe Text
-> Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
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
"dateLastRun")
Parser
(Maybe Platform
-> Maybe Text
-> Maybe Text
-> Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Platform)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Platform)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"platform")
Parser
(Maybe Text
-> Maybe Text
-> Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
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
"infrastructureConfigurationArn")
Parser
(Maybe Text
-> Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Text)
-> Parser
(Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
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
"containerRecipeArn")
Parser
(Maybe ImageTestsConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe ImageTestsConfiguration)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe ImageTestsConfiguration)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"imageTestsConfiguration")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
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
"dateNextRun")
Parser
(Maybe Text
-> Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Text)
-> Parser
(Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
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
"arn")
Parser
(Maybe Schedule
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Schedule)
-> Parser
(Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Schedule)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"schedule")
Parser
(Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Bool)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Bool)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"enhancedImageMetadataEnabled")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
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
"dateUpdated")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
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
"dateCreated")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
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 Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> ImagePipeline)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text -> Maybe (HashMap Text Text) -> ImagePipeline)
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
"distributionConfigurationArn")
Parser
(Maybe Text
-> Maybe Text -> Maybe (HashMap Text Text) -> ImagePipeline)
-> Parser (Maybe Text)
-> Parser
(Maybe Text -> Maybe (HashMap Text Text) -> ImagePipeline)
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
"imageRecipeArn")
Parser (Maybe Text -> Maybe (HashMap Text Text) -> ImagePipeline)
-> Parser (Maybe Text)
-> Parser (Maybe (HashMap Text Text) -> ImagePipeline)
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
"description")
Parser (Maybe (HashMap Text Text) -> ImagePipeline)
-> Parser (Maybe (HashMap Text Text)) -> Parser ImagePipeline
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe (Maybe (HashMap Text Text)))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"tags" Parser (Maybe (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text) -> Parser (Maybe (HashMap Text Text))
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe (HashMap Text Text)
forall a. Monoid a => a
Prelude.mempty)
)
instance Prelude.Hashable ImagePipeline
instance Prelude.NFData ImagePipeline