{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.Proton.Types.EnvironmentSummary -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) module Amazonka.Proton.Types.EnvironmentSummary 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.Proton.Types.DeploymentStatus import Amazonka.Proton.Types.Provisioning -- | Summary data of an Proton environment resource. An Proton environment is -- a set of resources shared across Proton services. -- -- /See:/ 'newEnvironmentSummary' smart constructor. data EnvironmentSummary = EnvironmentSummary' { -- | The Amazon Resource Name (ARN) of the IAM service role that Proton uses -- when provisioning directly defined components in this environment. It -- determines the scope of infrastructure that a component can provision. -- -- The environment must have a @componentRoleArn@ to allow directly defined -- components to be associated with the environment. -- -- For more information about components, see -- -- in the /Proton User Guide/. componentRoleArn :: Prelude.Maybe Prelude.Text, -- | An environment deployment status message. deploymentStatusMessage :: Prelude.Maybe (Data.Sensitive Prelude.Text), -- | The description of the environment. description :: Prelude.Maybe (Data.Sensitive Prelude.Text), -- | The ID of the environment account connection that the environment is -- associated with. environmentAccountConnectionId :: Prelude.Maybe Prelude.Text, -- | The ID of the environment account that the environment infrastructure -- resources are provisioned in. environmentAccountId :: Prelude.Maybe Prelude.Text, -- | The Amazon Resource Name (ARN) of the Proton service role that allows -- Proton to make calls to other services on your behalf. protonServiceRoleArn :: Prelude.Maybe Prelude.Text, -- | When included, indicates that the environment template is for customer -- provisioned and managed infrastructure. provisioning :: Prelude.Maybe Provisioning, -- | The Amazon Resource Name (ARN) of the environment. arn :: Prelude.Text, -- | The time when the environment was created. createdAt :: Data.POSIX, -- | The environment deployment status. deploymentStatus :: DeploymentStatus, -- | The time when a deployment of the environment was last attempted. lastDeploymentAttemptedAt :: Data.POSIX, -- | The time when the environment was last deployed successfully. lastDeploymentSucceededAt :: Data.POSIX, -- | The name of the environment. name :: Prelude.Text, -- | The major version of the environment template. templateMajorVersion :: Prelude.Text, -- | The minor version of the environment template. templateMinorVersion :: Prelude.Text, -- | The name of the environment template. templateName :: Prelude.Text } deriving (Prelude.Eq, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'EnvironmentSummary' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'componentRoleArn', 'environmentSummary_componentRoleArn' - The Amazon Resource Name (ARN) of the IAM service role that Proton uses -- when provisioning directly defined components in this environment. It -- determines the scope of infrastructure that a component can provision. -- -- The environment must have a @componentRoleArn@ to allow directly defined -- components to be associated with the environment. -- -- For more information about components, see -- -- in the /Proton User Guide/. -- -- 'deploymentStatusMessage', 'environmentSummary_deploymentStatusMessage' - An environment deployment status message. -- -- 'description', 'environmentSummary_description' - The description of the environment. -- -- 'environmentAccountConnectionId', 'environmentSummary_environmentAccountConnectionId' - The ID of the environment account connection that the environment is -- associated with. -- -- 'environmentAccountId', 'environmentSummary_environmentAccountId' - The ID of the environment account that the environment infrastructure -- resources are provisioned in. -- -- 'protonServiceRoleArn', 'environmentSummary_protonServiceRoleArn' - The Amazon Resource Name (ARN) of the Proton service role that allows -- Proton to make calls to other services on your behalf. -- -- 'provisioning', 'environmentSummary_provisioning' - When included, indicates that the environment template is for customer -- provisioned and managed infrastructure. -- -- 'arn', 'environmentSummary_arn' - The Amazon Resource Name (ARN) of the environment. -- -- 'createdAt', 'environmentSummary_createdAt' - The time when the environment was created. -- -- 'deploymentStatus', 'environmentSummary_deploymentStatus' - The environment deployment status. -- -- 'lastDeploymentAttemptedAt', 'environmentSummary_lastDeploymentAttemptedAt' - The time when a deployment of the environment was last attempted. -- -- 'lastDeploymentSucceededAt', 'environmentSummary_lastDeploymentSucceededAt' - The time when the environment was last deployed successfully. -- -- 'name', 'environmentSummary_name' - The name of the environment. -- -- 'templateMajorVersion', 'environmentSummary_templateMajorVersion' - The major version of the environment template. -- -- 'templateMinorVersion', 'environmentSummary_templateMinorVersion' - The minor version of the environment template. -- -- 'templateName', 'environmentSummary_templateName' - The name of the environment template. newEnvironmentSummary :: -- | 'arn' Prelude.Text -> -- | 'createdAt' Prelude.UTCTime -> -- | 'deploymentStatus' DeploymentStatus -> -- | 'lastDeploymentAttemptedAt' Prelude.UTCTime -> -- | 'lastDeploymentSucceededAt' Prelude.UTCTime -> -- | 'name' Prelude.Text -> -- | 'templateMajorVersion' Prelude.Text -> -- | 'templateMinorVersion' Prelude.Text -> -- | 'templateName' Prelude.Text -> EnvironmentSummary newEnvironmentSummary pArn_ pCreatedAt_ pDeploymentStatus_ pLastDeploymentAttemptedAt_ pLastDeploymentSucceededAt_ pName_ pTemplateMajorVersion_ pTemplateMinorVersion_ pTemplateName_ = EnvironmentSummary' { componentRoleArn = Prelude.Nothing, deploymentStatusMessage = Prelude.Nothing, description = Prelude.Nothing, environmentAccountConnectionId = Prelude.Nothing, environmentAccountId = Prelude.Nothing, protonServiceRoleArn = Prelude.Nothing, provisioning = Prelude.Nothing, arn = pArn_, createdAt = Data._Time Lens.# pCreatedAt_, deploymentStatus = pDeploymentStatus_, lastDeploymentAttemptedAt = Data._Time Lens.# pLastDeploymentAttemptedAt_, lastDeploymentSucceededAt = Data._Time Lens.# pLastDeploymentSucceededAt_, name = pName_, templateMajorVersion = pTemplateMajorVersion_, templateMinorVersion = pTemplateMinorVersion_, templateName = pTemplateName_ } -- | The Amazon Resource Name (ARN) of the IAM service role that Proton uses -- when provisioning directly defined components in this environment. It -- determines the scope of infrastructure that a component can provision. -- -- The environment must have a @componentRoleArn@ to allow directly defined -- components to be associated with the environment. -- -- For more information about components, see -- -- in the /Proton User Guide/. environmentSummary_componentRoleArn :: Lens.Lens' EnvironmentSummary (Prelude.Maybe Prelude.Text) environmentSummary_componentRoleArn = Lens.lens (\EnvironmentSummary' {componentRoleArn} -> componentRoleArn) (\s@EnvironmentSummary' {} a -> s {componentRoleArn = a} :: EnvironmentSummary) -- | An environment deployment status message. environmentSummary_deploymentStatusMessage :: Lens.Lens' EnvironmentSummary (Prelude.Maybe Prelude.Text) environmentSummary_deploymentStatusMessage = Lens.lens (\EnvironmentSummary' {deploymentStatusMessage} -> deploymentStatusMessage) (\s@EnvironmentSummary' {} a -> s {deploymentStatusMessage = a} :: EnvironmentSummary) Prelude.. Lens.mapping Data._Sensitive -- | The description of the environment. environmentSummary_description :: Lens.Lens' EnvironmentSummary (Prelude.Maybe Prelude.Text) environmentSummary_description = Lens.lens (\EnvironmentSummary' {description} -> description) (\s@EnvironmentSummary' {} a -> s {description = a} :: EnvironmentSummary) Prelude.. Lens.mapping Data._Sensitive -- | The ID of the environment account connection that the environment is -- associated with. environmentSummary_environmentAccountConnectionId :: Lens.Lens' EnvironmentSummary (Prelude.Maybe Prelude.Text) environmentSummary_environmentAccountConnectionId = Lens.lens (\EnvironmentSummary' {environmentAccountConnectionId} -> environmentAccountConnectionId) (\s@EnvironmentSummary' {} a -> s {environmentAccountConnectionId = a} :: EnvironmentSummary) -- | The ID of the environment account that the environment infrastructure -- resources are provisioned in. environmentSummary_environmentAccountId :: Lens.Lens' EnvironmentSummary (Prelude.Maybe Prelude.Text) environmentSummary_environmentAccountId = Lens.lens (\EnvironmentSummary' {environmentAccountId} -> environmentAccountId) (\s@EnvironmentSummary' {} a -> s {environmentAccountId = a} :: EnvironmentSummary) -- | The Amazon Resource Name (ARN) of the Proton service role that allows -- Proton to make calls to other services on your behalf. environmentSummary_protonServiceRoleArn :: Lens.Lens' EnvironmentSummary (Prelude.Maybe Prelude.Text) environmentSummary_protonServiceRoleArn = Lens.lens (\EnvironmentSummary' {protonServiceRoleArn} -> protonServiceRoleArn) (\s@EnvironmentSummary' {} a -> s {protonServiceRoleArn = a} :: EnvironmentSummary) -- | When included, indicates that the environment template is for customer -- provisioned and managed infrastructure. environmentSummary_provisioning :: Lens.Lens' EnvironmentSummary (Prelude.Maybe Provisioning) environmentSummary_provisioning = Lens.lens (\EnvironmentSummary' {provisioning} -> provisioning) (\s@EnvironmentSummary' {} a -> s {provisioning = a} :: EnvironmentSummary) -- | The Amazon Resource Name (ARN) of the environment. environmentSummary_arn :: Lens.Lens' EnvironmentSummary Prelude.Text environmentSummary_arn = Lens.lens (\EnvironmentSummary' {arn} -> arn) (\s@EnvironmentSummary' {} a -> s {arn = a} :: EnvironmentSummary) -- | The time when the environment was created. environmentSummary_createdAt :: Lens.Lens' EnvironmentSummary Prelude.UTCTime environmentSummary_createdAt = Lens.lens (\EnvironmentSummary' {createdAt} -> createdAt) (\s@EnvironmentSummary' {} a -> s {createdAt = a} :: EnvironmentSummary) Prelude.. Data._Time -- | The environment deployment status. environmentSummary_deploymentStatus :: Lens.Lens' EnvironmentSummary DeploymentStatus environmentSummary_deploymentStatus = Lens.lens (\EnvironmentSummary' {deploymentStatus} -> deploymentStatus) (\s@EnvironmentSummary' {} a -> s {deploymentStatus = a} :: EnvironmentSummary) -- | The time when a deployment of the environment was last attempted. environmentSummary_lastDeploymentAttemptedAt :: Lens.Lens' EnvironmentSummary Prelude.UTCTime environmentSummary_lastDeploymentAttemptedAt = Lens.lens (\EnvironmentSummary' {lastDeploymentAttemptedAt} -> lastDeploymentAttemptedAt) (\s@EnvironmentSummary' {} a -> s {lastDeploymentAttemptedAt = a} :: EnvironmentSummary) Prelude.. Data._Time -- | The time when the environment was last deployed successfully. environmentSummary_lastDeploymentSucceededAt :: Lens.Lens' EnvironmentSummary Prelude.UTCTime environmentSummary_lastDeploymentSucceededAt = Lens.lens (\EnvironmentSummary' {lastDeploymentSucceededAt} -> lastDeploymentSucceededAt) (\s@EnvironmentSummary' {} a -> s {lastDeploymentSucceededAt = a} :: EnvironmentSummary) Prelude.. Data._Time -- | The name of the environment. environmentSummary_name :: Lens.Lens' EnvironmentSummary Prelude.Text environmentSummary_name = Lens.lens (\EnvironmentSummary' {name} -> name) (\s@EnvironmentSummary' {} a -> s {name = a} :: EnvironmentSummary) -- | The major version of the environment template. environmentSummary_templateMajorVersion :: Lens.Lens' EnvironmentSummary Prelude.Text environmentSummary_templateMajorVersion = Lens.lens (\EnvironmentSummary' {templateMajorVersion} -> templateMajorVersion) (\s@EnvironmentSummary' {} a -> s {templateMajorVersion = a} :: EnvironmentSummary) -- | The minor version of the environment template. environmentSummary_templateMinorVersion :: Lens.Lens' EnvironmentSummary Prelude.Text environmentSummary_templateMinorVersion = Lens.lens (\EnvironmentSummary' {templateMinorVersion} -> templateMinorVersion) (\s@EnvironmentSummary' {} a -> s {templateMinorVersion = a} :: EnvironmentSummary) -- | The name of the environment template. environmentSummary_templateName :: Lens.Lens' EnvironmentSummary Prelude.Text environmentSummary_templateName = Lens.lens (\EnvironmentSummary' {templateName} -> templateName) (\s@EnvironmentSummary' {} a -> s {templateName = a} :: EnvironmentSummary) instance Data.FromJSON EnvironmentSummary where parseJSON = Data.withObject "EnvironmentSummary" ( \x -> EnvironmentSummary' Prelude.<$> (x Data..:? "componentRoleArn") Prelude.<*> (x Data..:? "deploymentStatusMessage") Prelude.<*> (x Data..:? "description") Prelude.<*> (x Data..:? "environmentAccountConnectionId") Prelude.<*> (x Data..:? "environmentAccountId") Prelude.<*> (x Data..:? "protonServiceRoleArn") Prelude.<*> (x Data..:? "provisioning") Prelude.<*> (x Data..: "arn") Prelude.<*> (x Data..: "createdAt") Prelude.<*> (x Data..: "deploymentStatus") Prelude.<*> (x Data..: "lastDeploymentAttemptedAt") Prelude.<*> (x Data..: "lastDeploymentSucceededAt") Prelude.<*> (x Data..: "name") Prelude.<*> (x Data..: "templateMajorVersion") Prelude.<*> (x Data..: "templateMinorVersion") Prelude.<*> (x Data..: "templateName") ) instance Prelude.Hashable EnvironmentSummary where hashWithSalt _salt EnvironmentSummary' {..} = _salt `Prelude.hashWithSalt` componentRoleArn `Prelude.hashWithSalt` deploymentStatusMessage `Prelude.hashWithSalt` description `Prelude.hashWithSalt` environmentAccountConnectionId `Prelude.hashWithSalt` environmentAccountId `Prelude.hashWithSalt` protonServiceRoleArn `Prelude.hashWithSalt` provisioning `Prelude.hashWithSalt` arn `Prelude.hashWithSalt` createdAt `Prelude.hashWithSalt` deploymentStatus `Prelude.hashWithSalt` lastDeploymentAttemptedAt `Prelude.hashWithSalt` lastDeploymentSucceededAt `Prelude.hashWithSalt` name `Prelude.hashWithSalt` templateMajorVersion `Prelude.hashWithSalt` templateMinorVersion `Prelude.hashWithSalt` templateName instance Prelude.NFData EnvironmentSummary where rnf EnvironmentSummary' {..} = Prelude.rnf componentRoleArn `Prelude.seq` Prelude.rnf deploymentStatusMessage `Prelude.seq` Prelude.rnf description `Prelude.seq` Prelude.rnf environmentAccountConnectionId `Prelude.seq` Prelude.rnf environmentAccountId `Prelude.seq` Prelude.rnf protonServiceRoleArn `Prelude.seq` Prelude.rnf provisioning `Prelude.seq` Prelude.rnf arn `Prelude.seq` Prelude.rnf createdAt `Prelude.seq` Prelude.rnf deploymentStatus `Prelude.seq` Prelude.rnf lastDeploymentAttemptedAt `Prelude.seq` Prelude.rnf lastDeploymentSucceededAt `Prelude.seq` Prelude.rnf name `Prelude.seq` Prelude.rnf templateMajorVersion `Prelude.seq` Prelude.rnf templateMinorVersion `Prelude.seq` Prelude.rnf templateName