{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-binds #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.MwAA.CreateEnvironment -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Creates an Amazon Managed Workflows for Apache Airflow (MWAA) -- environment. module Amazonka.MwAA.CreateEnvironment ( -- * Creating a Request CreateEnvironment (..), newCreateEnvironment, -- * Request Lenses createEnvironment_airflowConfigurationOptions, createEnvironment_airflowVersion, createEnvironment_environmentClass, createEnvironment_kmsKey, createEnvironment_loggingConfiguration, createEnvironment_maxWorkers, createEnvironment_minWorkers, createEnvironment_pluginsS3ObjectVersion, createEnvironment_pluginsS3Path, createEnvironment_requirementsS3ObjectVersion, createEnvironment_requirementsS3Path, createEnvironment_schedulers, createEnvironment_tags, createEnvironment_webserverAccessMode, createEnvironment_weeklyMaintenanceWindowStart, createEnvironment_dagS3Path, createEnvironment_executionRoleArn, createEnvironment_name, createEnvironment_networkConfiguration, createEnvironment_sourceBucketArn, -- * Destructuring the Response CreateEnvironmentResponse (..), newCreateEnvironmentResponse, -- * Response Lenses createEnvironmentResponse_arn, createEnvironmentResponse_httpStatus, ) where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import Amazonka.MwAA.Types import qualified Amazonka.Prelude as Prelude import qualified Amazonka.Request as Request import qualified Amazonka.Response as Response -- | This section contains the Amazon Managed Workflows for Apache Airflow -- (MWAA) API reference documentation to create an environment. For more -- information, see -- . -- -- /See:/ 'newCreateEnvironment' smart constructor. data CreateEnvironment = CreateEnvironment' { -- | A list of key-value pairs containing the Apache Airflow configuration -- options you want to attach to your environment. To learn more, see -- . airflowConfigurationOptions :: Prelude.Maybe (Data.Sensitive (Prelude.HashMap Prelude.Text (Data.Sensitive Prelude.Text))), -- | The Apache Airflow version for your environment. If no value is -- specified, it defaults to the latest version. Valid values: @1.10.12@, -- @2.0.2@, @2.2.2@, and @2.4.3@. For more information, see -- . airflowVersion :: Prelude.Maybe Prelude.Text, -- | The environment class type. Valid values: @mw1.small@, @mw1.medium@, -- @mw1.large@. To learn more, see -- . environmentClass :: Prelude.Maybe Prelude.Text, -- | The Amazon Web Services Key Management Service (KMS) key to encrypt the -- data in your environment. You can use an Amazon Web Services owned CMK, -- or a Customer managed CMK (advanced). To learn more, see -- . kmsKey :: Prelude.Maybe Prelude.Text, -- | Defines the Apache Airflow logs to send to CloudWatch Logs. loggingConfiguration :: Prelude.Maybe LoggingConfigurationInput, -- | The maximum number of workers that you want to run in your environment. -- MWAA scales the number of Apache Airflow workers up to the number you -- specify in the @MaxWorkers@ field. For example, @20@. When there are no -- more tasks running, and no more in the queue, MWAA disposes of the extra -- workers leaving the one worker that is included with your environment, -- or the number you specify in @MinWorkers@. maxWorkers :: Prelude.Maybe Prelude.Natural, -- | The minimum number of workers that you want to run in your environment. -- MWAA scales the number of Apache Airflow workers up to the number you -- specify in the @MaxWorkers@ field. When there are no more tasks running, -- and no more in the queue, MWAA disposes of the extra workers leaving the -- worker count you specify in the @MinWorkers@ field. For example, @2@. minWorkers :: Prelude.Maybe Prelude.Natural, -- | The version of the plugins.zip file on your Amazon S3 bucket. A version -- must be specified each time a plugins.zip file is updated. To learn -- more, see -- . pluginsS3ObjectVersion :: Prelude.Maybe Prelude.Text, -- | The relative path to the @plugins.zip@ file on your Amazon S3 bucket. -- For example, @plugins.zip@. If specified, then the plugins.zip version -- is required. To learn more, see -- . pluginsS3Path :: Prelude.Maybe Prelude.Text, -- | The version of the requirements.txt file on your Amazon S3 bucket. A -- version must be specified each time a requirements.txt file is updated. -- To learn more, see -- . requirementsS3ObjectVersion :: Prelude.Maybe Prelude.Text, -- | The relative path to the @requirements.txt@ file on your Amazon S3 -- bucket. For example, @requirements.txt@. If specified, then a file -- version is required. To learn more, see -- . requirementsS3Path :: Prelude.Maybe Prelude.Text, -- | The number of Apache Airflow schedulers to run in your environment. -- Valid values: -- -- - v2 - Accepts between 2 to 5. Defaults to 2. -- -- - v1 - Accepts 1. schedulers :: Prelude.Maybe Prelude.Int, -- | The key-value tag pairs you want to associate to your environment. For -- example, @\"Environment\": \"Staging\"@. To learn more, see -- . tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text), -- | The Apache Airflow /Web server/ access mode. To learn more, see -- . webserverAccessMode :: Prelude.Maybe WebserverAccessMode, -- | The day and time of the week in Coordinated Universal Time (UTC) 24-hour -- standard time to start weekly maintenance updates of your environment in -- the following format: @DAY:HH:MM@. For example: @TUE:03:30@. You can -- specify a start time in 30 minute increments only. weeklyMaintenanceWindowStart :: Prelude.Maybe Prelude.Text, -- | The relative path to the DAGs folder on your Amazon S3 bucket. For -- example, @dags@. To learn more, see -- . dagS3Path :: Prelude.Text, -- | The Amazon Resource Name (ARN) of the execution role for your -- environment. An execution role is an Amazon Web Services Identity and -- Access Management (IAM) role that grants MWAA permission to access -- Amazon Web Services services and resources used by your environment. For -- example, @arn:aws:iam::123456789:role\/my-execution-role@. To learn -- more, see -- . executionRoleArn :: Prelude.Text, -- | The name of the Amazon MWAA environment. For example, -- @MyMWAAEnvironment@. name :: Prelude.Text, -- | The VPC networking components used to secure and enable network traffic -- between the Amazon Web Services resources for your environment. To learn -- more, see -- . networkConfiguration :: NetworkConfiguration, -- | The Amazon Resource Name (ARN) of the Amazon S3 bucket where your DAG -- code and supporting files are stored. For example, -- @arn:aws:s3:::my-airflow-bucket-unique-name@. To learn more, see -- . sourceBucketArn :: Prelude.Text } deriving (Prelude.Eq, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'CreateEnvironment' 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: -- -- 'airflowConfigurationOptions', 'createEnvironment_airflowConfigurationOptions' - A list of key-value pairs containing the Apache Airflow configuration -- options you want to attach to your environment. To learn more, see -- . -- -- 'airflowVersion', 'createEnvironment_airflowVersion' - The Apache Airflow version for your environment. If no value is -- specified, it defaults to the latest version. Valid values: @1.10.12@, -- @2.0.2@, @2.2.2@, and @2.4.3@. For more information, see -- . -- -- 'environmentClass', 'createEnvironment_environmentClass' - The environment class type. Valid values: @mw1.small@, @mw1.medium@, -- @mw1.large@. To learn more, see -- . -- -- 'kmsKey', 'createEnvironment_kmsKey' - The Amazon Web Services Key Management Service (KMS) key to encrypt the -- data in your environment. You can use an Amazon Web Services owned CMK, -- or a Customer managed CMK (advanced). To learn more, see -- . -- -- 'loggingConfiguration', 'createEnvironment_loggingConfiguration' - Defines the Apache Airflow logs to send to CloudWatch Logs. -- -- 'maxWorkers', 'createEnvironment_maxWorkers' - The maximum number of workers that you want to run in your environment. -- MWAA scales the number of Apache Airflow workers up to the number you -- specify in the @MaxWorkers@ field. For example, @20@. When there are no -- more tasks running, and no more in the queue, MWAA disposes of the extra -- workers leaving the one worker that is included with your environment, -- or the number you specify in @MinWorkers@. -- -- 'minWorkers', 'createEnvironment_minWorkers' - The minimum number of workers that you want to run in your environment. -- MWAA scales the number of Apache Airflow workers up to the number you -- specify in the @MaxWorkers@ field. When there are no more tasks running, -- and no more in the queue, MWAA disposes of the extra workers leaving the -- worker count you specify in the @MinWorkers@ field. For example, @2@. -- -- 'pluginsS3ObjectVersion', 'createEnvironment_pluginsS3ObjectVersion' - The version of the plugins.zip file on your Amazon S3 bucket. A version -- must be specified each time a plugins.zip file is updated. To learn -- more, see -- . -- -- 'pluginsS3Path', 'createEnvironment_pluginsS3Path' - The relative path to the @plugins.zip@ file on your Amazon S3 bucket. -- For example, @plugins.zip@. If specified, then the plugins.zip version -- is required. To learn more, see -- . -- -- 'requirementsS3ObjectVersion', 'createEnvironment_requirementsS3ObjectVersion' - The version of the requirements.txt file on your Amazon S3 bucket. A -- version must be specified each time a requirements.txt file is updated. -- To learn more, see -- . -- -- 'requirementsS3Path', 'createEnvironment_requirementsS3Path' - The relative path to the @requirements.txt@ file on your Amazon S3 -- bucket. For example, @requirements.txt@. If specified, then a file -- version is required. To learn more, see -- . -- -- 'schedulers', 'createEnvironment_schedulers' - The number of Apache Airflow schedulers to run in your environment. -- Valid values: -- -- - v2 - Accepts between 2 to 5. Defaults to 2. -- -- - v1 - Accepts 1. -- -- 'tags', 'createEnvironment_tags' - The key-value tag pairs you want to associate to your environment. For -- example, @\"Environment\": \"Staging\"@. To learn more, see -- . -- -- 'webserverAccessMode', 'createEnvironment_webserverAccessMode' - The Apache Airflow /Web server/ access mode. To learn more, see -- . -- -- 'weeklyMaintenanceWindowStart', 'createEnvironment_weeklyMaintenanceWindowStart' - The day and time of the week in Coordinated Universal Time (UTC) 24-hour -- standard time to start weekly maintenance updates of your environment in -- the following format: @DAY:HH:MM@. For example: @TUE:03:30@. You can -- specify a start time in 30 minute increments only. -- -- 'dagS3Path', 'createEnvironment_dagS3Path' - The relative path to the DAGs folder on your Amazon S3 bucket. For -- example, @dags@. To learn more, see -- . -- -- 'executionRoleArn', 'createEnvironment_executionRoleArn' - The Amazon Resource Name (ARN) of the execution role for your -- environment. An execution role is an Amazon Web Services Identity and -- Access Management (IAM) role that grants MWAA permission to access -- Amazon Web Services services and resources used by your environment. For -- example, @arn:aws:iam::123456789:role\/my-execution-role@. To learn -- more, see -- . -- -- 'name', 'createEnvironment_name' - The name of the Amazon MWAA environment. For example, -- @MyMWAAEnvironment@. -- -- 'networkConfiguration', 'createEnvironment_networkConfiguration' - The VPC networking components used to secure and enable network traffic -- between the Amazon Web Services resources for your environment. To learn -- more, see -- . -- -- 'sourceBucketArn', 'createEnvironment_sourceBucketArn' - The Amazon Resource Name (ARN) of the Amazon S3 bucket where your DAG -- code and supporting files are stored. For example, -- @arn:aws:s3:::my-airflow-bucket-unique-name@. To learn more, see -- . newCreateEnvironment :: -- | 'dagS3Path' Prelude.Text -> -- | 'executionRoleArn' Prelude.Text -> -- | 'name' Prelude.Text -> -- | 'networkConfiguration' NetworkConfiguration -> -- | 'sourceBucketArn' Prelude.Text -> CreateEnvironment newCreateEnvironment pDagS3Path_ pExecutionRoleArn_ pName_ pNetworkConfiguration_ pSourceBucketArn_ = CreateEnvironment' { airflowConfigurationOptions = Prelude.Nothing, airflowVersion = Prelude.Nothing, environmentClass = Prelude.Nothing, kmsKey = Prelude.Nothing, loggingConfiguration = Prelude.Nothing, maxWorkers = Prelude.Nothing, minWorkers = Prelude.Nothing, pluginsS3ObjectVersion = Prelude.Nothing, pluginsS3Path = Prelude.Nothing, requirementsS3ObjectVersion = Prelude.Nothing, requirementsS3Path = Prelude.Nothing, schedulers = Prelude.Nothing, tags = Prelude.Nothing, webserverAccessMode = Prelude.Nothing, weeklyMaintenanceWindowStart = Prelude.Nothing, dagS3Path = pDagS3Path_, executionRoleArn = pExecutionRoleArn_, name = pName_, networkConfiguration = pNetworkConfiguration_, sourceBucketArn = pSourceBucketArn_ } -- | A list of key-value pairs containing the Apache Airflow configuration -- options you want to attach to your environment. To learn more, see -- . createEnvironment_airflowConfigurationOptions :: Lens.Lens' CreateEnvironment (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text)) createEnvironment_airflowConfigurationOptions = Lens.lens (\CreateEnvironment' {airflowConfigurationOptions} -> airflowConfigurationOptions) (\s@CreateEnvironment' {} a -> s {airflowConfigurationOptions = a} :: CreateEnvironment) Prelude.. Lens.mapping (Data._Sensitive Prelude.. Lens.coerced) -- | The Apache Airflow version for your environment. If no value is -- specified, it defaults to the latest version. Valid values: @1.10.12@, -- @2.0.2@, @2.2.2@, and @2.4.3@. For more information, see -- . createEnvironment_airflowVersion :: Lens.Lens' CreateEnvironment (Prelude.Maybe Prelude.Text) createEnvironment_airflowVersion = Lens.lens (\CreateEnvironment' {airflowVersion} -> airflowVersion) (\s@CreateEnvironment' {} a -> s {airflowVersion = a} :: CreateEnvironment) -- | The environment class type. Valid values: @mw1.small@, @mw1.medium@, -- @mw1.large@. To learn more, see -- . createEnvironment_environmentClass :: Lens.Lens' CreateEnvironment (Prelude.Maybe Prelude.Text) createEnvironment_environmentClass = Lens.lens (\CreateEnvironment' {environmentClass} -> environmentClass) (\s@CreateEnvironment' {} a -> s {environmentClass = a} :: CreateEnvironment) -- | The Amazon Web Services Key Management Service (KMS) key to encrypt the -- data in your environment. You can use an Amazon Web Services owned CMK, -- or a Customer managed CMK (advanced). To learn more, see -- . createEnvironment_kmsKey :: Lens.Lens' CreateEnvironment (Prelude.Maybe Prelude.Text) createEnvironment_kmsKey = Lens.lens (\CreateEnvironment' {kmsKey} -> kmsKey) (\s@CreateEnvironment' {} a -> s {kmsKey = a} :: CreateEnvironment) -- | Defines the Apache Airflow logs to send to CloudWatch Logs. createEnvironment_loggingConfiguration :: Lens.Lens' CreateEnvironment (Prelude.Maybe LoggingConfigurationInput) createEnvironment_loggingConfiguration = Lens.lens (\CreateEnvironment' {loggingConfiguration} -> loggingConfiguration) (\s@CreateEnvironment' {} a -> s {loggingConfiguration = a} :: CreateEnvironment) -- | The maximum number of workers that you want to run in your environment. -- MWAA scales the number of Apache Airflow workers up to the number you -- specify in the @MaxWorkers@ field. For example, @20@. When there are no -- more tasks running, and no more in the queue, MWAA disposes of the extra -- workers leaving the one worker that is included with your environment, -- or the number you specify in @MinWorkers@. createEnvironment_maxWorkers :: Lens.Lens' CreateEnvironment (Prelude.Maybe Prelude.Natural) createEnvironment_maxWorkers = Lens.lens (\CreateEnvironment' {maxWorkers} -> maxWorkers) (\s@CreateEnvironment' {} a -> s {maxWorkers = a} :: CreateEnvironment) -- | The minimum number of workers that you want to run in your environment. -- MWAA scales the number of Apache Airflow workers up to the number you -- specify in the @MaxWorkers@ field. When there are no more tasks running, -- and no more in the queue, MWAA disposes of the extra workers leaving the -- worker count you specify in the @MinWorkers@ field. For example, @2@. createEnvironment_minWorkers :: Lens.Lens' CreateEnvironment (Prelude.Maybe Prelude.Natural) createEnvironment_minWorkers = Lens.lens (\CreateEnvironment' {minWorkers} -> minWorkers) (\s@CreateEnvironment' {} a -> s {minWorkers = a} :: CreateEnvironment) -- | The version of the plugins.zip file on your Amazon S3 bucket. A version -- must be specified each time a plugins.zip file is updated. To learn -- more, see -- . createEnvironment_pluginsS3ObjectVersion :: Lens.Lens' CreateEnvironment (Prelude.Maybe Prelude.Text) createEnvironment_pluginsS3ObjectVersion = Lens.lens (\CreateEnvironment' {pluginsS3ObjectVersion} -> pluginsS3ObjectVersion) (\s@CreateEnvironment' {} a -> s {pluginsS3ObjectVersion = a} :: CreateEnvironment) -- | The relative path to the @plugins.zip@ file on your Amazon S3 bucket. -- For example, @plugins.zip@. If specified, then the plugins.zip version -- is required. To learn more, see -- . createEnvironment_pluginsS3Path :: Lens.Lens' CreateEnvironment (Prelude.Maybe Prelude.Text) createEnvironment_pluginsS3Path = Lens.lens (\CreateEnvironment' {pluginsS3Path} -> pluginsS3Path) (\s@CreateEnvironment' {} a -> s {pluginsS3Path = a} :: CreateEnvironment) -- | The version of the requirements.txt file on your Amazon S3 bucket. A -- version must be specified each time a requirements.txt file is updated. -- To learn more, see -- . createEnvironment_requirementsS3ObjectVersion :: Lens.Lens' CreateEnvironment (Prelude.Maybe Prelude.Text) createEnvironment_requirementsS3ObjectVersion = Lens.lens (\CreateEnvironment' {requirementsS3ObjectVersion} -> requirementsS3ObjectVersion) (\s@CreateEnvironment' {} a -> s {requirementsS3ObjectVersion = a} :: CreateEnvironment) -- | The relative path to the @requirements.txt@ file on your Amazon S3 -- bucket. For example, @requirements.txt@. If specified, then a file -- version is required. To learn more, see -- . createEnvironment_requirementsS3Path :: Lens.Lens' CreateEnvironment (Prelude.Maybe Prelude.Text) createEnvironment_requirementsS3Path = Lens.lens (\CreateEnvironment' {requirementsS3Path} -> requirementsS3Path) (\s@CreateEnvironment' {} a -> s {requirementsS3Path = a} :: CreateEnvironment) -- | The number of Apache Airflow schedulers to run in your environment. -- Valid values: -- -- - v2 - Accepts between 2 to 5. Defaults to 2. -- -- - v1 - Accepts 1. createEnvironment_schedulers :: Lens.Lens' CreateEnvironment (Prelude.Maybe Prelude.Int) createEnvironment_schedulers = Lens.lens (\CreateEnvironment' {schedulers} -> schedulers) (\s@CreateEnvironment' {} a -> s {schedulers = a} :: CreateEnvironment) -- | The key-value tag pairs you want to associate to your environment. For -- example, @\"Environment\": \"Staging\"@. To learn more, see -- . createEnvironment_tags :: Lens.Lens' CreateEnvironment (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text)) createEnvironment_tags = Lens.lens (\CreateEnvironment' {tags} -> tags) (\s@CreateEnvironment' {} a -> s {tags = a} :: CreateEnvironment) Prelude.. Lens.mapping Lens.coerced -- | The Apache Airflow /Web server/ access mode. To learn more, see -- . createEnvironment_webserverAccessMode :: Lens.Lens' CreateEnvironment (Prelude.Maybe WebserverAccessMode) createEnvironment_webserverAccessMode = Lens.lens (\CreateEnvironment' {webserverAccessMode} -> webserverAccessMode) (\s@CreateEnvironment' {} a -> s {webserverAccessMode = a} :: CreateEnvironment) -- | The day and time of the week in Coordinated Universal Time (UTC) 24-hour -- standard time to start weekly maintenance updates of your environment in -- the following format: @DAY:HH:MM@. For example: @TUE:03:30@. You can -- specify a start time in 30 minute increments only. createEnvironment_weeklyMaintenanceWindowStart :: Lens.Lens' CreateEnvironment (Prelude.Maybe Prelude.Text) createEnvironment_weeklyMaintenanceWindowStart = Lens.lens (\CreateEnvironment' {weeklyMaintenanceWindowStart} -> weeklyMaintenanceWindowStart) (\s@CreateEnvironment' {} a -> s {weeklyMaintenanceWindowStart = a} :: CreateEnvironment) -- | The relative path to the DAGs folder on your Amazon S3 bucket. For -- example, @dags@. To learn more, see -- . createEnvironment_dagS3Path :: Lens.Lens' CreateEnvironment Prelude.Text createEnvironment_dagS3Path = Lens.lens (\CreateEnvironment' {dagS3Path} -> dagS3Path) (\s@CreateEnvironment' {} a -> s {dagS3Path = a} :: CreateEnvironment) -- | The Amazon Resource Name (ARN) of the execution role for your -- environment. An execution role is an Amazon Web Services Identity and -- Access Management (IAM) role that grants MWAA permission to access -- Amazon Web Services services and resources used by your environment. For -- example, @arn:aws:iam::123456789:role\/my-execution-role@. To learn -- more, see -- . createEnvironment_executionRoleArn :: Lens.Lens' CreateEnvironment Prelude.Text createEnvironment_executionRoleArn = Lens.lens (\CreateEnvironment' {executionRoleArn} -> executionRoleArn) (\s@CreateEnvironment' {} a -> s {executionRoleArn = a} :: CreateEnvironment) -- | The name of the Amazon MWAA environment. For example, -- @MyMWAAEnvironment@. createEnvironment_name :: Lens.Lens' CreateEnvironment Prelude.Text createEnvironment_name = Lens.lens (\CreateEnvironment' {name} -> name) (\s@CreateEnvironment' {} a -> s {name = a} :: CreateEnvironment) -- | The VPC networking components used to secure and enable network traffic -- between the Amazon Web Services resources for your environment. To learn -- more, see -- . createEnvironment_networkConfiguration :: Lens.Lens' CreateEnvironment NetworkConfiguration createEnvironment_networkConfiguration = Lens.lens (\CreateEnvironment' {networkConfiguration} -> networkConfiguration) (\s@CreateEnvironment' {} a -> s {networkConfiguration = a} :: CreateEnvironment) -- | The Amazon Resource Name (ARN) of the Amazon S3 bucket where your DAG -- code and supporting files are stored. For example, -- @arn:aws:s3:::my-airflow-bucket-unique-name@. To learn more, see -- . createEnvironment_sourceBucketArn :: Lens.Lens' CreateEnvironment Prelude.Text createEnvironment_sourceBucketArn = Lens.lens (\CreateEnvironment' {sourceBucketArn} -> sourceBucketArn) (\s@CreateEnvironment' {} a -> s {sourceBucketArn = a} :: CreateEnvironment) instance Core.AWSRequest CreateEnvironment where type AWSResponse CreateEnvironment = CreateEnvironmentResponse request overrides = Request.putJSON (overrides defaultService) response = Response.receiveJSON ( \s h x -> CreateEnvironmentResponse' Prelude.<$> (x Data..?> "Arn") Prelude.<*> (Prelude.pure (Prelude.fromEnum s)) ) instance Prelude.Hashable CreateEnvironment where hashWithSalt _salt CreateEnvironment' {..} = _salt `Prelude.hashWithSalt` airflowConfigurationOptions `Prelude.hashWithSalt` airflowVersion `Prelude.hashWithSalt` environmentClass `Prelude.hashWithSalt` kmsKey `Prelude.hashWithSalt` loggingConfiguration `Prelude.hashWithSalt` maxWorkers `Prelude.hashWithSalt` minWorkers `Prelude.hashWithSalt` pluginsS3ObjectVersion `Prelude.hashWithSalt` pluginsS3Path `Prelude.hashWithSalt` requirementsS3ObjectVersion `Prelude.hashWithSalt` requirementsS3Path `Prelude.hashWithSalt` schedulers `Prelude.hashWithSalt` tags `Prelude.hashWithSalt` webserverAccessMode `Prelude.hashWithSalt` weeklyMaintenanceWindowStart `Prelude.hashWithSalt` dagS3Path `Prelude.hashWithSalt` executionRoleArn `Prelude.hashWithSalt` name `Prelude.hashWithSalt` networkConfiguration `Prelude.hashWithSalt` sourceBucketArn instance Prelude.NFData CreateEnvironment where rnf CreateEnvironment' {..} = Prelude.rnf airflowConfigurationOptions `Prelude.seq` Prelude.rnf airflowVersion `Prelude.seq` Prelude.rnf environmentClass `Prelude.seq` Prelude.rnf kmsKey `Prelude.seq` Prelude.rnf loggingConfiguration `Prelude.seq` Prelude.rnf maxWorkers `Prelude.seq` Prelude.rnf minWorkers `Prelude.seq` Prelude.rnf pluginsS3ObjectVersion `Prelude.seq` Prelude.rnf pluginsS3Path `Prelude.seq` Prelude.rnf requirementsS3ObjectVersion `Prelude.seq` Prelude.rnf requirementsS3Path `Prelude.seq` Prelude.rnf schedulers `Prelude.seq` Prelude.rnf tags `Prelude.seq` Prelude.rnf webserverAccessMode `Prelude.seq` Prelude.rnf weeklyMaintenanceWindowStart `Prelude.seq` Prelude.rnf dagS3Path `Prelude.seq` Prelude.rnf executionRoleArn `Prelude.seq` Prelude.rnf name `Prelude.seq` Prelude.rnf networkConfiguration `Prelude.seq` Prelude.rnf sourceBucketArn instance Data.ToHeaders CreateEnvironment where toHeaders = Prelude.const ( Prelude.mconcat [ "Content-Type" Data.=# ( "application/x-amz-json-1.1" :: Prelude.ByteString ) ] ) instance Data.ToJSON CreateEnvironment where toJSON CreateEnvironment' {..} = Data.object ( Prelude.catMaybes [ ("AirflowConfigurationOptions" Data..=) Prelude.<$> airflowConfigurationOptions, ("AirflowVersion" Data..=) Prelude.<$> airflowVersion, ("EnvironmentClass" Data..=) Prelude.<$> environmentClass, ("KmsKey" Data..=) Prelude.<$> kmsKey, ("LoggingConfiguration" Data..=) Prelude.<$> loggingConfiguration, ("MaxWorkers" Data..=) Prelude.<$> maxWorkers, ("MinWorkers" Data..=) Prelude.<$> minWorkers, ("PluginsS3ObjectVersion" Data..=) Prelude.<$> pluginsS3ObjectVersion, ("PluginsS3Path" Data..=) Prelude.<$> pluginsS3Path, ("RequirementsS3ObjectVersion" Data..=) Prelude.<$> requirementsS3ObjectVersion, ("RequirementsS3Path" Data..=) Prelude.<$> requirementsS3Path, ("Schedulers" Data..=) Prelude.<$> schedulers, ("Tags" Data..=) Prelude.<$> tags, ("WebserverAccessMode" Data..=) Prelude.<$> webserverAccessMode, ("WeeklyMaintenanceWindowStart" Data..=) Prelude.<$> weeklyMaintenanceWindowStart, Prelude.Just ("DagS3Path" Data..= dagS3Path), Prelude.Just ("ExecutionRoleArn" Data..= executionRoleArn), Prelude.Just ( "NetworkConfiguration" Data..= networkConfiguration ), Prelude.Just ("SourceBucketArn" Data..= sourceBucketArn) ] ) instance Data.ToPath CreateEnvironment where toPath CreateEnvironment' {..} = Prelude.mconcat ["/environments/", Data.toBS name] instance Data.ToQuery CreateEnvironment where toQuery = Prelude.const Prelude.mempty -- | /See:/ 'newCreateEnvironmentResponse' smart constructor. data CreateEnvironmentResponse = CreateEnvironmentResponse' { -- | The Amazon Resource Name (ARN) returned in the response for the -- environment. arn :: Prelude.Maybe Prelude.Text, -- | The response's http status code. httpStatus :: Prelude.Int } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'CreateEnvironmentResponse' 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: -- -- 'arn', 'createEnvironmentResponse_arn' - The Amazon Resource Name (ARN) returned in the response for the -- environment. -- -- 'httpStatus', 'createEnvironmentResponse_httpStatus' - The response's http status code. newCreateEnvironmentResponse :: -- | 'httpStatus' Prelude.Int -> CreateEnvironmentResponse newCreateEnvironmentResponse pHttpStatus_ = CreateEnvironmentResponse' { arn = Prelude.Nothing, httpStatus = pHttpStatus_ } -- | The Amazon Resource Name (ARN) returned in the response for the -- environment. createEnvironmentResponse_arn :: Lens.Lens' CreateEnvironmentResponse (Prelude.Maybe Prelude.Text) createEnvironmentResponse_arn = Lens.lens (\CreateEnvironmentResponse' {arn} -> arn) (\s@CreateEnvironmentResponse' {} a -> s {arn = a} :: CreateEnvironmentResponse) -- | The response's http status code. createEnvironmentResponse_httpStatus :: Lens.Lens' CreateEnvironmentResponse Prelude.Int createEnvironmentResponse_httpStatus = Lens.lens (\CreateEnvironmentResponse' {httpStatus} -> httpStatus) (\s@CreateEnvironmentResponse' {} a -> s {httpStatus = a} :: CreateEnvironmentResponse) instance Prelude.NFData CreateEnvironmentResponse where rnf CreateEnvironmentResponse' {..} = Prelude.rnf arn `Prelude.seq` Prelude.rnf httpStatus