packages feed

gogol-composer 0.5.0 → 1.0.0

raw patch · 48 files changed

+8489/−3703 lines, 48 filesdep −basedep ~gogol-coresetup-changed

Dependencies removed: base

Dependency ranges changed: gogol-core

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`0.5.0`+`1.0.0`   ## Description
Setup.hs view
@@ -1,2 +1,3 @@-import           Distribution.Simple+import Distribution.Simple+ main = defaultMain
+ gen/Gogol/Composer.hs view
@@ -0,0 +1,538 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Manages Apache Airflow environments on Google Cloud Platform.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference>+module Gogol.Composer+  ( -- * Configuration+    composerService,++    -- * OAuth Scopes+    CloudPlatform'FullControl,++    -- * Resources++    -- ** composer.projects.locations.environments.checkUpgrade+    ComposerProjectsLocationsEnvironmentsCheckUpgradeResource,+    ComposerProjectsLocationsEnvironmentsCheckUpgrade (..),+    newComposerProjectsLocationsEnvironmentsCheckUpgrade,++    -- ** composer.projects.locations.environments.create+    ComposerProjectsLocationsEnvironmentsCreateResource,+    ComposerProjectsLocationsEnvironmentsCreate (..),+    newComposerProjectsLocationsEnvironmentsCreate,++    -- ** composer.projects.locations.environments.databaseFailover+    ComposerProjectsLocationsEnvironmentsDatabaseFailoverResource,+    ComposerProjectsLocationsEnvironmentsDatabaseFailover (..),+    newComposerProjectsLocationsEnvironmentsDatabaseFailover,++    -- ** composer.projects.locations.environments.delete+    ComposerProjectsLocationsEnvironmentsDeleteResource,+    ComposerProjectsLocationsEnvironmentsDelete (..),+    newComposerProjectsLocationsEnvironmentsDelete,++    -- ** composer.projects.locations.environments.executeAirflowCommand+    ComposerProjectsLocationsEnvironmentsExecuteAirflowCommandResource,+    ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand (..),+    newComposerProjectsLocationsEnvironmentsExecuteAirflowCommand,++    -- ** composer.projects.locations.environments.fetchDatabaseProperties+    ComposerProjectsLocationsEnvironmentsFetchDatabasePropertiesResource,+    ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties (..),+    newComposerProjectsLocationsEnvironmentsFetchDatabaseProperties,++    -- ** composer.projects.locations.environments.get+    ComposerProjectsLocationsEnvironmentsGetResource,+    ComposerProjectsLocationsEnvironmentsGet (..),+    newComposerProjectsLocationsEnvironmentsGet,++    -- ** composer.projects.locations.environments.list+    ComposerProjectsLocationsEnvironmentsListResource,+    ComposerProjectsLocationsEnvironmentsList (..),+    newComposerProjectsLocationsEnvironmentsList,++    -- ** composer.projects.locations.environments.loadSnapshot+    ComposerProjectsLocationsEnvironmentsLoadSnapshotResource,+    ComposerProjectsLocationsEnvironmentsLoadSnapshot (..),+    newComposerProjectsLocationsEnvironmentsLoadSnapshot,++    -- ** composer.projects.locations.environments.patch+    ComposerProjectsLocationsEnvironmentsPatchResource,+    ComposerProjectsLocationsEnvironmentsPatch (..),+    newComposerProjectsLocationsEnvironmentsPatch,++    -- ** composer.projects.locations.environments.pollAirflowCommand+    ComposerProjectsLocationsEnvironmentsPollAirflowCommandResource,+    ComposerProjectsLocationsEnvironmentsPollAirflowCommand (..),+    newComposerProjectsLocationsEnvironmentsPollAirflowCommand,++    -- ** composer.projects.locations.environments.saveSnapshot+    ComposerProjectsLocationsEnvironmentsSaveSnapshotResource,+    ComposerProjectsLocationsEnvironmentsSaveSnapshot (..),+    newComposerProjectsLocationsEnvironmentsSaveSnapshot,++    -- ** composer.projects.locations.environments.stopAirflowCommand+    ComposerProjectsLocationsEnvironmentsStopAirflowCommandResource,+    ComposerProjectsLocationsEnvironmentsStopAirflowCommand (..),+    newComposerProjectsLocationsEnvironmentsStopAirflowCommand,++    -- ** composer.projects.locations.environments.userWorkloadsConfigMaps.create+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreateResource,+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate,++    -- ** composer.projects.locations.environments.userWorkloadsConfigMaps.delete+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDeleteResource,+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete,++    -- ** composer.projects.locations.environments.userWorkloadsConfigMaps.get+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGetResource,+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet,++    -- ** composer.projects.locations.environments.userWorkloadsConfigMaps.list+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsListResource,+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList,++    -- ** composer.projects.locations.environments.userWorkloadsConfigMaps.update+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdateResource,+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate,++    -- ** composer.projects.locations.environments.userWorkloadsSecrets.create+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreateResource,+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate,++    -- ** composer.projects.locations.environments.userWorkloadsSecrets.delete+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDeleteResource,+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete,++    -- ** composer.projects.locations.environments.userWorkloadsSecrets.get+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGetResource,+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet,++    -- ** composer.projects.locations.environments.userWorkloadsSecrets.list+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsListResource,+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList,++    -- ** composer.projects.locations.environments.userWorkloadsSecrets.update+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdateResource,+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate,++    -- ** composer.projects.locations.environments.workloads.list+    ComposerProjectsLocationsEnvironmentsWorkloadsListResource,+    ComposerProjectsLocationsEnvironmentsWorkloadsList (..),+    newComposerProjectsLocationsEnvironmentsWorkloadsList,++    -- ** composer.projects.locations.imageVersions.list+    ComposerProjectsLocationsImageVersionsListResource,+    ComposerProjectsLocationsImageVersionsList (..),+    newComposerProjectsLocationsImageVersionsList,++    -- ** composer.projects.locations.operations.delete+    ComposerProjectsLocationsOperationsDeleteResource,+    ComposerProjectsLocationsOperationsDelete (..),+    newComposerProjectsLocationsOperationsDelete,++    -- ** composer.projects.locations.operations.get+    ComposerProjectsLocationsOperationsGetResource,+    ComposerProjectsLocationsOperationsGet (..),+    newComposerProjectsLocationsOperationsGet,++    -- ** composer.projects.locations.operations.list+    ComposerProjectsLocationsOperationsListResource,+    ComposerProjectsLocationsOperationsList (..),+    newComposerProjectsLocationsOperationsList,++    -- * Types++    -- ** Xgafv+    Xgafv (..),++    -- ** AirflowMetadataRetentionPolicyConfig+    AirflowMetadataRetentionPolicyConfig (..),+    newAirflowMetadataRetentionPolicyConfig,++    -- ** AirflowMetadataRetentionPolicyConfig_RetentionMode+    AirflowMetadataRetentionPolicyConfig_RetentionMode (..),++    -- ** AllowedIpRange+    AllowedIpRange (..),+    newAllowedIpRange,++    -- ** CheckUpgradeRequest+    CheckUpgradeRequest (..),+    newCheckUpgradeRequest,++    -- ** CheckUpgradeResponse+    CheckUpgradeResponse (..),+    newCheckUpgradeResponse,++    -- ** CheckUpgradeResponse_ContainsPypiModulesConflict+    CheckUpgradeResponse_ContainsPypiModulesConflict (..),++    -- ** CheckUpgradeResponse_PypiDependencies+    CheckUpgradeResponse_PypiDependencies (..),+    newCheckUpgradeResponse_PypiDependencies,++    -- ** CidrBlock+    CidrBlock (..),+    newCidrBlock,++    -- ** CloudDataLineageIntegration+    CloudDataLineageIntegration (..),+    newCloudDataLineageIntegration,++    -- ** ComposerWorkload+    ComposerWorkload (..),+    newComposerWorkload,++    -- ** ComposerWorkload_Type+    ComposerWorkload_Type (..),++    -- ** ComposerWorkloadStatus+    ComposerWorkloadStatus (..),+    newComposerWorkloadStatus,++    -- ** ComposerWorkloadStatus_State+    ComposerWorkloadStatus_State (..),++    -- ** DagProcessorResource+    DagProcessorResource (..),+    newDagProcessorResource,++    -- ** DataRetentionConfig+    DataRetentionConfig (..),+    newDataRetentionConfig,++    -- ** DatabaseConfig+    DatabaseConfig (..),+    newDatabaseConfig,++    -- ** DatabaseFailoverRequest+    DatabaseFailoverRequest (..),+    newDatabaseFailoverRequest,++    -- ** DatabaseFailoverResponse+    DatabaseFailoverResponse (..),+    newDatabaseFailoverResponse,++    -- ** Date+    Date (..),+    newDate,++    -- ** Empty+    Empty (..),+    newEmpty,++    -- ** EncryptionConfig+    EncryptionConfig (..),+    newEncryptionConfig,++    -- ** Environment+    Environment (..),+    newEnvironment,++    -- ** Environment_Labels+    Environment_Labels (..),+    newEnvironment_Labels,++    -- ** Environment_State+    Environment_State (..),++    -- ** EnvironmentConfig+    EnvironmentConfig (..),+    newEnvironmentConfig,++    -- ** EnvironmentConfig_EnvironmentSize+    EnvironmentConfig_EnvironmentSize (..),++    -- ** EnvironmentConfig_ResilienceMode+    EnvironmentConfig_ResilienceMode (..),++    -- ** ExecuteAirflowCommandRequest+    ExecuteAirflowCommandRequest (..),+    newExecuteAirflowCommandRequest,++    -- ** ExecuteAirflowCommandResponse+    ExecuteAirflowCommandResponse (..),+    newExecuteAirflowCommandResponse,++    -- ** ExitInfo+    ExitInfo (..),+    newExitInfo,++    -- ** FetchDatabasePropertiesResponse+    FetchDatabasePropertiesResponse (..),+    newFetchDatabasePropertiesResponse,++    -- ** IPAllocationPolicy+    IPAllocationPolicy (..),+    newIPAllocationPolicy,++    -- ** ImageVersion+    ImageVersion (..),+    newImageVersion,++    -- ** Line+    Line (..),+    newLine,++    -- ** ListEnvironmentsResponse+    ListEnvironmentsResponse (..),+    newListEnvironmentsResponse,++    -- ** ListImageVersionsResponse+    ListImageVersionsResponse (..),+    newListImageVersionsResponse,++    -- ** ListOperationsResponse+    ListOperationsResponse (..),+    newListOperationsResponse,++    -- ** ListUserWorkloadsConfigMapsResponse+    ListUserWorkloadsConfigMapsResponse (..),+    newListUserWorkloadsConfigMapsResponse,++    -- ** ListUserWorkloadsSecretsResponse+    ListUserWorkloadsSecretsResponse (..),+    newListUserWorkloadsSecretsResponse,++    -- ** ListWorkloadsResponse+    ListWorkloadsResponse (..),+    newListWorkloadsResponse,++    -- ** LoadSnapshotRequest+    LoadSnapshotRequest (..),+    newLoadSnapshotRequest,++    -- ** LoadSnapshotResponse+    LoadSnapshotResponse (..),+    newLoadSnapshotResponse,++    -- ** MaintenanceWindow+    MaintenanceWindow (..),+    newMaintenanceWindow,++    -- ** MasterAuthorizedNetworksConfig+    MasterAuthorizedNetworksConfig (..),+    newMasterAuthorizedNetworksConfig,++    -- ** NetworkingConfig+    NetworkingConfig (..),+    newNetworkingConfig,++    -- ** NetworkingConfig_ConnectionType+    NetworkingConfig_ConnectionType (..),++    -- ** NodeConfig+    NodeConfig (..),+    newNodeConfig,++    -- ** Operation+    Operation (..),+    newOperation,++    -- ** Operation_Metadata+    Operation_Metadata (..),+    newOperation_Metadata,++    -- ** Operation_Response+    Operation_Response (..),+    newOperation_Response,++    -- ** OperationMetadata+    OperationMetadata (..),+    newOperationMetadata,++    -- ** OperationMetadata_OperationType+    OperationMetadata_OperationType (..),++    -- ** OperationMetadata_State+    OperationMetadata_State (..),++    -- ** PollAirflowCommandRequest+    PollAirflowCommandRequest (..),+    newPollAirflowCommandRequest,++    -- ** PollAirflowCommandResponse+    PollAirflowCommandResponse (..),+    newPollAirflowCommandResponse,++    -- ** PrivateClusterConfig+    PrivateClusterConfig (..),+    newPrivateClusterConfig,++    -- ** PrivateEnvironmentConfig+    PrivateEnvironmentConfig (..),+    newPrivateEnvironmentConfig,++    -- ** RecoveryConfig+    RecoveryConfig (..),+    newRecoveryConfig,++    -- ** SaveSnapshotRequest+    SaveSnapshotRequest (..),+    newSaveSnapshotRequest,++    -- ** SaveSnapshotResponse+    SaveSnapshotResponse (..),+    newSaveSnapshotResponse,++    -- ** ScheduledSnapshotsConfig+    ScheduledSnapshotsConfig (..),+    newScheduledSnapshotsConfig,++    -- ** SchedulerResource+    SchedulerResource (..),+    newSchedulerResource,++    -- ** SoftwareConfig+    SoftwareConfig (..),+    newSoftwareConfig,++    -- ** SoftwareConfig_AirflowConfigOverrides+    SoftwareConfig_AirflowConfigOverrides (..),+    newSoftwareConfig_AirflowConfigOverrides,++    -- ** SoftwareConfig_EnvVariables+    SoftwareConfig_EnvVariables (..),+    newSoftwareConfig_EnvVariables,++    -- ** SoftwareConfig_PypiPackages+    SoftwareConfig_PypiPackages (..),+    newSoftwareConfig_PypiPackages,++    -- ** SoftwareConfig_WebServerPluginsMode+    SoftwareConfig_WebServerPluginsMode (..),++    -- ** Status+    Status (..),+    newStatus,++    -- ** Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- ** StopAirflowCommandRequest+    StopAirflowCommandRequest (..),+    newStopAirflowCommandRequest,++    -- ** StopAirflowCommandResponse+    StopAirflowCommandResponse (..),+    newStopAirflowCommandResponse,++    -- ** StorageConfig+    StorageConfig (..),+    newStorageConfig,++    -- ** TaskLogsRetentionConfig+    TaskLogsRetentionConfig (..),+    newTaskLogsRetentionConfig,++    -- ** TaskLogsRetentionConfig_StorageMode+    TaskLogsRetentionConfig_StorageMode (..),++    -- ** TriggererResource+    TriggererResource (..),+    newTriggererResource,++    -- ** UserWorkloadsConfigMap+    UserWorkloadsConfigMap (..),+    newUserWorkloadsConfigMap,++    -- ** UserWorkloadsConfigMap_Data+    UserWorkloadsConfigMap_Data (..),+    newUserWorkloadsConfigMap_Data,++    -- ** UserWorkloadsSecret+    UserWorkloadsSecret (..),+    newUserWorkloadsSecret,++    -- ** UserWorkloadsSecret_Data+    UserWorkloadsSecret_Data (..),+    newUserWorkloadsSecret_Data,++    -- ** WebServerConfig+    WebServerConfig (..),+    newWebServerConfig,++    -- ** WebServerNetworkAccessControl+    WebServerNetworkAccessControl (..),+    newWebServerNetworkAccessControl,++    -- ** WebServerResource+    WebServerResource (..),+    newWebServerResource,++    -- ** WorkerResource+    WorkerResource (..),+    newWorkerResource,++    -- ** WorkloadsConfig+    WorkloadsConfig (..),+    newWorkloadsConfig,+  )+where++import Gogol.Composer.Projects.Locations.Environments.CheckUpgrade+import Gogol.Composer.Projects.Locations.Environments.Create+import Gogol.Composer.Projects.Locations.Environments.DatabaseFailover+import Gogol.Composer.Projects.Locations.Environments.Delete+import Gogol.Composer.Projects.Locations.Environments.ExecuteAirflowCommand+import Gogol.Composer.Projects.Locations.Environments.FetchDatabaseProperties+import Gogol.Composer.Projects.Locations.Environments.Get+import Gogol.Composer.Projects.Locations.Environments.List+import Gogol.Composer.Projects.Locations.Environments.LoadSnapshot+import Gogol.Composer.Projects.Locations.Environments.Patch+import Gogol.Composer.Projects.Locations.Environments.PollAirflowCommand+import Gogol.Composer.Projects.Locations.Environments.SaveSnapshot+import Gogol.Composer.Projects.Locations.Environments.StopAirflowCommand+import Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Create+import Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Delete+import Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Get+import Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.List+import Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Update+import Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Create+import Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Delete+import Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Get+import Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.List+import Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Update+import Gogol.Composer.Projects.Locations.Environments.Workloads.List+import Gogol.Composer.Projects.Locations.ImageVersions.List+import Gogol.Composer.Projects.Locations.Operations.Delete+import Gogol.Composer.Projects.Locations.Operations.Get+import Gogol.Composer.Projects.Locations.Operations.List+import Gogol.Composer.Types
+ gen/Gogol/Composer/Internal/Product.hs view
@@ -0,0 +1,3301 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Internal.Product+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.Composer.Internal.Product+  ( -- * AirflowMetadataRetentionPolicyConfig+    AirflowMetadataRetentionPolicyConfig (..),+    newAirflowMetadataRetentionPolicyConfig,++    -- * AllowedIpRange+    AllowedIpRange (..),+    newAllowedIpRange,++    -- * CheckUpgradeRequest+    CheckUpgradeRequest (..),+    newCheckUpgradeRequest,++    -- * CheckUpgradeResponse+    CheckUpgradeResponse (..),+    newCheckUpgradeResponse,++    -- * CheckUpgradeResponse_PypiDependencies+    CheckUpgradeResponse_PypiDependencies (..),+    newCheckUpgradeResponse_PypiDependencies,++    -- * CidrBlock+    CidrBlock (..),+    newCidrBlock,++    -- * CloudDataLineageIntegration+    CloudDataLineageIntegration (..),+    newCloudDataLineageIntegration,++    -- * ComposerWorkload+    ComposerWorkload (..),+    newComposerWorkload,++    -- * ComposerWorkloadStatus+    ComposerWorkloadStatus (..),+    newComposerWorkloadStatus,++    -- * DagProcessorResource+    DagProcessorResource (..),+    newDagProcessorResource,++    -- * DataRetentionConfig+    DataRetentionConfig (..),+    newDataRetentionConfig,++    -- * DatabaseConfig+    DatabaseConfig (..),+    newDatabaseConfig,++    -- * DatabaseFailoverRequest+    DatabaseFailoverRequest (..),+    newDatabaseFailoverRequest,++    -- * DatabaseFailoverResponse+    DatabaseFailoverResponse (..),+    newDatabaseFailoverResponse,++    -- * Date+    Date (..),+    newDate,++    -- * Empty+    Empty (..),+    newEmpty,++    -- * EncryptionConfig+    EncryptionConfig (..),+    newEncryptionConfig,++    -- * Environment+    Environment (..),+    newEnvironment,++    -- * Environment_Labels+    Environment_Labels (..),+    newEnvironment_Labels,++    -- * EnvironmentConfig+    EnvironmentConfig (..),+    newEnvironmentConfig,++    -- * ExecuteAirflowCommandRequest+    ExecuteAirflowCommandRequest (..),+    newExecuteAirflowCommandRequest,++    -- * ExecuteAirflowCommandResponse+    ExecuteAirflowCommandResponse (..),+    newExecuteAirflowCommandResponse,++    -- * ExitInfo+    ExitInfo (..),+    newExitInfo,++    -- * FetchDatabasePropertiesResponse+    FetchDatabasePropertiesResponse (..),+    newFetchDatabasePropertiesResponse,++    -- * IPAllocationPolicy+    IPAllocationPolicy (..),+    newIPAllocationPolicy,++    -- * ImageVersion+    ImageVersion (..),+    newImageVersion,++    -- * Line+    Line (..),+    newLine,++    -- * ListEnvironmentsResponse+    ListEnvironmentsResponse (..),+    newListEnvironmentsResponse,++    -- * ListImageVersionsResponse+    ListImageVersionsResponse (..),+    newListImageVersionsResponse,++    -- * ListOperationsResponse+    ListOperationsResponse (..),+    newListOperationsResponse,++    -- * ListUserWorkloadsConfigMapsResponse+    ListUserWorkloadsConfigMapsResponse (..),+    newListUserWorkloadsConfigMapsResponse,++    -- * ListUserWorkloadsSecretsResponse+    ListUserWorkloadsSecretsResponse (..),+    newListUserWorkloadsSecretsResponse,++    -- * ListWorkloadsResponse+    ListWorkloadsResponse (..),+    newListWorkloadsResponse,++    -- * LoadSnapshotRequest+    LoadSnapshotRequest (..),+    newLoadSnapshotRequest,++    -- * LoadSnapshotResponse+    LoadSnapshotResponse (..),+    newLoadSnapshotResponse,++    -- * MaintenanceWindow+    MaintenanceWindow (..),+    newMaintenanceWindow,++    -- * MasterAuthorizedNetworksConfig+    MasterAuthorizedNetworksConfig (..),+    newMasterAuthorizedNetworksConfig,++    -- * NetworkingConfig+    NetworkingConfig (..),+    newNetworkingConfig,++    -- * NodeConfig+    NodeConfig (..),+    newNodeConfig,++    -- * Operation+    Operation (..),+    newOperation,++    -- * Operation_Metadata+    Operation_Metadata (..),+    newOperation_Metadata,++    -- * Operation_Response+    Operation_Response (..),+    newOperation_Response,++    -- * OperationMetadata+    OperationMetadata (..),+    newOperationMetadata,++    -- * PollAirflowCommandRequest+    PollAirflowCommandRequest (..),+    newPollAirflowCommandRequest,++    -- * PollAirflowCommandResponse+    PollAirflowCommandResponse (..),+    newPollAirflowCommandResponse,++    -- * PrivateClusterConfig+    PrivateClusterConfig (..),+    newPrivateClusterConfig,++    -- * PrivateEnvironmentConfig+    PrivateEnvironmentConfig (..),+    newPrivateEnvironmentConfig,++    -- * RecoveryConfig+    RecoveryConfig (..),+    newRecoveryConfig,++    -- * SaveSnapshotRequest+    SaveSnapshotRequest (..),+    newSaveSnapshotRequest,++    -- * SaveSnapshotResponse+    SaveSnapshotResponse (..),+    newSaveSnapshotResponse,++    -- * ScheduledSnapshotsConfig+    ScheduledSnapshotsConfig (..),+    newScheduledSnapshotsConfig,++    -- * SchedulerResource+    SchedulerResource (..),+    newSchedulerResource,++    -- * SoftwareConfig+    SoftwareConfig (..),+    newSoftwareConfig,++    -- * SoftwareConfig_AirflowConfigOverrides+    SoftwareConfig_AirflowConfigOverrides (..),+    newSoftwareConfig_AirflowConfigOverrides,++    -- * SoftwareConfig_EnvVariables+    SoftwareConfig_EnvVariables (..),+    newSoftwareConfig_EnvVariables,++    -- * SoftwareConfig_PypiPackages+    SoftwareConfig_PypiPackages (..),+    newSoftwareConfig_PypiPackages,++    -- * Status+    Status (..),+    newStatus,++    -- * Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- * StopAirflowCommandRequest+    StopAirflowCommandRequest (..),+    newStopAirflowCommandRequest,++    -- * StopAirflowCommandResponse+    StopAirflowCommandResponse (..),+    newStopAirflowCommandResponse,++    -- * StorageConfig+    StorageConfig (..),+    newStorageConfig,++    -- * TaskLogsRetentionConfig+    TaskLogsRetentionConfig (..),+    newTaskLogsRetentionConfig,++    -- * TriggererResource+    TriggererResource (..),+    newTriggererResource,++    -- * UserWorkloadsConfigMap+    UserWorkloadsConfigMap (..),+    newUserWorkloadsConfigMap,++    -- * UserWorkloadsConfigMap_Data+    UserWorkloadsConfigMap_Data (..),+    newUserWorkloadsConfigMap_Data,++    -- * UserWorkloadsSecret+    UserWorkloadsSecret (..),+    newUserWorkloadsSecret,++    -- * UserWorkloadsSecret_Data+    UserWorkloadsSecret_Data (..),+    newUserWorkloadsSecret_Data,++    -- * WebServerConfig+    WebServerConfig (..),+    newWebServerConfig,++    -- * WebServerNetworkAccessControl+    WebServerNetworkAccessControl (..),+    newWebServerNetworkAccessControl,++    -- * WebServerResource+    WebServerResource (..),+    newWebServerResource,++    -- * WorkerResource+    WorkerResource (..),+    newWorkerResource,++    -- * WorkloadsConfig+    WorkloadsConfig (..),+    newWorkloadsConfig,+  )+where++import Gogol.Composer.Internal.Sum+import Gogol.Prelude qualified as Core++-- | The policy for airflow metadata database retention.+--+-- /See:/ 'newAirflowMetadataRetentionPolicyConfig' smart constructor.+data AirflowMetadataRetentionPolicyConfig = AirflowMetadataRetentionPolicyConfig+  { -- | Optional. How many days data should be retained for.+    retentionDays :: (Core.Maybe Core.Int32),+    -- | Optional. Retention can be either enabled or disabled.+    retentionMode :: (Core.Maybe AirflowMetadataRetentionPolicyConfig_RetentionMode)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AirflowMetadataRetentionPolicyConfig' with the minimum fields required to make a request.+newAirflowMetadataRetentionPolicyConfig ::+  AirflowMetadataRetentionPolicyConfig+newAirflowMetadataRetentionPolicyConfig =+  AirflowMetadataRetentionPolicyConfig+    { retentionDays =+        Core.Nothing,+      retentionMode = Core.Nothing+    }++instance Core.FromJSON AirflowMetadataRetentionPolicyConfig where+  parseJSON =+    Core.withObject+      "AirflowMetadataRetentionPolicyConfig"+      ( \o ->+          AirflowMetadataRetentionPolicyConfig+            Core.<$> (o Core..:? "retentionDays")+            Core.<*> (o Core..:? "retentionMode")+      )++instance Core.ToJSON AirflowMetadataRetentionPolicyConfig where+  toJSON AirflowMetadataRetentionPolicyConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("retentionDays" Core..=) Core.<$> retentionDays,+            ("retentionMode" Core..=) Core.<$> retentionMode+          ]+      )++-- | Allowed IP range with user-provided description.+--+-- /See:/ 'newAllowedIpRange' smart constructor.+data AllowedIpRange = AllowedIpRange+  { -- | Optional. User-provided description. It must contain at most 300 characters.+    description :: (Core.Maybe Core.Text),+    -- | IP address or range, defined using CIDR notation, of requests that this rule applies to. Examples: @192.168.1.1@ or @192.168.0.0\/16@ or @2001:db8::\/32@ or @2001:0db8:0000:0042:0000:8a2e:0370:7334@. IP range prefixes should be properly truncated. For example, @1.2.3.4\/24@ should be truncated to @1.2.3.0\/24@. Similarly, for IPv6, @2001:db8::1\/32@ should be truncated to @2001:db8::\/32@.+    value :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AllowedIpRange' with the minimum fields required to make a request.+newAllowedIpRange ::+  AllowedIpRange+newAllowedIpRange =+  AllowedIpRange {description = Core.Nothing, value = Core.Nothing}++instance Core.FromJSON AllowedIpRange where+  parseJSON =+    Core.withObject+      "AllowedIpRange"+      ( \o ->+          AllowedIpRange+            Core.<$> (o Core..:? "description")+            Core.<*> (o Core..:? "value")+      )++instance Core.ToJSON AllowedIpRange where+  toJSON AllowedIpRange {..} =+    Core.object+      ( Core.catMaybes+          [ ("description" Core..=) Core.<$> description,+            ("value" Core..=) Core.<$> value+          ]+      )++-- | Request to check whether image upgrade will succeed.+--+-- /See:/ 'newCheckUpgradeRequest' smart constructor.+newtype CheckUpgradeRequest = CheckUpgradeRequest+  { -- | Optional. The version of the software running in the environment. This encapsulates both the version of Cloud Composer functionality and the version of Apache Airflow. It must match the regular expression @composer-([0-9]+(\\.[0-9]+\\.[0-9]+(-preview\\.[0-9]+)?)?|latest)-airflow-([0-9]+(\\.[0-9]+(\\.[0-9]+)?)?)@. When used as input, the server also checks if the provided version is supported and denies the request for an unsupported version. The Cloud Composer portion of the image version is a full <https://semver.org semantic version>, or an alias in the form of major version number or @latest@. When an alias is provided, the server replaces it with the current Cloud Composer version that satisfies the alias. The Apache Airflow portion of the image version is a full semantic version that points to one of the supported Apache Airflow versions, or an alias in the form of only major or major.minor versions specified. When an alias is provided, the server replaces it with the latest Apache Airflow version that+    -- satisfies the alias and is supported in the given Cloud Composer version. In all cases, the resolved image version is stored in the same field. See also </composer/docs/concepts/versioning/composer-versions version list> and </composer/docs/concepts/versioning/composer-versioning-overview versioning overview>.+    imageVersion :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CheckUpgradeRequest' with the minimum fields required to make a request.+newCheckUpgradeRequest ::+  CheckUpgradeRequest+newCheckUpgradeRequest =+  CheckUpgradeRequest {imageVersion = Core.Nothing}++instance Core.FromJSON CheckUpgradeRequest where+  parseJSON =+    Core.withObject+      "CheckUpgradeRequest"+      (\o -> CheckUpgradeRequest Core.<$> (o Core..:? "imageVersion"))++instance Core.ToJSON CheckUpgradeRequest where+  toJSON CheckUpgradeRequest {..} =+    Core.object+      (Core.catMaybes [("imageVersion" Core..=) Core.<$> imageVersion])++-- | Message containing information about the result of an upgrade check operation.+--+-- /See:/ 'newCheckUpgradeResponse' smart constructor.+data CheckUpgradeResponse = CheckUpgradeResponse+  { -- | Output only. Url for a docker build log of an upgraded image.+    buildLogUri :: (Core.Maybe Core.Text),+    -- | Output only. Whether build has succeeded or failed on modules conflicts.+    containsPypiModulesConflict :: (Core.Maybe CheckUpgradeResponse_ContainsPypiModulesConflict),+    -- | Composer image for which the build was happening.+    imageVersion :: (Core.Maybe Core.Text),+    -- | Output only. Extract from a docker image build log containing information about pypi modules conflicts.+    pypiConflictBuildLogExtract :: (Core.Maybe Core.Text),+    -- | Pypi dependencies specified in the environment configuration, at the time when the build was triggered.+    pypiDependencies :: (Core.Maybe CheckUpgradeResponse_PypiDependencies)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CheckUpgradeResponse' with the minimum fields required to make a request.+newCheckUpgradeResponse ::+  CheckUpgradeResponse+newCheckUpgradeResponse =+  CheckUpgradeResponse+    { buildLogUri = Core.Nothing,+      containsPypiModulesConflict = Core.Nothing,+      imageVersion = Core.Nothing,+      pypiConflictBuildLogExtract = Core.Nothing,+      pypiDependencies = Core.Nothing+    }++instance Core.FromJSON CheckUpgradeResponse where+  parseJSON =+    Core.withObject+      "CheckUpgradeResponse"+      ( \o ->+          CheckUpgradeResponse+            Core.<$> (o Core..:? "buildLogUri")+            Core.<*> (o Core..:? "containsPypiModulesConflict")+            Core.<*> (o Core..:? "imageVersion")+            Core.<*> (o Core..:? "pypiConflictBuildLogExtract")+            Core.<*> (o Core..:? "pypiDependencies")+      )++instance Core.ToJSON CheckUpgradeResponse where+  toJSON CheckUpgradeResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("buildLogUri" Core..=) Core.<$> buildLogUri,+            ("containsPypiModulesConflict" Core..=)+              Core.<$> containsPypiModulesConflict,+            ("imageVersion" Core..=) Core.<$> imageVersion,+            ("pypiConflictBuildLogExtract" Core..=)+              Core.<$> pypiConflictBuildLogExtract,+            ("pypiDependencies" Core..=) Core.<$> pypiDependencies+          ]+      )++-- | Pypi dependencies specified in the environment configuration, at the time when the build was triggered.+--+-- /See:/ 'newCheckUpgradeResponse_PypiDependencies' smart constructor.+newtype CheckUpgradeResponse_PypiDependencies = CheckUpgradeResponse_PypiDependencies+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CheckUpgradeResponse_PypiDependencies' with the minimum fields required to make a request.+newCheckUpgradeResponse_PypiDependencies ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  CheckUpgradeResponse_PypiDependencies+newCheckUpgradeResponse_PypiDependencies additional =+  CheckUpgradeResponse_PypiDependencies {additional = additional}++instance Core.FromJSON CheckUpgradeResponse_PypiDependencies where+  parseJSON =+    Core.withObject+      "CheckUpgradeResponse_PypiDependencies"+      ( \o ->+          CheckUpgradeResponse_PypiDependencies+            Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON CheckUpgradeResponse_PypiDependencies where+  toJSON CheckUpgradeResponse_PypiDependencies {..} =+    Core.toJSON additional++-- | CIDR block with an optional name.+--+-- /See:/ 'newCidrBlock' smart constructor.+data CidrBlock = CidrBlock+  { -- | CIDR block that must be specified in CIDR notation.+    cidrBlock :: (Core.Maybe Core.Text),+    -- | User-defined name that identifies the CIDR block.+    displayName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CidrBlock' with the minimum fields required to make a request.+newCidrBlock ::+  CidrBlock+newCidrBlock =+  CidrBlock {cidrBlock = Core.Nothing, displayName = Core.Nothing}++instance Core.FromJSON CidrBlock where+  parseJSON =+    Core.withObject+      "CidrBlock"+      ( \o ->+          CidrBlock+            Core.<$> (o Core..:? "cidrBlock")+            Core.<*> (o Core..:? "displayName")+      )++instance Core.ToJSON CidrBlock where+  toJSON CidrBlock {..} =+    Core.object+      ( Core.catMaybes+          [ ("cidrBlock" Core..=) Core.<$> cidrBlock,+            ("displayName" Core..=) Core.<$> displayName+          ]+      )++-- | Configuration for Cloud Data Lineage integration.+--+-- /See:/ 'newCloudDataLineageIntegration' smart constructor.+newtype CloudDataLineageIntegration = CloudDataLineageIntegration+  { -- | Optional. Whether or not Cloud Data Lineage integration is enabled.+    enabled :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudDataLineageIntegration' with the minimum fields required to make a request.+newCloudDataLineageIntegration ::+  CloudDataLineageIntegration+newCloudDataLineageIntegration =+  CloudDataLineageIntegration {enabled = Core.Nothing}++instance Core.FromJSON CloudDataLineageIntegration where+  parseJSON =+    Core.withObject+      "CloudDataLineageIntegration"+      ( \o ->+          CloudDataLineageIntegration Core.<$> (o Core..:? "enabled")+      )++instance Core.ToJSON CloudDataLineageIntegration where+  toJSON CloudDataLineageIntegration {..} =+    Core.object+      (Core.catMaybes [("enabled" Core..=) Core.<$> enabled])++-- | Information about a single workload.+--+-- /See:/ 'newComposerWorkload' smart constructor.+data ComposerWorkload = ComposerWorkload+  { -- | Name of a workload.+    name :: (Core.Maybe Core.Text),+    -- | Output only. Status of a workload.+    status :: (Core.Maybe ComposerWorkloadStatus),+    -- | Type of a workload.+    type' :: (Core.Maybe ComposerWorkload_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerWorkload' with the minimum fields required to make a request.+newComposerWorkload ::+  ComposerWorkload+newComposerWorkload =+  ComposerWorkload+    { name = Core.Nothing,+      status = Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON ComposerWorkload where+  parseJSON =+    Core.withObject+      "ComposerWorkload"+      ( \o ->+          ComposerWorkload+            Core.<$> (o Core..:? "name")+            Core.<*> (o Core..:? "status")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON ComposerWorkload where+  toJSON ComposerWorkload {..} =+    Core.object+      ( Core.catMaybes+          [ ("name" Core..=) Core.<$> name,+            ("status" Core..=) Core.<$> status,+            ("type" Core..=) Core.<$> type'+          ]+      )++-- | Workload status.+--+-- /See:/ 'newComposerWorkloadStatus' smart constructor.+data ComposerWorkloadStatus = ComposerWorkloadStatus+  { -- | Output only. Detailed message of the status.+    detailedStatusMessage :: (Core.Maybe Core.Text),+    -- | Output only. Workload state.+    state :: (Core.Maybe ComposerWorkloadStatus_State),+    -- | Output only. Text to provide more descriptive status.+    statusMessage :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerWorkloadStatus' with the minimum fields required to make a request.+newComposerWorkloadStatus ::+  ComposerWorkloadStatus+newComposerWorkloadStatus =+  ComposerWorkloadStatus+    { detailedStatusMessage = Core.Nothing,+      state = Core.Nothing,+      statusMessage = Core.Nothing+    }++instance Core.FromJSON ComposerWorkloadStatus where+  parseJSON =+    Core.withObject+      "ComposerWorkloadStatus"+      ( \o ->+          ComposerWorkloadStatus+            Core.<$> (o Core..:? "detailedStatusMessage")+            Core.<*> (o Core..:? "state")+            Core.<*> (o Core..:? "statusMessage")+      )++instance Core.ToJSON ComposerWorkloadStatus where+  toJSON ComposerWorkloadStatus {..} =+    Core.object+      ( Core.catMaybes+          [ ("detailedStatusMessage" Core..=) Core.<$> detailedStatusMessage,+            ("state" Core..=) Core.<$> state,+            ("statusMessage" Core..=) Core.<$> statusMessage+          ]+      )++-- | Configuration for resources used by Airflow DAG processors. This field is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ 'newDagProcessorResource' smart constructor.+data DagProcessorResource = DagProcessorResource+  { -- | Optional. The number of DAG processors. If not provided or set to 0, a single DAG processor instance will be created.+    count :: (Core.Maybe Core.Int32),+    -- | Optional. CPU request and limit for a single Airflow DAG processor replica.+    cpu :: (Core.Maybe Core.Double),+    -- | Optional. Memory (GB) request and limit for a single Airflow DAG processor replica.+    memoryGb :: (Core.Maybe Core.Double),+    -- | Optional. Storage (GB) request and limit for a single Airflow DAG processor replica.+    storageGb :: (Core.Maybe Core.Double)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DagProcessorResource' with the minimum fields required to make a request.+newDagProcessorResource ::+  DagProcessorResource+newDagProcessorResource =+  DagProcessorResource+    { count = Core.Nothing,+      cpu = Core.Nothing,+      memoryGb = Core.Nothing,+      storageGb = Core.Nothing+    }++instance Core.FromJSON DagProcessorResource where+  parseJSON =+    Core.withObject+      "DagProcessorResource"+      ( \o ->+          DagProcessorResource+            Core.<$> (o Core..:? "count")+            Core.<*> (o Core..:? "cpu")+            Core.<*> (o Core..:? "memoryGb")+            Core.<*> (o Core..:? "storageGb")+      )++instance Core.ToJSON DagProcessorResource where+  toJSON DagProcessorResource {..} =+    Core.object+      ( Core.catMaybes+          [ ("count" Core..=) Core.<$> count,+            ("cpu" Core..=) Core.<$> cpu,+            ("memoryGb" Core..=) Core.<$> memoryGb,+            ("storageGb" Core..=) Core.<$> storageGb+          ]+      )++-- | The configuration setting for Airflow database data retention mechanism.+--+-- /See:/ 'newDataRetentionConfig' smart constructor.+data DataRetentionConfig = DataRetentionConfig+  { -- | Optional. The retention policy for airflow metadata database.+    airflowMetadataRetentionConfig :: (Core.Maybe AirflowMetadataRetentionPolicyConfig),+    -- | Optional. The configuration settings for task logs retention+    taskLogsRetentionConfig :: (Core.Maybe TaskLogsRetentionConfig)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DataRetentionConfig' with the minimum fields required to make a request.+newDataRetentionConfig ::+  DataRetentionConfig+newDataRetentionConfig =+  DataRetentionConfig+    { airflowMetadataRetentionConfig =+        Core.Nothing,+      taskLogsRetentionConfig = Core.Nothing+    }++instance Core.FromJSON DataRetentionConfig where+  parseJSON =+    Core.withObject+      "DataRetentionConfig"+      ( \o ->+          DataRetentionConfig+            Core.<$> (o Core..:? "airflowMetadataRetentionConfig")+            Core.<*> (o Core..:? "taskLogsRetentionConfig")+      )++instance Core.ToJSON DataRetentionConfig where+  toJSON DataRetentionConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("airflowMetadataRetentionConfig" Core..=)+              Core.<$> airflowMetadataRetentionConfig,+            ("taskLogsRetentionConfig" Core..=)+              Core.<$> taskLogsRetentionConfig+          ]+      )++-- | The configuration of Cloud SQL instance that is used by the Apache Airflow software.+--+-- /See:/ 'newDatabaseConfig' smart constructor.+data DatabaseConfig = DatabaseConfig+  { -- | Optional. Cloud SQL machine type used by Airflow database. It has to be one of: db-n1-standard-2, db-n1-standard-4, db-n1-standard-8 or db-n1-standard-16. If not specified, db-n1-standard-2 will be used. Supported for Cloud Composer environments in versions composer-1././-airflow-/./.*.+    machineType :: (Core.Maybe Core.Text),+    -- | Optional. The Compute Engine zone where the Airflow database is created. If zone is provided, it must be in the region selected for the environment. If zone is not provided, a zone is automatically selected. The zone can only be set during environment creation. Supported for Cloud Composer environments in versions composer-2././-airflow-/./.*.+    zone :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatabaseConfig' with the minimum fields required to make a request.+newDatabaseConfig ::+  DatabaseConfig+newDatabaseConfig =+  DatabaseConfig {machineType = Core.Nothing, zone = Core.Nothing}++instance Core.FromJSON DatabaseConfig where+  parseJSON =+    Core.withObject+      "DatabaseConfig"+      ( \o ->+          DatabaseConfig+            Core.<$> (o Core..:? "machineType")+            Core.<*> (o Core..:? "zone")+      )++instance Core.ToJSON DatabaseConfig where+  toJSON DatabaseConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("machineType" Core..=) Core.<$> machineType,+            ("zone" Core..=) Core.<$> zone+          ]+      )++-- | Request to trigger database failover (only for highly resilient environments).+--+-- /See:/ 'newDatabaseFailoverRequest' smart constructor.+data DatabaseFailoverRequest = DatabaseFailoverRequest+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatabaseFailoverRequest' with the minimum fields required to make a request.+newDatabaseFailoverRequest ::+  DatabaseFailoverRequest+newDatabaseFailoverRequest = DatabaseFailoverRequest++instance Core.FromJSON DatabaseFailoverRequest where+  parseJSON =+    Core.withObject+      "DatabaseFailoverRequest"+      (\o -> Core.pure DatabaseFailoverRequest)++instance Core.ToJSON DatabaseFailoverRequest where+  toJSON = Core.const Core.emptyObject++-- | Response for DatabaseFailoverRequest.+--+-- /See:/ 'newDatabaseFailoverResponse' smart constructor.+data DatabaseFailoverResponse = DatabaseFailoverResponse+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatabaseFailoverResponse' with the minimum fields required to make a request.+newDatabaseFailoverResponse ::+  DatabaseFailoverResponse+newDatabaseFailoverResponse = DatabaseFailoverResponse++instance Core.FromJSON DatabaseFailoverResponse where+  parseJSON =+    Core.withObject+      "DatabaseFailoverResponse"+      (\o -> Core.pure DatabaseFailoverResponse)++instance Core.ToJSON DatabaseFailoverResponse where+  toJSON = Core.const Core.emptyObject++-- | Represents a whole or partial calendar date, such as a birthday. The time of day and time zone are either specified elsewhere or are insignificant. The date is relative to the Gregorian Calendar. This can represent one of the following: * A full date, with non-zero year, month, and day values. * A month and day, with a zero year (for example, an anniversary). * A year on its own, with a zero month and a zero day. * A year and month, with a zero day (for example, a credit card expiration date). Related types: * google.type.TimeOfDay * google.type.DateTime * google.protobuf.Timestamp+--+-- /See:/ 'newDate' smart constructor.+data Date = Date+  { -- | Day of a month. Must be from 1 to 31 and valid for the year and month, or 0 to specify a year by itself or a year and month where the day isn\'t significant.+    day :: (Core.Maybe Core.Int32),+    -- | Month of a year. Must be from 1 to 12, or 0 to specify a year without a month and day.+    month :: (Core.Maybe Core.Int32),+    -- | Year of the date. Must be from 1 to 9999, or 0 to specify a date without a year.+    year :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Date' with the minimum fields required to make a request.+newDate ::+  Date+newDate =+  Date+    { day = Core.Nothing,+      month = Core.Nothing,+      year = Core.Nothing+    }++instance Core.FromJSON Date where+  parseJSON =+    Core.withObject+      "Date"+      ( \o ->+          Date+            Core.<$> (o Core..:? "day")+            Core.<*> (o Core..:? "month")+            Core.<*> (o Core..:? "year")+      )++instance Core.ToJSON Date where+  toJSON Date {..} =+    Core.object+      ( Core.catMaybes+          [ ("day" Core..=) Core.<$> day,+            ("month" Core..=) Core.<$> month,+            ("year" Core..=) Core.<$> year+          ]+      )++-- | A generic empty message that you can re-use to avoid defining duplicated empty messages in your APIs. A typical example is to use it as the request or the response type of an API method. For instance: service Foo { rpc Bar(google.protobuf.Empty) returns (google.protobuf.Empty); }+--+-- /See:/ 'newEmpty' smart constructor.+data Empty = Empty+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Empty' with the minimum fields required to make a request.+newEmpty ::+  Empty+newEmpty = Empty++instance Core.FromJSON Empty where+  parseJSON = Core.withObject "Empty" (\o -> Core.pure Empty)++instance Core.ToJSON Empty where+  toJSON = Core.const Core.emptyObject++-- | The encryption options for the Cloud Composer environment and its dependencies.Supported for Cloud Composer environments in versions composer-1././-airflow-/./.*.+--+-- /See:/ 'newEncryptionConfig' smart constructor.+newtype EncryptionConfig = EncryptionConfig+  { -- | Optional. Customer-managed Encryption Key available through Google\'s Key Management Service. Cannot be updated. If not specified, Google-managed key will be used.+    kmsKeyName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EncryptionConfig' with the minimum fields required to make a request.+newEncryptionConfig ::+  EncryptionConfig+newEncryptionConfig = EncryptionConfig {kmsKeyName = Core.Nothing}++instance Core.FromJSON EncryptionConfig where+  parseJSON =+    Core.withObject+      "EncryptionConfig"+      (\o -> EncryptionConfig Core.<$> (o Core..:? "kmsKeyName"))++instance Core.ToJSON EncryptionConfig where+  toJSON EncryptionConfig {..} =+    Core.object+      (Core.catMaybes [("kmsKeyName" Core..=) Core.<$> kmsKeyName])++-- | An environment for running orchestration tasks.+--+-- /See:/ 'newEnvironment' smart constructor.+data Environment = Environment+  { -- | Optional. Configuration parameters for this environment.+    config :: (Core.Maybe EnvironmentConfig),+    -- | Output only. The time at which this environment was created.+    createTime :: (Core.Maybe Core.DateTime),+    -- | Optional. User-defined labels for this environment. The labels map can contain no more than 64 entries. Entries of the labels map are UTF8 strings that comply with the following restrictions: * Keys must conform to regexp: \\p{Ll}\\p{Lo}{0,62} * Values must conform to regexp: [\\p{Ll}\\p{Lo}\\p{N}_-]{0,63} * Both keys and values are additionally constrained to be \<= 128 bytes in size.+    labels :: (Core.Maybe Environment_Labels),+    -- | Identifier. The resource name of the environment, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" EnvironmentId must start with a lowercase letter followed by up to 63 lowercase letters, numbers, or hyphens, and cannot end with a hyphen.+    name :: (Core.Maybe Core.Text),+    -- | Output only. Reserved for future use.+    satisfiesPzi :: (Core.Maybe Core.Bool),+    -- | Output only. Reserved for future use.+    satisfiesPzs :: (Core.Maybe Core.Bool),+    -- | The current state of the environment.+    state :: (Core.Maybe Environment_State),+    -- | Optional. Storage configuration for this environment.+    storageConfig :: (Core.Maybe StorageConfig),+    -- | Output only. The time at which this environment was last modified.+    updateTime :: (Core.Maybe Core.DateTime),+    -- | Output only. The UUID (Universally Unique IDentifier) associated with this environment. This value is generated when the environment is created.+    uuid :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Environment' with the minimum fields required to make a request.+newEnvironment ::+  Environment+newEnvironment =+  Environment+    { config = Core.Nothing,+      createTime = Core.Nothing,+      labels = Core.Nothing,+      name = Core.Nothing,+      satisfiesPzi = Core.Nothing,+      satisfiesPzs = Core.Nothing,+      state = Core.Nothing,+      storageConfig = Core.Nothing,+      updateTime = Core.Nothing,+      uuid = Core.Nothing+    }++instance Core.FromJSON Environment where+  parseJSON =+    Core.withObject+      "Environment"+      ( \o ->+          Environment+            Core.<$> (o Core..:? "config")+            Core.<*> (o Core..:? "createTime")+            Core.<*> (o Core..:? "labels")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "satisfiesPzi")+            Core.<*> (o Core..:? "satisfiesPzs")+            Core.<*> (o Core..:? "state")+            Core.<*> (o Core..:? "storageConfig")+            Core.<*> (o Core..:? "updateTime")+            Core.<*> (o Core..:? "uuid")+      )++instance Core.ToJSON Environment where+  toJSON Environment {..} =+    Core.object+      ( Core.catMaybes+          [ ("config" Core..=) Core.<$> config,+            ("createTime" Core..=) Core.<$> createTime,+            ("labels" Core..=) Core.<$> labels,+            ("name" Core..=) Core.<$> name,+            ("satisfiesPzi" Core..=) Core.<$> satisfiesPzi,+            ("satisfiesPzs" Core..=) Core.<$> satisfiesPzs,+            ("state" Core..=) Core.<$> state,+            ("storageConfig" Core..=) Core.<$> storageConfig,+            ("updateTime" Core..=) Core.<$> updateTime,+            ("uuid" Core..=) Core.<$> uuid+          ]+      )++-- | Optional. User-defined labels for this environment. The labels map can contain no more than 64 entries. Entries of the labels map are UTF8 strings that comply with the following restrictions: * Keys must conform to regexp: \\p{Ll}\\p{Lo}{0,62} * Values must conform to regexp: [\\p{Ll}\\p{Lo}\\p{N}_-]{0,63} * Both keys and values are additionally constrained to be \<= 128 bytes in size.+--+-- /See:/ 'newEnvironment_Labels' smart constructor.+newtype Environment_Labels = Environment_Labels+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Environment_Labels' with the minimum fields required to make a request.+newEnvironment_Labels ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  Environment_Labels+newEnvironment_Labels additional =+  Environment_Labels {additional = additional}++instance Core.FromJSON Environment_Labels where+  parseJSON =+    Core.withObject+      "Environment_Labels"+      (\o -> Environment_Labels Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON Environment_Labels where+  toJSON Environment_Labels {..} = Core.toJSON additional++-- | Configuration information for an environment.+--+-- /See:/ 'newEnvironmentConfig' smart constructor.+data EnvironmentConfig = EnvironmentConfig+  { -- | Output only. The \'bring your own identity\' variant of the URI of the Apache Airflow Web UI hosted within this environment, to be accessed with external identities using workforce identity federation (see </composer/docs/composer-2/access-environments-with-workforce-identity-federation Access environments with workforce identity federation>).+    airflowByoidUri :: (Core.Maybe Core.Text),+    -- | Output only. The URI of the Apache Airflow Web UI hosted within this environment (see </composer/docs/how-to/accessing/airflow-web-interface Airflow web interface>).+    airflowUri :: (Core.Maybe Core.Text),+    -- | Output only. The Cloud Storage prefix of the DAGs for this environment. Although Cloud Storage objects reside in a flat namespace, a hierarchical file tree can be simulated using \"\/\"-delimited object name prefixes. DAG objects for this environment reside in a simulated directory with the given prefix.+    dagGcsPrefix :: (Core.Maybe Core.Text),+    -- | Optional. The configuration setting for Airflow database data retention mechanism.+    dataRetentionConfig :: (Core.Maybe DataRetentionConfig),+    -- | Optional. The configuration settings for Cloud SQL instance used internally by Apache Airflow software.+    databaseConfig :: (Core.Maybe DatabaseConfig),+    -- | Optional. The encryption options for the Cloud Composer environment and its dependencies. Cannot be updated.+    encryptionConfig :: (Core.Maybe EncryptionConfig),+    -- | Optional. The size of the Cloud Composer environment. This field is supported for Cloud Composer environments in versions composer-2././-airflow-/./.* and newer.+    environmentSize :: (Core.Maybe EnvironmentConfig_EnvironmentSize),+    -- | Output only. The Kubernetes Engine cluster used to run this environment.+    gkeCluster :: (Core.Maybe Core.Text),+    -- | Optional. The maintenance window is the period when Cloud Composer components may undergo maintenance. It is defined so that maintenance is not executed during peak hours or critical time periods. The system will not be under maintenance for every occurrence of this window, but when maintenance is planned, it will be scheduled during the window. The maintenance window period must encompass at least 12 hours per week. This may be split into multiple chunks, each with a size of at least 4 hours. If this value is omitted, the default value for maintenance window is applied. By default, maintenance windows are from 00:00:00 to 04:00:00 (GMT) on Friday, Saturday, and Sunday every week.+    maintenanceWindow :: (Core.Maybe MaintenanceWindow),+    -- | Optional. The configuration options for GKE cluster master authorized networks. By default master authorized networks feature is: - in case of private environment: enabled with no external networks allowlisted. - in case of public environment: disabled.+    masterAuthorizedNetworksConfig :: (Core.Maybe MasterAuthorizedNetworksConfig),+    -- | Optional. The configuration used for the Kubernetes Engine cluster.+    nodeConfig :: (Core.Maybe NodeConfig),+    -- | The number of nodes in the Kubernetes Engine cluster that will be used to run this environment. This field is supported for Cloud Composer environments in versions composer-1././-airflow-/./.*.+    nodeCount :: (Core.Maybe Core.Int32),+    -- | Optional. The configuration used for the Private IP Cloud Composer environment.+    privateEnvironmentConfig :: (Core.Maybe PrivateEnvironmentConfig),+    -- | Optional. The Recovery settings configuration of an environment. This field is supported for Cloud Composer environments in versions composer-2././-airflow-/./.* and newer.+    recoveryConfig :: (Core.Maybe RecoveryConfig),+    -- | Optional. Resilience mode of the Cloud Composer Environment. This field is supported for Cloud Composer environments in versions composer-2.2.0-airflow-/./.* and newer.+    resilienceMode :: (Core.Maybe EnvironmentConfig_ResilienceMode),+    -- | Optional. The configuration settings for software inside the environment.+    softwareConfig :: (Core.Maybe SoftwareConfig),+    -- | Optional. The configuration settings for the Airflow web server App Engine instance.+    webServerConfig :: (Core.Maybe WebServerConfig),+    -- | Optional. The network-level access control policy for the Airflow web server. If unspecified, no network-level access restrictions will be applied.+    webServerNetworkAccessControl :: (Core.Maybe WebServerNetworkAccessControl),+    -- | Optional. The workloads configuration settings for the GKE cluster associated with the Cloud Composer environment. The GKE cluster runs Airflow scheduler, web server and workers workloads. This field is supported for Cloud Composer environments in versions composer-2././-airflow-/./.* and newer.+    workloadsConfig :: (Core.Maybe WorkloadsConfig)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnvironmentConfig' with the minimum fields required to make a request.+newEnvironmentConfig ::+  EnvironmentConfig+newEnvironmentConfig =+  EnvironmentConfig+    { airflowByoidUri = Core.Nothing,+      airflowUri = Core.Nothing,+      dagGcsPrefix = Core.Nothing,+      dataRetentionConfig = Core.Nothing,+      databaseConfig = Core.Nothing,+      encryptionConfig = Core.Nothing,+      environmentSize = Core.Nothing,+      gkeCluster = Core.Nothing,+      maintenanceWindow = Core.Nothing,+      masterAuthorizedNetworksConfig = Core.Nothing,+      nodeConfig = Core.Nothing,+      nodeCount = Core.Nothing,+      privateEnvironmentConfig = Core.Nothing,+      recoveryConfig = Core.Nothing,+      resilienceMode = Core.Nothing,+      softwareConfig = Core.Nothing,+      webServerConfig = Core.Nothing,+      webServerNetworkAccessControl = Core.Nothing,+      workloadsConfig = Core.Nothing+    }++instance Core.FromJSON EnvironmentConfig where+  parseJSON =+    Core.withObject+      "EnvironmentConfig"+      ( \o ->+          EnvironmentConfig+            Core.<$> (o Core..:? "airflowByoidUri")+            Core.<*> (o Core..:? "airflowUri")+            Core.<*> (o Core..:? "dagGcsPrefix")+            Core.<*> (o Core..:? "dataRetentionConfig")+            Core.<*> (o Core..:? "databaseConfig")+            Core.<*> (o Core..:? "encryptionConfig")+            Core.<*> (o Core..:? "environmentSize")+            Core.<*> (o Core..:? "gkeCluster")+            Core.<*> (o Core..:? "maintenanceWindow")+            Core.<*> (o Core..:? "masterAuthorizedNetworksConfig")+            Core.<*> (o Core..:? "nodeConfig")+            Core.<*> (o Core..:? "nodeCount")+            Core.<*> (o Core..:? "privateEnvironmentConfig")+            Core.<*> (o Core..:? "recoveryConfig")+            Core.<*> (o Core..:? "resilienceMode")+            Core.<*> (o Core..:? "softwareConfig")+            Core.<*> (o Core..:? "webServerConfig")+            Core.<*> (o Core..:? "webServerNetworkAccessControl")+            Core.<*> (o Core..:? "workloadsConfig")+      )++instance Core.ToJSON EnvironmentConfig where+  toJSON EnvironmentConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("airflowByoidUri" Core..=) Core.<$> airflowByoidUri,+            ("airflowUri" Core..=) Core.<$> airflowUri,+            ("dagGcsPrefix" Core..=) Core.<$> dagGcsPrefix,+            ("dataRetentionConfig" Core..=) Core.<$> dataRetentionConfig,+            ("databaseConfig" Core..=) Core.<$> databaseConfig,+            ("encryptionConfig" Core..=) Core.<$> encryptionConfig,+            ("environmentSize" Core..=) Core.<$> environmentSize,+            ("gkeCluster" Core..=) Core.<$> gkeCluster,+            ("maintenanceWindow" Core..=) Core.<$> maintenanceWindow,+            ("masterAuthorizedNetworksConfig" Core..=)+              Core.<$> masterAuthorizedNetworksConfig,+            ("nodeConfig" Core..=) Core.<$> nodeConfig,+            ("nodeCount" Core..=) Core.<$> nodeCount,+            ("privateEnvironmentConfig" Core..=)+              Core.<$> privateEnvironmentConfig,+            ("recoveryConfig" Core..=) Core.<$> recoveryConfig,+            ("resilienceMode" Core..=) Core.<$> resilienceMode,+            ("softwareConfig" Core..=) Core.<$> softwareConfig,+            ("webServerConfig" Core..=) Core.<$> webServerConfig,+            ("webServerNetworkAccessControl" Core..=)+              Core.<$> webServerNetworkAccessControl,+            ("workloadsConfig" Core..=) Core.<$> workloadsConfig+          ]+      )++-- | Execute Airflow Command request.+--+-- /See:/ 'newExecuteAirflowCommandRequest' smart constructor.+data ExecuteAirflowCommandRequest = ExecuteAirflowCommandRequest+  { -- | Airflow command.+    command :: (Core.Maybe Core.Text),+    -- | Parameters for the Airflow command\/subcommand as an array of arguments. It may contain positional arguments like @[\"my-dag-id\"]@, key-value parameters like @[\"--foo=bar\"]@ or @[\"--foo\",\"bar\"]@, or other flags like @[\"-f\"]@.+    parameters :: (Core.Maybe [Core.Text]),+    -- | Airflow subcommand.+    subcommand :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ExecuteAirflowCommandRequest' with the minimum fields required to make a request.+newExecuteAirflowCommandRequest ::+  ExecuteAirflowCommandRequest+newExecuteAirflowCommandRequest =+  ExecuteAirflowCommandRequest+    { command = Core.Nothing,+      parameters = Core.Nothing,+      subcommand = Core.Nothing+    }++instance Core.FromJSON ExecuteAirflowCommandRequest where+  parseJSON =+    Core.withObject+      "ExecuteAirflowCommandRequest"+      ( \o ->+          ExecuteAirflowCommandRequest+            Core.<$> (o Core..:? "command")+            Core.<*> (o Core..:? "parameters")+            Core.<*> (o Core..:? "subcommand")+      )++instance Core.ToJSON ExecuteAirflowCommandRequest where+  toJSON ExecuteAirflowCommandRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("command" Core..=) Core.<$> command,+            ("parameters" Core..=) Core.<$> parameters,+            ("subcommand" Core..=) Core.<$> subcommand+          ]+      )++-- | Response to ExecuteAirflowCommandRequest.+--+-- /See:/ 'newExecuteAirflowCommandResponse' smart constructor.+data ExecuteAirflowCommandResponse = ExecuteAirflowCommandResponse+  { -- | Error message. Empty if there was no error.+    error :: (Core.Maybe Core.Text),+    -- | The unique ID of the command execution for polling.+    executionId :: (Core.Maybe Core.Text),+    -- | The name of the pod where the command is executed.+    pod :: (Core.Maybe Core.Text),+    -- | The namespace of the pod where the command is executed.+    podNamespace :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ExecuteAirflowCommandResponse' with the minimum fields required to make a request.+newExecuteAirflowCommandResponse ::+  ExecuteAirflowCommandResponse+newExecuteAirflowCommandResponse =+  ExecuteAirflowCommandResponse+    { error = Core.Nothing,+      executionId = Core.Nothing,+      pod = Core.Nothing,+      podNamespace = Core.Nothing+    }++instance Core.FromJSON ExecuteAirflowCommandResponse where+  parseJSON =+    Core.withObject+      "ExecuteAirflowCommandResponse"+      ( \o ->+          ExecuteAirflowCommandResponse+            Core.<$> (o Core..:? "error")+            Core.<*> (o Core..:? "executionId")+            Core.<*> (o Core..:? "pod")+            Core.<*> (o Core..:? "podNamespace")+      )++instance Core.ToJSON ExecuteAirflowCommandResponse where+  toJSON ExecuteAirflowCommandResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("error" Core..=) Core.<$> error,+            ("executionId" Core..=) Core.<$> executionId,+            ("pod" Core..=) Core.<$> pod,+            ("podNamespace" Core..=) Core.<$> podNamespace+          ]+      )++-- | Information about how a command ended.+--+-- /See:/ 'newExitInfo' smart constructor.+data ExitInfo = ExitInfo+  { -- | Error message. Empty if there was no error.+    error :: (Core.Maybe Core.Text),+    -- | The exit code from the command execution.+    exitCode :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ExitInfo' with the minimum fields required to make a request.+newExitInfo ::+  ExitInfo+newExitInfo =+  ExitInfo {error = Core.Nothing, exitCode = Core.Nothing}++instance Core.FromJSON ExitInfo where+  parseJSON =+    Core.withObject+      "ExitInfo"+      ( \o ->+          ExitInfo+            Core.<$> (o Core..:? "error")+            Core.<*> (o Core..:? "exitCode")+      )++instance Core.ToJSON ExitInfo where+  toJSON ExitInfo {..} =+    Core.object+      ( Core.catMaybes+          [ ("error" Core..=) Core.<$> error,+            ("exitCode" Core..=) Core.<$> exitCode+          ]+      )++-- | Response for FetchDatabasePropertiesRequest.+--+-- /See:/ 'newFetchDatabasePropertiesResponse' smart constructor.+data FetchDatabasePropertiesResponse = FetchDatabasePropertiesResponse+  { -- | The availability status of the failover replica. A false status indicates that the failover replica is out of sync. The primary instance can only fail over to the failover replica when the status is true.+    isFailoverReplicaAvailable :: (Core.Maybe Core.Bool),+    -- | The Compute Engine zone that the instance is currently serving from.+    primaryGceZone :: (Core.Maybe Core.Text),+    -- | The Compute Engine zone that the failover instance is currently serving from for a regional Cloud SQL instance.+    secondaryGceZone :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'FetchDatabasePropertiesResponse' with the minimum fields required to make a request.+newFetchDatabasePropertiesResponse ::+  FetchDatabasePropertiesResponse+newFetchDatabasePropertiesResponse =+  FetchDatabasePropertiesResponse+    { isFailoverReplicaAvailable =+        Core.Nothing,+      primaryGceZone = Core.Nothing,+      secondaryGceZone = Core.Nothing+    }++instance Core.FromJSON FetchDatabasePropertiesResponse where+  parseJSON =+    Core.withObject+      "FetchDatabasePropertiesResponse"+      ( \o ->+          FetchDatabasePropertiesResponse+            Core.<$> (o Core..:? "isFailoverReplicaAvailable")+            Core.<*> (o Core..:? "primaryGceZone")+            Core.<*> (o Core..:? "secondaryGceZone")+      )++instance Core.ToJSON FetchDatabasePropertiesResponse where+  toJSON FetchDatabasePropertiesResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("isFailoverReplicaAvailable" Core..=)+              Core.<$> isFailoverReplicaAvailable,+            ("primaryGceZone" Core..=) Core.<$> primaryGceZone,+            ("secondaryGceZone" Core..=) Core.<$> secondaryGceZone+          ]+      )++-- | Configuration for controlling how IPs are allocated in the GKE cluster running the Apache Airflow software.+--+-- /See:/ 'newIPAllocationPolicy' smart constructor.+data IPAllocationPolicy = IPAllocationPolicy+  { -- | Optional. The IP address range used to allocate IP addresses to pods in the GKE cluster. For Cloud Composer environments in versions composer-1././-airflow-/./.*, this field is applicable only when @use_ip_aliases@ is true. Set to blank to have GKE choose a range with the default size. Set to \/netmask (e.g. @\/14@) to have GKE choose a range with a specific netmask. Set to a <https://en.wikipedia.org/wiki/Classless_Inter-Domain_Routing CIDR> notation (e.g. @10.96.0.0\/14@) from the RFC-1918 private networks (e.g. @10.0.0.0\/8@, @172.16.0.0\/12@, @192.168.0.0\/16@) to pick a specific range to use.+    clusterIpv4CidrBlock :: (Core.Maybe Core.Text),+    -- | Optional. The name of the GKE cluster\'s secondary range used to allocate IP addresses to pods. For Cloud Composer environments in versions composer-1././-airflow-/./.*, this field is applicable only when @use_ip_aliases@ is true.+    clusterSecondaryRangeName :: (Core.Maybe Core.Text),+    -- | Optional. The IP address range of the services IP addresses in this GKE cluster. For Cloud Composer environments in versions composer-1././-airflow-/./.*, this field is applicable only when @use_ip_aliases@ is true. Set to blank to have GKE choose a range with the default size. Set to \/netmask (e.g. @\/14@) to have GKE choose a range with a specific netmask. Set to a <https://en.wikipedia.org/wiki/Classless_Inter-Domain_Routing CIDR> notation (e.g. @10.96.0.0\/14@) from the RFC-1918 private networks (e.g. @10.0.0.0\/8@, @172.16.0.0\/12@, @192.168.0.0\/16@) to pick a specific range to use.+    servicesIpv4CidrBlock :: (Core.Maybe Core.Text),+    -- | Optional. The name of the services\' secondary range used to allocate IP addresses to the GKE cluster. For Cloud Composer environments in versions composer-1././-airflow-/./.*, this field is applicable only when @use_ip_aliases@ is true.+    servicesSecondaryRangeName :: (Core.Maybe Core.Text),+    -- | Optional. Whether or not to enable Alias IPs in the GKE cluster. If @true@, a VPC-native cluster is created. This field is only supported for Cloud Composer environments in versions composer-1././-airflow-/./.*. Environments in newer versions always use VPC-native GKE clusters.+    useIpAliases :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'IPAllocationPolicy' with the minimum fields required to make a request.+newIPAllocationPolicy ::+  IPAllocationPolicy+newIPAllocationPolicy =+  IPAllocationPolicy+    { clusterIpv4CidrBlock = Core.Nothing,+      clusterSecondaryRangeName = Core.Nothing,+      servicesIpv4CidrBlock = Core.Nothing,+      servicesSecondaryRangeName = Core.Nothing,+      useIpAliases = Core.Nothing+    }++instance Core.FromJSON IPAllocationPolicy where+  parseJSON =+    Core.withObject+      "IPAllocationPolicy"+      ( \o ->+          IPAllocationPolicy+            Core.<$> (o Core..:? "clusterIpv4CidrBlock")+            Core.<*> (o Core..:? "clusterSecondaryRangeName")+            Core.<*> (o Core..:? "servicesIpv4CidrBlock")+            Core.<*> (o Core..:? "servicesSecondaryRangeName")+            Core.<*> (o Core..:? "useIpAliases")+      )++instance Core.ToJSON IPAllocationPolicy where+  toJSON IPAllocationPolicy {..} =+    Core.object+      ( Core.catMaybes+          [ ("clusterIpv4CidrBlock" Core..=) Core.<$> clusterIpv4CidrBlock,+            ("clusterSecondaryRangeName" Core..=)+              Core.<$> clusterSecondaryRangeName,+            ("servicesIpv4CidrBlock" Core..=) Core.<$> servicesIpv4CidrBlock,+            ("servicesSecondaryRangeName" Core..=)+              Core.<$> servicesSecondaryRangeName,+            ("useIpAliases" Core..=) Core.<$> useIpAliases+          ]+      )++-- | ImageVersion information+--+-- /See:/ 'newImageVersion' smart constructor.+data ImageVersion = ImageVersion+  { -- | Whether it is impossible to create an environment with the image version.+    creationDisabled :: (Core.Maybe Core.Bool),+    -- | The string identifier of the ImageVersion, in the form: \"composer-x.y.z-airflow-a.b.c\"+    imageVersionId :: (Core.Maybe Core.Text),+    -- | Whether this is the default ImageVersion used by Composer during environment creation if no input ImageVersion is specified.+    isDefault :: (Core.Maybe Core.Bool),+    -- | The date of the version release.+    releaseDate :: (Core.Maybe Date),+    -- | supported python versions+    supportedPythonVersions :: (Core.Maybe [Core.Text]),+    -- | Whether it is impossible to upgrade an environment running with the image version.+    upgradeDisabled :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ImageVersion' with the minimum fields required to make a request.+newImageVersion ::+  ImageVersion+newImageVersion =+  ImageVersion+    { creationDisabled = Core.Nothing,+      imageVersionId = Core.Nothing,+      isDefault = Core.Nothing,+      releaseDate = Core.Nothing,+      supportedPythonVersions = Core.Nothing,+      upgradeDisabled = Core.Nothing+    }++instance Core.FromJSON ImageVersion where+  parseJSON =+    Core.withObject+      "ImageVersion"+      ( \o ->+          ImageVersion+            Core.<$> (o Core..:? "creationDisabled")+            Core.<*> (o Core..:? "imageVersionId")+            Core.<*> (o Core..:? "isDefault")+            Core.<*> (o Core..:? "releaseDate")+            Core.<*> (o Core..:? "supportedPythonVersions")+            Core.<*> (o Core..:? "upgradeDisabled")+      )++instance Core.ToJSON ImageVersion where+  toJSON ImageVersion {..} =+    Core.object+      ( Core.catMaybes+          [ ("creationDisabled" Core..=) Core.<$> creationDisabled,+            ("imageVersionId" Core..=) Core.<$> imageVersionId,+            ("isDefault" Core..=) Core.<$> isDefault,+            ("releaseDate" Core..=) Core.<$> releaseDate,+            ("supportedPythonVersions" Core..=)+              Core.<$> supportedPythonVersions,+            ("upgradeDisabled" Core..=) Core.<$> upgradeDisabled+          ]+      )++-- | Contains information about a single line from logs.+--+-- /See:/ 'newLine' smart constructor.+data Line = Line+  { -- | Text content of the log line.+    content :: (Core.Maybe Core.Text),+    -- | Number of the line.+    lineNumber :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Line' with the minimum fields required to make a request.+newLine ::+  Line+newLine = Line {content = Core.Nothing, lineNumber = Core.Nothing}++instance Core.FromJSON Line where+  parseJSON =+    Core.withObject+      "Line"+      ( \o ->+          Line+            Core.<$> (o Core..:? "content")+            Core.<*> (o Core..:? "lineNumber")+      )++instance Core.ToJSON Line where+  toJSON Line {..} =+    Core.object+      ( Core.catMaybes+          [ ("content" Core..=) Core.<$> content,+            ("lineNumber" Core..=) Core.<$> lineNumber+          ]+      )++-- | The environments in a project and location.+--+-- /See:/ 'newListEnvironmentsResponse' smart constructor.+data ListEnvironmentsResponse = ListEnvironmentsResponse+  { -- | The list of environments returned by a ListEnvironmentsRequest.+    environments :: (Core.Maybe [Environment]),+    -- | The page token used to query for the next page if one exists.+    nextPageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListEnvironmentsResponse' with the minimum fields required to make a request.+newListEnvironmentsResponse ::+  ListEnvironmentsResponse+newListEnvironmentsResponse =+  ListEnvironmentsResponse+    { environments = Core.Nothing,+      nextPageToken = Core.Nothing+    }++instance Core.FromJSON ListEnvironmentsResponse where+  parseJSON =+    Core.withObject+      "ListEnvironmentsResponse"+      ( \o ->+          ListEnvironmentsResponse+            Core.<$> (o Core..:? "environments")+            Core.<*> (o Core..:? "nextPageToken")+      )++instance Core.ToJSON ListEnvironmentsResponse where+  toJSON ListEnvironmentsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("environments" Core..=) Core.<$> environments,+            ("nextPageToken" Core..=) Core.<$> nextPageToken+          ]+      )++-- | The ImageVersions in a project and location.+--+-- /See:/ 'newListImageVersionsResponse' smart constructor.+data ListImageVersionsResponse = ListImageVersionsResponse+  { -- | The list of supported ImageVersions in a location.+    imageVersions :: (Core.Maybe [ImageVersion]),+    -- | The page token used to query for the next page if one exists.+    nextPageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListImageVersionsResponse' with the minimum fields required to make a request.+newListImageVersionsResponse ::+  ListImageVersionsResponse+newListImageVersionsResponse =+  ListImageVersionsResponse+    { imageVersions = Core.Nothing,+      nextPageToken = Core.Nothing+    }++instance Core.FromJSON ListImageVersionsResponse where+  parseJSON =+    Core.withObject+      "ListImageVersionsResponse"+      ( \o ->+          ListImageVersionsResponse+            Core.<$> (o Core..:? "imageVersions")+            Core.<*> (o Core..:? "nextPageToken")+      )++instance Core.ToJSON ListImageVersionsResponse where+  toJSON ListImageVersionsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("imageVersions" Core..=) Core.<$> imageVersions,+            ("nextPageToken" Core..=) Core.<$> nextPageToken+          ]+      )++-- | The response message for Operations.ListOperations.+--+-- /See:/ 'newListOperationsResponse' smart constructor.+data ListOperationsResponse = ListOperationsResponse+  { -- | The standard List next-page token.+    nextPageToken :: (Core.Maybe Core.Text),+    -- | A list of operations that matches the specified filter in the request.+    operations :: (Core.Maybe [Operation])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListOperationsResponse' with the minimum fields required to make a request.+newListOperationsResponse ::+  ListOperationsResponse+newListOperationsResponse =+  ListOperationsResponse+    { nextPageToken = Core.Nothing,+      operations = Core.Nothing+    }++instance Core.FromJSON ListOperationsResponse where+  parseJSON =+    Core.withObject+      "ListOperationsResponse"+      ( \o ->+          ListOperationsResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "operations")+      )++instance Core.ToJSON ListOperationsResponse where+  toJSON ListOperationsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("operations" Core..=) Core.<$> operations+          ]+      )++-- | The user workloads ConfigMaps for a given environment.+--+-- /See:/ 'newListUserWorkloadsConfigMapsResponse' smart constructor.+data ListUserWorkloadsConfigMapsResponse = ListUserWorkloadsConfigMapsResponse+  { -- | The page token used to query for the next page if one exists.+    nextPageToken :: (Core.Maybe Core.Text),+    -- | The list of ConfigMaps returned by a ListUserWorkloadsConfigMapsRequest.+    userWorkloadsConfigMaps :: (Core.Maybe [UserWorkloadsConfigMap])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListUserWorkloadsConfigMapsResponse' with the minimum fields required to make a request.+newListUserWorkloadsConfigMapsResponse ::+  ListUserWorkloadsConfigMapsResponse+newListUserWorkloadsConfigMapsResponse =+  ListUserWorkloadsConfigMapsResponse+    { nextPageToken = Core.Nothing,+      userWorkloadsConfigMaps = Core.Nothing+    }++instance Core.FromJSON ListUserWorkloadsConfigMapsResponse where+  parseJSON =+    Core.withObject+      "ListUserWorkloadsConfigMapsResponse"+      ( \o ->+          ListUserWorkloadsConfigMapsResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "userWorkloadsConfigMaps")+      )++instance Core.ToJSON ListUserWorkloadsConfigMapsResponse where+  toJSON ListUserWorkloadsConfigMapsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("userWorkloadsConfigMaps" Core..=)+              Core.<$> userWorkloadsConfigMaps+          ]+      )++-- | The user workloads Secrets for a given environment.+--+-- /See:/ 'newListUserWorkloadsSecretsResponse' smart constructor.+data ListUserWorkloadsSecretsResponse = ListUserWorkloadsSecretsResponse+  { -- | The page token used to query for the next page if one exists.+    nextPageToken :: (Core.Maybe Core.Text),+    -- | The list of Secrets returned by a ListUserWorkloadsSecretsRequest.+    userWorkloadsSecrets :: (Core.Maybe [UserWorkloadsSecret])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListUserWorkloadsSecretsResponse' with the minimum fields required to make a request.+newListUserWorkloadsSecretsResponse ::+  ListUserWorkloadsSecretsResponse+newListUserWorkloadsSecretsResponse =+  ListUserWorkloadsSecretsResponse+    { nextPageToken = Core.Nothing,+      userWorkloadsSecrets = Core.Nothing+    }++instance Core.FromJSON ListUserWorkloadsSecretsResponse where+  parseJSON =+    Core.withObject+      "ListUserWorkloadsSecretsResponse"+      ( \o ->+          ListUserWorkloadsSecretsResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "userWorkloadsSecrets")+      )++instance Core.ToJSON ListUserWorkloadsSecretsResponse where+  toJSON ListUserWorkloadsSecretsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("userWorkloadsSecrets" Core..=) Core.<$> userWorkloadsSecrets+          ]+      )++-- | Response to ListWorkloadsRequest.+--+-- /See:/ 'newListWorkloadsResponse' smart constructor.+data ListWorkloadsResponse = ListWorkloadsResponse+  { -- | The page token used to query for the next page if one exists.+    nextPageToken :: (Core.Maybe Core.Text),+    -- | The list of environment workloads.+    workloads :: (Core.Maybe [ComposerWorkload])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListWorkloadsResponse' with the minimum fields required to make a request.+newListWorkloadsResponse ::+  ListWorkloadsResponse+newListWorkloadsResponse =+  ListWorkloadsResponse+    { nextPageToken = Core.Nothing,+      workloads = Core.Nothing+    }++instance Core.FromJSON ListWorkloadsResponse where+  parseJSON =+    Core.withObject+      "ListWorkloadsResponse"+      ( \o ->+          ListWorkloadsResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "workloads")+      )++instance Core.ToJSON ListWorkloadsResponse where+  toJSON ListWorkloadsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("workloads" Core..=) Core.<$> workloads+          ]+      )++-- | Request to load a snapshot into a Cloud Composer environment.+--+-- /See:/ 'newLoadSnapshotRequest' smart constructor.+data LoadSnapshotRequest = LoadSnapshotRequest+  { -- | Whether or not to skip setting Airflow overrides when loading the environment\'s state.+    skipAirflowOverridesSetting :: (Core.Maybe Core.Bool),+    -- | Whether or not to skip setting environment variables when loading the environment\'s state.+    skipEnvironmentVariablesSetting :: (Core.Maybe Core.Bool),+    -- | Whether or not to skip copying Cloud Storage data when loading the environment\'s state.+    skipGcsDataCopying :: (Core.Maybe Core.Bool),+    -- | Whether or not to skip installing Pypi packages when loading the environment\'s state.+    skipPypiPackagesInstallation :: (Core.Maybe Core.Bool),+    -- | A Cloud Storage path to a snapshot to load, e.g.: \"gs:\/\/my-bucket\/snapshots\/project/location/environment_timestamp\".+    snapshotPath :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'LoadSnapshotRequest' with the minimum fields required to make a request.+newLoadSnapshotRequest ::+  LoadSnapshotRequest+newLoadSnapshotRequest =+  LoadSnapshotRequest+    { skipAirflowOverridesSetting = Core.Nothing,+      skipEnvironmentVariablesSetting = Core.Nothing,+      skipGcsDataCopying = Core.Nothing,+      skipPypiPackagesInstallation = Core.Nothing,+      snapshotPath = Core.Nothing+    }++instance Core.FromJSON LoadSnapshotRequest where+  parseJSON =+    Core.withObject+      "LoadSnapshotRequest"+      ( \o ->+          LoadSnapshotRequest+            Core.<$> (o Core..:? "skipAirflowOverridesSetting")+            Core.<*> (o Core..:? "skipEnvironmentVariablesSetting")+            Core.<*> (o Core..:? "skipGcsDataCopying")+            Core.<*> (o Core..:? "skipPypiPackagesInstallation")+            Core.<*> (o Core..:? "snapshotPath")+      )++instance Core.ToJSON LoadSnapshotRequest where+  toJSON LoadSnapshotRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("skipAirflowOverridesSetting" Core..=)+              Core.<$> skipAirflowOverridesSetting,+            ("skipEnvironmentVariablesSetting" Core..=)+              Core.<$> skipEnvironmentVariablesSetting,+            ("skipGcsDataCopying" Core..=) Core.<$> skipGcsDataCopying,+            ("skipPypiPackagesInstallation" Core..=)+              Core.<$> skipPypiPackagesInstallation,+            ("snapshotPath" Core..=) Core.<$> snapshotPath+          ]+      )++-- | Response to LoadSnapshotRequest.+--+-- /See:/ 'newLoadSnapshotResponse' smart constructor.+data LoadSnapshotResponse = LoadSnapshotResponse+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'LoadSnapshotResponse' with the minimum fields required to make a request.+newLoadSnapshotResponse ::+  LoadSnapshotResponse+newLoadSnapshotResponse = LoadSnapshotResponse++instance Core.FromJSON LoadSnapshotResponse where+  parseJSON =+    Core.withObject+      "LoadSnapshotResponse"+      (\o -> Core.pure LoadSnapshotResponse)++instance Core.ToJSON LoadSnapshotResponse where+  toJSON = Core.const Core.emptyObject++-- | The configuration settings for Cloud Composer maintenance window. The following example: @{ \"startTime\":\"2019-08-01T01:00:00Z\" \"endTime\":\"2019-08-01T07:00:00Z\" \"recurrence\":\"FREQ=WEEKLY;BYDAY=TU,WE\" }@ would define a maintenance window between 01 and 07 hours UTC during each Tuesday and Wednesday.+--+-- /See:/ 'newMaintenanceWindow' smart constructor.+data MaintenanceWindow = MaintenanceWindow+  { -- | Required. Maintenance window end time. It is used only to calculate the duration of the maintenance window. The value for end-time must be in the future, relative to @start_time@.+    endTime :: (Core.Maybe Core.DateTime),+    -- | Required. Maintenance window recurrence. Format is a subset of <https://tools.ietf.org/html/rfc5545 RFC-5545> @RRULE@. The only allowed values for @FREQ@ field are @FREQ=DAILY@ and @FREQ=WEEKLY;BYDAY=...@ Example values: @FREQ=WEEKLY;BYDAY=TU,WE@, @FREQ=DAILY@.+    recurrence :: (Core.Maybe Core.Text),+    -- | Required. Start time of the first recurrence of the maintenance window.+    startTime :: (Core.Maybe Core.DateTime)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'MaintenanceWindow' with the minimum fields required to make a request.+newMaintenanceWindow ::+  MaintenanceWindow+newMaintenanceWindow =+  MaintenanceWindow+    { endTime = Core.Nothing,+      recurrence = Core.Nothing,+      startTime = Core.Nothing+    }++instance Core.FromJSON MaintenanceWindow where+  parseJSON =+    Core.withObject+      "MaintenanceWindow"+      ( \o ->+          MaintenanceWindow+            Core.<$> (o Core..:? "endTime")+            Core.<*> (o Core..:? "recurrence")+            Core.<*> (o Core..:? "startTime")+      )++instance Core.ToJSON MaintenanceWindow where+  toJSON MaintenanceWindow {..} =+    Core.object+      ( Core.catMaybes+          [ ("endTime" Core..=) Core.<$> endTime,+            ("recurrence" Core..=) Core.<$> recurrence,+            ("startTime" Core..=) Core.<$> startTime+          ]+      )++-- | Configuration options for the master authorized networks feature. Enabled master authorized networks will disallow all external traffic to access Kubernetes master through HTTPS except traffic from the given CIDR blocks, Google Compute Engine Public IPs and Google Prod IPs.+--+-- /See:/ 'newMasterAuthorizedNetworksConfig' smart constructor.+data MasterAuthorizedNetworksConfig = MasterAuthorizedNetworksConfig+  { -- | Up to 50 external networks that could access Kubernetes master through HTTPS.+    cidrBlocks :: (Core.Maybe [CidrBlock]),+    -- | Whether or not master authorized networks feature is enabled.+    enabled :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'MasterAuthorizedNetworksConfig' with the minimum fields required to make a request.+newMasterAuthorizedNetworksConfig ::+  MasterAuthorizedNetworksConfig+newMasterAuthorizedNetworksConfig =+  MasterAuthorizedNetworksConfig+    { cidrBlocks = Core.Nothing,+      enabled = Core.Nothing+    }++instance Core.FromJSON MasterAuthorizedNetworksConfig where+  parseJSON =+    Core.withObject+      "MasterAuthorizedNetworksConfig"+      ( \o ->+          MasterAuthorizedNetworksConfig+            Core.<$> (o Core..:? "cidrBlocks")+            Core.<*> (o Core..:? "enabled")+      )++instance Core.ToJSON MasterAuthorizedNetworksConfig where+  toJSON MasterAuthorizedNetworksConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("cidrBlocks" Core..=) Core.<$> cidrBlocks,+            ("enabled" Core..=) Core.<$> enabled+          ]+      )++-- | Configuration options for networking connections in the Composer 2 environment.+--+-- /See:/ 'newNetworkingConfig' smart constructor.+newtype NetworkingConfig = NetworkingConfig+  { -- | Optional. Indicates the user requested specific connection type between Tenant and Customer projects. You cannot set networking connection type in public IP environment.+    connectionType :: (Core.Maybe NetworkingConfig_ConnectionType)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'NetworkingConfig' with the minimum fields required to make a request.+newNetworkingConfig ::+  NetworkingConfig+newNetworkingConfig =+  NetworkingConfig {connectionType = Core.Nothing}++instance Core.FromJSON NetworkingConfig where+  parseJSON =+    Core.withObject+      "NetworkingConfig"+      (\o -> NetworkingConfig Core.<$> (o Core..:? "connectionType"))++instance Core.ToJSON NetworkingConfig where+  toJSON NetworkingConfig {..} =+    Core.object+      ( Core.catMaybes+          [("connectionType" Core..=) Core.<$> connectionType]+      )++-- | The configuration information for the Kubernetes Engine nodes running the Apache Airflow software.+--+-- /See:/ 'newNodeConfig' smart constructor.+data NodeConfig = NodeConfig+  { -- | Optional. The IP range in CIDR notation to use internally by Cloud Composer. IP addresses are not reserved - and the same range can be used by multiple Cloud Composer environments. In case of overlap, IPs from this range will not be accessible in the user\'s VPC network. Cannot be updated. If not specified, the default value of \'100.64.128.0\/20\' is used. This field is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+    composerInternalIpv4CidrBlock :: (Core.Maybe Core.Text),+    -- | Optional. Network Attachment that Cloud Composer environment is connected to, which provides connectivity with a user\'s VPC network. Takes precedence over network and subnetwork settings. If not provided, but network and subnetwork are defined during environment, it will be provisioned. If not provided and network and subnetwork are also empty, then connectivity to user\'s VPC network is disabled. Network attachment must be provided in format projects\/{project}\/regions\/{region}\/networkAttachments\/{networkAttachment}. This field is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+    composerNetworkAttachment :: (Core.Maybe Core.Text),+    -- | Optional. The disk size in GB used for node VMs. Minimum size is 30GB. If unspecified, defaults to 100GB. Cannot be updated. This field is supported for Cloud Composer environments in versions composer-1././-airflow-/./.*.+    diskSizeGb :: (Core.Maybe Core.Int32),+    -- | Optional. Deploys \'ip-masq-agent\' daemon set in the GKE cluster and defines nonMasqueradeCIDRs equals to pod IP range so IP masquerading is used for all destination addresses, except between pods traffic. See: https:\/\/cloud.google.com\/kubernetes-engine\/docs\/how-to\/ip-masquerade-agent+    enableIpMasqAgent :: (Core.Maybe Core.Bool),+    -- | Optional. The configuration for controlling how IPs are allocated in the GKE cluster.+    ipAllocationPolicy :: (Core.Maybe IPAllocationPolicy),+    -- | Optional. The Compute Engine </compute/docs/regions-zones zone> in which to deploy the VMs used to run the Apache Airflow software, specified as a </apis/design/resource_names#relative_resource_name relative resource name>. For example: \"projects\/{projectId}\/zones\/{zoneId}\". This @location@ must belong to the enclosing environment\'s project and location. If both this field and @nodeConfig.machineType@ are specified, @nodeConfig.machineType@ must belong to this @location@; if both are unspecified, the service will pick a zone in the Compute Engine region corresponding to the Cloud Composer location, and propagate that choice to both fields. If only one field (@location@ or @nodeConfig.machineType@) is specified, the location information from the specified field will be propagated to the unspecified field. This field is supported for Cloud Composer environments in versions composer-1././-airflow-/./.*.+    location :: (Core.Maybe Core.Text),+    -- | Optional. The Compute Engine </compute/docs/machine-types machine type> used for cluster instances, specified as a </apis/design/resource_names#relative_resource_name relative resource name>. For example: \"projects\/{projectId}\/zones\/{zoneId}\/machineTypes\/{machineTypeId}\". The @machineType@ must belong to the enclosing environment\'s project and location. If both this field and @nodeConfig.location@ are specified, this @machineType@ must belong to the @nodeConfig.location@; if both are unspecified, the service will pick a zone in the Compute Engine region corresponding to the Cloud Composer location, and propagate that choice to both fields. If exactly one of this field and @nodeConfig.location@ is specified, the location information from the specified field will be propagated to the unspecified field. The @machineTypeId@ must not be a </compute/docs/machine-types#sharedcore shared-core machine type>. If this field is unspecified, the @machineTypeId@ defaults to \"n1-standard-1\". This field is+    -- supported for Cloud Composer environments in versions composer-1././-airflow-/./.*.+    machineType :: (Core.Maybe Core.Text),+    -- | Optional. The Compute Engine network to be used for machine communications, specified as a </apis/design/resource_names#relative_resource_name relative resource name>. For example: \"projects\/{projectId}\/global\/networks\/{networkId}\". If unspecified, the \"default\" network ID in the environment\'s project is used. If a </vpc/docs/vpc#vpc_networks_and_subnets Custom Subnet Network> is provided, @nodeConfig.subnetwork@ must also be provided. For </vpc/docs/shared-vpc Shared VPC> subnetwork requirements, see @nodeConfig.subnetwork@.+    network :: (Core.Maybe Core.Text),+    -- | Optional. The set of Google API scopes to be made available on all node VMs. If @oauth_scopes@ is empty, defaults to [\"https:\/\/www.googleapis.com\/auth\/cloud-platform\"]. Cannot be updated. This field is supported for Cloud Composer environments in versions composer-1././-airflow-/./.*.+    oauthScopes :: (Core.Maybe [Core.Text]),+    -- | Optional. The Google Cloud Platform Service Account to be used by the node VMs. If a service account is not specified, the \"default\" Compute Engine service account is used. Cannot be updated.+    serviceAccount :: (Core.Maybe Core.Text),+    -- | Optional. The Compute Engine subnetwork to be used for machine communications, specified as a </apis/design/resource_names#relative_resource_name relative resource name>. For example: \"projects\/{projectId}\/regions\/{regionId}\/subnetworks\/{subnetworkId}\" If a subnetwork is provided, @nodeConfig.network@ must also be provided, and the subnetwork must belong to the enclosing environment\'s project and location.+    subnetwork :: (Core.Maybe Core.Text),+    -- | Optional. The list of instance tags applied to all node VMs. Tags are used to identify valid sources or targets for network firewalls. Each tag within the list must comply with <https://www.ietf.org/rfc/rfc1035.txt RFC1035>. Cannot be updated.+    tags :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'NodeConfig' with the minimum fields required to make a request.+newNodeConfig ::+  NodeConfig+newNodeConfig =+  NodeConfig+    { composerInternalIpv4CidrBlock = Core.Nothing,+      composerNetworkAttachment = Core.Nothing,+      diskSizeGb = Core.Nothing,+      enableIpMasqAgent = Core.Nothing,+      ipAllocationPolicy = Core.Nothing,+      location = Core.Nothing,+      machineType = Core.Nothing,+      network = Core.Nothing,+      oauthScopes = Core.Nothing,+      serviceAccount = Core.Nothing,+      subnetwork = Core.Nothing,+      tags = Core.Nothing+    }++instance Core.FromJSON NodeConfig where+  parseJSON =+    Core.withObject+      "NodeConfig"+      ( \o ->+          NodeConfig+            Core.<$> (o Core..:? "composerInternalIpv4CidrBlock")+            Core.<*> (o Core..:? "composerNetworkAttachment")+            Core.<*> (o Core..:? "diskSizeGb")+            Core.<*> (o Core..:? "enableIpMasqAgent")+            Core.<*> (o Core..:? "ipAllocationPolicy")+            Core.<*> (o Core..:? "location")+            Core.<*> (o Core..:? "machineType")+            Core.<*> (o Core..:? "network")+            Core.<*> (o Core..:? "oauthScopes")+            Core.<*> (o Core..:? "serviceAccount")+            Core.<*> (o Core..:? "subnetwork")+            Core.<*> (o Core..:? "tags")+      )++instance Core.ToJSON NodeConfig where+  toJSON NodeConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("composerInternalIpv4CidrBlock" Core..=)+              Core.<$> composerInternalIpv4CidrBlock,+            ("composerNetworkAttachment" Core..=)+              Core.<$> composerNetworkAttachment,+            ("diskSizeGb" Core..=) Core.<$> diskSizeGb,+            ("enableIpMasqAgent" Core..=) Core.<$> enableIpMasqAgent,+            ("ipAllocationPolicy" Core..=) Core.<$> ipAllocationPolicy,+            ("location" Core..=) Core.<$> location,+            ("machineType" Core..=) Core.<$> machineType,+            ("network" Core..=) Core.<$> network,+            ("oauthScopes" Core..=) Core.<$> oauthScopes,+            ("serviceAccount" Core..=) Core.<$> serviceAccount,+            ("subnetwork" Core..=) Core.<$> subnetwork,+            ("tags" Core..=) Core.<$> tags+          ]+      )++-- | This resource represents a long-running operation that is the result of a network API call.+--+-- /See:/ 'newOperation' smart constructor.+data Operation = Operation+  { -- | If the value is @false@, it means the operation is still in progress. If @true@, the operation is completed, and either @error@ or @response@ is available.+    done :: (Core.Maybe Core.Bool),+    -- | The error result of the operation in case of failure or cancellation.+    error :: (Core.Maybe Status),+    -- | Service-specific metadata associated with the operation. It typically contains progress information and common metadata such as create time. Some services might not provide such metadata. Any method that returns a long-running operation should document the metadata type, if any.+    metadata :: (Core.Maybe Operation_Metadata),+    -- | The server-assigned name, which is only unique within the same service that originally returns it. If you use the default HTTP mapping, the @name@ should be a resource name ending with @operations\/{unique_id}@.+    name :: (Core.Maybe Core.Text),+    -- | The normal, successful response of the operation. If the original method returns no data on success, such as @Delete@, the response is @google.protobuf.Empty@. If the original method is standard @Get@\/@Create@\/@Update@, the response should be the resource. For other methods, the response should have the type @XxxResponse@, where @Xxx@ is the original method name. For example, if the original method name is @TakeSnapshot()@, the inferred response type is @TakeSnapshotResponse@.+    response :: (Core.Maybe Operation_Response)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Operation' with the minimum fields required to make a request.+newOperation ::+  Operation+newOperation =+  Operation+    { done = Core.Nothing,+      error = Core.Nothing,+      metadata = Core.Nothing,+      name = Core.Nothing,+      response = Core.Nothing+    }++instance Core.FromJSON Operation where+  parseJSON =+    Core.withObject+      "Operation"+      ( \o ->+          Operation+            Core.<$> (o Core..:? "done")+            Core.<*> (o Core..:? "error")+            Core.<*> (o Core..:? "metadata")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "response")+      )++instance Core.ToJSON Operation where+  toJSON Operation {..} =+    Core.object+      ( Core.catMaybes+          [ ("done" Core..=) Core.<$> done,+            ("error" Core..=) Core.<$> error,+            ("metadata" Core..=) Core.<$> metadata,+            ("name" Core..=) Core.<$> name,+            ("response" Core..=) Core.<$> response+          ]+      )++-- | Service-specific metadata associated with the operation. It typically contains progress information and common metadata such as create time. Some services might not provide such metadata. Any method that returns a long-running operation should document the metadata type, if any.+--+-- /See:/ 'newOperation_Metadata' smart constructor.+newtype Operation_Metadata = Operation_Metadata+  { -- | Properties of the object. Contains field \@type with type URL.+    additional :: (Core.HashMap Core.Text Core.Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Operation_Metadata' with the minimum fields required to make a request.+newOperation_Metadata ::+  -- |  Properties of the object. Contains field \@type with type URL. See 'additional'.+  Core.HashMap Core.Text Core.Value ->+  Operation_Metadata+newOperation_Metadata additional =+  Operation_Metadata {additional = additional}++instance Core.FromJSON Operation_Metadata where+  parseJSON =+    Core.withObject+      "Operation_Metadata"+      (\o -> Operation_Metadata Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON Operation_Metadata where+  toJSON Operation_Metadata {..} = Core.toJSON additional++-- | The normal, successful response of the operation. If the original method returns no data on success, such as @Delete@, the response is @google.protobuf.Empty@. If the original method is standard @Get@\/@Create@\/@Update@, the response should be the resource. For other methods, the response should have the type @XxxResponse@, where @Xxx@ is the original method name. For example, if the original method name is @TakeSnapshot()@, the inferred response type is @TakeSnapshotResponse@.+--+-- /See:/ 'newOperation_Response' smart constructor.+newtype Operation_Response = Operation_Response+  { -- | Properties of the object. Contains field \@type with type URL.+    additional :: (Core.HashMap Core.Text Core.Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Operation_Response' with the minimum fields required to make a request.+newOperation_Response ::+  -- |  Properties of the object. Contains field \@type with type URL. See 'additional'.+  Core.HashMap Core.Text Core.Value ->+  Operation_Response+newOperation_Response additional =+  Operation_Response {additional = additional}++instance Core.FromJSON Operation_Response where+  parseJSON =+    Core.withObject+      "Operation_Response"+      (\o -> Operation_Response Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON Operation_Response where+  toJSON Operation_Response {..} = Core.toJSON additional++-- | Metadata describing an operation.+--+-- /See:/ 'newOperationMetadata' smart constructor.+data OperationMetadata = OperationMetadata+  { -- | Output only. The time the operation was submitted to the server.+    createTime :: (Core.Maybe Core.DateTime),+    -- | Output only. The time when the operation terminated, regardless of its success. This field is unset if the operation is still ongoing.+    endTime :: (Core.Maybe Core.DateTime),+    -- | Output only. The type of operation being performed.+    operationType :: (Core.Maybe OperationMetadata_OperationType),+    -- | Output only. The resource being operated on, as a </apis/design/resource_names#relative_resource_name relative resource name>.+    resource :: (Core.Maybe Core.Text),+    -- | Output only. The UUID of the resource being operated on.+    resourceUuid :: (Core.Maybe Core.Text),+    -- | Output only. The current operation state.+    state :: (Core.Maybe OperationMetadata_State)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'OperationMetadata' with the minimum fields required to make a request.+newOperationMetadata ::+  OperationMetadata+newOperationMetadata =+  OperationMetadata+    { createTime = Core.Nothing,+      endTime = Core.Nothing,+      operationType = Core.Nothing,+      resource = Core.Nothing,+      resourceUuid = Core.Nothing,+      state = Core.Nothing+    }++instance Core.FromJSON OperationMetadata where+  parseJSON =+    Core.withObject+      "OperationMetadata"+      ( \o ->+          OperationMetadata+            Core.<$> (o Core..:? "createTime")+            Core.<*> (o Core..:? "endTime")+            Core.<*> (o Core..:? "operationType")+            Core.<*> (o Core..:? "resource")+            Core.<*> (o Core..:? "resourceUuid")+            Core.<*> (o Core..:? "state")+      )++instance Core.ToJSON OperationMetadata where+  toJSON OperationMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("createTime" Core..=) Core.<$> createTime,+            ("endTime" Core..=) Core.<$> endTime,+            ("operationType" Core..=) Core.<$> operationType,+            ("resource" Core..=) Core.<$> resource,+            ("resourceUuid" Core..=) Core.<$> resourceUuid,+            ("state" Core..=) Core.<$> state+          ]+      )++-- | Poll Airflow Command request.+--+-- /See:/ 'newPollAirflowCommandRequest' smart constructor.+data PollAirflowCommandRequest = PollAirflowCommandRequest+  { -- | The unique ID of the command execution.+    executionId :: (Core.Maybe Core.Text),+    -- | Line number from which new logs should be fetched.+    nextLineNumber :: (Core.Maybe Core.Int32),+    -- | The name of the pod where the command is executed.+    pod :: (Core.Maybe Core.Text),+    -- | The namespace of the pod where the command is executed.+    podNamespace :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PollAirflowCommandRequest' with the minimum fields required to make a request.+newPollAirflowCommandRequest ::+  PollAirflowCommandRequest+newPollAirflowCommandRequest =+  PollAirflowCommandRequest+    { executionId = Core.Nothing,+      nextLineNumber = Core.Nothing,+      pod = Core.Nothing,+      podNamespace = Core.Nothing+    }++instance Core.FromJSON PollAirflowCommandRequest where+  parseJSON =+    Core.withObject+      "PollAirflowCommandRequest"+      ( \o ->+          PollAirflowCommandRequest+            Core.<$> (o Core..:? "executionId")+            Core.<*> (o Core..:? "nextLineNumber")+            Core.<*> (o Core..:? "pod")+            Core.<*> (o Core..:? "podNamespace")+      )++instance Core.ToJSON PollAirflowCommandRequest where+  toJSON PollAirflowCommandRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("executionId" Core..=) Core.<$> executionId,+            ("nextLineNumber" Core..=) Core.<$> nextLineNumber,+            ("pod" Core..=) Core.<$> pod,+            ("podNamespace" Core..=) Core.<$> podNamespace+          ]+      )++-- | Response to PollAirflowCommandRequest.+--+-- /See:/ 'newPollAirflowCommandResponse' smart constructor.+data PollAirflowCommandResponse = PollAirflowCommandResponse+  { -- | The result exit status of the command.+    exitInfo :: (Core.Maybe ExitInfo),+    -- | Output from the command execution. It may not contain the full output and the caller may need to poll for more lines.+    output :: (Core.Maybe [Line]),+    -- | Whether the command execution has finished and there is no more output.+    outputEnd :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PollAirflowCommandResponse' with the minimum fields required to make a request.+newPollAirflowCommandResponse ::+  PollAirflowCommandResponse+newPollAirflowCommandResponse =+  PollAirflowCommandResponse+    { exitInfo = Core.Nothing,+      output = Core.Nothing,+      outputEnd = Core.Nothing+    }++instance Core.FromJSON PollAirflowCommandResponse where+  parseJSON =+    Core.withObject+      "PollAirflowCommandResponse"+      ( \o ->+          PollAirflowCommandResponse+            Core.<$> (o Core..:? "exitInfo")+            Core.<*> (o Core..:? "output")+            Core.<*> (o Core..:? "outputEnd")+      )++instance Core.ToJSON PollAirflowCommandResponse where+  toJSON PollAirflowCommandResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("exitInfo" Core..=) Core.<$> exitInfo,+            ("output" Core..=) Core.<$> output,+            ("outputEnd" Core..=) Core.<$> outputEnd+          ]+      )++-- | Configuration options for the private GKE cluster in a Cloud Composer environment.+--+-- /See:/ 'newPrivateClusterConfig' smart constructor.+data PrivateClusterConfig = PrivateClusterConfig+  { -- | Optional. If @true@, access to the public endpoint of the GKE cluster is denied.+    enablePrivateEndpoint :: (Core.Maybe Core.Bool),+    -- | Optional. The CIDR block from which IPv4 range for GKE master will be reserved. If left blank, the default value of \'172.16.0.0\/23\' is used.+    masterIpv4CidrBlock :: (Core.Maybe Core.Text),+    -- | Output only. The IP range in CIDR notation to use for the hosted master network. This range is used for assigning internal IP addresses to the GKE cluster master or set of masters and to the internal load balancer virtual IP. This range must not overlap with any other ranges in use within the cluster\'s network.+    masterIpv4ReservedRange :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PrivateClusterConfig' with the minimum fields required to make a request.+newPrivateClusterConfig ::+  PrivateClusterConfig+newPrivateClusterConfig =+  PrivateClusterConfig+    { enablePrivateEndpoint = Core.Nothing,+      masterIpv4CidrBlock = Core.Nothing,+      masterIpv4ReservedRange = Core.Nothing+    }++instance Core.FromJSON PrivateClusterConfig where+  parseJSON =+    Core.withObject+      "PrivateClusterConfig"+      ( \o ->+          PrivateClusterConfig+            Core.<$> (o Core..:? "enablePrivateEndpoint")+            Core.<*> (o Core..:? "masterIpv4CidrBlock")+            Core.<*> (o Core..:? "masterIpv4ReservedRange")+      )++instance Core.ToJSON PrivateClusterConfig where+  toJSON PrivateClusterConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("enablePrivateEndpoint" Core..=) Core.<$> enablePrivateEndpoint,+            ("masterIpv4CidrBlock" Core..=) Core.<$> masterIpv4CidrBlock,+            ("masterIpv4ReservedRange" Core..=)+              Core.<$> masterIpv4ReservedRange+          ]+      )++-- | The configuration information for configuring a Private IP Cloud Composer environment.+--+-- /See:/ 'newPrivateEnvironmentConfig' smart constructor.+data PrivateEnvironmentConfig = PrivateEnvironmentConfig+  { -- | Optional. When specified, the environment will use Private Service Connect instead of VPC peerings to connect to Cloud SQL in the Tenant Project, and the PSC endpoint in the Customer Project will use an IP address from this subnetwork.+    cloudComposerConnectionSubnetwork :: (Core.Maybe Core.Text),+    -- | Optional. The CIDR block from which IP range for Cloud Composer Network in tenant project will be reserved. Needs to be disjoint from private/cluster/config.master/ipv4/cidr/block and cloud/sql/ipv4/cidr_block. This field is supported for Cloud Composer environments in versions composer-2././-airflow-/./.* and newer.+    cloudComposerNetworkIpv4CidrBlock :: (Core.Maybe Core.Text),+    -- | Output only. The IP range reserved for the tenant project\'s Cloud Composer network. This field is supported for Cloud Composer environments in versions composer-2././-airflow-/./.* and newer.+    cloudComposerNetworkIpv4ReservedRange :: (Core.Maybe Core.Text),+    -- | Optional. The CIDR block from which IP range in tenant project will be reserved for Cloud SQL. Needs to be disjoint from @web_server_ipv4_cidr_block@.+    cloudSqlIpv4CidrBlock :: (Core.Maybe Core.Text),+    -- | Optional. If @true@, builds performed during operations that install Python packages have only private connectivity to Google services (including Artifact Registry) and VPC network (if either @NodeConfig.network@ and @NodeConfig.subnetwork@ fields or @NodeConfig.composer_network_attachment@ field are specified). If @false@, the builds also have access to the internet. This field is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+    enablePrivateBuildsOnly :: (Core.Maybe Core.Bool),+    -- | Optional. If @true@, a Private IP Cloud Composer environment is created. If this field is set to true, @IPAllocationPolicy.use_ip_aliases@ must be set to true for Cloud Composer environments in versions composer-1././-airflow-/./.*.+    enablePrivateEnvironment :: (Core.Maybe Core.Bool),+    -- | Optional. When enabled, IPs from public (non-RFC1918) ranges can be used for @IPAllocationPolicy.cluster_ipv4_cidr_block@ and @IPAllocationPolicy.service_ipv4_cidr_block@.+    enablePrivatelyUsedPublicIps :: (Core.Maybe Core.Bool),+    -- | Optional. Configuration for the network connections configuration in the environment.+    networkingConfig :: (Core.Maybe NetworkingConfig),+    -- | Optional. Configuration for the private GKE cluster for a Private IP Cloud Composer environment.+    privateClusterConfig :: (Core.Maybe PrivateClusterConfig),+    -- | Optional. The CIDR block from which IP range for web server will be reserved. Needs to be disjoint from @private_cluster_config.master_ipv4_cidr_block@ and @cloud_sql_ipv4_cidr_block@. This field is supported for Cloud Composer environments in versions composer-1././-airflow-/./.*.+    webServerIpv4CidrBlock :: (Core.Maybe Core.Text),+    -- | Output only. The IP range reserved for the tenant project\'s App Engine VMs. This field is supported for Cloud Composer environments in versions composer-1././-airflow-/./.*.+    webServerIpv4ReservedRange :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PrivateEnvironmentConfig' with the minimum fields required to make a request.+newPrivateEnvironmentConfig ::+  PrivateEnvironmentConfig+newPrivateEnvironmentConfig =+  PrivateEnvironmentConfig+    { cloudComposerConnectionSubnetwork =+        Core.Nothing,+      cloudComposerNetworkIpv4CidrBlock = Core.Nothing,+      cloudComposerNetworkIpv4ReservedRange = Core.Nothing,+      cloudSqlIpv4CidrBlock = Core.Nothing,+      enablePrivateBuildsOnly = Core.Nothing,+      enablePrivateEnvironment = Core.Nothing,+      enablePrivatelyUsedPublicIps = Core.Nothing,+      networkingConfig = Core.Nothing,+      privateClusterConfig = Core.Nothing,+      webServerIpv4CidrBlock = Core.Nothing,+      webServerIpv4ReservedRange = Core.Nothing+    }++instance Core.FromJSON PrivateEnvironmentConfig where+  parseJSON =+    Core.withObject+      "PrivateEnvironmentConfig"+      ( \o ->+          PrivateEnvironmentConfig+            Core.<$> (o Core..:? "cloudComposerConnectionSubnetwork")+            Core.<*> (o Core..:? "cloudComposerNetworkIpv4CidrBlock")+            Core.<*> (o Core..:? "cloudComposerNetworkIpv4ReservedRange")+            Core.<*> (o Core..:? "cloudSqlIpv4CidrBlock")+            Core.<*> (o Core..:? "enablePrivateBuildsOnly")+            Core.<*> (o Core..:? "enablePrivateEnvironment")+            Core.<*> (o Core..:? "enablePrivatelyUsedPublicIps")+            Core.<*> (o Core..:? "networkingConfig")+            Core.<*> (o Core..:? "privateClusterConfig")+            Core.<*> (o Core..:? "webServerIpv4CidrBlock")+            Core.<*> (o Core..:? "webServerIpv4ReservedRange")+      )++instance Core.ToJSON PrivateEnvironmentConfig where+  toJSON PrivateEnvironmentConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("cloudComposerConnectionSubnetwork" Core..=)+              Core.<$> cloudComposerConnectionSubnetwork,+            ("cloudComposerNetworkIpv4CidrBlock" Core..=)+              Core.<$> cloudComposerNetworkIpv4CidrBlock,+            ("cloudComposerNetworkIpv4ReservedRange" Core..=)+              Core.<$> cloudComposerNetworkIpv4ReservedRange,+            ("cloudSqlIpv4CidrBlock" Core..=) Core.<$> cloudSqlIpv4CidrBlock,+            ("enablePrivateBuildsOnly" Core..=)+              Core.<$> enablePrivateBuildsOnly,+            ("enablePrivateEnvironment" Core..=)+              Core.<$> enablePrivateEnvironment,+            ("enablePrivatelyUsedPublicIps" Core..=)+              Core.<$> enablePrivatelyUsedPublicIps,+            ("networkingConfig" Core..=) Core.<$> networkingConfig,+            ("privateClusterConfig" Core..=) Core.<$> privateClusterConfig,+            ("webServerIpv4CidrBlock" Core..=) Core.<$> webServerIpv4CidrBlock,+            ("webServerIpv4ReservedRange" Core..=)+              Core.<$> webServerIpv4ReservedRange+          ]+      )++-- | The Recovery settings of an environment.+--+-- /See:/ 'newRecoveryConfig' smart constructor.+newtype RecoveryConfig = RecoveryConfig+  { -- | Optional. The configuration for scheduled snapshot creation mechanism.+    scheduledSnapshotsConfig :: (Core.Maybe ScheduledSnapshotsConfig)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RecoveryConfig' with the minimum fields required to make a request.+newRecoveryConfig ::+  RecoveryConfig+newRecoveryConfig =+  RecoveryConfig {scheduledSnapshotsConfig = Core.Nothing}++instance Core.FromJSON RecoveryConfig where+  parseJSON =+    Core.withObject+      "RecoveryConfig"+      ( \o ->+          RecoveryConfig Core.<$> (o Core..:? "scheduledSnapshotsConfig")+      )++instance Core.ToJSON RecoveryConfig where+  toJSON RecoveryConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("scheduledSnapshotsConfig" Core..=)+              Core.<$> scheduledSnapshotsConfig+          ]+      )++-- | Request to create a snapshot of a Cloud Composer environment.+--+-- /See:/ 'newSaveSnapshotRequest' smart constructor.+newtype SaveSnapshotRequest = SaveSnapshotRequest+  { -- | Location in a Cloud Storage where the snapshot is going to be stored, e.g.: \"gs:\/\/my-bucket\/snapshots\".+    snapshotLocation :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SaveSnapshotRequest' with the minimum fields required to make a request.+newSaveSnapshotRequest ::+  SaveSnapshotRequest+newSaveSnapshotRequest =+  SaveSnapshotRequest {snapshotLocation = Core.Nothing}++instance Core.FromJSON SaveSnapshotRequest where+  parseJSON =+    Core.withObject+      "SaveSnapshotRequest"+      ( \o ->+          SaveSnapshotRequest Core.<$> (o Core..:? "snapshotLocation")+      )++instance Core.ToJSON SaveSnapshotRequest where+  toJSON SaveSnapshotRequest {..} =+    Core.object+      ( Core.catMaybes+          [("snapshotLocation" Core..=) Core.<$> snapshotLocation]+      )++-- | Response to SaveSnapshotRequest.+--+-- /See:/ 'newSaveSnapshotResponse' smart constructor.+newtype SaveSnapshotResponse = SaveSnapshotResponse+  { -- | The fully-resolved Cloud Storage path of the created snapshot, e.g.: \"gs:\/\/my-bucket\/snapshots\/project/location/environment_timestamp\". This field is populated only if the snapshot creation was successful.+    snapshotPath :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SaveSnapshotResponse' with the minimum fields required to make a request.+newSaveSnapshotResponse ::+  SaveSnapshotResponse+newSaveSnapshotResponse =+  SaveSnapshotResponse {snapshotPath = Core.Nothing}++instance Core.FromJSON SaveSnapshotResponse where+  parseJSON =+    Core.withObject+      "SaveSnapshotResponse"+      (\o -> SaveSnapshotResponse Core.<$> (o Core..:? "snapshotPath"))++instance Core.ToJSON SaveSnapshotResponse where+  toJSON SaveSnapshotResponse {..} =+    Core.object+      (Core.catMaybes [("snapshotPath" Core..=) Core.<$> snapshotPath])++-- | The configuration for scheduled snapshot creation mechanism.+--+-- /See:/ 'newScheduledSnapshotsConfig' smart constructor.+data ScheduledSnapshotsConfig = ScheduledSnapshotsConfig+  { -- | Optional. Whether scheduled snapshots creation is enabled.+    enabled :: (Core.Maybe Core.Bool),+    -- | Optional. The cron expression representing the time when snapshots creation mechanism runs. This field is subject to additional validation around frequency of execution.+    snapshotCreationSchedule :: (Core.Maybe Core.Text),+    -- | Optional. The Cloud Storage location for storing automatically created snapshots.+    snapshotLocation :: (Core.Maybe Core.Text),+    -- | Optional. Time zone that sets the context to interpret snapshot/creation/schedule.+    timeZone :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ScheduledSnapshotsConfig' with the minimum fields required to make a request.+newScheduledSnapshotsConfig ::+  ScheduledSnapshotsConfig+newScheduledSnapshotsConfig =+  ScheduledSnapshotsConfig+    { enabled = Core.Nothing,+      snapshotCreationSchedule = Core.Nothing,+      snapshotLocation = Core.Nothing,+      timeZone = Core.Nothing+    }++instance Core.FromJSON ScheduledSnapshotsConfig where+  parseJSON =+    Core.withObject+      "ScheduledSnapshotsConfig"+      ( \o ->+          ScheduledSnapshotsConfig+            Core.<$> (o Core..:? "enabled")+            Core.<*> (o Core..:? "snapshotCreationSchedule")+            Core.<*> (o Core..:? "snapshotLocation")+            Core.<*> (o Core..:? "timeZone")+      )++instance Core.ToJSON ScheduledSnapshotsConfig where+  toJSON ScheduledSnapshotsConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("enabled" Core..=) Core.<$> enabled,+            ("snapshotCreationSchedule" Core..=)+              Core.<$> snapshotCreationSchedule,+            ("snapshotLocation" Core..=) Core.<$> snapshotLocation,+            ("timeZone" Core..=) Core.<$> timeZone+          ]+      )++-- | Configuration for resources used by Airflow schedulers.+--+-- /See:/ 'newSchedulerResource' smart constructor.+data SchedulerResource = SchedulerResource+  { -- | Optional. The number of schedulers.+    count :: (Core.Maybe Core.Int32),+    -- | Optional. CPU request and limit for a single Airflow scheduler replica.+    cpu :: (Core.Maybe Core.Double),+    -- | Optional. Memory (GB) request and limit for a single Airflow scheduler replica.+    memoryGb :: (Core.Maybe Core.Double),+    -- | Optional. Storage (GB) request and limit for a single Airflow scheduler replica.+    storageGb :: (Core.Maybe Core.Double)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SchedulerResource' with the minimum fields required to make a request.+newSchedulerResource ::+  SchedulerResource+newSchedulerResource =+  SchedulerResource+    { count = Core.Nothing,+      cpu = Core.Nothing,+      memoryGb = Core.Nothing,+      storageGb = Core.Nothing+    }++instance Core.FromJSON SchedulerResource where+  parseJSON =+    Core.withObject+      "SchedulerResource"+      ( \o ->+          SchedulerResource+            Core.<$> (o Core..:? "count")+            Core.<*> (o Core..:? "cpu")+            Core.<*> (o Core..:? "memoryGb")+            Core.<*> (o Core..:? "storageGb")+      )++instance Core.ToJSON SchedulerResource where+  toJSON SchedulerResource {..} =+    Core.object+      ( Core.catMaybes+          [ ("count" Core..=) Core.<$> count,+            ("cpu" Core..=) Core.<$> cpu,+            ("memoryGb" Core..=) Core.<$> memoryGb,+            ("storageGb" Core..=) Core.<$> storageGb+          ]+      )++-- | Specifies the selection and configuration of software inside the environment.+--+-- /See:/ 'newSoftwareConfig' smart constructor.+data SoftwareConfig = SoftwareConfig+  { -- | Optional. Apache Airflow configuration properties to override. Property keys contain the section and property names, separated by a hyphen, for example \"core-dags/are/paused/at/creation\". Section names must not contain hyphens (\"-\"), opening square brackets (\"[\"), or closing square brackets (\"]\"). The property name must not be empty and must not contain an equals sign (\"=\") or semicolon (\";\"). Section and property names must not contain a period (\".\"). Apache Airflow configuration property names must be written in <https://en.wikipedia.org/wiki/Snake_case snake_case>. Property values can contain any character, and can be written in any lower\/upper case format. Certain Apache Airflow configuration property values are </composer/docs/concepts/airflow-configurations blocked>, and cannot be overridden.+    airflowConfigOverrides :: (Core.Maybe SoftwareConfig_AirflowConfigOverrides),+    -- | Optional. The configuration for Cloud Data Lineage integration.+    cloudDataLineageIntegration :: (Core.Maybe CloudDataLineageIntegration),+    -- | Optional. Additional environment variables to provide to the Apache Airflow scheduler, worker, and webserver processes. Environment variable names must match the regular expression @a-zA-Z_*@. They cannot specify Apache Airflow software configuration overrides (they cannot match the regular expression @AIRFLOW__[A-Z0-9_]+__[A-Z0-9_]+@), and they cannot match any of the following reserved names: * @AIRFLOW_HOME@ * @C_FORCE_ROOT@ * @CONTAINER_NAME@ * @DAGS_FOLDER@ * @GCP_PROJECT@ * @GCS_BUCKET@ * @GKE_CLUSTER_NAME@ * @SQL_DATABASE@ * @SQL_INSTANCE@ * @SQL_PASSWORD@ * @SQL_PROJECT@ * @SQL_REGION@ * @SQL_USER@+    envVariables :: (Core.Maybe SoftwareConfig_EnvVariables),+    -- | Optional. The version of the software running in the environment. This encapsulates both the version of Cloud Composer functionality and the version of Apache Airflow. It must match the regular expression @composer-([0-9]+(\\.[0-9]+\\.[0-9]+(-preview\\.[0-9]+)?)?|latest)-airflow-([0-9]+(\\.[0-9]+(\\.[0-9]+)?)?)@. When used as input, the server also checks if the provided version is supported and denies the request for an unsupported version. The Cloud Composer portion of the image version is a full <https://semver.org semantic version>, or an alias in the form of major version number or @latest@. When an alias is provided, the server replaces it with the current Cloud Composer version that satisfies the alias. The Apache Airflow portion of the image version is a full semantic version that points to one of the supported Apache Airflow versions, or an alias in the form of only major or major.minor versions specified. When an alias is provided, the server replaces it with the latest Apache Airflow version that+    -- satisfies the alias and is supported in the given Cloud Composer version. In all cases, the resolved image version is stored in the same field. See also </composer/docs/concepts/versioning/composer-versions version list> and </composer/docs/concepts/versioning/composer-versioning-overview versioning overview>.+    imageVersion :: (Core.Maybe Core.Text),+    -- | Optional. Custom Python Package Index (PyPI) packages to be installed in the environment. Keys refer to the lowercase package name such as \"numpy\" and values are the lowercase extras and version specifier such as \"==1.12.0\", \"[devel,gcp_api]\", or \"[devel]>=1.8.2, \<1.9.2\". To specify a package without pinning it to a version specifier, use the empty string as the value.+    pypiPackages :: (Core.Maybe SoftwareConfig_PypiPackages),+    -- | Optional. The major version of Python used to run the Apache Airflow scheduler, worker, and webserver processes. Can be set to \'2\' or \'3\'. If not specified, the default is \'3\'. Cannot be updated. This field is only supported for Cloud Composer environments in versions composer-1././-airflow-/./.*. Environments in newer versions always use Python major version 3.+    pythonVersion :: (Core.Maybe Core.Text),+    -- | Optional. The number of schedulers for Airflow. This field is supported for Cloud Composer environments in versions composer-1././-airflow-2././.+    schedulerCount :: (Core.Maybe Core.Int32),+    -- | Optional. Whether or not the web server uses custom plugins. If unspecified, the field defaults to @PLUGINS_ENABLED@. This field is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+    webServerPluginsMode :: (Core.Maybe SoftwareConfig_WebServerPluginsMode)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SoftwareConfig' with the minimum fields required to make a request.+newSoftwareConfig ::+  SoftwareConfig+newSoftwareConfig =+  SoftwareConfig+    { airflowConfigOverrides = Core.Nothing,+      cloudDataLineageIntegration = Core.Nothing,+      envVariables = Core.Nothing,+      imageVersion = Core.Nothing,+      pypiPackages = Core.Nothing,+      pythonVersion = Core.Nothing,+      schedulerCount = Core.Nothing,+      webServerPluginsMode = Core.Nothing+    }++instance Core.FromJSON SoftwareConfig where+  parseJSON =+    Core.withObject+      "SoftwareConfig"+      ( \o ->+          SoftwareConfig+            Core.<$> (o Core..:? "airflowConfigOverrides")+            Core.<*> (o Core..:? "cloudDataLineageIntegration")+            Core.<*> (o Core..:? "envVariables")+            Core.<*> (o Core..:? "imageVersion")+            Core.<*> (o Core..:? "pypiPackages")+            Core.<*> (o Core..:? "pythonVersion")+            Core.<*> (o Core..:? "schedulerCount")+            Core.<*> (o Core..:? "webServerPluginsMode")+      )++instance Core.ToJSON SoftwareConfig where+  toJSON SoftwareConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("airflowConfigOverrides" Core..=)+              Core.<$> airflowConfigOverrides,+            ("cloudDataLineageIntegration" Core..=)+              Core.<$> cloudDataLineageIntegration,+            ("envVariables" Core..=) Core.<$> envVariables,+            ("imageVersion" Core..=) Core.<$> imageVersion,+            ("pypiPackages" Core..=) Core.<$> pypiPackages,+            ("pythonVersion" Core..=) Core.<$> pythonVersion,+            ("schedulerCount" Core..=) Core.<$> schedulerCount,+            ("webServerPluginsMode" Core..=) Core.<$> webServerPluginsMode+          ]+      )++-- | Optional. Apache Airflow configuration properties to override. Property keys contain the section and property names, separated by a hyphen, for example \"core-dags/are/paused/at/creation\". Section names must not contain hyphens (\"-\"), opening square brackets (\"[\"), or closing square brackets (\"]\"). The property name must not be empty and must not contain an equals sign (\"=\") or semicolon (\";\"). Section and property names must not contain a period (\".\"). Apache Airflow configuration property names must be written in <https://en.wikipedia.org/wiki/Snake_case snake_case>. Property values can contain any character, and can be written in any lower\/upper case format. Certain Apache Airflow configuration property values are </composer/docs/concepts/airflow-configurations blocked>, and cannot be overridden.+--+-- /See:/ 'newSoftwareConfig_AirflowConfigOverrides' smart constructor.+newtype SoftwareConfig_AirflowConfigOverrides = SoftwareConfig_AirflowConfigOverrides+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SoftwareConfig_AirflowConfigOverrides' with the minimum fields required to make a request.+newSoftwareConfig_AirflowConfigOverrides ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  SoftwareConfig_AirflowConfigOverrides+newSoftwareConfig_AirflowConfigOverrides additional =+  SoftwareConfig_AirflowConfigOverrides {additional = additional}++instance Core.FromJSON SoftwareConfig_AirflowConfigOverrides where+  parseJSON =+    Core.withObject+      "SoftwareConfig_AirflowConfigOverrides"+      ( \o ->+          SoftwareConfig_AirflowConfigOverrides+            Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON SoftwareConfig_AirflowConfigOverrides where+  toJSON SoftwareConfig_AirflowConfigOverrides {..} =+    Core.toJSON additional++-- | Optional. Additional environment variables to provide to the Apache Airflow scheduler, worker, and webserver processes. Environment variable names must match the regular expression @a-zA-Z_*@. They cannot specify Apache Airflow software configuration overrides (they cannot match the regular expression @AIRFLOW__[A-Z0-9_]+__[A-Z0-9_]+@), and they cannot match any of the following reserved names: * @AIRFLOW_HOME@ * @C_FORCE_ROOT@ * @CONTAINER_NAME@ * @DAGS_FOLDER@ * @GCP_PROJECT@ * @GCS_BUCKET@ * @GKE_CLUSTER_NAME@ * @SQL_DATABASE@ * @SQL_INSTANCE@ * @SQL_PASSWORD@ * @SQL_PROJECT@ * @SQL_REGION@ * @SQL_USER@+--+-- /See:/ 'newSoftwareConfig_EnvVariables' smart constructor.+newtype SoftwareConfig_EnvVariables = SoftwareConfig_EnvVariables+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SoftwareConfig_EnvVariables' with the minimum fields required to make a request.+newSoftwareConfig_EnvVariables ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  SoftwareConfig_EnvVariables+newSoftwareConfig_EnvVariables additional =+  SoftwareConfig_EnvVariables {additional = additional}++instance Core.FromJSON SoftwareConfig_EnvVariables where+  parseJSON =+    Core.withObject+      "SoftwareConfig_EnvVariables"+      ( \o ->+          SoftwareConfig_EnvVariables Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON SoftwareConfig_EnvVariables where+  toJSON SoftwareConfig_EnvVariables {..} = Core.toJSON additional++-- | Optional. Custom Python Package Index (PyPI) packages to be installed in the environment. Keys refer to the lowercase package name such as \"numpy\" and values are the lowercase extras and version specifier such as \"==1.12.0\", \"[devel,gcp_api]\", or \"[devel]>=1.8.2, \<1.9.2\". To specify a package without pinning it to a version specifier, use the empty string as the value.+--+-- /See:/ 'newSoftwareConfig_PypiPackages' smart constructor.+newtype SoftwareConfig_PypiPackages = SoftwareConfig_PypiPackages+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SoftwareConfig_PypiPackages' with the minimum fields required to make a request.+newSoftwareConfig_PypiPackages ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  SoftwareConfig_PypiPackages+newSoftwareConfig_PypiPackages additional =+  SoftwareConfig_PypiPackages {additional = additional}++instance Core.FromJSON SoftwareConfig_PypiPackages where+  parseJSON =+    Core.withObject+      "SoftwareConfig_PypiPackages"+      ( \o ->+          SoftwareConfig_PypiPackages Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON SoftwareConfig_PypiPackages where+  toJSON SoftwareConfig_PypiPackages {..} = Core.toJSON additional++-- | The @Status@ type defines a logical error model that is suitable for different programming environments, including REST APIs and RPC APIs. It is used by <https://github.com/grpc gRPC>. Each @Status@ message contains three pieces of data: error code, error message, and error details. You can find out more about this error model and how to work with it in the <https://cloud.google.com/apis/design/errors API Design Guide>.+--+-- /See:/ 'newStatus' smart constructor.+data Status = Status+  { -- | The status code, which should be an enum value of google.rpc.Code.+    code :: (Core.Maybe Core.Int32),+    -- | A list of messages that carry the error details. There is a common set of message types for APIs to use.+    details :: (Core.Maybe [Status_DetailsItem]),+    -- | A developer-facing error message, which should be in English. Any user-facing error message should be localized and sent in the google.rpc.Status.details field, or localized by the client.+    message :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Status' with the minimum fields required to make a request.+newStatus ::+  Status+newStatus =+  Status+    { code = Core.Nothing,+      details = Core.Nothing,+      message = Core.Nothing+    }++instance Core.FromJSON Status where+  parseJSON =+    Core.withObject+      "Status"+      ( \o ->+          Status+            Core.<$> (o Core..:? "code")+            Core.<*> (o Core..:? "details")+            Core.<*> (o Core..:? "message")+      )++instance Core.ToJSON Status where+  toJSON Status {..} =+    Core.object+      ( Core.catMaybes+          [ ("code" Core..=) Core.<$> code,+            ("details" Core..=) Core.<$> details,+            ("message" Core..=) Core.<$> message+          ]+      )++--+-- /See:/ 'newStatus_DetailsItem' smart constructor.+newtype Status_DetailsItem = Status_DetailsItem+  { -- | Properties of the object. Contains field \@type with type URL.+    additional :: (Core.HashMap Core.Text Core.Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Status_DetailsItem' with the minimum fields required to make a request.+newStatus_DetailsItem ::+  -- |  Properties of the object. Contains field \@type with type URL. See 'additional'.+  Core.HashMap Core.Text Core.Value ->+  Status_DetailsItem+newStatus_DetailsItem additional =+  Status_DetailsItem {additional = additional}++instance Core.FromJSON Status_DetailsItem where+  parseJSON =+    Core.withObject+      "Status_DetailsItem"+      (\o -> Status_DetailsItem Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON Status_DetailsItem where+  toJSON Status_DetailsItem {..} = Core.toJSON additional++-- | Stop Airflow Command request.+--+-- /See:/ 'newStopAirflowCommandRequest' smart constructor.+data StopAirflowCommandRequest = StopAirflowCommandRequest+  { -- | The unique ID of the command execution.+    executionId :: (Core.Maybe Core.Text),+    -- | If true, the execution is terminated forcefully (SIGKILL). If false, the execution is stopped gracefully, giving it time for cleanup.+    force :: (Core.Maybe Core.Bool),+    -- | The name of the pod where the command is executed.+    pod :: (Core.Maybe Core.Text),+    -- | The namespace of the pod where the command is executed.+    podNamespace :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'StopAirflowCommandRequest' with the minimum fields required to make a request.+newStopAirflowCommandRequest ::+  StopAirflowCommandRequest+newStopAirflowCommandRequest =+  StopAirflowCommandRequest+    { executionId = Core.Nothing,+      force = Core.Nothing,+      pod = Core.Nothing,+      podNamespace = Core.Nothing+    }++instance Core.FromJSON StopAirflowCommandRequest where+  parseJSON =+    Core.withObject+      "StopAirflowCommandRequest"+      ( \o ->+          StopAirflowCommandRequest+            Core.<$> (o Core..:? "executionId")+            Core.<*> (o Core..:? "force")+            Core.<*> (o Core..:? "pod")+            Core.<*> (o Core..:? "podNamespace")+      )++instance Core.ToJSON StopAirflowCommandRequest where+  toJSON StopAirflowCommandRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("executionId" Core..=) Core.<$> executionId,+            ("force" Core..=) Core.<$> force,+            ("pod" Core..=) Core.<$> pod,+            ("podNamespace" Core..=) Core.<$> podNamespace+          ]+      )++-- | Response to StopAirflowCommandRequest.+--+-- /See:/ 'newStopAirflowCommandResponse' smart constructor.+data StopAirflowCommandResponse = StopAirflowCommandResponse+  { -- | Whether the execution is still running.+    isDone :: (Core.Maybe Core.Bool),+    -- | Output message from stopping execution request.+    output :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'StopAirflowCommandResponse' with the minimum fields required to make a request.+newStopAirflowCommandResponse ::+  StopAirflowCommandResponse+newStopAirflowCommandResponse =+  StopAirflowCommandResponse+    { isDone = Core.Nothing,+      output = Core.Nothing+    }++instance Core.FromJSON StopAirflowCommandResponse where+  parseJSON =+    Core.withObject+      "StopAirflowCommandResponse"+      ( \o ->+          StopAirflowCommandResponse+            Core.<$> (o Core..:? "isDone")+            Core.<*> (o Core..:? "output")+      )++instance Core.ToJSON StopAirflowCommandResponse where+  toJSON StopAirflowCommandResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("isDone" Core..=) Core.<$> isDone,+            ("output" Core..=) Core.<$> output+          ]+      )++-- | The configuration for data storage in the environment.+--+-- /See:/ 'newStorageConfig' smart constructor.+newtype StorageConfig = StorageConfig+  { -- | Optional. The name of the Cloud Storage bucket used by the environment. No @gs:\/\/@ prefix.+    bucket :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'StorageConfig' with the minimum fields required to make a request.+newStorageConfig ::+  StorageConfig+newStorageConfig = StorageConfig {bucket = Core.Nothing}++instance Core.FromJSON StorageConfig where+  parseJSON =+    Core.withObject+      "StorageConfig"+      (\o -> StorageConfig Core.<$> (o Core..:? "bucket"))++instance Core.ToJSON StorageConfig where+  toJSON StorageConfig {..} =+    Core.object (Core.catMaybes [("bucket" Core..=) Core.<$> bucket])++-- | The configuration setting for Task Logs.+--+-- /See:/ 'newTaskLogsRetentionConfig' smart constructor.+newtype TaskLogsRetentionConfig = TaskLogsRetentionConfig+  { -- | Optional. The mode of storage for Airflow workers task logs.+    storageMode :: (Core.Maybe TaskLogsRetentionConfig_StorageMode)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TaskLogsRetentionConfig' with the minimum fields required to make a request.+newTaskLogsRetentionConfig ::+  TaskLogsRetentionConfig+newTaskLogsRetentionConfig =+  TaskLogsRetentionConfig {storageMode = Core.Nothing}++instance Core.FromJSON TaskLogsRetentionConfig where+  parseJSON =+    Core.withObject+      "TaskLogsRetentionConfig"+      ( \o ->+          TaskLogsRetentionConfig Core.<$> (o Core..:? "storageMode")+      )++instance Core.ToJSON TaskLogsRetentionConfig where+  toJSON TaskLogsRetentionConfig {..} =+    Core.object+      (Core.catMaybes [("storageMode" Core..=) Core.<$> storageMode])++-- | Configuration for resources used by Airflow triggerers.+--+-- /See:/ 'newTriggererResource' smart constructor.+data TriggererResource = TriggererResource+  { -- | Optional. The number of triggerers.+    count :: (Core.Maybe Core.Int32),+    -- | Optional. CPU request and limit for a single Airflow triggerer replica.+    cpu :: (Core.Maybe Core.Double),+    -- | Optional. Memory (GB) request and limit for a single Airflow triggerer replica.+    memoryGb :: (Core.Maybe Core.Double)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TriggererResource' with the minimum fields required to make a request.+newTriggererResource ::+  TriggererResource+newTriggererResource =+  TriggererResource+    { count = Core.Nothing,+      cpu = Core.Nothing,+      memoryGb = Core.Nothing+    }++instance Core.FromJSON TriggererResource where+  parseJSON =+    Core.withObject+      "TriggererResource"+      ( \o ->+          TriggererResource+            Core.<$> (o Core..:? "count")+            Core.<*> (o Core..:? "cpu")+            Core.<*> (o Core..:? "memoryGb")+      )++instance Core.ToJSON TriggererResource where+  toJSON TriggererResource {..} =+    Core.object+      ( Core.catMaybes+          [ ("count" Core..=) Core.<$> count,+            ("cpu" Core..=) Core.<$> cpu,+            ("memoryGb" Core..=) Core.<$> memoryGb+          ]+      )++-- | User workloads ConfigMap used by Airflow tasks that run with Kubernetes executor or KubernetesPodOperator.+--+-- /See:/ 'newUserWorkloadsConfigMap' smart constructor.+data UserWorkloadsConfigMap = UserWorkloadsConfigMap+  { -- | Optional. The \"data\" field of Kubernetes ConfigMap, organized in key-value pairs. For details see: https:\/\/kubernetes.io\/docs\/concepts\/configuration\/configmap\/ Example: { \"example/key\": \"example/value\", \"another/key\": \"another/value\" }+    data' :: (Core.Maybe UserWorkloadsConfigMap_Data),+    -- | Identifier. The resource name of the ConfigMap, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsConfigMaps\/{userWorkloadsConfigMapId}\"+    name :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'UserWorkloadsConfigMap' with the minimum fields required to make a request.+newUserWorkloadsConfigMap ::+  UserWorkloadsConfigMap+newUserWorkloadsConfigMap =+  UserWorkloadsConfigMap {data' = Core.Nothing, name = Core.Nothing}++instance Core.FromJSON UserWorkloadsConfigMap where+  parseJSON =+    Core.withObject+      "UserWorkloadsConfigMap"+      ( \o ->+          UserWorkloadsConfigMap+            Core.<$> (o Core..:? "data")+            Core.<*> (o Core..:? "name")+      )++instance Core.ToJSON UserWorkloadsConfigMap where+  toJSON UserWorkloadsConfigMap {..} =+    Core.object+      ( Core.catMaybes+          [("data" Core..=) Core.<$> data', ("name" Core..=) Core.<$> name]+      )++-- | Optional. The \"data\" field of Kubernetes ConfigMap, organized in key-value pairs. For details see: https:\/\/kubernetes.io\/docs\/concepts\/configuration\/configmap\/ Example: { \"example/key\": \"example/value\", \"another/key\": \"another/value\" }+--+-- /See:/ 'newUserWorkloadsConfigMap_Data' smart constructor.+newtype UserWorkloadsConfigMap_Data = UserWorkloadsConfigMap_Data+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'UserWorkloadsConfigMap_Data' with the minimum fields required to make a request.+newUserWorkloadsConfigMap_Data ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  UserWorkloadsConfigMap_Data+newUserWorkloadsConfigMap_Data additional =+  UserWorkloadsConfigMap_Data {additional = additional}++instance Core.FromJSON UserWorkloadsConfigMap_Data where+  parseJSON =+    Core.withObject+      "UserWorkloadsConfigMap_Data"+      ( \o ->+          UserWorkloadsConfigMap_Data Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON UserWorkloadsConfigMap_Data where+  toJSON UserWorkloadsConfigMap_Data {..} = Core.toJSON additional++-- | User workloads Secret used by Airflow tasks that run with Kubernetes executor or KubernetesPodOperator.+--+-- /See:/ 'newUserWorkloadsSecret' smart constructor.+data UserWorkloadsSecret = UserWorkloadsSecret+  { -- | Optional. The \"data\" field of Kubernetes Secret, organized in key-value pairs, which can contain sensitive values such as a password, a token, or a key. The values for all keys have to be base64-encoded strings. For details see: https:\/\/kubernetes.io\/docs\/concepts\/configuration\/secret\/ Example: { \"example\": \"ZXhhbXBsZV92YWx1ZQ==\", \"another-example\": \"YW5vdGhlcl9leGFtcGxlX3ZhbHVl\" }+    data' :: (Core.Maybe UserWorkloadsSecret_Data),+    -- | Identifier. The resource name of the Secret, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsSecrets\/{userWorkloadsSecretId}\"+    name :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'UserWorkloadsSecret' with the minimum fields required to make a request.+newUserWorkloadsSecret ::+  UserWorkloadsSecret+newUserWorkloadsSecret =+  UserWorkloadsSecret {data' = Core.Nothing, name = Core.Nothing}++instance Core.FromJSON UserWorkloadsSecret where+  parseJSON =+    Core.withObject+      "UserWorkloadsSecret"+      ( \o ->+          UserWorkloadsSecret+            Core.<$> (o Core..:? "data")+            Core.<*> (o Core..:? "name")+      )++instance Core.ToJSON UserWorkloadsSecret where+  toJSON UserWorkloadsSecret {..} =+    Core.object+      ( Core.catMaybes+          [("data" Core..=) Core.<$> data', ("name" Core..=) Core.<$> name]+      )++-- | Optional. The \"data\" field of Kubernetes Secret, organized in key-value pairs, which can contain sensitive values such as a password, a token, or a key. The values for all keys have to be base64-encoded strings. For details see: https:\/\/kubernetes.io\/docs\/concepts\/configuration\/secret\/ Example: { \"example\": \"ZXhhbXBsZV92YWx1ZQ==\", \"another-example\": \"YW5vdGhlcl9leGFtcGxlX3ZhbHVl\" }+--+-- /See:/ 'newUserWorkloadsSecret_Data' smart constructor.+newtype UserWorkloadsSecret_Data = UserWorkloadsSecret_Data+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'UserWorkloadsSecret_Data' with the minimum fields required to make a request.+newUserWorkloadsSecret_Data ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  UserWorkloadsSecret_Data+newUserWorkloadsSecret_Data additional =+  UserWorkloadsSecret_Data {additional = additional}++instance Core.FromJSON UserWorkloadsSecret_Data where+  parseJSON =+    Core.withObject+      "UserWorkloadsSecret_Data"+      (\o -> UserWorkloadsSecret_Data Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON UserWorkloadsSecret_Data where+  toJSON UserWorkloadsSecret_Data {..} = Core.toJSON additional++-- | The configuration settings for the Airflow web server App Engine instance. Supported for Cloud Composer environments in versions composer-1././-airflow-/./.*+--+-- /See:/ 'newWebServerConfig' smart constructor.+newtype WebServerConfig = WebServerConfig+  { -- | Optional. Machine type on which Airflow web server is running. It has to be one of: composer-n1-webserver-2, composer-n1-webserver-4 or composer-n1-webserver-8. If not specified, composer-n1-webserver-2 will be used. Value custom is returned only in response, if Airflow web server parameters were manually changed to a non-standard values.+    machineType :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'WebServerConfig' with the minimum fields required to make a request.+newWebServerConfig ::+  WebServerConfig+newWebServerConfig = WebServerConfig {machineType = Core.Nothing}++instance Core.FromJSON WebServerConfig where+  parseJSON =+    Core.withObject+      "WebServerConfig"+      (\o -> WebServerConfig Core.<$> (o Core..:? "machineType"))++instance Core.ToJSON WebServerConfig where+  toJSON WebServerConfig {..} =+    Core.object+      (Core.catMaybes [("machineType" Core..=) Core.<$> machineType])++-- | Network-level access control policy for the Airflow web server.+--+-- /See:/ 'newWebServerNetworkAccessControl' smart constructor.+newtype WebServerNetworkAccessControl = WebServerNetworkAccessControl+  { -- | A collection of allowed IP ranges with descriptions.+    allowedIpRanges :: (Core.Maybe [AllowedIpRange])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'WebServerNetworkAccessControl' with the minimum fields required to make a request.+newWebServerNetworkAccessControl ::+  WebServerNetworkAccessControl+newWebServerNetworkAccessControl =+  WebServerNetworkAccessControl {allowedIpRanges = Core.Nothing}++instance Core.FromJSON WebServerNetworkAccessControl where+  parseJSON =+    Core.withObject+      "WebServerNetworkAccessControl"+      ( \o ->+          WebServerNetworkAccessControl+            Core.<$> (o Core..:? "allowedIpRanges")+      )++instance Core.ToJSON WebServerNetworkAccessControl where+  toJSON WebServerNetworkAccessControl {..} =+    Core.object+      ( Core.catMaybes+          [("allowedIpRanges" Core..=) Core.<$> allowedIpRanges]+      )++-- | Configuration for resources used by Airflow web server.+--+-- /See:/ 'newWebServerResource' smart constructor.+data WebServerResource = WebServerResource+  { -- | Optional. CPU request and limit for Airflow web server.+    cpu :: (Core.Maybe Core.Double),+    -- | Optional. Memory (GB) request and limit for Airflow web server.+    memoryGb :: (Core.Maybe Core.Double),+    -- | Optional. Storage (GB) request and limit for Airflow web server.+    storageGb :: (Core.Maybe Core.Double)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'WebServerResource' with the minimum fields required to make a request.+newWebServerResource ::+  WebServerResource+newWebServerResource =+  WebServerResource+    { cpu = Core.Nothing,+      memoryGb = Core.Nothing,+      storageGb = Core.Nothing+    }++instance Core.FromJSON WebServerResource where+  parseJSON =+    Core.withObject+      "WebServerResource"+      ( \o ->+          WebServerResource+            Core.<$> (o Core..:? "cpu")+            Core.<*> (o Core..:? "memoryGb")+            Core.<*> (o Core..:? "storageGb")+      )++instance Core.ToJSON WebServerResource where+  toJSON WebServerResource {..} =+    Core.object+      ( Core.catMaybes+          [ ("cpu" Core..=) Core.<$> cpu,+            ("memoryGb" Core..=) Core.<$> memoryGb,+            ("storageGb" Core..=) Core.<$> storageGb+          ]+      )++-- | Configuration for resources used by Airflow workers.+--+-- /See:/ 'newWorkerResource' smart constructor.+data WorkerResource = WorkerResource+  { -- | Optional. CPU request and limit for a single Airflow worker replica.+    cpu :: (Core.Maybe Core.Double),+    -- | Optional. Maximum number of workers for autoscaling.+    maxCount :: (Core.Maybe Core.Int32),+    -- | Optional. Memory (GB) request and limit for a single Airflow worker replica.+    memoryGb :: (Core.Maybe Core.Double),+    -- | Optional. Minimum number of workers for autoscaling.+    minCount :: (Core.Maybe Core.Int32),+    -- | Optional. Storage (GB) request and limit for a single Airflow worker replica.+    storageGb :: (Core.Maybe Core.Double)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'WorkerResource' with the minimum fields required to make a request.+newWorkerResource ::+  WorkerResource+newWorkerResource =+  WorkerResource+    { cpu = Core.Nothing,+      maxCount = Core.Nothing,+      memoryGb = Core.Nothing,+      minCount = Core.Nothing,+      storageGb = Core.Nothing+    }++instance Core.FromJSON WorkerResource where+  parseJSON =+    Core.withObject+      "WorkerResource"+      ( \o ->+          WorkerResource+            Core.<$> (o Core..:? "cpu")+            Core.<*> (o Core..:? "maxCount")+            Core.<*> (o Core..:? "memoryGb")+            Core.<*> (o Core..:? "minCount")+            Core.<*> (o Core..:? "storageGb")+      )++instance Core.ToJSON WorkerResource where+  toJSON WorkerResource {..} =+    Core.object+      ( Core.catMaybes+          [ ("cpu" Core..=) Core.<$> cpu,+            ("maxCount" Core..=) Core.<$> maxCount,+            ("memoryGb" Core..=) Core.<$> memoryGb,+            ("minCount" Core..=) Core.<$> minCount,+            ("storageGb" Core..=) Core.<$> storageGb+          ]+      )++-- | The Kubernetes workloads configuration for GKE cluster associated with the Cloud Composer environment. Supported for Cloud Composer environments in versions composer-2././-airflow-/./.* and newer.+--+-- /See:/ 'newWorkloadsConfig' smart constructor.+data WorkloadsConfig = WorkloadsConfig+  { -- | Optional. Resources used by Airflow DAG processors. This field is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+    dagProcessor :: (Core.Maybe DagProcessorResource),+    -- | Optional. Resources used by Airflow schedulers.+    scheduler :: (Core.Maybe SchedulerResource),+    -- | Optional. Resources used by Airflow triggerers.+    triggerer :: (Core.Maybe TriggererResource),+    -- | Optional. Resources used by Airflow web server.+    webServer :: (Core.Maybe WebServerResource),+    -- | Optional. Resources used by Airflow workers.+    worker :: (Core.Maybe WorkerResource)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'WorkloadsConfig' with the minimum fields required to make a request.+newWorkloadsConfig ::+  WorkloadsConfig+newWorkloadsConfig =+  WorkloadsConfig+    { dagProcessor = Core.Nothing,+      scheduler = Core.Nothing,+      triggerer = Core.Nothing,+      webServer = Core.Nothing,+      worker = Core.Nothing+    }++instance Core.FromJSON WorkloadsConfig where+  parseJSON =+    Core.withObject+      "WorkloadsConfig"+      ( \o ->+          WorkloadsConfig+            Core.<$> (o Core..:? "dagProcessor")+            Core.<*> (o Core..:? "scheduler")+            Core.<*> (o Core..:? "triggerer")+            Core.<*> (o Core..:? "webServer")+            Core.<*> (o Core..:? "worker")+      )++instance Core.ToJSON WorkloadsConfig where+  toJSON WorkloadsConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("dagProcessor" Core..=) Core.<$> dagProcessor,+            ("scheduler" Core..=) Core.<$> scheduler,+            ("triggerer" Core..=) Core.<$> triggerer,+            ("webServer" Core..=) Core.<$> webServer,+            ("worker" Core..=) Core.<$> worker+          ]+      )
+ gen/Gogol/Composer/Internal/Sum.hs view
@@ -0,0 +1,668 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Internal.Sum+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.Composer.Internal.Sum+  ( -- * Xgafv+    Xgafv+      ( Xgafv_1,+        Xgafv_2,+        ..+      ),++    -- * AirflowMetadataRetentionPolicyConfig_RetentionMode+    AirflowMetadataRetentionPolicyConfig_RetentionMode+      ( AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEUNSPECIFIED,+        AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEENABLED,+        AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEDISABLED,+        ..+      ),++    -- * CheckUpgradeResponse_ContainsPypiModulesConflict+    CheckUpgradeResponse_ContainsPypiModulesConflict+      ( CheckUpgradeResponse_ContainsPypiModulesConflict_CONFLICTRESULTUNSPECIFIED,+        CheckUpgradeResponse_ContainsPypiModulesConflict_Conflict,+        CheckUpgradeResponse_ContainsPypiModulesConflict_NOCONFLICT,+        ..+      ),++    -- * ComposerWorkload_Type+    ComposerWorkload_Type+      ( ComposerWorkload_Type_COMPOSERWORKLOADTYPEUNSPECIFIED,+        ComposerWorkload_Type_CELERYWORKER,+        ComposerWorkload_Type_KUBERNETESWORKER,+        ComposerWorkload_Type_KUBERNETESOPERATORPOD,+        ComposerWorkload_Type_Scheduler,+        ComposerWorkload_Type_DAGPROCESSOR,+        ComposerWorkload_Type_Triggerer,+        ComposerWorkload_Type_WEBSERVER,+        ComposerWorkload_Type_Redis,+        ..+      ),++    -- * ComposerWorkloadStatus_State+    ComposerWorkloadStatus_State+      ( ComposerWorkloadStatus_State_COMPOSERWORKLOADSTATEUNSPECIFIED,+        ComposerWorkloadStatus_State_Pending,+        ComposerWorkloadStatus_State_OK,+        ComposerWorkloadStatus_State_Warning,+        ComposerWorkloadStatus_State_Error',+        ComposerWorkloadStatus_State_Succeeded,+        ComposerWorkloadStatus_State_Failed,+        ..+      ),++    -- * Environment_State+    Environment_State+      ( Environment_State_STATEUNSPECIFIED,+        Environment_State_Creating,+        Environment_State_Running,+        Environment_State_Updating,+        Environment_State_Deleting,+        Environment_State_Error',+        ..+      ),++    -- * EnvironmentConfig_EnvironmentSize+    EnvironmentConfig_EnvironmentSize+      ( EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZEUNSPECIFIED,+        EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZESMALL,+        EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZEMEDIUM,+        EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZELARGE,+        ..+      ),++    -- * EnvironmentConfig_ResilienceMode+    EnvironmentConfig_ResilienceMode+      ( EnvironmentConfig_ResilienceMode_RESILIENCEMODEUNSPECIFIED,+        EnvironmentConfig_ResilienceMode_HIGHRESILIENCE,+        ..+      ),++    -- * NetworkingConfig_ConnectionType+    NetworkingConfig_ConnectionType+      ( NetworkingConfig_ConnectionType_CONNECTIONTYPEUNSPECIFIED,+        NetworkingConfig_ConnectionType_VPCPEERING,+        NetworkingConfig_ConnectionType_PRIVATESERVICECONNECT,+        ..+      ),++    -- * OperationMetadata_OperationType+    OperationMetadata_OperationType+      ( OperationMetadata_OperationType_TYPEUNSPECIFIED,+        OperationMetadata_OperationType_Create,+        OperationMetadata_OperationType_Delete',+        OperationMetadata_OperationType_Update,+        OperationMetadata_OperationType_Check,+        OperationMetadata_OperationType_SAVESNAPSHOT,+        OperationMetadata_OperationType_LOADSNAPSHOT,+        OperationMetadata_OperationType_DATABASEFAILOVER,+        ..+      ),++    -- * OperationMetadata_State+    OperationMetadata_State+      ( OperationMetadata_State_STATEUNSPECIFIED,+        OperationMetadata_State_Pending,+        OperationMetadata_State_Running,+        OperationMetadata_State_Succeeded,+        OperationMetadata_State_Successful,+        OperationMetadata_State_Failed,+        ..+      ),++    -- * SoftwareConfig_WebServerPluginsMode+    SoftwareConfig_WebServerPluginsMode+      ( SoftwareConfig_WebServerPluginsMode_WEBSERVERPLUGINSMODEUNSPECIFIED,+        SoftwareConfig_WebServerPluginsMode_PLUGINSDISABLED,+        SoftwareConfig_WebServerPluginsMode_PLUGINSENABLED,+        ..+      ),++    -- * TaskLogsRetentionConfig_StorageMode+    TaskLogsRetentionConfig_StorageMode+      ( TaskLogsRetentionConfig_StorageMode_TASKLOGSSTORAGEMODEUNSPECIFIED,+        TaskLogsRetentionConfig_StorageMode_CLOUDLOGGINGANDCLOUDSTORAGE,+        TaskLogsRetentionConfig_StorageMode_CLOUDLOGGINGONLY,+        ..+      ),+  )+where++import Gogol.Prelude qualified as Core++-- | V1 error format.+newtype Xgafv = Xgafv {fromXgafv :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | v1 error format+pattern Xgafv_1 :: Xgafv+pattern Xgafv_1 = Xgafv "1"++-- | v2 error format+pattern Xgafv_2 :: Xgafv+pattern Xgafv_2 = Xgafv "2"++{-# COMPLETE+  Xgafv_1,+  Xgafv_2,+  Xgafv+  #-}++-- | Optional. Retention can be either enabled or disabled.+newtype AirflowMetadataRetentionPolicyConfig_RetentionMode = AirflowMetadataRetentionPolicyConfig_RetentionMode {fromAirflowMetadataRetentionPolicyConfig_RetentionMode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Default mode doesn\'t change environment parameters.+pattern AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEUNSPECIFIED :: AirflowMetadataRetentionPolicyConfig_RetentionMode+pattern AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEUNSPECIFIED = AirflowMetadataRetentionPolicyConfig_RetentionMode "RETENTION_MODE_UNSPECIFIED"++-- | Retention policy is enabled.+pattern AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEENABLED :: AirflowMetadataRetentionPolicyConfig_RetentionMode+pattern AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEENABLED = AirflowMetadataRetentionPolicyConfig_RetentionMode "RETENTION_MODE_ENABLED"++-- | Retention policy is disabled.+pattern AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEDISABLED :: AirflowMetadataRetentionPolicyConfig_RetentionMode+pattern AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEDISABLED = AirflowMetadataRetentionPolicyConfig_RetentionMode "RETENTION_MODE_DISABLED"++{-# COMPLETE+  AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEUNSPECIFIED,+  AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEENABLED,+  AirflowMetadataRetentionPolicyConfig_RetentionMode_RETENTIONMODEDISABLED,+  AirflowMetadataRetentionPolicyConfig_RetentionMode+  #-}++-- | Output only. Whether build has succeeded or failed on modules conflicts.+newtype CheckUpgradeResponse_ContainsPypiModulesConflict = CheckUpgradeResponse_ContainsPypiModulesConflict {fromCheckUpgradeResponse_ContainsPypiModulesConflict :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | It is unknown whether build had conflicts or not.+pattern CheckUpgradeResponse_ContainsPypiModulesConflict_CONFLICTRESULTUNSPECIFIED :: CheckUpgradeResponse_ContainsPypiModulesConflict+pattern CheckUpgradeResponse_ContainsPypiModulesConflict_CONFLICTRESULTUNSPECIFIED = CheckUpgradeResponse_ContainsPypiModulesConflict "CONFLICT_RESULT_UNSPECIFIED"++-- | There were python packages conflicts.+pattern CheckUpgradeResponse_ContainsPypiModulesConflict_Conflict :: CheckUpgradeResponse_ContainsPypiModulesConflict+pattern CheckUpgradeResponse_ContainsPypiModulesConflict_Conflict = CheckUpgradeResponse_ContainsPypiModulesConflict "CONFLICT"++-- | There were no python packages conflicts.+pattern CheckUpgradeResponse_ContainsPypiModulesConflict_NOCONFLICT :: CheckUpgradeResponse_ContainsPypiModulesConflict+pattern CheckUpgradeResponse_ContainsPypiModulesConflict_NOCONFLICT = CheckUpgradeResponse_ContainsPypiModulesConflict "NO_CONFLICT"++{-# COMPLETE+  CheckUpgradeResponse_ContainsPypiModulesConflict_CONFLICTRESULTUNSPECIFIED,+  CheckUpgradeResponse_ContainsPypiModulesConflict_Conflict,+  CheckUpgradeResponse_ContainsPypiModulesConflict_NOCONFLICT,+  CheckUpgradeResponse_ContainsPypiModulesConflict+  #-}++-- | Type of a workload.+newtype ComposerWorkload_Type = ComposerWorkload_Type {fromComposerWorkload_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Not able to determine the type of the workload.+pattern ComposerWorkload_Type_COMPOSERWORKLOADTYPEUNSPECIFIED :: ComposerWorkload_Type+pattern ComposerWorkload_Type_COMPOSERWORKLOADTYPEUNSPECIFIED = ComposerWorkload_Type "COMPOSER_WORKLOAD_TYPE_UNSPECIFIED"++-- | Celery worker.+pattern ComposerWorkload_Type_CELERYWORKER :: ComposerWorkload_Type+pattern ComposerWorkload_Type_CELERYWORKER = ComposerWorkload_Type "CELERY_WORKER"++-- | Kubernetes worker.+pattern ComposerWorkload_Type_KUBERNETESWORKER :: ComposerWorkload_Type+pattern ComposerWorkload_Type_KUBERNETESWORKER = ComposerWorkload_Type "KUBERNETES_WORKER"++-- | Workload created by Kubernetes Pod Operator.+pattern ComposerWorkload_Type_KUBERNETESOPERATORPOD :: ComposerWorkload_Type+pattern ComposerWorkload_Type_KUBERNETESOPERATORPOD = ComposerWorkload_Type "KUBERNETES_OPERATOR_POD"++-- | Airflow scheduler.+pattern ComposerWorkload_Type_Scheduler :: ComposerWorkload_Type+pattern ComposerWorkload_Type_Scheduler = ComposerWorkload_Type "SCHEDULER"++-- | Airflow Dag processor.+pattern ComposerWorkload_Type_DAGPROCESSOR :: ComposerWorkload_Type+pattern ComposerWorkload_Type_DAGPROCESSOR = ComposerWorkload_Type "DAG_PROCESSOR"++-- | Airflow triggerer.+pattern ComposerWorkload_Type_Triggerer :: ComposerWorkload_Type+pattern ComposerWorkload_Type_Triggerer = ComposerWorkload_Type "TRIGGERER"++-- | Airflow web server UI.+pattern ComposerWorkload_Type_WEBSERVER :: ComposerWorkload_Type+pattern ComposerWorkload_Type_WEBSERVER = ComposerWorkload_Type "WEB_SERVER"++-- | Redis.+pattern ComposerWorkload_Type_Redis :: ComposerWorkload_Type+pattern ComposerWorkload_Type_Redis = ComposerWorkload_Type "REDIS"++{-# COMPLETE+  ComposerWorkload_Type_COMPOSERWORKLOADTYPEUNSPECIFIED,+  ComposerWorkload_Type_CELERYWORKER,+  ComposerWorkload_Type_KUBERNETESWORKER,+  ComposerWorkload_Type_KUBERNETESOPERATORPOD,+  ComposerWorkload_Type_Scheduler,+  ComposerWorkload_Type_DAGPROCESSOR,+  ComposerWorkload_Type_Triggerer,+  ComposerWorkload_Type_WEBSERVER,+  ComposerWorkload_Type_Redis,+  ComposerWorkload_Type+  #-}++-- | Output only. Workload state.+newtype ComposerWorkloadStatus_State = ComposerWorkloadStatus_State {fromComposerWorkloadStatus_State :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Not able to determine the status of the workload.+pattern ComposerWorkloadStatus_State_COMPOSERWORKLOADSTATEUNSPECIFIED :: ComposerWorkloadStatus_State+pattern ComposerWorkloadStatus_State_COMPOSERWORKLOADSTATEUNSPECIFIED = ComposerWorkloadStatus_State "COMPOSER_WORKLOAD_STATE_UNSPECIFIED"++-- | Workload is in pending state and has not yet started.+pattern ComposerWorkloadStatus_State_Pending :: ComposerWorkloadStatus_State+pattern ComposerWorkloadStatus_State_Pending = ComposerWorkloadStatus_State "PENDING"++-- | Workload is running fine.+pattern ComposerWorkloadStatus_State_OK :: ComposerWorkloadStatus_State+pattern ComposerWorkloadStatus_State_OK = ComposerWorkloadStatus_State "OK"++-- | Workload is running but there are some non-critical problems.+pattern ComposerWorkloadStatus_State_Warning :: ComposerWorkloadStatus_State+pattern ComposerWorkloadStatus_State_Warning = ComposerWorkloadStatus_State "WARNING"++-- | Workload is not running due to an error.+pattern ComposerWorkloadStatus_State_Error' :: ComposerWorkloadStatus_State+pattern ComposerWorkloadStatus_State_Error' = ComposerWorkloadStatus_State "ERROR"++-- | Workload has finished execution with success.+pattern ComposerWorkloadStatus_State_Succeeded :: ComposerWorkloadStatus_State+pattern ComposerWorkloadStatus_State_Succeeded = ComposerWorkloadStatus_State "SUCCEEDED"++-- | Workload has finished execution with failure.+pattern ComposerWorkloadStatus_State_Failed :: ComposerWorkloadStatus_State+pattern ComposerWorkloadStatus_State_Failed = ComposerWorkloadStatus_State "FAILED"++{-# COMPLETE+  ComposerWorkloadStatus_State_COMPOSERWORKLOADSTATEUNSPECIFIED,+  ComposerWorkloadStatus_State_Pending,+  ComposerWorkloadStatus_State_OK,+  ComposerWorkloadStatus_State_Warning,+  ComposerWorkloadStatus_State_Error',+  ComposerWorkloadStatus_State_Succeeded,+  ComposerWorkloadStatus_State_Failed,+  ComposerWorkloadStatus_State+  #-}++-- | The current state of the environment.+newtype Environment_State = Environment_State {fromEnvironment_State :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | The state of the environment is unknown.+pattern Environment_State_STATEUNSPECIFIED :: Environment_State+pattern Environment_State_STATEUNSPECIFIED = Environment_State "STATE_UNSPECIFIED"++-- | The environment is in the process of being created.+pattern Environment_State_Creating :: Environment_State+pattern Environment_State_Creating = Environment_State "CREATING"++-- | The environment is currently running and healthy. It is ready for use.+pattern Environment_State_Running :: Environment_State+pattern Environment_State_Running = Environment_State "RUNNING"++-- | The environment is being updated. It remains usable but cannot receive additional update requests or be deleted at this time.+pattern Environment_State_Updating :: Environment_State+pattern Environment_State_Updating = Environment_State "UPDATING"++-- | The environment is undergoing deletion. It cannot be used.+pattern Environment_State_Deleting :: Environment_State+pattern Environment_State_Deleting = Environment_State "DELETING"++-- | The environment has encountered an error and cannot be used.+pattern Environment_State_Error' :: Environment_State+pattern Environment_State_Error' = Environment_State "ERROR"++{-# COMPLETE+  Environment_State_STATEUNSPECIFIED,+  Environment_State_Creating,+  Environment_State_Running,+  Environment_State_Updating,+  Environment_State_Deleting,+  Environment_State_Error',+  Environment_State+  #-}++-- | Optional. The size of the Cloud Composer environment. This field is supported for Cloud Composer environments in versions composer-2././-airflow-/./.* and newer.+newtype EnvironmentConfig_EnvironmentSize = EnvironmentConfig_EnvironmentSize {fromEnvironmentConfig_EnvironmentSize :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | The size of the environment is unspecified.+pattern EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZEUNSPECIFIED :: EnvironmentConfig_EnvironmentSize+pattern EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZEUNSPECIFIED = EnvironmentConfig_EnvironmentSize "ENVIRONMENT_SIZE_UNSPECIFIED"++-- | The environment size is small.+pattern EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZESMALL :: EnvironmentConfig_EnvironmentSize+pattern EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZESMALL = EnvironmentConfig_EnvironmentSize "ENVIRONMENT_SIZE_SMALL"++-- | The environment size is medium.+pattern EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZEMEDIUM :: EnvironmentConfig_EnvironmentSize+pattern EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZEMEDIUM = EnvironmentConfig_EnvironmentSize "ENVIRONMENT_SIZE_MEDIUM"++-- | The environment size is large.+pattern EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZELARGE :: EnvironmentConfig_EnvironmentSize+pattern EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZELARGE = EnvironmentConfig_EnvironmentSize "ENVIRONMENT_SIZE_LARGE"++{-# COMPLETE+  EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZEUNSPECIFIED,+  EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZESMALL,+  EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZEMEDIUM,+  EnvironmentConfig_EnvironmentSize_ENVIRONMENTSIZELARGE,+  EnvironmentConfig_EnvironmentSize+  #-}++-- | Optional. Resilience mode of the Cloud Composer Environment. This field is supported for Cloud Composer environments in versions composer-2.2.0-airflow-/./.* and newer.+newtype EnvironmentConfig_ResilienceMode = EnvironmentConfig_ResilienceMode {fromEnvironmentConfig_ResilienceMode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Default mode doesn\'t change environment parameters.+pattern EnvironmentConfig_ResilienceMode_RESILIENCEMODEUNSPECIFIED :: EnvironmentConfig_ResilienceMode+pattern EnvironmentConfig_ResilienceMode_RESILIENCEMODEUNSPECIFIED = EnvironmentConfig_ResilienceMode "RESILIENCE_MODE_UNSPECIFIED"++-- | Enabled High Resilience mode, including Cloud SQL HA.+pattern EnvironmentConfig_ResilienceMode_HIGHRESILIENCE :: EnvironmentConfig_ResilienceMode+pattern EnvironmentConfig_ResilienceMode_HIGHRESILIENCE = EnvironmentConfig_ResilienceMode "HIGH_RESILIENCE"++{-# COMPLETE+  EnvironmentConfig_ResilienceMode_RESILIENCEMODEUNSPECIFIED,+  EnvironmentConfig_ResilienceMode_HIGHRESILIENCE,+  EnvironmentConfig_ResilienceMode+  #-}++-- | Optional. Indicates the user requested specific connection type between Tenant and Customer projects. You cannot set networking connection type in public IP environment.+newtype NetworkingConfig_ConnectionType = NetworkingConfig_ConnectionType {fromNetworkingConfig_ConnectionType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | No specific connection type was requested, so the environment uses the default value corresponding to the rest of its configuration.+pattern NetworkingConfig_ConnectionType_CONNECTIONTYPEUNSPECIFIED :: NetworkingConfig_ConnectionType+pattern NetworkingConfig_ConnectionType_CONNECTIONTYPEUNSPECIFIED = NetworkingConfig_ConnectionType "CONNECTION_TYPE_UNSPECIFIED"++-- | Requests the use of VPC peerings for connecting the Customer and Tenant projects.+pattern NetworkingConfig_ConnectionType_VPCPEERING :: NetworkingConfig_ConnectionType+pattern NetworkingConfig_ConnectionType_VPCPEERING = NetworkingConfig_ConnectionType "VPC_PEERING"++-- | Requests the use of Private Service Connect for connecting the Customer and Tenant projects.+pattern NetworkingConfig_ConnectionType_PRIVATESERVICECONNECT :: NetworkingConfig_ConnectionType+pattern NetworkingConfig_ConnectionType_PRIVATESERVICECONNECT = NetworkingConfig_ConnectionType "PRIVATE_SERVICE_CONNECT"++{-# COMPLETE+  NetworkingConfig_ConnectionType_CONNECTIONTYPEUNSPECIFIED,+  NetworkingConfig_ConnectionType_VPCPEERING,+  NetworkingConfig_ConnectionType_PRIVATESERVICECONNECT,+  NetworkingConfig_ConnectionType+  #-}++-- | Output only. The type of operation being performed.+newtype OperationMetadata_OperationType = OperationMetadata_OperationType {fromOperationMetadata_OperationType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unused.+pattern OperationMetadata_OperationType_TYPEUNSPECIFIED :: OperationMetadata_OperationType+pattern OperationMetadata_OperationType_TYPEUNSPECIFIED = OperationMetadata_OperationType "TYPE_UNSPECIFIED"++-- | A resource creation operation.+pattern OperationMetadata_OperationType_Create :: OperationMetadata_OperationType+pattern OperationMetadata_OperationType_Create = OperationMetadata_OperationType "CREATE"++-- | A resource deletion operation.+pattern OperationMetadata_OperationType_Delete' :: OperationMetadata_OperationType+pattern OperationMetadata_OperationType_Delete' = OperationMetadata_OperationType "DELETE"++-- | A resource update operation.+pattern OperationMetadata_OperationType_Update :: OperationMetadata_OperationType+pattern OperationMetadata_OperationType_Update = OperationMetadata_OperationType "UPDATE"++-- | A resource check operation.+pattern OperationMetadata_OperationType_Check :: OperationMetadata_OperationType+pattern OperationMetadata_OperationType_Check = OperationMetadata_OperationType "CHECK"++-- | Saves snapshot of the resource operation.+pattern OperationMetadata_OperationType_SAVESNAPSHOT :: OperationMetadata_OperationType+pattern OperationMetadata_OperationType_SAVESNAPSHOT = OperationMetadata_OperationType "SAVE_SNAPSHOT"++-- | Loads snapshot of the resource operation.+pattern OperationMetadata_OperationType_LOADSNAPSHOT :: OperationMetadata_OperationType+pattern OperationMetadata_OperationType_LOADSNAPSHOT = OperationMetadata_OperationType "LOAD_SNAPSHOT"++-- | Triggers failover of environment\'s Cloud SQL instance (only for highly resilient environments).+pattern OperationMetadata_OperationType_DATABASEFAILOVER :: OperationMetadata_OperationType+pattern OperationMetadata_OperationType_DATABASEFAILOVER = OperationMetadata_OperationType "DATABASE_FAILOVER"++{-# COMPLETE+  OperationMetadata_OperationType_TYPEUNSPECIFIED,+  OperationMetadata_OperationType_Create,+  OperationMetadata_OperationType_Delete',+  OperationMetadata_OperationType_Update,+  OperationMetadata_OperationType_Check,+  OperationMetadata_OperationType_SAVESNAPSHOT,+  OperationMetadata_OperationType_LOADSNAPSHOT,+  OperationMetadata_OperationType_DATABASEFAILOVER,+  OperationMetadata_OperationType+  #-}++-- | Output only. The current operation state.+newtype OperationMetadata_State = OperationMetadata_State {fromOperationMetadata_State :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unused.+pattern OperationMetadata_State_STATEUNSPECIFIED :: OperationMetadata_State+pattern OperationMetadata_State_STATEUNSPECIFIED = OperationMetadata_State "STATE_UNSPECIFIED"++-- | The operation has been created but is not yet started.+pattern OperationMetadata_State_Pending :: OperationMetadata_State+pattern OperationMetadata_State_Pending = OperationMetadata_State "PENDING"++-- | The operation is underway.+pattern OperationMetadata_State_Running :: OperationMetadata_State+pattern OperationMetadata_State_Running = OperationMetadata_State "RUNNING"++-- | The operation completed successfully.+pattern OperationMetadata_State_Succeeded :: OperationMetadata_State+pattern OperationMetadata_State_Succeeded = OperationMetadata_State "SUCCEEDED"++pattern OperationMetadata_State_Successful :: OperationMetadata_State+pattern OperationMetadata_State_Successful = OperationMetadata_State "SUCCESSFUL"++-- | The operation is no longer running but did not succeed.+pattern OperationMetadata_State_Failed :: OperationMetadata_State+pattern OperationMetadata_State_Failed = OperationMetadata_State "FAILED"++{-# COMPLETE+  OperationMetadata_State_STATEUNSPECIFIED,+  OperationMetadata_State_Pending,+  OperationMetadata_State_Running,+  OperationMetadata_State_Succeeded,+  OperationMetadata_State_Successful,+  OperationMetadata_State_Failed,+  OperationMetadata_State+  #-}++-- | Optional. Whether or not the web server uses custom plugins. If unspecified, the field defaults to @PLUGINS_ENABLED@. This field is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+newtype SoftwareConfig_WebServerPluginsMode = SoftwareConfig_WebServerPluginsMode {fromSoftwareConfig_WebServerPluginsMode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Default mode.+pattern SoftwareConfig_WebServerPluginsMode_WEBSERVERPLUGINSMODEUNSPECIFIED :: SoftwareConfig_WebServerPluginsMode+pattern SoftwareConfig_WebServerPluginsMode_WEBSERVERPLUGINSMODEUNSPECIFIED = SoftwareConfig_WebServerPluginsMode "WEB_SERVER_PLUGINS_MODE_UNSPECIFIED"++-- | Web server plugins are not supported.+pattern SoftwareConfig_WebServerPluginsMode_PLUGINSDISABLED :: SoftwareConfig_WebServerPluginsMode+pattern SoftwareConfig_WebServerPluginsMode_PLUGINSDISABLED = SoftwareConfig_WebServerPluginsMode "PLUGINS_DISABLED"++-- | Web server plugins are supported.+pattern SoftwareConfig_WebServerPluginsMode_PLUGINSENABLED :: SoftwareConfig_WebServerPluginsMode+pattern SoftwareConfig_WebServerPluginsMode_PLUGINSENABLED = SoftwareConfig_WebServerPluginsMode "PLUGINS_ENABLED"++{-# COMPLETE+  SoftwareConfig_WebServerPluginsMode_WEBSERVERPLUGINSMODEUNSPECIFIED,+  SoftwareConfig_WebServerPluginsMode_PLUGINSDISABLED,+  SoftwareConfig_WebServerPluginsMode_PLUGINSENABLED,+  SoftwareConfig_WebServerPluginsMode+  #-}++-- | Optional. The mode of storage for Airflow workers task logs.+newtype TaskLogsRetentionConfig_StorageMode = TaskLogsRetentionConfig_StorageMode {fromTaskLogsRetentionConfig_StorageMode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | This configuration is not specified by the user.+pattern TaskLogsRetentionConfig_StorageMode_TASKLOGSSTORAGEMODEUNSPECIFIED :: TaskLogsRetentionConfig_StorageMode+pattern TaskLogsRetentionConfig_StorageMode_TASKLOGSSTORAGEMODEUNSPECIFIED = TaskLogsRetentionConfig_StorageMode "TASK_LOGS_STORAGE_MODE_UNSPECIFIED"++-- | Store task logs in Cloud Logging and in the environment\'s Cloud Storage bucket.+pattern TaskLogsRetentionConfig_StorageMode_CLOUDLOGGINGANDCLOUDSTORAGE :: TaskLogsRetentionConfig_StorageMode+pattern TaskLogsRetentionConfig_StorageMode_CLOUDLOGGINGANDCLOUDSTORAGE = TaskLogsRetentionConfig_StorageMode "CLOUD_LOGGING_AND_CLOUD_STORAGE"++-- | Store task logs in Cloud Logging only.+pattern TaskLogsRetentionConfig_StorageMode_CLOUDLOGGINGONLY :: TaskLogsRetentionConfig_StorageMode+pattern TaskLogsRetentionConfig_StorageMode_CLOUDLOGGINGONLY = TaskLogsRetentionConfig_StorageMode "CLOUD_LOGGING_ONLY"++{-# COMPLETE+  TaskLogsRetentionConfig_StorageMode_TASKLOGSSTORAGEMODEUNSPECIFIED,+  TaskLogsRetentionConfig_StorageMode_CLOUDLOGGINGANDCLOUDSTORAGE,+  TaskLogsRetentionConfig_StorageMode_CLOUDLOGGINGONLY,+  TaskLogsRetentionConfig_StorageMode+  #-}
+ gen/Gogol/Composer/Projects/Locations/Environments/CheckUpgrade.hs view
@@ -0,0 +1,127 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.CheckUpgrade+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Check if an upgrade operation on the environment will succeed. In case of problems detailed info can be found in the returned Operation.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.checkUpgrade@.+module Gogol.Composer.Projects.Locations.Environments.CheckUpgrade+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsCheckUpgradeResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsCheckUpgrade (..),+    newComposerProjectsLocationsEnvironmentsCheckUpgrade,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.checkUpgrade@ method which the+-- 'ComposerProjectsLocationsEnvironmentsCheckUpgrade' request conforms to.+type ComposerProjectsLocationsEnvironmentsCheckUpgradeResource =+  "v1"+    Core.:> Core.CaptureMode "environment" "checkUpgrade" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] CheckUpgradeRequest+    Core.:> Core.Post '[Core.JSON] Operation++-- | Check if an upgrade operation on the environment will succeed. In case of problems detailed info can be found in the returned Operation.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsCheckUpgrade' smart constructor.+data ComposerProjectsLocationsEnvironmentsCheckUpgrade = ComposerProjectsLocationsEnvironmentsCheckUpgrade+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Required. The resource name of the environment to check upgrade for, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    environment :: Core.Text,+    -- | Multipart request metadata.+    payload :: CheckUpgradeRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsCheckUpgrade' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsCheckUpgrade ::+  -- |  Required. The resource name of the environment to check upgrade for, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'environment'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  CheckUpgradeRequest ->+  ComposerProjectsLocationsEnvironmentsCheckUpgrade+newComposerProjectsLocationsEnvironmentsCheckUpgrade+  environment+  payload =+    ComposerProjectsLocationsEnvironmentsCheckUpgrade+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        environment = environment,+        payload = payload,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsCheckUpgrade+  where+  type+    Rs ComposerProjectsLocationsEnvironmentsCheckUpgrade =+      Operation+  type+    Scopes ComposerProjectsLocationsEnvironmentsCheckUpgrade =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsEnvironmentsCheckUpgrade {..} =+    go+      environment+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy+                ComposerProjectsLocationsEnvironmentsCheckUpgradeResource+          )+          Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/Create.hs view
@@ -0,0 +1,122 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.Create+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Create a new environment.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.create@.+module Gogol.Composer.Projects.Locations.Environments.Create+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsCreateResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsCreate (..),+    newComposerProjectsLocationsEnvironmentsCreate,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.create@ method which the+-- 'ComposerProjectsLocationsEnvironmentsCreate' request conforms to.+type ComposerProjectsLocationsEnvironmentsCreateResource =+  "v1"+    Core.:> Core.Capture "parent" Core.Text+    Core.:> "environments"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Environment+    Core.:> Core.Post '[Core.JSON] Operation++-- | Create a new environment.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsCreate' smart constructor.+data ComposerProjectsLocationsEnvironmentsCreate = ComposerProjectsLocationsEnvironmentsCreate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The parent must be of the form \"projects\/{projectId}\/locations\/{locationId}\".+    parent :: Core.Text,+    -- | Multipart request metadata.+    payload :: Environment,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsCreate' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsCreate ::+  -- |  The parent must be of the form \"projects\/{projectId}\/locations\/{locationId}\". See 'parent'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  Environment ->+  ComposerProjectsLocationsEnvironmentsCreate+newComposerProjectsLocationsEnvironmentsCreate parent payload =+  ComposerProjectsLocationsEnvironmentsCreate+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      parent = parent,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsCreate+  where+  type Rs ComposerProjectsLocationsEnvironmentsCreate = Operation+  type+    Scopes ComposerProjectsLocationsEnvironmentsCreate =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsEnvironmentsCreate {..} =+    go+      parent+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy ComposerProjectsLocationsEnvironmentsCreateResource+          )+          Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/DatabaseFailover.hs view
@@ -0,0 +1,128 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.DatabaseFailover+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Triggers database failover (only for highly resilient environments).+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.databaseFailover@.+module Gogol.Composer.Projects.Locations.Environments.DatabaseFailover+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsDatabaseFailoverResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsDatabaseFailover (..),+    newComposerProjectsLocationsEnvironmentsDatabaseFailover,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.databaseFailover@ method which the+-- 'ComposerProjectsLocationsEnvironmentsDatabaseFailover' request conforms to.+type ComposerProjectsLocationsEnvironmentsDatabaseFailoverResource =+  "v1"+    Core.:> Core.CaptureMode "environment" "databaseFailover" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] DatabaseFailoverRequest+    Core.:> Core.Post '[Core.JSON] Operation++-- | Triggers database failover (only for highly resilient environments).+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsDatabaseFailover' smart constructor.+data ComposerProjectsLocationsEnvironmentsDatabaseFailover = ComposerProjectsLocationsEnvironmentsDatabaseFailover+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Target environment: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    environment :: Core.Text,+    -- | Multipart request metadata.+    payload :: DatabaseFailoverRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsDatabaseFailover' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsDatabaseFailover ::+  -- |  Target environment: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'environment'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  DatabaseFailoverRequest ->+  ComposerProjectsLocationsEnvironmentsDatabaseFailover+newComposerProjectsLocationsEnvironmentsDatabaseFailover+  environment+  payload =+    ComposerProjectsLocationsEnvironmentsDatabaseFailover+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        environment = environment,+        payload = payload,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsDatabaseFailover+  where+  type+    Rs ComposerProjectsLocationsEnvironmentsDatabaseFailover =+      Operation+  type+    Scopes ComposerProjectsLocationsEnvironmentsDatabaseFailover =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsDatabaseFailover {..} =+      go+        environment+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        payload+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsDatabaseFailoverResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/Delete.hs view
@@ -0,0 +1,114 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Delete an environment.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.delete@.+module Gogol.Composer.Projects.Locations.Environments.Delete+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsDeleteResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsDelete (..),+    newComposerProjectsLocationsEnvironmentsDelete,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.delete@ method which the+-- 'ComposerProjectsLocationsEnvironmentsDelete' request conforms to.+type ComposerProjectsLocationsEnvironmentsDeleteResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] Operation++-- | Delete an environment.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsDelete' smart constructor.+data ComposerProjectsLocationsEnvironmentsDelete = ComposerProjectsLocationsEnvironmentsDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The environment to delete, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsDelete' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsDelete ::+  -- |  The environment to delete, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'name'.+  Core.Text ->+  ComposerProjectsLocationsEnvironmentsDelete+newComposerProjectsLocationsEnvironmentsDelete name =+  ComposerProjectsLocationsEnvironmentsDelete+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsDelete+  where+  type Rs ComposerProjectsLocationsEnvironmentsDelete = Operation+  type+    Scopes ComposerProjectsLocationsEnvironmentsDelete =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsEnvironmentsDelete {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy ComposerProjectsLocationsEnvironmentsDeleteResource+          )+          Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/ExecuteAirflowCommand.hs view
@@ -0,0 +1,129 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.ExecuteAirflowCommand+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Executes Airflow CLI command.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.executeAirflowCommand@.+module Gogol.Composer.Projects.Locations.Environments.ExecuteAirflowCommand+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsExecuteAirflowCommandResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand (..),+    newComposerProjectsLocationsEnvironmentsExecuteAirflowCommand,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.executeAirflowCommand@ method which the+-- 'ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand' request conforms to.+type ComposerProjectsLocationsEnvironmentsExecuteAirflowCommandResource =+  "v1"+    Core.:> Core.CaptureMode "environment" "executeAirflowCommand" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] ExecuteAirflowCommandRequest+    Core.:> Core.Post '[Core.JSON] ExecuteAirflowCommandResponse++-- | Executes Airflow CLI command.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsExecuteAirflowCommand' smart constructor.+data ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand = ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The resource name of the environment in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\".+    environment :: Core.Text,+    -- | Multipart request metadata.+    payload :: ExecuteAirflowCommandRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsExecuteAirflowCommand ::+  -- |  The resource name of the environment in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\". See 'environment'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  ExecuteAirflowCommandRequest ->+  ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand+newComposerProjectsLocationsEnvironmentsExecuteAirflowCommand+  environment+  payload =+    ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        environment = environment,+        payload = payload,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand+  where+  type+    Rs ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand =+      ExecuteAirflowCommandResponse+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsExecuteAirflowCommand {..} =+      go+        environment+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        payload+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsExecuteAirflowCommandResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/FetchDatabaseProperties.hs view
@@ -0,0 +1,122 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.FetchDatabaseProperties+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Fetches database properties.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.fetchDatabaseProperties@.+module Gogol.Composer.Projects.Locations.Environments.FetchDatabaseProperties+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsFetchDatabasePropertiesResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties (..),+    newComposerProjectsLocationsEnvironmentsFetchDatabaseProperties,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.fetchDatabaseProperties@ method which the+-- 'ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties' request conforms to.+type ComposerProjectsLocationsEnvironmentsFetchDatabasePropertiesResource =+  "v1"+    Core.:> Core.CaptureMode "environment" "fetchDatabaseProperties" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] FetchDatabasePropertiesResponse++-- | Fetches database properties.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsFetchDatabaseProperties' smart constructor.+data ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties = ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Required. The resource name of the environment, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    environment :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsFetchDatabaseProperties ::+  -- |  Required. The resource name of the environment, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'environment'.+  Core.Text ->+  ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties+newComposerProjectsLocationsEnvironmentsFetchDatabaseProperties+  environment =+    ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        environment = environment,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties+  where+  type+    Rs+      ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties =+      FetchDatabasePropertiesResponse+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsFetchDatabaseProperties {..} =+      go+        environment+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsFetchDatabasePropertiesResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/Get.hs view
@@ -0,0 +1,114 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Get an existing environment.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.get@.+module Gogol.Composer.Projects.Locations.Environments.Get+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsGetResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsGet (..),+    newComposerProjectsLocationsEnvironmentsGet,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.get@ method which the+-- 'ComposerProjectsLocationsEnvironmentsGet' request conforms to.+type ComposerProjectsLocationsEnvironmentsGetResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Environment++-- | Get an existing environment.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsGet' smart constructor.+data ComposerProjectsLocationsEnvironmentsGet = ComposerProjectsLocationsEnvironmentsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The resource name of the environment to get, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsGet' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsGet ::+  -- |  The resource name of the environment to get, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'name'.+  Core.Text ->+  ComposerProjectsLocationsEnvironmentsGet+newComposerProjectsLocationsEnvironmentsGet name =+  ComposerProjectsLocationsEnvironmentsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsGet+  where+  type Rs ComposerProjectsLocationsEnvironmentsGet = Environment+  type+    Scopes ComposerProjectsLocationsEnvironmentsGet =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsEnvironmentsGet {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy ComposerProjectsLocationsEnvironmentsGetResource+          )+          Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/List.hs view
@@ -0,0 +1,127 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- List environments.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.list@.+module Gogol.Composer.Projects.Locations.Environments.List+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsListResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsList (..),+    newComposerProjectsLocationsEnvironmentsList,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.list@ method which the+-- 'ComposerProjectsLocationsEnvironmentsList' request conforms to.+type ComposerProjectsLocationsEnvironmentsListResource =+  "v1"+    Core.:> Core.Capture "parent" Core.Text+    Core.:> "environments"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListEnvironmentsResponse++-- | List environments.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsList' smart constructor.+data ComposerProjectsLocationsEnvironmentsList = ComposerProjectsLocationsEnvironmentsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The maximum number of environments to return.+    pageSize :: (Core.Maybe Core.Int32),+    -- | The next/page/token value returned from a previous List request, if any.+    pageToken :: (Core.Maybe Core.Text),+    -- | List environments in the given project and location, in the form: \"projects\/{projectId}\/locations\/{locationId}\"+    parent :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsList' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsList ::+  -- |  List environments in the given project and location, in the form: \"projects\/{projectId}\/locations\/{locationId}\" See 'parent'.+  Core.Text ->+  ComposerProjectsLocationsEnvironmentsList+newComposerProjectsLocationsEnvironmentsList parent =+  ComposerProjectsLocationsEnvironmentsList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      parent = parent,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsList+  where+  type+    Rs ComposerProjectsLocationsEnvironmentsList =+      ListEnvironmentsResponse+  type+    Scopes ComposerProjectsLocationsEnvironmentsList =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsEnvironmentsList {..} =+    go+      parent+      xgafv+      accessToken+      callback+      pageSize+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy ComposerProjectsLocationsEnvironmentsListResource+          )+          Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/LoadSnapshot.hs view
@@ -0,0 +1,127 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.LoadSnapshot+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Loads a snapshot of a Cloud Composer environment. As a result of this operation, a snapshot of environment\'s specified in LoadSnapshotRequest is loaded into the environment.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.loadSnapshot@.+module Gogol.Composer.Projects.Locations.Environments.LoadSnapshot+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsLoadSnapshotResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsLoadSnapshot (..),+    newComposerProjectsLocationsEnvironmentsLoadSnapshot,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.loadSnapshot@ method which the+-- 'ComposerProjectsLocationsEnvironmentsLoadSnapshot' request conforms to.+type ComposerProjectsLocationsEnvironmentsLoadSnapshotResource =+  "v1"+    Core.:> Core.CaptureMode "environment" "loadSnapshot" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] LoadSnapshotRequest+    Core.:> Core.Post '[Core.JSON] Operation++-- | Loads a snapshot of a Cloud Composer environment. As a result of this operation, a snapshot of environment\'s specified in LoadSnapshotRequest is loaded into the environment.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsLoadSnapshot' smart constructor.+data ComposerProjectsLocationsEnvironmentsLoadSnapshot = ComposerProjectsLocationsEnvironmentsLoadSnapshot+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The resource name of the target environment in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    environment :: Core.Text,+    -- | Multipart request metadata.+    payload :: LoadSnapshotRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsLoadSnapshot' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsLoadSnapshot ::+  -- |  The resource name of the target environment in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'environment'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  LoadSnapshotRequest ->+  ComposerProjectsLocationsEnvironmentsLoadSnapshot+newComposerProjectsLocationsEnvironmentsLoadSnapshot+  environment+  payload =+    ComposerProjectsLocationsEnvironmentsLoadSnapshot+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        environment = environment,+        payload = payload,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsLoadSnapshot+  where+  type+    Rs ComposerProjectsLocationsEnvironmentsLoadSnapshot =+      Operation+  type+    Scopes ComposerProjectsLocationsEnvironmentsLoadSnapshot =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsEnvironmentsLoadSnapshot {..} =+    go+      environment+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy+                ComposerProjectsLocationsEnvironmentsLoadSnapshotResource+          )+          Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/Patch.hs view
@@ -0,0 +1,131 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.Patch+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Update an environment.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.patch@.+module Gogol.Composer.Projects.Locations.Environments.Patch+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsPatchResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsPatch (..),+    newComposerProjectsLocationsEnvironmentsPatch,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.patch@ method which the+-- 'ComposerProjectsLocationsEnvironmentsPatch' request conforms to.+type ComposerProjectsLocationsEnvironmentsPatchResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "updateMask" Core.FieldMask+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Environment+    Core.:> Core.Patch '[Core.JSON] Operation++-- | Update an environment.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsPatch' smart constructor.+data ComposerProjectsLocationsEnvironmentsPatch = ComposerProjectsLocationsEnvironmentsPatch+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The relative resource name of the environment to update, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: Environment,+    -- | Required. A comma-separated list of paths, relative to @Environment@, of fields to update. For example, to set the version of scikit-learn to install in the environment to 0.19.0 and to remove an existing installation of numpy, the @updateMask@ parameter would include the following two @paths@ values: \"config.softwareConfig.pypiPackages.scikit-learn\" and \"config.softwareConfig.pypiPackages.numpy\". The included patch environment would specify the scikit-learn version as follows: { \"config\":{ \"softwareConfig\":{ \"pypiPackages\":{ \"scikit-learn\":\"==0.19.0\" } } } } Note that in the above example, any existing PyPI packages other than scikit-learn and numpy will be unaffected. Only one update type may be included in a single request\'s @updateMask@. For example, one cannot update both the PyPI packages and labels in the same request. However, it is possible to update multiple members of a map field simultaneously in the same request. For example, to set the labels \"label1\" and \"label2\" while+    -- clearing \"label3\" (assuming it already exists), one can provide the paths \"labels.label1\", \"labels.label2\", and \"labels.label3\" and populate the patch environment as follows: { \"labels\":{ \"label1\":\"new-label1-value\" \"label2\":\"new-label2-value\" } } Note that in the above example, any existing labels that are not included in the @updateMask@ will be unaffected. It is also possible to replace an entire map field by providing the map field\'s path in the @updateMask@. The new value of the field will be that which is provided in the patch environment. For example, to delete all pre-existing user-specified PyPI packages and install botocore at version 1.7.14, the @updateMask@ would contain the path \"config.softwareConfig.pypiPackages\", and the patch environment would be the following: { \"config\":{ \"softwareConfig\":{ \"pypiPackages\":{ \"botocore\":\"==1.7.14\" } } } } __Note:__ Only the following fields can be updated: * @config.softwareConfig.pypiPackages@ * Replace all custom custom PyPI+    -- packages. If a replacement package map is not included in @environment@, all custom PyPI packages are cleared. It is an error to provide both this mask and a mask specifying an individual package. * @config.softwareConfig.pypiPackages.@packagename * Update the custom PyPI package /packagename/, preserving other packages. To delete the package, include it in @updateMask@, and omit the mapping for it in @environment.config.softwareConfig.pypiPackages@. It is an error to provide both a mask of this form and the @config.softwareConfig.pypiPackages@ mask. * @labels@ * Replace all environment labels. If a replacement labels map is not included in @environment@, all labels are cleared. It is an error to provide both this mask and a mask specifying one or more individual labels. * @labels.@labelName * Set the label named /labelName/, while preserving other labels. To delete the label, include it in @updateMask@ and omit its mapping in @environment.labels@. It is an error to provide both a mask of this form and the+    -- @labels@ mask. * @config.nodeCount@ * Horizontally scale the number of nodes in the environment. An integer greater than or equal to 3 must be provided in the @config.nodeCount@ field. Supported for Cloud Composer environments in versions composer-1././-airflow-/././. / @config.webServerNetworkAccessControl@ * Replace the environment\'s current @WebServerNetworkAccessControl@. * @config.softwareConfig.airflowConfigOverrides@ * Replace all Apache Airflow config overrides. If a replacement config overrides map is not included in @environment@, all config overrides are cleared. It is an error to provide both this mask and a mask specifying one or more individual config overrides. * @config.softwareConfig.airflowConfigOverrides.@section-name * Override the Apache Airflow config property /name/ in the section named /section/, preserving other properties. To delete the property override, include it in @updateMask@ and omit its mapping in @environment.config.softwareConfig.airflowConfigOverrides@. It is an error to+    -- provide both a mask of this form and the @config.softwareConfig.airflowConfigOverrides@ mask. * @config.softwareConfig.envVariables@ * Replace all environment variables. If a replacement environment variable map is not included in @environment@, all custom environment variables are cleared. * @config.softwareConfig.schedulerCount@ * Horizontally scale the number of schedulers in Airflow. A positive integer not greater than the number of nodes must be provided in the @config.softwareConfig.schedulerCount@ field. Supported for Cloud Composer environments in versions composer-1././-airflow-2././. * @config.databaseConfig.machineType@ * Cloud SQL machine type used by Airflow database. It has to be one of: db-n1-standard-2, db-n1-standard-4, db-n1-standard-8 or db-n1-standard-16. Supported for Cloud Composer environments in versions composer-1././-airflow-/././. / @config.webServerConfig.machineType@ * Machine type on which Airflow web server is running. It has to be one of: composer-n1-webserver-2,+    -- composer-n1-webserver-4 or composer-n1-webserver-8. Supported for Cloud Composer environments in versions composer-1././-airflow-/./.*.+    updateMask :: (Core.Maybe Core.FieldMask),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsPatch' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsPatch ::+  -- |  The relative resource name of the environment to update, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  Environment ->+  ComposerProjectsLocationsEnvironmentsPatch+newComposerProjectsLocationsEnvironmentsPatch name payload =+  ComposerProjectsLocationsEnvironmentsPatch+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      updateMask = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsPatch+  where+  type Rs ComposerProjectsLocationsEnvironmentsPatch = Operation+  type+    Scopes ComposerProjectsLocationsEnvironmentsPatch =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsEnvironmentsPatch {..} =+    go+      name+      xgafv+      accessToken+      callback+      updateMask+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy ComposerProjectsLocationsEnvironmentsPatchResource+          )+          Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/PollAirflowCommand.hs view
@@ -0,0 +1,128 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.PollAirflowCommand+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Polls Airflow CLI command execution and fetches logs.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.pollAirflowCommand@.+module Gogol.Composer.Projects.Locations.Environments.PollAirflowCommand+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsPollAirflowCommandResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsPollAirflowCommand (..),+    newComposerProjectsLocationsEnvironmentsPollAirflowCommand,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.pollAirflowCommand@ method which the+-- 'ComposerProjectsLocationsEnvironmentsPollAirflowCommand' request conforms to.+type ComposerProjectsLocationsEnvironmentsPollAirflowCommandResource =+  "v1"+    Core.:> Core.CaptureMode "environment" "pollAirflowCommand" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] PollAirflowCommandRequest+    Core.:> Core.Post '[Core.JSON] PollAirflowCommandResponse++-- | Polls Airflow CLI command execution and fetches logs.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsPollAirflowCommand' smart constructor.+data ComposerProjectsLocationsEnvironmentsPollAirflowCommand = ComposerProjectsLocationsEnvironmentsPollAirflowCommand+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The resource name of the environment in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    environment :: Core.Text,+    -- | Multipart request metadata.+    payload :: PollAirflowCommandRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsPollAirflowCommand' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsPollAirflowCommand ::+  -- |  The resource name of the environment in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'environment'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  PollAirflowCommandRequest ->+  ComposerProjectsLocationsEnvironmentsPollAirflowCommand+newComposerProjectsLocationsEnvironmentsPollAirflowCommand+  environment+  payload =+    ComposerProjectsLocationsEnvironmentsPollAirflowCommand+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        environment = environment,+        payload = payload,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsPollAirflowCommand+  where+  type+    Rs ComposerProjectsLocationsEnvironmentsPollAirflowCommand =+      PollAirflowCommandResponse+  type+    Scopes ComposerProjectsLocationsEnvironmentsPollAirflowCommand =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsPollAirflowCommand {..} =+      go+        environment+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        payload+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsPollAirflowCommandResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/SaveSnapshot.hs view
@@ -0,0 +1,127 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.SaveSnapshot+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a snapshots of a Cloud Composer environment. As a result of this operation, snapshot of environment\'s state is stored in a location specified in the SaveSnapshotRequest.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.saveSnapshot@.+module Gogol.Composer.Projects.Locations.Environments.SaveSnapshot+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsSaveSnapshotResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsSaveSnapshot (..),+    newComposerProjectsLocationsEnvironmentsSaveSnapshot,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.saveSnapshot@ method which the+-- 'ComposerProjectsLocationsEnvironmentsSaveSnapshot' request conforms to.+type ComposerProjectsLocationsEnvironmentsSaveSnapshotResource =+  "v1"+    Core.:> Core.CaptureMode "environment" "saveSnapshot" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] SaveSnapshotRequest+    Core.:> Core.Post '[Core.JSON] Operation++-- | Creates a snapshots of a Cloud Composer environment. As a result of this operation, snapshot of environment\'s state is stored in a location specified in the SaveSnapshotRequest.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsSaveSnapshot' smart constructor.+data ComposerProjectsLocationsEnvironmentsSaveSnapshot = ComposerProjectsLocationsEnvironmentsSaveSnapshot+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The resource name of the source environment in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    environment :: Core.Text,+    -- | Multipart request metadata.+    payload :: SaveSnapshotRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsSaveSnapshot' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsSaveSnapshot ::+  -- |  The resource name of the source environment in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'environment'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  SaveSnapshotRequest ->+  ComposerProjectsLocationsEnvironmentsSaveSnapshot+newComposerProjectsLocationsEnvironmentsSaveSnapshot+  environment+  payload =+    ComposerProjectsLocationsEnvironmentsSaveSnapshot+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        environment = environment,+        payload = payload,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsSaveSnapshot+  where+  type+    Rs ComposerProjectsLocationsEnvironmentsSaveSnapshot =+      Operation+  type+    Scopes ComposerProjectsLocationsEnvironmentsSaveSnapshot =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsEnvironmentsSaveSnapshot {..} =+    go+      environment+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy+                ComposerProjectsLocationsEnvironmentsSaveSnapshotResource+          )+          Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/StopAirflowCommand.hs view
@@ -0,0 +1,128 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.StopAirflowCommand+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Stops Airflow CLI command execution.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.stopAirflowCommand@.+module Gogol.Composer.Projects.Locations.Environments.StopAirflowCommand+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsStopAirflowCommandResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsStopAirflowCommand (..),+    newComposerProjectsLocationsEnvironmentsStopAirflowCommand,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.stopAirflowCommand@ method which the+-- 'ComposerProjectsLocationsEnvironmentsStopAirflowCommand' request conforms to.+type ComposerProjectsLocationsEnvironmentsStopAirflowCommandResource =+  "v1"+    Core.:> Core.CaptureMode "environment" "stopAirflowCommand" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] StopAirflowCommandRequest+    Core.:> Core.Post '[Core.JSON] StopAirflowCommandResponse++-- | Stops Airflow CLI command execution.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsStopAirflowCommand' smart constructor.+data ComposerProjectsLocationsEnvironmentsStopAirflowCommand = ComposerProjectsLocationsEnvironmentsStopAirflowCommand+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The resource name of the environment in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\".+    environment :: Core.Text,+    -- | Multipart request metadata.+    payload :: StopAirflowCommandRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsStopAirflowCommand' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsStopAirflowCommand ::+  -- |  The resource name of the environment in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\". See 'environment'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  StopAirflowCommandRequest ->+  ComposerProjectsLocationsEnvironmentsStopAirflowCommand+newComposerProjectsLocationsEnvironmentsStopAirflowCommand+  environment+  payload =+    ComposerProjectsLocationsEnvironmentsStopAirflowCommand+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        environment = environment,+        payload = payload,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsStopAirflowCommand+  where+  type+    Rs ComposerProjectsLocationsEnvironmentsStopAirflowCommand =+      StopAirflowCommandResponse+  type+    Scopes ComposerProjectsLocationsEnvironmentsStopAirflowCommand =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsStopAirflowCommand {..} =+      go+        environment+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        payload+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsStopAirflowCommandResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/UserWorkloadsConfigMaps/Create.hs view
@@ -0,0 +1,132 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Create+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a user workloads ConfigMap. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.userWorkloadsConfigMaps.create@.+module Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Create+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreateResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.userWorkloadsConfigMaps.create@ method which the+-- 'ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate' request conforms to.+type ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreateResource =+  "v1"+    Core.:> Core.Capture "parent" Core.Text+    Core.:> "userWorkloadsConfigMaps"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] UserWorkloadsConfigMap+    Core.:> Core.Post '[Core.JSON] UserWorkloadsConfigMap++-- | Creates a user workloads ConfigMap. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate' smart constructor.+data ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate = ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Required. The environment name to create a ConfigMap for, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    parent :: Core.Text,+    -- | Multipart request metadata.+    payload :: UserWorkloadsConfigMap,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate ::+  -- |  Required. The environment name to create a ConfigMap for, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'parent'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  UserWorkloadsConfigMap ->+  ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate+newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate+  parent+  payload =+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        parent = parent,+        payload = payload,+        uploadType = Core.Nothing,+        uploadProtocol =+          Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate+  where+  type+    Rs+      ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate =+      UserWorkloadsConfigMap+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreate {..} =+      go+        parent+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        payload+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsCreateResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/UserWorkloadsConfigMaps/Delete.hs view
@@ -0,0 +1,123 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a user workloads ConfigMap. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.userWorkloadsConfigMaps.delete@.+module Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Delete+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDeleteResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.userWorkloadsConfigMaps.delete@ method which the+-- 'ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete' request conforms to.+type ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDeleteResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] Empty++-- | Deletes a user workloads ConfigMap. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete' smart constructor.+data ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete = ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Required. The ConfigMap to delete, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsConfigMaps\/{userWorkloadsConfigMapId}\"+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete ::+  -- |  Required. The ConfigMap to delete, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsConfigMaps\/{userWorkloadsConfigMapId}\" See 'name'.+  Core.Text ->+  ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete+newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete+  name =+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        name = name,+        uploadType = Core.Nothing,+        uploadProtocol =+          Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete+  where+  type+    Rs+      ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete =+      Empty+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDelete {..} =+      go+        name+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsDeleteResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/UserWorkloadsConfigMaps/Get.hs view
@@ -0,0 +1,122 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets an existing user workloads ConfigMap. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.userWorkloadsConfigMaps.get@.+module Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Get+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGetResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.userWorkloadsConfigMaps.get@ method which the+-- 'ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet' request conforms to.+type ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGetResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] UserWorkloadsConfigMap++-- | Gets an existing user workloads ConfigMap. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet' smart constructor.+data ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet = ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Required. The resource name of the ConfigMap to get, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsConfigMaps\/{userWorkloadsConfigMapId}\"+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet ::+  -- |  Required. The resource name of the ConfigMap to get, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsConfigMaps\/{userWorkloadsConfigMapId}\" See 'name'.+  Core.Text ->+  ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet+newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet+  name =+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        name = name,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet+  where+  type+    Rs+      ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet =+      UserWorkloadsConfigMap+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGet {..} =+      go+        name+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsGetResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/UserWorkloadsConfigMaps/List.hs view
@@ -0,0 +1,133 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists user workloads ConfigMaps. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.userWorkloadsConfigMaps.list@.+module Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.List+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsListResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.userWorkloadsConfigMaps.list@ method which the+-- 'ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList' request conforms to.+type ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsListResource =+  "v1"+    Core.:> Core.Capture "parent" Core.Text+    Core.:> "userWorkloadsConfigMaps"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListUserWorkloadsConfigMapsResponse++-- | Lists user workloads ConfigMaps. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList' smart constructor.+data ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList = ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Optional. The maximum number of ConfigMaps to return.+    pageSize :: (Core.Maybe Core.Int32),+    -- | Optional. The next/page/token value returned from a previous List request, if any.+    pageToken :: (Core.Maybe Core.Text),+    -- | Required. List ConfigMaps in the given environment, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    parent :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList ::+  -- |  Required. List ConfigMaps in the given environment, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'parent'.+  Core.Text ->+  ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList+newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList+  parent =+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        pageSize = Core.Nothing,+        pageToken = Core.Nothing,+        parent = parent,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList+  where+  type+    Rs+      ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList =+      ListUserWorkloadsConfigMapsResponse+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsList {..} =+      go+        parent+        xgafv+        accessToken+        callback+        pageSize+        pageToken+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsListResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/UserWorkloadsConfigMaps/Update.hs view
@@ -0,0 +1,131 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Update+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates a user workloads ConfigMap. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.userWorkloadsConfigMaps.update@.+module Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Update+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdateResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.userWorkloadsConfigMaps.update@ method which the+-- 'ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate' request conforms to.+type ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdateResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] UserWorkloadsConfigMap+    Core.:> Core.Put '[Core.JSON] UserWorkloadsConfigMap++-- | Updates a user workloads ConfigMap. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate' smart constructor.+data ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate = ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Identifier. The resource name of the ConfigMap, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsConfigMaps\/{userWorkloadsConfigMapId}\"+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: UserWorkloadsConfigMap,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate ::+  -- |  Identifier. The resource name of the ConfigMap, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsConfigMaps\/{userWorkloadsConfigMapId}\" See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  UserWorkloadsConfigMap ->+  ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate+newComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate+  name+  payload =+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        name = name,+        payload = payload,+        uploadType = Core.Nothing,+        uploadProtocol =+          Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate+  where+  type+    Rs+      ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate =+      UserWorkloadsConfigMap+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdate {..} =+      go+        name+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        payload+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsUserWorkloadsConfigMapsUpdateResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/UserWorkloadsSecrets/Create.hs view
@@ -0,0 +1,131 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Create+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a user workloads Secret. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.userWorkloadsSecrets.create@.+module Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Create+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreateResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.userWorkloadsSecrets.create@ method which the+-- 'ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate' request conforms to.+type ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreateResource =+  "v1"+    Core.:> Core.Capture "parent" Core.Text+    Core.:> "userWorkloadsSecrets"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] UserWorkloadsSecret+    Core.:> Core.Post '[Core.JSON] UserWorkloadsSecret++-- | Creates a user workloads Secret. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate' smart constructor.+data ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate = ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Required. The environment name to create a Secret for, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    parent :: Core.Text,+    -- | Multipart request metadata.+    payload :: UserWorkloadsSecret,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate ::+  -- |  Required. The environment name to create a Secret for, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'parent'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  UserWorkloadsSecret ->+  ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate+newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate+  parent+  payload =+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        parent = parent,+        payload = payload,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate+  where+  type+    Rs+      ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate =+      UserWorkloadsSecret+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreate {..} =+      go+        parent+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        payload+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsCreateResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/UserWorkloadsSecrets/Delete.hs view
@@ -0,0 +1,122 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a user workloads Secret. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.userWorkloadsSecrets.delete@.+module Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Delete+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDeleteResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.userWorkloadsSecrets.delete@ method which the+-- 'ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete' request conforms to.+type ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDeleteResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] Empty++-- | Deletes a user workloads Secret. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete' smart constructor.+data ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete = ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Required. The Secret to delete, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsSecrets\/{userWorkloadsSecretId}\"+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete ::+  -- |  Required. The Secret to delete, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsSecrets\/{userWorkloadsSecretId}\" See 'name'.+  Core.Text ->+  ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete+newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete+  name =+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        name = name,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete+  where+  type+    Rs+      ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete =+      Empty+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDelete {..} =+      go+        name+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsDeleteResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/UserWorkloadsSecrets/Get.hs view
@@ -0,0 +1,122 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets an existing user workloads Secret. Values of the \"data\" field in the response are cleared. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.userWorkloadsSecrets.get@.+module Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Get+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGetResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.userWorkloadsSecrets.get@ method which the+-- 'ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet' request conforms to.+type ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGetResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] UserWorkloadsSecret++-- | Gets an existing user workloads Secret. Values of the \"data\" field in the response are cleared. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet' smart constructor.+data ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet = ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Required. The resource name of the Secret to get, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsSecrets\/{userWorkloadsSecretId}\"+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet ::+  -- |  Required. The resource name of the Secret to get, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsSecrets\/{userWorkloadsSecretId}\" See 'name'.+  Core.Text ->+  ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet+newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet+  name =+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        name = name,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet+  where+  type+    Rs+      ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet =+      UserWorkloadsSecret+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGet {..} =+      go+        name+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsGetResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/UserWorkloadsSecrets/List.hs view
@@ -0,0 +1,133 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists user workloads Secrets. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.userWorkloadsSecrets.list@.+module Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.List+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsListResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.userWorkloadsSecrets.list@ method which the+-- 'ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList' request conforms to.+type ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsListResource =+  "v1"+    Core.:> Core.Capture "parent" Core.Text+    Core.:> "userWorkloadsSecrets"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListUserWorkloadsSecretsResponse++-- | Lists user workloads Secrets. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList' smart constructor.+data ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList = ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Optional. The maximum number of Secrets to return.+    pageSize :: (Core.Maybe Core.Int32),+    -- | Optional. The next/page/token value returned from a previous List request, if any.+    pageToken :: (Core.Maybe Core.Text),+    -- | Required. List Secrets in the given environment, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    parent :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList ::+  -- |  Required. List Secrets in the given environment, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'parent'.+  Core.Text ->+  ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList+newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList+  parent =+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        pageSize = Core.Nothing,+        pageToken = Core.Nothing,+        parent = parent,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList+  where+  type+    Rs+      ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList =+      ListUserWorkloadsSecretsResponse+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsList {..} =+      go+        parent+        xgafv+        accessToken+        callback+        pageSize+        pageToken+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsListResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/UserWorkloadsSecrets/Update.hs view
@@ -0,0 +1,130 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Update+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates a user workloads Secret. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.userWorkloadsSecrets.update@.+module Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Update+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdateResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate (..),+    newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.userWorkloadsSecrets.update@ method which the+-- 'ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate' request conforms to.+type ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdateResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] UserWorkloadsSecret+    Core.:> Core.Put '[Core.JSON] UserWorkloadsSecret++-- | Updates a user workloads Secret. This method is supported for Cloud Composer environments in versions composer-3-airflow-/././-build./ and newer.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate' smart constructor.+data ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate = ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Identifier. The resource name of the Secret, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsSecrets\/{userWorkloadsSecretId}\"+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: UserWorkloadsSecret,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate ::+  -- |  Identifier. The resource name of the Secret, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\/userWorkloadsSecrets\/{userWorkloadsSecretId}\" See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  UserWorkloadsSecret ->+  ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate+newComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate+  name+  payload =+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        name = name,+        payload = payload,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate+  where+  type+    Rs+      ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate =+      UserWorkloadsSecret+  type+    Scopes+      ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdate {..} =+      go+        name+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        payload+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsUserWorkloadsSecretsUpdateResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Environments/Workloads/List.hs view
@@ -0,0 +1,135 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Environments.Workloads.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists workloads in a Cloud Composer environment. Workload is a unit that runs a single Composer component. This method is supported for Cloud Composer environments in versions composer-2././-airflow-/./.* and newer.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.workloads.list@.+module Gogol.Composer.Projects.Locations.Environments.Workloads.List+  ( -- * Resource+    ComposerProjectsLocationsEnvironmentsWorkloadsListResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsEnvironmentsWorkloadsList (..),+    newComposerProjectsLocationsEnvironmentsWorkloadsList,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.environments.workloads.list@ method which the+-- 'ComposerProjectsLocationsEnvironmentsWorkloadsList' request conforms to.+type ComposerProjectsLocationsEnvironmentsWorkloadsListResource =+  "v1"+    Core.:> Core.Capture "parent" Core.Text+    Core.:> "workloads"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "filter" Core.Text+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListWorkloadsResponse++-- | Lists workloads in a Cloud Composer environment. Workload is a unit that runs a single Composer component. This method is supported for Cloud Composer environments in versions composer-2././-airflow-/./.* and newer.+--+-- /See:/ 'newComposerProjectsLocationsEnvironmentsWorkloadsList' smart constructor.+data ComposerProjectsLocationsEnvironmentsWorkloadsList = ComposerProjectsLocationsEnvironmentsWorkloadsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Optional. The list filter. Currently only supports equality on the type field. The value of a field specified in the filter expression must be one ComposerWorkloadType enum option. It\'s possible to get multiple types using \"OR\" operator, e.g.: \"type=SCHEDULER OR type=CELERY_WORKER\". If not specified, all items are returned.+    filter :: (Core.Maybe Core.Text),+    -- | Optional. The maximum number of environments to return.+    pageSize :: (Core.Maybe Core.Int32),+    -- | Optional. The next/page/token value returned from a previous List request, if any.+    pageToken :: (Core.Maybe Core.Text),+    -- | Required. The environment name to get workloads for, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"+    parent :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsEnvironmentsWorkloadsList' with the minimum fields required to make a request.+newComposerProjectsLocationsEnvironmentsWorkloadsList ::+  -- |  Required. The environment name to get workloads for, in the form: \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\" See 'parent'.+  Core.Text ->+  ComposerProjectsLocationsEnvironmentsWorkloadsList+newComposerProjectsLocationsEnvironmentsWorkloadsList parent =+  ComposerProjectsLocationsEnvironmentsWorkloadsList+    { xgafv =+        Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      filter = Core.Nothing,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      parent = parent,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsEnvironmentsWorkloadsList+  where+  type+    Rs ComposerProjectsLocationsEnvironmentsWorkloadsList =+      ListWorkloadsResponse+  type+    Scopes ComposerProjectsLocationsEnvironmentsWorkloadsList =+      '[CloudPlatform'FullControl]+  requestClient+    ComposerProjectsLocationsEnvironmentsWorkloadsList {..} =+      go+        parent+        xgafv+        accessToken+        callback+        filter+        pageSize+        pageToken+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        composerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  ComposerProjectsLocationsEnvironmentsWorkloadsListResource+            )+            Core.mempty
+ gen/Gogol/Composer/Projects/Locations/ImageVersions/List.hs view
@@ -0,0 +1,132 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.ImageVersions.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- List ImageVersions for provided location.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.imageVersions.list@.+module Gogol.Composer.Projects.Locations.ImageVersions.List+  ( -- * Resource+    ComposerProjectsLocationsImageVersionsListResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsImageVersionsList (..),+    newComposerProjectsLocationsImageVersionsList,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.imageVersions.list@ method which the+-- 'ComposerProjectsLocationsImageVersionsList' request conforms to.+type ComposerProjectsLocationsImageVersionsListResource =+  "v1"+    Core.:> Core.Capture "parent" Core.Text+    Core.:> "imageVersions"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "includePastReleases" Core.Bool+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListImageVersionsResponse++-- | List ImageVersions for provided location.+--+-- /See:/ 'newComposerProjectsLocationsImageVersionsList' smart constructor.+data ComposerProjectsLocationsImageVersionsList = ComposerProjectsLocationsImageVersionsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Whether or not image versions from old releases should be included.+    includePastReleases :: (Core.Maybe Core.Bool),+    -- | The maximum number of image_versions to return.+    pageSize :: (Core.Maybe Core.Int32),+    -- | The next/page/token value returned from a previous List request, if any.+    pageToken :: (Core.Maybe Core.Text),+    -- | List ImageVersions in the given project and location, in the form: \"projects\/{projectId}\/locations\/{locationId}\"+    parent :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsImageVersionsList' with the minimum fields required to make a request.+newComposerProjectsLocationsImageVersionsList ::+  -- |  List ImageVersions in the given project and location, in the form: \"projects\/{projectId}\/locations\/{locationId}\" See 'parent'.+  Core.Text ->+  ComposerProjectsLocationsImageVersionsList+newComposerProjectsLocationsImageVersionsList parent =+  ComposerProjectsLocationsImageVersionsList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      includePastReleases = Core.Nothing,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      parent = parent,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsImageVersionsList+  where+  type+    Rs ComposerProjectsLocationsImageVersionsList =+      ListImageVersionsResponse+  type+    Scopes ComposerProjectsLocationsImageVersionsList =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsImageVersionsList {..} =+    go+      parent+      xgafv+      accessToken+      callback+      includePastReleases+      pageSize+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy ComposerProjectsLocationsImageVersionsListResource+          )+          Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Operations/Delete.hs view
@@ -0,0 +1,114 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Operations.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a long-running operation. This method indicates that the client is no longer interested in the operation result. It does not cancel the operation. If the server doesn\'t support this method, it returns @google.rpc.Code.UNIMPLEMENTED@.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.operations.delete@.+module Gogol.Composer.Projects.Locations.Operations.Delete+  ( -- * Resource+    ComposerProjectsLocationsOperationsDeleteResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsOperationsDelete (..),+    newComposerProjectsLocationsOperationsDelete,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.operations.delete@ method which the+-- 'ComposerProjectsLocationsOperationsDelete' request conforms to.+type ComposerProjectsLocationsOperationsDeleteResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] Empty++-- | Deletes a long-running operation. This method indicates that the client is no longer interested in the operation result. It does not cancel the operation. If the server doesn\'t support this method, it returns @google.rpc.Code.UNIMPLEMENTED@.+--+-- /See:/ 'newComposerProjectsLocationsOperationsDelete' smart constructor.+data ComposerProjectsLocationsOperationsDelete = ComposerProjectsLocationsOperationsDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the operation resource to be deleted.+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsOperationsDelete' with the minimum fields required to make a request.+newComposerProjectsLocationsOperationsDelete ::+  -- |  The name of the operation resource to be deleted. See 'name'.+  Core.Text ->+  ComposerProjectsLocationsOperationsDelete+newComposerProjectsLocationsOperationsDelete name =+  ComposerProjectsLocationsOperationsDelete+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    ComposerProjectsLocationsOperationsDelete+  where+  type Rs ComposerProjectsLocationsOperationsDelete = Empty+  type+    Scopes ComposerProjectsLocationsOperationsDelete =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsOperationsDelete {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy ComposerProjectsLocationsOperationsDeleteResource+          )+          Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Operations/Get.hs view
@@ -0,0 +1,111 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Operations.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets the latest state of a long-running operation. Clients can use this method to poll the operation result at intervals as recommended by the API service.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.operations.get@.+module Gogol.Composer.Projects.Locations.Operations.Get+  ( -- * Resource+    ComposerProjectsLocationsOperationsGetResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsOperationsGet (..),+    newComposerProjectsLocationsOperationsGet,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.operations.get@ method which the+-- 'ComposerProjectsLocationsOperationsGet' request conforms to.+type ComposerProjectsLocationsOperationsGetResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Operation++-- | Gets the latest state of a long-running operation. Clients can use this method to poll the operation result at intervals as recommended by the API service.+--+-- /See:/ 'newComposerProjectsLocationsOperationsGet' smart constructor.+data ComposerProjectsLocationsOperationsGet = ComposerProjectsLocationsOperationsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the operation resource.+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsOperationsGet' with the minimum fields required to make a request.+newComposerProjectsLocationsOperationsGet ::+  -- |  The name of the operation resource. See 'name'.+  Core.Text ->+  ComposerProjectsLocationsOperationsGet+newComposerProjectsLocationsOperationsGet name =+  ComposerProjectsLocationsOperationsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest ComposerProjectsLocationsOperationsGet where+  type Rs ComposerProjectsLocationsOperationsGet = Operation+  type+    Scopes ComposerProjectsLocationsOperationsGet =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsOperationsGet {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy ComposerProjectsLocationsOperationsGetResource+          )+          Core.mempty
+ gen/Gogol/Composer/Projects/Locations/Operations/List.hs view
@@ -0,0 +1,129 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Projects.Locations.Operations.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists operations that match the specified filter in the request. If the server doesn\'t support this method, it returns @UNIMPLEMENTED@.+--+-- /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.operations.list@.+module Gogol.Composer.Projects.Locations.Operations.List+  ( -- * Resource+    ComposerProjectsLocationsOperationsListResource,++    -- ** Constructing a Request+    ComposerProjectsLocationsOperationsList (..),+    newComposerProjectsLocationsOperationsList,+  )+where++import Gogol.Composer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @composer.projects.locations.operations.list@ method which the+-- 'ComposerProjectsLocationsOperationsList' request conforms to.+type ComposerProjectsLocationsOperationsListResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> "operations"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "filter" Core.Text+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListOperationsResponse++-- | Lists operations that match the specified filter in the request. If the server doesn\'t support this method, it returns @UNIMPLEMENTED@.+--+-- /See:/ 'newComposerProjectsLocationsOperationsList' smart constructor.+data ComposerProjectsLocationsOperationsList = ComposerProjectsLocationsOperationsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The standard list filter.+    filter :: (Core.Maybe Core.Text),+    -- | The name of the operation\'s parent resource.+    name :: Core.Text,+    -- | The standard list page size.+    pageSize :: (Core.Maybe Core.Int32),+    -- | The standard list page token.+    pageToken :: (Core.Maybe Core.Text),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ComposerProjectsLocationsOperationsList' with the minimum fields required to make a request.+newComposerProjectsLocationsOperationsList ::+  -- |  The name of the operation\'s parent resource. See 'name'.+  Core.Text ->+  ComposerProjectsLocationsOperationsList+newComposerProjectsLocationsOperationsList name =+  ComposerProjectsLocationsOperationsList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      filter = Core.Nothing,+      name = name,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest ComposerProjectsLocationsOperationsList where+  type+    Rs ComposerProjectsLocationsOperationsList =+      ListOperationsResponse+  type+    Scopes ComposerProjectsLocationsOperationsList =+      '[CloudPlatform'FullControl]+  requestClient ComposerProjectsLocationsOperationsList {..} =+    go+      name+      xgafv+      accessToken+      callback+      filter+      pageSize+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      composerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy ComposerProjectsLocationsOperationsListResource+          )+          Core.mempty
+ gen/Gogol/Composer/Types.hs view
@@ -0,0 +1,377 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Composer.Types+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.Composer.Types+  ( -- * Configuration+    composerService,++    -- * OAuth Scopes+    CloudPlatform'FullControl,++    -- * Types++    -- ** Xgafv+    Xgafv (..),++    -- ** AirflowMetadataRetentionPolicyConfig+    AirflowMetadataRetentionPolicyConfig (..),+    newAirflowMetadataRetentionPolicyConfig,++    -- ** AirflowMetadataRetentionPolicyConfig_RetentionMode+    AirflowMetadataRetentionPolicyConfig_RetentionMode (..),++    -- ** AllowedIpRange+    AllowedIpRange (..),+    newAllowedIpRange,++    -- ** CheckUpgradeRequest+    CheckUpgradeRequest (..),+    newCheckUpgradeRequest,++    -- ** CheckUpgradeResponse+    CheckUpgradeResponse (..),+    newCheckUpgradeResponse,++    -- ** CheckUpgradeResponse_ContainsPypiModulesConflict+    CheckUpgradeResponse_ContainsPypiModulesConflict (..),++    -- ** CheckUpgradeResponse_PypiDependencies+    CheckUpgradeResponse_PypiDependencies (..),+    newCheckUpgradeResponse_PypiDependencies,++    -- ** CidrBlock+    CidrBlock (..),+    newCidrBlock,++    -- ** CloudDataLineageIntegration+    CloudDataLineageIntegration (..),+    newCloudDataLineageIntegration,++    -- ** ComposerWorkload+    ComposerWorkload (..),+    newComposerWorkload,++    -- ** ComposerWorkload_Type+    ComposerWorkload_Type (..),++    -- ** ComposerWorkloadStatus+    ComposerWorkloadStatus (..),+    newComposerWorkloadStatus,++    -- ** ComposerWorkloadStatus_State+    ComposerWorkloadStatus_State (..),++    -- ** DagProcessorResource+    DagProcessorResource (..),+    newDagProcessorResource,++    -- ** DataRetentionConfig+    DataRetentionConfig (..),+    newDataRetentionConfig,++    -- ** DatabaseConfig+    DatabaseConfig (..),+    newDatabaseConfig,++    -- ** DatabaseFailoverRequest+    DatabaseFailoverRequest (..),+    newDatabaseFailoverRequest,++    -- ** DatabaseFailoverResponse+    DatabaseFailoverResponse (..),+    newDatabaseFailoverResponse,++    -- ** Date+    Date (..),+    newDate,++    -- ** Empty+    Empty (..),+    newEmpty,++    -- ** EncryptionConfig+    EncryptionConfig (..),+    newEncryptionConfig,++    -- ** Environment+    Environment (..),+    newEnvironment,++    -- ** Environment_Labels+    Environment_Labels (..),+    newEnvironment_Labels,++    -- ** Environment_State+    Environment_State (..),++    -- ** EnvironmentConfig+    EnvironmentConfig (..),+    newEnvironmentConfig,++    -- ** EnvironmentConfig_EnvironmentSize+    EnvironmentConfig_EnvironmentSize (..),++    -- ** EnvironmentConfig_ResilienceMode+    EnvironmentConfig_ResilienceMode (..),++    -- ** ExecuteAirflowCommandRequest+    ExecuteAirflowCommandRequest (..),+    newExecuteAirflowCommandRequest,++    -- ** ExecuteAirflowCommandResponse+    ExecuteAirflowCommandResponse (..),+    newExecuteAirflowCommandResponse,++    -- ** ExitInfo+    ExitInfo (..),+    newExitInfo,++    -- ** FetchDatabasePropertiesResponse+    FetchDatabasePropertiesResponse (..),+    newFetchDatabasePropertiesResponse,++    -- ** IPAllocationPolicy+    IPAllocationPolicy (..),+    newIPAllocationPolicy,++    -- ** ImageVersion+    ImageVersion (..),+    newImageVersion,++    -- ** Line+    Line (..),+    newLine,++    -- ** ListEnvironmentsResponse+    ListEnvironmentsResponse (..),+    newListEnvironmentsResponse,++    -- ** ListImageVersionsResponse+    ListImageVersionsResponse (..),+    newListImageVersionsResponse,++    -- ** ListOperationsResponse+    ListOperationsResponse (..),+    newListOperationsResponse,++    -- ** ListUserWorkloadsConfigMapsResponse+    ListUserWorkloadsConfigMapsResponse (..),+    newListUserWorkloadsConfigMapsResponse,++    -- ** ListUserWorkloadsSecretsResponse+    ListUserWorkloadsSecretsResponse (..),+    newListUserWorkloadsSecretsResponse,++    -- ** ListWorkloadsResponse+    ListWorkloadsResponse (..),+    newListWorkloadsResponse,++    -- ** LoadSnapshotRequest+    LoadSnapshotRequest (..),+    newLoadSnapshotRequest,++    -- ** LoadSnapshotResponse+    LoadSnapshotResponse (..),+    newLoadSnapshotResponse,++    -- ** MaintenanceWindow+    MaintenanceWindow (..),+    newMaintenanceWindow,++    -- ** MasterAuthorizedNetworksConfig+    MasterAuthorizedNetworksConfig (..),+    newMasterAuthorizedNetworksConfig,++    -- ** NetworkingConfig+    NetworkingConfig (..),+    newNetworkingConfig,++    -- ** NetworkingConfig_ConnectionType+    NetworkingConfig_ConnectionType (..),++    -- ** NodeConfig+    NodeConfig (..),+    newNodeConfig,++    -- ** Operation+    Operation (..),+    newOperation,++    -- ** Operation_Metadata+    Operation_Metadata (..),+    newOperation_Metadata,++    -- ** Operation_Response+    Operation_Response (..),+    newOperation_Response,++    -- ** OperationMetadata+    OperationMetadata (..),+    newOperationMetadata,++    -- ** OperationMetadata_OperationType+    OperationMetadata_OperationType (..),++    -- ** OperationMetadata_State+    OperationMetadata_State (..),++    -- ** PollAirflowCommandRequest+    PollAirflowCommandRequest (..),+    newPollAirflowCommandRequest,++    -- ** PollAirflowCommandResponse+    PollAirflowCommandResponse (..),+    newPollAirflowCommandResponse,++    -- ** PrivateClusterConfig+    PrivateClusterConfig (..),+    newPrivateClusterConfig,++    -- ** PrivateEnvironmentConfig+    PrivateEnvironmentConfig (..),+    newPrivateEnvironmentConfig,++    -- ** RecoveryConfig+    RecoveryConfig (..),+    newRecoveryConfig,++    -- ** SaveSnapshotRequest+    SaveSnapshotRequest (..),+    newSaveSnapshotRequest,++    -- ** SaveSnapshotResponse+    SaveSnapshotResponse (..),+    newSaveSnapshotResponse,++    -- ** ScheduledSnapshotsConfig+    ScheduledSnapshotsConfig (..),+    newScheduledSnapshotsConfig,++    -- ** SchedulerResource+    SchedulerResource (..),+    newSchedulerResource,++    -- ** SoftwareConfig+    SoftwareConfig (..),+    newSoftwareConfig,++    -- ** SoftwareConfig_AirflowConfigOverrides+    SoftwareConfig_AirflowConfigOverrides (..),+    newSoftwareConfig_AirflowConfigOverrides,++    -- ** SoftwareConfig_EnvVariables+    SoftwareConfig_EnvVariables (..),+    newSoftwareConfig_EnvVariables,++    -- ** SoftwareConfig_PypiPackages+    SoftwareConfig_PypiPackages (..),+    newSoftwareConfig_PypiPackages,++    -- ** SoftwareConfig_WebServerPluginsMode+    SoftwareConfig_WebServerPluginsMode (..),++    -- ** Status+    Status (..),+    newStatus,++    -- ** Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- ** StopAirflowCommandRequest+    StopAirflowCommandRequest (..),+    newStopAirflowCommandRequest,++    -- ** StopAirflowCommandResponse+    StopAirflowCommandResponse (..),+    newStopAirflowCommandResponse,++    -- ** StorageConfig+    StorageConfig (..),+    newStorageConfig,++    -- ** TaskLogsRetentionConfig+    TaskLogsRetentionConfig (..),+    newTaskLogsRetentionConfig,++    -- ** TaskLogsRetentionConfig_StorageMode+    TaskLogsRetentionConfig_StorageMode (..),++    -- ** TriggererResource+    TriggererResource (..),+    newTriggererResource,++    -- ** UserWorkloadsConfigMap+    UserWorkloadsConfigMap (..),+    newUserWorkloadsConfigMap,++    -- ** UserWorkloadsConfigMap_Data+    UserWorkloadsConfigMap_Data (..),+    newUserWorkloadsConfigMap_Data,++    -- ** UserWorkloadsSecret+    UserWorkloadsSecret (..),+    newUserWorkloadsSecret,++    -- ** UserWorkloadsSecret_Data+    UserWorkloadsSecret_Data (..),+    newUserWorkloadsSecret_Data,++    -- ** WebServerConfig+    WebServerConfig (..),+    newWebServerConfig,++    -- ** WebServerNetworkAccessControl+    WebServerNetworkAccessControl (..),+    newWebServerNetworkAccessControl,++    -- ** WebServerResource+    WebServerResource (..),+    newWebServerResource,++    -- ** WorkerResource+    WorkerResource (..),+    newWorkerResource,++    -- ** WorkloadsConfig+    WorkloadsConfig (..),+    newWorkloadsConfig,+  )+where++import Gogol.Composer.Internal.Product+import Gogol.Composer.Internal.Sum+import Gogol.Prelude qualified as Core++-- | Default request referring to version @v1@ of the Cloud Composer API. This contains the host and root path used as a starting point for constructing service requests.+composerService :: Core.ServiceConfig+composerService =+  Core.defaultService+    (Core.ServiceId "composer:v1")+    "composer.googleapis.com"++-- | See, edit, configure, and delete your Google Cloud data and see the email address for your Google Account.+type CloudPlatform'FullControl =+  "https://www.googleapis.com/auth/cloud-platform"
− gen/Network/Google/Composer.hs
@@ -1,232 +0,0 @@-{-# LANGUAGE DataKinds         #-}-{-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE TypeOperators     #-}--{-# OPTIONS_GHC -fno-warn-unused-imports    #-}-{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}---- |--- Module      : Network.Google.Composer--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Manages Apache Airflow environments on Google Cloud Platform.------ /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference>-module Network.Google.Composer-    (-    -- * Service Configuration-      composerService--    -- * OAuth Scopes-    , cloudPlatformScope--    -- * API Declaration-    , ComposerAPI--    -- * Resources--    -- ** composer.projects.locations.environments.create-    , module Network.Google.Resource.Composer.Projects.Locations.Environments.Create--    -- ** composer.projects.locations.environments.delete-    , module Network.Google.Resource.Composer.Projects.Locations.Environments.Delete--    -- ** composer.projects.locations.environments.get-    , module Network.Google.Resource.Composer.Projects.Locations.Environments.Get--    -- ** composer.projects.locations.environments.list-    , module Network.Google.Resource.Composer.Projects.Locations.Environments.List--    -- ** composer.projects.locations.environments.patch-    , module Network.Google.Resource.Composer.Projects.Locations.Environments.Patch--    -- ** composer.projects.locations.imageVersions.list-    , module Network.Google.Resource.Composer.Projects.Locations.ImageVersions.List--    -- ** composer.projects.locations.operations.delete-    , module Network.Google.Resource.Composer.Projects.Locations.Operations.Delete--    -- ** composer.projects.locations.operations.get-    , module Network.Google.Resource.Composer.Projects.Locations.Operations.Get--    -- ** composer.projects.locations.operations.list-    , module Network.Google.Resource.Composer.Projects.Locations.Operations.List--    -- * Types--    -- ** Status-    , Status-    , status-    , sDetails-    , sCode-    , sMessage--    -- ** OperationSchema-    , OperationSchema-    , operationSchema-    , osAddtional--    -- ** ListImageVersionsResponse-    , ListImageVersionsResponse-    , listImageVersionsResponse-    , livrNextPageToken-    , livrImageVersions--    -- ** ListEnvironmentsResponse-    , ListEnvironmentsResponse-    , listEnvironmentsResponse-    , lerNextPageToken-    , lerEnvironments--    -- ** EnvironmentConfig-    , EnvironmentConfig-    , environmentConfig-    , ecNodeConfig-    , ecNodeCount-    , ecSoftwareConfig-    , ecDagGcsPrefix-    , ecGkeCluster-    , ecAirflowURI--    -- ** ListOperationsResponse-    , ListOperationsResponse-    , listOperationsResponse-    , lorNextPageToken-    , lorOperations--    -- ** NodeConfig-    , NodeConfig-    , nodeConfig-    , ncDiskSizeGb-    , ncLocation-    , ncNetwork-    , ncOAuthScopes-    , ncServiceAccount-    , ncSubnetwork-    , ncMachineType-    , ncTags--    -- ** Operation-    , Operation-    , operation-    , oDone-    , oError-    , oResponse-    , oName-    , oMetadata--    -- ** Empty-    , Empty-    , empty--    -- ** OperationMetadataOperationType-    , OperationMetadataOperationType (..)--    -- ** SoftwareConfigEnvVariables-    , SoftwareConfigEnvVariables-    , softwareConfigEnvVariables-    , scevAddtional--    -- ** ImageVersion-    , ImageVersion-    , imageVersion-    , ivImageVersionId-    , ivSupportedPythonVersions-    , ivIsDefault--    -- ** Environment-    , Environment-    , environment-    , eState-    , eConfig-    , eUuid-    , eUpdateTime-    , eName-    , eLabels-    , eCreateTime--    -- ** SoftwareConfigAirflowConfigOverrides-    , SoftwareConfigAirflowConfigOverrides-    , softwareConfigAirflowConfigOverrides-    , scacoAddtional--    -- ** StatusDetailsItem-    , StatusDetailsItem-    , statusDetailsItem-    , sdiAddtional--    -- ** SoftwareConfigPypiPackages-    , SoftwareConfigPypiPackages-    , softwareConfigPypiPackages-    , scppAddtional--    -- ** OperationMetadataState-    , OperationMetadataState (..)--    -- ** EnvironmentState-    , EnvironmentState (..)--    -- ** Xgafv-    , Xgafv (..)--    -- ** SoftwareConfig-    , SoftwareConfig-    , softwareConfig-    , scImageVersion-    , scPythonVersion-    , scPypiPackages-    , scAirflowConfigOverrides-    , scEnvVariables--    -- ** EnvironmentLabels-    , EnvironmentLabels-    , environmentLabels-    , elAddtional--    -- ** OperationMetadata-    , OperationMetadata-    , operationMetadata-    , omState-    , omResourceUuid-    , omResource-    , omEndTime-    , omOperationType-    , omCreateTime--    -- ** OperationResponse-    , OperationResponse-    , operationResponse-    , orAddtional-    ) where--import           Network.Google.Composer.Types-import           Network.Google.Prelude-import           Network.Google.Resource.Composer.Projects.Locations.Environments.Create-import           Network.Google.Resource.Composer.Projects.Locations.Environments.Delete-import           Network.Google.Resource.Composer.Projects.Locations.Environments.Get-import           Network.Google.Resource.Composer.Projects.Locations.Environments.List-import           Network.Google.Resource.Composer.Projects.Locations.Environments.Patch-import           Network.Google.Resource.Composer.Projects.Locations.ImageVersions.List-import           Network.Google.Resource.Composer.Projects.Locations.Operations.Delete-import           Network.Google.Resource.Composer.Projects.Locations.Operations.Get-import           Network.Google.Resource.Composer.Projects.Locations.Operations.List--{- $resources-TODO--}---- | Represents the entirety of the methods and resources available for the Cloud Composer API service.-type ComposerAPI =-     ProjectsLocationsOperationsListResource :<|>-       ProjectsLocationsOperationsGetResource-       :<|> ProjectsLocationsOperationsDeleteResource-       :<|> ProjectsLocationsImageVersionsListResource-       :<|> ProjectsLocationsEnvironmentsListResource-       :<|> ProjectsLocationsEnvironmentsPatchResource-       :<|> ProjectsLocationsEnvironmentsGetResource-       :<|> ProjectsLocationsEnvironmentsCreateResource-       :<|> ProjectsLocationsEnvironmentsDeleteResource
− gen/Network/Google/Composer/Types.hs
@@ -1,182 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.Composer.Types--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.Composer.Types-    (-    -- * Service Configuration-      composerService--    -- * OAuth Scopes-    , cloudPlatformScope--    -- * Status-    , Status-    , status-    , sDetails-    , sCode-    , sMessage--    -- * OperationSchema-    , OperationSchema-    , operationSchema-    , osAddtional--    -- * ListImageVersionsResponse-    , ListImageVersionsResponse-    , listImageVersionsResponse-    , livrNextPageToken-    , livrImageVersions--    -- * ListEnvironmentsResponse-    , ListEnvironmentsResponse-    , listEnvironmentsResponse-    , lerNextPageToken-    , lerEnvironments--    -- * EnvironmentConfig-    , EnvironmentConfig-    , environmentConfig-    , ecNodeConfig-    , ecNodeCount-    , ecSoftwareConfig-    , ecDagGcsPrefix-    , ecGkeCluster-    , ecAirflowURI--    -- * ListOperationsResponse-    , ListOperationsResponse-    , listOperationsResponse-    , lorNextPageToken-    , lorOperations--    -- * NodeConfig-    , NodeConfig-    , nodeConfig-    , ncDiskSizeGb-    , ncLocation-    , ncNetwork-    , ncOAuthScopes-    , ncServiceAccount-    , ncSubnetwork-    , ncMachineType-    , ncTags--    -- * Operation-    , Operation-    , operation-    , oDone-    , oError-    , oResponse-    , oName-    , oMetadata--    -- * Empty-    , Empty-    , empty--    -- * OperationMetadataOperationType-    , OperationMetadataOperationType (..)--    -- * SoftwareConfigEnvVariables-    , SoftwareConfigEnvVariables-    , softwareConfigEnvVariables-    , scevAddtional--    -- * ImageVersion-    , ImageVersion-    , imageVersion-    , ivImageVersionId-    , ivSupportedPythonVersions-    , ivIsDefault--    -- * Environment-    , Environment-    , environment-    , eState-    , eConfig-    , eUuid-    , eUpdateTime-    , eName-    , eLabels-    , eCreateTime--    -- * SoftwareConfigAirflowConfigOverrides-    , SoftwareConfigAirflowConfigOverrides-    , softwareConfigAirflowConfigOverrides-    , scacoAddtional--    -- * StatusDetailsItem-    , StatusDetailsItem-    , statusDetailsItem-    , sdiAddtional--    -- * SoftwareConfigPypiPackages-    , SoftwareConfigPypiPackages-    , softwareConfigPypiPackages-    , scppAddtional--    -- * OperationMetadataState-    , OperationMetadataState (..)--    -- * EnvironmentState-    , EnvironmentState (..)--    -- * Xgafv-    , Xgafv (..)--    -- * SoftwareConfig-    , SoftwareConfig-    , softwareConfig-    , scImageVersion-    , scPythonVersion-    , scPypiPackages-    , scAirflowConfigOverrides-    , scEnvVariables--    -- * EnvironmentLabels-    , EnvironmentLabels-    , environmentLabels-    , elAddtional--    -- * OperationMetadata-    , OperationMetadata-    , operationMetadata-    , omState-    , omResourceUuid-    , omResource-    , omEndTime-    , omOperationType-    , omCreateTime--    -- * OperationResponse-    , OperationResponse-    , operationResponse-    , orAddtional-    ) where--import           Network.Google.Composer.Types.Product-import           Network.Google.Composer.Types.Sum-import           Network.Google.Prelude---- | Default request referring to version 'v1' of the Cloud Composer API. This contains the host and root path used as a starting point for constructing service requests.-composerService :: ServiceConfig-composerService-  = defaultService (ServiceId "composer:v1")-      "composer.googleapis.com"---- | View and manage your data across Google Cloud Platform services-cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]-cloudPlatformScope = Proxy
− gen/Network/Google/Composer/Types/Product.hs
@@ -1,1393 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}--{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.Composer.Types.Product--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.Composer.Types.Product where--import           Network.Google.Composer.Types.Sum-import           Network.Google.Prelude---- | The \`Status\` type defines a logical error model that is suitable for--- different programming environments, including REST APIs and RPC APIs. It--- is used by [gRPC](https:\/\/github.com\/grpc). The error model is--- designed to be: - Simple to use and understand for most users - Flexible--- enough to meet unexpected needs # Overview The \`Status\` message--- contains three pieces of data: error code, error message, and error--- details. The error code should be an enum value of google.rpc.Code, but--- it may accept additional error codes if needed. The error message should--- be a developer-facing English message that helps developers *understand*--- and *resolve* the error. If a localized user-facing error message is--- needed, put the localized message in the error details or localize it in--- the client. The optional error details may contain arbitrary information--- about the error. There is a predefined set of error detail types in the--- package \`google.rpc\` that can be used for common error conditions. #--- Language mapping The \`Status\` message is the logical representation of--- the error model, but it is not necessarily the actual wire format. When--- the \`Status\` message is exposed in different client libraries and--- different wire protocols, it can be mapped differently. For example, it--- will likely be mapped to some exceptions in Java, but more likely mapped--- to some error codes in C. # Other uses The error model and the--- \`Status\` message can be used in a variety of environments, either with--- or without APIs, to provide a consistent developer experience across--- different environments. Example uses of this error model include: ---- Partial errors. If a service needs to return partial errors to the--- client, it may embed the \`Status\` in the normal response to indicate--- the partial errors. - Workflow errors. A typical workflow has multiple--- steps. Each step may have a \`Status\` message for error reporting. ---- Batch operations. If a client uses batch request and batch response, the--- \`Status\` message should be used directly inside batch response, one--- for each error sub-response. - Asynchronous operations. If an API call--- embeds asynchronous operation results in its response, the status of--- those operations should be represented directly using the \`Status\`--- message. - Logging. If some API errors are stored in logs, the message--- \`Status\` could be used directly after any stripping needed for--- security\/privacy reasons.------ /See:/ 'status' smart constructor.-data Status =-  Status'-    { _sDetails :: !(Maybe [StatusDetailsItem])-    , _sCode    :: !(Maybe (Textual Int32))-    , _sMessage :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Status' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sDetails'------ * 'sCode'------ * 'sMessage'-status-    :: Status-status = Status' {_sDetails = Nothing, _sCode = Nothing, _sMessage = Nothing}----- | A list of messages that carry the error details. There is a common set--- of message types for APIs to use.-sDetails :: Lens' Status [StatusDetailsItem]-sDetails-  = lens _sDetails (\ s a -> s{_sDetails = a}) .-      _Default-      . _Coerce---- | The status code, which should be an enum value of google.rpc.Code.-sCode :: Lens' Status (Maybe Int32)-sCode-  = lens _sCode (\ s a -> s{_sCode = a}) .-      mapping _Coerce---- | A developer-facing error message, which should be in English. Any--- user-facing error message should be localized and sent in the--- google.rpc.Status.details field, or localized by the client.-sMessage :: Lens' Status (Maybe Text)-sMessage = lens _sMessage (\ s a -> s{_sMessage = a})--instance FromJSON Status where-        parseJSON-          = withObject "Status"-              (\ o ->-                 Status' <$>-                   (o .:? "details" .!= mempty) <*> (o .:? "code") <*>-                     (o .:? "message"))--instance ToJSON Status where-        toJSON Status'{..}-          = object-              (catMaybes-                 [("details" .=) <$> _sDetails,-                  ("code" .=) <$> _sCode,-                  ("message" .=) <$> _sMessage])---- | Service-specific metadata associated with the operation. It typically--- contains progress information and common metadata such as create time.--- Some services might not provide such metadata. Any method that returns a--- long-running operation should document the metadata type, if any.------ /See:/ 'operationSchema' smart constructor.-newtype OperationSchema =-  OperationSchema'-    { _osAddtional :: HashMap Text JSONValue-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationSchema' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'osAddtional'-operationSchema-    :: HashMap Text JSONValue -- ^ 'osAddtional'-    -> OperationSchema-operationSchema pOsAddtional_ =-  OperationSchema' {_osAddtional = _Coerce # pOsAddtional_}----- | Properties of the object. Contains field \'type with type URL.-osAddtional :: Lens' OperationSchema (HashMap Text JSONValue)-osAddtional-  = lens _osAddtional (\ s a -> s{_osAddtional = a}) .-      _Coerce--instance FromJSON OperationSchema where-        parseJSON-          = withObject "OperationSchema"-              (\ o -> OperationSchema' <$> (parseJSONObject o))--instance ToJSON OperationSchema where-        toJSON = toJSON . _osAddtional---- | The ImageVersions in a project and location.------ /See:/ 'listImageVersionsResponse' smart constructor.-data ListImageVersionsResponse =-  ListImageVersionsResponse'-    { _livrNextPageToken :: !(Maybe Text)-    , _livrImageVersions :: !(Maybe [ImageVersion])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ListImageVersionsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'livrNextPageToken'------ * 'livrImageVersions'-listImageVersionsResponse-    :: ListImageVersionsResponse-listImageVersionsResponse =-  ListImageVersionsResponse'-    {_livrNextPageToken = Nothing, _livrImageVersions = Nothing}----- | The page token used to query for the next page if one exists.-livrNextPageToken :: Lens' ListImageVersionsResponse (Maybe Text)-livrNextPageToken-  = lens _livrNextPageToken-      (\ s a -> s{_livrNextPageToken = a})---- | The list of supported ImageVersions in a location.-livrImageVersions :: Lens' ListImageVersionsResponse [ImageVersion]-livrImageVersions-  = lens _livrImageVersions-      (\ s a -> s{_livrImageVersions = a})-      . _Default-      . _Coerce--instance FromJSON ListImageVersionsResponse where-        parseJSON-          = withObject "ListImageVersionsResponse"-              (\ o ->-                 ListImageVersionsResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "imageVersions" .!= mempty))--instance ToJSON ListImageVersionsResponse where-        toJSON ListImageVersionsResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _livrNextPageToken,-                  ("imageVersions" .=) <$> _livrImageVersions])---- | The environments in a project and location.------ /See:/ 'listEnvironmentsResponse' smart constructor.-data ListEnvironmentsResponse =-  ListEnvironmentsResponse'-    { _lerNextPageToken :: !(Maybe Text)-    , _lerEnvironments  :: !(Maybe [Environment])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ListEnvironmentsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lerNextPageToken'------ * 'lerEnvironments'-listEnvironmentsResponse-    :: ListEnvironmentsResponse-listEnvironmentsResponse =-  ListEnvironmentsResponse'-    {_lerNextPageToken = Nothing, _lerEnvironments = Nothing}----- | The page token used to query for the next page if one exists.-lerNextPageToken :: Lens' ListEnvironmentsResponse (Maybe Text)-lerNextPageToken-  = lens _lerNextPageToken-      (\ s a -> s{_lerNextPageToken = a})---- | The list of environments returned by a ListEnvironmentsRequest.-lerEnvironments :: Lens' ListEnvironmentsResponse [Environment]-lerEnvironments-  = lens _lerEnvironments-      (\ s a -> s{_lerEnvironments = a})-      . _Default-      . _Coerce--instance FromJSON ListEnvironmentsResponse where-        parseJSON-          = withObject "ListEnvironmentsResponse"-              (\ o ->-                 ListEnvironmentsResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "environments" .!= mempty))--instance ToJSON ListEnvironmentsResponse where-        toJSON ListEnvironmentsResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _lerNextPageToken,-                  ("environments" .=) <$> _lerEnvironments])---- | Configuration information for an environment.------ /See:/ 'environmentConfig' smart constructor.-data EnvironmentConfig =-  EnvironmentConfig'-    { _ecNodeConfig     :: !(Maybe NodeConfig)-    , _ecNodeCount      :: !(Maybe (Textual Int32))-    , _ecSoftwareConfig :: !(Maybe SoftwareConfig)-    , _ecDagGcsPrefix   :: !(Maybe Text)-    , _ecGkeCluster     :: !(Maybe Text)-    , _ecAirflowURI     :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'EnvironmentConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ecNodeConfig'------ * 'ecNodeCount'------ * 'ecSoftwareConfig'------ * 'ecDagGcsPrefix'------ * 'ecGkeCluster'------ * 'ecAirflowURI'-environmentConfig-    :: EnvironmentConfig-environmentConfig =-  EnvironmentConfig'-    { _ecNodeConfig = Nothing-    , _ecNodeCount = Nothing-    , _ecSoftwareConfig = Nothing-    , _ecDagGcsPrefix = Nothing-    , _ecGkeCluster = Nothing-    , _ecAirflowURI = Nothing-    }----- | The configuration used for the Kubernetes Engine cluster.-ecNodeConfig :: Lens' EnvironmentConfig (Maybe NodeConfig)-ecNodeConfig-  = lens _ecNodeConfig (\ s a -> s{_ecNodeConfig = a})---- | The number of nodes in the Kubernetes Engine cluster that will be used--- to run this environment.-ecNodeCount :: Lens' EnvironmentConfig (Maybe Int32)-ecNodeCount-  = lens _ecNodeCount (\ s a -> s{_ecNodeCount = a}) .-      mapping _Coerce---- | The configuration settings for software inside the environment.-ecSoftwareConfig :: Lens' EnvironmentConfig (Maybe SoftwareConfig)-ecSoftwareConfig-  = lens _ecSoftwareConfig-      (\ s a -> s{_ecSoftwareConfig = a})---- | Output only. The Cloud Storage prefix of the DAGs for this environment.--- Although Cloud Storage objects reside in a flat namespace, a--- hierarchical file tree can be simulated using \"\/\"-delimited object--- name prefixes. DAG objects for this environment reside in a simulated--- directory with the given prefix.-ecDagGcsPrefix :: Lens' EnvironmentConfig (Maybe Text)-ecDagGcsPrefix-  = lens _ecDagGcsPrefix-      (\ s a -> s{_ecDagGcsPrefix = a})---- | Output only. The Kubernetes Engine cluster used to run this environment.-ecGkeCluster :: Lens' EnvironmentConfig (Maybe Text)-ecGkeCluster-  = lens _ecGkeCluster (\ s a -> s{_ecGkeCluster = a})---- | Output only. The URI of the Apache Airflow Web UI hosted within this--- environment (see [Airflow web--- interface](\/composer\/docs\/how-to\/accessing\/airflow-web-interface)).-ecAirflowURI :: Lens' EnvironmentConfig (Maybe Text)-ecAirflowURI-  = lens _ecAirflowURI (\ s a -> s{_ecAirflowURI = a})--instance FromJSON EnvironmentConfig where-        parseJSON-          = withObject "EnvironmentConfig"-              (\ o ->-                 EnvironmentConfig' <$>-                   (o .:? "nodeConfig") <*> (o .:? "nodeCount") <*>-                     (o .:? "softwareConfig")-                     <*> (o .:? "dagGcsPrefix")-                     <*> (o .:? "gkeCluster")-                     <*> (o .:? "airflowUri"))--instance ToJSON EnvironmentConfig where-        toJSON EnvironmentConfig'{..}-          = object-              (catMaybes-                 [("nodeConfig" .=) <$> _ecNodeConfig,-                  ("nodeCount" .=) <$> _ecNodeCount,-                  ("softwareConfig" .=) <$> _ecSoftwareConfig,-                  ("dagGcsPrefix" .=) <$> _ecDagGcsPrefix,-                  ("gkeCluster" .=) <$> _ecGkeCluster,-                  ("airflowUri" .=) <$> _ecAirflowURI])---- | The response message for Operations.ListOperations.------ /See:/ 'listOperationsResponse' smart constructor.-data ListOperationsResponse =-  ListOperationsResponse'-    { _lorNextPageToken :: !(Maybe Text)-    , _lorOperations    :: !(Maybe [Operation])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ListOperationsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lorNextPageToken'------ * 'lorOperations'-listOperationsResponse-    :: ListOperationsResponse-listOperationsResponse =-  ListOperationsResponse'-    {_lorNextPageToken = Nothing, _lorOperations = Nothing}----- | The standard List next-page token.-lorNextPageToken :: Lens' ListOperationsResponse (Maybe Text)-lorNextPageToken-  = lens _lorNextPageToken-      (\ s a -> s{_lorNextPageToken = a})---- | A list of operations that matches the specified filter in the request.-lorOperations :: Lens' ListOperationsResponse [Operation]-lorOperations-  = lens _lorOperations-      (\ s a -> s{_lorOperations = a})-      . _Default-      . _Coerce--instance FromJSON ListOperationsResponse where-        parseJSON-          = withObject "ListOperationsResponse"-              (\ o ->-                 ListOperationsResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "operations" .!= mempty))--instance ToJSON ListOperationsResponse where-        toJSON ListOperationsResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _lorNextPageToken,-                  ("operations" .=) <$> _lorOperations])---- | The configuration information for the Kubernetes Engine nodes running--- the Apache Airflow software.------ /See:/ 'nodeConfig' smart constructor.-data NodeConfig =-  NodeConfig'-    { _ncDiskSizeGb     :: !(Maybe (Textual Int32))-    , _ncLocation       :: !(Maybe Text)-    , _ncNetwork        :: !(Maybe Text)-    , _ncOAuthScopes    :: !(Maybe [Text])-    , _ncServiceAccount :: !(Maybe Text)-    , _ncSubnetwork     :: !(Maybe Text)-    , _ncMachineType    :: !(Maybe Text)-    , _ncTags           :: !(Maybe [Text])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'NodeConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ncDiskSizeGb'------ * 'ncLocation'------ * 'ncNetwork'------ * 'ncOAuthScopes'------ * 'ncServiceAccount'------ * 'ncSubnetwork'------ * 'ncMachineType'------ * 'ncTags'-nodeConfig-    :: NodeConfig-nodeConfig =-  NodeConfig'-    { _ncDiskSizeGb = Nothing-    , _ncLocation = Nothing-    , _ncNetwork = Nothing-    , _ncOAuthScopes = Nothing-    , _ncServiceAccount = Nothing-    , _ncSubnetwork = Nothing-    , _ncMachineType = Nothing-    , _ncTags = Nothing-    }----- | Optional. The disk size in GB used for node VMs. Minimum size is 20GB.--- If unspecified, defaults to 100GB. Cannot be updated.-ncDiskSizeGb :: Lens' NodeConfig (Maybe Int32)-ncDiskSizeGb-  = lens _ncDiskSizeGb (\ s a -> s{_ncDiskSizeGb = a})-      . mapping _Coerce---- | Optional. The Compute Engine [zone](\/compute\/docs\/regions-zones) in--- which to deploy the VMs used to run the Apache Airflow software,--- specified as a [relative resource--- name](\/apis\/design\/resource_names#relative_resource_name). For--- example: \"projects\/{projectId}\/zones\/{zoneId}\". This \`location\`--- must belong to the enclosing environment\'s project and location. If--- both this field and \`nodeConfig.machineType\` are specified,--- \`nodeConfig.machineType\` must belong to this \`location\`; if both are--- unspecified, the service will pick a zone in the Compute Engine region--- corresponding to the Cloud Composer location, and propagate that choice--- to both fields. If only one field (\`location\` or--- \`nodeConfig.machineType\`) is specified, the location information from--- the specified field will be propagated to the unspecified field.-ncLocation :: Lens' NodeConfig (Maybe Text)-ncLocation-  = lens _ncLocation (\ s a -> s{_ncLocation = a})---- | Optional. The Compute Engine network to be used for machine--- communications, specified as a [relative resource--- name](\/apis\/design\/resource_names#relative_resource_name). For--- example: \"projects\/{projectId}\/global\/networks\/{networkId}\".--- [Shared VPC](\/vpc\/docs\/shared-vpc) is not currently supported. The--- network must belong to the environment\'s project. If unspecified, the--- \"default\" network ID in the environment\'s project is used. If a--- [Custom Subnet Network](\/vpc\/docs\/vpc#vpc_networks_and_subnets) is--- provided, \`nodeConfig.subnetwork\` must also be provided.-ncNetwork :: Lens' NodeConfig (Maybe Text)-ncNetwork-  = lens _ncNetwork (\ s a -> s{_ncNetwork = a})---- | Optional. The set of Google API scopes to be made available on all node--- VMs. If \`oauth_scopes\` is empty, defaults to--- [\"https:\/\/www.googleapis.com\/auth\/cloud-platform\"]. Cannot be--- updated.-ncOAuthScopes :: Lens' NodeConfig [Text]-ncOAuthScopes-  = lens _ncOAuthScopes-      (\ s a -> s{_ncOAuthScopes = a})-      . _Default-      . _Coerce---- | Optional. The Google Cloud Platform Service Account to be used by the--- node VMs. If a service account is not specified, the \"default\" Compute--- Engine service account is used. Cannot be updated.-ncServiceAccount :: Lens' NodeConfig (Maybe Text)-ncServiceAccount-  = lens _ncServiceAccount-      (\ s a -> s{_ncServiceAccount = a})---- | Optional. The Compute Engine subnetwork to be used for machine--- communications, specified as a [relative resource--- name](\/apis\/design\/resource_names#relative_resource_name). For--- example:--- \"projects\/{projectId}\/regions\/{regionId}\/subnetworks\/{subnetworkId}\"--- If a subnetwork is provided, \`nodeConfig.network\` must also be--- provided, and the subnetwork must belong to the enclosing environment\'s--- project and location.-ncSubnetwork :: Lens' NodeConfig (Maybe Text)-ncSubnetwork-  = lens _ncSubnetwork (\ s a -> s{_ncSubnetwork = a})---- | Optional. The Compute Engine [machine--- type](\/compute\/docs\/machine-types) used for cluster instances,--- specified as a [relative resource--- name](\/apis\/design\/resource_names#relative_resource_name). For--- example:--- \"projects\/{projectId}\/zones\/{zoneId}\/machineTypes\/{machineTypeId}\".--- The \`machineType\` must belong to the enclosing environment\'s project--- and location. If both this field and \`nodeConfig.location\` are--- specified, this \`machineType\` must belong to the--- \`nodeConfig.location\`; if both are unspecified, the service will pick--- a zone in the Compute Engine region corresponding to the Cloud Composer--- location, and propagate that choice to both fields. If exactly one of--- this field and \`nodeConfig.location\` is specified, the location--- information from the specified field will be propagated to the--- unspecified field. If this field is unspecified, the \`machineTypeId\`--- defaults to \"n1-standard-1\".-ncMachineType :: Lens' NodeConfig (Maybe Text)-ncMachineType-  = lens _ncMachineType-      (\ s a -> s{_ncMachineType = a})---- | Optional. The list of instance tags applied to all node VMs. Tags are--- used to identify valid sources or targets for network firewalls. Each--- tag within the list must comply with--- [RFC1035](https:\/\/www.ietf.org\/rfc\/rfc1035.txt). Cannot be updated.-ncTags :: Lens' NodeConfig [Text]-ncTags-  = lens _ncTags (\ s a -> s{_ncTags = a}) . _Default .-      _Coerce--instance FromJSON NodeConfig where-        parseJSON-          = withObject "NodeConfig"-              (\ o ->-                 NodeConfig' <$>-                   (o .:? "diskSizeGb") <*> (o .:? "location") <*>-                     (o .:? "network")-                     <*> (o .:? "oauthScopes" .!= mempty)-                     <*> (o .:? "serviceAccount")-                     <*> (o .:? "subnetwork")-                     <*> (o .:? "machineType")-                     <*> (o .:? "tags" .!= mempty))--instance ToJSON NodeConfig where-        toJSON NodeConfig'{..}-          = object-              (catMaybes-                 [("diskSizeGb" .=) <$> _ncDiskSizeGb,-                  ("location" .=) <$> _ncLocation,-                  ("network" .=) <$> _ncNetwork,-                  ("oauthScopes" .=) <$> _ncOAuthScopes,-                  ("serviceAccount" .=) <$> _ncServiceAccount,-                  ("subnetwork" .=) <$> _ncSubnetwork,-                  ("machineType" .=) <$> _ncMachineType,-                  ("tags" .=) <$> _ncTags])---- | This resource represents a long-running operation that is the result of--- a network API call.------ /See:/ 'operation' smart constructor.-data Operation =-  Operation'-    { _oDone     :: !(Maybe Bool)-    , _oError    :: !(Maybe Status)-    , _oResponse :: !(Maybe OperationResponse)-    , _oName     :: !(Maybe Text)-    , _oMetadata :: !(Maybe OperationSchema)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Operation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'oDone'------ * 'oError'------ * 'oResponse'------ * 'oName'------ * 'oMetadata'-operation-    :: Operation-operation =-  Operation'-    { _oDone = Nothing-    , _oError = Nothing-    , _oResponse = Nothing-    , _oName = Nothing-    , _oMetadata = Nothing-    }----- | If the value is \`false\`, it means the operation is still in progress.--- If \`true\`, the operation is completed, and either \`error\` or--- \`response\` is available.-oDone :: Lens' Operation (Maybe Bool)-oDone = lens _oDone (\ s a -> s{_oDone = a})---- | The error result of the operation in case of failure or cancellation.-oError :: Lens' Operation (Maybe Status)-oError = lens _oError (\ s a -> s{_oError = a})---- | The normal response of the operation in case of success. If the original--- method returns no data on success, such as \`Delete\`, the response is--- \`google.protobuf.Empty\`. If the original method is standard--- \`Get\`\/\`Create\`\/\`Update\`, the response should be the resource.--- For other methods, the response should have the type \`XxxResponse\`,--- where \`Xxx\` is the original method name. For example, if the original--- method name is \`TakeSnapshot()\`, the inferred response type is--- \`TakeSnapshotResponse\`.-oResponse :: Lens' Operation (Maybe OperationResponse)-oResponse-  = lens _oResponse (\ s a -> s{_oResponse = a})---- | The server-assigned name, which is only unique within the same service--- that originally returns it. If you use the default HTTP mapping, the--- \`name\` should have the format of \`operations\/some\/unique\/name\`.-oName :: Lens' Operation (Maybe Text)-oName = lens _oName (\ s a -> s{_oName = a})---- | Service-specific metadata associated with the operation. It typically--- contains progress information and common metadata such as create time.--- Some services might not provide such metadata. Any method that returns a--- long-running operation should document the metadata type, if any.-oMetadata :: Lens' Operation (Maybe OperationSchema)-oMetadata-  = lens _oMetadata (\ s a -> s{_oMetadata = a})--instance FromJSON Operation where-        parseJSON-          = withObject "Operation"-              (\ o ->-                 Operation' <$>-                   (o .:? "done") <*> (o .:? "error") <*>-                     (o .:? "response")-                     <*> (o .:? "name")-                     <*> (o .:? "metadata"))--instance ToJSON Operation where-        toJSON Operation'{..}-          = object-              (catMaybes-                 [("done" .=) <$> _oDone, ("error" .=) <$> _oError,-                  ("response" .=) <$> _oResponse,-                  ("name" .=) <$> _oName,-                  ("metadata" .=) <$> _oMetadata])---- | A generic empty message that you can re-use to avoid defining duplicated--- empty messages in your APIs. A typical example is to use it as the--- request or the response type of an API method. For instance: service Foo--- { rpc Bar(google.protobuf.Empty) returns (google.protobuf.Empty); } The--- JSON representation for \`Empty\` is empty JSON object \`{}\`.------ /See:/ 'empty' smart constructor.-data Empty =-  Empty'-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Empty' with the minimum fields required to make a request.----empty-    :: Empty-empty = Empty'---instance FromJSON Empty where-        parseJSON = withObject "Empty" (\ o -> pure Empty')--instance ToJSON Empty where-        toJSON = const emptyObject---- | Optional. Additional environment variables to provide to the Apache--- Airflow scheduler, worker, and webserver processes. Environment variable--- names must match the regular expression \`a-zA-Z_*\`. They cannot--- specify Apache Airflow software configuration overrides (they cannot--- match the regular expression \`AIRFLOW__[A-Z0-9_]+__[A-Z0-9_]+\`), and--- they cannot match any of the following reserved names: *--- \`AIRFLOW_HOME\` * \`C_FORCE_ROOT\` * \`CONTAINER_NAME\` *--- \`DAGS_FOLDER\` * \`GCP_PROJECT\` * \`GCS_BUCKET\` *--- \`GKE_CLUSTER_NAME\` * \`SQL_DATABASE\` * \`SQL_INSTANCE\` *--- \`SQL_PASSWORD\` * \`SQL_PROJECT\` * \`SQL_REGION\` * \`SQL_USER\`------ /See:/ 'softwareConfigEnvVariables' smart constructor.-newtype SoftwareConfigEnvVariables =-  SoftwareConfigEnvVariables'-    { _scevAddtional :: HashMap Text Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SoftwareConfigEnvVariables' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'scevAddtional'-softwareConfigEnvVariables-    :: HashMap Text Text -- ^ 'scevAddtional'-    -> SoftwareConfigEnvVariables-softwareConfigEnvVariables pScevAddtional_ =-  SoftwareConfigEnvVariables' {_scevAddtional = _Coerce # pScevAddtional_}---scevAddtional :: Lens' SoftwareConfigEnvVariables (HashMap Text Text)-scevAddtional-  = lens _scevAddtional-      (\ s a -> s{_scevAddtional = a})-      . _Coerce--instance FromJSON SoftwareConfigEnvVariables where-        parseJSON-          = withObject "SoftwareConfigEnvVariables"-              (\ o ->-                 SoftwareConfigEnvVariables' <$> (parseJSONObject o))--instance ToJSON SoftwareConfigEnvVariables where-        toJSON = toJSON . _scevAddtional---- | ImageVersion information------ /See:/ 'imageVersion' smart constructor.-data ImageVersion =-  ImageVersion'-    { _ivImageVersionId          :: !(Maybe Text)-    , _ivSupportedPythonVersions :: !(Maybe [Text])-    , _ivIsDefault               :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ImageVersion' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ivImageVersionId'------ * 'ivSupportedPythonVersions'------ * 'ivIsDefault'-imageVersion-    :: ImageVersion-imageVersion =-  ImageVersion'-    { _ivImageVersionId = Nothing-    , _ivSupportedPythonVersions = Nothing-    , _ivIsDefault = Nothing-    }----- | The string identifier of the ImageVersion, in the form:--- \"composer-x.y.z-airflow-a.b(.c)\"-ivImageVersionId :: Lens' ImageVersion (Maybe Text)-ivImageVersionId-  = lens _ivImageVersionId-      (\ s a -> s{_ivImageVersionId = a})---- | supported python versions-ivSupportedPythonVersions :: Lens' ImageVersion [Text]-ivSupportedPythonVersions-  = lens _ivSupportedPythonVersions-      (\ s a -> s{_ivSupportedPythonVersions = a})-      . _Default-      . _Coerce---- | Whether this is the default ImageVersion used by Composer during--- environment creation if no input ImageVersion is specified.-ivIsDefault :: Lens' ImageVersion (Maybe Bool)-ivIsDefault-  = lens _ivIsDefault (\ s a -> s{_ivIsDefault = a})--instance FromJSON ImageVersion where-        parseJSON-          = withObject "ImageVersion"-              (\ o ->-                 ImageVersion' <$>-                   (o .:? "imageVersionId") <*>-                     (o .:? "supportedPythonVersions" .!= mempty)-                     <*> (o .:? "isDefault"))--instance ToJSON ImageVersion where-        toJSON ImageVersion'{..}-          = object-              (catMaybes-                 [("imageVersionId" .=) <$> _ivImageVersionId,-                  ("supportedPythonVersions" .=) <$>-                    _ivSupportedPythonVersions,-                  ("isDefault" .=) <$> _ivIsDefault])---- | An environment for running orchestration tasks.------ /See:/ 'environment' smart constructor.-data Environment =-  Environment'-    { _eState      :: !(Maybe EnvironmentState)-    , _eConfig     :: !(Maybe EnvironmentConfig)-    , _eUuid       :: !(Maybe Text)-    , _eUpdateTime :: !(Maybe DateTime')-    , _eName       :: !(Maybe Text)-    , _eLabels     :: !(Maybe EnvironmentLabels)-    , _eCreateTime :: !(Maybe DateTime')-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Environment' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'eState'------ * 'eConfig'------ * 'eUuid'------ * 'eUpdateTime'------ * 'eName'------ * 'eLabels'------ * 'eCreateTime'-environment-    :: Environment-environment =-  Environment'-    { _eState = Nothing-    , _eConfig = Nothing-    , _eUuid = Nothing-    , _eUpdateTime = Nothing-    , _eName = Nothing-    , _eLabels = Nothing-    , _eCreateTime = Nothing-    }----- | The current state of the environment.-eState :: Lens' Environment (Maybe EnvironmentState)-eState = lens _eState (\ s a -> s{_eState = a})---- | Configuration parameters for this environment.-eConfig :: Lens' Environment (Maybe EnvironmentConfig)-eConfig = lens _eConfig (\ s a -> s{_eConfig = a})---- | Output only. The UUID (Universally Unique IDentifier) associated with--- this environment. This value is generated when the environment is--- created.-eUuid :: Lens' Environment (Maybe Text)-eUuid = lens _eUuid (\ s a -> s{_eUuid = a})---- | Output only. The time at which this environment was last modified.-eUpdateTime :: Lens' Environment (Maybe UTCTime)-eUpdateTime-  = lens _eUpdateTime (\ s a -> s{_eUpdateTime = a}) .-      mapping _DateTime---- | The resource name of the environment, in the form:--- \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"-eName :: Lens' Environment (Maybe Text)-eName = lens _eName (\ s a -> s{_eName = a})---- | Optional. User-defined labels for this environment. The labels map can--- contain no more than 64 entries. Entries of the labels map are UTF8--- strings that comply with the following restrictions: * Keys must conform--- to regexp: \\p{Ll}\\p{Lo}{0,62} * Values must conform to regexp:--- [\\p{Ll}\\p{Lo}\\p{N}_-]{0,63} * Both keys and values are additionally--- constrained to be \<= 128 bytes in size.-eLabels :: Lens' Environment (Maybe EnvironmentLabels)-eLabels = lens _eLabels (\ s a -> s{_eLabels = a})---- | Output only. The time at which this environment was created.-eCreateTime :: Lens' Environment (Maybe UTCTime)-eCreateTime-  = lens _eCreateTime (\ s a -> s{_eCreateTime = a}) .-      mapping _DateTime--instance FromJSON Environment where-        parseJSON-          = withObject "Environment"-              (\ o ->-                 Environment' <$>-                   (o .:? "state") <*> (o .:? "config") <*>-                     (o .:? "uuid")-                     <*> (o .:? "updateTime")-                     <*> (o .:? "name")-                     <*> (o .:? "labels")-                     <*> (o .:? "createTime"))--instance ToJSON Environment where-        toJSON Environment'{..}-          = object-              (catMaybes-                 [("state" .=) <$> _eState,-                  ("config" .=) <$> _eConfig, ("uuid" .=) <$> _eUuid,-                  ("updateTime" .=) <$> _eUpdateTime,-                  ("name" .=) <$> _eName, ("labels" .=) <$> _eLabels,-                  ("createTime" .=) <$> _eCreateTime])---- | Optional. Apache Airflow configuration properties to override. Property--- keys contain the section and property names, separated by a hyphen, for--- example \"core-dags_are_paused_at_creation\". Section names must not--- contain hyphens (\"-\"), opening square brackets (\"[\"), or closing--- square brackets (\"]\"). The property name must not be empty and must--- not contain an equals sign (\"=\") or semicolon (\";\"). Section and--- property names must not contain a period (\".\"). Apache Airflow--- configuration property names must be written in--- [snake_case](https:\/\/en.wikipedia.org\/wiki\/Snake_case). Property--- values can contain any character, and can be written in any lower\/upper--- case format. Certain Apache Airflow configuration property values are--- [blacklisted](\/composer\/docs\/how-to\/managing\/setting-airflow-configurations#airflow_configuration_blacklists),--- and cannot be overridden.------ /See:/ 'softwareConfigAirflowConfigOverrides' smart constructor.-newtype SoftwareConfigAirflowConfigOverrides =-  SoftwareConfigAirflowConfigOverrides'-    { _scacoAddtional :: HashMap Text Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SoftwareConfigAirflowConfigOverrides' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'scacoAddtional'-softwareConfigAirflowConfigOverrides-    :: HashMap Text Text -- ^ 'scacoAddtional'-    -> SoftwareConfigAirflowConfigOverrides-softwareConfigAirflowConfigOverrides pScacoAddtional_ =-  SoftwareConfigAirflowConfigOverrides'-    {_scacoAddtional = _Coerce # pScacoAddtional_}---scacoAddtional :: Lens' SoftwareConfigAirflowConfigOverrides (HashMap Text Text)-scacoAddtional-  = lens _scacoAddtional-      (\ s a -> s{_scacoAddtional = a})-      . _Coerce--instance FromJSON-           SoftwareConfigAirflowConfigOverrides-         where-        parseJSON-          = withObject "SoftwareConfigAirflowConfigOverrides"-              (\ o ->-                 SoftwareConfigAirflowConfigOverrides' <$>-                   (parseJSONObject o))--instance ToJSON SoftwareConfigAirflowConfigOverrides-         where-        toJSON = toJSON . _scacoAddtional------- /See:/ 'statusDetailsItem' smart constructor.-newtype StatusDetailsItem =-  StatusDetailsItem'-    { _sdiAddtional :: HashMap Text JSONValue-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sdiAddtional'-statusDetailsItem-    :: HashMap Text JSONValue -- ^ 'sdiAddtional'-    -> StatusDetailsItem-statusDetailsItem pSdiAddtional_ =-  StatusDetailsItem' {_sdiAddtional = _Coerce # pSdiAddtional_}----- | Properties of the object. Contains field \'type with type URL.-sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)-sdiAddtional-  = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})-      . _Coerce--instance FromJSON StatusDetailsItem where-        parseJSON-          = withObject "StatusDetailsItem"-              (\ o -> StatusDetailsItem' <$> (parseJSONObject o))--instance ToJSON StatusDetailsItem where-        toJSON = toJSON . _sdiAddtional---- | Optional. Custom Python Package Index (PyPI) packages to be installed in--- the environment. Keys refer to the lowercase package name such as--- \"numpy\" and values are the lowercase extras and version specifier such--- as \"==1.12.0\", \"[devel,gcp_api]\", or \"[devel]>=1.8.2, \<1.9.2\". To--- specify a package without pinning it to a version specifier, use the--- empty string as the value.------ /See:/ 'softwareConfigPypiPackages' smart constructor.-newtype SoftwareConfigPypiPackages =-  SoftwareConfigPypiPackages'-    { _scppAddtional :: HashMap Text Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SoftwareConfigPypiPackages' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'scppAddtional'-softwareConfigPypiPackages-    :: HashMap Text Text -- ^ 'scppAddtional'-    -> SoftwareConfigPypiPackages-softwareConfigPypiPackages pScppAddtional_ =-  SoftwareConfigPypiPackages' {_scppAddtional = _Coerce # pScppAddtional_}---scppAddtional :: Lens' SoftwareConfigPypiPackages (HashMap Text Text)-scppAddtional-  = lens _scppAddtional-      (\ s a -> s{_scppAddtional = a})-      . _Coerce--instance FromJSON SoftwareConfigPypiPackages where-        parseJSON-          = withObject "SoftwareConfigPypiPackages"-              (\ o ->-                 SoftwareConfigPypiPackages' <$> (parseJSONObject o))--instance ToJSON SoftwareConfigPypiPackages where-        toJSON = toJSON . _scppAddtional---- | Specifies the selection and configuration of software inside the--- environment.------ /See:/ 'softwareConfig' smart constructor.-data SoftwareConfig =-  SoftwareConfig'-    { _scImageVersion           :: !(Maybe Text)-    , _scPythonVersion          :: !(Maybe Text)-    , _scPypiPackages           :: !(Maybe SoftwareConfigPypiPackages)-    , _scAirflowConfigOverrides :: !(Maybe SoftwareConfigAirflowConfigOverrides)-    , _scEnvVariables           :: !(Maybe SoftwareConfigEnvVariables)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SoftwareConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'scImageVersion'------ * 'scPythonVersion'------ * 'scPypiPackages'------ * 'scAirflowConfigOverrides'------ * 'scEnvVariables'-softwareConfig-    :: SoftwareConfig-softwareConfig =-  SoftwareConfig'-    { _scImageVersion = Nothing-    , _scPythonVersion = Nothing-    , _scPypiPackages = Nothing-    , _scAirflowConfigOverrides = Nothing-    , _scEnvVariables = Nothing-    }----- | The version of the software running in the environment. This--- encapsulates both the version of Cloud Composer functionality and the--- version of Apache Airflow. It must match the regular expression--- \`composer-([0-9]+\\.[0-9]+\\.[0-9]+|latest)-airflow-[0-9]+\\.[0-9]+(\\.[0-9]+.*)?\`.--- When used as input, the server also checks if the provided version is--- supported and denies the request for an unsupported version. The Cloud--- Composer portion of the version is a [semantic--- version](https:\/\/semver.org) or \`latest\`. When the patch version is--- omitted, the current Cloud Composer patch version is selected. When--- \`latest\` is provided instead of an explicit version number, the server--- replaces \`latest\` with the current Cloud Composer version and stores--- that version number in the same field. The portion of the image version--- that follows /airflow-/ is an official Apache Airflow repository--- [release--- name](https:\/\/github.com\/apache\/incubator-airflow\/releases). See--- also [Version--- List](\/composer\/docs\/concepts\/versioning\/composer-versions).-scImageVersion :: Lens' SoftwareConfig (Maybe Text)-scImageVersion-  = lens _scImageVersion-      (\ s a -> s{_scImageVersion = a})---- | Optional. The major version of Python used to run the Apache Airflow--- scheduler, worker, and webserver processes. Can be set to \'2\' or--- \'3\'. If not specified, the default is \'2\'. Cannot be updated.-scPythonVersion :: Lens' SoftwareConfig (Maybe Text)-scPythonVersion-  = lens _scPythonVersion-      (\ s a -> s{_scPythonVersion = a})---- | Optional. Custom Python Package Index (PyPI) packages to be installed in--- the environment. Keys refer to the lowercase package name such as--- \"numpy\" and values are the lowercase extras and version specifier such--- as \"==1.12.0\", \"[devel,gcp_api]\", or \"[devel]>=1.8.2, \<1.9.2\". To--- specify a package without pinning it to a version specifier, use the--- empty string as the value.-scPypiPackages :: Lens' SoftwareConfig (Maybe SoftwareConfigPypiPackages)-scPypiPackages-  = lens _scPypiPackages-      (\ s a -> s{_scPypiPackages = a})---- | Optional. Apache Airflow configuration properties to override. Property--- keys contain the section and property names, separated by a hyphen, for--- example \"core-dags_are_paused_at_creation\". Section names must not--- contain hyphens (\"-\"), opening square brackets (\"[\"), or closing--- square brackets (\"]\"). The property name must not be empty and must--- not contain an equals sign (\"=\") or semicolon (\";\"). Section and--- property names must not contain a period (\".\"). Apache Airflow--- configuration property names must be written in--- [snake_case](https:\/\/en.wikipedia.org\/wiki\/Snake_case). Property--- values can contain any character, and can be written in any lower\/upper--- case format. Certain Apache Airflow configuration property values are--- [blacklisted](\/composer\/docs\/how-to\/managing\/setting-airflow-configurations#airflow_configuration_blacklists),--- and cannot be overridden.-scAirflowConfigOverrides :: Lens' SoftwareConfig (Maybe SoftwareConfigAirflowConfigOverrides)-scAirflowConfigOverrides-  = lens _scAirflowConfigOverrides-      (\ s a -> s{_scAirflowConfigOverrides = a})---- | Optional. Additional environment variables to provide to the Apache--- Airflow scheduler, worker, and webserver processes. Environment variable--- names must match the regular expression \`a-zA-Z_*\`. They cannot--- specify Apache Airflow software configuration overrides (they cannot--- match the regular expression \`AIRFLOW__[A-Z0-9_]+__[A-Z0-9_]+\`), and--- they cannot match any of the following reserved names: *--- \`AIRFLOW_HOME\` * \`C_FORCE_ROOT\` * \`CONTAINER_NAME\` *--- \`DAGS_FOLDER\` * \`GCP_PROJECT\` * \`GCS_BUCKET\` *--- \`GKE_CLUSTER_NAME\` * \`SQL_DATABASE\` * \`SQL_INSTANCE\` *--- \`SQL_PASSWORD\` * \`SQL_PROJECT\` * \`SQL_REGION\` * \`SQL_USER\`-scEnvVariables :: Lens' SoftwareConfig (Maybe SoftwareConfigEnvVariables)-scEnvVariables-  = lens _scEnvVariables-      (\ s a -> s{_scEnvVariables = a})--instance FromJSON SoftwareConfig where-        parseJSON-          = withObject "SoftwareConfig"-              (\ o ->-                 SoftwareConfig' <$>-                   (o .:? "imageVersion") <*> (o .:? "pythonVersion")-                     <*> (o .:? "pypiPackages")-                     <*> (o .:? "airflowConfigOverrides")-                     <*> (o .:? "envVariables"))--instance ToJSON SoftwareConfig where-        toJSON SoftwareConfig'{..}-          = object-              (catMaybes-                 [("imageVersion" .=) <$> _scImageVersion,-                  ("pythonVersion" .=) <$> _scPythonVersion,-                  ("pypiPackages" .=) <$> _scPypiPackages,-                  ("airflowConfigOverrides" .=) <$>-                    _scAirflowConfigOverrides,-                  ("envVariables" .=) <$> _scEnvVariables])---- | Optional. User-defined labels for this environment. The labels map can--- contain no more than 64 entries. Entries of the labels map are UTF8--- strings that comply with the following restrictions: * Keys must conform--- to regexp: \\p{Ll}\\p{Lo}{0,62} * Values must conform to regexp:--- [\\p{Ll}\\p{Lo}\\p{N}_-]{0,63} * Both keys and values are additionally--- constrained to be \<= 128 bytes in size.------ /See:/ 'environmentLabels' smart constructor.-newtype EnvironmentLabels =-  EnvironmentLabels'-    { _elAddtional :: HashMap Text Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'EnvironmentLabels' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'elAddtional'-environmentLabels-    :: HashMap Text Text -- ^ 'elAddtional'-    -> EnvironmentLabels-environmentLabels pElAddtional_ =-  EnvironmentLabels' {_elAddtional = _Coerce # pElAddtional_}---elAddtional :: Lens' EnvironmentLabels (HashMap Text Text)-elAddtional-  = lens _elAddtional (\ s a -> s{_elAddtional = a}) .-      _Coerce--instance FromJSON EnvironmentLabels where-        parseJSON-          = withObject "EnvironmentLabels"-              (\ o -> EnvironmentLabels' <$> (parseJSONObject o))--instance ToJSON EnvironmentLabels where-        toJSON = toJSON . _elAddtional---- | Metadata describing an operation.------ /See:/ 'operationMetadata' smart constructor.-data OperationMetadata =-  OperationMetadata'-    { _omState         :: !(Maybe OperationMetadataState)-    , _omResourceUuid  :: !(Maybe Text)-    , _omResource      :: !(Maybe Text)-    , _omEndTime       :: !(Maybe DateTime')-    , _omOperationType :: !(Maybe OperationMetadataOperationType)-    , _omCreateTime    :: !(Maybe DateTime')-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'omState'------ * 'omResourceUuid'------ * 'omResource'------ * 'omEndTime'------ * 'omOperationType'------ * 'omCreateTime'-operationMetadata-    :: OperationMetadata-operationMetadata =-  OperationMetadata'-    { _omState = Nothing-    , _omResourceUuid = Nothing-    , _omResource = Nothing-    , _omEndTime = Nothing-    , _omOperationType = Nothing-    , _omCreateTime = Nothing-    }----- | Output only. The current operation state.-omState :: Lens' OperationMetadata (Maybe OperationMetadataState)-omState = lens _omState (\ s a -> s{_omState = a})---- | Output only. The UUID of the resource being operated on.-omResourceUuid :: Lens' OperationMetadata (Maybe Text)-omResourceUuid-  = lens _omResourceUuid-      (\ s a -> s{_omResourceUuid = a})---- | Output only. The resource being operated on, as a [relative resource--- name]( \/apis\/design\/resource_names#relative_resource_name).-omResource :: Lens' OperationMetadata (Maybe Text)-omResource-  = lens _omResource (\ s a -> s{_omResource = a})---- | Output only. The time when the operation terminated, regardless of its--- success. This field is unset if the operation is still ongoing.-omEndTime :: Lens' OperationMetadata (Maybe UTCTime)-omEndTime-  = lens _omEndTime (\ s a -> s{_omEndTime = a}) .-      mapping _DateTime---- | Output only. The type of operation being performed.-omOperationType :: Lens' OperationMetadata (Maybe OperationMetadataOperationType)-omOperationType-  = lens _omOperationType-      (\ s a -> s{_omOperationType = a})---- | Output only. The time the operation was submitted to the server.-omCreateTime :: Lens' OperationMetadata (Maybe UTCTime)-omCreateTime-  = lens _omCreateTime (\ s a -> s{_omCreateTime = a})-      . mapping _DateTime--instance FromJSON OperationMetadata where-        parseJSON-          = withObject "OperationMetadata"-              (\ o ->-                 OperationMetadata' <$>-                   (o .:? "state") <*> (o .:? "resourceUuid") <*>-                     (o .:? "resource")-                     <*> (o .:? "endTime")-                     <*> (o .:? "operationType")-                     <*> (o .:? "createTime"))--instance ToJSON OperationMetadata where-        toJSON OperationMetadata'{..}-          = object-              (catMaybes-                 [("state" .=) <$> _omState,-                  ("resourceUuid" .=) <$> _omResourceUuid,-                  ("resource" .=) <$> _omResource,-                  ("endTime" .=) <$> _omEndTime,-                  ("operationType" .=) <$> _omOperationType,-                  ("createTime" .=) <$> _omCreateTime])---- | The normal response of the operation in case of success. If the original--- method returns no data on success, such as \`Delete\`, the response is--- \`google.protobuf.Empty\`. If the original method is standard--- \`Get\`\/\`Create\`\/\`Update\`, the response should be the resource.--- For other methods, the response should have the type \`XxxResponse\`,--- where \`Xxx\` is the original method name. For example, if the original--- method name is \`TakeSnapshot()\`, the inferred response type is--- \`TakeSnapshotResponse\`.------ /See:/ 'operationResponse' smart constructor.-newtype OperationResponse =-  OperationResponse'-    { _orAddtional :: HashMap Text JSONValue-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'orAddtional'-operationResponse-    :: HashMap Text JSONValue -- ^ 'orAddtional'-    -> OperationResponse-operationResponse pOrAddtional_ =-  OperationResponse' {_orAddtional = _Coerce # pOrAddtional_}----- | Properties of the object. Contains field \'type with type URL.-orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)-orAddtional-  = lens _orAddtional (\ s a -> s{_orAddtional = a}) .-      _Coerce--instance FromJSON OperationResponse where-        parseJSON-          = withObject "OperationResponse"-              (\ o -> OperationResponse' <$> (parseJSONObject o))--instance ToJSON OperationResponse where-        toJSON = toJSON . _orAddtional
− gen/Network/Google/Composer/Types/Sum.hs
@@ -1,185 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE LambdaCase         #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.Composer.Types.Sum--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.Composer.Types.Sum where--import           Network.Google.Prelude hiding (Bytes)---- | Output only. The type of operation being performed.-data OperationMetadataOperationType-    = TypeUnspecified-      -- ^ @TYPE_UNSPECIFIED@-      -- Unused.-    | Create-      -- ^ @CREATE@-      -- A resource creation operation.-    | Delete'-      -- ^ @DELETE@-      -- A resource deletion operation.-    | Update-      -- ^ @UPDATE@-      -- A resource update operation.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable OperationMetadataOperationType--instance FromHttpApiData OperationMetadataOperationType where-    parseQueryParam = \case-        "TYPE_UNSPECIFIED" -> Right TypeUnspecified-        "CREATE" -> Right Create-        "DELETE" -> Right Delete'-        "UPDATE" -> Right Update-        x -> Left ("Unable to parse OperationMetadataOperationType from: " <> x)--instance ToHttpApiData OperationMetadataOperationType where-    toQueryParam = \case-        TypeUnspecified -> "TYPE_UNSPECIFIED"-        Create -> "CREATE"-        Delete' -> "DELETE"-        Update -> "UPDATE"--instance FromJSON OperationMetadataOperationType where-    parseJSON = parseJSONText "OperationMetadataOperationType"--instance ToJSON OperationMetadataOperationType where-    toJSON = toJSONText---- | Output only. The current operation state.-data OperationMetadataState-    = StateUnspecified-      -- ^ @STATE_UNSPECIFIED@-      -- Unused.-    | Pending-      -- ^ @PENDING@-      -- The operation has been created but is not yet started.-    | Running-      -- ^ @RUNNING@-      -- The operation is underway.-    | Succeeded-      -- ^ @SUCCEEDED@-      -- The operation completed successfully.-    | Successful-      -- ^ @SUCCESSFUL@-    | Failed-      -- ^ @FAILED@-      -- The operation is no longer running but did not succeed.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable OperationMetadataState--instance FromHttpApiData OperationMetadataState where-    parseQueryParam = \case-        "STATE_UNSPECIFIED" -> Right StateUnspecified-        "PENDING" -> Right Pending-        "RUNNING" -> Right Running-        "SUCCEEDED" -> Right Succeeded-        "SUCCESSFUL" -> Right Successful-        "FAILED" -> Right Failed-        x -> Left ("Unable to parse OperationMetadataState from: " <> x)--instance ToHttpApiData OperationMetadataState where-    toQueryParam = \case-        StateUnspecified -> "STATE_UNSPECIFIED"-        Pending -> "PENDING"-        Running -> "RUNNING"-        Succeeded -> "SUCCEEDED"-        Successful -> "SUCCESSFUL"-        Failed -> "FAILED"--instance FromJSON OperationMetadataState where-    parseJSON = parseJSONText "OperationMetadataState"--instance ToJSON OperationMetadataState where-    toJSON = toJSONText---- | The current state of the environment.-data EnvironmentState-    = ESStateUnspecified-      -- ^ @STATE_UNSPECIFIED@-      -- The state of the environment is unknown.-    | ESCreating-      -- ^ @CREATING@-      -- The environment is in the process of being created.-    | ESRunning-      -- ^ @RUNNING@-      -- The environment is currently running and healthy. It is ready for use.-    | ESUpdating-      -- ^ @UPDATING@-      -- The environment is being updated. It remains usable but cannot receive-      -- additional update requests or be deleted at this time.-    | ESDeleting-      -- ^ @DELETING@-      -- The environment is undergoing deletion. It cannot be used.-    | ESError'-      -- ^ @ERROR@-      -- The environment has encountered an error and cannot be used.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable EnvironmentState--instance FromHttpApiData EnvironmentState where-    parseQueryParam = \case-        "STATE_UNSPECIFIED" -> Right ESStateUnspecified-        "CREATING" -> Right ESCreating-        "RUNNING" -> Right ESRunning-        "UPDATING" -> Right ESUpdating-        "DELETING" -> Right ESDeleting-        "ERROR" -> Right ESError'-        x -> Left ("Unable to parse EnvironmentState from: " <> x)--instance ToHttpApiData EnvironmentState where-    toQueryParam = \case-        ESStateUnspecified -> "STATE_UNSPECIFIED"-        ESCreating -> "CREATING"-        ESRunning -> "RUNNING"-        ESUpdating -> "UPDATING"-        ESDeleting -> "DELETING"-        ESError' -> "ERROR"--instance FromJSON EnvironmentState where-    parseJSON = parseJSONText "EnvironmentState"--instance ToJSON EnvironmentState where-    toJSON = toJSONText---- | V1 error format.-data Xgafv-    = X1-      -- ^ @1@-      -- v1 error format-    | X2-      -- ^ @2@-      -- v2 error format-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable Xgafv--instance FromHttpApiData Xgafv where-    parseQueryParam = \case-        "1" -> Right X1-        "2" -> Right X2-        x -> Left ("Unable to parse Xgafv from: " <> x)--instance ToHttpApiData Xgafv where-    toQueryParam = \case-        X1 -> "1"-        X2 -> "2"--instance FromJSON Xgafv where-    parseJSON = parseJSONText "Xgafv"--instance ToJSON Xgafv where-    toJSON = toJSONText
− gen/Network/Google/Resource/Composer/Projects/Locations/Environments/Create.hs
@@ -1,170 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Composer.Projects.Locations.Environments.Create--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Create a new environment.------ /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.create@.-module Network.Google.Resource.Composer.Projects.Locations.Environments.Create-    (-    -- * REST Resource-      ProjectsLocationsEnvironmentsCreateResource--    -- * Creating a Request-    , projectsLocationsEnvironmentsCreate-    , ProjectsLocationsEnvironmentsCreate--    -- * Request Lenses-    , plecParent-    , plecXgafv-    , plecUploadProtocol-    , plecAccessToken-    , plecUploadType-    , plecPayload-    , plecCallback-    ) where--import           Network.Google.Composer.Types-import           Network.Google.Prelude---- | A resource alias for @composer.projects.locations.environments.create@ method which the--- 'ProjectsLocationsEnvironmentsCreate' request conforms to.-type ProjectsLocationsEnvironmentsCreateResource =-     "v1" :>-       Capture "parent" Text :>-         "environments" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] Environment :> Post '[JSON] Operation---- | Create a new environment.------ /See:/ 'projectsLocationsEnvironmentsCreate' smart constructor.-data ProjectsLocationsEnvironmentsCreate =-  ProjectsLocationsEnvironmentsCreate'-    { _plecParent         :: !Text-    , _plecXgafv          :: !(Maybe Xgafv)-    , _plecUploadProtocol :: !(Maybe Text)-    , _plecAccessToken    :: !(Maybe Text)-    , _plecUploadType     :: !(Maybe Text)-    , _plecPayload        :: !Environment-    , _plecCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsLocationsEnvironmentsCreate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plecParent'------ * 'plecXgafv'------ * 'plecUploadProtocol'------ * 'plecAccessToken'------ * 'plecUploadType'------ * 'plecPayload'------ * 'plecCallback'-projectsLocationsEnvironmentsCreate-    :: Text -- ^ 'plecParent'-    -> Environment -- ^ 'plecPayload'-    -> ProjectsLocationsEnvironmentsCreate-projectsLocationsEnvironmentsCreate pPlecParent_ pPlecPayload_ =-  ProjectsLocationsEnvironmentsCreate'-    { _plecParent = pPlecParent_-    , _plecXgafv = Nothing-    , _plecUploadProtocol = Nothing-    , _plecAccessToken = Nothing-    , _plecUploadType = Nothing-    , _plecPayload = pPlecPayload_-    , _plecCallback = Nothing-    }----- | The parent must be of the form--- \"projects\/{projectId}\/locations\/{locationId}\".-plecParent :: Lens' ProjectsLocationsEnvironmentsCreate Text-plecParent-  = lens _plecParent (\ s a -> s{_plecParent = a})---- | V1 error format.-plecXgafv :: Lens' ProjectsLocationsEnvironmentsCreate (Maybe Xgafv)-plecXgafv-  = lens _plecXgafv (\ s a -> s{_plecXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-plecUploadProtocol :: Lens' ProjectsLocationsEnvironmentsCreate (Maybe Text)-plecUploadProtocol-  = lens _plecUploadProtocol-      (\ s a -> s{_plecUploadProtocol = a})---- | OAuth access token.-plecAccessToken :: Lens' ProjectsLocationsEnvironmentsCreate (Maybe Text)-plecAccessToken-  = lens _plecAccessToken-      (\ s a -> s{_plecAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-plecUploadType :: Lens' ProjectsLocationsEnvironmentsCreate (Maybe Text)-plecUploadType-  = lens _plecUploadType-      (\ s a -> s{_plecUploadType = a})---- | Multipart request metadata.-plecPayload :: Lens' ProjectsLocationsEnvironmentsCreate Environment-plecPayload-  = lens _plecPayload (\ s a -> s{_plecPayload = a})---- | JSONP-plecCallback :: Lens' ProjectsLocationsEnvironmentsCreate (Maybe Text)-plecCallback-  = lens _plecCallback (\ s a -> s{_plecCallback = a})--instance GoogleRequest-           ProjectsLocationsEnvironmentsCreate-         where-        type Rs ProjectsLocationsEnvironmentsCreate =-             Operation-        type Scopes ProjectsLocationsEnvironmentsCreate =-             '["https://www.googleapis.com/auth/cloud-platform"]-        requestClient-          ProjectsLocationsEnvironmentsCreate'{..}-          = go _plecParent _plecXgafv _plecUploadProtocol-              _plecAccessToken-              _plecUploadType-              _plecCallback-              (Just AltJSON)-              _plecPayload-              composerService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy ProjectsLocationsEnvironmentsCreateResource)-                      mempty
− gen/Network/Google/Resource/Composer/Projects/Locations/Environments/Delete.hs
@@ -1,155 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Composer.Projects.Locations.Environments.Delete--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Delete an environment.------ /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.delete@.-module Network.Google.Resource.Composer.Projects.Locations.Environments.Delete-    (-    -- * REST Resource-      ProjectsLocationsEnvironmentsDeleteResource--    -- * Creating a Request-    , projectsLocationsEnvironmentsDelete-    , ProjectsLocationsEnvironmentsDelete--    -- * Request Lenses-    , pledXgafv-    , pledUploadProtocol-    , pledAccessToken-    , pledUploadType-    , pledName-    , pledCallback-    ) where--import           Network.Google.Composer.Types-import           Network.Google.Prelude---- | A resource alias for @composer.projects.locations.environments.delete@ method which the--- 'ProjectsLocationsEnvironmentsDelete' request conforms to.-type ProjectsLocationsEnvironmentsDeleteResource =-     "v1" :>-       Capture "name" Text :>-         QueryParam "$.xgafv" Xgafv :>-           QueryParam "upload_protocol" Text :>-             QueryParam "access_token" Text :>-               QueryParam "uploadType" Text :>-                 QueryParam "callback" Text :>-                   QueryParam "alt" AltJSON :> Delete '[JSON] Operation---- | Delete an environment.------ /See:/ 'projectsLocationsEnvironmentsDelete' smart constructor.-data ProjectsLocationsEnvironmentsDelete =-  ProjectsLocationsEnvironmentsDelete'-    { _pledXgafv          :: !(Maybe Xgafv)-    , _pledUploadProtocol :: !(Maybe Text)-    , _pledAccessToken    :: !(Maybe Text)-    , _pledUploadType     :: !(Maybe Text)-    , _pledName           :: !Text-    , _pledCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsLocationsEnvironmentsDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pledXgafv'------ * 'pledUploadProtocol'------ * 'pledAccessToken'------ * 'pledUploadType'------ * 'pledName'------ * 'pledCallback'-projectsLocationsEnvironmentsDelete-    :: Text -- ^ 'pledName'-    -> ProjectsLocationsEnvironmentsDelete-projectsLocationsEnvironmentsDelete pPledName_ =-  ProjectsLocationsEnvironmentsDelete'-    { _pledXgafv = Nothing-    , _pledUploadProtocol = Nothing-    , _pledAccessToken = Nothing-    , _pledUploadType = Nothing-    , _pledName = pPledName_-    , _pledCallback = Nothing-    }----- | V1 error format.-pledXgafv :: Lens' ProjectsLocationsEnvironmentsDelete (Maybe Xgafv)-pledXgafv-  = lens _pledXgafv (\ s a -> s{_pledXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-pledUploadProtocol :: Lens' ProjectsLocationsEnvironmentsDelete (Maybe Text)-pledUploadProtocol-  = lens _pledUploadProtocol-      (\ s a -> s{_pledUploadProtocol = a})---- | OAuth access token.-pledAccessToken :: Lens' ProjectsLocationsEnvironmentsDelete (Maybe Text)-pledAccessToken-  = lens _pledAccessToken-      (\ s a -> s{_pledAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-pledUploadType :: Lens' ProjectsLocationsEnvironmentsDelete (Maybe Text)-pledUploadType-  = lens _pledUploadType-      (\ s a -> s{_pledUploadType = a})---- | The environment to delete, in the form:--- \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"-pledName :: Lens' ProjectsLocationsEnvironmentsDelete Text-pledName = lens _pledName (\ s a -> s{_pledName = a})---- | JSONP-pledCallback :: Lens' ProjectsLocationsEnvironmentsDelete (Maybe Text)-pledCallback-  = lens _pledCallback (\ s a -> s{_pledCallback = a})--instance GoogleRequest-           ProjectsLocationsEnvironmentsDelete-         where-        type Rs ProjectsLocationsEnvironmentsDelete =-             Operation-        type Scopes ProjectsLocationsEnvironmentsDelete =-             '["https://www.googleapis.com/auth/cloud-platform"]-        requestClient-          ProjectsLocationsEnvironmentsDelete'{..}-          = go _pledName _pledXgafv _pledUploadProtocol-              _pledAccessToken-              _pledUploadType-              _pledCallback-              (Just AltJSON)-              composerService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy ProjectsLocationsEnvironmentsDeleteResource)-                      mempty
− gen/Network/Google/Resource/Composer/Projects/Locations/Environments/Get.hs
@@ -1,154 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Composer.Projects.Locations.Environments.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Get an existing environment.------ /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.get@.-module Network.Google.Resource.Composer.Projects.Locations.Environments.Get-    (-    -- * REST Resource-      ProjectsLocationsEnvironmentsGetResource--    -- * Creating a Request-    , projectsLocationsEnvironmentsGet-    , ProjectsLocationsEnvironmentsGet--    -- * Request Lenses-    , plegXgafv-    , plegUploadProtocol-    , plegAccessToken-    , plegUploadType-    , plegName-    , plegCallback-    ) where--import           Network.Google.Composer.Types-import           Network.Google.Prelude---- | A resource alias for @composer.projects.locations.environments.get@ method which the--- 'ProjectsLocationsEnvironmentsGet' request conforms to.-type ProjectsLocationsEnvironmentsGetResource =-     "v1" :>-       Capture "name" Text :>-         QueryParam "$.xgafv" Xgafv :>-           QueryParam "upload_protocol" Text :>-             QueryParam "access_token" Text :>-               QueryParam "uploadType" Text :>-                 QueryParam "callback" Text :>-                   QueryParam "alt" AltJSON :> Get '[JSON] Environment---- | Get an existing environment.------ /See:/ 'projectsLocationsEnvironmentsGet' smart constructor.-data ProjectsLocationsEnvironmentsGet =-  ProjectsLocationsEnvironmentsGet'-    { _plegXgafv          :: !(Maybe Xgafv)-    , _plegUploadProtocol :: !(Maybe Text)-    , _plegAccessToken    :: !(Maybe Text)-    , _plegUploadType     :: !(Maybe Text)-    , _plegName           :: !Text-    , _plegCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsLocationsEnvironmentsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plegXgafv'------ * 'plegUploadProtocol'------ * 'plegAccessToken'------ * 'plegUploadType'------ * 'plegName'------ * 'plegCallback'-projectsLocationsEnvironmentsGet-    :: Text -- ^ 'plegName'-    -> ProjectsLocationsEnvironmentsGet-projectsLocationsEnvironmentsGet pPlegName_ =-  ProjectsLocationsEnvironmentsGet'-    { _plegXgafv = Nothing-    , _plegUploadProtocol = Nothing-    , _plegAccessToken = Nothing-    , _plegUploadType = Nothing-    , _plegName = pPlegName_-    , _plegCallback = Nothing-    }----- | V1 error format.-plegXgafv :: Lens' ProjectsLocationsEnvironmentsGet (Maybe Xgafv)-plegXgafv-  = lens _plegXgafv (\ s a -> s{_plegXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-plegUploadProtocol :: Lens' ProjectsLocationsEnvironmentsGet (Maybe Text)-plegUploadProtocol-  = lens _plegUploadProtocol-      (\ s a -> s{_plegUploadProtocol = a})---- | OAuth access token.-plegAccessToken :: Lens' ProjectsLocationsEnvironmentsGet (Maybe Text)-plegAccessToken-  = lens _plegAccessToken-      (\ s a -> s{_plegAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-plegUploadType :: Lens' ProjectsLocationsEnvironmentsGet (Maybe Text)-plegUploadType-  = lens _plegUploadType-      (\ s a -> s{_plegUploadType = a})---- | The resource name of the environment to get, in the form:--- \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"-plegName :: Lens' ProjectsLocationsEnvironmentsGet Text-plegName = lens _plegName (\ s a -> s{_plegName = a})---- | JSONP-plegCallback :: Lens' ProjectsLocationsEnvironmentsGet (Maybe Text)-plegCallback-  = lens _plegCallback (\ s a -> s{_plegCallback = a})--instance GoogleRequest-           ProjectsLocationsEnvironmentsGet-         where-        type Rs ProjectsLocationsEnvironmentsGet =-             Environment-        type Scopes ProjectsLocationsEnvironmentsGet =-             '["https://www.googleapis.com/auth/cloud-platform"]-        requestClient ProjectsLocationsEnvironmentsGet'{..}-          = go _plegName _plegXgafv _plegUploadProtocol-              _plegAccessToken-              _plegUploadType-              _plegCallback-              (Just AltJSON)-              composerService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy ProjectsLocationsEnvironmentsGetResource)-                      mempty
− gen/Network/Google/Resource/Composer/Projects/Locations/Environments/List.hs
@@ -1,183 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Composer.Projects.Locations.Environments.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ List environments.------ /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.list@.-module Network.Google.Resource.Composer.Projects.Locations.Environments.List-    (-    -- * REST Resource-      ProjectsLocationsEnvironmentsListResource--    -- * Creating a Request-    , projectsLocationsEnvironmentsList-    , ProjectsLocationsEnvironmentsList--    -- * Request Lenses-    , plelParent-    , plelXgafv-    , plelUploadProtocol-    , plelAccessToken-    , plelUploadType-    , plelPageToken-    , plelPageSize-    , plelCallback-    ) where--import           Network.Google.Composer.Types-import           Network.Google.Prelude---- | A resource alias for @composer.projects.locations.environments.list@ method which the--- 'ProjectsLocationsEnvironmentsList' request conforms to.-type ProjectsLocationsEnvironmentsListResource =-     "v1" :>-       Capture "parent" Text :>-         "environments" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "pageToken" Text :>-                     QueryParam "pageSize" (Textual Int32) :>-                       QueryParam "callback" Text :>-                         QueryParam "alt" AltJSON :>-                           Get '[JSON] ListEnvironmentsResponse---- | List environments.------ /See:/ 'projectsLocationsEnvironmentsList' smart constructor.-data ProjectsLocationsEnvironmentsList =-  ProjectsLocationsEnvironmentsList'-    { _plelParent         :: !Text-    , _plelXgafv          :: !(Maybe Xgafv)-    , _plelUploadProtocol :: !(Maybe Text)-    , _plelAccessToken    :: !(Maybe Text)-    , _plelUploadType     :: !(Maybe Text)-    , _plelPageToken      :: !(Maybe Text)-    , _plelPageSize       :: !(Maybe (Textual Int32))-    , _plelCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsLocationsEnvironmentsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plelParent'------ * 'plelXgafv'------ * 'plelUploadProtocol'------ * 'plelAccessToken'------ * 'plelUploadType'------ * 'plelPageToken'------ * 'plelPageSize'------ * 'plelCallback'-projectsLocationsEnvironmentsList-    :: Text -- ^ 'plelParent'-    -> ProjectsLocationsEnvironmentsList-projectsLocationsEnvironmentsList pPlelParent_ =-  ProjectsLocationsEnvironmentsList'-    { _plelParent = pPlelParent_-    , _plelXgafv = Nothing-    , _plelUploadProtocol = Nothing-    , _plelAccessToken = Nothing-    , _plelUploadType = Nothing-    , _plelPageToken = Nothing-    , _plelPageSize = Nothing-    , _plelCallback = Nothing-    }----- | List environments in the given project and location, in the form:--- \"projects\/{projectId}\/locations\/{locationId}\"-plelParent :: Lens' ProjectsLocationsEnvironmentsList Text-plelParent-  = lens _plelParent (\ s a -> s{_plelParent = a})---- | V1 error format.-plelXgafv :: Lens' ProjectsLocationsEnvironmentsList (Maybe Xgafv)-plelXgafv-  = lens _plelXgafv (\ s a -> s{_plelXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-plelUploadProtocol :: Lens' ProjectsLocationsEnvironmentsList (Maybe Text)-plelUploadProtocol-  = lens _plelUploadProtocol-      (\ s a -> s{_plelUploadProtocol = a})---- | OAuth access token.-plelAccessToken :: Lens' ProjectsLocationsEnvironmentsList (Maybe Text)-plelAccessToken-  = lens _plelAccessToken-      (\ s a -> s{_plelAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-plelUploadType :: Lens' ProjectsLocationsEnvironmentsList (Maybe Text)-plelUploadType-  = lens _plelUploadType-      (\ s a -> s{_plelUploadType = a})---- | The next_page_token value returned from a previous List request, if any.-plelPageToken :: Lens' ProjectsLocationsEnvironmentsList (Maybe Text)-plelPageToken-  = lens _plelPageToken-      (\ s a -> s{_plelPageToken = a})---- | The maximum number of environments to return.-plelPageSize :: Lens' ProjectsLocationsEnvironmentsList (Maybe Int32)-plelPageSize-  = lens _plelPageSize (\ s a -> s{_plelPageSize = a})-      . mapping _Coerce---- | JSONP-plelCallback :: Lens' ProjectsLocationsEnvironmentsList (Maybe Text)-plelCallback-  = lens _plelCallback (\ s a -> s{_plelCallback = a})--instance GoogleRequest-           ProjectsLocationsEnvironmentsList-         where-        type Rs ProjectsLocationsEnvironmentsList =-             ListEnvironmentsResponse-        type Scopes ProjectsLocationsEnvironmentsList =-             '["https://www.googleapis.com/auth/cloud-platform"]-        requestClient ProjectsLocationsEnvironmentsList'{..}-          = go _plelParent _plelXgafv _plelUploadProtocol-              _plelAccessToken-              _plelUploadType-              _plelPageToken-              _plelPageSize-              _plelCallback-              (Just AltJSON)-              composerService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy ProjectsLocationsEnvironmentsListResource)-                      mempty
− gen/Network/Google/Resource/Composer/Projects/Locations/Environments/Patch.hs
@@ -1,294 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Composer.Projects.Locations.Environments.Patch--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Update an environment.------ /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.environments.patch@.-module Network.Google.Resource.Composer.Projects.Locations.Environments.Patch-    (-    -- * REST Resource-      ProjectsLocationsEnvironmentsPatchResource--    -- * Creating a Request-    , projectsLocationsEnvironmentsPatch-    , ProjectsLocationsEnvironmentsPatch--    -- * Request Lenses-    , plepXgafv-    , plepUploadProtocol-    , plepUpdateMask-    , plepAccessToken-    , plepUploadType-    , plepPayload-    , plepName-    , plepCallback-    ) where--import           Network.Google.Composer.Types-import           Network.Google.Prelude---- | A resource alias for @composer.projects.locations.environments.patch@ method which the--- 'ProjectsLocationsEnvironmentsPatch' request conforms to.-type ProjectsLocationsEnvironmentsPatchResource =-     "v1" :>-       Capture "name" Text :>-         QueryParam "$.xgafv" Xgafv :>-           QueryParam "upload_protocol" Text :>-             QueryParam "updateMask" GFieldMask :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] Environment :>-                         Patch '[JSON] Operation---- | Update an environment.------ /See:/ 'projectsLocationsEnvironmentsPatch' smart constructor.-data ProjectsLocationsEnvironmentsPatch =-  ProjectsLocationsEnvironmentsPatch'-    { _plepXgafv          :: !(Maybe Xgafv)-    , _plepUploadProtocol :: !(Maybe Text)-    , _plepUpdateMask     :: !(Maybe GFieldMask)-    , _plepAccessToken    :: !(Maybe Text)-    , _plepUploadType     :: !(Maybe Text)-    , _plepPayload        :: !Environment-    , _plepName           :: !Text-    , _plepCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsLocationsEnvironmentsPatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plepXgafv'------ * 'plepUploadProtocol'------ * 'plepUpdateMask'------ * 'plepAccessToken'------ * 'plepUploadType'------ * 'plepPayload'------ * 'plepName'------ * 'plepCallback'-projectsLocationsEnvironmentsPatch-    :: Environment -- ^ 'plepPayload'-    -> Text -- ^ 'plepName'-    -> ProjectsLocationsEnvironmentsPatch-projectsLocationsEnvironmentsPatch pPlepPayload_ pPlepName_ =-  ProjectsLocationsEnvironmentsPatch'-    { _plepXgafv = Nothing-    , _plepUploadProtocol = Nothing-    , _plepUpdateMask = Nothing-    , _plepAccessToken = Nothing-    , _plepUploadType = Nothing-    , _plepPayload = pPlepPayload_-    , _plepName = pPlepName_-    , _plepCallback = Nothing-    }----- | V1 error format.-plepXgafv :: Lens' ProjectsLocationsEnvironmentsPatch (Maybe Xgafv)-plepXgafv-  = lens _plepXgafv (\ s a -> s{_plepXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-plepUploadProtocol :: Lens' ProjectsLocationsEnvironmentsPatch (Maybe Text)-plepUploadProtocol-  = lens _plepUploadProtocol-      (\ s a -> s{_plepUploadProtocol = a})---- | Required. A comma-separated list of paths, relative to \`Environment\`,--- of fields to update. For example, to set the version of scikit-learn to--- install in the environment to 0.19.0 and to remove an existing--- installation of numpy, the \`updateMask\` parameter would include the--- following two \`paths\` values:--- \"config.softwareConfig.pypiPackages.scikit-learn\" and--- \"config.softwareConfig.pypiPackages.numpy\". The included patch--- environment would specify the scikit-learn version as follows: {--- \"config\":{ \"softwareConfig\":{ \"pypiPackages\":{--- \"scikit-learn\":\"==0.19.0\" } } } } Note that in the above example,--- any existing PyPI packages other than scikit-learn and numpy will be--- unaffected. Only one update type may be included in a single request\'s--- \`updateMask\`. For example, one cannot update both the PyPI packages--- and labels in the same request. However, it is possible to update--- multiple members of a map field simultaneously in the same request. For--- example, to set the labels \"label1\" and \"label2\" while clearing--- \"label3\" (assuming it already exists), one can provide the paths--- \"labels.label1\", \"labels.label2\", and \"labels.label3\" and populate--- the patch environment as follows: { \"labels\":{--- \"label1\":\"new-label1-value\" \"label2\":\"new-label2-value\" } } Note--- that in the above example, any existing labels that are not included in--- the \`updateMask\` will be unaffected. It is also possible to replace an--- entire map field by providing the map field\'s path in the--- \`updateMask\`. The new value of the field will be that which is--- provided in the patch environment. For example, to delete all--- pre-existing user-specified PyPI packages and install botocore at--- version 1.7.14, the \`updateMask\` would contain the path--- \"config.softwareConfig.pypiPackages\", and the patch environment would--- be the following: { \"config\":{ \"softwareConfig\":{ \"pypiPackages\":{--- \"botocore\":\"==1.7.14\" } } } } **Note:** Only the following fields--- can be updated:--- > +-----------------------------------+-----------------------------------+--- > | __Mask__                          | __Purpose__                       |--- > +-----------------------------------+-----------------------------------+--- > | config.softwareConfig.pypiPackage | Replace all custom custom PyPI    |--- > | s                                 | packages. If a replacement        |--- > |                                   | package map is not included in    |--- > |                                   | \`environment\`, all custom PyPI  |--- > |                                   | packages are cleared. It is an    |--- > |                                   | error to provide both this mask   |--- > |                                   | and a mask specifying an          |--- > |                                   | individual package.               |--- > +-----------------------------------+-----------------------------------+--- > | config.softwareConfig.pypiPackage | Update the custom PyPI package    |--- > | s.packagename                     | packagename, preserving other     |--- > |                                   | packages. To delete the package,  |--- > |                                   | include it in \`updateMask\`, and |--- > |                                   | omit the mapping for it in        |--- > |                                   | \`environment.config.softwareConf |--- > |                                   | ig.pypiPackages\`.                |--- > |                                   | It is an error to provide both a  |--- > |                                   | mask of this form and the         |--- > |                                   | \"config.softwareConfig.pypiPacka |--- > |                                   | ges\"                             |--- > |                                   | mask.                             |--- > +-----------------------------------+-----------------------------------+--- > | labels                            | Replace all environment labels.   |--- > |                                   | If a replacement labels map is    |--- > |                                   | not included in \`environment\`,  |--- > |                                   | all labels are cleared. It is an  |--- > |                                   | error to provide both this mask   |--- > |                                   | and a mask specifying one or more |--- > |                                   | individual labels.                |--- > +-----------------------------------+-----------------------------------+--- > | labels.labelName                  | Set the label named labelName,    |--- > |                                   | while preserving other labels. To |--- > |                                   | delete the label, include it in   |--- > |                                   | \`updateMask\` and omit its       |--- > |                                   | mapping in                        |--- > |                                   | \`environment.labels\`. It is an  |--- > |                                   | error to provide both a mask of   |--- > |                                   | this form and the \"labels\"      |--- > |                                   | mask.                             |--- > +-----------------------------------+-----------------------------------+--- > | config.nodeCount                  | Horizontally scale the number of  |--- > |                                   | nodes in the environment. An      |--- > |                                   | integer greater than or equal to  |--- > |                                   | 3 must be provided in the         |--- > |                                   | \`config.nodeCount\` field.       |--- > +-----------------------------------+-----------------------------------+--- > | config.softwareConfig.airflowConf | Replace all Apache Airflow config |--- > | igOverrides                       | overrides. If a replacement       |--- > |                                   | config overrides map is not       |--- > |                                   | included in \`environment\`, all  |--- > |                                   | config overrides are cleared. It  |--- > |                                   | is an error to provide both this  |--- > |                                   | mask and a mask specifying one or |--- > |                                   | more individual config overrides. |--- > +-----------------------------------+-----------------------------------+--- > | config.softwareConfig.airflowConf | Override the Apache Airflow       |--- > | igOverrides.section-name          | config property name in the       |--- > |                                   | section named section, preserving |--- > |                                   | other properties. To delete the   |--- > |                                   | property override, include it in  |--- > |                                   | \`updateMask\` and omit its       |--- > |                                   | mapping in                        |--- > |                                   | \`environment.config.softwareConf |--- > |                                   | ig.airflowConfigOverrides\`.      |--- > |                                   | It is an error to provide both a  |--- > |                                   | mask of this form and the         |--- > |                                   | \"config.softwareConfig.airflowCo |--- > |                                   | nfigOverrides\"                   |--- > |                                   | mask.                             |--- > +-----------------------------------+-----------------------------------+--- > | config.softwareConfig.envVariable | Replace all environment           |--- > | s                                 | variables. If a replacement       |--- > |                                   | environment variable map is not   |--- > |                                   | included in \`environment\`, all  |--- > |                                   | custom environment variables are  |--- > |                                   | cleared. It is an error to        |--- > |                                   | provide both this mask and a mask |--- > |                                   | specifying one or more individual |--- > |                                   | environment variables.            |--- > +-----------------------------------+-----------------------------------+-plepUpdateMask :: Lens' ProjectsLocationsEnvironmentsPatch (Maybe GFieldMask)-plepUpdateMask-  = lens _plepUpdateMask-      (\ s a -> s{_plepUpdateMask = a})---- | OAuth access token.-plepAccessToken :: Lens' ProjectsLocationsEnvironmentsPatch (Maybe Text)-plepAccessToken-  = lens _plepAccessToken-      (\ s a -> s{_plepAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-plepUploadType :: Lens' ProjectsLocationsEnvironmentsPatch (Maybe Text)-plepUploadType-  = lens _plepUploadType-      (\ s a -> s{_plepUploadType = a})---- | Multipart request metadata.-plepPayload :: Lens' ProjectsLocationsEnvironmentsPatch Environment-plepPayload-  = lens _plepPayload (\ s a -> s{_plepPayload = a})---- | The relative resource name of the environment to update, in the form:--- \"projects\/{projectId}\/locations\/{locationId}\/environments\/{environmentId}\"-plepName :: Lens' ProjectsLocationsEnvironmentsPatch Text-plepName = lens _plepName (\ s a -> s{_plepName = a})---- | JSONP-plepCallback :: Lens' ProjectsLocationsEnvironmentsPatch (Maybe Text)-plepCallback-  = lens _plepCallback (\ s a -> s{_plepCallback = a})--instance GoogleRequest-           ProjectsLocationsEnvironmentsPatch-         where-        type Rs ProjectsLocationsEnvironmentsPatch =-             Operation-        type Scopes ProjectsLocationsEnvironmentsPatch =-             '["https://www.googleapis.com/auth/cloud-platform"]-        requestClient ProjectsLocationsEnvironmentsPatch'{..}-          = go _plepName _plepXgafv _plepUploadProtocol-              _plepUpdateMask-              _plepAccessToken-              _plepUploadType-              _plepCallback-              (Just AltJSON)-              _plepPayload-              composerService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy ProjectsLocationsEnvironmentsPatchResource)-                      mempty
− gen/Network/Google/Resource/Composer/Projects/Locations/ImageVersions/List.hs
@@ -1,185 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Composer.Projects.Locations.ImageVersions.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ List ImageVersions for provided location.------ /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.imageVersions.list@.-module Network.Google.Resource.Composer.Projects.Locations.ImageVersions.List-    (-    -- * REST Resource-      ProjectsLocationsImageVersionsListResource--    -- * Creating a Request-    , projectsLocationsImageVersionsList-    , ProjectsLocationsImageVersionsList--    -- * Request Lenses-    , plivlParent-    , plivlXgafv-    , plivlUploadProtocol-    , plivlAccessToken-    , plivlUploadType-    , plivlPageToken-    , plivlPageSize-    , plivlCallback-    ) where--import           Network.Google.Composer.Types-import           Network.Google.Prelude---- | A resource alias for @composer.projects.locations.imageVersions.list@ method which the--- 'ProjectsLocationsImageVersionsList' request conforms to.-type ProjectsLocationsImageVersionsListResource =-     "v1" :>-       Capture "parent" Text :>-         "imageVersions" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "pageToken" Text :>-                     QueryParam "pageSize" (Textual Int32) :>-                       QueryParam "callback" Text :>-                         QueryParam "alt" AltJSON :>-                           Get '[JSON] ListImageVersionsResponse---- | List ImageVersions for provided location.------ /See:/ 'projectsLocationsImageVersionsList' smart constructor.-data ProjectsLocationsImageVersionsList =-  ProjectsLocationsImageVersionsList'-    { _plivlParent         :: !Text-    , _plivlXgafv          :: !(Maybe Xgafv)-    , _plivlUploadProtocol :: !(Maybe Text)-    , _plivlAccessToken    :: !(Maybe Text)-    , _plivlUploadType     :: !(Maybe Text)-    , _plivlPageToken      :: !(Maybe Text)-    , _plivlPageSize       :: !(Maybe (Textual Int32))-    , _plivlCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsLocationsImageVersionsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plivlParent'------ * 'plivlXgafv'------ * 'plivlUploadProtocol'------ * 'plivlAccessToken'------ * 'plivlUploadType'------ * 'plivlPageToken'------ * 'plivlPageSize'------ * 'plivlCallback'-projectsLocationsImageVersionsList-    :: Text -- ^ 'plivlParent'-    -> ProjectsLocationsImageVersionsList-projectsLocationsImageVersionsList pPlivlParent_ =-  ProjectsLocationsImageVersionsList'-    { _plivlParent = pPlivlParent_-    , _plivlXgafv = Nothing-    , _plivlUploadProtocol = Nothing-    , _plivlAccessToken = Nothing-    , _plivlUploadType = Nothing-    , _plivlPageToken = Nothing-    , _plivlPageSize = Nothing-    , _plivlCallback = Nothing-    }----- | List ImageVersions in the given project and location, in the form:--- \"projects\/{projectId}\/locations\/{locationId}\"-plivlParent :: Lens' ProjectsLocationsImageVersionsList Text-plivlParent-  = lens _plivlParent (\ s a -> s{_plivlParent = a})---- | V1 error format.-plivlXgafv :: Lens' ProjectsLocationsImageVersionsList (Maybe Xgafv)-plivlXgafv-  = lens _plivlXgafv (\ s a -> s{_plivlXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-plivlUploadProtocol :: Lens' ProjectsLocationsImageVersionsList (Maybe Text)-plivlUploadProtocol-  = lens _plivlUploadProtocol-      (\ s a -> s{_plivlUploadProtocol = a})---- | OAuth access token.-plivlAccessToken :: Lens' ProjectsLocationsImageVersionsList (Maybe Text)-plivlAccessToken-  = lens _plivlAccessToken-      (\ s a -> s{_plivlAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-plivlUploadType :: Lens' ProjectsLocationsImageVersionsList (Maybe Text)-plivlUploadType-  = lens _plivlUploadType-      (\ s a -> s{_plivlUploadType = a})---- | The next_page_token value returned from a previous List request, if any.-plivlPageToken :: Lens' ProjectsLocationsImageVersionsList (Maybe Text)-plivlPageToken-  = lens _plivlPageToken-      (\ s a -> s{_plivlPageToken = a})---- | The maximum number of image_versions to return.-plivlPageSize :: Lens' ProjectsLocationsImageVersionsList (Maybe Int32)-plivlPageSize-  = lens _plivlPageSize-      (\ s a -> s{_plivlPageSize = a})-      . mapping _Coerce---- | JSONP-plivlCallback :: Lens' ProjectsLocationsImageVersionsList (Maybe Text)-plivlCallback-  = lens _plivlCallback-      (\ s a -> s{_plivlCallback = a})--instance GoogleRequest-           ProjectsLocationsImageVersionsList-         where-        type Rs ProjectsLocationsImageVersionsList =-             ListImageVersionsResponse-        type Scopes ProjectsLocationsImageVersionsList =-             '["https://www.googleapis.com/auth/cloud-platform"]-        requestClient ProjectsLocationsImageVersionsList'{..}-          = go _plivlParent _plivlXgafv _plivlUploadProtocol-              _plivlAccessToken-              _plivlUploadType-              _plivlPageToken-              _plivlPageSize-              _plivlCallback-              (Just AltJSON)-              composerService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy ProjectsLocationsImageVersionsListResource)-                      mempty
− gen/Network/Google/Resource/Composer/Projects/Locations/Operations/Delete.hs
@@ -1,158 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Composer.Projects.Locations.Operations.Delete--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes a long-running operation. This method indicates that the client--- is no longer interested in the operation result. It does not cancel the--- operation. If the server doesn\'t support this method, it returns--- \`google.rpc.Code.UNIMPLEMENTED\`.------ /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.operations.delete@.-module Network.Google.Resource.Composer.Projects.Locations.Operations.Delete-    (-    -- * REST Resource-      ProjectsLocationsOperationsDeleteResource--    -- * Creating a Request-    , projectsLocationsOperationsDelete-    , ProjectsLocationsOperationsDelete--    -- * Request Lenses-    , plodXgafv-    , plodUploadProtocol-    , plodAccessToken-    , plodUploadType-    , plodName-    , plodCallback-    ) where--import           Network.Google.Composer.Types-import           Network.Google.Prelude---- | A resource alias for @composer.projects.locations.operations.delete@ method which the--- 'ProjectsLocationsOperationsDelete' request conforms to.-type ProjectsLocationsOperationsDeleteResource =-     "v1" :>-       Capture "name" Text :>-         QueryParam "$.xgafv" Xgafv :>-           QueryParam "upload_protocol" Text :>-             QueryParam "access_token" Text :>-               QueryParam "uploadType" Text :>-                 QueryParam "callback" Text :>-                   QueryParam "alt" AltJSON :> Delete '[JSON] Empty---- | Deletes a long-running operation. This method indicates that the client--- is no longer interested in the operation result. It does not cancel the--- operation. If the server doesn\'t support this method, it returns--- \`google.rpc.Code.UNIMPLEMENTED\`.------ /See:/ 'projectsLocationsOperationsDelete' smart constructor.-data ProjectsLocationsOperationsDelete =-  ProjectsLocationsOperationsDelete'-    { _plodXgafv          :: !(Maybe Xgafv)-    , _plodUploadProtocol :: !(Maybe Text)-    , _plodAccessToken    :: !(Maybe Text)-    , _plodUploadType     :: !(Maybe Text)-    , _plodName           :: !Text-    , _plodCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsLocationsOperationsDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plodXgafv'------ * 'plodUploadProtocol'------ * 'plodAccessToken'------ * 'plodUploadType'------ * 'plodName'------ * 'plodCallback'-projectsLocationsOperationsDelete-    :: Text -- ^ 'plodName'-    -> ProjectsLocationsOperationsDelete-projectsLocationsOperationsDelete pPlodName_ =-  ProjectsLocationsOperationsDelete'-    { _plodXgafv = Nothing-    , _plodUploadProtocol = Nothing-    , _plodAccessToken = Nothing-    , _plodUploadType = Nothing-    , _plodName = pPlodName_-    , _plodCallback = Nothing-    }----- | V1 error format.-plodXgafv :: Lens' ProjectsLocationsOperationsDelete (Maybe Xgafv)-plodXgafv-  = lens _plodXgafv (\ s a -> s{_plodXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-plodUploadProtocol :: Lens' ProjectsLocationsOperationsDelete (Maybe Text)-plodUploadProtocol-  = lens _plodUploadProtocol-      (\ s a -> s{_plodUploadProtocol = a})---- | OAuth access token.-plodAccessToken :: Lens' ProjectsLocationsOperationsDelete (Maybe Text)-plodAccessToken-  = lens _plodAccessToken-      (\ s a -> s{_plodAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-plodUploadType :: Lens' ProjectsLocationsOperationsDelete (Maybe Text)-plodUploadType-  = lens _plodUploadType-      (\ s a -> s{_plodUploadType = a})---- | The name of the operation resource to be deleted.-plodName :: Lens' ProjectsLocationsOperationsDelete Text-plodName = lens _plodName (\ s a -> s{_plodName = a})---- | JSONP-plodCallback :: Lens' ProjectsLocationsOperationsDelete (Maybe Text)-plodCallback-  = lens _plodCallback (\ s a -> s{_plodCallback = a})--instance GoogleRequest-           ProjectsLocationsOperationsDelete-         where-        type Rs ProjectsLocationsOperationsDelete = Empty-        type Scopes ProjectsLocationsOperationsDelete =-             '["https://www.googleapis.com/auth/cloud-platform"]-        requestClient ProjectsLocationsOperationsDelete'{..}-          = go _plodName _plodXgafv _plodUploadProtocol-              _plodAccessToken-              _plodUploadType-              _plodCallback-              (Just AltJSON)-              composerService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy ProjectsLocationsOperationsDeleteResource)-                      mempty
− gen/Network/Google/Resource/Composer/Projects/Locations/Operations/Get.hs
@@ -1,155 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Composer.Projects.Locations.Operations.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets the latest state of a long-running operation. Clients can use this--- method to poll the operation result at intervals as recommended by the--- API service.------ /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.operations.get@.-module Network.Google.Resource.Composer.Projects.Locations.Operations.Get-    (-    -- * REST Resource-      ProjectsLocationsOperationsGetResource--    -- * Creating a Request-    , projectsLocationsOperationsGet-    , ProjectsLocationsOperationsGet--    -- * Request Lenses-    , plogXgafv-    , plogUploadProtocol-    , plogAccessToken-    , plogUploadType-    , plogName-    , plogCallback-    ) where--import           Network.Google.Composer.Types-import           Network.Google.Prelude---- | A resource alias for @composer.projects.locations.operations.get@ method which the--- 'ProjectsLocationsOperationsGet' request conforms to.-type ProjectsLocationsOperationsGetResource =-     "v1" :>-       Capture "name" Text :>-         QueryParam "$.xgafv" Xgafv :>-           QueryParam "upload_protocol" Text :>-             QueryParam "access_token" Text :>-               QueryParam "uploadType" Text :>-                 QueryParam "callback" Text :>-                   QueryParam "alt" AltJSON :> Get '[JSON] Operation---- | Gets the latest state of a long-running operation. Clients can use this--- method to poll the operation result at intervals as recommended by the--- API service.------ /See:/ 'projectsLocationsOperationsGet' smart constructor.-data ProjectsLocationsOperationsGet =-  ProjectsLocationsOperationsGet'-    { _plogXgafv          :: !(Maybe Xgafv)-    , _plogUploadProtocol :: !(Maybe Text)-    , _plogAccessToken    :: !(Maybe Text)-    , _plogUploadType     :: !(Maybe Text)-    , _plogName           :: !Text-    , _plogCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsLocationsOperationsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plogXgafv'------ * 'plogUploadProtocol'------ * 'plogAccessToken'------ * 'plogUploadType'------ * 'plogName'------ * 'plogCallback'-projectsLocationsOperationsGet-    :: Text -- ^ 'plogName'-    -> ProjectsLocationsOperationsGet-projectsLocationsOperationsGet pPlogName_ =-  ProjectsLocationsOperationsGet'-    { _plogXgafv = Nothing-    , _plogUploadProtocol = Nothing-    , _plogAccessToken = Nothing-    , _plogUploadType = Nothing-    , _plogName = pPlogName_-    , _plogCallback = Nothing-    }----- | V1 error format.-plogXgafv :: Lens' ProjectsLocationsOperationsGet (Maybe Xgafv)-plogXgafv-  = lens _plogXgafv (\ s a -> s{_plogXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-plogUploadProtocol :: Lens' ProjectsLocationsOperationsGet (Maybe Text)-plogUploadProtocol-  = lens _plogUploadProtocol-      (\ s a -> s{_plogUploadProtocol = a})---- | OAuth access token.-plogAccessToken :: Lens' ProjectsLocationsOperationsGet (Maybe Text)-plogAccessToken-  = lens _plogAccessToken-      (\ s a -> s{_plogAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-plogUploadType :: Lens' ProjectsLocationsOperationsGet (Maybe Text)-plogUploadType-  = lens _plogUploadType-      (\ s a -> s{_plogUploadType = a})---- | The name of the operation resource.-plogName :: Lens' ProjectsLocationsOperationsGet Text-plogName = lens _plogName (\ s a -> s{_plogName = a})---- | JSONP-plogCallback :: Lens' ProjectsLocationsOperationsGet (Maybe Text)-plogCallback-  = lens _plogCallback (\ s a -> s{_plogCallback = a})--instance GoogleRequest ProjectsLocationsOperationsGet-         where-        type Rs ProjectsLocationsOperationsGet = Operation-        type Scopes ProjectsLocationsOperationsGet =-             '["https://www.googleapis.com/auth/cloud-platform"]-        requestClient ProjectsLocationsOperationsGet'{..}-          = go _plogName _plogXgafv _plogUploadProtocol-              _plogAccessToken-              _plogUploadType-              _plogCallback-              (Just AltJSON)-              composerService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy ProjectsLocationsOperationsGetResource)-                      mempty
− gen/Network/Google/Resource/Composer/Projects/Locations/Operations/List.hs
@@ -1,211 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Composer.Projects.Locations.Operations.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Lists operations that match the specified filter in the request. If the--- server doesn\'t support this method, it returns \`UNIMPLEMENTED\`. NOTE:--- the \`name\` binding allows API services to override the binding to use--- different resource name schemes, such as \`users\/*\/operations\`. To--- override the binding, API services can add a binding such as--- \`\"\/v1\/{name=users\/*}\/operations\"\` to their service--- configuration. For backwards compatibility, the default name includes--- the operations collection id, however overriding users must ensure the--- name binding is the parent resource, without the operations collection--- id.------ /See:/ <https://cloud.google.com/composer/ Cloud Composer API Reference> for @composer.projects.locations.operations.list@.-module Network.Google.Resource.Composer.Projects.Locations.Operations.List-    (-    -- * REST Resource-      ProjectsLocationsOperationsListResource--    -- * Creating a Request-    , projectsLocationsOperationsList-    , ProjectsLocationsOperationsList--    -- * Request Lenses-    , plolXgafv-    , plolUploadProtocol-    , plolAccessToken-    , plolUploadType-    , plolName-    , plolFilter-    , plolPageToken-    , plolPageSize-    , plolCallback-    ) where--import           Network.Google.Composer.Types-import           Network.Google.Prelude---- | A resource alias for @composer.projects.locations.operations.list@ method which the--- 'ProjectsLocationsOperationsList' request conforms to.-type ProjectsLocationsOperationsListResource =-     "v1" :>-       Capture "name" Text :>-         "operations" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "filter" Text :>-                     QueryParam "pageToken" Text :>-                       QueryParam "pageSize" (Textual Int32) :>-                         QueryParam "callback" Text :>-                           QueryParam "alt" AltJSON :>-                             Get '[JSON] ListOperationsResponse---- | Lists operations that match the specified filter in the request. If the--- server doesn\'t support this method, it returns \`UNIMPLEMENTED\`. NOTE:--- the \`name\` binding allows API services to override the binding to use--- different resource name schemes, such as \`users\/*\/operations\`. To--- override the binding, API services can add a binding such as--- \`\"\/v1\/{name=users\/*}\/operations\"\` to their service--- configuration. For backwards compatibility, the default name includes--- the operations collection id, however overriding users must ensure the--- name binding is the parent resource, without the operations collection--- id.------ /See:/ 'projectsLocationsOperationsList' smart constructor.-data ProjectsLocationsOperationsList =-  ProjectsLocationsOperationsList'-    { _plolXgafv          :: !(Maybe Xgafv)-    , _plolUploadProtocol :: !(Maybe Text)-    , _plolAccessToken    :: !(Maybe Text)-    , _plolUploadType     :: !(Maybe Text)-    , _plolName           :: !Text-    , _plolFilter         :: !(Maybe Text)-    , _plolPageToken      :: !(Maybe Text)-    , _plolPageSize       :: !(Maybe (Textual Int32))-    , _plolCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsLocationsOperationsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plolXgafv'------ * 'plolUploadProtocol'------ * 'plolAccessToken'------ * 'plolUploadType'------ * 'plolName'------ * 'plolFilter'------ * 'plolPageToken'------ * 'plolPageSize'------ * 'plolCallback'-projectsLocationsOperationsList-    :: Text -- ^ 'plolName'-    -> ProjectsLocationsOperationsList-projectsLocationsOperationsList pPlolName_ =-  ProjectsLocationsOperationsList'-    { _plolXgafv = Nothing-    , _plolUploadProtocol = Nothing-    , _plolAccessToken = Nothing-    , _plolUploadType = Nothing-    , _plolName = pPlolName_-    , _plolFilter = Nothing-    , _plolPageToken = Nothing-    , _plolPageSize = Nothing-    , _plolCallback = Nothing-    }----- | V1 error format.-plolXgafv :: Lens' ProjectsLocationsOperationsList (Maybe Xgafv)-plolXgafv-  = lens _plolXgafv (\ s a -> s{_plolXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-plolUploadProtocol :: Lens' ProjectsLocationsOperationsList (Maybe Text)-plolUploadProtocol-  = lens _plolUploadProtocol-      (\ s a -> s{_plolUploadProtocol = a})---- | OAuth access token.-plolAccessToken :: Lens' ProjectsLocationsOperationsList (Maybe Text)-plolAccessToken-  = lens _plolAccessToken-      (\ s a -> s{_plolAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-plolUploadType :: Lens' ProjectsLocationsOperationsList (Maybe Text)-plolUploadType-  = lens _plolUploadType-      (\ s a -> s{_plolUploadType = a})---- | The name of the operation\'s parent resource.-plolName :: Lens' ProjectsLocationsOperationsList Text-plolName = lens _plolName (\ s a -> s{_plolName = a})---- | The standard list filter.-plolFilter :: Lens' ProjectsLocationsOperationsList (Maybe Text)-plolFilter-  = lens _plolFilter (\ s a -> s{_plolFilter = a})---- | The standard list page token.-plolPageToken :: Lens' ProjectsLocationsOperationsList (Maybe Text)-plolPageToken-  = lens _plolPageToken-      (\ s a -> s{_plolPageToken = a})---- | The standard list page size.-plolPageSize :: Lens' ProjectsLocationsOperationsList (Maybe Int32)-plolPageSize-  = lens _plolPageSize (\ s a -> s{_plolPageSize = a})-      . mapping _Coerce---- | JSONP-plolCallback :: Lens' ProjectsLocationsOperationsList (Maybe Text)-plolCallback-  = lens _plolCallback (\ s a -> s{_plolCallback = a})--instance GoogleRequest-           ProjectsLocationsOperationsList-         where-        type Rs ProjectsLocationsOperationsList =-             ListOperationsResponse-        type Scopes ProjectsLocationsOperationsList =-             '["https://www.googleapis.com/auth/cloud-platform"]-        requestClient ProjectsLocationsOperationsList'{..}-          = go _plolName _plolXgafv _plolUploadProtocol-              _plolAccessToken-              _plolUploadType-              _plolFilter-              _plolPageToken-              _plolPageSize-              _plolCallback-              (Just AltJSON)-              composerService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy ProjectsLocationsOperationsListResource)-                      mempty
gogol-composer.cabal view
@@ -1,54 +1,88 @@-name:                  gogol-composer-version:               0.5.0-synopsis:              Google Cloud Composer SDK.-homepage:              https://github.com/brendanhay/gogol-bug-reports:           https://github.com/brendanhay/gogol/issues-license:               OtherLicense-license-file:          LICENSE-author:                Brendan Hay-maintainer:            Brendan Hay <brendan.g.hay@gmail.com>-copyright:             Copyright (c) 2015-2016 Brendan Hay-category:              Network, Google, Cloud-build-type:            Simple-cabal-version:         >= 1.10-extra-source-files:    README.md src/.gitkeep+cabal-version:      2.2+name:               gogol-composer+version:            1.0.0+synopsis:           Google Cloud Composer SDK.+homepage:           https://github.com/brendanhay/gogol+bug-reports:        https://github.com/brendanhay/gogol/issues+license:            MPL-2.0+license-file:       LICENSE+author:             Brendan Hay+maintainer:+  Brendan Hay <brendan.g.hay+gogol@gmail.com>, Toni Cebrián <toni@tonicebrian.com> +copyright:          Copyright (c) 2015-2025 Brendan Hay+category:           Google+build-type:         Simple+extra-source-files:+  README.md+  src/.gitkeep+ description:-    Manages Apache Airflow environments on Google Cloud Platform.-    .-    /Warning:/ This is an experimental prototype/preview release which is still-    under exploratory development and not intended for public use, caveat emptor!-    .-    This library is compatible with version @v1@-    of the API.+  Manages Apache Airflow environments on Google Cloud Platform.+  .+  /Warning:/ This is an experimental prototype/preview release which is still+  under exploratory development and not intended for public use, caveat emptor!+  .+  This library is compatible with version @v1@+  of the API.  source-repository head-    type:     git-    location: git://github.com/brendanhay/gogol.git+  type:     git+  location: git://github.com/brendanhay/gogol.git+  subdir:   gogol-composer +flag field-selectors+  description:+    If record field selectors should be enabled. Disabling this requires GHC >=9.2 and the NoFieldSelectors extension.++  default:     False+  manual:      True+ library-    default-language:  Haskell2010-    hs-source-dirs:    src gen+  default-language: GHC2021+  hs-source-dirs:   src gen+  ghc-options:+    -Wall -fwarn-incomplete-uni-patterns+    -fwarn-incomplete-record-updates -funbox-strict-fields+    -fwarn-unused-packages -    ghc-options:       -Wall+  if (!flag(field-selectors) && impl(ghc >=9.2))+    default-extensions: NoFieldSelectors -    exposed-modules:-          Network.Google.Composer-        , Network.Google.Composer.Types-        , Network.Google.Resource.Composer.Projects.Locations.Environments.Create-        , Network.Google.Resource.Composer.Projects.Locations.Environments.Delete-        , Network.Google.Resource.Composer.Projects.Locations.Environments.Get-        , Network.Google.Resource.Composer.Projects.Locations.Environments.List-        , Network.Google.Resource.Composer.Projects.Locations.Environments.Patch-        , Network.Google.Resource.Composer.Projects.Locations.ImageVersions.List-        , Network.Google.Resource.Composer.Projects.Locations.Operations.Delete-        , Network.Google.Resource.Composer.Projects.Locations.Operations.Get-        , Network.Google.Resource.Composer.Projects.Locations.Operations.List+  exposed-modules:+    Gogol.Composer+    Gogol.Composer.Projects.Locations.Environments.CheckUpgrade+    Gogol.Composer.Projects.Locations.Environments.Create+    Gogol.Composer.Projects.Locations.Environments.DatabaseFailover+    Gogol.Composer.Projects.Locations.Environments.Delete+    Gogol.Composer.Projects.Locations.Environments.ExecuteAirflowCommand+    Gogol.Composer.Projects.Locations.Environments.FetchDatabaseProperties+    Gogol.Composer.Projects.Locations.Environments.Get+    Gogol.Composer.Projects.Locations.Environments.List+    Gogol.Composer.Projects.Locations.Environments.LoadSnapshot+    Gogol.Composer.Projects.Locations.Environments.Patch+    Gogol.Composer.Projects.Locations.Environments.PollAirflowCommand+    Gogol.Composer.Projects.Locations.Environments.SaveSnapshot+    Gogol.Composer.Projects.Locations.Environments.StopAirflowCommand+    Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Create+    Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Delete+    Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Get+    Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.List+    Gogol.Composer.Projects.Locations.Environments.UserWorkloadsConfigMaps.Update+    Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Create+    Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Delete+    Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Get+    Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.List+    Gogol.Composer.Projects.Locations.Environments.UserWorkloadsSecrets.Update+    Gogol.Composer.Projects.Locations.Environments.Workloads.List+    Gogol.Composer.Projects.Locations.ImageVersions.List+    Gogol.Composer.Projects.Locations.Operations.Delete+    Gogol.Composer.Projects.Locations.Operations.Get+    Gogol.Composer.Projects.Locations.Operations.List+    Gogol.Composer.Types -    other-modules:-          Network.Google.Composer.Types.Product-        , Network.Google.Composer.Types.Sum+  other-modules:+    Gogol.Composer.Internal.Product+    Gogol.Composer.Internal.Sum -    build-depends:-          gogol-core == 0.5.0.*-        , base       >= 4.7 && < 5+  build-depends:    gogol-core ^>=1.0.0